#include #include ;-- #music-name "Niji Iro Holy Trident" #programmer "Takuya SHIOZAKI" #instrument "MU-80" #division 48 #tempo 125 #beat 4/4,48,8 ;------ #define TR:I0 #define BASS:@{MIDI-PORT:0}@z1 @<-1@>+1 @%1 L16 U64 ${TR:} o1 #define MELO:@{MIDI-PORT:0}@z2 @<-1@>+1 @%1 L16 U70 ${TR:} o5 #define GUIT:@{MIDI-PORT:0}@z3 @<-1@>+1 @%1 L16 U64 ${TR:} o3 @Q8Q8 #define PIANO:@{MIDI-PORT:0}@z11 @<-1@>+1 @%1 L16 U64 ${TR:} o4 #define SEQ:@{MIDI-PORT:0}@z4 @<-1@>+1 @%1 L8 U80 ${TR:} o7 #define STR1:@{MIDI-PORT:0}@z5 @<-1@>+1 @%1 L16 U80 ${TR:} o4 #define STR2:@{MIDI-PORT:0}@z6 @<-1@>+1 @%1 L16 U80 ${TR:} o4 #define DRUM:@{MIDI-PORT:0}@z10 @<-1@>+1 @%1 L16 U64 I0 o2 #define TORO:@{MIDI-PORT:1}@z1 @<-1@>+1 @%1 L16 U64 I0 v1 #define BV: @33@@0,0v110 #define PV: @0v90 #define MV: @100v117 #define GV: @30v117 #define SV: @9v70 #define TV1: @48v80 #define TV2: @48v80 #define DV: @10v90 ;------ #define H:($$+10) #define L:($$-10) #define k:o2c #define s:o2d #define r:o2c+ #define h:o2f+ #define p:o2g+ #define o:o2a+ #define t1:o3d #define t2:o3c #define t3:o2b #define t4:o2a #define t5:o2g #define t6:o2f #define c1:o3c+ #define c2:o3a #define c3:o3e #define c4:o3g #define gm:@@0,12@30 #define go:@@0,0@30 ; 255 l3@{MIDI-PORT:0}@z1r${RESET:}r${XG-RESET:}r${RESET-ALL-CONTROLERS:}r 255 ${XX:$03,$00,$00,$49,$00}r${XX:$03,$00,$0c,$02}r${XX:$03,$00,$06,35}r 255 ${XX:$03,$00,$02,40}r${XX:$03,$00,$03,024}r${XX:$03,$00,$04,070}r 255 ${XX:$03,$00,$05,070}r${XX:$03,$00,$08,043}r 255 ${XX:$03,$00,$09,073}r${XX:$03,$00,$0a,035}r${XX:$03,$00,$0b,127}r 1 rrrr${BASS:}${BV:}r4 2 rrrr${MELO:}${MV:} r4 10 rrrr${DRUM:}${DV:} r4 11 rrrr${DRUM:} r4 12 rrrr${DRUM:} r4 13 rrrr${DRUM:} r4 14 rrrr${DRUM:} r4 20 rrrr ${PIANO:} ${PV:}r4 21 rrrr ${PIANO:} r4 30 rrrr ${GUIT:} ${GV:} P100r4 40 rrrr ${SEQ:} ${SV:} P20 r4 50 rrrr ${STR1:} ${TV1:} P40 r8... 60 rrrr ${STR2:} ${TV2:} P80 r8... 1 f4 2 f4 10 $s$s0${t2:}$k0${t5:}8 11 $o4 12 r4 13 r4 14 r4 20 U75f0&>f4< | 21 e-0&c0&b-rb-rarar< | g8>grgrfrfr< | 1 e-8>e-re-re-re-r< | d8>drdrgrgr | 1 c8>cre-re-r< | d8d8g8da-ra-ra-ra-r< | f8>frc8fcc8e-8& | e-8d8r8cd8e-8d8c8& | 2 c8c<| a8f8r8d8&d8e-8f4 | 2 g4>d8 | d8r8e-8c8&c4b-2U64 c0& | 21 a0&>c0&d0&f2 f0&c02 | d0& c0&d2 | 20 e-0& f0&c2 | f0&c2 d0& | 21 g0&f2 a0&g0&c2 | a0&d2 f0& | 20 d0&f0& | f0&c4r8d0&c8&c8U75g0&a0&b-0& | 21 g0& e-4r8 g-0&d-8&d-2 | a0&d4r8f0&d0& | 20 b-0&r8e-0&g0&b-0& | b-0&c8&c4f0&${go:}b-0&f8 30 ${go:}a0&f8${gm:}${go:}a0&f8 | 30 ${go:}b-0&g8${gm:}${go:}b-0&g8f4&>d4< | 30 ${go:}b-0&e-8${gm:}e-32r.e-32r.${go:}b-0&e-8 30 ${go:}>c0&${go:}c0&c0&c0&${go:}e-0&d0&>${go:}d0&d8g8 | 30 ${go:}>g0&e-0&g0&e-0&g0&e-0&g0&e-0&g0&e-0&g0&e-0&b-0&f0&c8${gm:}${go:}b-0&f0&c8b-0&f0&c8&c4dcc | e-e-dd | 40 e-e-fcf | fcfdd | 40 cde-re- | ddrd | 40 e-ce-ce- | fff16f16f4 50 b-r>de-f8fg a8f 8c8>c8& | c8d4 | e-2f2 | f2 a-4 g4 | 60 d rb->cd8de-f8c8a8& | a8 g8 r4< d4f4 | g 2a2 | a2 b2> | 50 g8r8r4r4r4 |r2r8c8d8 | e-8e-fg8ga-b-8e-8g8b-8>| drr8e-8c8&c4c8b-rb-rarar< | g-8>g-rg-rgrfr< | 1 e8>erere-re-r< | d8>drd8gd | 1 c8>crcre-re-r< | d8grgr | 1 c8>crdrc8e-8& | e-8d8r8cd8e-8d8c8& | 2 c8c<| a8f8r8d8&d8e-8f4 | 2 g2r8g8a8b-8 | a8f8a8g8&g8g8b8>d8 | 2 e-4d4d8&|d8c8c8r8b-2U64 c0& | c0& d0& | 21 a0&>c0&d0&f2 f0&c02 | e-0& f0& | 20 d0& d0& | f0&c2 d0& | 21 g0&e2 e-0&g2 | a0&d2 f0& | 20 d0&d0& | f0&c4r8d0&g0&b0&>d0& | 21 g0&e-2 g0&e-2 | a0&d4r8f0&d8&d2 | 20 e-0&d0&g0&>d0&c0&c0& | 21 g0&f0&g0&e0&g0&e-0&g0&e-0&g0&e-0&| 30 ${go:}b-0&f8${gm:}${go:}b-0&f8 30 ${go:}a0&f8${gm:}${go:}a0&f8 | 30 ${go:}>c0&c8<e-0&b-2 | >d0&d8c8d0&g4 | 30 ${go:}c0&${go:}c0&${go:}e-0&d0&>${go:}d0&d8g8 | 30 ${go:}c0&g4d0&a4e-0&b-8e0&b-rr8f0&b-8&b-8f0&b-8f0&b-8r8r2 | 40 ddcc | e-e-d | 40 de-e- | dd | 40 e-e- | ddrd | 40 c4d4e-erf|rffr r2| 50 b-r>de-f8fg a8f8c8>c8& | c8d4 | 50 e2e-2 | d4 >g0&a0&b-0&>c0&d0&c0&g0& | 50 e-0&e-0&f0&g0&g0&a0&b-0&g0&a0&b-0&>c0&d0&e-0& | 50 f0&c0&re-0&rd0&b0&>d0& | 50 e-0&d0&g0&>d0&c0&c0&cd8de-f8c8f+8& | f+8 f+8 r4< d4f4 | 60 g 2b-2 | a8f8 cde-f8a-8g8d8 | 60 c 8cde-8e-fg8e-fgab->c< | a8fr>cr | 60 c4d4f8b-8b-8b-8f8< | b-8>f8>c8${go:}b-0&f8 30 ${go:}b-0&f8${gm:}${go:}b-0&f8 | 30 ${go:}b-0&>e-8<${gm:}${go:}b-0&>e-8${go:}b-0&f8 30 b0&f+4r8a-0&e-rr4 U55c0&c24f24b-24>c24f1 50 b-1&b-2.>e-24e24f24f+32g32g+32a32 | b-0&>f0&rr4d0&e-24e24f24f+32g32g+32a32 | d+4.>d-0&d0&d0& | 20 e-0&e-0&d0&d0& | 20 e-0&b-0&g0& | g-0&d-0&r8f0&c0& | 21 f+0&c+0&f+0&c+0&e-0&d0&