mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-20 01:29:36 +00:00
82 lines
922 B
ArmAsm
82 lines
922 B
ArmAsm
|
|
||
|
|
|
||
|
|
bar_check_exit:
|
||
|
|
; lda DESTINATION_Y
|
||
|
|
; cmp #28
|
||
|
|
; bcc lookout_no_exit
|
||
|
|
|
||
|
|
; lda DESTINATION_X
|
||
|
|
; cmp #28
|
||
|
|
; bcc lookout_no_exit
|
||
|
|
; cmp #35
|
||
|
|
; bcs lookout_no_exit
|
||
|
|
|
||
|
|
; lda #MONKEY_POSTER
|
||
|
|
; sta LOCATION
|
||
|
|
; lda #2
|
||
|
|
; sta GUYBRUSH_X
|
||
|
|
; lda #22
|
||
|
|
; sta GUYBRUSH_Y
|
||
|
|
; jsr change_location
|
||
|
|
|
||
|
|
bar_no_exit:
|
||
|
|
rts
|
||
|
|
|
||
|
|
bar_adjust_destination:
|
||
|
|
|
||
|
|
br_check_x:
|
||
|
|
; lda DESTINATION_X
|
||
|
|
; cmp #19
|
||
|
|
; bcc ld_x_too_small
|
||
|
|
; cmp #35
|
||
|
|
; bcs ld_x_too_big
|
||
|
|
; jmp ld_check_y
|
||
|
|
|
||
|
|
br_x_too_big:
|
||
|
|
; lda #35
|
||
|
|
; sta DESTINATION_X
|
||
|
|
; bne ld_check_y
|
||
|
|
|
||
|
|
br_x_too_small:
|
||
|
|
; lda #18
|
||
|
|
; sta DESTINATION_X
|
||
|
|
|
||
|
|
br_check_y:
|
||
|
|
; if x < 28, Y must be between 16 and 18
|
||
|
|
; if x < 35, Y must be between 8 and 28
|
||
|
|
|
||
|
|
; lda DESTINATION_Y
|
||
|
|
; cmp #16
|
||
|
|
; bcc ld_y_too_small
|
||
|
|
|
||
|
|
rts
|
||
|
|
|
||
|
|
br_y_too_small:
|
||
|
|
; lda #16
|
||
|
|
; sta DESTINATION_Y
|
||
|
|
|
||
|
|
done_br_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:
|
||
|
|
|