2019-08-07 05:17:02 +00:00
|
|
|
|
2019-08-08 04:38:55 +00:00
|
|
|
DOOR_STATUS = 0
|
|
|
|
|
DOOR_STATUS_OPEN = $01
|
|
|
|
|
DOOR_STATUS_OPENING = $02
|
|
|
|
|
DOOR_STATUS_CLOSING = $04
|
|
|
|
|
DOOR_STATUS_CLOSED = $08
|
|
|
|
|
DOOR_STATUS_EXPLODED = $10
|
|
|
|
|
DOOR_STATUS_LOCKED = $20
|
|
|
|
|
DOOR_STATUS_EXPLODING = $40
|
|
|
|
|
DOOR_EXPLODE_DIR = 1
|
|
|
|
|
DOOR_LEFT_TRIGGER = 2
|
|
|
|
|
DOOR_RIGHT_TRIGGER = 3
|
|
|
|
|
DOOR_STEP = 4
|
|
|
|
|
DOOR_XPOS = 5
|
|
|
|
|
DOOR_YPOS = 6
|
|
|
|
|
|
2019-08-07 05:17:02 +00:00
|
|
|
door_state:
|
2019-08-08 04:38:55 +00:00
|
|
|
|
|
|
|
|
door_state0:
|
|
|
|
|
.byte $0 ; status
|
|
|
|
|
.byte $0 ; explode_dir
|
|
|
|
|
.byte $0 ; left_trigger
|
|
|
|
|
.byte $0 ; right_trigger
|
|
|
|
|
.byte $0 ; step
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
draw_doors:
|
|
|
|
|
|
|
|
|
|
lda door_state+DOOR_STATUS
|
|
|
|
|
and #(DOOR_STATUS_OPEN | DOOR_STATUS_EXPLODED)
|
|
|
|
|
bne done_draw_doors
|
|
|
|
|
|
|
|
|
|
lda door_state+DOOR_STATUS
|
|
|
|
|
cmp #DOOR_STATUS_CLOSED
|
|
|
|
|
bne door_not_closed
|
|
|
|
|
|
|
|
|
|
door_closed:
|
|
|
|
|
lda #<door_closed_sprite
|
|
|
|
|
sta INL
|
|
|
|
|
lda #>door_closed_sprite
|
|
|
|
|
sta INH
|
|
|
|
|
jmp actually_draw_door
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
door_not_closed:
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
actually_draw_door:
|
|
|
|
|
lda door_state+DOOR_XPOS
|
|
|
|
|
sta XPOS
|
|
|
|
|
lda door_state+DOOR_YPOS
|
|
|
|
|
sta YPOS
|
|
|
|
|
|
|
|
|
|
jsr put_sprite
|
|
|
|
|
|
|
|
|
|
done_draw_doors:
|
|
|
|
|
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;==========================
|
|
|
|
|
; handle doors
|
|
|
|
|
|
|
|
|
|
handle_doors:
|
|
|
|
|
|
|
|
|
|
; if closed xpos in range and phys ypos match -> opening
|
|
|
|
|
; if open, xpos out of range, -> closing
|
|
|
|
|
|
|
|
|
|
; if opening, update
|
|
|
|
|
|
|
|
|
|
; if closing, update
|
|
|
|
|
|
|
|
|
|
; if exploding, update
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;======================================
|
|
|
|
|
;======================================
|
|
|
|
|
; door sprites
|
|
|
|
|
;======================================
|
|
|
|
|
;======================================
|
|
|
|
|
|
|
|
|
|
door_closed_sprite:
|
|
|
|
|
.byte 1,10
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
|
|
|
|
|
door_open_sprite:
|
|
|
|
|
.byte 1,10
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
|
|
|
|
|
door_opening_sprite:
|
|
|
|
|
door_closing_sprite1:
|
|
|
|
|
.byte 1,10
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $A0
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $0A
|
|
|
|
|
.byte $00
|
|
|
|
|
|
|
|
|
|
door_closing_sprite2:
|
|
|
|
|
.byte 1,10
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $AA
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
.byte $00
|
|
|
|
|
|
