Score and Level

This commit is contained in:
Pecusx
2025-02-15 19:55:53 +01:00
parent b1fee4e439
commit e0fc753c95
4 changed files with 72 additions and 6 deletions
+4 -4
View File
@@ -9,15 +9,15 @@ branch0
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$2E,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
branch1
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$10,$10,$10,$10,$24,$25,$26,$3F,$04,$41,$42,$43,$44,$45,$46,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$30,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$04,$23,$24,$25,$26,$3F,$04,$41,$42,$43,$44,$45,$46,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$2E,$20,$30,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$31,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1A,$1B,$1C,$1B,$1A,$24,$11,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$2D,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
branch2
dta $01,$04,$01,$36,$37,$38,$39,$04,$3B,$3C,$3D,$1D,$1E,$1F,$20,$04,$33,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$3E,$1D,$1E,$1F,$20,$04,$04,$2D,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$32,$04,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$1F,$20,$04,$04,$23,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
dta $01,$04,$01,$01,$01,$01,$01,$04,$01,$01,$01,$1D,$1E,$32,$20,$04,$32,$2C,$24,$25,$26,$01,$04,$01,$01,$01,$01,$01,$01,$01,$05,$05
branch3
+1 -1
View File
File diff suppressed because one or more lines are too long
+67 -1
View File
@@ -67,7 +67,9 @@ lastline_addr
.wo dl_level
;---------------------------------------------------
gamescreen_middle
.ds 32*17 ; 17 lines
.ds 32*17 ; 17 lines
screen_score = gamescreen_middle+6*32+14
screen_level = gamescreen_middle+9*32+13
;---------------------------------------------------
icl 'art/anim_exported.asm'
; Animation sequence:
@@ -166,6 +168,7 @@ main
RMTsong song_main_menu
jsr StartScreen
RMTSong song_ingame
jsr ScoreClear
gameloop
jsr MakeDarkScreen
jsr LevelScreen
@@ -250,6 +253,7 @@ loop
; PUT GAME HERE
jsr wait_for_press
jsr wait_for_depress
jsr ScoreUp
jsr AnimationR
jsr wait_for_press
jsr wait_for_depress
@@ -448,6 +452,66 @@ branches_list
.by 0,1,2,1,1
branches_anim_phase ; from 0 to 4
.by 1
score
dta d"0000"
level
dta $1a, $1b, $1c, $1b, $1a, $24
dta d"1"
;--------------------------------------------------
.proc ScoreUp
;--------------------------------------------------
inc score+3
lda score+3
cmp #"9"+1 ; 9+1 character code
bne ScoreReady
lda #"0" ; 0 character code
sta score+3
inc score+2
lda score+2
cmp #"9"+1 ; 9+1 character code
bne ScoreReady
lda #"0" ; 0 character code
sta score+2
inc score+1
lda score+1
cmp #"9"+1 ; 9+1 character code
bne ScoreReady
lda #"0" ; 0 character code
sta score+1
inc score
ScoreReady
rts
.endp
;--------------------------------------------------
.proc ScoreClear
;--------------------------------------------------
lda #"0"
ldx #3
@ sta score,x
dex
bpl @-
rts
.endp
;--------------------------------------------------
.proc ScoreToScreen
;--------------------------------------------------
ldx #3
@ lda score,x
sta screen_score,x
dex
bpl @-
rts
.endp
;--------------------------------------------------
.proc LevelToScreen
;--------------------------------------------------
ldx #6
@ lda level,x
sta screen_level,x
dex
bpl @-
rts
.endp
;--------------------------------------------------
.proc draw_branches
;--------------------------------------------------
@@ -527,6 +591,8 @@ draw_branch2
iny
cpy #(5*32) ;5 lines
bne @-
jsr ScoreToScreen
jsr LevelToScreen
draw_branch3
lda branches_anim_phase
ldx #(5*32) ; how many lines draw
BIN
View File
Binary file not shown.