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

ds: credits screen more or less going again

Browse Source
This commit is contained in:
Vince Weaver 2019-11-15 11:30:50 -05:00
parent 212cfe4581
commit 6c2cc34ca5
1 changed files with 24 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
demosplash/credits.s
View File

@ -29,6 +29,24 @@ credits:
; setup graphics
jsr create_update_type1
; setup_rasterbars_page_smc=4
; setup_rasterbars_offset_smc=13
lda #13
sta setup_rasterbars_offset_smc+1
; setup_rasterbars_bars_start_smc=46
lda #46
sta setup_rasterbars_bars_start_smc+1
; setup_rasterbars_bars_end_smc=184
lda #184
sta setup_rasterbars_bars_end_smc+1
; setup_rasterbars_start_addr1_smc:=#<(UPDATE_START+(BARS_START*49))
lda #<(UPDATE_START+(BARS_START*49))
sta setup_rasterbars_start_addr1_smc+1
; setup_rasterbars_start_addr2_smc:=#>(UPDATE_START+(BARS_START*49))
lda #>(UPDATE_START+(BARS_START*49))
sta setup_rasterbars_start_addr2_smc+1
jsr setup_rasterbars
; change to page0/page0/page1/page1 for first 32 lines
@ -57,7 +75,7 @@ credits:
sta UPDATE_START+1+(49*32)
sta UPDATE_START+1+(49*36)
jsr play_frame_compressed ; 6+1237
; jsr play_frame_compressed ; 6+1237
;=============================
; Load graphic page0
@ -76,6 +94,8 @@ credits:
jsr gr_copy_to_current ; copy to page1
jsr play_frame_compressed ; 6+1237
; GR part
bit PAGE1
bit LORES ; 4
@ -100,6 +120,8 @@ credits:
jsr gr_copy_to_current
jsr play_frame_compressed ; 6+1237
; GR part
bit PAGE0
@ -182,7 +204,7 @@ credits_loop:
; 3+2+3+6+1237 play fake (-1)
lda FRAME_PLAY_PAGE ; 3
cmp #$2 ; 2
cmp #$5 ; 2 ; FIXME
beq play_fake ; 3
; -1
play_actual: