Add Lost Woods and Zelda 1 Dungeon Theme
This commit is contained in:
scawful
195
Music/dungeon_theme.asm
Normal file
195
Music/dungeon_theme.asm
Normal file
@@ -0,0 +1,195 @@
|
||||
;=====================================================================================
|
||||
; The Legend of Zelda: A Link to the Past (Custom Music Track)
|
||||
; The Legend of Zelda - Dungeon Theme v1.01
|
||||
; Original Song by Koji Kondo
|
||||
; Midi by Zaggarum
|
||||
; ASM Framework by Zarby89
|
||||
; Ported by Letterbomb
|
||||
;=====================================================================================
|
||||
|
||||
lorom
|
||||
|
||||
org $1B9C0F; Sections?
|
||||
DungeonTheme:
|
||||
!ARAMAddr = $EC0B
|
||||
dw !ARAMAddr+$08
|
||||
dw $00FF
|
||||
dw !ARAMAddr
|
||||
dw $0000
|
||||
|
||||
.Channels
|
||||
!ARAMC = !ARAMAddr-DungeonTheme
|
||||
dw .Channel0+!ARAMC
|
||||
dw .Channel1+!ARAMC
|
||||
dw .Channel2+!ARAMC
|
||||
dw .Channel3+!ARAMC
|
||||
dw .Channel4+!ARAMC
|
||||
dw .Channel5+!ARAMC
|
||||
dw $0000
|
||||
dw $0000
|
||||
|
||||
|
||||
.Channel0
|
||||
%SetMasterVolume($CA)
|
||||
%SetTempo(97);
|
||||
%SetInstrument($09) ; Strings
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
%CallSubroutine(.sub1+!ARAMC, 4)
|
||||
%CallSubroutine(.sub2+!ARAMC, 4)
|
||||
%CallSubroutine(.sub3+!ARAMC, 4)
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
%CallSubroutine(.sub5+!ARAMC, 4)
|
||||
%CallSubroutine(.sub6+!ARAMC, 4)
|
||||
%CallSubroutine(.sub7+!ARAMC, 1)
|
||||
db Rest
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub1
|
||||
db G4, D5
|
||||
db $00 ; End
|
||||
|
||||
.sub2
|
||||
db F4s, D5
|
||||
db $00 ; End
|
||||
|
||||
.sub3
|
||||
db F4, D5
|
||||
db $00 ; End
|
||||
|
||||
.sub4
|
||||
db E4, D5
|
||||
db $00 ; End
|
||||
|
||||
.sub5
|
||||
db D4s, C5
|
||||
db $00 ; End
|
||||
|
||||
.sub6
|
||||
db D4, C5
|
||||
db $00 ; End
|
||||
|
||||
.sub7
|
||||
db C4, A4, F4s, C5, A4, D5s, D5s, D5s, A5, A5
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel1
|
||||
%SetInstrument($09) ; Strings
|
||||
%SetDurationN($24, $7F) ; 1/8
|
||||
db Rest, $48
|
||||
%CallSubroutine(.sub8+!ARAMC, 4)
|
||||
%CallSubroutine(.sub9+!ARAMC, 4)
|
||||
%CallSubroutine(.sub10+!ARAMC, 4)
|
||||
%CallSubroutine(.sub11+!ARAMC, 4)
|
||||
%CallSubroutine(.sub12+!ARAMC, 8)
|
||||
db F4s, C5, A4, D5s, C5, C5, F5s, F5s, F5s, C6
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub8
|
||||
db A4s, D5s
|
||||
db $00 ; End
|
||||
|
||||
.sub9
|
||||
db A4, D5s
|
||||
db $00 ; End
|
||||
|
||||
.sub10
|
||||
db G4s, D5s
|
||||
db $00 ; End
|
||||
|
||||
.sub11
|
||||
db G4, D5s
|
||||
db $00 ; End
|
||||
|
||||
.sub12
|
||||
db G4, D5
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel2
|
||||
%SetChannelVolume($CF)
|
||||
%SetInstrument($09) ; Strings
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
db G4, Tie, Tie, Tie, A4s, Tie, D5, Tie, C5s, Tie, F4s
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db $24, F4
|
||||
%CallSubroutine(.sub13+!ARAMC, 10)
|
||||
db G4, Tie, Tie, $48, C5s, C5, Tie, $24, E4
|
||||
%CallSubroutine(.sub13+!ARAMC, 11)
|
||||
db D4s, D4, D4s
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db G4, Tie, Tie, D5s, Tie, Tie, D5, Tie, D4, C4s, D4
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db G4, Tie, Tie, D5, Tie, Tie, C5s, Tie, D4, F4s, A4, F4s, A4, C5, A4, C5, D5s, C5, D5s, F5s, A5, F5s, D5s, C5, D5s, C5, A4, F4s
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub13
|
||||
db Tie
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel3
|
||||
%SetInstrument($18) ; Guitar
|
||||
%SetDurationN($24, $7F) ; 1/8
|
||||
db Rest, $48, G4
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db F4s
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db F4
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db E4
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db D4s
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db D4
|
||||
%CallSubroutine(.sub13+!ARAMC, 7)
|
||||
db Rest
|
||||
%CallSubroutine(.sub13+!ARAMC, 9)
|
||||
db $00 ; End of the channel
|
||||
|
||||
|
||||
.Channel4
|
||||
%SetChannelVolume($CB)
|
||||
%SetInstrument($13) ; Snare
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
%CallSubroutine(.sub14+!ARAMC, 4)
|
||||
%CallSubroutine(.sub15+!ARAMC, 4)
|
||||
%CallSubroutine(.sub16+!ARAMC, 8)
|
||||
%CallSubroutine(.sub17+!ARAMC, 6)
|
||||
db G2, Tie, G2, Tie, G2
|
||||
%CallSubroutine(.sub13+!ARAMC, 9)
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub14
|
||||
db G2, Tie
|
||||
db $00 ; End
|
||||
|
||||
.sub15
|
||||
db F2, Tie
|
||||
db $00 ; End
|
||||
|
||||
.sub16
|
||||
db E2, Tie
|
||||
db $00 ; End
|
||||
|
||||
.sub17
|
||||
db D2s, Tie
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel5
|
||||
%SetChannelVolume($CF)
|
||||
%SetInstrument($09) ; Strings
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
db G3, Tie, Tie, Tie, A3s, Tie, D4, Tie, C4s, Tie, F3s
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db $24, F3
|
||||
%CallSubroutine(.sub13+!ARAMC, 10)
|
||||
db G3, Tie, Tie, $48, C4s, C4, Tie, $24, E3
|
||||
%CallSubroutine(.sub13+!ARAMC, 11)
|
||||
db D3s, D3, D3s
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db G3, Tie, Tie, D4s, Tie, Tie, D4, Tie, D3, C3s, D3
|
||||
%CallSubroutine(.sub13+!ARAMC, 5)
|
||||
db G3, Tie, Tie, D4, Tie, Tie, C4s, Tie, D3, F3s, A3, F3s, A3, C4, A3, C4, D4s, C4, D4s, F4s, A4, F4s, D4s, C4, D4s, C4, A3, F3s
|
||||
db $00 ; End
|
||||
167
Music/lost_woods.asm
Normal file
167
Music/lost_woods.asm
Normal file
@@ -0,0 +1,167 @@
|
||||
;=====================================================================================
|
||||
; The Legend of Zelda: A Link to the Past (Custom Music Track)
|
||||
; The Legend of Zelda: Ocarina of Time - Lost Woods Theme v1.01
|
||||
; Original Song by Koji Kondo
|
||||
; Midi by John Kuzma
|
||||
; ASM Framework by Zarby89
|
||||
; Ported by Letterbomb
|
||||
;=====================================================================================
|
||||
|
||||
; Replace Lost Woods Theme
|
||||
org $1AADDE ; Sections?
|
||||
LostWoodsTheme:
|
||||
!ARAMAddr = $DEE5
|
||||
dw !ARAMAddr+$0A ; Intro
|
||||
dw !ARAMAddr+$1A ; Looping
|
||||
dw $00FF
|
||||
dw !ARAMAddr+$02 ; Looping Section
|
||||
dw $0000
|
||||
|
||||
.ChannelsIntro
|
||||
!ARAMC = !ARAMAddr-LostWoodsTheme
|
||||
dw .Channel0Intro+!ARAMC
|
||||
dw $0000
|
||||
dw $0000
|
||||
dw $0000
|
||||
dw $0000
|
||||
dw $0000
|
||||
dw $0000
|
||||
dw $0000
|
||||
|
||||
.Channels
|
||||
!ARAMC = !ARAMAddr-LostWoodsTheme
|
||||
dw .Channel0+!ARAMC
|
||||
dw .Channel1+!ARAMC
|
||||
dw .Channel2+!ARAMC
|
||||
dw .Channel3+!ARAMC
|
||||
dw .Channel4+!ARAMC
|
||||
dw .Channel5+!ARAMC
|
||||
dw $0000
|
||||
dw $0000
|
||||
|
||||
|
||||
.Channel0Intro
|
||||
%SetMasterVolume($9F)
|
||||
%SetChannelVolume($90)
|
||||
%SetTempo(85);
|
||||
%SetInstrument($02) ; Tympani
|
||||
%SetDurationN($12, $7F) ; 1/16
|
||||
db F3s, Tie, F3s, F3s, F3s, Tie, F3s, F3s, F3s, Tie, $24, F3s, Tie, C4
|
||||
db $00 ; End of the channel
|
||||
|
||||
|
||||
.Channel0
|
||||
%CallSubroutine(.sub1+!ARAMC, 14)
|
||||
%CallSubroutine(.sub2+!ARAMC, 4)
|
||||
%CallSubroutine(.sub1+!ARAMC, 1)
|
||||
db $12, F3s, Tie, F3s, F3s, Tie, Tie, F3s, Tie, $48, F3s, F3s
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub1
|
||||
db $12, F3s, Tie, F3s, F3s, $24, F3s, F3s, F3s, $12, F3s, F3s, $24, F3s, F3s
|
||||
db $00 ; End
|
||||
|
||||
.sub2
|
||||
db $12, F3s, Tie, F3s, F3s, $48, D4
|
||||
db $00 ; End
|
||||
|
||||
.sub11
|
||||
db Tie
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel1
|
||||
%SetChannelVolume($9A)
|
||||
%SetInstrument($0D) ; Ocarina
|
||||
%SetDurationN($24, $7F) ; 1/8
|
||||
%CallSubroutine(.sub3+!ARAMC, 1)
|
||||
db B5, G5, $48, E5, Tie, $24, Tie, D5, E5, G5, $48, E5, Tie, Tie
|
||||
%CallSubroutine(.sub3+!ARAMC, 1)
|
||||
db E6, B5, $48, G5, Tie, $24, Tie, B5, G5, D5, $48, E5, Tie, Tie
|
||||
%CallSubroutine(.sub9+!ARAMC, 8)
|
||||
db $24, F5, G5, A5, Tie, B5, C6, D6, Tie, E6, F6, $48, G6, Tie, Tie
|
||||
%CallSubroutine(.sub9+!ARAMC, 8)
|
||||
db $24, F5, E5, A5, G5, B5, A5, C6, B5, D6, C6, E6, D6, F6, E6, $12, B5, C6, Tie, A5, $48, B5
|
||||
%CallSubroutine(.sub11+!ARAMC, 7)
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub3
|
||||
db $24, F5, A5, B5, Tie, F5, A5, B5, Tie, F5, A5, B5, E6, D6, Tie, B5, C6
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel2
|
||||
%SetInstrument($0F) ; Harp
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
%CallSubroutine(.sub5+!ARAMC, 4)
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
%CallSubroutine(.sub5+!ARAMC, 4)
|
||||
%CallSubroutine(.sub6+!ARAMC, 3)
|
||||
%CallSubroutine(.sub7+!ARAMC, 2)
|
||||
db $24, E3, A3, Tie, A3, E3, B3, Tie, A3, E3, G3s, G3s, G3s, G3s, Tie, B4, Tie
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub4
|
||||
db $48, F3, Tie
|
||||
db $00 ; End
|
||||
|
||||
.sub5
|
||||
db $48, C3, Tie
|
||||
db $00 ; End
|
||||
|
||||
.sub6
|
||||
db $24, D3, F3, D3, F3, G2, D3, G2, G3, C3, G3, C3, G3, A2, E3, A2, E3
|
||||
db $00 ; End
|
||||
|
||||
.sub7
|
||||
db $24, D3, A3, F3, Tie
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel3
|
||||
%SetInstrument($18) ; Guitar
|
||||
%SetDurationN($24, $7F) ; 1/8
|
||||
%CallSubroutine(.sub8+!ARAMC, 2)
|
||||
db $48
|
||||
%CallSubroutine(.sub9+!ARAMC, 40)
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub8
|
||||
db F3, C4, C4, C4, F3, A3, A3, A3, F3, A3, A3, A3, F3, A3, A3, A3, E3, G3, G3, G3, E3, G3, G3, C3, E3, C4, G3, G3, E3, G3, G3, C3
|
||||
db $00 ; End
|
||||
|
||||
.sub9
|
||||
db Rest
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel4
|
||||
%SetChannelVolume($9D)
|
||||
%SetInstrument($18) ; Guitar
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
%CallSubroutine(.sub9+!ARAMC, 32)
|
||||
%CallSubroutine(.sub10+!ARAMC, 1)
|
||||
db C5, B4, $48, E4, Tie, Tie
|
||||
%CallSubroutine(.sub10+!ARAMC, 1)
|
||||
db $24, C5, D5, $48, E5, Tie, Tie
|
||||
%CallSubroutine(.sub10+!ARAMC, 1)
|
||||
db $24, C5, B4, $48, E4, Tie, Tie, $24, D4, C4, F4, E4, G4, F4, A4, G4, B4, A4, C5, B4, D5, C5, $12, E5, F5, Tie, D5, $48, E5
|
||||
%CallSubroutine(.sub11+!ARAMC, 7)
|
||||
db $00 ; End of the channel
|
||||
|
||||
.sub10
|
||||
db $24, D4, E4, F4, Tie, G4, A4, B4, Tie
|
||||
db $00 ; End
|
||||
|
||||
|
||||
.Channel5
|
||||
%SetInstrument($0F) ; Harp
|
||||
%SetDurationN($48, $7F) ; 1/4
|
||||
%CallSubroutine(.sub9+!ARAMC, 32)
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
%CallSubroutine(.sub5+!ARAMC, 4)
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
%CallSubroutine(.sub5+!ARAMC, 4)
|
||||
%CallSubroutine(.sub4+!ARAMC, 4)
|
||||
db $00 ; End of the channel
|
||||
Reference in New Issue
Block a user