mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-18 06:09:08 +00:00
b1238af49d
this will probably upset people
80 lines
1020 B
ArmAsm
80 lines
1020 B
ArmAsm
; stuff regarding the dock
|
|
; guybrush is a friend without pier
|
|
|
|
; if x<4 goto MONKEY_POSTER at 28,20
|
|
; if x>35 goto MONKEY_BAR at 5,20
|
|
|
|
dock_check_exit:
|
|
|
|
lda GUYBRUSH_X
|
|
cmp #4
|
|
bcc dock_to_poster
|
|
cmp #35
|
|
bcs dock_to_bar
|
|
bcc dock_no_exit
|
|
|
|
dock_to_poster:
|
|
lda #MONKEY_POSTER
|
|
sta LOCATION
|
|
lda #34
|
|
sta GUYBRUSH_X
|
|
sta DESTINATION_X
|
|
lda #20
|
|
sta GUYBRUSH_Y
|
|
sta DESTINATION_Y
|
|
jsr change_location
|
|
jmp dock_no_exit
|
|
|
|
dock_to_bar:
|
|
lda #MONKEY_BAR
|
|
sta LOCATION
|
|
lda #5
|
|
sta GUYBRUSH_X
|
|
sta DESTINATION_X
|
|
lda #20
|
|
sta GUYBRUSH_Y
|
|
sta DESTINATION_Y
|
|
jsr change_location
|
|
jmp dock_no_exit
|
|
|
|
dock_no_exit:
|
|
rts
|
|
|
|
dock_adjust_destination:
|
|
; just make Y always 20
|
|
|
|
dk_check_y:
|
|
; if x < 28, Y must be between 16 and 18
|
|
; if x < 35, Y must be between 8 and 28
|
|
|
|
dk_y_too_small:
|
|
lda #20
|
|
sta DESTINATION_Y
|
|
|
|
done_dk_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:
|
|
|
|
dock_check_bounds:
|
|
rts
|