aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--main.s67
-rw-r--r--sprites.chrbin8192 -> 8192 bytes
2 files changed, 67 insertions, 0 deletions
diff --git a/main.s b/main.s
index 3e03e99..53f7082 100644
--- a/main.s
+++ b/main.s
@@ -113,6 +113,25 @@ clrmem:
LDA #$00
STA $0202
+ LDA #$2D
+ STA $0204
+ LDA #$00
+ STA $0206
+ LDA #$40
+ STA $0207
+ LDA #$2D
+ STA $0208
+ LDA #$00
+ STA $020A
+ LDA #$48
+ STA $020B
+ LDA #$2D
+ STA $020C
+ LDA #$00
+ STA $020E
+ LDA #$50
+ STA $020F
+
; Second wait for vblank, PPU is ready after this
- BIT $2002
BPL -
@@ -355,6 +374,7 @@ eat_apple:
LDA speed.w, x
STA frame_skip
JSR new_apple
+ JSR draw_score
draw_sprites:
LDX #$00
@@ -423,6 +443,8 @@ start_game: ; {{{
JSR new_apple
+ JSR draw_score
+
- BIT $2002
BPL -
@@ -625,6 +647,51 @@ draw_sprite_at_head: ; {{{
STX num_draws
RTS ; }}}
+draw_score: ; {{{
+ LDA #$30
+ STA $0205
+ STA $0209
+ STA $020D
+
+ LDA length
+hundreds:
+ CMP #100
+ BMI tens
+ SEC
+ SBC #100
+ LDX $0205
+ INX
+ TAY
+ TXA
+ STA $0205
+ TYA
+ JMP hundreds
+tens:
+ CMP #10
+ BMI ones
+ SEC
+ SBC #10
+ LDX $0209
+ INX
+ TAY
+ TXA
+ STA $0209
+ TYA
+ JMP tens
+ones:
+ CMP #1
+ BMI end_draw_score
+ SEC
+ SBC #1
+ LDX $020D
+ INX
+ TAY
+ TXA
+ STA $020D
+ TYA
+ JMP ones
+end_draw_score:
+ RTS ; }}}
test_body_collision ; {{{
LDA head_x
PHA
diff --git a/sprites.chr b/sprites.chr
index 9f333de..a19ded5 100644
--- a/sprites.chr
+++ b/sprites.chr
Binary files differ