dos33fsprogs/games/peasant/peasant_common.s

54 lines
879 B
ArmAsm

; some common actions that are needed in all the peasantry levels
; + exiting hastack
; + kerrek body countdown
; + night-time count down
; + rain-storm count down
;======================================================
; if start level and not in JHONKA_CAVE or HAY_BALE
; then exit the hay bale, print message, do animation
check_haystack_exit:
; fist see if in hay bale
lda GAME_STATE_1
and #IN_HAY_BALE
beq hay_bale_good
lda MAP_LOCATION
cmp #LOCATION_JHONKA_CAVE
beq hay_bale_good
cmp #LOCATION_HAY_BALE
bne must_exit_hay
hay_bale_good:
rts
must_exit_hay:
; exit hay bale
lda GAME_STATE_1
and #<(~IN_HAY_BALE)
sta GAME_STATE_1
; no longer muddy
lda GAME_STATE_2
and #<(~COVERED_IN_MUD)
sta GAME_STATE_2
; print message
ldx #<hay_blown_away_message
ldy #>hay_blown_away_message
jsr partial_message_step
; TODO: show animation
rts