Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-05 21:34:30 +00:00
Code Issues Projects Releases Wiki Activity

pt3: clean up fire height code a bit

Browse Source
This commit is contained in:
Vince Weaver 2019-05-17 14:19:18 -04:00
parent ef2b5061c8
commit b1ada9fd75
1 changed files with 24 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
pt3_player/fire.s
View File

@ -80,6 +80,7 @@ draw_fire_frame:
;===============================
; Update fire frame
;===============================
; Unroll x 2
; set up working line (to store to)
@ -125,13 +126,10 @@ fire_fb_update_loop:
lda A_VOLUME ; 3
cpy #13 ; 2
bcc fire_vol ; blt ; 2/3
lda B_VOLUME ; 3
cpy #26 ; 2
bcc fire_vol ; blt ; 2/3
lda C_VOLUME ; 3
fire_vol:
and #$f ; 2
@ -142,31 +140,32 @@ fire_vol:
fire_low:
; Q=1 3/4 of time
lda FIRE_Q ; 3
beq fire_height_done ; 2/3
fire_low_br:
lda #1 ; 2
jmp fire_height_done ; 3
bne fire_one ; 0-3, is not 0 3/4 of time ; 2/3
beq fire_zero ; 3
fire_medium:
cmp #$d ; 2
bcs fire_high ; blt ; 2/3
bcs fire_high ; bge ; 2/3
; Q=1 1/2 of time
lda FIRE_Q ; 3
and #$1 ; 2
jmp fire_height_done ; 3
jmp fire_set ; 3
fire_high:
; Q=1 1/4 of time
lda FIRE_Q ; 3
cmp #1 ; 2
beq fire_height_done ; 2/3
fire_high_br:
lda FIRE_Q ; is 0 1/4 of time ; 3
bne fire_zero ; 2/3
fire_one:
lda #1 ; 2
bne fire_set ; 3
fire_zero:
lda #0 ; 2
fire_height_done:
fire_set:
sta FIRE_Q ; 3
sty FIRE_Y ; 3
; bounds check
@ -176,6 +175,11 @@ fire_height_done:
cpy #39 ; 2
beq fire_r_same ; 2/3
; RAND_R
; 50% chance fire comes from below
; 25% chance comes from right
; 25% change comes from left
lda #$2 ; 2
bit SEEDH ; 3
bne fire_r_same ; 2/3
@ -195,7 +199,7 @@ fire_smc5_fb2:
ldy FIRE_Y ; 3
; adjust it
; have value, subtract Q
sec ; 2
sbc FIRE_Q ; 3
@ -223,7 +227,8 @@ done_fire_fb_update_loop:
lda fire_smc5_fb+1 ; 4
adc #40 ; 2
sta fire_smc5_fb+1 ; 4
lda fire_smc5_fb+2 ; 4
lda fire_smc5_fb+2
; 4
adc #0 ; 2
sta fire_smc5_fb+2 ; 4