Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-12-26 11:30:12 +00:00
Code Issues Projects Releases Wiki Activity

mode7: messed with starfield timing

Browse Source
This commit is contained in:
Vince Weaver 2018-03-19 11:02:52 -04:00
parent 5cc967acb3
commit c5e229ea3e
1 changed files with 18 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
mode7_demo/starfield_demo.s
View File

@ -228,6 +228,7 @@ starfield_credits:
lda #4 ; 2 lda #4 ; 2
sta DRAW_PAGE sta DRAW_PAGE
jsr credits_draw_text_background jsr credits_draw_text_background
lda #128 lda #128
sta SPEED sta SPEED
@ -261,6 +262,16 @@ init_stars2:
jsr init_credits jsr init_credits
before_pause:
jsr clear_top ; 6+
jsr draw_stars
jsr credits_draw_bottom
jsr page_flip ; 6
dec SPEED
lda SPEED
bne before_pause
done_before_pause:
;=========================== ;===========================
;=========================== ;===========================
@ -286,8 +297,8 @@ starcredits_loop:
;==================== ;====================
; draw the rasterbars ; draw the rasterbars
;==================== ;====================
lda SPEED ; lda SPEED
bne done_rasters ; bne done_rasters
lda YY lda YY
cmp #18 cmp #18
@ -309,10 +320,10 @@ done_rasters:
jsr page_flip ; 6 jsr page_flip ; 6
lda SPEED ; lda SPEED
beq no_speed ; beq no_speed
dec SPEED ; dec SPEED
no_speed: ;no_speed:
lda YY lda YY
cmp #19 ; NUMBER OF CREDITS cmp #19 ; NUMBER OF CREDITS
@ -322,7 +333,7 @@ no_speed:
; loop ; loop
;================== ;==================
jmp starcredits_loop ; 3 jmp starcredits_loop ; 3
done_star_credits: done_star_credits:
rts rts