diff options
Diffstat (limited to 'src/audio/music1.asm')
-rwxr-xr-x | src/audio/music1.asm | 1891 |
1 files changed, 1891 insertions, 0 deletions
diff --git a/src/audio/music1.asm b/src/audio/music1.asm new file mode 100755 index 0000000..0e1767b --- /dev/null +++ b/src/audio/music1.asm @@ -0,0 +1,1891 @@ +SetupSound_Ext:: ; f4000 (3d:4000) + jp Func_f407d + +SoundTimerHandler_Ext:: ; f4003 (3d:4003) + jp Func_f40e9 + +Func_f4006:: ; f4006 (3d:4006) + jp Func_f4021 + +Func_f4009:: ; f4009 (3d:4009) + jp Func_f402d + +Func_f400c:: ; f400c (3d:400c) + jp Func_f404e + +Func_f400f:: ; f400f (3d:400f) + jp Func_f4052 + +Func_f4012:: ; f4012 (3d:4012) + jp Func_f405c + +Func_f4015:: ; f4015 (3d:4015) + jp Func_f4066 + +Func_f4018:: ; f4018 (3d:4018) + jp Func_f406f + +Func_f401b:: ; f401b (3d:401b) + jp Func_f49c4 + +Func_f401e:: ; f401e (3d:401e) + jp Func_f49d0 + +Func_f4021: ; f4021 (3d:4021) + push hl + ld hl, NumberOfSongs1 + cp [hl] + jr nc, .asm_f402b + ld [$dd80], a +.asm_f402b + pop hl + ret + +Func_f402d: ; f402d (3d:402d) + push bc + push hl + ld b, $0 + ld c, a + or a + jr z, .asm_f4043 + ld hl, Unknown_f4e85 + add hl, bc + ld b, [hl] + ld a, [$dd83] + or a + jr z, .asm_f4043 + cp b + jr c, .asm_f404b +.asm_f4043 + ld a, b + ld [$dd83], a + ld a, c + ld [$dd82], a +.asm_f404b + pop hl + pop bc + ret + +Func_f404e: ; f404e (3d:404e) + ld [$ddf0], a + ret + +Func_f4052: ; f4052 (3d:4052) + ld a, [$dd80] + cp $80 + ld a, $1 + ret nz + xor a + ret + +Func_f405c: ; f405c (3d:405c) + ld a, [$dd82] + cp $80 + ld a, $1 + ret nz + xor a + ret + +Func_f4066: ; f4066 (3d:4066) + ld a, [$ddf2] + xor $1 + ld [$ddf2], a + ret + +Func_f406f: ; f406f (3d:406f) + push bc + push af + and $7 + ld b, a + swap b + or b + ld [$ddf1], a + pop af + pop bc + ret + +Func_f407d: ; f407d (3d:407d) + xor a + ld [rNR52], a + ld a, $80 + ld [rNR52], a + ld a, $77 + ld [rNR50], a + ld a, $ff + ld [rNR51], a + ld a, $3d + ld [$dd81], a + ld a, $80 + ld [$dd80], a + ld [$dd82], a + ld a, $77 + ld [$ddf1], a + xor a + ld [$dd8c], a + ld [$de53], a + ld [wMusicWaveChange], a + ld [$ddef], a + ld [$ddf0], a + ld [$ddf2], a + dec a + ld [wMusicDC], a + ld de, $0001 + ld bc, $0000 +.asm_f40bb + ld hl, wMusicIsPlaying + add hl, bc + ld [hl], d + ld hl, wMusicTie + add hl, bc + ld [hl], d + ld hl, $ddb3 + add hl, bc + ld [hl], d + ld hl, wMusicEC + add hl, bc + ld [hl], d + ld hl, wMusicE8 + add hl, bc + ld [hl], d + inc c + ld a, c + cp $4 + jr nz, .asm_f40bb + ld hl, Unknown_f4c20 + ld bc, wMusicReturnAddress + ld d, $8 +.asm_f40e2 + ld a, [hli] + ld [bc], a + inc bc + dec d + jr nz, .asm_f40e2 + ret + +Func_f40e9: ; f40e9 (3d:40e9) + call Func_f42a4 + call Func_f411c + ld hl, Func_fc003 + call Bankswitch3dTo3f + ld a, [$dd81] + ld [hBankROM], a + ld [MBC3RomBank], a + ld a, [$ddf2] + cp $0 + jr z, .asm_f4109 + call Func_f4980 + jr .asm_f4115 +.asm_f4109 + call Func_f42a5 + call Func_f430a + call Func_f436f + call Func_f43ce +.asm_f4115 + call Func_f4866 + call Func_f49b1 + ret + +Func_f411c: ; f411c (3d:411c) + ld a, [$dd80] + rla + jr c, .asm_f4133 + call Func_f414b + ld a, [$dd80] + call Music1_PlaySong + ld a, [$dd80] + or $80 + ld [$dd80], a +.asm_f4133 + ld a, [$dd82] + rla + jr c, .asm_f414a + ld a, [$dd82] + ld hl, Func_fc000 + call Bankswitch3dTo3f + ld a, [$dd82] + or $80 + ld [$dd82], a +.asm_f414a + ret + +Func_f414b: ; f414b (3d:414b) + ld a, [$dd8c] + ld d, a + xor a + ld [wMusicIsPlaying], a + bit 0, d + jr nz, .asm_f415f + ld a, $8 + ld [rNR12], a + swap a + ld [rNR14], a +.asm_f415f + xor a + ld [$dd8e], a + bit 1, d + jr nz, .asm_f416f + ld a, $8 + ld [rNR22], a + swap a + ld [rNR24], a +.asm_f416f + xor a + ld [$dd90], a + bit 3, d + jr nz, .asm_f417f + ld a, $8 + ld [rNR42], a + swap a + ld [rNR44], a +.asm_f417f + xor a + ld [$dd8f], a + bit 2, d + jr nz, .asm_f418b + ld a, $0 + ld [rNR32], a +.asm_f418b + ret + +; plays the song given by the id in a +Music1_PlaySong: ; f418c (3d:418c) + push af + ld c, a + ld b, $0 + ld hl, SongBanks1 + add hl, bc + ld a, [hl] + ld [$dd81], a + ld [hBankROM], a + ld [MBC3RomBank], a + pop af + add a + ld c, a + ld b, $0 + ld hl, SongHeaderPointers1 + add hl, bc + ld e, [hl] + inc hl + ld h, [hl] + ld l, e + ld e, [hl] + inc hl + ld b, h + ld c, l + rr e + jr nc, .asm_f41eb + ld a, [bc] + inc bc + ld [$dd95], a + ld [wMusicMainLoop], a + ld a, [bc] + inc bc + ld [$dd96], a + ld [$dd9e], a + ld a, $1 + ld [$ddbb], a + ld [wMusicIsPlaying], a + xor a + ld [wMusicTie], a + ld [wMusicE4], a + ld [wMusicE8], a + ld [wMusicVibratoDelay], a + ld [wMusicEC], a + ld a, [Unknown_f4c20] + ld [wMusicReturnAddress], a + ld a, [Unknown_f4c20 + 1] + ld [$ddf4], a + ld a, $8 + ld [wMusicE9], a +.asm_f41eb + rr e + jr nc, .asm_f4228 + ld a, [bc] + inc bc + ld [$dd97], a + ld [$dd9f], a + ld a, [bc] + inc bc + ld [$dd98], a + ld [$dda0], a + ld a, $1 + ld [$ddbc], a + ld [$dd8e], a + xor a + ld [$dd92], a + ld [$ddeb], a + ld [$ddc0], a + ld [$dde0], a + ld [$ddcc], a + ld a, [Unknown_f4c20 + 2] + ld [$ddf5], a + ld a, [Unknown_f4c20 + 3] + ld [$ddf6], a + ld a, $8 + ld [$ddc8], a +.asm_f4228 + rr e + jr nc, .asm_f4265 + ld a, [bc] + inc bc + ld [$dd99], a + ld [$dda1], a + ld a, [bc] + inc bc + ld [$dd9a], a + ld [$dda2], a + ld a, $1 + ld [$ddbd], a + ld [$dd8f], a + xor a + ld [$dd93], a + ld [$ddec], a + ld [$ddc1], a + ld [$dde1], a + ld [$ddcd], a + ld a, [Unknown_f4c20 + 4] + ld [$ddf7], a + ld a, [Unknown_f4c20 + 5] + ld [$ddf8], a + ld a, $40 + ld [$ddc9], a +.asm_f4265 + rr e + jr nc, .asm_f429f + ld a, [bc] + inc bc + ld [$dd9b], a + ld [$dda3], a + ld a, [bc] + inc bc + ld [$dd9c], a + ld [$dda4], a + ld a, $1 + ld [$ddbe], a + ld [$dd90], a + xor a + ld [$dd94], a + ld [$ddc2], a + ld [$dde2], a + ld [$ddce], a + ld a, [Unknown_f4c20 + 6] + ld [$ddf9], a + ld a, [Unknown_f4c20 + 7] + ld [$ddfa], a + ld a, $40 + ld [$ddca], a +.asm_f429f + xor a + ld [$ddf2], a + ret + +Func_f42a4: ; f42a4 (3d:42a4) + ret + +Func_f42a5: ; f42a5 (3d:42a5) + ld a, [wMusicIsPlaying] + or a + jr z, .asm_f42fa + ld a, [$ddb7] + cp $0 + jr z, .asm_f42d4 + ld a, [$ddc3] + dec a + ld [$ddc3], a + jr nz, .asm_f42d4 + ld a, [$ddbb] + cp $1 + jr z, .asm_f42d4 + ld a, [$dd8c] + bit 0, a + jr nz, .asm_f42d4 + ld hl, rNR12 + ld a, [wMusicE9] + ld [hli], a + inc hl + ld a, $80 + ld [hl], a +.asm_f42d4 + ld a, [$ddbb] + dec a + ld [$ddbb], a + jr nz, .asm_f42f4 + ld a, [$dd96] + ld h, a + ld a, [$dd95] + ld l, a + ld bc, $0000 + call Music1_PlayNextNote + ld a, [wMusicIsPlaying] + or a + jr z, .asm_f42fa + call Func_f4714 +.asm_f42f4 + ld a, $0 + call Func_f485a + ret +.asm_f42fa + ld a, [$dd8c] + bit 0, a + jr nz, .asm_f4309 + ld a, $8 + ld [rNR12], a + swap a + ld [rNR14], a +.asm_f4309 + ret + +Func_f430a: ; f430a (3d:430a) + ld a, [$dd8e] + or a + jr z, .asm_f435f + ld a, [$ddb8] + cp $0 + jr z, .asm_f4339 + ld a, [$ddc4] + dec a + ld [$ddc4], a + jr nz, .asm_f4339 + ld a, [$ddbc] + cp $1 + jr z, .asm_f4339 + ld a, [$dd8c] + bit 1, a + jr nz, .asm_f4339 + ld hl, rNR22 + ld a, [$ddc8] + ld [hli], a + inc hl + ld a, $80 + ld [hl], a +.asm_f4339 + ld a, [$ddbc] + dec a + ld [$ddbc], a + jr nz, .asm_f4359 + ld a, [$dd98] + ld h, a + ld a, [$dd97] + ld l, a + ld bc, $0001 + call Music1_PlayNextNote + ld a, [$dd8e] + or a + jr z, .asm_f435f + call Func_f475a +.asm_f4359 + ld a, $1 + call Func_f485a + ret +.asm_f435f + ld a, [$dd8c] + bit 1, a + jr nz, .asm_f436e + ld a, $8 + ld [rNR22], a + swap a + ld [rNR24], a +.asm_f436e + ret + +Func_f436f: ; f436f (3d:436f) + ld a, [$dd8f] + or a + jr z, .asm_f43be + ld a, [$ddb9] + cp $0 + jr z, .asm_f4398 + ld a, [$ddc5] + dec a + ld [$ddc5], a + jr nz, .asm_f4398 + ld a, [$dd8c] + bit 2, a + jr nz, .asm_f4398 + ld a, [$ddbd] + cp $1 + jr z, .asm_f4398 + ld a, [$ddc9] + ld [rNR32], a +.asm_f4398 + ld a, [$ddbd] + dec a + ld [$ddbd], a + jr nz, .asm_f43b8 + ld a, [$dd9a] + ld h, a + ld a, [$dd99] + ld l, a + ld bc, $0002 + call Music1_PlayNextNote + ld a, [$dd8f] + or a + jr z, .asm_f43be + call Func_f479c +.asm_f43b8 + ld a, $2 + call Func_f485a + ret +.asm_f43be + ld a, [$dd8c] + bit 2, a + jr nz, .asm_f43cd + ld a, $0 + ld [rNR32], a + ld a, $80 + ld [rNR34], a +.asm_f43cd + ret + +Func_f43ce: ; f43ce (3d:43ce) + ld a, [$dd90] + or a + jr z, .asm_f4400 + ld a, [$ddbe] + dec a + ld [$ddbe], a + jr nz, .asm_f43f6 + ld a, [$dd9c] + ld h, a + ld a, [$dd9b] + ld l, a + ld bc, $0003 + call Music1_PlayNextNote + ld a, [$dd90] + or a + jr z, .asm_f4400 + call Func_f480a + jr .asm_f4413 +.asm_f43f6 + ld a, [$ddef] + or a + jr z, .asm_f4413 + call Func_f4839 + ret +.asm_f4400 + ld a, [$dd8c] + bit 3, a + jr nz, .asm_f4413 + xor a + ld [$ddef], a + ld a, $8 + ld [rNR42], a + swap a + ld [rNR44], a +.asm_f4413 + ret + +Music1_PlayNextNote: ; f4414 (3d:4414) + ld a, [hli] + push hl + push af + cp $d0 + jr c, Music1_note + sub $d0 + add a + ld e, a + ld d, $0 + ld hl, Music1_CommandTable + add hl, de + ld e, [hl] + inc hl + ld d, [hl] + ld h, d + ld l, e + pop af + jp [hl] + +Music1_CommandTable: ; f442c (3d:442c) + dw Music1_speed + dw Music1_octave + dw Music1_octave + dw Music1_octave + dw Music1_octave + dw Music1_octave + dw Music1_octave + dw Music1_inc_octave + dw Music1_dec_octave + dw Music1_tie + dw Music1_end + dw Music1_end + dw Music1_musicdc + dw Music1_MainLoop + dw Music1_EndMainLoop + dw Music1_Loop + dw Music1_EndLoop + dw Music1_jp + dw Music1_call + dw Music1_ret + dw Music1_musice4 + dw Music1_duty + dw Music1_volume + dw Music1_wave + dw Music1_musice8 + dw Music1_musice9 + dw Music1_vibrato_type + dw Music1_vibrato_delay + dw Music1_musicec + dw Music1_musiced + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + dw Music1_end + +Music1_note: ; f448c (3d:448c) + push af + ld a, [hl] + ld e, a + ld hl, wMusicTie + add hl, bc + ld a, [hl] + cp $80 + jr z, .asm_f44b0 + ld [hl], $1 + xor a + ld hl, $dddb + add hl, bc + ld [hl], a + ld hl, $dde3 + add hl, bc + ld [hl], a + inc [hl] + ld hl, wMusicVibratoType2 + add hl, bc + ld a, [hl] + ld hl, wMusicVibratoType + add hl, bc + ld [hl], a +.asm_f44b0 + pop af + push de + ld hl, wMusicSpeed + add hl, bc + ld d, [hl] + and $f + inc a + cp d + jr nc, .asm_f44c0 + ld e, a + ld a, d + ld d, e +.asm_f44c0 + ld e, a +.asm_f44c1 + dec d + jr z, .asm_f44c7 + add e + jr .asm_f44c1 +.asm_f44c7 + ld hl, $ddbb + add hl, bc + ld [hl], a + pop de + ld d, a + ld a, e + cp $d9 + ld a, d + jr z, .asm_f44fb + ld e, a + ld hl, wMusicE8 + add hl, bc + ld a, [hl] + cp $8 + ld d, a + ld a, e + jr z, .asm_f44fb + push hl + push bc + ld b, $0 + ld c, a + ld hl, $0000 +.asm_f44e8 + add hl, bc + dec d + jr nz, .asm_f44e8 + srl h + rr l + srl h + rr l + srl h + rr l + ld a, l + pop bc + pop hl +.asm_f44fb + ld hl, $ddc3 + add hl, bc + ld [hl], a + pop af + and $f0 + ld hl, $ddb7 + add hl, bc + ld [hl], a + or a + jr nz, .asm_f450e + jp .asm_f458e +.asm_f450e + swap a + dec a + ld h, a + ld a, $3 + cp c + ld a, h + jr z, .asm_f451a + jr .asm_f4564 +.asm_f451a + push af + ld hl, wMusicOctave + add hl, bc + ld a, [hl] + ld d, a + sla a + add d + sla a + sla a + sla a + ld e, a + pop af + ld hl, Music1_NoiseInstruments + add a + ld d, c + ld c, a + add hl, bc + ld c, e + add hl, bc + ld c, d + ld a, [hli] + ld h, [hl] + ld l, a + ld a, [hli] + ld d, a + ld a, [wMusicDC] + and $77 + or d + ld [wMusicDC], a + ld de, $ddab + ld a, [hli] + ld [de], a + inc de + ld a, [hli] + ld [de], a + inc de + ld b, [hl] + inc hl + ld a, [hli] + ld [de], a + inc de + ld a, b + ld [de], a + ld b, $0 + ld a, l + ld d, h + ld hl, $dded + ld [hli], a + ld [hl], d + ld a, $1 + ld [$ddef], a + jr .asm_f458e +.asm_f4564 + ld hl, $dda5 + add hl, bc + add hl, bc + push hl + ld hl, wMusicOctave + add hl, bc + ld e, [hl] + ld d, $0 + ld hl, Unknown_f4c28 + add hl, de + add a + ld e, [hl] + add e + ld hl, wMusicEC + add hl, bc + ld e, [hl] + add e + add e + ld e, a + ld hl, Unknown_f4c30 + add hl, de + ld a, [hli] + ld e, a + ld d, [hl] + call Func_f4967 + pop hl + ld a, e + ld [hli], a + ld [hl], d +.asm_f458e + pop de + ld hl, $dd95 + add hl, bc + add hl, bc + ld [hl], e + inc hl + ld [hl], d + ret + +Music1_speed: ; f4598 (3d:4598) + pop hl + ld a, [hli] + push hl + ld hl, wMusicSpeed + add hl, bc + ld [hl], a + jp Music1_PlayNextNote_pop + +Music1_octave: ; f45a3 (3d:45a3) + and $7 + dec a + ld hl, wMusicOctave + add hl, bc + push af + ld a, c + cp $2 + jr nz, .asm_f45b6 + pop af + inc a + ld [hl], a + jp Music1_PlayNextNote_pop +.asm_f45b6 + pop af + ld [hl], a + jp Music1_PlayNextNote_pop + +Music1_inc_octave: ; f45bb (3d:45bb) + ld hl, wMusicOctave + add hl, bc + inc [hl] + jp Music1_PlayNextNote_pop + +Music1_dec_octave: ; f45c3 (3d:45c3) + ld hl, wMusicOctave + add hl, bc + dec [hl] + jp Music1_PlayNextNote_pop + +Music1_tie: ; f45cb (3d:45cb) + ld hl, wMusicTie + add hl, bc + ld [hl], $80 + jp Music1_PlayNextNote_pop + +Music1_musicdc: ; f45d4 (3d:45d4) + pop hl + ld a, [hli] + push hl + push bc + inc c + ld e, $ee +.asm_f45db + dec c + jr z, .asm_f45e3 + rlca + rlc e + jr .asm_f45db +.asm_f45e3 + ld d, a + ld hl, wMusicDC + ld a, [hl] + and e + or d + ld [hl], a + pop bc + jp Music1_PlayNextNote_pop + +Music1_MainLoop: ; f45ef (3d:45ef) + pop de + push de + dec de + ld hl, wMusicMainLoop + add hl, bc + add hl, bc + ld [hl], e + inc hl + ld [hl], d + jp Music1_PlayNextNote_pop + +Music1_EndMainLoop: ; f45fd (3d:45fd) + pop hl + ld hl, wMusicMainLoop + add hl, bc + add hl, bc + ld a, [hli] + ld h, [hl] + ld l, a + jp Music1_PlayNextNote + +Music1_Loop: ; f4609 (3d:4609) + pop de + ld a, [de] + inc de + push af + call Music1_GetReturnAddress + ld [hl], e + inc hl + ld [hl], d + inc hl + pop af + ld [hl], a + inc hl + push de + call Music1_SetReturnAddress + jp Music1_PlayNextNote_pop + +Music1_EndLoop: ; f461e (3d:461e) + call Music1_GetReturnAddress + dec hl + ld a, [hl] + dec a + jr z, .asm_f4630 + ld [hld], a + ld d, [hl] + dec hl + ld e, [hl] + pop hl + ld h, d + ld l, e + jp Music1_PlayNextNote +.asm_f4630 + dec hl + dec hl + call Music1_SetReturnAddress + jp Music1_PlayNextNote_pop + +Music1_jp: ; f4638 (3d:4638) + pop hl + ld a, [hli] + ld h, [hl] + ld l, a + jp Music1_PlayNextNote + +Music1_call: ; f463f (3d:463f) + call Music1_GetReturnAddress + pop de + ld a, e + ld [hli], a + ld a, d + ld [hli], a + ld a, [de] + ld b, a + inc de + ld a, [de] + ld d, a + ld e, b + ld b, $0 + push de + call Music1_SetReturnAddress + jp Music1_PlayNextNote_pop + +Music1_ret: ; f4656 (3d:4656) + pop de + call Music1_GetReturnAddress + dec hl + ld a, [hld] + ld e, [hl] + ld d, a + inc de + inc de + push de + call Music1_SetReturnAddress + jp Music1_PlayNextNote_pop + +Music1_musice4: ; f4667 (3d:4667) + pop de + ld a, [de] + inc de + ld hl, wMusicE4 + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_duty: ; f4674 (3d:4674) + pop de + ld a, [de] + and $c0 + inc de + ld hl, wMusicDuty + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_volume: ; f4683 (3d:4683) + pop de + ld a, [de] + inc de + ld hl, wMusicVolume + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_wave: ; f4690 (3d:4690) + pop de + ld a, [de] + inc de + ld [wMusicWave], a + ld a, $1 + ld [wMusicWaveChange], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_musice8: ; f46a0 (3d:46a0) + pop de + ld a, [de] + inc de + ld hl, wMusicE8 + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_musice9: ; f46ad (3d:46ad) + pop de + ld a, [de] + inc de + ld hl, wMusicE9 + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_vibrato_type: ; f46ba (3d:46ba) + pop de + ld a, [de] + inc de + ld hl, wMusicVibratoType + add hl, bc + ld [hl], a + ld hl, wMusicVibratoType2 + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_vibrato_delay: ; f46cc (3d:46cc) + pop de + ld a, [de] + inc de + ld hl, wMusicVibratoDelay + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_musicec: ; f46d9 (3d:46d9) + pop de + ld a, [de] + inc de + ld hl, wMusicEC + add hl, bc + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_musiced: ; f46e6 (3d:46e6) + pop de + ld a, [de] + inc de + ld hl, wMusicEC + add hl, bc + add [hl] + ld [hl], a + ld h, d + ld l, e + jp Music1_PlayNextNote + +Music1_end: ; f46f4 (3d:46f4) + ld hl, wMusicIsPlaying + add hl, bc + ld [hl], $0 + pop hl + ret + +; returns the address where the address to +; return to is stored for the current channel +Music1_GetReturnAddress: ; f46fc (3d:46fc) + ld hl, wMusicReturnAddress + add hl, bc + add hl, bc + ld a, [hli] + ld h, [hl] + ld l, a + ret + +; puts the address in hl where the address to +; return to is stored for the currentchannel +Music1_SetReturnAddress: ; f4705 (3d:4705) + ld d, h + ld e, l + ld hl, wMusicReturnAddress + add hl, bc + add hl, bc + ld [hl], e + inc hl + ld [hl], d + ret + +Music1_PlayNextNote_pop ; f4710 (3d:4710) + pop hl + jp Music1_PlayNextNote + +Func_f4714: ; f4714 (3d:4714) + ld a, [$dd8c] + bit 0, a + jr nz, .asm_f4749 + ld a, [$ddb7] + cp $0 + jr z, .asm_f474a + ld d, $0 + ld hl, wMusicTie + ld a, [hl] + cp $80 + jr z, .asm_f4733 + ld a, [wMusicVolume] + ld [rNR12], a + ld d, $80 +.asm_f4733 + ld [hl], $2 + ld a, $8 + ld [rNR10], a + ld a, [wMusicDuty] + ld [rNR11], a + ld a, [$dda5] + ld [rNR13], a + ld a, [$dda6] + or d + ld [rNR14], a +.asm_f4749 + ret +.asm_f474a + ld hl, wMusicTie + ld [hl], $0 + ld hl, rNR12 + ld a, $8 + ld [hli], a + inc hl + swap a + ld [hl], a + ret + +Func_f475a: ; f475a (3d:475a) + ld a, [$dd8c] + bit 1, a + jr nz, .asm_f478b + ld a, [$ddb8] + cp $0 + jr z, .asm_f478c + ld d, $0 + ld hl, $dd92 + ld a, [hl] + cp $80 + jr z, .asm_f4779 + ld a, [$dde8] + ld [rNR22], a + ld d, $80 +.asm_f4779 + ld [hl], $2 + ld a, [$dd87] + ld [rNR21], a + ld a, [$dda7] + ld [rNR23], a + ld a, [$dda8] + or d + ld [rNR24], a +.asm_f478b + ret +.asm_f478c + ld hl, $dd92 + ld [hl], $0 + ld hl, rNR22 + ld a, $8 + ld [hli], a + inc hl + swap a + ld [hl], a + ret + +Func_f479c: ; f479c (3d:479c) + ld a, [$dd8c] + bit 2, a + jr nz, .asm_f47e0 + ld d, $0 + ld a, [wMusicWaveChange] + or a + jr z, .asm_f47b3 + xor a + ld [rNR30], a + call Func_f47ea + ld d, $80 +.asm_f47b3 + ld a, [$ddb9] + cp $0 + jr z, .asm_f47e1 + ld hl, $dd93 + ld a, [hl] + cp $80 + jr z, .asm_f47cc + ld a, [$dde9] + ld [rNR32], a + xor a + ld [rNR30], a + ld d, $80 +.asm_f47cc + ld [hl], $2 + xor a + ld [rNR31], a + ld a, [$dda9] + ld [rNR33], a + ld a, $80 + ld [rNR30], a + ld a, [$ddaa] + or d + ld [rNR34], a +.asm_f47e0 + ret +.asm_f47e1 + ld hl, wMusicTie + ld [hl], $0 + xor a + ld [rNR30], a + ret + +Func_f47ea: ; f479c (3d:47ea) + ld a, [wMusicWave] + add a + ld d, $0 + ld e, a + ld hl, Music1_WaveInstruments + add hl, de + ld a, [hli] + ld h, [hl] + ld l, a + ld b, d + ld de, $ff30 +.asm_f47fc + ld a, [hli] + ld [de], a + inc de + inc b + ld a, b + cp $10 + jr nz, .asm_f47fc + xor a + ld [wMusicWaveChange], a + ret + +Func_f480a: ; f480a (3d:480a) + ld a, [$dd8c] + bit 3, a + jr nz, .asm_f4829 + ld a, [$ddba] + cp $0 + jr z, asm_f482a + ld de, rNR41 + ld hl, $ddab + ld a, [hli] + ld [de], a + inc e + ld a, [hli] + ld [de], a + inc e + ld a, [hli] + ld [de], a + inc e + ld a, [hli] + ld [de], a +.asm_f4829 + ret +asm_f482a + xor a + ld [$ddef], a + ld hl, rNR42 + ld a, $8 + ld [hli], a + inc hl + swap a + ld [hl], a + ret + +Func_f4839: ; f4839 (3d:4839) + ld a, [$dd8c] + bit 3, a + jr z, .asm_f4846 + xor a + ld [$ddef], a + jr .asm_f4859 +.asm_f4846 + ld hl, $dded + ld a, [hli] + ld d, [hl] + ld e, a + ld a, [de] + cp $ff + jr nz, .asm_f4853 + jr asm_f482a +.asm_f4853 + ld [rNR43], a + inc de + ld a, d + ld [hld], a + ld [hl], e +.asm_f4859 + ret + +Func_f485a: ; f485a (3d:485a) + push af + ld b, $0 + ld c, a + call Func_f4898 + pop af + call Func_f490b + ret + +Func_f4866: ; f4866 (3d:4866) + ld a, [$ddf1] + ld [rNR50], a + ld a, [$dd8c] + or a + ld hl, wMusicDC + ld a, [hli] + jr z, .asm_f4888 + ld a, [$dd8c] + and $f + ld d, a + swap d + or d + ld d, a + xor $ff + ld e, a + ld a, [hld] + and d + ld d, a + ld a, [hl] + and e + or d +.asm_f4888 + ld d, a + ld a, [$ddf0] + xor $ff + and $f + ld e, a + swap e + or e + and d + ld [rNR51], a + ret + +Func_f4898: ; f4898 (3d:4898) + ld hl, wMusicVibratoDelay + add hl, bc + ld a, [hl] + cp $0 + jr z, .asm_f4902 + ld hl, $dde3 + add hl, bc + cp [hl] + jr z, .asm_f48ab + inc [hl] + jr .asm_f4902 +.asm_f48ab + ld hl, wMusicVibratoType + add hl, bc + ld e, [hl] + ld d, $0 + ld hl, Music1_VibratoTypes + add hl, de + add hl, de + ld a, [hli] + ld h, [hl] + ld l, a + push hl + ld hl, $dddb + add hl, bc + ld d, $0 + ld e, [hl] + inc [hl] + pop hl + add hl, de + ld a, [hli] + cp $80 + jr z, .asm_f48ee + ld hl, $dda5 + add hl, bc + add hl, bc + ld e, [hl] + inc hl + ld d, [hl] + bit 7, a + jr nz, .asm_f48df + add e + ld e, a + ld a, $0 + adc d + and $7 + ld d, a + ret +.asm_f48df + xor $ff + inc a + push bc + ld c, a + ld a, e + sub c + ld e, a + ld a, d + sbc b + and $7 + ld d, a + pop bc + ret +.asm_f48ee + push hl + ld hl, $dddb + add hl, bc + ld [hl], $0 + pop hl + ld a, [hl] + cp $80 + jr z, .asm_f48ab + ld hl, wMusicVibratoType + add hl, bc + ld [hl], a + jr .asm_f48ab +.asm_f4902 + ld hl, $dda5 + add hl, bc + add hl, bc + ld e, [hl] + inc hl + ld d, [hl] + ret + +Func_f490b: ; f490b (3d:490b) + cp $0 + jr nz, .asm_f492c + ld a, [wMusicVibratoDelay] + cp $0 + jr z, .asm_f4966 + ld a, [$dd8c] + bit 0, a + jr nz, .asm_f4966 + ld a, e + ld [rNR13], a + ld a, [rNR11] + and $c0 + ld [rNR11], a + ld a, d + and $3f + ld [rNR14], a + ret +.asm_f492c + cp $1 + jr nz, .asm_f494b + ld a, [$dde0] + cp $0 + jr z, .asm_f4966 + ld a, [$dd8c] + bit 1, a + jr nz, .asm_f4966 + ld a, e + ld [rNR23], a + ld a, [rNR21] + and $c0 + ld [rNR21], a + ld a, d + ld [rNR24], a + ret +.asm_f494b + cp $2 + jr nz, .asm_f4966 + ld a, [$dde1] + cp $0 + jr z, .asm_f4966 + ld a, [$dd8c] + bit 2, a + jr nz, .asm_f4966 + ld a, e + ld [rNR33], a + xor a + ld [rNR31], a + ld a, d + ld [rNR34], a +.asm_f4966 + ret + +Func_f4967: ; f4967 (3d:4967) + ld hl, wMusicE4 + add hl, bc + ld a, [hl] + bit 7, a + jr nz, .asm_f4976 + add e + ld e, a + ld a, d + adc b + ld d, a + ret +.asm_f4976 + xor $ff + ld h, a + ld a, e + sub h + ld e, a + ld a, d + sbc b + ld d, a + ret + +Func_f4980: ; f4980 (3d:4980) + ld a, [$dd8c] + ld d, a + bit 0, d + jr nz, .asm_f4990 + ld a, $8 + ld [rNR12], a + swap a + ld [rNR14], a +.asm_f4990 + bit 1, d + jr nz, .asm_f499c + swap a + ld [rNR22], a + swap a + ld [rNR24], a +.asm_f499c + bit 3, d + jr nz, .asm_f49a8 + swap a + ld [rNR42], a + swap a + ld [rNR44], a +.asm_f49a8 + bit 2, d + jr nz, .asm_f49b0 + ld a, $0 + ld [rNR32], a +.asm_f49b0 + ret + +Func_f49b1: ; f49b1 (3d:49b1) + ld hl, wMusicIsPlaying + xor a + add [hl] + inc hl + add [hl] + inc hl + add [hl] + inc hl + add [hl] + or a + ret nz + ld a, $80 + ld [$dd80], a + ret + +Func_f49c4: ; f49c4 (3d:49c4) + di + call Func_f4980 + call Func_f49dc + call Func_f414b + ei + ret + +Func_f49d0: ; f49d0 (3d:49d0) + di + call Func_f4980 + call Func_f414b + call Func_f4b01 + ei + ret + +Func_f49dc: ; f49dc (3d:49dc) + ld a, [$dd80] + ld [$de55], a + ld a, [$dd81] + ld [$de56], a + ld a, [wMusicDC] + ld [$de57], a + ld hl, wMusicDuty + ld de, $de58 + ld a, $4 + call Music1_CopyData + ld a, [wMusicWave] + ld [$de5c], a + ld a, [wMusicWaveChange] + ld [$de5d], a + ld hl, wMusicIsPlaying + ld de, $de5e + ld a, $4 + call Music1_CopyData + ld hl, wMusicTie + ld de, $de62 + ld a, $4 + call Music1_CopyData + ld hl, $dd95 + ld de, $de66 + ld a, $8 + call Music1_CopyData + ld hl, wMusicMainLoop + ld de, $de6e + ld a, $8 + call Music1_CopyData + ld a, [$ddab] + ld [$de76], a + ld a, [$ddac] + ld [$de77], a + ld hl, wMusicOctave + ld de, $de78 + ld a, $4 + call Music1_CopyData + ld hl, $ddb3 + ld de, $de7c + ld a, $4 + call Music1_CopyData + ld hl, $ddb7 + ld de, $de80 + ld a, $4 + call Music1_CopyData + ld hl, $ddbb + ld de, $de84 + ld a, $4 + call Music1_CopyData + ld hl, wMusicE8 + ld de, $de88 + ld a, $4 + call Music1_CopyData + ld hl, $ddc3 + ld de, $de8c + ld a, $4 + call Music1_CopyData + ld hl, wMusicE9 + ld de, $de90 + ld a, $4 + call Music1_CopyData + ld hl, wMusicEC + ld de, $de94 + ld a, $4 + call Music1_CopyData + ld hl, wMusicSpeed + ld de, $de98 + ld a, $4 + call Music1_CopyData + ld hl, wMusicVibratoType2 + ld de, $de9c + ld a, $4 + call Music1_CopyData + ld hl, wMusicVibratoDelay + ld de, $dea0 + ld a, $4 + call Music1_CopyData + ld a, $0 + ld [$dddb], a + ld [$dddc], a + ld [$dddd], a + ld [$ddde], a + ld hl, wMusicVolume + ld de, $dea4 + ld a, $3 + call Music1_CopyData + ld hl, wMusicE4 + ld de, $dea7 + ld a, $3 + call Music1_CopyData + ld hl, $dded + ld de, $deaa + ld a, $2 + call Music1_CopyData + ld a, $0 + ld [$deac], a + ld hl, wMusicReturnAddress + ld de, $dead + ld a, $8 + call Music1_CopyData + ld hl, $ddfb + ld de, $deb5 + ld a, $30 + call Music1_CopyData + ret + +Func_f4b01: ; f4b01 (3d:4b01) + ld a, [$de55] + ld [$dd80], a + ld a, [$de56] + ld [$dd81], a + ld a, [$de57] + ld [wMusicDC], a + ld hl, $de58 + ld de, wMusicDuty + ld a, $4 + call Music1_CopyData + ld a, [$de5c] + ld [wMusicWave], a + ld a, $1 + ld [wMusicWaveChange], a + ld hl, $de5e + ld de, wMusicIsPlaying + ld a, $4 + call Music1_CopyData + ld hl, $de62 + ld de, wMusicTie + ld a, $4 + call Music1_CopyData + ld hl, $de66 + ld de, $dd95 + ld a, $8 + call Music1_CopyData + ld hl, $de6e + ld de, wMusicMainLoop + ld a, $8 + call Music1_CopyData + ld a, [$de76] + ld [$ddab], a + ld a, [$de77] + ld [$ddac], a + ld hl, $de78 + ld de, wMusicOctave + ld a, $4 + call Music1_CopyData + ld hl, $de7c + ld de, $ddb3 + ld a, $4 + call Music1_CopyData + ld hl, $de80 + ld de, $ddb7 + ld a, $4 + call Music1_CopyData + ld hl, $de84 + ld de, $ddbb + ld a, $4 + call Music1_CopyData + ld hl, $de88 + ld de, wMusicE8 + ld a, $4 + call Music1_CopyData + ld hl, $de8c + ld de, $ddc3 + ld a, $4 + call Music1_CopyData + ld hl, $de90 + ld de, wMusicE9 + ld a, $4 + call Music1_CopyData + ld hl, $de94 + ld de, wMusicEC + ld a, $4 + call Music1_CopyData + ld hl, $de98 + ld de, wMusicSpeed + ld a, $4 + call Music1_CopyData + ld hl, $de9c + ld de, wMusicVibratoType2 + ld a, $4 + call Music1_CopyData + ld hl, $dea0 + ld de, wMusicVibratoDelay + ld a, $4 + call Music1_CopyData + ld hl, $dea4 + ld de, wMusicVolume + ld a, $3 + call Music1_CopyData + ld hl, $dea7 + ld de, wMusicE4 + ld a, $3 + call Music1_CopyData + ld hl, $deaa + ld de, $dded + ld a, $2 + call Music1_CopyData + ld a, [$deac] + ld [$ddef], a + ld hl, $dead + ld de, wMusicReturnAddress + ld a, $8 + call Music1_CopyData + ld hl, $deb5 + ld de, $ddfb + ld a, $30 + call Music1_CopyData + ret + +; copies a bytes from hl to de +Music1_CopyData: ; f4c18 (3d:4c18) + ld c, a +.asm_f4c19 + ld a, [hli] + ld [de], a + inc de + dec c + jr nz, .asm_f4c19 + ret + +Unknown_f4c20: ; f4c20 (3d:4c20) +INCBIN "baserom.gbc",$f4c20,$f4c28 - $f4c20 + +Unknown_f4c28: ; f4c28 (3d:4c28) +INCBIN "baserom.gbc",$f4c28,$f4c30 - $f4c28 + +Unknown_f4c30: ; f4c30 (3d:4c30) +INCBIN "baserom.gbc",$f4c30,$f4cda - $f4c30 + +Music1_WaveInstruments: ; f4cda (3d:4cda) +INCLUDE "audio/wave_instruments.asm" + +Music1_NoiseInstruments: ; f4d34 (3d:4d34) +INCLUDE "audio/noise_instruments.asm" + +Music1_VibratoTypes: ; f4dde (3d:4dde) +INCLUDE "audio/vibrato_types.asm" + +Unknown_f4e85: ; f4e85 (3d:4e85) +INCBIN "baserom.gbc",$f4e85,$f4ee5 - $f4e85 + +INCLUDE "audio/music1_headers.asm" + +INCLUDE "audio/music/titlescreen.asm" +INCLUDE "audio/music/dueltheme1.asm" +INCLUDE "audio/music/dueltheme2.asm" +INCLUDE "audio/music/dueltheme3.asm" +INCLUDE "audio/music/pausemenu.asm" +INCLUDE "audio/music/deckmachine.asm" +INCLUDE "audio/music/cardpop.asm" +INCLUDE "audio/music/overworld.asm" +INCLUDE "audio/music/matchstart1.asm" +INCLUDE "audio/music/matchstart2.asm" +INCLUDE "audio/music/matchstart3.asm" +INCLUDE "audio/music/matchvictory.asm" +INCLUDE "audio/music/matchloss.asm" +INCLUDE "audio/music/darkdiddly.asm" +INCLUDE "audio/music/boosterpack.asm" +INCLUDE "audio/music/medal.asm" + +rept $138 +db $ff +endr |