climb: more work on collision

This commit is contained in:
Vince Weaver 2024-09-12 00:32:08 -04:00
parent d2a516f304
commit 148d018253
2 changed files with 8 additions and 0 deletions

View File

@ -44,6 +44,7 @@ cliff_climb:
sta CLIMB_COUNT
sta MAP_LOCATION
sta PEASANT_FALLING
sta MAX_HEIGHT
lda #10
sta PEASANT_X
@ -278,6 +279,7 @@ new_bird_wider:
move_bird:
;=========================
; collision detect here?
; we're both 3 wide
@ -287,6 +289,11 @@ move_bird:
cmp bird_x
bne no_bird_collision
; check height
; we are 30 tall
; bird is 15 or so
; collision happened!
lda #1

View File

@ -251,6 +251,7 @@ PEASANT_FALLING = $AF
CURRENT_VERB = $B0 ; parser
CURRENT_NOUN = $B1
WORD_MATCH = $B2
MAX_HEIGHT = $B3
INPUT_X = $C0
BOX_X1L = $C1