Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-09-10 08:54:51 +00:00
Code Issues Projects Releases Wiki Activity

ootw: c4: pink laser-time

Browse Source
This commit is contained in:
Vince Weaver 2019-08-13 14:12:09 -04:00
parent 419c7d382c
commit a439b6a9f7
1 changed files with 86 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

86
ootw/ootw_c4_city.s
View File

@ -724,6 +724,12 @@ c4_move_fg_objects:
; inc CART_OUT
;===============
; make pink (where applicable)
;===============
jsr make_pink
;===============
; page flip
;===============
@ -1113,10 +1119,90 @@ zapper11_sprite:
make_pink:
ldy #0 ; 2
pink_outer:
lda gr_offsets,Y ; 4+
sta pi_smc1+1 ; 4
sta pi_smc2+1 ; 4
lda gr_offsets+1,Y ; 4+
clc ; 2
adc DRAW_PAGE ; 3
sta pi_smc1+2 ; 4
sta pi_smc2+2 ; 4
sty TEMPY ; 3
ldx #39 ; 2
pink_inner:
pi_smc1:
ldy $400,X ; 4
lda pink_lookup,Y ; 4+
pi_smc2:
sta $400,X ; 4
dex ; 2
bpl pink_inner ; 3/2
ldy TEMPY ; 3
iny ; 2
iny ; 2
cpy #48 ; 2
bne pink_outer ; 3/2
rts ; 6
; pink colors
; 0-> 0
; 1-> 3
; 2-> 3
; 3-> 3
; 4-> 1
; 5-> 1
; 6-> F
; 7-> 1
; 8-> 1
; 9-> 1
; 10-> 1
; 11-> F?
; 12-> F?
; 13-> F?
; 14-> F?
; 15-> F?
pink_lookup:
; 0 1 2 3 4 5 6 7 8 9 A B C D E F
.byte $00,$03,$03,$03,$01,$01,$0F,$01,$01,$01,$01,$0F,$0F,$0F,$0F,$0F
.byte $30,$33,$33,$33,$31,$31,$3F,$31,$31,$31,$31,$3F,$3F,$3F,$3F,$3F
.byte $30,$33,$33,$33,$31,$31,$3F,$31,$31,$31,$31,$3F,$3F,$3F,$3F,$3F
.byte $30,$33,$33,$33,$31,$31,$3F,$31,$31,$31,$31,$3F,$3F,$3F,$3F,$3F
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $10,$13,$13,$13,$11,$11,$1F,$11,$11,$11,$11,$1F,$1F,$1F,$1F,$1F
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
.byte $F0,$F3,$F3,$F3,$F1,$F1,$FF,$F1,$F1,$F1,$F1,$FF,$FF,$FF,$FF,$FF
;========================================================
; blah
; action sequence
; frame1:
; hlin color: $31: 0,20 at 40
; hlin color: $13: 0,20 at 42
; frame2:
;
;
; pink colors!