pokecrystal-board/audio/music/wildpokemonvictory.asm

183 lines
2.4 KiB
NASM

Music_WildPokemonVictory:
musicheader 3, 1, Music_WildPokemonVictory_Ch1
musicheader 1, 2, Music_WildPokemonVictory_Ch2
musicheader 1, 3, Music_WildPokemonVictory_Ch3
Music_WildPokemonVictory_Ch1:
tempo 126
volume $77
dutycycle $3
tone $0001
notetype $c, $b1
octave 3
note B_, 1
note A_, 1
note G#, 1
note F#, 1
intensity $b6
note E_, 12
.body:
stereopanning $f
.mainloop:
callchannel .sub1
note F#, 2
note F#, 2
note F#, 4
callchannel .sub1
note G#, 4
intensity $78
octave 3
note G_, 4
pitchoffset 0, C#
callchannel .sub1
note F#, 2
note F#, 2
note F#, 4
callchannel .sub1
note G#, 4
pitchoffset 0, C_
intensity $78
octave 3
note F#, 4
loopchannel 0, .mainloop
.sub1:
intensity $71
octave 3
note G#, 1
note B_, 1
octave 4
note E_, 2
octave 3
note B_, 2
octave 4
note E_, 2
octave 3
note G#, 1
note F#, 1
note E_, 1
note F#, 1
note G#, 2
note E_, 2
note A_, 1
octave 4
note C#, 1
note E_, 2
note E_, 2
note A_, 2
endchannel
Music_WildPokemonVictory_Ch2:
vibrato $12, $24
dutycycle $2
notetype $c, $d1
octave 4
note E_, 1
note F#, 1
note G#, 1
note A_, 1
intensity $d6
note B_, 12
.body:
stereopanning $f0
.mainloop:
callchannel .sub1
octave 4
note B_, 2
note B_, 2
note B_, 4
callchannel .sub1
octave 4
note B_, 4
intensity $81
note C_, 1
note E_, 1
note G_, 1
note A#, 1
pitchoffset 0, C#
callchannel .sub1
octave 4
note B_, 2
note B_, 2
note B_, 4
callchannel .sub1
octave 4
note B_, 4
pitchoffset 0, C_
intensity $81
octave 3
note B_, 1
octave 4
note D#, 1
note F#, 1
note A_, 1
loopchannel 0, .mainloop
.sub1:
intensity $81
octave 4
note B_, 2
note A_, 2
note G#, 2
note A_, 2
note B_, 2
note B_, 2
note B_, 4
octave 5
note C#, 2
note C#, 2
note C#, 4
endchannel
Music_WildPokemonVictory_Ch3:
notetype $c, $20
note __, 6
octave 6
note D#, 1
note __, 1
note E_, 1
note __, 3
note E_, 1
note __, 3
.body:
.mainloop:
callchannel .sub1
note D#, 2
note C#, 2
octave 2
note B_, 2
note __, 2
callchannel .sub1
note E_, 2
note __, 2
note C_, 4
pitchoffset 0, C#
callchannel .sub1
note D#, 2
note C#, 2
octave 2
note B_, 2
note __, 2
callchannel .sub1
note E_, 2
note __, 2
pitchoffset 0, C_
octave 2
note B_, 4
loopchannel 0, .mainloop
.sub1:
intensity $25
octave 3
note E_, 2
note __, 4
note E_, 2
note __, 2
note D_, 2
note __, 2
note D_, 2
note C#, 2
note __, 4
note C#, 2
endchannel