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

keen: fix fade-in

Browse Source
This commit is contained in:
Vince Weaver 2024-04-13 11:16:43 -04:00
parent be968a1ad1
commit 62c01b77c4
1 changed files with 17 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
games/keen/mars.s
View File

@ -24,6 +24,8 @@ mars_start:
bit LORES bit LORES
bit FULLGR bit FULLGR
lda #0
sta clear_all_color+1
jsr clear_all ; avoid grey stripes at load jsr clear_all ; avoid grey stripes at load
lda KEENS lda KEENS
@ -45,12 +47,15 @@ plenty_of_keens:
lda #4 lda #4
sta DRAW_PAGE sta DRAW_PAGE
; see if returning and it game over ; see if returning and if game over
lda LEVEL_OVER lda LEVEL_OVER
cmp #GAME_OVER cmp #GAME_OVER
beq return_to_title
bne not_game_over
jmp return_to_title
not_game_over:
; TODO: set this in title, don't over-write ; TODO: set this in title, don't over-write
@ -88,8 +93,18 @@ plenty_of_keens:
jsr copy_tilemap_subset jsr copy_tilemap_subset
; make a copy in $c00 for fade-in purposes
lda DRAW_PAGE ; necssary
pha
lda #8
sta DRAW_PAGE
jsr draw_tilemap
pla
sta DRAW_PAGE
lda #1 lda #1
sta INITIAL_SOUND sta INITIAL_SOUND