mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-02-23 20:29:15 +00:00
40 lines
418 B
ArmAsm
40 lines
418 B
ArmAsm
|
|
||
|
|
||
|
draw_door:
|
||
|
|
||
|
lda FRAMEL
|
||
|
lsr
|
||
|
and #$3
|
||
|
tay
|
||
|
|
||
|
lda door_l,Y
|
||
|
sta INL
|
||
|
lda door_h,Y
|
||
|
sta INH
|
||
|
|
||
|
ldx #9 ; 63
|
||
|
stx CURSOR_X
|
||
|
lda #36
|
||
|
sta CURSOR_Y
|
||
|
|
||
|
jsr hgr_draw_sprite
|
||
|
|
||
|
lda FRAMEL
|
||
|
cmp #7
|
||
|
bne not_door_done
|
||
|
|
||
|
inc DOOR_OPEN
|
||
|
cli ; start music
|
||
|
|
||
|
not_door_done:
|
||
|
|
||
|
rts
|
||
|
|
||
|
|
||
|
door_l:
|
||
|
.byte <door1_sprite,<door2_sprite,<door3_sprite,<door4_sprite
|
||
|
|
||
|
door_h:
|
||
|
.byte >door1_sprite,>door2_sprite,>door3_sprite,>door4_sprite
|
||
|
|