Last active
August 29, 2015 14:24
-
-
Save ttsuki/aa037b045b31cc772024 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// テキスト音楽「サクラ」 http://oto.chu.jp/ // dSakura.dll Version.2.374 | |
//------------------------------------------------------------------------------ | |
//_楽曲情報 | |
//------------------------------------------------------------------------------ | |
TrackName = {"Another Wing - Deep White - (MU2000EX+PLG150PF)"} | |
Copyright = {"つーさ http://tu3.jp/"} | |
MetaText = {"一つずつ積み上げ、昇っていく。高く高く。ただ一つの目的を果たすため。"} | |
// 高みに至るため自らを奮い立たせる、自己との問答と戦いの歌。 | |
// #105 Wing の姉妹曲として、ある程度音源設定を共有しつつ制作。 | |
Tempo = 156 | |
TimeSignature = 4,4 | |
KeyFlag+(f) | |
Int GSMode = off; // GS音源用にドラムを調整するか? | |
Int LasMae = off; // LasMae スイッチ | |
TimeBase = 480 | |
System.MeasureShift(3) | |
//------------------------------------------------------------------------------ | |
//_System Functions | |
//------------------------------------------------------------------------------ | |
Function XGXcl1(Int Address, Int _val) { SysEx = $F0, $43,$10,$4C, (Address / 65536 & $7F), (Address / 256 & $7F), (Address & $7F), (_val & $7F), $F7; } | |
Function XGXcl2(Int Address, Int _val) { SysEx = $F0, $43,$10,$4C, (Address / 65536 & $7F), (Address / 256 & $7F), (Address & $7F), (_val / 256 & $7F), (_val & $7F), $F7; } | |
Function XGXclV(Int Address, Int _val) { XGXcl2(Address, _val / 128 * 256 + _val % 128); } | |
Function MasterVolume(Int _val) { SysEx = $F0,$7F,$7F,$04,$01,$00, _val,$F7; } | |
Function MasterVolumeFadeOut(Int Len) { For (Int I = 0; I < 127; I++) { S{ r%(Len*(128-I)/128); MasterVolume(I); } } } | |
Function MUXcl1(Int Address, Int _val) { SysEx = $F0, $43,$10,$49, (Address / 65536 & $7F), (Address / 256 & $7F), (Address & $7F), (_val & $7F), $F7; } | |
Function TrackParam(_ch, _tune, _pgm,_pgl,_pgc,_gspgc, _vol=100, _pan=0, _rev=40,_cho=0,_var=0, _lpf=0, _rsn=0, _eqbf=$0C, _eqbg=0, _eqtf=$36, _eqtg=0) | |
{ | |
CH = _ch; | |
If (_gspgc > 0) { @_gspgc; MainVolume(_vol); } Else { MainVolume(0); } r%1 // for GS | |
XGXcl1($080001 | (_ch - 1) *256, _pgm); r%1 | |
XGXcl1($080002 | (_ch - 1) *256, _pgl); r%1 | |
XGXcl1($080003 | (_ch - 1) *256, _pgc - 1); r%1 | |
XGXcl1($08000B | (_ch - 1) *256, _vol); r%1 | |
r%1 Panpot(64+_pan) r%1 | |
Reverb(_rev) r%1 Chorus(_cho) r%1 VAR(_var) r%1 | |
FilterCutoff(_lpf+64); r%1 FilterResonance(_rsn+64); r%1 | |
NRPN(1,$34,_eqbf) r%1 // EQ Bass Freq | |
NRPN(1,$30,_eqbg+64) r%1 // EQ Bass Gain | |
NRPN(1,$35,_eqtf) r%1 // EQ Treble Freq | |
NRPN(1,$31,_eqtg+64) r%1 // EQ Treble Gain | |
CoarseTune(_tune+64); r%1 | |
} | |
Function DrumParam(Int _n, Int _pco, Int _pft, Int _vol, Int _pan, Int _rev, Int _cho, Int _var, | |
Int _lpf, Int _rsn, Int _hpf, Int _atk, Int _dc1, Int _dc2, Int _bfr, Int _bga, Int _tfr, Int _tga) | |
{ | |
NRPN($18,_n,_pco) NRPN($19,_n,_pft) NRPN($1A,_n,_vol) NRPN($1C,_n,_pan) | |
NRPN($1D,_n,_rev) NRPN($1E,_n,_cho) NRPN($1F,_n,_var) | |
NRPN($14,_n,_lpf) NRPN($15,_n,_rsn) NRPN($24,_n,_hpf) NRPN($16,_n,_atk) NRPN($17,_n,_dc1) | |
NRPN($34,_n,_bfr) NRPN($30,_n,_bga) NRPN($35,_n,_tfr) NRPN($31,_n,_tga) | |
} | |
//------------------------------------------------------------------------------ | |
//_Phrase | |
//------------------------------------------------------------------------------ | |
Str MLAa = { l2 red<b>cgfd } | |
Str MLAaa = { l2 red<b>cbaf } | |
Str MLAab = { l2 rgfd egfd } | |
Str MLAb = { l2 ebaf gefd } | |
Str MLAbb = { l2 egfd eg>d<b } | |
Str MLAbp = { l2 v_(-20) S{MLAbb} v_(0) MLAb } | |
Str SBSAa = { q 100 l1 a^^^ } | |
Str SBSAfp = { q100 l1 f^^^ } | |
Str SBSAf = { q100 l1 f-^^^ } | |
Str SBSAg = { q100 l1 g^^^ } | |
Str SBSAe = { q100 l1 e^^^ } | |
Str ABSAa = { y(74).T(32,96,480*16) [4 l16 aa>a<r a>a<ra >a<ra>a< ra>a<r] } | |
Str PNOAa = { l16 [14<a>eae] <a>e`cebe`ce } | |
Str PNOAa2 = { l16 [14<a>eae] <a>e`ee`debe } | |
Str PNOAf = { l16 [14<f->eae] <f->e`cebe`ce } | |
Str PNOAfp = { l16 [14<f>eae] <f>e`ee`debe } | |
Str PNOAg = { l16 [14<g>eae] <g>e`cebe`ce } | |
Str PNOAe = { l16 [14<e>eae] <e>e`ee`debe } | |
Str PNOBa = { q8 l1 [4 'a>ce<'] } | |
Str PNOBf = { q8 l1 [4 'f-a>ce<'] } | |
Str PNOBfp = { q8 l1 [4 'fa>c+e<'] } | |
Str PNOBg = { q8 l1 [4 'gb>d<'] } | |
Str PNOBe = { q8 l1 [4 'egb>d<'] } | |
Str CHDAa = { l1 q98 [2 'a>ceg<' | 'ab>df<' ] } | |
Str CHDAaa = { l1 q98 [4 'a>ceg<'] } | |
Str CHDAf = { l1 q98 [4 'f-a>ce<' ] } | |
Str CHDAfp = { l1 q98 [4 'fa>c+e<' ] } | |
Str CHDAg = { l1 q98 [4 'gb>d<' ] } | |
Str CHDAe = { l1 q98 [4 'egb>d<' ] } | |
Str OBRAa = { l16 [2 arar gara rrar grar | arar gara rrgr argr ] } | |
Str OBRBa = { l1 q99 'a>c<' | 'b>d<' | '>ce<' | '>df<' | '>eg<' | '>fa<' | '>gb<' | '>a`d<' } | |
Str LEADa = { [4 l16 v_.onNote(-12,99,99,-4,99,99,-4,99,99,99,-8,99,-4,99,-4,99) arre rrdr rrgrerdr ] } // tettette tetete | |
Str LEADf = { y(11).onTime(0,127,1920*5) } | |
//_Phrase Drum | |
If (GSMode) { $_{r} $b{n36,} $s{n38,} $h{n42,} $m{n46,,,86,} $t{n54,} $H{n47,} $M{n43,} $L{n41,} } | |
Else { $_{r} $b{n36,} $s{n40,} $h{n42,} $m{n46,,,86,} $t{n54,} $H{n47,} $M{n43,} $L{n41,} } | |
Str DRKi = { l1 Rythm { {b} [2r] {r-8b8b} [2r] {r-8b8 b1 b1} [2r] {r-8b8 b2b2b4b4b8b8[4b16]} [2r] } } | |
Str DRSf = { l16 v.onNote(100,80,80, 90,90, 80,80,80) r-2 Rythm{s32s32sss s8ss } v100 } | |
Str DRS1 = { l16 Rythm{____s_______s___ ____s_______s___ ____s_______s___ ____s_______s___} } | |
Str DRS2 = { l16 Rythm{____s_______s___ ____s_______s___ ____s_______s___ ____s_______s___} } | |
Str DRB1 = { l16 Rythm{b___b___b___b___ b___b___b___b___ b___b___b___b___ b___b___b___b___} } | |
Str DRD1 = { l16 Rythm{H__L__L_H__LL_M_ H__L__L_HM_LL_M_ H__L__L_HM_LL_M_ H__L__L_HM_LL_M_} } | |
Str DRH1 = { l16 Rythm{h_hh__mh_hmh__m_ h_hh__mh_hmh_m_m h_hh__mh_hmh_m_m h_hh__mh_hmh_m_m} } | |
Str DRT1 = { l16 v.onCycle(120, 51,41,36,45) Rythm{ {[16tttt]} } v100} | |
Str RvCm = { r-%1000 q100 c%1000 } | |
Str RvCmD = { n(ChineseCymbal), } | |
Array Rnd; For (Int I = 0; I < 1024; I++) { Rnd(I) = Random(12,18); } | |
Function Zg(Int Len) { | |
q100 r%2 | |
Len = Len * 4; | |
Int Len2 = 0; | |
Int J = 0; | |
For (Int I = 0; I < Len; I += Len2) { Len2 = Rnd(J); J++; If (I + Len2 > Len) { Len2 = Len - I; } S { r%(!4*I) c%(!4*Len2) } } | |
For (Int I = 4; I < Len; I += Len2) { Len2 = Rnd(J); J++; If (I + Len2 > Len) { Len2 = Len - I; } S { r%(!4*I) e%(!4*Len2) } } | |
For (Int I = 9; I < Len; I += Len2) { Len2 = Rnd(J); J++; If (I + Len2 > Len) { Len2 = Len - I; } S { r%(!4*I) g%(!4*Len2) } } | |
} | |
//------------------------------------------------------------------------------ | |
//_Sequence | |
//------------------------------------------------------------------------------ | |
Track(0); | |
Str ______ = {} | |
Str _TM4__ = {[4r1]} | |
Str _FaOut = { S{r2 MasterVolumeFadeOut(1920*8);} } | |
Str _INIT_ = { t.onCycle(!16,0,15); } | |
If (LasMae^1) { | |
//_Sequence 0 | |
TIME(0:1:0); | |
PLAY(______ ,{CH=16},{CH=10},{CH=10},{CH= 9},{CH=10},{CH=10},{CH=10},{CH= 1},{CH= 1},{CH= 8},{CH=11},{CH= 3},{CH= 2},{CH= 6},{CH= 4},{CH= 4},{CH= 5},{CH= 5},{CH= 7},{CH=15}); | |
PLAY(______ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ,_INIT_ ); | |
PLAY(______ ,v127 , ,v106 ,v110 , ,v95 , ,v120 ,v127 ,v110 ,v94 ,v100 ,v118 , , , ,v90 ,v90 ,v100 , ); | |
PLAY(______ ,o4 , , , , , , ,o6 ,o7 ,o2 ,o3 ,o4 ,o6 ,o5 ,o2 ,o3 ,o5 ,o4 ,o3 ,o4 ); | |
//_Sequence I | |
//TIME(0:1:0) | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , ,DRKi , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , , , , , ); | |
PLAY(_TM4__ , , , , , , , ,MLAa ,MLAa ,ABSAa , ,PNOAa , , ,SBSAa ,SBSAa , , , , ); | |
PLAY(_TM4__ , , , , , , , ,MLAb ,MLAb ,ABSAa , ,PNOAa2 , , ,SBSAa ,SBSAa , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , , , , ,{Zg=8}) | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , ,LEADf , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , , , ,OBRBa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , , , ,MLAa ,MLAa ,ABSAa , ,PNOAa ,LEADa , ,SBSAa ,SBSAa , ,CHDAa , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , , , ,MLAb ,MLAb ,ABSAa , ,PNOAa2 ,LEADa , ,SBSAa ,SBSAa , ,CHDAa , , ); | |
//_Sequence A | |
//TIME(16:1:0) | |
PLAY(______ , , , , , , , , , , , , , , , , , , , ,{Zg=15}); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , ,DRSf , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , , ,OBRBa , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 , ,MLAa ,MLAa ,ABSAa ,OBRAa ,PNOAa ,LEADa , ,SBSAa ,SBSAa , , ,CHDAa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 , ,MLAb ,MLAb ,ABSAa ,OBRAa ,PNOAa2 ,LEADa , ,SBSAa ,SBSAa , , ,CHDAa , ); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , ,OBRBa , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 ,DRT1 ,MLAa ,MLAa ,ABSAa ,OBRAa ,PNOAa ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 ,DRT1 ,MLAb ,MLAb ,ABSAa ,OBRAa ,PNOAa2 ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
//_Sequence B | |
//TIME(32:1:0) | |
PLAY(______ , , , , , , , , , , , , , , , , , , , ,{Zg=32}); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAa ,MLAa ,ABSAa , ,PNOAf ,LEADa ,OBRAa ,SBSAf ,SBSAf , ,CHDAf ,CHDAf , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAaa ,MLAaa ,ABSAa , ,PNOAfp ,LEADa ,OBRAa ,SBSAfp ,SBSAfp , ,CHDAfp ,CHDAfp , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAa ,MLAa ,ABSAa , ,PNOAg ,LEADa ,OBRAa ,SBSAg ,SBSAg , ,CHDAg ,CHDAg , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAbb ,MLAb ,ABSAa , ,PNOAe ,LEADa ,OBRAa ,SBSAe ,SBSAe , ,CHDAe ,CHDAe , ); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAa ,MLAa ,ABSAa , ,PNOAf ,LEADa ,OBRAa ,SBSAf ,SBSAf , ,CHDAf ,CHDAf , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAaa ,MLAaa ,ABSAa , ,PNOAg ,LEADa ,OBRAa ,SBSAg ,SBSAg , ,CHDAg ,CHDAg , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAab ,MLAa ,ABSAa , ,PNOAa ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAaa ,CHDAaa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 , ,DRT1 ,MLAb ,MLAbp ,ABSAa , ,PNOAa2 ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAaa ,CHDAaa , ); | |
//_Sequence C | |
//TIME(64:1:0) | |
PLAY(______ , , , , , , , , , , , , , , , , , , , ,{Zg=15}); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , ,LEADf , , , , , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , , , , , ,ABSAa , ,PNOAa ,LEADa ,OBRAa ,SBSAa ,SBSAa , , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , , , , , ,ABSAa , ,PNOAa2 ,LEADa ,OBRAa ,SBSAa ,SBSAa , , , , ); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , ,DRH1 , , , ,ABSAa , ,PNOAa ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 , ,DRH1 , , , ,ABSAa , ,PNOAa2 ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
//_Sequence A2 | |
//TIME(80:1:0); | |
PLAY(______ , , , , , , , , , , , , , , , , , , , ,{Zg=15}); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , ,DRSf , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , , ,OBRBa , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 , ,MLAa ,MLAa ,ABSAa ,OBRAa ,PNOAa ,LEADa , ,SBSAa ,SBSAa , , ,CHDAa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 , ,MLAb ,MLAb ,ABSAa ,OBRAa ,PNOAa2 ,LEADa , ,SBSAa ,SBSAa , , ,CHDAa , ); | |
PLAY(_FaOut , , , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ ,RvCm ,RvCmD , , , , , , , , , , , , , , , , , , ); | |
PLAY(______ , , , , , , , , , , , , , , , , ,OBRBa , , , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 ,DRT1 ,MLAa ,MLAa ,ABSAa ,OBRAa ,PNOAa ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
PLAY(_TM4__ , , ,DRB1 ,DRD1 ,DRS1 ,DRH1 ,DRT1 ,MLAb ,MLAb ,ABSAa ,OBRAa ,PNOAa2 ,LEADa ,OBRAa ,SBSAa ,SBSAa , ,CHDAa ,CHDAa , ); | |
} Else { // LasMae | |
//_Sequence LasMae | |
Tempo = 140 | |
TIME(-1:4:0); | |
PLAY(______ ,{CH=13},{CH=12},{CH=12},{CH= 1},{CH=4},{CH=12} ); | |
PLAY(______ ,v110 ,v120 ,v110 ,v60 , , ); | |
PLAY(______ ,o6 ,o6 ,o5 ,o5 ,o2 ,o4 ); | |
PLAY(______ , ,q100 ,q100 ,t!8. , , ); | |
PLAY(______ , , , ,{@6} , , ); | |
TIME(0:1:0); | |
//I | |
//TIME(0:1:0) | |
PLAY(_TM4__ ,MLAa ,MLAa , ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAb ,MLAb , ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAb ,MLAb ,MLAb ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBf ,SBSAf ,SBSAf ); | |
PLAY(_TM4__ ,MLAaa ,MLAaa ,MLAaa ,PNOBfp ,SBSAfp ,SBSAfp ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBg ,SBSAg ,SBSAg ); | |
PLAY(_TM4__ ,MLAb ,MLAb ,MLAbb ,PNOBe ,SBSAe ,SBSAe ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAb ,MLAb ,MLAb ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_FaOut , , , , , , ); | |
PLAY(_TM4__ ,MLAb ,MLAb ,MLAb ,PNOBa ,SBSAa ,SBSAa ); | |
PLAY(_TM4__ ,MLAa ,MLAa ,MLAa ,PNOBf ,SBSAf ,SBSAf ); | |
} | |
//------------------------------------------------------------------------------ | |
//_XG Parameters | |
//------------------------------------------------------------------------------ | |
Track 0; TIME(-2:1:0); TrackSync; | |
ResetGM; | |
ResetXG; r4 | |
MUXcl1($000003, 0); ResetGS; MUXcl1($000003, 1); // GS RESET (MSGS) | |
//_EffectParameters | |
TIME(-2:2:0); | |
CuePoint={"TwmParam(127,117,0,127)"} // リバーブらしい | |
CuePoint={"TwmChorus(1,64,20,80,20,114,3)"} // コーラスらしい | |
r%5 XGXcl1($000004, 127) | |
r%5 XGXcl1($000005, $10); // MasterAttn | |
r%5 XGXcl2($020100, $0300); // RevType = STAGE1 | |
r%5 XGXcl1($020102, $19); // Rev | |
r%5 XGXcl1($02010C, $50); // RevRet = 80 | |
r%5 XGXcl2($020120, $5700); // ChoType = ENS_DETUNE | |
r%5 XGXcl1($02012E, $20); // Cho->Rev = 32 | |
r%5 XGXcl2($020140, $0500); // VarType = DelayLCR | |
r%5 XGXcl1($02015A, $01); // VarConnect = System | |
r%5 XGXcl1($020158, $32); // Var->Rev = 50 | |
r%5 XGXcl1($020159, $14); // Var->Cho = 20 | |
r%5 XGXclV($020142, 600000 / Tempo / 4 * 4); // Delay Lch | |
r%5 XGXclV($020144, 600000 / Tempo / 4 * 2); // Delay Rch | |
r%5 XGXclV($020146, 600000 / Tempo / 4 * 6); // Delay Cch | |
r%5 XGXcl2($02014A, $66); // VarFeedback= +38 | |
r%5 XGXcl2($030000, $4D00); // 2-Band Eq | |
r%5 XGXcl1($030002, $0D); // LoFreq = 90Hz | |
r%5 XGXcl1($030003, $49); // LoGain = +9dB | |
r%5 XGXcl1($030004, $2E); // HiGain = 4kHz | |
r%5 XGXcl1($030005, $44); // HiGain = +4dB | |
r%5 XGXcl1($03000C, $09); // Part = 10 | |
r%5 XGXcl2($030100, $4D00); // 2-Band Eq | |
r%5 XGXcl1($030102, $1E); // LoFreq = 630Hz | |
r%5 XGXcl1($030103, $44); // LoGain = +4dB | |
r%5 XGXcl1($030104, $20); // HiGain = 800Hz | |
r%5 XGXcl1($030105, $47); // HiGain = +7dB | |
r%5 XGXcl1($03010C, $00); // Part = 1 | |
r%5 XGXcl2($030300, $4B08); // STEREO AMP | |
r%5 XGXcl1($030302, $10); // Drive = 16 | |
r%5 XGXcl1($03030C, $0A); // Part = 11 | |
//------------------------------------------------------------------------------ | |
//_TrackParameter | |
//------------------------------------------------------------------------------ | |
TIME(-1:1:0); | |
SysEx$=F0,41,10,42,12,{40,19,15,02},F7; // GS DRUM Part = 9 | |
Int CTune = 2; Int DTune = -1; | |
//ackParam(CH, Corse, MSB,LSB,PG#,PG#, VOL,PAN, REV,CHO,VAR, LPF,RSN,BFq,BGa,TFq,TGa | |
TrackParam(1, CTune, 32, 0, 1, 1, 127,-03, 110, 10, 90, +21,+08); | |
TrackParam(2, CTune, 0, 73, 82, 82, 110,+08, 90, 80, 90, +25,+08 ,,,$27,+34); | |
TrackParam(3, CTune, 0, 66, 1, 1, 107,-17, 50, 50, 20, +10, 0); | |
TrackParam(4, CTune, 0, 35, 49, 49, 109,-04, 10, 32, 0, 0, 0 ,$0C,+58); | |
TrackParam(5, CTune, 0, 65, 90, 90, 82,+47, 80, 20, 0, -02,+03); | |
TrackParam(6, CTune, 0, 14, 99, 12, 102,-09, 80, 20, 0, +17,+11); | |
TrackParam(7, CTune, 0, 65, 90, 90, 73,-35, 80, 20, 40, -02, 0 ,$10,+37); | |
TrackParam(8, CTune, 0, 24, 39, 39, 126,-07, 10, 20, 30, +05,+32); | |
TrackParam(9, DTune, 127, 0, 58, 1, 108, 0, 20, 40, 0, 0, 0); | |
TrackParam(10, DTune, 127, 0, 31, 17, 122, 0, 30, 22, 0, 0, 0); | |
TrackParam(11, CTune, 0, 70, 31, 31, 100, 0, 20, 0, 0, 0, 0); | |
TrackParam(12, CTune, 0, 76, 49, 49, 100, 0, 60, 20, 20, -20, 0); | |
TrackParam(13, CTune, 0, 0, 47, 47, 120,+08, 40, 0, 0, -04, 0); | |
TrackParam(14, CTune, 0, 0, 1, 1, 100, 0, 40, 0, 0, 0, 0); | |
TrackParam(15, 0, 48, 88, 2, 0, 110, 0, 70, 20, 50, 0, 0); | |
TrackParam(16, 0, 0, 0,120,120, 127, 0, 127, 80, 0, 0, 0); | |
//------------------------------------------------------------------------------ | |
//_DrumParameter | |
//------------------------------------------------------------------------------ | |
TIME(-1:3:0); | |
CH=10; | |
DrumParam(54,64,105,95,64,63,63,127,119,82,87,64,64,64,12,64,47,73); | |
DrumParam(46,64,64,112,77,32,32,127,58,64,64,64,64,64,12,64,54,64); | |
DrumParam(42,64,64,108,77,32,32,127,58,64,64,64,64,64,12,64,54,64); | |
DrumParam(40,64,81,127,64,127,127,127,78,78,64,64,64,64,12,64,40,77); | |
DrumParam(36,63,64,116,63,0,0,0,53,51,64,32,64,64,15,76,54,64); | |
CH=9; | |
DrumParam(47,64,64,111,72,127,127,127,64,64,64,64,64,64,16,70,38,85); | |
DrumParam(43,64,64,111,54,127,127,127,64,64,64,64,64,64,16,72,38,85); | |
DrumParam(41,64,64,108,40,127,127,127,64,64,64,64,64,64,16,93,36,99); | |
// CANTUS BELLAX!! |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment