Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-11-16 23:20:43 +00:00
Code Issues Projects Releases Wiki Activity

mist: update selena age to use loaded-from-disk link noise

Browse Source 
also fix so remembers organ state after leaving/returning from age
This commit is contained in:
Vince Weaver 2020-03-19 14:46:57 -04:00
parent a490c77f9e
commit 7659956927
4 changed files with 52 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
mist/graphics_sizes.txt
View File

@ -81,3 +81,16 @@ DISK VOLUME 254
101k
DISK VOLUME 254
A 003 HELLO
B 004 LOADER
B 035 MIST_TITLE
B 156 MIST
B 026 MECHE
B 043 SELENA
B 047 LINK_NOISE.BTC
78.5k

6
mist/link_book_mist.s
View File

@ -15,11 +15,11 @@ mist_link_book:
; play sound effect?
lda #<audio_link_noise
lda #<linking_noise
sta BTC_L
lda #>audio_link_noise
lda #>linking_noise
sta BTC_H
ldx #43 ; 45 pages long???
ldx #LINKING_NOISE_LENGTH ; 45 pages long???
jsr play_audio
lda #39

33
mist/organ_puzzle.s
View File

@ -52,19 +52,44 @@ dome_press_second:
jsr clear_all
jsr page_flip
; play sound effect?
jsr clear_all
jsr page_flip
lda #<audio_link_noise
;====================================
; load linking audio (12k) to $9000
lda #<linking_filename
sta OUTL
lda #>linking_filename
sta OUTH
jsr opendir_filename
; play sound effect
lda #<linking_noise
sta BTC_L
lda #>audio_link_noise
lda #>linking_noise
sta BTC_H
ldx #43 ; 45 pages long???
ldx #LINKING_NOISE_LENGTH ; 45 pages long???
jsr play_audio
; be sure rocket settings are same if we come back
jsr save_rocket_state
; hack, why is this needed? screen at $c00 corrupted?
; oh... maybe the load from disk over-writes $c00
jsr change_location
rts
linking_filename:
.byte "LINK_NOISE.BTC",0
;==========================
; o/` Standing in my yard

11
mist/selena.s
View File

@ -249,8 +249,12 @@ back_to_mist:
lda #LOAD_MIST
sta WHICH_LOAD
; save rocket state
jsr save_rocket_state
rts
; save rocket state
save_rocket_state:
lda rocket_notes
sta ROCKET_NOTE1
lda rocket_notes+2
@ -263,7 +267,6 @@ back_to_mist:
rts
;==========================
; includes
;==========================
@ -301,7 +304,7 @@ back_to_mist:
;.align $100
audio_link_noise:
.incbin "audio/link_noise.btc"
;audio_link_noise:
;.incbin "audio/link_noise.btc"