mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-03-03 12:31:32 +00:00
monkey: emergency patch to 0.7 as realize the map was broken
should be fixed now
This commit is contained in:
parent
275c242e16
commit
f145ad998a
@ -1,5 +1,5 @@
|
||||
5 HOME
|
||||
10 PRINT "LOADING MONKEY V0.06"
|
||||
10 PRINT "LOADING MONKEY V0.07"
|
||||
20 PRINT:PRINT
|
||||
40 PRINT "CONTROLS: "
|
||||
42 PRINT " MOVE CURSOR : ARROWS OR WASD"
|
||||
|
@ -417,7 +417,9 @@ destination_tiny_x_is_positive:
|
||||
|
||||
lda CURSOR_Y
|
||||
bpl destination_tiny_y_is_positive
|
||||
lda #0
|
||||
cmp #$Fc
|
||||
bcs destination_tiny_y_is_positive
|
||||
lda #$Fc
|
||||
destination_tiny_y_is_positive:
|
||||
clc
|
||||
adc #6
|
||||
|
Binary file not shown.
@ -8,6 +8,9 @@ map_check_exit:
|
||||
beq check_lookout
|
||||
cmp #10
|
||||
beq check_poster
|
||||
|
||||
cmp #24
|
||||
beq check_zipline
|
||||
cmp #25
|
||||
beq check_zipline
|
||||
|
||||
@ -16,10 +19,17 @@ map_check_exit:
|
||||
check_lookout:
|
||||
lda GUYBRUSH_Y
|
||||
cmp #22
|
||||
bne map_no_exit
|
||||
beq map_to_lookout
|
||||
cmp #24
|
||||
beq map_to_lookout
|
||||
jmp map_no_exit
|
||||
map_to_lookout:
|
||||
lda #MONKEY_LOOKOUT
|
||||
sta LOCATION
|
||||
|
||||
lda #GUYBRUSH_BIG
|
||||
sta GUYBRUSH_SIZE
|
||||
|
||||
lda #30
|
||||
sta GUYBRUSH_X
|
||||
sta DESTINATION_X
|
||||
@ -34,15 +44,25 @@ map_to_lookout:
|
||||
check_poster:
|
||||
lda GUYBRUSH_Y
|
||||
cmp #24
|
||||
bne map_no_exit
|
||||
beq map_to_poster
|
||||
cmp #26
|
||||
beq map_to_poster
|
||||
jmp map_no_exit
|
||||
map_to_poster:
|
||||
lda #MONKEY_POSTER
|
||||
sta LOCATION
|
||||
lda #4
|
||||
|
||||
lda #2
|
||||
sta GUYBRUSH_X
|
||||
sta DESTINATION_X
|
||||
|
||||
lda #20
|
||||
sta GUYBRUSH_Y
|
||||
|
||||
lda #GUYBRUSH_TINY
|
||||
sta GUYBRUSH_SIZE
|
||||
|
||||
lda #34
|
||||
sta DESTINATION_Y
|
||||
lda #DIR_DOWN
|
||||
sta GUYBRUSH_DIRECTION
|
||||
@ -51,10 +71,17 @@ map_to_poster:
|
||||
check_zipline:
|
||||
lda GUYBRUSH_Y
|
||||
cmp #4
|
||||
bne map_no_exit
|
||||
beq map_to_zipline
|
||||
cmp #6
|
||||
beq map_to_zipline
|
||||
jmp map_no_exit
|
||||
map_to_zipline:
|
||||
lda #MONKEY_ZIPLINE
|
||||
sta LOCATION
|
||||
|
||||
lda #GUYBRUSH_BIG
|
||||
sta GUYBRUSH_SIZE
|
||||
|
||||
lda #4
|
||||
sta GUYBRUSH_X
|
||||
sta DESTINATION_X
|
||||
|
@ -12,6 +12,10 @@ zipline_check_exit:
|
||||
zipline_to_map:
|
||||
lda #MONKEY_MAP
|
||||
sta LOCATION
|
||||
|
||||
lda #GUYBRUSH_TINY
|
||||
sta GUYBRUSH_SIZE
|
||||
|
||||
lda #23
|
||||
sta GUYBRUSH_X
|
||||
sta DESTINATION_X
|
||||
|
Loading…
x
Reference in New Issue
Block a user