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

peasant: hook up points for hitting top of cliff

Browse Source
This commit is contained in:
Vince Weaver 2024-10-08 00:16:34 -04:00
parent b3548c4071
commit 3b314fa727
3 changed files with 59 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

62
games/peasant/cliff_heights/cliff_heights.s
View File

@ -44,19 +44,6 @@ cliff_heights:
jsr update_score jsr update_score
; FIXME!
; only set this if just arrived, not if loading saved game
lda #14
sta PEASANT_X
lda #150
sta PEASANT_Y
lda #0
sta PEASANT_XADD
sta PEASANT_YADD
;============================= ;=============================
;============================= ;=============================
; new screen location ; new screen location
@ -179,6 +166,54 @@ col_copy_loop:
jsr zx02_full_decomp jsr zx02_full_decomp
lda GAME_STATE_3
and #CLIFF_CLIMBED
bne cliff_already_climbed
; only set this if just arrived, not if loading saved game
lda #14
sta PEASANT_X
lda #150
sta PEASANT_Y
lda #0
sta PEASANT_XADD
sta PEASANT_YADD
; ldx #<gary_scare_message
; ldy #>gary_scare_message
; jsr partial_message_step
; score points
lda #3
jsr score_points
lda GAME_STATE_3
ora #CLIFF_CLIMBED
sta GAME_STATE_3
; TODO: break fence
ldx #<cliff_heights_top_message
ldy #>cliff_heights_top_message
stx OUTL
sty OUTH
jsr print_text_message
jsr wait_until_keypress
jsr restore_parse_message
cliff_already_climbed:
;=========================== ;===========================
;=========================== ;===========================
;=========================== ;===========================
@ -338,6 +373,7 @@ exiting_cliff:
.include "../version.inc" .include "../version.inc"
;.include "../print_text_message.s"
.include "graphics_heights/cliff_heights_graphics.inc" .include "graphics_heights/cliff_heights_graphics.inc"
.include "graphics_heights/priority_cliff_heights.inc" .include "graphics_heights/priority_cliff_heights.inc"

1
games/peasant/text/cliff_heights.inc
View File

@ -7,6 +7,7 @@
; lightning makes sound effect, same as rock crashing noise ; lightning makes sound effect, same as rock crashing noise
; shows once atop ; shows once atop
cliff_heights_top_message:
.byte "Nice jorb climbing the",13 .byte "Nice jorb climbing the",13
.byte "cliff. You have a real way",13 .byte "cliff. You have a real way",13
.byte "with those arrow keys.",0 .byte "with those arrow keys.",0

16
games/peasant/zp.inc
View File

@ -159,12 +159,9 @@ PEASANT_DIR = $93
PEASANT_DIR_LEFT = 2 PEASANT_DIR_LEFT = 2
PEASANT_DIR_DOWN = 3 PEASANT_DIR_DOWN = 3
GAME_STATE_3 = $94 MAP_LOCATION = $94
; SWORD_THROWN = $01
MAP_LOCATION = $96 GAME_STATE_0 = $96
GAME_STATE_0 = $97
BABY_IN_WELL=$01 BABY_IN_WELL=$01
BUCKET_DOWN_WELL=$02 BUCKET_DOWN_WELL=$02
TALKED_TO_MENDELEV=$04 TALKED_TO_MENDELEV=$04
@ -173,7 +170,7 @@ GAME_STATE_0 = $97
GARY_SCARED=$20 GARY_SCARED=$20
LADY_GONE=$40 LADY_GONE=$40
TRINKET_GIVEN=$80 TRINKET_GIVEN=$80
GAME_STATE_1 = $98 GAME_STATE_1 = $97
FISH_FED=$01 ; also implies man gone and inn open FISH_FED=$01 ; also implies man gone and inn open
PUDDLE_WET=$02 PUDDLE_WET=$02
IN_HAY_BALE=$04 IN_HAY_BALE=$04
@ -182,7 +179,7 @@ GAME_STATE_1 = $98
NIGHT=$20 NIGHT=$20
POT_ON_HEAD=$40 POT_ON_HEAD=$40
WEARING_ROBE=$80 WEARING_ROBE=$80
GAME_STATE_2 = $99 GAME_STATE_2 = $98
ON_FIRE = $01 ON_FIRE = $01
COTTAGE_ROCK_MOVED=$02 COTTAGE_ROCK_MOVED=$02
KNUCKLES_BLEED=$04 KNUCKLES_BLEED=$04
@ -192,6 +189,11 @@ GAME_STATE_2 = $99
GOT_MUDDY_ALREADY = $40 GOT_MUDDY_ALREADY = $40
GREASE_ON_HEAD =$80 GREASE_ON_HEAD =$80
GAME_STATE_3 = $99
; SWORD_THROWN = $01
CLIFF_CLIMBED = $02
NED_STATUS = $9A NED_STATUS = $9A
; 0 = hiding (no increment) ; 0 = hiding (no increment)
; 1..127 = count up to appearing ; 1..127 = count up to appearing