// 君が代 Int VOCALOID=1 Int BACK=1 Function EV(Int V) { V=127-V V=V*2 IF(V>127){ V=127 } Expression(127-V) } Function EVT(Int V1,Int V2, Int LEN) { V1=127-V1 V1=V1*2 V2=127-V2 V2=V2*2 IF(V1>127){ V1=127 } IF(V2>127){ V2=127 } Expression.onTime(127-V1,127-V2,LEN) } IF(VOCALOID=1){ TR(1) l4q100 Tempo 50 r1 Tempo 49 r1 dcd&e g&e Tempo 45 d4..r16 Tempo 49 ega&g8&a8 Tempo 50 >d< Tempo 49 b Tempo 47 a Tempo 45 g8.r16 Tempo 48 ega2 Tempo 47 >d Tempo 46 c Tempo 46 d4..r16< Tempo 48 egag Tempo 48 e4.g8 Tempo 46 d4..r16 Tempo 47 a8..a32>cd4..r16 Tempo 48 c&d< Tempo 46 a&g Tempo 40 a& Tempo 35 g8&e8 Tempo 30 d2 } IF(BACK=1){ TR(2) 音色(Strings1) EV(110) o5q100 v100 EV(90,110,!1) dcde ge EVT(110,40,!2)d4.r8 EV(90,110,!1) dcde ge EVT(110,40,!2)d4..r16 o6 EVT(110,127,!1) v110 'ce' 'cg' 'ca' Sub{c4}g8a8 EVT(127,90,!1) 'd>d<' 'db' 'ca' 'g8.'r16 EVT(110,120,!1) ega4..r16 EV(127) >dc EVT(127,80,!2) d4.r8< egag EVT(100,110,!2) e4.g8 EVT(110,60,!2) d4..r16 v127 EVT(110,127,!2) a>c EVT(127,90,!2) d2 EVT(127,100,!1.) cdd<' 'db' 'ca' 'g8.'r16 EVT(110,120,!1) ega4..r16 EV(127) >dc EVT(127,80,!2) d4.r8< egag EVT(100,110,!2) e4.g8 EVT(110,60,!2) d4..r16 v127 EVT(110,127,!2) a>c EVT(127,90,!2) d2 EVT(127,100,!1.) cdd<' 'db' 'ca' 'g8.'r16 v90 EVT(110,120,!1) ega4..r16 v100 EV(127) >dc EVT(127,100,!2) d4.r8< v80 egag EVT(100,110,!2) e4.g8 EVT(110,90,!2) d4..r16 v100 EVT(110,127,!2) a>c EVT(127,115,!2) d2 EVT(127,100,!1.) v90 cde' 'cg' 'ca'Sub{c4}g8a8> EVT(120,90,!1) <'f#>d'<'gb'ag8.r16 EVT(100,110,!2) 'c' 'e' EVT(110,80,!2) 'f4..'r16 v127 EVT(127,110,!2) dc EVT(110,70,!2) d4..r16 v110 EVT(90,110,!1) 'e''e' 'f''e' EVT(110,90,!1) Sub{c4e4d4..r16}f''f''f2' EVT(120,110,!1) 'e''f''a''g' v120 EVT(110,100,!2.) 'a'v110'g8''e8' EV(100,70,!2) v105'd2' TR(4) EV(110) 音色(Clarinet) o5q100 EVT(90,110,!1) dcde geEVT(110,40,!4.)d4.r8 EVT(90,110,!1) dcde geEVT(110,60,!4.)d4..r16 egag8a8 >d aaa2 aaag ag8e8d2 TR(5) EV(120) [4 r1] 音色(Piccolo) o7q100 EVT(90,110,!1) egag8a8 EVT(115,90,!1) >ddcd4..r16< EVT(90,110,!1) egag EVT(110,80,!1) e4.g8d4..r16 EVT(110,127,!1) a>cd2 EVT(120,100,!1.) cdddcd4..r16< EVT(90,110,!1) egag EVT(110,80,!1) e4.g8d4..r16 EVT(110,127,!1) a>cd2 EVT(120,100,!1.) cdd''c''d''e' EVT(110,90,!1) 'g''e''d4.'r8 EVT(90,110,!1) 'd''c''d''e' EVT(110,90,!1) 'g''e''d4..'r16 EVT(90,110,!1) 'c''c''c'c EVT(110,90,!1) 'd' 'c' 'e' 'f4..'r16 <'da''a' EVT(127,100,!1)'d4..a4..'r16 EVT(100,110,!1) 'c''e''f''e' EVT(110,100,!2) Sub{g2^4..}c4.e8< EVT(100,70,!1)b4..r16 EVT(110,127,!1) >'f''f''f2' 'c''d'EVT(127,80,!2)d4..r16 EVT(100,127,!1) agfe ce EVT(127,70,!1)g4..r16 EVT(100,127,!1) fff4..r16 adag EVT(127,117,!2) ag8e8 EVT(117,80,!1)d2 TR(10) // 音色(OrchestraSet) v127q100 $b{n(Kick1),} $S{n(SnareRoll),} $s{n(Snare1),} Expression(127) [4 r1] Sub{Expression.onTime(40,100,!1) r1 Expression.onTime(100,40,!1)} Rythm{S1^1} Expression(127) Rythm{'bs''bs'} Sub{Expression.onTime(80,127,!1) r2 Expression.onTime(127,50,!1)} Rythm{S2^1} Sub{Expression.onTime(40,100,!1) r1 Expression.onTime(100,40,!1)} Rythm{S1^1} Expression(127) Rythm{'bs''bs'} Sub{Expression.onTime(80,127,!1) r1. Expression.onTime(127,30,!1)} Rythm{S2^1^1} } End ############################################################################## # TiMidiTy Config (v2.0) dir ../patches/sf2_all dir ../patches/sf2_all/atomic dir "../patches/sf2_part/Sonatina Symphonic Orchestra" ############################################################################## bank 0 bank 0 # Strings 48 %font "Strings - 1st Violins Sustain.sf2" 0 0 amp=100 rate=::100 49 %font "Strings - 2nd Violins Sustain.sf2" 0 0 amp=100 rate=::100 # Violin 40 %font "atomic.sf2" 0 40 amp=90 rate=::100 # Viola 41 %font "Strings - Violas Sustain.sf2" 0 0 amp=100 rate=::100 # Cello 42 %font "Strings - Celli Sustain.sf2" 0 0 amp=100 rate=::100 # Bass 43 %font "Strings - Basses Sustain.sf2" 0 0 amp=100 rate=::100 # Clarinet 71 %font "Woodwinds - Clarinets Sustain.sf2" 0 0 amp=100 # Trumpet 56 %font "Brass - Trumpets Sustain.sf2" 0 0 amp=100 rate=::100 # Trombone 57 %font "Brass - Trombones Sustain.sf2" 0 0 amp=100 rate=::100 # Piccoro 72 %font "Woodwinds - Piccolo Solo.sf2" 0 0 amp=100 tune=-12 # Horn 60 %font "Brass - Horns Sustain.sf2" 0 0 amp=100 rate=::100 drumset 0 # sd roll 25 %font "Percussion - All Percussion.sf2" 128 0 39 amp=120 # bd 36 %font "Percussion - All Percussion.sf2" 128 0 36 amp=170 # sd 38 %font "Percussion - All Percussion.sf2" 128 0 40 amp=170 #extension altassign 42 44 46