サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント (( へへ(へへ ; ´・ω・` )へへ < 去年の10〜11月頃のデータです。 覚えてる人いるかな・・・ 曲データ(サクラから貼り付けます。) /* 曲名 旧掲示板への投稿日時 ID ■ATTACK THE ENEMY 2004/11/01 20:40:27 4695 自分の中では曲掲示板ver4最後の受け作です。かなり久しぶりにヒットした感じでした。 場所によって是非が分かれましたが、MSGSの限界に挑戦する意味では新しい路線です。 再来週には、約1年ぶりにこの路線を復活させるつもりです。 曲名 旧掲示板への投稿日時 ID ■FANTASIA 2004/10/18 18:16:58 4600 この曲付近から再浮上して、ATTACK THE ENEMYで爆発しました。 やっぱりこの時期は年末に向かってどんどん復調してたんだと思います。 その後は再び調子崩していくわけですが、何気にこのデータで得た効果音技術・パーカスは後にもずっと使ってます。 リバースシンバルを限界まで伸ばす手法は大発見でした。 */ INT PLAY_SONG = 0 ;// 0でATTACK THE ENEMY、その他の数字を入れるとFANTASIAを演奏します。 If(PLAY_SONG==0){ INT TEMPO_EST=158STR MODE1=GS;PlayFrom.SysEx(on)PlayFrom.CtrlChg(on)PlayFrom.RPN_NRPN(on) TrackName={ATTACK THE ENEMY}Copyright={H゛}System.MeasureShift(3)Tempo=1000Include(delay.h)ResetGS; Function Autoexec(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(0)CH=X2;@(X3,XA,XB)Key=X4;P=X5;CHO=X6;REV=X7;v=(X8)q=(X9)M=(XC)} Function DL(ti){Time(ti:1:0)}STR INS={InstrumentName}Function PAN(ER1,ER2){If(ER2==0){P.T(000,127,ER1)}If(ER2==1){P.T(127,000,ER1)}} Function Review(STR OIN,Revalue,ReNo){STR REPO="r"+Revalue;Sub{[(ReNo);OIN;REPO]}} Function GSRY(_D){INT _TCH=Channel;INT _CH;If(_TCH==10){_CH=$00;}Else{If(_TCH<10){_CH=_TCH;}Else{_CH=_TCH-1}} _CH=$10+_CH;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7;} Function HAM(STR SA){Sub{Key=12SA;Key=0}SA}Function HAM2(STR SA){Sub{Key=-12SA;Key=0}SA}Function HAM3(STR SA){Sub{Key=-12SA;Key=0}Sub{Key=12SA;Key=0}SA}Function HAM4(STR SA){If(MODE1==TWM){SUB{Key=12SA;Key=0}}Sub{Key=24SA;Key=0}SA} STR LC={"cceg`c}STR LD={"ddf#a`d}STR LDS={"d#d#ga#`d#}STR LE={"eegb`e}STR LF={"ffa`c`f}STR LG={"gga#`d`g}STR LA={"aa`c#`e`a}STR LAS={"a#a#`d`f`a#}STR LB={"bb`f#`b} STR WC={r'LC'}STR WD={r'LD'}STR WDS={r'LDS'}STR WE={r'LE'}STR WF={r'LF'}STR WG={r'LG'}STR WA={r'LA'}STR WAS={r'LAS'}STR WB={r'LB'} //------( TR , CH , @ , @2 , @3 , Key, P , CHO, REV, v , VAR, M )INS={InstrumentName} Autoexec( 001, 001, 024, 000, 000, 000, 064, 050, 020, 127, 095, 000)INS={"MAIN"}If(MODE1==VSC){V=110@71}If(MODE1==TWM){V=120CHO=80} Autoexec( 002, 002, 081, 000, 000, 000, 064, 050, 020, 100, 093, 110)INS={"SYNTH"} Autoexec( 003, 003, 022, 000, 000, 000, 000, 050, 020, 100, 100, 110)INS={"SYNTH"} Autoexec( 004, 004, 081, 000, 000, 000, 127, 050, 020, 100, 100, 110)INS={"SYNTH"} Autoexec( 005, 005, 039, 001, 000, 000, 060, 000, 000, 120, 090, 010)INS={"BASS"}If(MODE1==TWM){v=127}If(MODE1==VSC){v=127@39,14} Autoexec( 006, 006, 031, 000, 000, 000, 032, 040, 030, 080, 103, 020)INS={"CHORD"}If(MODE1==VSC){y71=127y74=127@31,16}If(MODE1==TWM){@31,90} Autoexec( 007, 007, 006, 000, 000, 000, 086, 040, 030, 120, 110, 040)INS={"HIGH"}If(MODE1==TWM){V=110CHO=60@8} Autoexec( 008, 008, 024, 000, 000, 000, 010, 060, 030, 100, 090, 000)INS={"ULA_MERO"} Autoexec( 009, 009, 024, 000, 000, 000, 117, 060, 030, 100, 090, 000)INS={"URA_MERO"} Autoexec( 010, 010, 025, 000, 000, 000, 064, 030, 020, 127, 100, )INS={"KICK"}If(MODE1==VSC){V=127@31}If(MODE1==TWM){@27,7}DL(-2)GSRY(1)r8 Autoexec( 011, 011, 025, 000, 000, 000, 064, 030, 000, 127, 090, )INS={"HI_HAT"}If(MODE1==VSC){V=110@12}If(MODE1==TWM){@1,100}DL(-2)GSRY(2)r8 Autoexec( 012, 012, 026, 000, 000, 000, 064, 030, 000, 127, 090, )INS={"CYMBAL"}DL(-2)If(MODE1==VSC){GSRY(3)}Else{GSRY(1)}r8 Autoexec( 013, 013, 119, 009, 000, 000, ___, 020, 000, 127, 090, )INS={"TAM"} Autoexec( 014, 014, 081, 008, 000, 000, ___, 040, 030, 080, 060, )INS={"SYNTH"}If(MODE1==TWM){>@82,1V=110} Autoexec( 015, 015, 003, 000, 000, 000, 096, 030, 050, 110, 100, )INS={"BGM"} Autoexec( 016, 016, 091, 000, 000, 000, 084, 050, 050, 127, 100, )INS={"BGSOUND"} //------( TR , CH , @ , Key, P , P2 , P3 , CHO, REV, v , VAR, M )INS={InstrumentName} //-------------------------------------------------------------------------------------------------------------------------------------------------------------------// DL=0Tempo=TEMPO_EST;INT HAZ=2INT BGN=11INT ME1=19INT ME2=27INT SB1=35INT RF1=45INT ME3=53INT ME4=61INT SB2=69INT NK1=79 INT RF2=87INT ME5=95INT ME6=103INT SB3=111INT END=129 //------------------------------------------------------------------------------TR=001;------------------------------------------------------------------------------// STR SM1={`c^ra^r[`c^b^a^g^a^^re^ar`crb^a^g^a^^rf^arbr`c^`d^b^`c^:l8b^ggreb^l16rr`c^ar]l8br`cb^^rrl16}STR SM2={[`c^argra^^^b^`c^`d^b^brgrb^^^b^`crbr:a^argr`c^^^a^g^e^a^ar`dr`g^^^`e^^^rr]a^argra^^^grgrarb^rr`c^`d^^^rrrrrr} STR SM3={[[`e^`er`cr`d^^^`e^^re^]`g^^^`f^`e^^^`er`dr`cr`d^`d^`c^`e^^^:`dr`cr`dr]`drbrgrl8a^^^^^^^l16}STR SM4={[MidiDelay({`c^ra^r`c^b^a^g^a^^r},4,!1)[46r]]}STR SM5={[MidiDelay({`e^`er`cr`d^^^`e^^rrr},4,!1)[48r]]} TR=1l16>DL=ME1;EP.W(127,110,!1)SM1;SM2;HAM2({SM3})DL=ME3;SM1;SM2;HAM2({SM3})DL=ME5;SM4;SM2;DL=SB3;HAM2({SM5;SM3}) //------------------------------------------------------------------------------TR=002&003&004;----------------------------------------------------------------------// STR RTH={@81,0If(CH==3){@22,0}If(CH==4){@88,0}}STR RTI={@63,0If(CH==3){@82,0}If(CH==4){@83,0}}STR RTJ={@82,0If(CH==3){@63,0}If(CH==4){@64,0}}STR RT0={EP=127HAM4({RTH;aaaaggggf#f#f#f#ffffeere`e^e^rrer`e^er})}STR RTA={EP=127HAM4({RTH;aaaaggggf#f#f#f#ffffeere`e^e^rrrrrrgrBR=24p.T(64,64,!8,64,0,!8)a^^^rrrrrrrr})} STR RTZ={q=100RTI[EP=80HAM4({aagra^b`c^`cbb`cb`d`e}):EP=120"a^c"ac"aca^^`c`cbrar]EP=120a^"a^`c^"a^`aa`ga`ea`caEP=80HAM4({aagra^b`c^`cbb`cb`d`e})EP=120"a^c"ac"aca^^`c`cbrarRTJ;EP=80HAM4({SUB{[e^reerer]}[a^raarar]`a`e`cbaec"bSUB{eeree^^^}"a"ar"a`a^^^})} STR RT1={EP=127q=80RTH;HAM4({[aagra^b`c^`cbb`cb`d`e;RTI[4"a]"g^"a"ar"g"g^"a^"e^:RTH;aagra^b`c^`cbb`cb`d`el32RTJ`aa`ee`ccb"b<`aa`ee`ccb"b>l16"aar"a"a#^"b^RTH]RTH;aaaaggggf#f#f#f#ffffeere`e^e^rrer`e^er})} STR RT2={EP=100RTH[48r]HAM4({l16bbaaggee"brl4b^})l16RTI[46r]HAM4({eere`e^e^rrer`e^er})}STR RT3={EP=100l16RTJ[48r]HAM4({`e`d`cagedcMidiDelay({"a"g"e"d},1,!4)})} STR RT4={EP=100RTI[58r]HAM4({SUB{eeerer}aaarar[64r]EP=90RTJ;SUB{[e^reerer]}[a^raarar]`a`e`cbaec"bSUB{eeree^^^}"a"ar"a`a^^^})}STR RT5={EP=100RTI[58r]HAM4({SUB{eeerer}aaarar[64r]})} STR RRF={l16If(MODE1==VSC){v=105}If(MODE1==TWM){CHO=120}DL=HAZ-2RT0;RTZ;DL=BGN;RT1;RT2;RT3;DL=SB1;RT4;DL=RF1;RT1;RT2;RT3;DL=SB2;RT4;DL=NK1;RTZ;RT1;DL=ME6;RT3;DL=SB3;RT5;RT4;DL=END;RT1;V=127RTZ;V=100RTA;}TR=2RRF;TR=3p%=200RRF;TR=4p%=-200RRF; //------------------------------------------------------------------------------TR=005;------------------------------------------------------------------------------// STR BSH={If(MODE1==VSC){@39,1}V=127"a^^^c^^^d^^^e^^^V=100If(MODE1==TWM){V=110}If(MODE1==VSC){V=102@39,14}}STR BSA={If(MODE1==VSC){@39,1}V=127"a^^^c^^^d^^^rrrea^If(MODE1==TWM){V=110}If(MODE1==VSC){@39,14V=102}}STR BSI={[[4"aa]:[c`c][d`d]][c`c]"gg"g#g#;[4"aa][c`c][d`d]["aa][c`c][d`d][e`e]}STR BS1={[3"aac`cd`de`e]["ff]["gg]["aac`cd`de`e]["aa][c`c][d`d][e`e]} STR BS2={[[4"aa][4"gg][4"f#f#]:frrfrfg^]frrfrfe^}STR BS3={[3["aa][c`c][4"gg]][4"ff]["gg]rrrr}STR BS4={[4["aa]["ff][c`c]["gg]][4"aa]l16"arararaal8rrrr}STR BS5={[4["aa]["ff][c`c]["gg]]} TR=5l8<ULMR; //------------------------------------------------------------------------------TR=010;------------------------------------------------------------------------------// STR O1={'n27n32n33n35n36'}STR O2={'n27n32n33n35n36n40n59'}STR O3={'n27n32n33n35n36n49'}STR O4={'n27n32n33n35n36n28'}STR O5={'n27n32n33n35n36n51n59'}STR DM1={O1;rrr}STR DH1={[7DM1][2O1;r]} STR DM2={O1;rrrO2;rrr}STR DM3={O1;rrrO2;rrrO1;rrrO2;rrO2}STR DM4={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrrO2;rO1;r} STR DM5={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;O2;r[2O1]r[2O1]}STR DM6={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrr[2O2;r]} STR DM7={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrrO2;r[2O2]}STR DM8={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} STR DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}STR DM10={[4[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}STR DM11={[3O1;rrrO2;rrrO1;rrrO2;rrr][O2;r[O1]][O2;r][O2]rr} STR DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}STR DM13={[6DM2]O3[7r][n54rrr]}STR DM14={[7O1;rrr][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} STR DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}STR DM16={[3O1;rrrO2;rrrO1;rrrO2;rrr]rrr['n39n28'r:rr]O1;r[4O1]} STR DM17={[6DM2]O3[7r][O1;r]l32[8O1]l16}STR DM18={SUB{[32n42r]}[O1;rrrO4;rO1;rrrO4;rO1;O4;rO4:[O1;r]O4;rO1;rrrO1;rO4;r[O4]][O1;r]O4;r[O1;O4]O4;rO1;r[O4]}STR DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]}STR DM20={[O1;r]O4;r[O1;O4]O4;rO1;r[O4]} TR=10l16DL=HAZ-2SUB{n49[7r]n55[7r]n57[7r]n58[7r]}[4O1;rrrrrrr]DL=HAZ[3[7DM1][O1;r]]SUB{n49[7r]n55[7r]n57[7r]n58[7r]}[4O1;rrrrrrr]DL=BGN;BR=20p%=-2000DM6;DM8;DM13;DM17;DM6;DM9;DM6[4DM2]DM8;DM6;DM8; DL=ME3;DM13;DM17[3[7DM1][O1;r]]SUB{n49[7r]n55[7r]n57[7r]n58[7r]}[4O1;rrrrrrr]DL=SB2;DM6[4DM2]DM8;DL=NK1[3[7DM1][O1;r]]SUB{n49[7r]n55[7r]n57[7r]n58[7r]}[4O1;rrrrrrr]DM6;DM8; DL=ME5;DM13;DM17;DM6;DM9;DL=SB3;DM6;DM8;DM6[4DM2]DM8;DM6;DM8[3[7DM1][O1;r]]SUB{n49[7r]n55[7r]n57[7r]n58[7r]}[4O1;rrrrrrr]SUB{n49[7r]n55[7r]n57[7r]}[3O1;rrrrrrr][6r][O1;r] //------------------------------------------------------------------------------TR=011;------------------------------------------------------------------------------// STR GR={n42}STR GA={n44}STR GB={If(MODE1==VSC){'n46n51'}Else{If(MODE1==TWM){n46}Else{n51}}}STR TA={n54}STR MT={n51}STR DR={'n38n40n82n85'}STR PL1={P.onCycle(!8,32,90)If(MODE1==TWM){P.onCycle(!8,40,80)}}STR PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!8,30,80)}} STR GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}STR GP2={[3GR;rGB;r]GR;r[2GB]}STR GP3={[3[GR]GB;r][2GR][2GB]}STR GP4={[GR]GB;GR}STR GP5={[3GP4][GR][GB]}STR GP6={[GR][TA]}STR GP7={[GP6][GR]TA;GR;GP6}STR GP8={[3[GR]GB;GR][2GR][2GB]} TR=11l16DL=HAZ;BR=20p%=2000[4GP2][2GP3]DL=BGN[8GP8][[3GP3][16r]][7GP3]DL=SB1[9GP8][16r][8GP8]DL=ME3[[3GP3][16r]][4GP2][3GP3]DL=SB2[9GP8][16r]DL=NK1[4GP2][2GP3]DL=RF2[8GP8]DL=ME5[[3GP3][16r]][7GP3]DL=SB3[17GP8]DL=END[16GP8] //------------------------------------------------------------------------------TR=012;------------------------------------------------------------------------------// STR PD1={@26n27r[4DR]rr[3DR]l32[DR]l16[4DR]}STR PD2={@26EP.T(20,127,!1^1^1)[48DR]}STR PD3={SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]} STR PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}STR PD5={@26[3DR;r][5DR]r[4DR]}STR PD6={@26[4DR;r][3DR]r[4DR]} TR=12DL=HAZ;l16PD3;DL=BGN;PD3;DL=SB1;PD3;DL=SB1+9PD4;DL=RF1;PD3;DL=ME4;PD3;DL=ME4+7PD4;DL=SB2;DL=SB2+9PD4;PD3;DL=NK1[PD3]DL=SB3[PD3]DL=SB3+17PD4;DL=END[PD3] //------------------------------------------------------------------------------TR=013;------------------------------------------------------------------------------// STR PG1={P.onCycle(!8,0,22,106,127,106,22)}STR DS1={cccccrcrl32[16c]l16}STR DS2={p.T(127,0,!1)l32BR=20[32e]rp=64l16}STR DS3={[8r]ccrccrcr}STR DS4={[12r]l32[8c]l16}STR DS5={BR=40p.T(127,32,!1)l16[ccrc]l32[16c]l16p=64} TR=13l16V=127PG1;HAM2({DL=HAZ-1DS1;DL=BGN-1DS2;DL=BGN+3DS1;DL=BGN+7DS2;DL=ME1+3DS3;DL=ME2+3DS4;DL=ME2+7DS5;DL=SB1+3DS4;DL=SB1+9DS3;DL=RF1+3DS1;DL=RF1+7DS2;DL=ME3+3DS3;DL=ME4+3DS4;DL=ME4+7DS5;DL=SB2+3DS4;DL=SB2+9DS3; DL=RF2+3DS1;DL=RF2+7DS2;DL=ME5+3DS3;DL=ME6+3DS4;DL=ME6+7DS5;DL=SB3+3DS4;DL=SB3+7DS4;DL=SB3+11DS4;DL=SB3+17DS3;DL=END+3DS1;DL=END+7DS2}) //------------------------------------------------------------------------------TR=014;------------------------------------------------------------------------------// STR JOH={v=70[30"adea][8r]}STR JO1={v=90[30"adea][8r]}STR JO2={v=70[[12"adea][16r]]}STR JO3={v=80[30"adea][8r]}STR JO4={v=80[36"adea][16r]} TR=14DL=HAZ;l16P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)>DL=HAZ;JOH;DL=BGN[JO1;JO2:JO3;JO4]JOH;DL=RF2;JO1;JO2[JO3]JO4[JO1] //------------------------------------------------------------------------------TR=016;------------------------------------------------------------------------------// STR BG1={@123,3l4BR=40p.T(127,32,!1)'gfe'^^^rrrrp=64}STR BG2={PAN(!1,0)[BG1[8r]:PAN(!1,1)]P=64}STR BG3={@126,8BR=40P=96p.T(127,0,!1^1)'gfe'^^^^^^^p=64}STR BG4={@128,2l4rrrP.onCycle(!8,32,96)MidiDelay({'`cgc'},4,!8)} STR BG5={l4<@128,3P=70p.T(64,64,!4,70,127,!2)'a"a`a'^^r>p=64}STR BG6={@126,3HAM2({P=100e^P=20g^})}STR BG7={@80,0l4rrrBR=120p.T(127,0,!6)`gp=64}STR BG8={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64} TR=16DL=HAZ-2BG3;DL=HAZ;BG5;DL=HAZ+3BG4;DL=BGN-1BG5;DL=BGN;BG2;DL=BGN+6BG3;DL=ME1;BG5;DL=ME1+3BG4;DL=ME1+7BG7;DL=ME2+3BG4;DL=ME2+6BG3;DL=SB1+3BG6;DL=SB1+7BG4;DL=SB1+8BG8;DL=RF1;BG2;DL=RF1+6BG3; DL=ME3;BG5;DL=ME3+3BG4;DL=ME3+7BG7;DL=ME4+3BG4;DL=ME4+6BG3;DL=SB2+3BG6;DL=SB2+7BG4;DL=SB2+8BG8;DL=NK1;BG5;DL=NK1+3BG4;DL=RF2-2BG8;DL=RF2;BG2;DL=RF2+6BG3; DL=ME5;BG5;DL=ME5+3BG4;DL=ME5+7BG7;DL=ME6+3BG4;DL=ME6+6BG3;DL=SB3+3BG6;DL=SB3+7BG4;DL=SB3+11BG6;DL=SB3+15BG4;DL=SB3+16BG8;DL=END;BG2;DL=END+6BG3;DL=END+8BG2;DL=END+14BG3; }Else{ INT TEMPO_EST=150STR MODE1=GS;PlayFrom.SysEx(on)PlayFrom.CtrlChg(on)PlayFrom.RPN_NRPN(on) TrackName={FANTASIA}Copyright={H゛}System.MeasureShift(3)Tempo=1000Include(delay.h)ResetGS; Function Autoexec(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(0)CH=X2;@(X3,XA,XB)Key=X4;P=X5;CHO=X6;REV=X7;v=(X8)q=(X9)M=(XC)} Function DL(ti){Time(ti:1:0)}STR INS={InstrumentName}Function PAN(ER1,ER2){If(ER2==0){P.T(000,127,ER1)}If(ER2==1){P.T(127,000,ER1)}} Function Review(STR OIN,Revalue,ReNo){STR REPO="r"+Revalue;Sub{[(ReNo);OIN;REPO]}} Function GSRY(_D){INT _TCH=Channel;INT _CH;If(_TCH==10){_CH=$00;}Else{If(_TCH<10){_CH=_TCH;}Else{_CH=_TCH-1}} _CH=$10+_CH;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7;} Function HAM(STR SA){Sub{Key=12;SA;Key=0}SA}Function HAM2(STR SA){Sub{Key=-12;SA;Key=0}SA}Function HAM3(STR SA){Sub{Key=-12SA;Key=0}Sub{Key=12;SA;Key=0}SA} STR LC={"ccea`c}STR LD={"ddf#a`d}STR LD2={"ddfa`d}STR LDS={"d#d#ga#`d#}STR LE={"eegb`e}STR LF={"ffa`c`f}STR LG={"gga#`d`g}STR LA={"aa`c`e`a}STR LAS={"a#a#`d`f`a#}STR LB={"bb`f#`b} STR WC={r'LC'}STR WD={r'LD'}STR WDS={r'LDS'}STR WE={r'LE'}STR WF={r'LF'}STR WG={r'LG'}STR WA={r'LA'}STR WAS={r'LAS'}STR WB={r'LB'} //------( TR , CH , @ , @2 , @3 , Key, P , CHO, REV, v , VAR, M )INS={InstrumentName} Autoexec( 001, 001, 011, 000, 000, 000, 064, 060, 040, 127, 090, 000)INS={"MAIN"} Autoexec( 002, 002, 100, 000, 000, 000, 064, 060, 020, 110, 093, 000)INS={"BELL_SYNTH"} Autoexec( 003, 003, 092, 000, 000, 000, 000, 090, 020, 100, 100, 000)INS={"BELL_SYNTH"} Autoexec( 004, 004, 103, 000, 000, 000, 127, 090, 020, 100, 100, 000)INS={"BELL_SYNTH"} Autoexec( 005, 005, 039, 001, 000, 000, 060, 020, 020, 120, 090, 010)INS={"BASS"}If(MODE1==TWM){v=127} Autoexec( 006, 006, 049, 000, 000, 000, 032, 060, 030, 080, 103, 020)INS={"CHORD"}If(MODE1==TWM){v=90} Autoexec( 007, 007, 046, 000, 000, 000, 096, 040, 030, 120, 090, 040)INS={"HIGH"} Autoexec( 008, 008, 012, 000, 000, 000, 010, 040, 040, 100, 093, 040)INS={"ULA_MERO"} Autoexec( 009, 009, 012, 000, 000, 000, 117, 040, 040, 100, 093, 020)INS={"URA_MERO"} Autoexec( 010, 010, 025, 000, 000, 000, 064, 030, 020, 127, 100, )INS={"KICK"}DL(-2)GSRY(1)r8 Autoexec( 011, 011, 025, 000, 000, 000, 064, 030, 000, 127, 090, )INS={"HI_HAT"}DL(-2)GSRY(2)r8 Autoexec( 012, 012, 026, 000, 000, 000, 064, 030, 000, 127, 090, )INS={"SYMBAL"}DL(-2)GSRY(1)r8 Autoexec( 013, 013, 119, 000, 000, 000, ___, 020, 000, 127, 090, )INS={"TAM"} Autoexec( 014, 014, 116, 000, 000, 000, ___, 040, 030, 127, 090, )INS={"BACK"} Autoexec( 015, 015, 007, 000, 000, 000, 096, 030, 050, 070, 100, )INS={"PIANO"} Autoexec( 016, 016, 091, 000, 000, 000, 084, 030, 050, 127, 100, )INS={"BGSOUND"} //------( TR , CH , @ , Key, P , P2 , P3 , CHO, REV, v , VAR, M )INS={InstrumentName} //-------------------------------------------------------------------------------------------------------------------------------------------------------------------// DL=0Tempo=TEMPO_EST;INT HAZ=2INT BGN=19INT ME1=27INT ME2=35INT SB1=43INT RF1=52INT ME3=60INT ME4=68INT SB2=76INT RF2=93 INT NK1=101INT NK2=109INT NK3=117INT ME5=126INT SB3=134INT END=151FUNCTION REC(FF=127){EP.T(FF,0,!1^1^1^1^1^1)}FUNCTION REC2(FF=100){V.T(FF,0,!1^1^1^1^1^1)} //------------------------------------------------------------------------------TR=001;------------------------------------------------------------------------------// STR SM1={EP=120If(MODE1==TWM){V=110}[ffff^eee^d^^rdef:eeee^ddd^c^^^rrr]gggg^g^f#^^^r}STR SM2={EP=120If(MODE1==TWM){V=110}defga^^ffefga^^`c`ca#aa#g^ee^defg^^refgaa^^ffefga^^`c`ca#aa#ggggeg^`d^`c^`d^^^r} STR SM3={EP=127V=110If(MODE1==TWM){V=127}[`d^`c`d^a^a`d`d`c`d^r:`d`e`f^`e`f`g`f`e`d`e^^`d^^^r]`d`e`f^^`f`f`e`f`g`a^^^^`a`g`a^^^^^^^^V=100} STR SM4={EP=127V=110If(MODE1==TWM){V=127}[`d^`c`d^a^a`d`d`c`d^r:`d`e`f^`e`f`g`f`e`d`e^^`d^^^r]`d`e`f^^`f`f`e`f`g`a^^^^^^^SM3;V=100} TR=1l8>DL=ME1;HAM2({SM1;SM2;SM3})DL=ME3;HAM2({SM1;SM2;SM4})DL=ME5-1rrrrHAM2({SM2;SM4}) //------------------------------------------------------------------------------TR=002&003&004;----------------------------------------------------------------------// STR RTA={@100,0v=90If(CH==3){@92,0If(MODE1==TWM){@101If(MODE1==TWM){v=100}}}If(CH==4){@103,0If(MODE1==TWM){v=120}}}STR RTB={@56,0v=100If(CH==3){@92,0v=90}If(CH==4){@103,0v=90}} STR RTH={RTB}STR RTI={l8V=80RTB[10r]a#^a^f^l4g^^^e^^^f^^^^l8a#^a^f^l4g^^^a^^^V=100} STR RT1={l8EP=127RTA[a^^dfd`ca^^^dfd`cg^^^:dfdf`c^a#^a^gaa#]ggf#gaf#^a`d^^^r}STR RT2={l8EP=100[28r]aec"a[32r]} STR RRF={l8>If(MODE1==TWM){V=120}DL=HAZ;RTH;RTI;DL=BGN;RT1;RT2;DL=RF1;RT1;RT2;DL=RF2;RT1;DL=NK2;RTH;RTI;DL=END[RT1:If(MODE1==GS){REC2}Else{REC2=120}]}TR=2;>HAM2({RRF})TR=3RRF;TR=4RRF; //------------------------------------------------------------------------------TR=005;------------------------------------------------------------------------------// STR BSH={@39,8l16<[[a^^a^^a^^^:g^a^a#^]:a^a#^g^]e^g^a^>l8}STR BS1={[[3"a#a#]l16"a#^a#a#l8[4"a#a#][3"aa]l16"a^aal8:[4"aa]][4d`d]} STR BS2={[[3"a#a#]l16"a#^a#a#l8:[4"a#a#][3"aa]l16"a^aal8[4"aa]][3"gg]l16"g^ggl8[4"aa][4d`d]}STR BS3={[8"a#a#][8"aa][4"a#a#][4"gg][4"aa][d`d]d^^^} STR BS4={[["a#a#][c`c]:[d`d][c`c]][4d`d];["gg]["aa][d`d][c`c][4"a#a#][4c`c]l4"a^^^l8}STR BS5={[["a#a#][c`c]:[d`d][c`c]][4d`d];["gg]["aa][d`d][c`c][4"a#a#][4c`c]BS4} TR=5l8<@39,1DL=BGN;BS1;BS2;BS3;BS4;BS1;BS2;BS3;BS5[BS1][BSH]<@39,0BS1>@39,1DL=ME5;BS3;BS5[BS1:REC] //------------------------------------------------------------------------------TR=006;------------------------------------------------------------------------------// STR COH={EP=100SUB{e^^^f^d^e^^^c^d^HAM({e^^^f^d^e^^^c^d^})}HAM2({["a^^^"a#^"g^"a^^^c^"b^]})EP=127}STR CO1={l4SUB{`d^^`e`f^`g^`e^^^`c^^^`d^^`e`f^`g^`e^^`c`f#^^^}l1HAM2({a#^a^a#^a`d})} STR CO2={l4SUB{[`d^^`c`d^`e^:`c^^^`d^`e^]`g^^`e`f#^`d^}l1HAM2({a#^a^a#ga`d})}STR CO3={l4SUB{HAM2({[`f^^`e`f^`g^:`e^^^`c^`e^]`e^^`c`f#^^^})}l1HAM2({a#^a^a#ga`d})} STR CO4={l4SUB{HAM2({[`f^`e^`f^^`g:`f^`e^`f^^`e]`f^^^`e^^^`c^^^})}HAM2({a#^`c^`d^`c^a#^`c^`d^^^;g^a^`d^`c^a#^^^`c^^^EP.T(110,127,!1)a^^^})} STR CO5={l4SUB{HAM2({[`f^`e^`f^^`g:`f^`e^`f^^`e]`f^^^`e^^^})}HAM2({a#^`c^`d^`c^a#^`c^`d^^^;g^a^`d^`c^a#^^^`c^^^})CO4} TR=6DL=HAZ;COH;CO1;DL=BGN;CO1;CO2;CO3;CO4;CO1;CO2;CO3;CO5;DL=NK2;COH;CO1;DL=ME5;CO3;CO5[CO1:REC2] //------------------------------------------------------------------------------TR=007;------------------------------------------------------------------------------// STR AP1={l8[MidiDelay({"a#"ffa#},6,!4)[12r]MidiDelay({c"gg`c},6,!4)[12r]]} TR=7DL=HAZ+8AP1;DL=ME2;AP1;DL=ME4;AP1;DL=NK3;AP1;DL=ME5;AP1; //------------------------------------------------------------------------------TR=008&009;--------------------------------------------------------------------------// STR UL2={EP=110l8rrrrddcdf^^ddcdef^^aagfde^cc^"a#cde^^rcc"a#cf^^ddcdef^^ggfefeeeece^f#^e^f#^^^r}STR UL3={EP=127[SUB{f^ef^c^cffef^r}a^ga^e^eaaga^r:dcd^ccecefd^^"a^^^r]dcd^^ddcdef^^^^gfe^^^^^^^^} STR UL4={EP=127[SUB{f^ef^c^cffef^r}a^ga^e^eaaga^r:dcd^ccecefd^^"a^^^r]dcd^^ddcdef^^^^^^^UL3} STR ULMR={DL=ME1+7If(MODE1==TWM){V=110}UL2;UL3;DL=ME3+7UL2;UL4;DL=ME5-1UL2;UL4;}TR=8ULMR;TR=9;>ULMR; //------------------------------------------------------------------------------TR=010;------------------------------------------------------------------------------// STR O1={'n27n32n33n35n36'}STR O2={If(MODE1==GS){'n27n32n33n35n36n28'}Else{'n27n32n33n35n36n40'}}STR O3={'n27n32n33n35n36n49'}STR O4={'n27n32n33n35n36n28'}STR O5={'n27n32n33n35n36n51n59'}STR DM1={O1;rrr}STR DH1={[7DM1][2O1;r]} STR DM2={O1;rrrO2;rrr}STR DM3={O1;rrrO2;rrrO1;rrrO2;rrO2}STR DM4={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrrO2;rO1;r} STR DM5={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;O2;r[2O1]r[2O1]}STR DM6={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrr[2O2;r]} STR DM7={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO2;rrrO1;rrrO2;r[2O2]}STR DM8={[3O1;rrrO2;rrrO1;rrrO2;rrr]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} STR DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}STR DM10={[4[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}STR DM11={[3O1;rrrO2;rrrO1;rrrO2;rrr][O2;r[O1]][O2;r][O2]rr} STR DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}STR DM13={[6DM2]O3[7r][n54rrr]}STR DM14={[7O1;rrr][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} STR DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}STR DM16={[3O1;rrrO2;rrrO1;rrrO2;rrr]rrr['n39n28'r:rr]O1;r[4O1]} STR DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}STR DM18={SUB{[32n42r]}[O1;rrrO4;rO1;rrrO4;rO1;O4;rO4:[O1;r]O4;rO1;rrrO1;rO4;r[O4]][O1;r]O4;r[O1;O4]O4;rO1;r[O4]} STR DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]}STR DM20={[O1;r]O4;r[O1;O4]O4;rO1;r[O4]}STR DM21={[[[3n27r:r]n28r:r[n27r:r]]:[3n27:r]n27][n28r][n28]} TR=10l16DL=HAZ@26DM21@17DM5[@17[[O5;rrr][8r]:DM19]DM20]DL=BGN@25BR=20p%=2000If(MODE1==TWM){@27,7}DM6;DM8;DM7;DM5;DM7;DM9;DL=SB1;DM6[DM2]DM9;DM6;DM8; DL=ME3@17[[15DM1]:[O1;r]]l32[8O1]l16[[[O5;rrr][8r]:DM19]DM20]DL=SB2@25If(MODE1==TWM){@27,7}DM7;DM5;DM6[DM2]DM9;DL=RF2;DM6;DM8;DM7;DM9;DL=NK2@26DM21@17DM5[@17[[O5;rrr][8r]:DM19]DM20] DL=SB3@25If(MODE1==TWM){@27,7}DM7;DM5;DM6[DM2]DM9[DM6;DM8:REC] //------------------------------------------------------------------------------TR=011;------------------------------------------------------------------------------// STR GR={n42}STR GA={n44}STR GB={If(MODE1==TWM){n46}Else{n51}}STR TA={n54}STR MT={n51}STR DR={'n38n40n82n85'}STR PL1={If(MODE1==GS){P.onCycle(!8,32,100)}Else{P.onCycle(!8,20,58)}}STR PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} STR GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}STR GP2={[3GR;rGB;r]GR;r[2GB]}STR GP3={[3[GR]GB;r][2GR][2GB]}STR GP4={[GR]GB;GR}STR GP5={[3GP4][GR][GB]}STR GP6={[GR][TA]}STR GP7={[GP6][GR]TA;GR;GP6}STR GP8={[3[GR]GB;GR][2GR][2GB]} TR=11l16DL=HAZ;BR=20p%=2000PL1;If(MODE1==TWM){@26PL2}SUB{r[8GP8]}[8GP1][4GP2][4GP3]DL=BGN;If(MODE1==TWM){p=64@1,100EP=110PL1}SUB{[8GP7]}[8GP8][15GP3]DL=SB1[8GP8][16r]SUB{[8GP7]}[8GP8] DL=ME3[8GP2][7GP1]GP7;DL=SB2[16GP8][16r][8GP2][8GP8]DL=NK2;SUB{r[8GP8]}[8GP1][4GP2][4GP3]DL=SB3[16GP8][16r][SUB{[8GP7]}[8GP8]:REC] //------------------------------------------------------------------------------TR=012;------------------------------------------------------------------------------// STR PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}STR PD2={@26EP.T(20,127,!1^1^1)[48DR]}STR PD3={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]} STR PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}STR PD5={@26[3DR;r][5DR]r[4DR]}STR PD6={@26[4DR;r][3DR]r[4DR]}STR PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} STR PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}STR PD9={@9BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64} TR=12l16DL=HAZ-1PD9;DL=HAZ[PD3]DL=HAZ+3PD1;DL=BGN-1PD8;DL=BGN@26PD3;DL=BGN+3PD1;DL=BGN+7PD9;DL=ME2+7PD9;DL=SB1;PD3;DL=SB1+8PD8;DL=RF1;PD3;DL=RF1+3PD1;DL=RF1+7PD9; DL=ME3;PD3;DL=ME4+7PD9;DL=SB2[PD3]DL=SB2+7PD9;DL=SB2+16PD8;DL=RF2[3PD3]DL=RF2+3PD1;DL=RF2+7PD9;DL=NK1+7PD9;DL=NK2+3PD1;DL=ME5+7PD9;DL=SB3[PD3]DL=SB3+7PD9;DL=SB3+16PD8;DL=END[PD3]DL=END+3PD1;DL=END+7PD9;DL=END+8REC2;DL=END+11PD1; //------------------------------------------------------------------------------TR=013;------------------------------------------------------------------------------// STR PG1={P.onCycle(!8,0,22,106,127,106,22)}STR DS1={br`br`gr`e`c`cargrdr}STR DS2={[8r][4`c]grgg}STR DS3={[8r]d`dd`drd`dd}STR DS4={gr`drbrggrg`dggg`dg} STR DS5={`d`dr`dararfrfrcrcc}STR DS6={[10r]`ar`ergr}STR DS7={[12r]`eaer}STR DS8={p.T(127,0,!1)BR=20[16e]rp=64}STR DS9={[`d#][a#][g][d#][8r]}STR DS10={[8`g]`c`cgrcr"gr} STR DS11={[rrrr`dafd]}STR DS12={[4`g][4`d]ggrgrgrg}STR DS13={[8r][`dr]`dad"a}STR DS14={[3`g]rgggr`gr`ggrg`g`g}STR DS15={`g`gr`d`drggrddr["gr]}STR DS16={[8r]`gr`crgrcr} TR=13l16PG1}STR TD1={@47v=70[["a#dfga#`d`f`g`a#`f`d`ca#fdc]:["acdea`c`d`e`a`g`e`daged]]"acdea`c`d`e`a`g`e`daged>"d"g"a"bdgab`daged"a"g"d<} STR TD2={@39v=70["a#dfga#`d`f`g`a#`f`d`ca#fdc]["acdea`c`d`e`a`g`e`daged]"a#dfga#`d`f`g`a#`f`d`ca#fdc;"g"a#dfga#`d`f`g`da#agd"a#"a;"acdea`c`d`e`a`g`e`daged>"d"g"a"bdgab`daged"a"g"d<} STR TD3={@39v=80["a#dfga#`d`f`g`a#`f`d`ca#fdc]["acdea`c`d`e`a`g`e`daged]"a#dfga#`d`f`g`a#`f`d`ca#fdc;"g"a#dfga#`d`f`g`da#agd"a#"a;"acdea`c`d`e`a`g`e`daged[16r]} STR TD4={@28v=90["a#dfaa#fd"a#cegb`cgec:dfga`dafdcegb`cgec]dga`c`dafdfgfa`dafd;"g"a#dfgd"a#"g"acegaec"adfga`dafdcegb`cgec["a#dfaa#fd"a#][cegb`cgec][16r]} STR TD5={@28v=90["g"a#dfgd"a#"g"acegaec"a:"a#dfaa#fd"a#"acegaec"a]dga`c`dafdfgfa`dafd;"g"a#dfgd"a#"g"acegaec"a"a#dfaa#fd"a#"acegaec"a;["g"a#dfgd"a#"g]["acegaec"a]TD4} TR=14l16DL=HAZ;P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)TDH;V=80TD1;V=100DL=BGN;TD1;TD2;TD3;TD4;TD1; DL=ME4;TD3;TD5;DL=NK1[V=80TD1;V=100:TDH]DL=ME5;TD3;TD5[TD1:REC2] //------------------------------------------------------------------------------TR=015;------------------------------------------------------------------------------// FUNCTION PIA(STR SWEET){'SWEET'^^'SWEET'>[3'SWEET'^:'SWEET']'SWEET'^^^<}FUNCTION PIB(STR SWEAT){'SWEAT'^^'SWEAT'>'SWEAT'^'SWEAT'<}FUNCTION PIC(STR SWAT){>['SWAT'^:'SWAT']'SWAT'^^^<} STR PV1={EP=127[[PIA=LAS]:[PIA=LA]]PIA=LA>PIA=LD<}STR PV2={EP=110[PIA=LAS][PIA=LA]PIA=LAS;PIA=LG;PIA=LA>PIA=LD<}STR PV3={EP=120[PIA=LAS][PIA=LA]PIA=LAS;PIA=LG;PIA=LA>PIA=LD<} STR PV4={EP=127[PIB=LAS>PIC=LCPIC=LC;PIA=LD2<]PIA=LAS>PIA=LCPIC=LCPIC=LC;PIA=LD2<]PIA=LAS>PIA=LC この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)