mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-20 17:29:28 +00:00
monkey: update so you can walk into distance
more pain than it was worth
This commit is contained in:
Vince Weaver
parent
4605d65403
commit
504f6ef4b7
|
|
@ -84,11 +84,51 @@ guybrush_left2_sprite:
|
||||||
.byte $f0,$ff,$AA
|
.byte $f0,$ff,$AA
|
||||||
.byte $0f,$A0,$AA
|
.byte $0f,$A0,$AA
|
||||||
|
|
||||||
guybrush_medium_sprite:
|
|
||||||
|
|
||||||
|
guybrush_med_sprites:
|
||||||
|
.word guybrush_med_down_sprite
|
||||||
|
.word guybrush_med_left_sprite
|
||||||
|
.word guybrush_med_up_sprite
|
||||||
|
.word guybrush_med_right_sprite
|
||||||
|
|
||||||
|
guybrush_med_up_sprite:
|
||||||
|
.byte 2,4
|
||||||
|
.byte $dd,$dd
|
||||||
|
.byte $fd,$fd
|
||||||
|
.byte $00,$00
|
||||||
|
.byte $0f,$0f
|
||||||
|
|
||||||
|
guybrush_med_down_sprite:
|
||||||
|
.byte 2,4
|
||||||
|
.byte $bd,$bd
|
||||||
|
.byte $fb,$fb
|
||||||
|
.byte $00,$00
|
||||||
|
.byte $0f,$0f
|
||||||
|
|
||||||
|
guybrush_med_right_sprite:
|
||||||
|
.byte 2,4
|
||||||
|
.byte $AA,$bd
|
||||||
|
.byte $Ad,$fb
|
||||||
|
.byte $AA,$00
|
||||||
|
.byte $AA,$0f
|
||||||
|
|
||||||
|
guybrush_med_left_sprite:
|
||||||
|
.byte 2,4
|
||||||
|
.byte $bd,$AA
|
||||||
|
.byte $fb,$Ad
|
||||||
|
.byte $00,$AA
|
||||||
|
.byte $0f,$AA
|
||||||
|
|
||||||
|
;=====
|
||||||
|
|
||||||
|
guybrush_small_sprite:
|
||||||
.byte 1,2
|
.byte 1,2
|
||||||
.byte $fd
|
.byte $fd
|
||||||
.byte $0f
|
.byte $0f
|
||||||
|
|
||||||
guybrush_map_sprite:
|
;=====
|
||||||
|
|
||||||
|
guybrush_tiny_sprite:
|
||||||
.byte 1,1
|
.byte 1,1
|
||||||
.byte $ff
|
.byte $ff
|
||||||
|
|
|
||||||
|
|
@ -391,24 +391,84 @@ done_return:
|
||||||
;==============================
|
;==============================
|
||||||
set_destination:
|
set_destination:
|
||||||
|
|
||||||
; only adjust Y if we're big guybrush?
|
; tiny: y=cursor_y+6
|
||||||
lda LOCATION
|
; small: y=cursor_y+2
|
||||||
cmp #MONKEY_MAP
|
; med: y=cursor_y-2
|
||||||
bne set_destination_big
|
; big: y=cursor_y-7
|
||||||
|
|
||||||
set_destination_on_map:
|
; adjust differently depending on size
|
||||||
|
lda GUYBRUSH_SIZE
|
||||||
|
beq set_destination_big
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq set_destination_medium
|
||||||
|
cmp #GUYBRUSH_SMALL
|
||||||
|
beq set_destination_small
|
||||||
|
|
||||||
|
set_destination_tiny:
|
||||||
|
|
||||||
lda CURSOR_X
|
lda CURSOR_X
|
||||||
|
bpl destination_tiny_x_is_positive
|
||||||
|
; we are off edge of screen, just say 0
|
||||||
|
lda #$FE
|
||||||
|
destination_tiny_x_is_positive:
|
||||||
clc
|
clc
|
||||||
adc #$2
|
adc #2
|
||||||
sta DESTINATION_X
|
sta DESTINATION_X
|
||||||
|
|
||||||
lda CURSOR_Y
|
lda CURSOR_Y
|
||||||
|
bpl destination_tiny_y_is_positive
|
||||||
|
lda #0
|
||||||
|
destination_tiny_y_is_positive:
|
||||||
clc
|
clc
|
||||||
adc #$4
|
adc #6
|
||||||
and #$FE
|
and #$FE ; has to be even
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
rts
|
|
||||||
|
jmp set_destination_smc
|
||||||
|
|
||||||
|
set_destination_small:
|
||||||
|
|
||||||
|
lda CURSOR_X
|
||||||
|
bpl destination_small_x_is_positive
|
||||||
|
; we are off edge of screen, just say 0
|
||||||
|
lda #$FE
|
||||||
|
destination_small_x_is_positive:
|
||||||
|
clc
|
||||||
|
adc #2
|
||||||
|
sta DESTINATION_X
|
||||||
|
|
||||||
|
lda CURSOR_Y
|
||||||
|
bpl destination_small_y_is_positive
|
||||||
|
lda #0
|
||||||
|
destination_small_y_is_positive:
|
||||||
|
clc
|
||||||
|
adc #2
|
||||||
|
and #$FE ; has to be even
|
||||||
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
jmp set_destination_smc
|
||||||
|
|
||||||
|
set_destination_medium:
|
||||||
|
|
||||||
|
lda CURSOR_X
|
||||||
|
bpl destination_medium_x_is_positive
|
||||||
|
; we are off edge of screen, just say 0
|
||||||
|
lda #$ff
|
||||||
|
destination_medium_x_is_positive:
|
||||||
|
clc
|
||||||
|
adc #1
|
||||||
|
sta DESTINATION_X
|
||||||
|
|
||||||
|
lda CURSOR_Y
|
||||||
|
bpl destination_medium_y_is_positive
|
||||||
|
lda #0
|
||||||
|
destination_medium_y_is_positive:
|
||||||
|
sec
|
||||||
|
sbc #2
|
||||||
|
and #$FE ; has to be even
|
||||||
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
jmp set_destination_smc
|
||||||
|
|
||||||
set_destination_big:
|
set_destination_big:
|
||||||
|
|
||||||
|
|
@ -493,9 +553,10 @@ change_location:
|
||||||
lda (LOCATION_STRUCT_L),Y
|
lda (LOCATION_STRUCT_L),Y
|
||||||
sta keep_in_bounds_smc+2
|
sta keep_in_bounds_smc+2
|
||||||
|
|
||||||
ldy #LOCATION_SIZE
|
; set on exit as might have multiple entrances
|
||||||
lda (LOCATION_STRUCT_L),Y
|
; ldy #LOCATION_SIZE
|
||||||
sta GUYBRUSH_SIZE
|
; lda (LOCATION_STRUCT_L),Y
|
||||||
|
; sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
;==========================
|
;==========================
|
||||||
; load new background
|
; load new background
|
||||||
|
|
|
||||||
|
|
@ -38,6 +38,7 @@ monkey_start:
|
||||||
sta DRAW_PAGE
|
sta DRAW_PAGE
|
||||||
sta LEVEL_OVER
|
sta LEVEL_OVER
|
||||||
sta GUYBRUSH_DIRECTION
|
sta GUYBRUSH_DIRECTION
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
sta DISPLAY_MESSAGE
|
sta DISPLAY_MESSAGE
|
||||||
sta BAR_DOOR_OPEN
|
sta BAR_DOOR_OPEN
|
||||||
sta VALID_NOUN
|
sta VALID_NOUN
|
||||||
|
|
@ -190,23 +191,37 @@ done_move_guybrush:
|
||||||
sta YPOS
|
sta YPOS
|
||||||
|
|
||||||
lda GUYBRUSH_SIZE
|
lda GUYBRUSH_SIZE
|
||||||
|
|
||||||
cmp #GUYBRUSH_BIG
|
cmp #GUYBRUSH_BIG
|
||||||
beq big_guybrush
|
beq big_guybrush
|
||||||
|
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq medium_guybrush
|
||||||
|
|
||||||
lda GUYBRUSH_SIZE
|
lda GUYBRUSH_SIZE
|
||||||
cmp #GUYBRUSH_TINY
|
cmp #GUYBRUSH_TINY
|
||||||
beq map_guybrush
|
beq tiny_guybrush
|
||||||
|
|
||||||
small_guybrush:
|
small_guybrush:
|
||||||
lda #<guybrush_medium_sprite
|
lda #<guybrush_small_sprite
|
||||||
sta INL
|
sta INL
|
||||||
lda #>guybrush_medium_sprite
|
lda #>guybrush_small_sprite
|
||||||
jmp really_draw_guybrush
|
jmp really_draw_guybrush
|
||||||
|
|
||||||
map_guybrush:
|
tiny_guybrush:
|
||||||
lda #<guybrush_map_sprite
|
lda #<guybrush_tiny_sprite
|
||||||
sta INL
|
sta INL
|
||||||
lda #>guybrush_map_sprite
|
lda #>guybrush_tiny_sprite
|
||||||
|
jmp really_draw_guybrush
|
||||||
|
|
||||||
|
medium_guybrush:
|
||||||
|
lda GUYBRUSH_DIRECTION ; 00/01 or 02/03 or 04/05 or 06/07
|
||||||
|
and #$fe
|
||||||
|
tay
|
||||||
|
|
||||||
|
lda guybrush_med_sprites,Y
|
||||||
|
sta INL
|
||||||
|
lda guybrush_med_sprites+1,Y
|
||||||
jmp really_draw_guybrush
|
jmp really_draw_guybrush
|
||||||
|
|
||||||
big_guybrush:
|
big_guybrush:
|
||||||
|
|
|
||||||
|
|
@ -57,7 +57,7 @@ bar_to_town:
|
||||||
lda #34
|
lda #34
|
||||||
sta GUYBRUSH_X
|
sta GUYBRUSH_X
|
||||||
sta DESTINATION_X
|
sta DESTINATION_X
|
||||||
lda #20
|
lda #18
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
lda #26
|
lda #26
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
|
||||||
|
|
@ -28,12 +28,17 @@ church_to_mansion_path:
|
||||||
church_to_town:
|
church_to_town:
|
||||||
lda #MONKEY_TOWN
|
lda #MONKEY_TOWN
|
||||||
sta LOCATION
|
sta LOCATION
|
||||||
lda #5
|
lda #1
|
||||||
sta GUYBRUSH_X
|
sta GUYBRUSH_X
|
||||||
sta DESTINATION_X
|
sta DESTINATION_X
|
||||||
lda #20
|
lda #20
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
|
lda #30
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp church_no_exit
|
jmp church_no_exit
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -18,6 +18,10 @@ mansion_to_mansion_path:
|
||||||
lda #10
|
lda #10
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp mansion_no_exit
|
jmp mansion_no_exit
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -22,6 +22,10 @@ mansion_path_to_mansion:
|
||||||
lda #20
|
lda #20
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp mansion_path_no_exit
|
jmp mansion_path_no_exit
|
||||||
|
|
||||||
|
|
@ -34,6 +38,10 @@ mansion_path_to_church:
|
||||||
lda #32
|
lda #32
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp mansion_path_no_exit
|
jmp mansion_path_no_exit
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -1,3 +1,5 @@
|
||||||
|
; won't you take me to...
|
||||||
|
|
||||||
; right side of downtown village
|
; right side of downtown village
|
||||||
|
|
||||||
;=======================
|
;=======================
|
||||||
|
|
@ -6,23 +8,27 @@
|
||||||
;
|
;
|
||||||
|
|
||||||
town_check_exit:
|
town_check_exit:
|
||||||
|
jsr update_feet_location
|
||||||
|
|
||||||
lda GUYBRUSH_X
|
lda GUYBRUSH_X
|
||||||
cmp #5 ; temporary
|
cmp #2
|
||||||
bcc town_to_church
|
bcc town_to_church
|
||||||
|
|
||||||
|
cmp #9
|
||||||
|
beq town_to_voodoo
|
||||||
|
|
||||||
cmp #32
|
cmp #32
|
||||||
bcc town_no_exit
|
bcc town_no_exit
|
||||||
|
|
||||||
lda GUYBRUSH_Y
|
town_to_bar:
|
||||||
cmp #22
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #26
|
||||||
bcs town_no_exit
|
bcs town_no_exit
|
||||||
|
|
||||||
lda GUYBRUSH_DIRECTION
|
lda GUYBRUSH_DIRECTION
|
||||||
cmp #DIR_UP
|
cmp #DIR_UP
|
||||||
bne town_no_exit
|
bne town_no_exit
|
||||||
|
|
||||||
town_to_bar:
|
|
||||||
lda #MONKEY_BAR
|
lda #MONKEY_BAR
|
||||||
sta LOCATION
|
sta LOCATION
|
||||||
lda #34
|
lda #34
|
||||||
|
|
@ -32,12 +38,42 @@ town_to_bar:
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
lda #DIR_LEFT
|
lda #DIR_LEFT
|
||||||
sta GUYBRUSH_DIRECTION
|
sta GUYBRUSH_DIRECTION
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp town_no_exit
|
jmp town_no_exit
|
||||||
|
|
||||||
|
town_to_voodoo:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #22
|
||||||
|
bne town_no_exit
|
||||||
|
|
||||||
|
lda #MONKEY_VOODOO1
|
||||||
|
sta LOCATION
|
||||||
|
lda #11
|
||||||
|
sta GUYBRUSH_X
|
||||||
|
sta DESTINATION_X
|
||||||
|
lda #20
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
|
lda #DIR_RIGHT
|
||||||
|
sta GUYBRUSH_DIRECTION
|
||||||
|
jsr change_location
|
||||||
|
jmp town_no_exit
|
||||||
|
|
||||||
|
|
||||||
town_to_church:
|
town_to_church:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #20
|
||||||
|
bcs town_no_exit
|
||||||
|
|
||||||
lda #MONKEY_CHURCH
|
lda #MONKEY_CHURCH
|
||||||
sta LOCATION
|
sta LOCATION
|
||||||
lda #34
|
lda #34
|
||||||
|
|
@ -47,6 +83,9 @@ town_to_church:
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
|
||||||
lda #DIR_LEFT
|
lda #DIR_LEFT
|
||||||
sta GUYBRUSH_DIRECTION
|
sta GUYBRUSH_DIRECTION
|
||||||
jsr change_location
|
jsr change_location
|
||||||
|
|
@ -60,31 +99,7 @@ town_no_exit:
|
||||||
|
|
||||||
town_adjust_destination:
|
town_adjust_destination:
|
||||||
|
|
||||||
; if x<32, y must be >22
|
; blah
|
||||||
; if 32<x<40, y must be > 18
|
|
||||||
; x can't go past 25
|
|
||||||
|
|
||||||
tn_check_x:
|
|
||||||
lda DESTINATION_X
|
|
||||||
cmp #32
|
|
||||||
bcs tn_x_right
|
|
||||||
bcc tn_x_left
|
|
||||||
|
|
||||||
tn_x_left:
|
|
||||||
lda DESTINATION_Y
|
|
||||||
cmp #22
|
|
||||||
bcs done_tn_adjust
|
|
||||||
lda #22
|
|
||||||
sta DESTINATION_Y
|
|
||||||
jmp done_tn_adjust
|
|
||||||
tn_x_right:
|
|
||||||
lda DESTINATION_Y
|
|
||||||
cmp #18
|
|
||||||
bcs done_tn_adjust
|
|
||||||
lda #18
|
|
||||||
sta DESTINATION_Y
|
|
||||||
jmp done_tn_adjust
|
|
||||||
|
|
||||||
|
|
||||||
done_tn_adjust:
|
done_tn_adjust:
|
||||||
rts
|
rts
|
||||||
|
|
@ -94,25 +109,377 @@ done_tn_adjust:
|
||||||
; adjust bounds
|
; adjust bounds
|
||||||
;=======================
|
;=======================
|
||||||
town_check_bounds:
|
town_check_bounds:
|
||||||
|
|
||||||
|
; if x<2, y unrestricted
|
||||||
|
; if 7<x<13, y must be >20
|
||||||
|
; if 14<x<32 y must be > 22
|
||||||
|
; if 32<x<40, y must be > 16
|
||||||
|
; x can't go past 25
|
||||||
|
|
||||||
|
jsr update_feet_location
|
||||||
|
|
||||||
|
tn_check_x:
|
||||||
|
lda GUYBRUSH_X
|
||||||
|
cmp #2
|
||||||
|
bcc tn_x_gateway
|
||||||
|
|
||||||
|
cmp #7
|
||||||
|
bcc tn_x_road
|
||||||
|
|
||||||
|
cmp #12
|
||||||
|
bcc tn_x_voodoo
|
||||||
|
|
||||||
|
cmp #15
|
||||||
|
bcc tn_x_sidewalk
|
||||||
|
|
||||||
|
cmp #32
|
||||||
|
bcs tn_x_right
|
||||||
|
bcc tn_x_left
|
||||||
|
|
||||||
|
tn_x_gateway:
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
tn_x_road:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #20
|
||||||
|
bcs town_adjust_height
|
||||||
|
lda #(20-2) ; assume tiny
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda #GUYBRUSH_TINY
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
tn_x_voodoo:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #22
|
||||||
|
bcs town_adjust_height
|
||||||
|
lda #(22-4) ; assume small
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
tn_x_sidewalk:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #26
|
||||||
|
bcs town_adjust_height
|
||||||
|
lda #(26-8) ; assume medium
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda #GUYBRUSH_MEDIUM
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
tn_x_left:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #32
|
||||||
|
bcs town_adjust_height
|
||||||
|
lda #(32-14) ; assume large
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
tn_x_right:
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #18
|
||||||
|
bcs town_adjust_height
|
||||||
|
lda #(18-2) ; assume tiny
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
sta DESTINATION_Y
|
||||||
|
jmp town_adjust_height
|
||||||
|
|
||||||
|
;====================
|
||||||
|
; adjust tallness
|
||||||
|
|
||||||
|
; this is based on where your feet are
|
||||||
|
|
||||||
|
town_adjust_height:
|
||||||
|
; jsr update_feet_location
|
||||||
|
|
||||||
|
lda GUYBRUSH_FEET
|
||||||
|
cmp #32
|
||||||
|
bcs town_big ; > 30, big
|
||||||
|
cmp #26 ; > 24, medium
|
||||||
|
bcs town_medium
|
||||||
|
cmp #20 ; > 20, small
|
||||||
|
bcs town_small
|
||||||
|
; else, tiny
|
||||||
|
towntiny:
|
||||||
|
lda #GUYBRUSH_TINY
|
||||||
|
jmp town_done_set_height
|
||||||
|
town_big:
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
jmp town_done_set_height
|
||||||
|
town_medium:
|
||||||
|
lda #GUYBRUSH_MEDIUM
|
||||||
|
jmp town_done_set_height
|
||||||
|
town_small:
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
town_done_set_height:
|
||||||
|
jmp set_height
|
||||||
|
|
||||||
|
|
||||||
|
;==========================
|
||||||
|
;==========================
|
||||||
|
; set height
|
||||||
|
;==========================
|
||||||
|
;==========================
|
||||||
|
; we have to adjust destination because it's at feet
|
||||||
|
; and that changes when we get small
|
||||||
|
|
||||||
|
; A=new height
|
||||||
|
set_height:
|
||||||
|
cmp #GUYBRUSH_BIG
|
||||||
|
bne set_height_check_medium
|
||||||
|
jmp set_height_new_big
|
||||||
|
set_height_check_medium:
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
bne set_height_check_small
|
||||||
|
jmp set_height_new_medium
|
||||||
|
set_height_check_small:
|
||||||
|
cmp #GUYBRUSH_SMALL
|
||||||
|
bne set_height_check_tiny
|
||||||
|
jmp set_height_new_small
|
||||||
|
set_height_check_tiny:
|
||||||
|
; fallthrough
|
||||||
|
|
||||||
|
;=================================
|
||||||
|
set_height_new_tiny:
|
||||||
|
lda GUYBRUSH_SIZE
|
||||||
|
cmp #GUYBRUSH_TINY
|
||||||
|
beq done_set_new_height_tiny
|
||||||
|
cmp #GUYBRUSH_SMALL
|
||||||
|
beq set_height_new_tiny_old_small
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq set_height_new_tiny_old_medium
|
||||||
|
; fallthrough
|
||||||
|
set_height_new_tiny_old_big:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #12
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #12
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_TINY
|
||||||
|
jmp set_new_height_tiny
|
||||||
|
|
||||||
|
set_height_new_tiny_old_medium:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #6
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #6
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_TINY
|
||||||
|
jmp set_new_height_tiny
|
||||||
|
|
||||||
|
set_height_new_tiny_old_small:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #2
|
||||||
|
sta DESTINATION_Y
|
||||||
|
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #2
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
|
||||||
|
lda #GUYBRUSH_TINY
|
||||||
|
set_new_height_tiny:
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
done_set_new_height_tiny:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
|
||||||
;draw_town_door:
|
;======================================
|
||||||
;
|
set_height_new_small:
|
||||||
; lda BAR_DOOR_OPEN
|
lda GUYBRUSH_SIZE
|
||||||
; beq done_draw_town_door
|
cmp #GUYBRUSH_SMALL
|
||||||
|
beq done_set_new_height_small
|
||||||
|
cmp #GUYBRUSH_TINY
|
||||||
|
beq set_height_new_small_old_tiny
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq set_height_new_small_old_medium
|
||||||
|
; fallthrough
|
||||||
|
set_height_new_small_old_big:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #10
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #10
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
jmp set_new_height_small
|
||||||
|
set_height_new_small_old_medium:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #4
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #4
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
jmp set_new_height_small
|
||||||
|
set_height_new_small_old_tiny:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #2
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #2
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
set_new_height_small:
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
done_set_new_height_small:
|
||||||
|
rts
|
||||||
|
|
||||||
; lda #<door_sprite
|
|
||||||
; sta INL
|
|
||||||
; lda #>door_sprite
|
|
||||||
; sta INH
|
|
||||||
|
|
||||||
; lda #11
|
;==============================
|
||||||
; sta XPOS
|
set_height_new_medium:
|
||||||
; lda #22
|
lda GUYBRUSH_SIZE
|
||||||
; sta YPOS
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq done_set_new_height_medium
|
||||||
|
cmp #GUYBRUSH_BIG
|
||||||
|
beq set_height_new_medium_old_big
|
||||||
|
cmp #GUYBRUSH_TINY
|
||||||
|
beq set_height_new_medium_old_tiny
|
||||||
|
; fallthrough
|
||||||
|
set_height_new_medium_old_small:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #4
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #4
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_MEDIUM
|
||||||
|
jmp set_new_height_medium
|
||||||
|
set_height_new_medium_old_big:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
clc
|
||||||
|
adc #6
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #6
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_MEDIUM
|
||||||
|
jmp set_new_height_medium
|
||||||
|
set_height_new_medium_old_tiny:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #6
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #6
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_MEDIUM
|
||||||
|
set_new_height_medium:
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
done_set_new_height_medium:
|
||||||
|
rts
|
||||||
|
|
||||||
; jsr put_sprite_crop
|
|
||||||
;done_draw_town_door:
|
|
||||||
; rts
|
|
||||||
|
|
||||||
|
;===========================
|
||||||
|
set_height_new_big:
|
||||||
|
lda GUYBRUSH_SIZE
|
||||||
|
cmp #GUYBRUSH_BIG
|
||||||
|
beq done_set_new_height_big
|
||||||
|
cmp #GUYBRUSH_TINY
|
||||||
|
beq set_height_new_big_old_tiny
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq set_height_new_big_old_medium
|
||||||
|
set_height_new_big_old_small:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #10
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #10
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
jmp set_new_height_big
|
||||||
|
set_height_new_big_old_medium:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #6
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #6
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
jmp set_new_height_big
|
||||||
|
set_height_new_big_old_tiny:
|
||||||
|
lda DESTINATION_Y
|
||||||
|
sec
|
||||||
|
sbc #12
|
||||||
|
sta DESTINATION_Y
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
sec
|
||||||
|
sbc #12
|
||||||
|
sta GUYBRUSH_Y
|
||||||
|
lda #GUYBRUSH_BIG
|
||||||
|
jmp set_new_height_big
|
||||||
|
|
||||||
|
set_new_height_big:
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
|
done_set_new_height_big:
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
;=====================
|
||||||
|
;=====================
|
||||||
|
; update feet
|
||||||
|
;=====================
|
||||||
|
;=====================
|
||||||
|
update_feet_location:
|
||||||
|
|
||||||
|
lda GUYBRUSH_SIZE
|
||||||
|
cmp #GUYBRUSH_TINY
|
||||||
|
beq adjust_feet_tiny
|
||||||
|
cmp #GUYBRUSH_SMALL
|
||||||
|
beq adjust_feet_small
|
||||||
|
cmp #GUYBRUSH_MEDIUM
|
||||||
|
beq adjust_feet_medium
|
||||||
|
|
||||||
|
adjust_feet_large:
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #14
|
||||||
|
jmp done_adjust_feet
|
||||||
|
|
||||||
|
adjust_feet_medium:
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #8
|
||||||
|
jmp done_adjust_feet
|
||||||
|
|
||||||
|
adjust_feet_small:
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #4
|
||||||
|
jmp done_adjust_feet
|
||||||
|
adjust_feet_tiny:
|
||||||
|
lda GUYBRUSH_Y
|
||||||
|
clc
|
||||||
|
adc #2
|
||||||
|
done_adjust_feet:
|
||||||
|
sta GUYBRUSH_FEET
|
||||||
|
rts
|
||||||
|
|
|
||||||
|
|
@ -33,9 +33,11 @@ voodoo1_to_town:
|
||||||
lda #10
|
lda #10
|
||||||
sta GUYBRUSH_X
|
sta GUYBRUSH_X
|
||||||
sta DESTINATION_X
|
sta DESTINATION_X
|
||||||
lda #20
|
lda #18
|
||||||
sta GUYBRUSH_Y
|
sta GUYBRUSH_Y
|
||||||
sta DESTINATION_Y
|
sta DESTINATION_Y
|
||||||
|
lda #GUYBRUSH_SMALL
|
||||||
|
sta GUYBRUSH_SIZE
|
||||||
jsr change_location
|
jsr change_location
|
||||||
jmp voodoo1_no_exit
|
jmp voodoo1_no_exit
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -112,8 +112,10 @@ MESSAGE_H = $97
|
||||||
|
|
||||||
GUYBRUSH_SIZE = $98
|
GUYBRUSH_SIZE = $98
|
||||||
GUYBRUSH_BIG = 0
|
GUYBRUSH_BIG = 0
|
||||||
GUYBRUSH_SMALL = 1
|
GUYBRUSH_MEDIUM = 1
|
||||||
GUYBRUSH_TINY = 2
|
GUYBRUSH_SMALL = 2
|
||||||
|
GUYBRUSH_TINY = 3
|
||||||
|
GUYBRUSH_FEET = $99
|
||||||
|
|
||||||
; done game puzzle state
|
; done game puzzle state
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue
Block a user