Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-01-01 05:31:52 +00:00
Code Issues Projects Releases Wiki Activity

mist: stoney: have airlock doorknobs glow in the dark

Browse Source
This commit is contained in:
Vince Weaver 2020-08-07 16:49:11 -04:00
parent 1cb5bc68f4
commit 828e099e7f
2 changed files with 27 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
mist/stoney.s
View File

@ -153,6 +153,11 @@ dont_touch_lights:
beq handle_doorway_light
cmp #STONEY_LEFT_TUNNEL1
beq handle_doorway_light
cmp #STONEY_LEFT_AIRLOCK
beq handle_airlock_doorknob
cmp #STONEY_RIGHT_AIRLOCK
beq handle_airlock_doorknob
bne not_a_doorway
handle_doorway1:
@ -164,6 +169,9 @@ handle_doorway2:
handle_doorway_light:
jsr draw_light_doorway
jmp not_a_doorway
handle_airlock_doorknob:
jsr draw_airlock_doorknob
jmp not_a_doorway
not_a_doorway:

19
mist/stoney_puzzles.s
View File

@ -1108,6 +1108,19 @@ draw_doorway2:
done_doorway:
rts
draw_airlock_doorknob:
lda DIRECTION
cmp #DIRECTION_N
bne done_doorway
ldx #16
lda #<airlock_doorknob_list
sta INL
lda #>airlock_doorknob_list
sta INH
jmp hlin_list
draw_light_doorway:
lda DIRECTION
cmp #DIRECTION_S
@ -1181,3 +1194,9 @@ doorway_light_list:
.byte $ff,19,2
.byte $ff,$ff,$ff
; at 16
airlock_doorknob_list:
.byte $d0,19,2
.byte $ff,$ff,$ff