summaryrefslogtreecommitdiff
path: root/audio/engine_1.asm
diff options
context:
space:
mode:
Diffstat (limited to 'audio/engine_1.asm')
-rw-r--r--audio/engine_1.asm517
1 files changed, 259 insertions, 258 deletions
diff --git a/audio/engine_1.asm b/audio/engine_1.asm
index cf121bcd..8343074a 100644
--- a/audio/engine_1.asm
+++ b/audio/engine_1.asm
@@ -1,10 +1,10 @@
; The first of three duplicated sound engines.
-Func_9103:: ; 0x9103
+Music2_UpdateMusic:: ; 0x9103
ld c, CH0
.loop
ld b, $0
- ld hl, $c026
+ ld hl, wc026
add hl, bc
ld a, [hl]
and a
@@ -12,13 +12,13 @@ Func_9103:: ; 0x9103
ld a, c
cp CH4
jr nc, .asm_912e ; if sfx channel
- ld a, [$c002]
+ ld a, [wc002]
and a
jr z, .asm_912e
bit 7, a
jr nz, .nextChannel
set 7, a
- ld [$c002], a
+ ld [wc002], a
xor a
ld [$ff25], a
ld [$ff1a], a
@@ -31,19 +31,20 @@ Func_9103:: ; 0x9103
ld a, c
inc c ; inc channel number
cp CH7
- jr nz, .loop
+ jr nz, .loop
ret
; this routine checks flags for music effects currently applied
; to the channel and calls certain functions based on flags.
-; known flags for $c02e:
+; known flags for wc02e:
+; 0: toggleperfectpitch has been used
; 1: call has been used
; 3: a toggle used only by this routine for vibrato
; 4: pitchbend flag
; 6: dutycycle flag
Music2_ApplyMusicAffects: ; 0x9138
ld b, $0
- ld hl, $c0b6 ; delay unitl next note
+ ld hl, wc0b6 ; delay until next note
add hl, bc
ld a, [hl]
cp $1 ; if the delay is 1, play next note
@@ -53,36 +54,36 @@ Music2_ApplyMusicAffects: ; 0x9138
ld a, c
cp CH4
jr nc, .startChecks ; if a sfx channel
- ld hl, $c02a
+ ld hl, wc02a
add hl, bc
ld a, [hl]
and a
jr z, .startChecks
ret
.startChecks
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 6, [hl] ; dutycycle
jr z, .checkForExecuteMusic
call Music2_ApplyDutyCycle
.checkForExecuteMusic
ld b, $0
- ld hl, $c036
+ ld hl, wc036
add hl, bc
bit 0, [hl]
jr nz, .checkForPitchBend
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 2, [hl]
jr nz, .disablePitchBendVibrato
.checkForPitchBend
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 4, [hl] ; pitchbend
jr z, .checkVibratoDelay
jp Music2_ApplyPitchBend
.checkVibratoDelay
- ld hl, $c04e ; vibrato delay
+ ld hl, wc04e ; vibrato delay
add hl, bc
ld a, [hl]
and a ; check if delay is over
@@ -91,7 +92,7 @@ Music2_ApplyMusicAffects: ; 0x9138
.disablePitchBendVibrato
ret
.checkForVibrato
- ld hl, $c056 ; vibrato rate
+ ld hl, wc056 ; vibrato rate
add hl, bc
ld a, [hl]
and a
@@ -99,7 +100,7 @@ Music2_ApplyMusicAffects: ; 0x9138
ret ; no vibrato
.vibrato
ld d, a
- ld hl, $c05e
+ ld hl, wc05e
add hl, bc
ld a, [hl]
and $f
@@ -112,10 +113,10 @@ Music2_ApplyMusicAffects: ; 0x9138
swap [hl]
or [hl]
ld [hl], a ; reset the vibrato value and start again
- ld hl, $c066
+ ld hl, wc066
add hl, bc
ld e, [hl] ; get note pitch
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 3, [hl] ; this is the only code that sets/resets bit three so
jr z, .unset ; it continuously alternates which path it takes
@@ -148,13 +149,13 @@ Music2_ApplyMusicAffects: ; 0x9138
; like tempo changes, duty changes etc. and doesn't return
; until the first note is reached
Music2_PlayNextNote ; 0x91d0
- ld hl, $c06e
+ ld hl, wc06e
add hl, bc
ld a, [hl]
- ld hl, $c04e
+ ld hl, wc04e
add hl, bc
ld [hl], a
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
res 4, [hl]
res 5, [hl]
@@ -167,7 +168,7 @@ Music2_endchannel: ; 0x91e6
cp $ff ; is this command an endchannel?
jp nz, Music2_callchannel ; no
ld b, $0 ; yes
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 1, [hl]
jr nz, .returnFromCall
@@ -177,7 +178,7 @@ Music2_endchannel: ; 0x91e6
jr .asm_923f
.noiseOrSfxChannel
res 2, [hl]
- ld hl, $c036
+ ld hl, wc036
add hl, bc
res 0, [hl]
cp CH6
@@ -188,11 +189,11 @@ Music2_endchannel: ; 0x91e6
ld [$ff1a], a
.notSfxChannel3
jr nz, .asm_9222
- ld a, [$c003]
+ ld a, [wc003]
and a
jr z, .asm_9222
xor a
- ld [$c003], a
+ ld [wc003], a
jr .asm_923f
.asm_9222
jr .asm_9248
@@ -202,10 +203,10 @@ Music2_endchannel: ; 0x91e6
ld a, c
add a
ld e, a
- ld hl, $c006
+ ld hl, wc006
add hl, de
push hl ; store current channel address
- ld hl, $c016
+ ld hl, wc016
add hl, de
ld e, l
ld d, h
@@ -223,12 +224,12 @@ Music2_endchannel: ; 0x91e6
and [hl]
ld [$ff25], a
.asm_9248
- ld a, [$c02a]
+ ld a, [wc02a]
cp $14
jr nc, .asm_9251
jr .asm_926e
.asm_9251
- ld a, [$c02a]
+ ld a, [wc02a]
cp $86
jr z, .asm_926e
jr c, .asm_925c
@@ -240,12 +241,12 @@ Music2_endchannel: ; 0x91e6
call Func_96c7
ret c
.asm_9265
- ld a, [$c005]
+ ld a, [wc005]
ld [$ff24], a
xor a
- ld [$c005], a
+ ld [wc005], a
.asm_926e
- ld hl, $c026
+ ld hl, wc026
add hl, bc
ld [hl], b
ret
@@ -264,10 +265,10 @@ Music2_callchannel: ; 0x9274
ld a, c
add a
ld e, a
- ld hl, $c006
+ ld hl, wc006
add hl, de
push hl
- ld hl, $c016
+ ld hl, wc016
add hl, de
ld e, l
ld d, h
@@ -282,7 +283,7 @@ Music2_callchannel: ; 0x9274
inc hl
ld [hl], d ; overwrite current address with pointer
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
set 1, [hl] ; set the call flag
jp Music2_endchannel
@@ -295,7 +296,7 @@ Music2_loopchannel: ; 0x92a9
and a
jr z, .infiniteLoop
ld b, $0
- ld hl, $c0be
+ ld hl, wc0be
add hl, bc
ld a, [hl]
cp e
@@ -318,7 +319,7 @@ Music2_loopchannel: ; 0x92a9
ld a, c
add a
ld e, a
- ld hl, $c006
+ ld hl, wc006
add hl, de
pop af
ld [hli], a
@@ -328,11 +329,11 @@ Music2_loopchannel: ; 0x92a9
Music2_notetype: ; 0x92e4
and $f0
cp $d0 ; is this command a notetype?
- jp nz, Music2_togglecall ; no
+ jp nz, Music2_toggleperfectpitch ; no
ld a, d ; yes
and $f
ld b, $0
- ld hl, $c0c6
+ ld hl, wc0c6
add hl, bc
ld [hl], a ; store low nibble as speed
ld a, c
@@ -345,10 +346,10 @@ Music2_notetype: ; 0x92e4
jr z, .musicChannel3
cp CH6
jr nz, .notChannel3
- ld hl, $c0e7
+ ld hl, wc0e7
jr .sfxChannel3
.musicChannel3
- ld hl, $c0e6
+ ld hl, wc0e6
.sfxChannel3
ld a, d
and $f
@@ -363,22 +364,22 @@ Music2_notetype: ; 0x92e4
; else, store volume (high nibble) and fade (low nibble)
.notChannel3
ld b, $0
- ld hl, $c0de
+ ld hl, wc0de
add hl, bc
ld [hl], d
.noiseChannel
jp Music2_endchannel
-Music2_togglecall: ; 0x9323
+Music2_toggleperfectpitch: ; 0x9323
ld a, d
- cp $e8 ; is this command an togglecall?
+ cp $e8 ; is this command a toggleperfectpitch?
jr nz, Music2_vibrato ; no
ld b, $0 ; yes
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
ld a, [hl]
xor $1
- ld [hl], a ; flip bit 0 of $c02e (toggle returning from call)
+ ld [hl], a ; flip bit 0 of wc02e
jp Music2_endchannel
Music2_vibrato: ; 0x9335
@@ -386,10 +387,10 @@ Music2_vibrato: ; 0x9335
jr nz, Music2_pitchbend ; no
call Music2_GetNextMusicByte ; yes
ld b, $0
- ld hl, $c04e
+ ld hl, wc04e
add hl, bc
- ld [hl], a ; store delay
- ld hl, $c06e
+ ld [hl], a ; store delay
+ ld hl, wc06e
add hl, bc
ld [hl], a ; store delay
call Music2_GetNextMusicByte
@@ -397,7 +398,7 @@ Music2_vibrato: ; 0x9335
and $f0
swap a
ld b, $0
- ld hl, $c056
+ ld hl, wc056
add hl, bc
srl a
ld e, a
@@ -408,7 +409,7 @@ Music2_vibrato: ; 0x9335
ld a, d
and $f
ld d, a
- ld hl, $c05e
+ ld hl, wc05e
add hl, bc
swap a
or d
@@ -420,7 +421,7 @@ Music2_pitchbend: ; 0x936d
jr nz, Music2_duty ; no
call Music2_GetNextMusicByte ; yes
ld b, $0
- ld hl, $c076
+ ld hl, wc076
add hl, bc
ld [hl], a ; store first param
call Music2_GetNextMusicByte
@@ -432,14 +433,14 @@ Music2_pitchbend: ; 0x936d
and $f
call Func_9858
ld b, $0
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, bc
ld [hl], d ; store unknown part of second param
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, bc
ld [hl], e ; store unknown part of second param
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
set 4, [hl] ; set pitchbend flag
call Music2_GetNextMusicByte
@@ -454,45 +455,45 @@ Music2_duty: ; 0x93a5
rrca
and $c0
ld b, $0
- ld hl, $c03e
+ ld hl, wc03e
add hl, bc
ld [hl], a ; store duty
jp Music2_endchannel
Music2_tempo: ; 0x93ba
cp $ed ; is this command a tempo?
- jr nz, Music2_unknownmusic0xee ; no
+ jr nz, Music2_stereopanning ; no
ld a, c ; yes
cp CH4
jr nc, .sfxChannel
call Music2_GetNextMusicByte
- ld [$c0e8], a ; store first param
+ ld [wc0e8], a ; store first param
call Music2_GetNextMusicByte
- ld [$c0e9], a ; store second param
+ ld [wc0e9], a ; store second param
xor a
- ld [$c0ce], a ; clear RAM
- ld [$c0cf], a
- ld [$c0d0], a
- ld [$c0d1], a
+ ld [wc0ce], a ; clear RAM
+ ld [wc0cf], a
+ ld [wc0d0], a
+ ld [wc0d1], a
jr .musicChannelDone
.sfxChannel
call Music2_GetNextMusicByte
- ld [$c0ea], a ; store first param
+ ld [wc0ea], a ; store first param
call Music2_GetNextMusicByte
- ld [$c0eb], a ; store second param
+ ld [wc0eb], a ; store second param
xor a
- ld [$c0d2], a ; clear RAM
- ld [$c0d3], a
- ld [$c0d4], a
- ld [$c0d5], a
+ ld [wc0d2], a ; clear RAM
+ ld [wc0d3], a
+ ld [wc0d4], a
+ ld [wc0d5], a
.musicChannelDone
jp Music2_endchannel
-Music2_unknownmusic0xee: ; 0x93fa
- cp $ee ; is this command an unknownmusic0xee?
+Music2_stereopanning: ; 0x93fa
+ cp $ee ; is this command a stereopanning?
jr nz, Music2_unknownmusic0xef ; no
call Music2_GetNextMusicByte ; yes
- ld [$c004], a ; store first param
+ ld [wc004], a ; store panning
jp Music2_endchannel
; this appears to never be used
@@ -503,45 +504,45 @@ Music2_unknownmusic0xef ; 0x9407
push bc
call Func_9876
pop bc
- ld a, [$c003]
+ ld a, [wc003]
and a
jr nz, .skip
- ld a, [$c02d]
- ld [$c003], a
+ ld a, [wc02d]
+ ld [wc003], a
xor a
- ld [$c02d], a
+ ld [wc02d], a
.skip
jp Music2_endchannel
Music2_dutycycle: ; 0x9426
cp $fc ; is this command a dutycycle?
- jr nz, Music2_stereopanning ; no
+ jr nz, Music2_volume ; no
call Music2_GetNextMusicByte ; yes
ld b, $0
- ld hl, $c046
+ ld hl, wc046
add hl, bc
ld [hl], a ; store full cycle
and $c0
- ld hl, $c03e
+ ld hl, wc03e
add hl, bc
ld [hl], a ; store first duty
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
set 6, [hl] ; set dutycycle flag
jp Music2_endchannel
-Music2_stereopanning: ; 0x9444
- cp $f0 ; is this command a stereopanning?
+Music2_volume: ; 0x9444
+ cp $f0 ; is this command a volume?
jr nz, Music2_executemusic ; no
call Music2_GetNextMusicByte ; yes
- ld [$ff24], a ; store stereopanning
+ ld [$ff24], a ; store volume
jp Music2_endchannel
Music2_executemusic: ; 0x9450
cp $f8 ; is this command an executemusic?
jr nz, Music2_octave ; no
ld b, $0 ; yes
- ld hl, $c036
+ ld hl, wc036
add hl, bc
set 0, [hl]
jp Music2_endchannel
@@ -550,7 +551,7 @@ Music2_octave: ; 0x945f
and $f0
cp $e0 ; is this command an octave?
jr nz, Music2_unknownsfx0x20 ; no
- ld hl, $c0d6 ; yes
+ ld hl, wc0d6 ; yes
ld b, $0
add hl, bc
ld a, d
@@ -565,14 +566,14 @@ Music2_unknownsfx0x20: ; 0x9472
cp CH3 ; is this a noise or sfx channel?
jr c, Music2_unknownsfx0x10 ; no
ld b, $0
- ld hl, $c036
+ ld hl, wc036
add hl, bc
bit 0, [hl]
jr nz, Music2_unknownsfx0x10 ; no
call Music2_notelength ; yes
ld d, a
ld b, $0
- ld hl, $c03e
+ ld hl, wc03e
add hl, bc
ld a, [hl]
or d
@@ -611,7 +612,7 @@ Music2_unknownsfx0x10:
cp $10 ; is this command a unknownsfx0x10?
jr nz, Music2_note ; no
ld b, $0
- ld hl, $c036
+ ld hl, wc036
add hl, bc
bit 0, [hl]
jr nz, Music2_note ; no
@@ -646,7 +647,7 @@ Music2_dnote:
call Music2_GetNextMusicByte ; get dnote instrument
asm_94fd
ld d, a
- ld a, [$c003]
+ ld a, [wc003]
and a
jr nz, .asm_9508
ld a, d
@@ -663,7 +664,7 @@ Music2_notelength: ; 0x950a
ld b, $0
ld e, a ; store note length (in 16ths)
ld d, b
- ld hl, $c0c6
+ ld hl, wc0c6
add hl, bc
ld a, [hl]
ld l, b
@@ -671,9 +672,9 @@ Music2_notelength: ; 0x950a
ld a, c
cp CH4
jr nc, .sfxChannel
- ld a, [$c0e8]
+ ld a, [wc0e8]
ld d, a
- ld a, [$c0e9]
+ ld a, [wc0e9]
ld e, a
jr .skip
.sfxChannel
@@ -682,31 +683,31 @@ Music2_notelength: ; 0x950a
cp CH7
jr z, .skip ; if noise channel
call Func_9693
- ld a, [$c0ea]
+ ld a, [wc0ea]
ld d, a
- ld a, [$c0eb]
+ ld a, [wc0eb]
ld e, a
.skip
ld a, l
ld b, $0
- ld hl, $c0ce
+ ld hl, wc0ce
add hl, bc
ld l, [hl]
call Func_9847
ld e, l
ld d, h
- ld hl, $c0ce
+ ld hl, wc0ce
add hl, bc
ld [hl], e
ld a, d
- ld hl, $c0b6
+ ld hl, wc0b6
add hl, bc
ld [hl], a
- ld hl, $c036
+ ld hl, wc036
add hl, bc
bit 0, [hl]
jr nz, Music2_notepitch
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 2, [hl]
jr z, Music2_notepitch
@@ -721,7 +722,7 @@ Music2_notepitch: ; 0x9568
ld a, c
cp CH4
jr nc, .sfxChannel
- ld hl, $c02a
+ ld hl, wc02a
add hl, bc
ld a, [hl]
and a
@@ -754,12 +755,12 @@ Music2_notepitch: ; 0x9568
.notRest
swap a
ld b, $0
- ld hl, $c0d6
+ ld hl, wc0d6
add hl, bc
ld b, [hl]
call Func_9858
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 4, [hl]
jr z, .asm_95b8
@@ -769,7 +770,7 @@ Music2_notepitch: ; 0x9568
ld a, c
cp CH4
jr nc, .skip ; if sfx channel
- ld hl, $c02a
+ ld hl, wc02a
ld d, $0
ld e, a
add hl, de
@@ -782,7 +783,7 @@ Music2_notepitch: ; 0x9568
ret
.skip
ld b, $0
- ld hl, $c0de
+ ld hl, wc0de
add hl, bc
ld d, [hl]
ld b, $2
@@ -792,15 +793,15 @@ Music2_notepitch: ; 0x9568
call Func_95f8
pop de
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
- bit 0, [hl]
- jr z, .asm_95ef
- inc e
- jr nc, .asm_95ef
+ bit 0, [hl] ; has toggleperfectpitch been used?
+ jr z, .skip2
+ inc e ; if yes, increment the pitch by 1
+ jr nc, .skip2
inc d
-.asm_95ef
- ld hl, $c066
+.skip2
+ ld hl, wc066
add hl, bc
ld [hl], e
call Func_964b
@@ -818,13 +819,13 @@ Func_95f8: ; 0x95f8
jr z, .sfxNoiseChannel
cp CH4
jr nc, .skip ; if sfx channel
- ld hl, $c02a
+ ld hl, wc02a
add hl, bc
ld a, [hl]
and a
jr nz, .skip
.sfxNoiseChannel
- ld a, [$c004]
+ ld a, [wc004]
ld hl, Unknown_9b27
add hl, bc
and [hl]
@@ -842,7 +843,7 @@ Func_95f8: ; 0x95f8
Func_9629: ; 0x9629
ld b, $0
- ld hl, $c0b6
+ ld hl, wc0b6
add hl, bc
ld d, [hl]
ld a, c
@@ -853,7 +854,7 @@ Func_9629: ; 0x9629
ld a, d
and $3f
ld d, a
- ld hl, $c03e
+ ld hl, wc03e
add hl, bc
ld a, [hl]
or d
@@ -873,16 +874,16 @@ Func_964b: ; 0x964b
; fall through
.channel3
push de
- ld de, $c0e6
+ ld de, wc0e6
cp CH2
jr z, .musicChannel3
- ld de, $c0e7
+ ld de, wc0e7
.musicChannel3
ld a, [de]
add a
ld d, $0
ld e, a
- ld hl, Music2_Channel3DutyPointers
+ ld hl, Music2_WavePointers
add hl, de
ld e, [hl]
inc hl
@@ -919,27 +920,27 @@ Func_9693: ; 0x9693
call Func_96e5
jr nc, .asm_96ab
ld d, $0
- ld a, [$c0f2]
+ ld a, [wc0f2]
add $80
jr nc, .asm_96a2
inc d
.asm_96a2
- ld [$c0eb], a
+ ld [wc0eb], a
ld a, d
- ld [$c0ea], a
+ ld [wc0ea], a
jr .asm_96b4
.asm_96ab
xor a
- ld [$c0eb], a
+ ld [wc0eb], a
ld a, $1
- ld [$c0ea], a
+ ld [wc0ea], a
.asm_96b4
ret
Func_96b5: ; 0x96b5
call Func_96e5
jr nc, .asm_96c6
- ld a, [$c0f1]
+ ld a, [wc0f1]
add e
jr nc, .asm_96c1
inc d
@@ -955,7 +956,7 @@ Func_96b5: ; 0x96b5
Func_96c7: ; 0x96c7
call Func_96e5
jr nc, .asm_96e2
- ld hl, $c006
+ ld hl, wc006
ld e, c
ld d, $0
sla e
@@ -976,7 +977,7 @@ Func_96c7: ; 0x96c7
ret
Func_96e5: ; 0x96e5
- ld a, [$c02a]
+ ld a, [wc02a]
cp $14
jr nc, .asm_96ee
jr .asm_96f4
@@ -993,27 +994,27 @@ Func_96e5: ; 0x96e5
ret
Music2_ApplyPitchBend: ; 0x96f9
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
bit 5, [hl]
jp nz, .asm_9740
- ld hl, $c09e
+ ld hl, wc09e
add hl, bc
ld e, [hl]
- ld hl, $c096
+ ld hl, wc096
add hl, bc
ld d, [hl]
- ld hl, $c07e
+ ld hl, wc07e
add hl, bc
ld l, [hl]
ld h, b
add hl, de
ld d, h
ld e, l
- ld hl, $c08e
+ ld hl, wc08e
add hl, bc
push hl
- ld hl, $c086
+ ld hl, wc086
add hl, bc
ld a, [hl]
pop hl
@@ -1025,26 +1026,26 @@ Music2_ApplyPitchBend: ; 0x96f9
ld a, $0
adc d
ld d, a
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, bc
ld a, [hl]
cp d
jp c, .asm_9786
jr nz, .asm_9773
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, bc
ld a, [hl]
cp e
jp c, .asm_9786
jr .asm_9773
.asm_9740
- ld hl, $c09e
+ ld hl, wc09e
add hl, bc
ld a, [hl]
- ld hl, $c096
+ ld hl, wc096
add hl, bc
ld d, [hl]
- ld hl, $c07e
+ ld hl, wc07e
add hl, bc
ld e, [hl]
sub e
@@ -1052,7 +1053,7 @@ Music2_ApplyPitchBend: ; 0x96f9
ld a, d
sbc b
ld d, a
- ld hl, $c086
+ ld hl, wc086
add hl, bc
ld a, [hl]
add a
@@ -1063,22 +1064,22 @@ Music2_ApplyPitchBend: ; 0x96f9
ld a, d
sbc b
ld d, a
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, bc
ld a, d
cp [hl]
jr c, .asm_9786
jr nz, .asm_9773
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, bc
ld a, e
cp [hl]
jr c, .asm_9786
.asm_9773
- ld hl, $c09e
+ ld hl, wc09e
add hl, bc
ld [hl], e
- ld hl, $c096
+ ld hl, wc096
add hl, bc
ld [hl], d
ld b, $3
@@ -1088,54 +1089,54 @@ Music2_ApplyPitchBend: ; 0x96f9
ld [hl], d
ret
.asm_9786
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
res 4, [hl]
res 5, [hl]
ret
Func_978f: ; 0x978f
- ld hl, $c096
+ ld hl, wc096
add hl, bc
ld [hl], d
- ld hl, $c09e
+ ld hl, wc09e
add hl, bc
ld [hl], e
- ld hl, $c0b6
+ ld hl, wc0b6
add hl, bc
ld a, [hl]
- ld hl, $c076
+ ld hl, wc076
add hl, bc
sub [hl]
jr nc, .asm_97a7
ld a, $1
.asm_97a7
ld [hl], a
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, bc
ld a, e
sub [hl]
ld e, a
ld a, d
sbc b
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, bc
sub [hl]
jr c, .asm_97c3
ld d, a
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
set 5, [hl]
jr .asm_97e6
.asm_97c3
- ld hl, $c096
+ ld hl, wc096
add hl, bc
ld d, [hl]
- ld hl, $c09e
+ ld hl, wc09e
add hl, bc
ld e, [hl]
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, bc
ld a, [hl]
sub e
@@ -1143,17 +1144,17 @@ Func_978f: ; 0x978f
ld a, d
sbc b
ld d, a
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, bc
ld a, [hl]
sub d
ld d, a
ld b, $0
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
res 5, [hl]
.asm_97e6
- ld hl, $c076
+ ld hl, wc076
add hl, bc
.asm_97ea
inc b
@@ -1172,20 +1173,20 @@ Func_978f: ; 0x978f
add [hl]
ld d, b
ld b, $0
- ld hl, $c07e
+ ld hl, wc07e
add hl, bc
ld [hl], d
- ld hl, $c086
+ ld hl, wc086
add hl, bc
ld [hl], a
- ld hl, $c08e
+ ld hl, wc08e
add hl, bc
ld [hl], a
ret
Music2_ApplyDutyCycle: ; 0x980d
ld b, $0
- ld hl, $c046
+ ld hl, wc046
add hl, bc
ld a, [hl]
rlca
@@ -1206,7 +1207,7 @@ Music2_GetNextMusicByte: ; 0x9825
ld a, c
add a
ld e, a
- ld hl, $c006
+ ld hl, wc006
add hl, de
ld a, [hli]
ld e, a
@@ -1254,7 +1255,7 @@ Func_9858: ; 0x9858
add hl, hl
ld d, h
ld e, l
- ld hl, Unknown_9b2f
+ ld hl, Music2_Pitches
add hl, de
ld e, [hl]
inc hl
@@ -1274,7 +1275,7 @@ Func_9858: ; 0x9858
ret
Func_9876:: ; 0x9876
- ld [$c001], a
+ ld [wc001], a
cp $ff
jp z, Func_9a34
cp $b9
@@ -1285,63 +1286,63 @@ Func_9876:: ; 0x9876
jp nc, Func_994e
.asm_988d
xor a
- ld [$c000], a
- ld [$c003], a
- ld [$c0e9], a
- ld [$c0e6], a
- ld [$c0e7], a
+ ld [wc000], a
+ ld [wc003], a
+ ld [wc0e9], a
+ ld [wc0e6], a
+ ld [wc0e7], a
ld d, $8
- ld hl, $c016
+ ld hl, wc016
call FillMusicRAM2
- ld hl, $c006
+ ld hl, wc006
call FillMusicRAM2
ld d, $4
- ld hl, $c026
+ ld hl, wc026
call FillMusicRAM2
- ld hl, $c02e
+ ld hl, wc02e
call FillMusicRAM2
- ld hl, $c03e
+ ld hl, wc03e
call FillMusicRAM2
- ld hl, $c046
+ ld hl, wc046
call FillMusicRAM2
- ld hl, $c04e
+ ld hl, wc04e
call FillMusicRAM2
- ld hl, $c056
+ ld hl, wc056
call FillMusicRAM2
- ld hl, $c05e
+ ld hl, wc05e
call FillMusicRAM2
- ld hl, $c066
+ ld hl, wc066
call FillMusicRAM2
- ld hl, $c06e
+ ld hl, wc06e
call FillMusicRAM2
- ld hl, $c036
+ ld hl, wc036
call FillMusicRAM2
- ld hl, $c076
+ ld hl, wc076
call FillMusicRAM2
- ld hl, $c07e
+ ld hl, wc07e
call FillMusicRAM2
- ld hl, $c086
+ ld hl, wc086
call FillMusicRAM2
- ld hl, $c08e
+ ld hl, wc08e
call FillMusicRAM2
- ld hl, $c096
+ ld hl, wc096
call FillMusicRAM2
- ld hl, $c09e
+ ld hl, wc09e
call FillMusicRAM2
- ld hl, $c0a6
+ ld hl, wc0a6
call FillMusicRAM2
- ld hl, $c0ae
+ ld hl, wc0ae
call FillMusicRAM2
ld a, $1
- ld hl, $c0be
+ ld hl, wc0be
call FillMusicRAM2
- ld hl, $c0b6
+ ld hl, wc0b6
call FillMusicRAM2
- ld hl, $c0c6
+ ld hl, wc0c6
call FillMusicRAM2
- ld [$c0e8], a
+ ld [wc0e8], a
ld a, $ff
- ld [$c004], a
+ ld [wc004], a
xor a
ld [$ff24], a
ld a, $8
@@ -1366,9 +1367,9 @@ Func_994e: ; 0x994e
ld de, SFX_Headers_02
add hl, de
ld a, h
- ld [$c0ec], a
+ ld [wc0ec], a
ld a, l
- ld [$c0ed], a
+ ld [wc0ed], a
ld a, [hl]
and $c0
rlca
@@ -1381,9 +1382,9 @@ Func_994e: ; 0x994e
add c
ld c, a
ld b, $0
- ld a, [$c0ec]
+ ld a, [wc0ec]
ld h, a
- ld a, [$c0ed]
+ ld a, [wc0ed]
ld l, a
add hl, bc
ld c, d
@@ -1391,7 +1392,7 @@ Func_994e: ; 0x994e
and $f
ld e, a
ld d, $0
- ld hl, $c026
+ ld hl, wc026
add hl, de
ld a, [hl]
and a
@@ -1399,7 +1400,7 @@ Func_994e: ; 0x994e
ld a, e
cp $7
jr nz, .asm_999a
- ld a, [$c001]
+ ld a, [wc001]
cp $14
jr nc, .asm_9993
ret
@@ -1409,7 +1410,7 @@ Func_994e: ; 0x994e
jr z, .asm_99a3
jr c, .asm_99a3
.asm_999a
- ld a, [$c001]
+ ld a, [wc001]
cp [hl]
jr z, .asm_99a3
jr c, .asm_99a3
@@ -1422,77 +1423,77 @@ Func_994e: ; 0x994e
add hl, hl
ld d, h
ld e, l
- ld hl, $c016
+ ld hl, wc016
add hl, de
ld [hli], a
ld [hl], a
- ld hl, $c006
+ ld hl, wc006
add hl, de
ld [hli], a
ld [hl], a
pop de
- ld hl, $c026
+ ld hl, wc026
add hl, de
ld [hl], a
- ld hl, $c02e
+ ld hl, wc02e
add hl, de
ld [hl], a
- ld hl, $c03e
+ ld hl, wc03e
add hl, de
ld [hl], a
- ld hl, $c046
+ ld hl, wc046
add hl, de
ld [hl], a
- ld hl, $c04e
+ ld hl, wc04e
add hl, de
ld [hl], a
- ld hl, $c056
+ ld hl, wc056
add hl, de
ld [hl], a
- ld hl, $c05e
+ ld hl, wc05e
add hl, de
ld [hl], a
- ld hl, $c066
+ ld hl, wc066
add hl, de
ld [hl], a
- ld hl, $c06e
+ ld hl, wc06e
add hl, de
ld [hl], a
- ld hl, $c076
+ ld hl, wc076
add hl, de
ld [hl], a
- ld hl, $c07e
+ ld hl, wc07e
add hl, de
ld [hl], a
- ld hl, $c086
+ ld hl, wc086
add hl, de
ld [hl], a
- ld hl, $c08e
+ ld hl, wc08e
add hl, de
ld [hl], a
- ld hl, $c096
+ ld hl, wc096
add hl, de
ld [hl], a
- ld hl, $c09e
+ ld hl, wc09e
add hl, de
ld [hl], a
- ld hl, $c0a6
+ ld hl, wc0a6
add hl, de
ld [hl], a
- ld hl, $c0ae
+ ld hl, wc0ae
add hl, de
ld [hl], a
- ld hl, $c036
+ ld hl, wc036
add hl, de
ld [hl], a
ld a, $1
- ld hl, $c0be
+ ld hl, wc0be
add hl, de
ld [hl], a
- ld hl, $c0b6
+ ld hl, wc0b6
add hl, de
ld [hl], a
- ld hl, $c0c6
+ ld hl, wc0c6
add hl, de
ld [hl], a
ld a, e
@@ -1526,24 +1527,24 @@ Func_9a34: ; 0x9a34
ld a, $77
ld [$ff24], a
xor a
- ld [$c000], a
- ld [$c003], a
- ld [$c002], a
- ld [$c0e9], a
- ld [$c0eb], a
- ld [$c0e6], a
- ld [$c0e7], a
+ ld [wc000], a
+ ld [wc003], a
+ ld [wc002], a
+ ld [wc0e9], a
+ ld [wc0eb], a
+ ld [wc0e6], a
+ ld [wc0e7], a
ld d, $a0
- ld hl, $c006
+ ld hl, wc006
call FillMusicRAM2
ld a, $1
ld d, $18
- ld hl, $c0b6
+ ld hl, wc0b6
call FillMusicRAM2
- ld [$c0e8], a
- ld [$c0ea], a
+ ld [wc0e8], a
+ ld [wc0ea], a
ld a, $ff
- ld [$c004], a
+ ld [wc004], a
ret
; fills d bytes at hl with a
@@ -1556,7 +1557,7 @@ FillMusicRAM2: ; 0x9a89
ret
Func_9a8f: ; 0x9a8f
- ld a, [$c001]
+ ld a, [wc001]
ld l, a
ld e, a
ld h, $0
@@ -1567,7 +1568,7 @@ Func_9a8f: ; 0x9a8f
add hl, de
ld e, l
ld d, h
- ld hl, $c006
+ ld hl, wc006
ld a, [de] ; get channel number
ld b, a
rlca
@@ -1593,14 +1594,14 @@ Func_9a8f: ; 0x9a8f
push af
ld b, $0
ld c, a
- ld hl, $c026
+ ld hl, wc026
add hl, bc
- ld a, [$c001]
+ ld a, [wc001]
ld [hl], a
pop af
cp $3
jr c, .asm_9ad2
- ld hl, $c02e
+ ld hl, wc02e
add hl, bc
set 2, [hl]
.asm_9ad2
@@ -1619,32 +1620,32 @@ Func_9a8f: ; 0x9a8f
ld a, [de]
inc de
jr nz, .asm_9ab1
- ld a, [$c001]
+ ld a, [wc001]
cp $14
jr nc, .asm_9aeb
jr .asm_9b15
.asm_9aeb
- ld a, [$c001]
+ ld a, [wc001]
cp $86
jr z, .asm_9b15
jr c, .asm_9af6
jr .asm_9b15
.asm_9af6
- ld hl, $c02a
+ ld hl, wc02a
ld [hli], a
ld [hli], a
ld [hli], a
ld [hl], a
- ld hl, $c012 ; sfx noise channel pointer
+ ld hl, wc012 ; sfx noise channel pointer
ld de, Noise2_endchannel
ld [hl], e
inc hl
ld [hl], d ; overwrite pointer to point to endchannel
- ld a, [$c005]
+ ld a, [wc005]
and a
jr nz, .asm_9b15
ld a, [$ff24]
- ld [$c005], a
+ ld [wc005], a
ld a, $77
ld [$ff24], a
.asm_9b15
@@ -1665,18 +1666,18 @@ Unknown_9b27: ; 0x9b27
db $11, $22, $44, $88 ; channels 0-3
db $11, $22, $44, $88 ; channels 4-7
-Unknown_9b2f: ; 0x9b2f
- dw $F82C
- dw $F89D
- dw $F907
- dw $F96B
- dw $F9CA
- dw $FA23
- dw $FA77
- dw $FAC7
- dw $FB12
- dw $FB58
- dw $FB9B
- dw $FBDA
+Music2_Pitches: ; 0x9b2f
+ dw $F82C ; C_
+ dw $F89D ; C#
+ dw $F907 ; D_
+ dw $F96B ; D#
+ dw $F9CA ; E_
+ dw $FA23 ; F_
+ dw $FA77 ; F#
+ dw $FAC7 ; G_
+ dw $FB12 ; G#
+ dw $FB58 ; A_
+ dw $FB9B ; A#
+ dw $FBDA ; B_
generated by cgit v1.2.3 (git 2.25.1) at 2025-06-14 16:02:00 +0000