mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-08-19 14:29:25 +00:00
57 lines
739 B
ArmAsm
57 lines
739 B
ArmAsm
;=============================
|
|
; mist_link_book
|
|
;=============================
|
|
mist_link_book:
|
|
|
|
; clear screen
|
|
|
|
lda #0
|
|
sta clear_all_color+1
|
|
|
|
jsr clear_all
|
|
jsr page_flip
|
|
|
|
jsr clear_all
|
|
jsr page_flip
|
|
;.if 0
|
|
; play sound effect?
|
|
|
|
lda #<linking_noise
|
|
sta BTC_L
|
|
lda #>linking_noise
|
|
sta BTC_H
|
|
ldx #LINKING_NOISE_LENGTH ; 45 pages long???
|
|
jsr play_audio
|
|
|
|
lda #MIST_ARRIVAL_DOCK
|
|
sta LOCATION
|
|
|
|
lda #LOAD_MIST ; start at Mist
|
|
sta WHICH_LOAD
|
|
;.endif
|
|
|
|
.if 0
|
|
lda #MECHE_INSIDE_GEAR
|
|
sta LOCATION
|
|
lda #LOAD_MECHE
|
|
sta WHICH_LOAD
|
|
lda #DIRECTION_E
|
|
sta DIRECTION
|
|
.endif
|
|
|
|
.if 0
|
|
lda #MECHE_ROTATE_CONTROLS
|
|
sta LOCATION
|
|
lda #LOAD_MECHE
|
|
sta WHICH_LOAD
|
|
lda #DIRECTION_E
|
|
sta DIRECTION
|
|
.endif
|
|
|
|
|
|
lda #$ff
|
|
sta LEVEL_OVER
|
|
|
|
rts
|
|
|