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

xmas_2023: more autoprogress

Browse Source
This commit is contained in:
Vince Weaver 2023-12-23 16:30:58 -05:00
parent e505bda874
commit 51c6c90414
2 changed files with 45 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
demos/xmas_2023/fireplace.s
View File

@ -478,6 +478,7 @@ done_music3:
done_scroll: done_scroll:
totally_done_scroll: totally_done_scroll:
bit KEYRESET
rts rts

49
demos/xmas_2023/regular_tree.s
View File

@ -174,6 +174,8 @@ regular_tree:
lda #0 lda #0
sta OFFSET sta OFFSET
sta FRAMEL
sta FRAMEH
reset_tree_loop: reset_tree_loop:
@ -184,12 +186,45 @@ regular_tree_loop:
ldx TREE_COUNT ldx TREE_COUNT
jsr gr_fast_copy jsr gr_fast_copy
; jsr wait_until_keypress
jsr scroll_loop jsr scroll_loop
jsr page_flip jsr page_flip
; update frame count
inc FRAMEL ; 5
lda FRAMEL ; 3
and #$3f ; 2
sta FRAMEL ; 3
bne frame_noflo4 ; 2/3
inc FRAMEH ; 5
frame_noflo4:
lda KEYPRESS
bmi done_regular_tree
; wait for_pattern / end
lda SOUND_STATUS
and #SOUND_MOCKINGBOARD
beq no_music4
; lda #1
; cmp current_pattern_smc+1
; bcc totally_done_fireplace
; beq totally_done_fireplace
; jmp done_music4
no_music4:
lda FRAMEH
cmp #6
beq done_regular_tree
done_music4:
lda #128 lda #128
jsr wait jsr wait
@ -200,13 +235,17 @@ regular_tree_loop:
lda TREE_COUNT lda TREE_COUNT
cmp #$80 cmp #$80
bne done_regular_tree bne done_tree_count
jmp reset_tree_loop jmp reset_tree_loop
done_tree_count:
done_regular_tree:
jmp regular_tree_loop jmp regular_tree_loop
done_regular_tree:
bit KEYRESET
rts
;========================== ;==========================
; gr_fast_copy ; gr_fast_copy