2020-09-25 03:33:59 +00:00
|
|
|
; stuff regarding the church
|
|
|
|
|
|
|
|
|
|
|
2020-09-29 23:30:34 +00:00
|
|
|
; if x<4 goto MONKEY_MANSION_PATH at
|
|
|
|
|
; if x>35 goto MONKEY_CHURCH at
|
2020-09-25 03:33:59 +00:00
|
|
|
|
|
|
|
|
church_check_exit:
|
|
|
|
|
|
|
|
|
|
lda GUYBRUSH_X
|
|
|
|
|
cmp #4
|
2020-09-29 23:30:34 +00:00
|
|
|
bcc church_to_mansion_path
|
2020-09-25 03:33:59 +00:00
|
|
|
cmp #35
|
2020-09-29 23:30:34 +00:00
|
|
|
bcs church_to_town
|
2020-09-25 03:33:59 +00:00
|
|
|
bcc church_no_exit
|
|
|
|
|
|
2020-09-29 23:30:34 +00:00
|
|
|
church_to_mansion_path:
|
|
|
|
|
lda #MONKEY_MANSION_PATH
|
2020-09-25 03:33:59 +00:00
|
|
|
sta LOCATION
|
|
|
|
|
lda #34
|
|
|
|
|
sta GUYBRUSH_X
|
|
|
|
|
sta DESTINATION_X
|
|
|
|
|
lda #20
|
|
|
|
|
sta GUYBRUSH_Y
|
|
|
|
|
sta DESTINATION_Y
|
|
|
|
|
jsr change_location
|
|
|
|
|
jmp church_no_exit
|
|
|
|
|
|
2020-09-29 23:30:34 +00:00
|
|
|
church_to_town:
|
|
|
|
|
lda #MONKEY_TOWN
|
2020-09-25 03:33:59 +00:00
|
|
|
sta LOCATION
|
|
|
|
|
lda #5
|
|
|
|
|
sta GUYBRUSH_X
|
|
|
|
|
sta DESTINATION_X
|
|
|
|
|
lda #20
|
|
|
|
|
sta GUYBRUSH_Y
|
|
|
|
|
sta DESTINATION_Y
|
|
|
|
|
jsr change_location
|
|
|
|
|
jmp church_no_exit
|
|
|
|
|
|
|
|
|
|
church_no_exit:
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;==========================
|
|
|
|
|
;==========================
|
|
|
|
|
; church adjust destination
|
|
|
|
|
;==========================
|
|
|
|
|
;==========================
|
|
|
|
|
church_adjust_destination:
|
|
|
|
|
; just make Y always 20
|
|
|
|
|
|
|
|
|
|
ch_check_y:
|
|
|
|
|
; if x < 28, Y must be between 16 and 18
|
|
|
|
|
; if x < 35, Y must be between 8 and 28
|
|
|
|
|
|
|
|
|
|
ch_y_too_small:
|
|
|
|
|
lda #20
|
|
|
|
|
sta DESTINATION_Y
|
|
|
|
|
|
|
|
|
|
done_ch_adjust:
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;draw_house:
|
|
|
|
|
|
|
|
|
|
; lda #<wall_sprite
|
|
|
|
|
; sta INL
|
|
|
|
|
; lda #>wall_sprite
|
|
|
|
|
; sta INH
|
|
|
|
|
|
|
|
|
|
; lda #18
|
|
|
|
|
; sta XPOS
|
|
|
|
|
; lda #22
|
|
|
|
|
; sta YPOS
|
|
|
|
|
|
|
|
|
|
; jsr put_sprite_crop
|
|
|
|
|
|
|
|
|
|
; rts
|
|
|
|
|
|
|
|
|
|
;house_sprite:
|
|
|
|
|
|
