サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 全て許可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ダンス・エレクトロニカ ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント ■□■120th Anniversary Songs■□■ 3年越しのノンストップです。 なるべく大音量でどうぞ。 曲データ(サクラから貼り付けます。) /* MS-GS EUROBEAT 120th ANNIVERSARY NON-STOP MEGAMIX VOL.08 ★演奏時間:28分47秒 ★MMLサイズ:106Kb ★MIDIサイズ:1.83Mb ★MML投稿予定日:2009年12月21日 ★使用&推奨音源:Microsoft GS Wavetable SW Synth 注)Windows Vista,7非対応です。ごめんなさい ★トラックリスト: 1.MYSTERIOUS FOREST NO.276 2.ONE DAY NO.284 3.I'M IN DANGER BUBBLE -EXTENDED NRG MIX- NO.285 4.I'M IN DANGER BUBBLE -EXTENDED EURO MIX- NO.288 5.HOLY NIGHT NO.277 6.DARKNESS NIGHTMARE SONG NO.283 7.U & I NO.280 8.BE MY LOVER NO.287 9.KAMIKAZE SUICIDE SQUID NO.279 101〜109曲目のメガミックスです。だいぶ時間が経ってしまいました。 いずれも2006年7〜11月という短い期間のデータなので、同じような感じの高速哀愁が多いです。 これならかえって自然に繋げた方がいいかなぁと思って今回はさくっと簡単なミックスで済ませてます。 NON-STOP VOL.06(ID:2912)やVOL.07(ID:3379)の頃と比べるとかなり失速気味な時期です。 2004年から2006年までずっと続けていた2週間一曲投稿の中でちょうどラストに当たります。 この頃までは一つ一つをキチンと作るのより、 決まった日時間隔で同じフォーマットのデータを投稿し続けていく事を重視していました。 そういう作り方のほうがユーロビートというジャンルには適しているんじゃないかと今でも思ってます。 2003年からずーっと同じようなデータを今でも作り続けていますが、 この時期の特徴は『もっとハイテクに・もっと大げさに』方向転換し始めたことです。 安定はしていませんが、とりあえず一列に並べてみましたので聴いてみてください。 1.MYSTERIOUS FOREST - 2006/7/17 - NO.276 ドラマティックな展開がオープニングにふさわしいと思ったので先頭に入れてみました。 今に至るまで続けている大げさな展開と覚えやすいメロディーは、大体この辺りから始めました。 サクラ受けは微妙でしたが、時期的なものとタイトルの付け方が悪かったのだと思います。 2.ONE DAY - 2006/10/09 - NO.284 音使いこそハイテクですが、これと言った特徴があるわけでもないです。 これも受け悪かったなぁ・・ちょうど失速し始めた頃だったのでしょうか。 中音域に隙間を作るとノリやすくなるみたいです。 3.I'M IN DANGER BUBBLE -EXTENDED NRG MIX- - 2006/09/25 - NO.285 『さくすく(現:音桜)』に投稿したサクラ未公開データ。 矢部ソーダ氏の曲を青い白熊氏がREMIX、そして最後にうちが改良しました。 同じような感じで非常に繋げやすかったです。 4.I'M IN DANGER BUBBLE -EXTENDED EURO MIX- - 2006/09/25 - NO.288 前曲と同日にサクラに投稿した同曲REMIXです。 2番でキーを変えたりAメロでリズムを抜いたりでだいぶ変革を加えたつもりでしたが・・ 原曲のID:3092(青い白熊氏製作)が好きでした。 5.HOLY NIGHT - 2006/08/14 - NO.277 真夏のど真ん中に投稿したウィンターソングです。 裏打ちや重ねたハットが特徴的です。 今回ここまでは一気に繋げました。 6.DARKNESS NIGHTMARE SONG - 2006/09/11 - NO.283 やっとこさ曲掲示板でちょっとだけ受けた曲です。 今回のNON-STOPの中だと地味ですが、違いが際立っていると思います。 イントロにだいぶ凝った記憶があります。 7.U & I - 2006/11/06 - NO.280 久々の爽やかポップ路線です。 タイトルがユーロビートっぽくないしイントロも手抜きだしでかなりやる気無かったんですが、 その割にはノリノリになりました。 8.BE MY LOVER - 2006/10/23 - NO.287 在庫が詰まった為に一気に仕上げたデータですが、意外と綺麗にまとまりました。 起伏は小さいですが、安定しているので聴きやすいと思います。 ピアノを基調にする試みは最近ずっとやっていません。 9.KAMIKAZE SUICIDE SQUID - 2006/08/28 - NO.279 この低迷していた時期にしては上出来で、尚且つ感想もかなりもらえたのでラストに入れました。 神風特攻隊をテーマにしていますので、所々に爆発音が入ります。 哀愁系と攻撃系を同時に達成できた珍しいデータだと思います。 */ //------------------------------------MYSTERIOUS FOREST PlayFrom.SysEx=1PlayFrom.CtrlChg=1PlayFrom.RPN_NRPN=1System.MeasureShift=3Tempo=1000Include(delay.h)ResetGS; FUNCTION DL(ti){Time(ti:1:0)}FUNCTION PAN(ER1,ER2){If(ER2==0){P.T(0,127,ER1)}If(ER2==1){P.T(127,0,ER1)}}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 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)}FUNCTION REC3(FF=100){EP.T(127,0,!1^1^1^1^1)V.T(FF,0,!1^1^1^1^1)}FUNCTION IP(DW=1){DL(-2)GSRY(DW)r8}INT K=0 Function MD(Str S,Int Repeat, Int Delay){Int Temp_v=MML(v);Int Dly=Delay;Int Dec_v=Temp_v/(Repeat+2);Int J=Temp_v+20; J=J-(Dec_v*2);v(J);For(Int I=1;I<=Repeat;I++){Sub{r%(Dly)v(J)S}Dly=Dly+Delay;J=J-Dec_v;}v(Temp_v)S} INT EST_MF=162INT MF_TIME=0K=1FUNCTION MFW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(MF_TIME)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} MFW(01,01,100,00,0,K,064,4,2,127,09,0)MFW(07,07,035,00,0,K,084,2,2,120,09,0)MFW(13,13,119,00,0,0,___,5,0,117,09,0) MFW(02,02,072,00,0,K,054,2,2,100,10,7)MFW(08,08,100,00,0,K,000,3,2,100,09,2)MFW(14,14,067,00,0,K,074,2,2,117,10,0) MFW(03,03,063,00,0,K,000,2,2,080,09,0)MFW(09,09,100,00,0,K,127,3,2,100,09,2)MFW(15,15,003,00,0,K,096,2,2,117,10,0) MFW(04,04,062,00,0,K,127,2,2,100,09,0)MFW(10,10,025,00,0,0,064,3,1,127,10,0)MFW(16,16,091,00,0,0,054,2,1,127,10,0) MFW(05,05,039,01,0,K,044,2,2,120,09,0)MFW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// MFW(06,06,049,00,0,K,032,1,2,070,10,0)MFW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=MF_TIME;Tempo=EST_MF;INT HAZ=MF_TIME+1INT HZ2=HAZ+17INT BGN=HZ2+10INT ME1=BGN+8INT ME2=ME1+8INT SB1=ME2+8 INT RF1=SB1+10INT ME3=RF1+8INT ME4=ME3+8INT SB2=ME4+8INT RF2=SB2+18INT NK1=RF2+16 /*1*/STR MN1={V=110rr[c#^"bc#^:c#^c#c#c#e^dc#^r]c#^g#g#ag#^ef#^^^^rf#f#f#f#f#^g#^a^aa^g#g#^f#^g#^^^^^rrr} STR MN2={V=110`c#^^rf#^`c#^ba^g#^^^rb^^re^b^ab^`c#^^^rV.T(110,120,!1^1^1)`d^`c#`c#^b^rb^ag#^^f#g#^^^^^^^^`c#^^^^^^r} STR MN2A={V=110`c#^^rf#^`c#^ba^g#^^^rb^^re^b^ab^`c#^^^rV.T(110,120,!1^1^1)`d^`c#`c#^b^rb^ag#^^f#g#^^^^^^^^BR=24p.T(64,0,!1)`c#^^^^^^rp=64} STR MN3={V=120[f#^a^a^a^b^^a^aab`c#`c#`c#`c#`c#`d`c#:b^g#f#e^^^r]b^^^^ba^g#g#^aa^^^^^rrg#l16g#^^f#^^e^l8f#^^^^^^^} STR MN4={V=120[[f#^a^a^a^b^^a^aab`c#`c#`c#`c#`c#`d`c#:b^g#f#e^^^r]:`e^`e`e`e^^^r]b^^^^ba^g#g#^aa^^^^^rrg#l16g#^^f#^^e^l8f#^^^^^^^} STR MN5={V=120f#^a^a^a^MD({b^^a^^^^^},6,!1)[47r]}STR MN6={TrackKey=0EP=100[HAM({a^e^rrrMidiDelayRev({a},5,!8)})HAM({a^e^rrrMidiDelayRev({a},5,!8)})HAM({[MD({a^e^},2,!2)rrrr]})]TrackKey=K} TR=1l8>DL=BGN-10q=96HAM({v=80MN3;v=127DL=ME1;MN1;MN2;MN3;DL=ME3;MN1;MN2A;MN4;DL=NK1;MN6;}) /*2*/STR RS1={f#^^^^ef#g#^^^^^f#g#a^^^^^f#a^b^^`c#^^^^;`d^^^^`e`f#^`e^^^`c#^^^`d^^^`d`e`d`c#^^^^^rrr} TR=2l8>DL=BGN;EP.W(90,127,!2)HAM({RS1;DL=RF1;RS1;DL=RF2+8RS1}) /*3&4*/STR RTH={[V.T(30,127,!1)MidiDelay({'`c#af#'^},7,!4)[30r]:V.T(30,127,!1)MidiDelay({'g#be'^},7,!4)[30r]]V.T(30,127,!1)MidiDelay({'`ebg#'^},7,!4)[30r]V=100} STR RT1={SUB{a^aaa^aa^aa^a^a^;b^bbb^bb^bb^b^b^;`c#^`c#`c#`c#^`c#`c#^`c#`c#^`c#^`c#^;`e^`e`e`e^`e`e^`e`e^`e^`e^ `d^`d`d`d^`d`d^`d`d^`d^`d^;`e^`e`e`e^`e`e^`e`e^`e^`e^;`f#^`f#`f#`f#^`f#`f#^`f#`f#^`f#^`f#^;`g#^`g#`g#`g#^`g#^`g#r`g#^^^^^} f#^f#f#f#^f#f#^f#f#^f#^f#^;e^eee^ee^ee^e^e^;d^ddd^dd^dd^d^d^;c#^c#c#c#^c#c#^c#c#^c#^c#^; "b^"b"b"b^"b"b^"b"b^"b^"b^;c#^c#c#c#^c#c#^c#c#^c#^c#^;d^ddd^dd^dd^d^d^;c#^c#c#c#^c#^c#rc#^^^^^} STR RTA={@100,0If(CH==3){@103,2}If(CH==4){@81,0}}STR RTJ={V=127v=127P=64q.T(100,200,!1^1^1^1^1^1^1^1)v.T(70,100,!1^1^1^1^1^1^1^1) If(CH==2){<@91,0EP.T(127,30,!1^1^1^1^1^1^1^1)}If(CH==3){@82,8EP.T(40,127,!1^1^1^1^1^1^1^1)}If(CH==4){EP.T(40,127,!1^1^1^1^1^1^1^1)q.T(10,120,!1^1^1^1^1^1^1^1)@82,0} [4`c"aa"aaba`c^"aa"a`e"aa"a]If(CH==2){>P=64v=100q=90}If(CH==3){P=0v=80q=100}If(CH==4){P=127v=100q=100}EP=127V=100} STR RRF={l16DL=HAZ;q.T(0,90,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)[RTH]q=90If(CH==2){q=100}DL=BGN;HAM({RT1;DL=RF1;RT1;DL=RF2+8RT1;RTH;DL=NK1+8l8RTJ;l16})}TR=3RRF;TR=4RRF; /*5*/STR BSH={EP=110[64f#]EP=127}STR BSI={l4q=100[f#^^^d^^^a^^^e^^^]l8q=90[d`d]l16d^`dd^d`d^l8e^e^rrrr} STR BS1={[f#`f#]l16f#^`f#f#^f#`f#^l8[4e`e][d`d]l16d^`dd^d`d^l8[4c#`c#]["bb]l16"b^b"b^"bb^l8[4c#`c#][d`d]l16d^`dd^d`d^l8[c#`c#]c#c#^^} STR BS2={[[f#`f#]l16f#^`f#f#^f#`f#^l8:[4f#`f#]][4c#`c#][d`d]l16d^`dd^d`d^l8[4"bb][c#`c#]l16c#^`c#c#^c#`c#^l8[c#`c#][c#^]} STR BS3={[d`d]l16d^`dd^d`d^l8[4e`e][f`f]l16f^`ff^f`f^l8[4f#`f#]["bb]l16"b^b"b^"bb^l8[4"g#g#][c#`c#]l16c#^`c#c#^c#`c#^l8c#^^^^^^&&"c#} STR BS4={[[f#`f#]l16f#^`f#f#^f#`f#^l8[4d`d][a`a]l16a^`aa^a`a^l8[4e`e]][d`d]l16d^`dd^d`d^l8e^e^rrrr}STR BS5={[[f#`f#][12r]][d`d]l16d^`dd^d`d^l8[4"bb][c#`c#]l16c#^`c#c#^c#`c#^l8[c#`c#][c#^]} STR BS6={[4[f#`f#]l16f#^`f#f#^f#`f#^l8[4d`d][a`a]l16a^`aa^a`a^l8[4e`e]][d`d]l16d^`dd^d`d^l8e^e^rrrr} STR BS7={l4q=100[f#^^^d^^^a^^^e^^^]l8q=90[[f#`f#]l16f#^`f#f#^f#`f#^l8[4d`d][a`a]l16a^`aa^a`a^l8[4e`e]][d`d]l16d^`dd^d`d^l8e^e^rrrr} STR BS8={l4q=100d^^^c#^^^f#^^^e^^^d^^^c#^g#^f#^^^a^^^l8q=90} STR BASS={l8<ULMR; /*10*/STR OA={n27n32n33n35n36}STR O1={'OA'}STR O2={'n38n40OA'}STR O3={'n49OA'}STR O4={'n57OA'}STR O5={'n51n59OA'}STR O6={'n38n40'}STR DM1={O1;rrr}STR DH1={[7DM1][2O1;r]} STR DM2={O1;rrrO2;rrr}STR DM3={DM2;O1;rrrO2;rrO2}STR DM4={[7DN2]O1;rrrO2;rO1;r}STR DM5={[7DM2]O1;O2;r[2O1]r[2O1]}STR DM6={[7DM2]O1;rrr[2O2;r]}STR DM7={[7DM2]O1;rrrO2;r[2O2]}STR DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} STR DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}STR DM10={[7DM2][3O1]r[4O1]}STR DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}STR DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}STR DM13={[6DM2]O3[7r][n54rrr]}STR DM14={[7DM1][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={[6DM2]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={[7DM2][O4;r]rrrr}STR DM21={[6DM2]O3[9r][O1]O6;rrr}STR DM22={[DM2][O3;rrr][8r]} STR DDH={SUB{[32n85rn82r]}[8n62rn61rn63rn61rn64n64n60rrrrr]}STR DDI={SUB{DDH}[4O3;rrO1;O2;r[[O1]r]O2;rO1;r[16r]]}STR DDJ={SUB{[58r]['n28n39'r]}[O3[63r]]DM22} STR DD1={DM7;DM20}STR DD2={DM6;DM8}STR DD3={SUB{rrrrn49[31r]n57}DM7;DM21}STR DD3A={SUB{rrrrn49[31r]n57}DM7;DM13}STR DD4={[DM6]DM22}STR DD5={[[O3;rrr][24r]][[7DM1]:[O1;r]][4O1]}STR DD6={[4DM6]DM22}STR DD7={SUB{[58r]['n28n39'r]}[O3[63r]]DD4} TR=10l16DL=HAZ;BR=20p%=2000@17 p.T(127,64,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)MidiDelay({DDH},3,!8)DDI@25n49DL=HZ2;DDJ;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD5;DD3A;DD6;DD1;DD5@17SUB{DDH;DDI}DD2;DD3;n49 /*11*/STR GR={'n42n85'}STR GA={n44}STR GB={'n51n46'}STR TA={n54}STR MT={n51}STR DR={'n38n40n82n85'}STR PL1={P.onCycle(!8,40,70)}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]} STR GGH={[4GP2[16r]]}STR GGI={[4GP2][4GP3]GP1[4GB;rrr]}STR GG1={[7GP3]GP2}STR GG2={[7GP3]GP8}STR GG3={[7GP3][4GB;rrr]}STR GG3A={[7GP3]MD({GB},8,!8)[15r]}STR GG4={[9GP1][4GB;rrr]} STR GG5={[[16r]GP2][3GP3]GP2}STR GG6={[17GP1][4GB;rrr]}STR GG7={[4GP2][4GP3]GG4} TR=11l16DL=HAZ+8PL1;BR=20p%=1200GGH;DL=HZ2;GGI;DL=BGN;BR=20p%=1200GG1;GG2;GG3;GG4;GG1;GG5;GG3A;GG6;GG1;GG5;GG2;GG3; /*12*/STR PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}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={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}STR PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} 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={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}STR PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}STR PD11={BR=20p.T(127,32,!1)[16n51]p=64}STR PD12={@26[4O2][4O1][O2][6O1]@17} STR PD13={@26EP.T(40,100,!1^2)[16DR]l32[16DR]l16EP=127}STR PD14={@26EP.T(40,100,!1^1^1^1)[48DR]l32[32DR]l16EP=127} TR=12l16DL=HAZ+12PD14;DL=HZ2;PD3;PD13;DL=BGN;PD3;DL=SB1;PD3;PD13;DL=RF1;PD3;DL=SB2[PD3]PD13;DL=RF2[PD3]DL=NK1+12PD14; /*13*/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}STR DS17={eeeeddddgrrrerrr}STR DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16SP1;SP2;SP3;SP4;SP1;SP2;SP3A;SP5;DL=RF2+8SP1;DL=NK1; /*15*/FUNCTION PO(STR DGS){MD({DGS},4,!8)}FUNCTION POA(STR DGS){MD({DGS},8,!8)}STR FTH={l8q=300EP=127HAM({l8[5r]f#abPO({`c#})[6r]l16`f#`ePO({`f#})[7r]PO({`e})[7r]POA({`c#})[13r]`c#bPO({`c#})[7r]PO({a})[5r]brPOA({`c#})[13r]`f#`ePO({`f#})[7r]PO({`g#})[7r]POA({`e})[13r]`g#`aPO({`b})[7r]PO({``e})})q=100} STR FT1={l4@3,0EP=100SUB{<"f#^^^"e^^^"d^^^"c#^^^<"b^^^>"c#^^^"d^^^"c#^^^>}l8[f#a`c#f#`c#f#a`c#:eg#bebeg#b]eg#`ee`eeg#`e;df#adadf#a;eg#bebeg#b;f#a`c#f#`c#f#a`c#;g#ag#ab`c#^^} STR FT2={EP=100l8@1,0SUB{>>["f#"ac#"f#c#"f#"ac#;"e"g#c#"ec#"e"g#c#]"d"f#"a"d"a"d"f#"a<"bdf#"bf#"bdf#>"c#"f#"g#"c#"g#"c#"f#"g#;"c#"g#c#"c#c#"c#"g#c#<<}l4['`c#af#'^^^'`c#g#e'^^^]'af#d'^^^'f#d"b'^^^'c#f#g#'^^^'`c#c#g#'^^^} STR FT3={EP=100l16>@2,0[4daf#d][8ebg#e]f#g#f#g#abab`f#`g#`f#`g#`a`b`a`b;l8EP=110SUB{b^aa^g#^^}`d^`c#`c#^b^^SUB{`e^`e`e^^`e^`c#^^^^^^^}b^bb^^b^g#^^^^^^^EP=120HAM({c#^^^^'`c#g#e''`c#g#e'^})<} STR FT3A={EP=100l16>@2,0[4daf#d][8ebg#e]f#g#f#g#abab`f#`g#`f#`g#`a`b`a`b;l8EP=110SUB{b^aa^g#^^}`d^`c#`c#^b^^SUB{`e^`e`e^^`e^`c#^^^^^^^}b^bb^^b^g#^^^^^^^EP=120HAM({c#^^^^rrr})<} STR FT4={EP=110l4>@3,0SUB{<[f#^^^d^^^a^^^e^^^]d^^^>}l16[[c#f#ac#ac#f#a][df#adadf#a][a`c#`ea`ea`c#`e][eg#bebeg#b]][df#adadf#a]['eb'^^r][8r]<} STR FT5={EP=110l4>@3,0SUB{<[4f#^^^d^^^a^^^e^^^]d^^^>}l16[4[c#f#ac#ac#f#a][df#adadf#a][a`c#`ea`ea`c#`e][eg#bebeg#b]][df#adadf#a]['eb'^^r][8r]<} TR=15DL=HAZ+7BR=40p.W(127,64,!16)FTH;p=64DL=BGN;q=130p=64FT1;FT2;FT3;FT4;FT1;FT2;FT3A;FT5;FT1;DL=NK1+7FTH; /*16*/STR BGH={@123,3l4BR=48p.T(32,127,!1)'"c"d"e'^^^}STR BGI={@123,3l4BR=48p.T(127,32,!1)'"c"d"e'^^^}STR BGJ={@126,8BR=40P=96EP=110p.T(127,0,!1)'gfe'^^^EP=127p=64} STR BG1={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64}STR BG2={@120,0'cde'^^^}STR BG3={@125,1l4BR=20p.T(127,32,!1)`a^^^p=64}STR BG4={@31,8l4rrrBR=50p.T(127,0,!4)'cg`c'p=64}STR BG5={@120,0'dc'^^^} STR BG6={@123,1l1BR=30EP.T(70,127,!1^1^1^1^1^1^1^1,127,0,!1^1^1^1)p.T(64,127,!1^1^1^1^1^1^1^1,127,0,!1^1^1^1)V=127'cde'^^^^^^^^^^^V=100} TR=16DL=HAZ+8BG6;DL=HAZ+15BGH;BG1;DL=HZ2+3BG5;DL=ME1;BG1;DL=ME1+7BG2;DL=ME2+6BG3;BG4;DL=ME3;BG1;DL=ME3+7BG2;DL=SB2+7BG4;DL=RF2;BG1;DL=RF2+4BG1;DL=RF2+7BGH;DL=RF2+15BGI;DL=NK1+7BGH;DL=NK1+15BGH;BG1; //------------------------------------ONE DAY INT EST_OD=160K=1INT OD_TIME=121 FUNCTION ODW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(OD_TIME+16)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} ODW(01,01,012,00,0,K,064,4,2,127,09,0)ODW(07,07,039,00,0,K,084,1,2,120,09,0)ODW(13,13,119,08,0,0,___,5,0,127,09,0) ODW(02,02,100,00,0,K,064,2,2,100,09,0)ODW(08,08,012,00,0,K,000,3,2,110,09,2)ODW(14,14,082,01,0,K,___,2,2,127,09,0) ODW(03,03,103,02,0,K,000,2,2,080,10,0)ODW(09,09,012,00,0,K,127,3,2,110,09,2)ODW(15,15,003,00,0,K,096,2,2,120,10,0) ODW(04,04,081,00,0,K,127,2,2,100,10,0)ODW(10,10,025,00,0,0,064,3,1,127,10,0)ODW(16,16,091,00,0,0,084,2,1,120,10,0) ODW(05,05,039,01,0,K,044,2,2,120,09,0)ODW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// ODW(06,06,103,00,0,K,032,1,2,090,10,0)ODW(12,12,026,00,0,0,064,3,0,127,09,0) DL=OD_TIME+17Tempo=EST_OD;HAZ=OD_TIME;BGN=HAZ+24ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16INT ME5=RF2+8INT ME6=ME5+8 /*1*/STR MNH={EP=127[HAM({a^e^rrrMidiDelayRev({a},5,!8)})HAM({a^e^rrrMidiDelayRev({a},5,!8)})HAM({[MD({a^e^},2,!2)rrrr]})]} MN1={EP=110[raaaab`ca^gagab`c^]rbbbb`c`db^bbbb`c`d`f^^`e`e^^`d`cb^b`e^^^r} MN2={EP=120[r`f`f`f`f`g`a`e^`e`e`e`e`f`g^r:`d`d`d`d`d`e`d^`ca`c^`d`e^]`a`a`a`a`g`f`g^^^^^^rr} MN3={>EP=127[a^e^a`c^`d^`c^b^ag^:a^e^a`c^`d^`c^`d^`e`e^]`e^a^`c`e^`e^^bg^^^r<} MN4={@81,0"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} TR=1l8DL=HAZ+16MNH;HAM({DL=ME1;MN1;MN2;MN3;DL=ME3;MN1;MN2[MN3]DL=ME6;>MN4<}) /*2&3&4*/STR RA={@82,8If(CH==3){@85,0}If(CH==4){@82,0}}RTA={@100,0If(CH==3){@103,2}If(CH==4){@81,0}}RTH={V=110P=64q.T(100,200,!1^1^1^1^1^1^1^1)v.T(70,100,!1^1^1^1^1^1^1^1) If(CH==2){<@91,0EP.T(127,30,!1^1^1^1^1^1^1^1)}If(CH==3){@82,8EP.T(40,127,!1^1^1^1^1^1^1^1)}If(CH==4){EP.T(40,127,!1^1^1^1^1^1^1^1)q.T(10,120,!1^1^1^1^1^1^1^1)@82,0} [4`c"aa"aaba`c^"aa"a`e"aa"a]If(CH==2){>P=64v=100q=90}If(CH==3){P=0v=80q=100}If(CH==4){P=127v=100q=100}EP=127V=100} RT1={RTA[`c"aa"a`c`d"a`e^"aa"a`c"aa"a]b"gg"gb`c"g`d^"gg"gb"gg"g;`cc`cc`c`dc`e^^bg^^^^} STR RT2={RA;SUB{[[e^eereere^rrrrrr:f^^f^^f^g^^g^^g^]:d^^d^^d^e^^e^^e^]e^re^re^e^^^^}HAM({[[a^aaraara^egagab:a^^`c^^`e^`d^^b^^g^]:a^^`c^^a^g^^b^^g^]`c^r`c^r`c^b^^^^rrr})} RRF={l8HAM({DL=BGN;RT1;DL=RF1;RT1;DL=RF2;RT1;DL=ME5;l16EP=100RT2;l8})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/BSH={["a^^"a"a"aea[24r]]}BSI={q.T(10,120,!1^1^1^1^1^1^1^1)EP.T(70,127,!1^1^1^1^1^1^1^1)[32"aa]} STR BSJ={l4}BS1={[8"aa][8f`f][8g`g][4c`c]["bb]"b^^^}BS2={[8"aa][8f`f][8g`g][4c`c][4"bb]} BS3={[[4"ff][4c`c]:[4"dd][4"ee]][4"ff]g^^^^^^&&"g}BS4={<[[4a`a][4g`g][4f`f][4g`g]]>}BS5={l4q=100"f^^^c^^^"d^^^"e^^^l8q.onCycle(!8,70,100)[4"ff][4c`c][4"ff]g^^^^^^&&"g} BASS={l8<SUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^r<:g^g^gggge^g^g#^br]g^g^ggabSUB{a^^^e^^}`c^^^b^^r} ULMR={l8DL=HAZ+16ULH;DL=ME2;UL2;UL3;DL=ME4;UL2[UL3]DL=ME6;UL4}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r]O1;rO6;rrr}DM21={[6DM2]O1;rrrO2;rO1;rrrO1;rO6;rrr}DM22={[7DM2]O1;rrO1;O2;rO1;r}STR DM23={[4DM2][7O1;r]O3[13r]O6;rrr} DDH={@17BR=20p%=6000[MD({MidiDelay({[O1;rrrO6;r]O1;O6;rO6;rrrr},2,!16)},3,!1)[44r]]@25BR=20p%=2000} DDI={EP.T(70,127,!1^1^1^1^1^1^1^1)p%.W(2000,-3000,!16)[4[7DM1]:[O1;r]][4O1]BR=20p%=2000}DDJ={[O3[15r]O4[15r]][7DM1][O1;r][4DM1]O3;rrrEP.T(30,120,!2^4)[6O1;r]EP=127} DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM22;DM23}DD4={DM7;DM8}DD5={[O3[15r]O4[15r]]DM23} TR=10l16DL=HAZ+16DDJ;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD2;DD5[DD4]DD1;DD2;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26l8BR=20p%.T(2500,2500,!1^1^1,5000,-5000,!1,-2500,-2500,!1^1^1,-5000,5000,!1)[8[GR;GA]GB;rGR;GA]l16BR=20p%=2500@25} GGI={@26BR=20p%.T(5000,-5000,!1^1^1^1,-1000,3000,!1^1^1^1)[16[GR]GA;r][4GP2]BR=20p%=2500@25}STR GGJ={SUB{[58r]['n28n39'r]rr}[4GP2][3GP3]GP8} GG1={[7GP3][4GB;rrr]}GG2={[7GP3]GP8}GG3={[6GP3]l8r[7GB]l16[16r]}GG4={[7GP1]GP3}GG5={SUB{[58r]['n28n39'r]rr}[4GP2][GP3]l8r[7GB]l16[16r]} TR=11l16DL=HAZ+16PL1;GGJ;DL=BGN@25BR=20p%=2500GG1;GG2;GG3;GG4;GG1;GG2;GG5[GG4]GG1;GG2;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+16PD3;DL=BGN;PD3;DL=SB1[PD3]DL=SB2[3PD3] /*13*/STR PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} DSH={@116,0[8`a`earar`a`a`a`earar`ea]@119,8} TR=13l16DL=HAZ+16PG1;PP;HAM2({DL=HAZ+19DS6;DL=BGN;PP;DL=BGN+3DS6;DL=BGN+7DS2;DL=ME1+7DS6;DL=ME2+3DS2;DL=ME2+7DS7;DL=SB1+3DS6;DL=SB1+7DS2;DL=RF1+3DS6;DL=RF1+7DS2; DL=ME3+7DS6;DL=ME4+3DS2;DL=ME4+7DS7;DL=SB2+3DS6;DL=SB2+7DS5;DL=SB2+11DS6;DL=SB2+15DS2;DL=RF2+3DS6;DL=RF2+7DS2;DL=ME5+7DS6;DL=ME6+3DS2;DL=ME6+7DS7}) /*14*/SPH={v=100[@82,8[9r]MD({'aec'^},18,!8)[21r]]}STR SPI={v.T(60,100,!1^1^1^1^1^1^1^1)@3,0MD({[8aebe`ce`ee]},1,!16)}STR SPJ={l16@39,0v=70[[a`c`ea`ea`c`e][gb`eg`egb`e][fa`cf`cfa`c][16r]]l8} SP1={@3,0v=127[aebe`ce`ee][afbf`cf`ef][gdbd`cd`dd]`ce`ce`de`ee[8r]}SP2={@1,0v=90[aebe`ce`ee][afbf`cf`ef][gdbd`cd`dd]`ce`ce`de`ee[8r]} SP3={@4,0v=100[fcgcac`cg^e`ce`de`ee:fdgdad`cg^e`ce`de`ee]afafab`c`d^^^^^^rr}SP4={l16@39,0v=90[[a`c`ea`ea`c`e][gb`eg`egb`e][fa`cf`cfa`c][gb`dg`dgb`d]]l8} TR=14DL=HAZ+16l8P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)SPJ;DL=BGN;SP1;SP2;SP3;SP4;SP1;SP2;SP3[SP4]DL=ME5;SP2;SP3; /*15*/FTH={@5,8l16>[[32r]ga^aaece^ee^MD({d&ec^},3,!4)[12r]MidiDelayRev({d&ec^},4,!4)]<} FT1={HAM({@85,0M=110EP=100l8rr'ae''ae'^^^^^^^^M=0@82,0l16EP=90egabMD({ab`c`e},1,!4)@85,0M=110EP=100l8rr'af''af'^^^^^^^^M=0@82,0l16EP=90fab`cMD({ab`c`e},1,!4) @85,0M=110EP=100l8rr'bg''bg'^^^^^^^^M=0@82,0l16EP=100gb`c`dMD({b`c`d`g},1,!4)@85,0M=110EP=100l8rr'`e`c''`e`c'^^^^l16@82,0EP=80SUB{`c^^`c`cr`crbrbr`c^^^}`e^^`e`er`er`dr`dr`e^^^M=0})} FT2={HAM({EP=100@85,0l8rrMD({'ae'^},1,!2)rrrrrr'ae'^rl16@82,0a&`c`er`er;@85,0l8rrMD({'fa'^},1,!2)rrrrrr'fa'^l16@82,8agfcfab`c;@85,0l8rrMD({'bg'^},1,!2)rrrrrr'bg'^l16@81,1gb`c`db`c`d`g;@85,0l8rrMD({'`cg'^},2,!4)rrrrrr'bg'^l16@56,0`e`er`e`er`er})} FT3={HAM({l8EP=100@100,0[MD({cfga},1,!2)rrrrMD({cefg},1,!2)rrrr:MD({dfga},1,!2)rrrrMD({eab`e},1,!2)rrrr]r@85,0SUB{ffffffg^^^^^^}aaaaaag^^^^^^rr})} FT3A={HAM({l8EP=120@11,0[MD({cfga},1,!2)rrrrMD({cefg},1,!2)rrrr:MD({dfga},1,!2)rrrrMD({eab`e},1,!2)rrrr]r@85,0SUB{ffffffg^^^^^^}aaaaaag^^^^^^rr})} FT4={HAM({[l16EP=127@88,0[26r]BR=24"g^&`e^"g^:[26r]SUB{brb^^^}`er`e^^^][24r]@82,0aebe`ce`ee})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]DL=ME5;FT2;FT3A; /*16*/BG1={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64}BG3={@80,0l4rrrBR=120p.T(127,0,!6)`gp=64} BG4={@123,1l4EP.T(100,127,!1)BR=20p.T(127,64,!1)c^^^r}BG5={@125,4l8BR=40EP.T(70,100,!1^1^1^1)p.T(127,80,!1^1^1^1)[32'cd']EP=127} TR=16DL=ME2+6BG1;BG2;DL=SB1+7BG4;DL=ME4+6BG1;BG2;DL=SB2+7BG4;DL=SB2+15BG4;DL=ME6+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED NRG MIX- INT TIME_DB=240K=1INT EST_DB=160FUNCTION DBW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(TIME_DB+1)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DBW(01,01,081,00,0,K,064,4,2,127,09,0)DBW(07,07,039,00,0,K,074,1,2,120,09,0)DBW(13,13,119,08,0,0,___,5,0,117,09,0) DBW(02,02,082,08,0,K,064,2,2,090,09,7)DBW(08,08,081,00,0,K,000,3,2,110,09,2)DBW(14,14,003,00,0,K,096,2,2,110,09,0) DBW(03,03,085,00,0,K,000,2,2,090,10,7)DBW(09,09,081,00,0,K,127,3,2,110,09,2)DBW(15,15,003,00,0,K,070,2,2,117,10,0) DBW(04,04,082,00,0,K,127,2,2,090,10,7)DBW(10,10,025,00,0,0,064,3,1,127,10,0)DBW(16,16,091,00,0,0,050,2,1,117,10,0) DBW(05,05,039,01,0,K,064,2,2,110,09,0)DBW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DBW(06,06,031,00,0,K,032,1,2,070,10,0)DBW(12,12,026,00,0,0,064,3,0,127,09,0) DL=TIME_DB+1Tempo=EST_DB;HAZ=TIME_DB+1BGN=HAZ+17ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+16 /*1*/MN1={v=100e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}STR MN1A={v=110e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={v=110a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={v=120"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} STR MN3A={v=120"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={v=120[MD({"a^"a^c"b"ae ^dc"a^^^r},1,!1^1)[16r]]} MN5={"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^c^d^e^e^d#^e^f#^;g^g^f#^f#a ^gf#e^ed#e;e^^f#^^g^ f#^^^ ^^^rl4b^^^^^^^^l8} TR=1l8>q=96V=110EP.W(110,127,!1)HAM({DL=HAZ;MN4;DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2}) /*2&3&4*/RA={@82,8If(CH==3){@85,0}If(CH==4){@82,0}}STR RB={@82,8If(CH==3){@7,0}If(CH==4){@8,0}}STR RC={@81,1If(CH==3){@81,0}If(CH==4){@82,8}} STR RD={@82,8If(CH==3){@39,0}If(CH==4){@39,8}}STR RE={@82,0If(CH==3){@62,0}If(CH==4){@63,0}} STR RT={RD} RTH={RB<[[[e^^err:e^^^f^e24f24e24d^]:e^^^b^a24b24a24d^]:e^^^f^f^rr]BR=6p.T(64,64,!8,64,32,!2)e^^^^^^^^^>p=64} STR RTI={RC;e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^RD e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^;RE;q_(-20) ggggbbb p%.T(0,0,!32,0,-1600,!32) b q_(0)p%.T(-1600,0,!16,0,0,!8,0,-4800,!16)`c^^^,,+10; p%.T(-4800,0,!16,0,700,!64,700,-700,!32,-700,700,!32,700,-700,!32,-700,700,!32,700,-700,!32,-700,0,!64)`d^^^,,+10} RT1={RA;SUB{[[e^eereere^rrrrrr:f^^f^^f^g^^g^^g^]:d^^d^^d^e^^e^^e^]e^re^re^e^^^^}HAM({[[a^aaraara^egagab:a^^`c^^`e^`d^^b^^g^]:a^^`c^^a^g^^b^^g^]`c^r`c^r`c^b^^^^rrr})} RRF={l16DL=HAZ;RTH;RTI;DL=BGN;RT1;DL=RF1;RT1}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l16[8a^ra^ra^^^^^^^^^]l8}BSI={[[4a`a][f`f][g`g][4a`a][d`d][e`e]]} BS1={[[4a`a][f`f][g`g]:[4a`a][d`d][e`e]][4f`f]l16e^re^re^e^^^^^^^l8}BS2={[8f`f][8e`e][4f`f][4d`d][4e`e][4a`a]} STR BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={q=100l4f^^^^^^^e^^^^^^^d^^^e^^^f^^^g^^^l8q.onCycle(!8,70,100)}BS6={[[4a`a][4f`f][4g`g]:[4e`e]][4b`b]>[c`c]["bb]["aa]["gg][4"f#f#][8"bb]<} BASS={l8<<@104,0CO2;CO2A<@31,0CO3; /*8&9*/UL1={v=110a^^a^^a^g^^a^^a^b^^b^bbbg^^^b^^r;a^^a^^a^b^^b^^b^`c^^^a^^rv=100SUB{a^b^`c^`d^}f^g^a^b^} UL2={>v=110SUB{c^c^"b^"bc^ccc^^^}e^e^d^de^gge^^^r<`c^^^b^a^g^a^b^`cr>SUB{c^c^"b^"bc^ccc^^^r}e^e^d^de^gge^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^r<},1,!1^1)[16r]]} UL5={v=110[>SUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3;rr[O1;r:r]O4;rrrrrrr}DM21={[6DM2]O3[7r]O4[7r]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr}DM23={[4DM2]SUB{O3[7r]O4[7r]O3;rrr[O4;r]}[3DM2]O1;rO1;rO6;rrr} STR DM24={[4DM2]SUB{O3[7r]O4[7r][O3;rrr][O4;rrr]}[3DM2]O1;rO1;rO6;rrr} STR DD={@17EP.T(50,127,!1)[6O1]r[3[O1]r]@25}DDH={@25O3[63r][[3O3;rr][7r][3O4;rr][7r]]}DDI={@25DM6;DM9} DD1={DM6;DM20}DD2={DM6;DM23}STR DD2A={DM6;DM24}DD3={DM7;DM21}DD4={DM6;DM22}DD5={@26BR=20p%=5000MidiDelay({[4[3O1]rO2;r[[O1]r]O2;rO1;r[16r]]},10,!8)@25BR=20p%=1000}DD6={@17DM6;DM9@25} DD7={[DM6]SUB{n49[7r]n57[7r]n55[7r]n57[7r]n49[15r]n57[15r]}[DM2]DM22} TR=10l16DL=HAZ;BR=20p%=1000DDH;DDI;O3;DL=BGN-1[12r]O6;DL=BGN;BR=20p%=1000DD1;DD2;DD2A;DD3;DD4;DD1;DD5;DD6;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[30GB;r[GR]][GB;rrr]}GGI={[4GP2][4GP3]}GG1={[7GP3]GB;rr[GR;r:r]GB;rrrrrrr}GG2={[7GP3]GP1}GG3={[7GP3][16r]}GG4={[3GP1][4GB;rrr][3GP1]GP2} GG5={MidiDelay({[4[4GR]GB;r[6GR]GB;r[GR][16r]]},10,!8)}GG6={[12GP1]GP8} TR=11l16DL=HAZ@26BR=20p%=1000PL1;GGH;DL=HAZ+8GGI;GB;DL=BGN@26BR=20p%=1000GG1[GG2]GG3;GG4;GG1;GG5;GGI;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+3PD4;DL=HAZ+8PD3;DL=BGN;PD3;DL=SB1;PD3;DL=ME3+7PD4;DL=ME3+8PD3; /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdrr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} DSH={EP=90[16r]DS5[16r]DS12;DS13;DS7;DS2;DS6;EP=127} TR=13l16DL=HAZ;PP;PG1;HAM2({DSH;DL=HAZ+11DS2;DL=HAZ+15DS7;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+7DS6;DL=ME1+15DS2;DL=ME2+3DS6;DL=ME2+7DS7;DL=SB1+3DS6;DL=SB1+7DS13;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+7DS6;DL=ME3+15DS2;DL=ME4+3DS6;DL=ME4+7DS7}) /*14*/SPH={l16P=96} SPI={l16P=96} SP1={@3,0l16EP=110[[['aec'^^^]'aec'^'aec'^^^'aec'^:'fc"a'^^^'fc"a'^^^'gd"b'^^^'gd"b'^^^]:'fd"a'^^^'fd"a'^^^'ge"b'^^^'ge"b'^^^][16r]}SP2={l4[32r]} STR SP2A={l8@1,0EP=100q=150SUB{HAM2({[fa`cf`cfa`c][egbebegb]dfadadfaegbebegbfa`cf`cfa`cgagab`c`d`e})}l4['afc'^^^]['ge"b'^^^]'fc"a'^^^'gd"b'^^^'aec'^^^'bgd'^^^q=100} SP3={l8@2,0EP=100q=150HAM2({[a`c`d`ea`e`d`c;gb`c`dg`d`cb;fab`cf`cba:gab`dg`d`cb]})['`ebg'^^^]q=100} SP4={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]'bg'^^^^^^^})} SP5={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]SUB{b^b^b^b^}`e^`d#^`e^`f#^})} TR=14DL=HAZ;SPH;SPI;DL=BGN;l16>SP1;SP2;SP2A;SP3;SP4;SP1;SP2;SP2A;SP3; /*15*/FTH={l16[64r]HAM({EP=100@85,0q=80MidiDelay({[4'ae'^r'ge'^r'ae'^:rrrrrrrr]},3,!8)>@56,0q=100EP.T(40,110,!4)MD({[4'ae']},1,!4)rrrr<})} STR FTI={l8EP=90[12r]BR=24p.T(64,64,!4,64,127,!4)@82,0'eg`c'^^^[12r]p=64l16@88,0HAM({`ee`dd`cca"a})l8[12r][BR=24p.T(64,64,!8,64,127,!8)@82,0'eg`c'^]p=64[8r]@85,0EP=80l16HAM({MidiDelay({SUB{d^^rd^^re^^re^^r}g^^rb^^r`c^^r`d^^r},5,!8)})} FT1={HAM({l8M=50EP=110@85,0[3rrMD({'a`e'^},2,!2)[12r]]rrMD({'`ef'^},1,!2)rrrrl16@82,0EP=90SUB{g^rg^rg^g^^^^}`c^r`c^r`c^b^^^^rrrl8})M=0} FT2={@100,0EP=80l4HAM({a^^^g^a^b^^^g^^^a^^^f^^^g^^^})HAM({l8>"g"a"bc"ac#ea<})}FT3={l8[EP=110@56,0HAM({rr'a`e'})[21r]:@100,0HAM({g^a^b^`cr})][8r]} FT4={[l8EP=120@85,0a^a^`cba`e^`d`ca^^^^[8r]:l16@85,0SUB{e^^ra^^rb^^r`c^^r}b^^r`c^^r`d^^r`e^^r][8r]} TR=15DL=HAZ;FTH;FTI;DL=BGN;FT1;FT2;DL=ME2;FT3;FT4;FT1;FT2;DL=ME4;FT3; /*16*/BG1={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG3={@80,0l4EP=110rrl16rrBR=50p.W(127,64,!16)ccp.T(127,0,!8)c^rrp=64EP=127}BG4={EP=110l4rrrBR=50p.T(127,0,!4)@80,0c} TR=16DL=HAZ+7BG3;DL=HAZ+15BG1;BG2;DL=BGN+7BG4;DL=ME2+6BG1;BG2;DL=RF1+7BG4;DL=ME3+15BG4;DL=ME4+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED EURO MIX- FUNCTION D2W(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(D2_TIME+15)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT D2_TIME=330-15INT D2_EST=160K=1 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) D2W(01,01,011,00,0,K,064,4,2,127,09,0)D2W(07,07,035,00,0,K,084,1,2,110,09,0)D2W(13,13,119,00,0,0,___,5,0,127,09,0) D2W(02,02,100,00,0,K,064,2,2,100,09,0)D2W(08,08,012,00,0,K,000,3,2,110,09,2)D2W(14,14,082,01,0,K,___,2,2,127,09,0) D2W(03,03,089,00,0,K,000,2,2,100,10,0)D2W(09,09,012,00,0,K,127,3,2,110,09,2)D2W(15,15,003,00,0,K,096,2,2,110,10,0) D2W(04,04,104,00,0,K,127,2,2,100,10,0)D2W(10,10,025,00,0,0,064,3,1,127,10,0)D2W(16,16,091,00,0,0,084,2,1,127,10,0) D2W(05,05,039,01,0,K,044,2,2,110,09,0)D2W(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// D2W(06,06,049,00,0,K,032,1,2,080,10,0)D2W(12,12,026,00,0,0,064,3,0,127,09,0) DL=D2_TIME+15Tempo=D2_EST;HAZ=D2_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+16NK1=RF2+8INT NK2=NK1+8INT NK3=NK2+8 /*1*/MN1={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}MN1A={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={EP=120a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={EP=127"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} MN3A={EP=127"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={EP=127["a^"a^c"b"ae ^dMidiDelay({c"a},10,!4)[20r]]} TR=1l8>q=97V.W(90,127,!4)DL=ME1;HAM({MN1;MN1A;MN2;MN3;DL=ME3;TrackKey=(K+3);MN1;MN1A;MN2;MN3;TrackKey=K;MN3A}) /*2&3&4*/STR RTS={If(CH==3){l64r}If(CH==4){l128r}l8}RTA={@100,0If(CH==3){@89,0}If(CH==4){@104,0}}STR RTB={@67,0If(CH==3){@66,0}If(CH==4){@68,0}} RTH={EP=100M=100RTS;RTB;a&b`cbrarEP.T(100,60,!1,60,110,!1^2)e^^^^^^^^^^^^^^^^^^^^^^^^EP=100a&b`cbrarEP.T(100,60,!1,60,110,!1^2)`d^^^^^^^^^^^^^^^^^^^^^^^^M=0} RTI={EP=100M=100RTB;a&b`cbrarEP.T(100,70,!4,70,110,!2^4)e^^^^^^^^EP=100`f&`g`f`cr`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^ EP=100a&b`cbrarEP.T(100,70,!4,70,110,!2^4)`d^^^^^^^^EP=100`d&`e`e`er`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^M=0} RT1={l8RTA;EP=127"a[aba`eaba^aba`eaba^fab`cb`c`d:`g^`f`cr`dr`e^]`e^`d^`c^b^}STR RT3={l8[48r]l4EP.T(70,100,!1)SUB{f^^^e^^^}a^^^b^^^} RRF={l8HAM({DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;TrackKey=(K+3);DL=ME4;RT3;TrackKey=K;DL=RF2;RT1;DL=NK2;RTH;RTI})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4q=100a&&^^^`a&&^^^^^^^a^^^f&&^^^`f&&^^^^^^^f^g^q=90l8}BSI={[16a`a][8f`f][4d`d][4e`e]} BS1={[[4a`a][4f`f][4d`d]:[4e`e]]e^d^c^"b^}BS2={l4q=100`f^^^f^^^`e^^^e^^^`f^^^d^^^`e^^^a^^^q=90l8} BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={l4a^^^f^^^d^^^e^^^l8[4a`a][4f`f][4d`d]e^d^c^"b^} BASS={l8<}UL2={EP=110[e^e^d^de^gge^:"g"a"bc^^^"b^"a^"g^"a^"b^cr]"g"a"gSUB{"a^^"a^^"a^"b^^^"b^^}"f^^"f^^"f^"e^^^"e^^r} UL3={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120cccg^g^:gggge^e^g#^g#^]gggab^^^g^^r} UL3A={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120ccc:g^g^gggge^e^g#^g#^]g^^g^ggge^^^^^^r} UL4={EP=100[SUB{e^e^eeef^f}c^c^ccc"a^"aMidiDelay({SUB{ff}"a"a},10,!4)[20r]]} ULMR={l8>q=97DL=ME1+8UL1;UL2;UL3;DL=ME3+8TrackKey=(K+3);UL1;UL2;UL3;TrackKey=K;UL3A;}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2][4O3;rrr]}DM21={[6DM2]O3[7r]O4[7r]}DDH={O3[61r]O1;rO4[63r]}DDI={[3[7DM1][O1;r]][4DM1]O3[15r]} DD1={DM6;DM20}DD2={@17SUB{n49}[4[7DM1]:[O1;r]][4O1]@25}DD2A={[64r]n49[15r]n57[15r]n49[7r]n57[7r][n49rrr][n55rrr]}DD3={SUB{[rrrrn49[59r]]}[3[7DM1][O1;r]][4DM1]O3[7r]O4[7r]} DD4={DM7;DM21}DD5={DM6;DM8}DD6={DM7[6DM2]O3[7r]O4[7r]}DD7={@25[O3[13r]:O1;rO4[13r]O1;r]rr[3DM1][O1;r]DM20} TR=10l16DL=BGN-2@25BR=20p%=3000O3[7r]O5[7r]O4[15r]DL=BGN@25BR=20p%=3000DD1[DD2:SUB{DD2A}]DD3;DD4;DD1;DD2;SUB{DD2A}DD5;DD6[DD4]DD7;DD1;DD2;DDI; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26BR=24p.T(127,127,!1^1,127,0,!1^1,0,0,!1^1,0,127,!1)[16[4GR]GB^^GR]@25}GGI={@26[BR=24p.T(0,127,!1^1^1^1)[8[4GR]GB^^GR]]@25} GG1={[7GP3][16r]}GG2={[32GB;r[GR]]}STR GG2A={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1]GP3} TR=11l16DL=BGN@26BR=20p%=1000PL1;GG1;GG2;GG2A;GG3;GG4;GG1;GG2;GG2A;GG3[GG4][GG1]GGH;GGI; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} PD13={@17BR=20p%=3000[10r][DR;r][DR]p%=64} TR=12l16DL=HAZ+15PD4;DL=BGN;PD3;DL=ME1+7PD13;DL=ME1+15PD4;DL=SB1;PD3;DL=SB1+7PD4;DL=RF1;PD3;DL=ME3+7PD13;DL=ME3+15PD4;DL=SB2[PD3]DL=SB2+15PD4;DL=RF2[4PD3]DL=NK3+7PD4; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16EP=80@100,0"a"e"a"bcdefe"aefa`e`g`a<})} STR FT2A={HAM({@100,0EP=80l8MD({Div{fa`c}`e^^},3,!2)[12r]MD({Div{egb}`e^^},3,!2)[12r]MD({Div{dfg}a^^},1,!2)rrrrMD({Div{ega}b^^},1,!2)rrrrMD({Div{fab}`c^^},1,!2)rrrrMD({Div{gb`c}`d^^},1,!2)rrrr})} FT3={HAM({[@85,0l4EP=110M=100r'a"a`e'^^^^rrrrrr:EP=100M=0@100,0gab`c]})rrl8rl16@117,0EP=127M=0HAM3({<`c`cg^rr>})} FT4={HAM({[l8@82,0EP=127[13r]BR=9p.T(64,64,!16,64,127,!16)'`c'^^^[7r]p=64:l16@100,0geeg#eebee`cee`de`ee]})[8r]} TR=15DL=BGN-2FTA;FT;DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;TrackKey=(K+3);FT2;FT2A;FT3;FT4;TrackKey=K;FT4[FT1]FTH;FTI; /*16*/BGH={@120,0EP.T(30,127,!1)'cde'^^^}BG1={l4BR=32p.T(32,96,!1)@30,0'aec'^^^}BG2={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64} BG4={l4BR=32rrp.T(32,96,!2)@30,0'aec'^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG6={@82,1l1BR=24SUB{p.T(0,127,!1,127,0,!1,0,127,!1,127,0,!1)}'ae'^^^SUB{FOR(INT A=1;A<30;A++){l(A)p.T(127,0,!A)r}l1}'ae'^^^}STR BG7={@82,1l4BR=24p.T(127,0,!1)'ae'^^^} TR=16DL=BGN-2BGH;DL=BGN-1BG1;DL=ME2+6BG2;DL=SB1+7BG4;DL=ME3+8BG5;DL=ME4+6BG2;DL=SB2+15BG4;DL=NK2+7BG7;DL=NK3;V.T(100,127,!1^1^1^1^1^1^1^1)BG6; //------------------------------------HOLY NIGHT INT HN_TIME=452-17INT HN_EST=160K=2FUNCTION HNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(HN_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) HNW(01,01,012,08,0,K,064,4,2,127,09,0)HNW(07,07,088,00,0,K,084,1,2,120,09,0)HNW(13,13,119,08,0,0,___,5,0,110,09,0) HNW(02,02,099,01,0,K,054,2,2,127,09,3)HNW(08,08,012,00,0,K,000,3,2,100,09,2)HNW(14,14,006,08,0,K,127,2,2,120,09,0) HNW(03,03,103,02,0,K,074,2,2,120,10,8)HNW(09,09,012,00,0,K,127,3,2,100,09,2)HNW(15,15,003,00,0,K,096,2,2,110,10,0) HNW(04,04,005,24,0,K,000,2,2,120,09,0)HNW(10,10,025,00,0,0,064,3,1,127,10,0)HNW(16,16,091,00,0,0,084,2,1,120,10,0) HNW(05,05,039,01,0,K,044,2,2,120,09,0)HNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// HNW(06,06,103,00,0,K,032,1,2,080,10,0)HNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=HN_TIME+17Tempo=HN_EST;HAZ=HN_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+12 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+12NK1=RF2+8ME5=NK1+16NK3=ME5+8INT NK4=NK3+9 /*1*/MN1={V=100[a^^a#a^^r:g^^ag^^r]`c^^af^^r;a#^aa#^`c`d^`c^`d`c^a#a^g^rag^raa#^r`c`c^^r}MN1A={V=100[a^^a#a^^r:g^^ag^^r]`c^^`d`f^^r;a#^aa#^^g^a#^aa#^^g^`c^`d`c^^`d^`e^`d`c^^^r} MN2={V=110`d^`c`c^^a#^a^ga^^a#^`c^a#a#^^a^g^f#g^^a^;a#^da#^^d^f^ef^^g^a^a#a^f#ga`d^^^^rrr} MN3={V=120`f^`e`f^^`d^`f^`e`f^^`a^`g^`e`e^^`c^`d^^r`f#`g`f#`g;`a^`f`f^^`d^`a^`f`a#^^`a^>g^g`c^^g^a^^^^rrrf^fd^^"a#^"a#^^^^^^rf^fd^^"a#^"a^^^^^^r<}MN4={V=110[MD({g^rag^raa#^r},2,!8)MidiDelay({`c`c^^r},12,!4)[16r]]} TR=1l8HAM({DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2;MN3;DL=ME5;MN4}) /*2&3&4*/RT1={"a#^`d^`c^a#^a^g^a^a#^;c^`c^a#^a^g^f#^g^a^;"g^a#^a^g^f^e^f^g^f^c^"a^c^f^^^^^^^} RTH={[["a#^`d^][4"a#]"a#^`d^:"a#^`d^`c^a#^aaaaa^a^]"a#^`d^r"a#`d^} RRF={l8DL=BGN;HAM({RT1;DL=RF1;RT1;DL=RF2;RT1;DL=NK4;RTH;})}TR=2;>P.W(10,117,!8,117,10,!8)RRF;TR=3P.W(117,10,!8,10,117,!8)RRF; /*5*/BS1={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][8"ff]<}BS2={[4f`f][4`c``c][4d`d][4a`a][8a#`a#][8`c``c]} BS3={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][4"aa]d^^^^^^^<}BS4={>[[8"a#a#][4"aa][4d`d]][12"a#a#]"a^^^^^^^<} BS5={>[[4"a#a#][4"a#]["a#a#]:[4"a#a#][4c^]]["a#^]rr"a#^<} BASS={l8<<d^dd^"a"a"af#^^^^rrr<} UL3={EP=120SUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`c`c^^a^a^^}a#^a#a#^^f^a#^a#a#^^`d^`c^aa^^e^f#^^r;`d`d`d`eSUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`e`e^^`e^`f#^^^^}a#^a#a#^^f^a#^a#a#^^`d^`c^`c`c^^`c^`d^^^^rrrSUB{[`d^`d`f^^`g^`e^^^^^^^]}a#^a#a#^^f^f^^^^^^ra#^a#a#^^f^e^^^^^^r} UL4={EP=110[MD({e^rfe^rfc^r},2,!8)MidiDelay({ee^^r},12,!4[16r]]} ULMR={l8DL=ME1+8UL1;UL2;UL3;DL=ME3+8UL1;UL2;UL3;DL=ME5;UL4}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[15r]}PD3={SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]} DD1={DM6;DM20}DD2={SUB{[12r]n49[15r]n57[15r]n53}SUB{[58r]n49rn49rrr}DM6;DM8}DD3={DM7;DM13}DD4={[DM7][6DM2]O3[15r]}DD5={[[DM2][5O1;r]rrO2;rrr:[DM2][3DM1][4O1]]O1;rrrO2;rrrrrO1;rO2;rrr} TR=10l16DL=BGN@25BR=20p%=3000SUB{PD3}DD1[DD2]DD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{O3}PD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{PD3}O3[63r]O4[55r]EP.T(70,127,!1)[8O1]DD3;DL=NK4;DD5; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]}PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127} GG1={[7GP3][16r]}GG2={[7GP3]GP2}GG3={[7GP3]PD4}GG4={[11GP1][16r]}GG5={[[4[GR]GB;r][4GR;GA;GB;GR]:[4GR;rGB;r][4GB;rrr]][4GB;rrr]} TR=11l16DL=BGN@26BR=20p%=6000GG1[GG2]GG3;GG4;GG1[GG2]GG3;GG4;GG1[GG2][GG3][16DR]DL=NK4;GG5; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} STR JJ1={[7GP8][16r]}STR JJ2={[7GP8]GP3}STR JJ3={[7GP8]EP.T(90,127,!1)[8TA]l32[16TA]l16}STR JJ4={[11GP1][16r]} TR=12l16DL=BGN@25BR=20p%=5000JJ1[JJ2]JJ3;JJ4;JJ1[JJ2]JJ3;JJ4;JJ1[JJ2][JJ3][16DR]n49 /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} STR DS18={l32`e`d#`d`c#`cba#ag#gf#fed#dc#<`e`d#`d`c#`cba#ag#gf#fed#dc#>l16}STR DS19={`e`d#`d`c#`cba#ag#gf#fed#dc#} TR=13l16PAAA; /*15*/FT1={l8[24r]EP=100@89,0HAM3({>gf#gaMidiDelay({dga`d},4,!2)<})[24r]@81,1EP.T(80,127,!1)l4'f`ca'^^^} FT2={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4f^^^g^a^g^^^EP.T(70,110,!1)@83,0'`cge'^^^} FT2A={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4>f^^^g^a^g^^^l16EP=127@100,0cefgMidiDelay({efg`c},8,!4)<[8r]} FT3={HAM({l4EP.T(70,100,!1)@83,0'`da#'^^^l8@85,0EP=100r'ge'r'af'r'a#g'r'`ca'l4EP.T(70,100,!1)@83,0'`ca'^^^})l16EP=100@100,0HAM3({>gf#gaMidiDelay({dga`d},4,!4)<[8r]})HAM({l4EP.T(70,100,!1)@83,0'a#f'^^^l8@85,0EP=100r'd"g'r'e"a'r'f"a#'r'gd'l4EP.T(70,100,!1)@83,0'ad'^^^rrrr})} FT4={l8[24r]l16EP=100@99,1HAM3({>gf#gaMidiDelay({dga`d},8,!4)<})l8[28r][32r]@81,1EP.T(60,127,!1)l4'`cae'^^^} FT5={l8[[16r]@15,9HAM({`g`f`e`ca#gfdc^^^^^^^})]} TR=15DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;FT2;FT2A;FT3;FT4;DL=NK1;FT2;FT2A;FT5;FT3@99,1l8EP=120HAM({d^f^g^a^}) /*16*/BGH={@82,1EP=127l1BR=36SUB{FOR(INT A=1;A<29;A++){l(29-A)p.T(127,0,!(29-A))r}l1}'ae'^^^EP=127} BG1={@123,3BR=48p.T(127,32,!1)l4'cg`c'^^^p=64}BG2={@120,0l4EP.T(100,127,!1)'cde'^^^}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64}BG5={@125,5l4BR=24p.T(0,127,!1)'cde'^^^p=64}BG6={@126,8l4BR=20p=80'cde'^^^p=64}BG7={l4<@128,3P=70p.T(64,64,!4,70,127,!2)'a"a`a'^^r>p=64} TR=16DL=BGN;V=127BGH;V=100DL=BGN+7BG1;DL=ME1+7BG2;DL=ME1+8BG3;DL=ME1+15BG4;DL=ME2+7BG5;DL=SB1;BG7;DL=SB1+7BG1;DL=SB1+11BG6;DL=RF1+7BG1;DL=ME3+7BG2;DL=ME3+8BG3;DL=ME3+15BG4;DL=ME4+7BG5;DL=SB2;BG7;DL=SB2+7BG1;DL=SB2+11BG6;DL=RF2+7BG1; DL=NK1+7BG2;DL=NK1+8BG3;DL=NK1+15BG4;DL=ME5;BG7;DL=ME5+4BG7;DL=ME5+7BG3;DL=NK3+7BG5;DL=NK3+8BG2;DL=NK4;BG7;DL=NK4+3BG5;DL=NK4+4BG3;DL=NK4+6BG2; //------------------------------------DARKNESS NIGHT MARE FUNCTION DNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(DN_TIME+18)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT DN_TIME=588-18INT DN_EST=158K=2 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DNW(01,01,012,00,0,K,064,4,2,127,09,0)DNW(07,07,039,01,0,K,084,1,2,120,09,0)DNW(13,13,119,00,0,0,___,5,0,127,09,0) DNW(02,02,109,00,0,K,064,2,2,100,09,0)DNW(08,08,012,00,0,K,000,3,2,100,09,2)DNW(14,14,082,01,0,K,___,2,2,127,09,0) DNW(03,03,103,00,0,K,000,2,2,090,10,0)DNW(09,09,012,00,0,K,127,3,2,100,09,2)DNW(15,15,003,00,0,K,096,2,2,110,10,0) DNW(04,04,097,00,0,K,127,2,2,100,10,0)DNW(10,10,025,00,0,0,064,3,1,127,10,0)DNW(16,16,091,00,0,0,084,2,1,127,10,0) DNW(05,05,039,00,0,K,044,2,2,120,09,0)DNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DNW(06,06,020,16,0,K,032,1,2,080,10,0)DNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=DN_TIME+18Tempo=DN_EST;HAZ=DN_TIME+1BGN=HAZ+18ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16 ME3=RF1+8ME4=ME3+8SB2=ME4+8RF2=SB2+16NK1=RF2+8ME5=NK1+8ME6=ME5+8NK2=ME6+8NK3=NK2+8 /*1*/MNH={} MN1={EP=110[a^^^agfg^^:e^^^^rg^^^gfef^^d^^^^r]e^eefga#^^a#a#agaf^^r} MN2={EP=120f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^r;f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^ra#^a^;g^fg^^e^g^fg^^a#a^^^^^aga^^^^`c#^^^} MN3={EP=127[`d^`c#^`d^`e`f^r`d^`a^`d^`a^^^^`g`f:`g^^^^^^^r`c^b^`c^`d`e^r`g^`a#^`a#^`a#^^^^`a#``c`a^^^^^^^r]`g^^^r`f^`e^`f^^a^^`f^`e^^`c#^^`e^`d^a`f^^`g^`a^^^^rrr} TR=1l8>q=95HAM2({DL=ME1;MN1;MN2;MN3;DL=ME3;MN1;MN2;MN3;})V=110DL=NK2-1MNH;DL=NK3-1MNH;DL=NK3+8l1<@127,0EP.T(80,127,!1^1^1,127,70,!1^1)'cde'^^^^^ /*2&3&4*/RT={l16EP=120[`d`drr][5`d]r`d`d}RT1={l8EP=127`d^a^`da`f`e^^a^`ea`g`f^^a^`f`g`a`f`d^`c`d^`d`e`f;`f^a#^`fa#`f`e^^a^`ea`e`d^^g^`d`c#`d`e`c#^`e`a^^^^} RT3={l4[16r]EP.T(60,100,!1^1^1)'ga#'^^^'eg'^^^'`c#a'^^^EP.T(60,110,!2)'`c#a'^^^}STR RT4={l4[16r]EP.T(70,120,!1^1^1^1)'fa#'^^^'g`c'^^^'a`d'^^^'e`c#'^^^} RRF={l8DL=BGN-1HAM({RT;DL=BGN;RT1;DL=ME2;RT3;DL=SB1+8RT4;DL=RF1;RT1;DL=ME4;RT3;DL=SB2+8RT4;RT1;DL=ME6;RT3})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/STR BBS={l16q.T(10,100,!1)[16"a]l8}STR BS={l4q=100d^^^l16[ddrr][5d]rddl8q=90}STR BSA={q=100l16[ddrr][5d]rddl8q=90}BSH={q=100l4TrackKey=(K-2)e^^^"e^^^f#^^^"f#^^^g^^^"a^^^b^^^"b^^^l8q=90TrackKey=K}BSI={TrackKey=(K-2)[8"ee][8"f#f#][4"gg][4"aa][4"bb]"b^^^^^^^TrackKey=K} BS1={[4d`d][4c#`c#][4c`c][4"bb][4"a#a#][4"aa][4"gg][4"aa]}BS2={[[4d`d][4c#`c#][4e`e][4d`d]]}BS3={[6"a#a#][c`c][8d`d][4"a#a#][4"gg][4"aa]"a^^^^^^^} BS4={[8d`d][8"gg][4e`e][4c#`c#][4d`d][4"aa];[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}BS5={[d^^^^^^^c#`c#c#`c#^^^^e^^^^^^^:d`dd`d^^^^][4d`d]} BS6={[14d`d][c`c][8"a#a#][4"gg][4"aa]}BS7={l4q=100"a#^^^^^c^d^^^^^^^"a#^^^"g^^^"a^^^"a^^^q=90l8}BS8={[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}STR BS9={q=100l4d^^^c#^^^c^^^"b^^^"a#^^^"a^^^"g^^^"a^^^l8} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O1;rrrO1;rO2;rrrO1;rO6;rrr}DM21={[6DM2]O3[7r]['n51n46'rrr]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr} DM24={[6DM2]O1;rrO1;O2;r[3O1;r]O2;rO1;r}STR DM25={SUB{n49[15r]n57[15r]n55[15r]n49}[6DM2]O3[9r]O1;rO6;rrr} STR DDD={@17BR=20p%=4000EP.T(20,127,!1)[16O1]@25BR=20p%=2000}DD={O3[15r][[O1]rr][5O1]rO1;O1}STR DDA={[[O1]rr][5O1]rO1;O1}DDH={@17BR=20p%=4000MidiDelay({[4O1;rrrrrO1;rO6;rrrO1[19r]]},3,!4)@25BR=20p%=2000}DDI={@33[4[7DM1]:[O1;r]][4O1]@25} DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM6;DM22}DD4={DM7;DM24;DM7;DM25}DD5={[4O3[15r]:O1;rrrO4[5r]O1;rO6;rrr]O3[7r]['n51n46'rrr]} TR=10l16DL=BGN-1DDA;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD5;DD3;DD4;DDH;DDI;DD2;DD3;DD4;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} STR GG={GB[15r][[GB]rr][5GB]r[GB]}STR GGA={[[GB]rr][5GB]r[GB]}GGH={[32GB;rrr]}GGI={[32GB;r[GR]]}GG1={[7GP3]GP1}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[[7GP1]:GP3][4GB;rrr]}GG5={[4[4GB;rrr]:[[GR]GB;r][GB;r[GR]]]GP3} TR=11l16DL=BGN-1@26BR=20p%=1000PL1;GGA;DL=BGN@26BR=20p%=1000GG1;GG2;GG3;GG4;GG1;GG5;GG3;GG4;GGH;GGI;GG2;GG3;GG4;GB; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[4PD3]DL=NK2[PD3]DL=NK3+8MD({n51},16,!8) /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DSH={p.T(0,127,!1)BR=24[16e]rp=64}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} TR=13l16EP=127DL=BGN;PG1;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+3DS6;DL=ME1+7DS2;DL=ME2+3DS13;DL=ME2+7DS6;DL=SB1+7DS1;DL=SB1+15DS6;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+3DS6;DL=ME3+7DS2;DL=ME4+3DS13;DL=ME4+7DS6;DL=SB2+7DS1;DL=SB2+15DS6;DL=RF2+3DS6;DL=RF2+7DS7;DL=NK1+3DS6;DL=NK1+7DS7;DL=ME5+3DS6;DL=ME5+7DS2;DL=ME6+3DS13;DL=ME6+7DS6;DL=NK2+1DS12;DL=NK2+3DS14;DL=NK2+5DS10;DL=NK2+7DS15;DL=NK3+3DS13;DL=NK3+7DS6; /*14*/SPH={v=100l16@6,8HAM({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]})} SPI={v=100l16@5,24HAM({MD({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]},1,!1)})} SP1={l8v=110@4,0d"ae"af"aa"a;c#"ae"ag"aa"a;c"af"ag"aa"a;"b"ga"gg"gf"g;"a#"fd"fe"ff"f;"a"fc"fd"ff"f;"g"d"a"d"a#"dd"d;"a"e"b"ec#"ee"e} SP2={l8v=100@1,0[d"ae"af"aa"a;c#"ae"ag"aa"a;e"af"ag"aa"a;d"ae"af"aa"a]}SP3={l8v=110@2,0["a#"fd"f:e"ff"f]ecfc[d"ae"af"aa"a]"a#"fd"fe"ff"f;"g"e"a"e"a#"ed"e;"a"ec#"ed"ee"e['aec#'^^^]} SP4={l8v=120@3,0[[d"ae"af"aa"a][gdada#d`dd]:ecgca#c`cc;ec#gc#a#c#`c#c#[d"ae"af"aa"a]]f"a#a"a#a#"a#`d"a#;gcaca#c`cc;f"ag"aa"aa#"a'a`c#'^^^^^^^} TR=14DL=BGN;P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)SP1;SP2;SP3;SP4;SP1;SP2;SP3;SP4;DL=NK1;SP1;SP2;SP3;SPH;SPI; /*15*/FT={l16EP.T(30,127,!1)@5,24HAM2({"ac#dedefgfgaa#aa#`c`d})}FTH={@35,0EP=110TrackKey=(K-2)l16MidiDelay({[[3'bg`e'rr]r[3'bg`e'r]][[3'af#`f#'rr]r[3'af#`f#'r]][3'bg`g'rr]r[3'bg`g'r][3'aa`c'rr]r[3'aa`c'r][3'b`g`e'rr]r[3'b`g`e'r][3'f#`f#b'rr]r[3'f#`f#b'r]},3,!16)TrackKey=K} FT1={l4EP=127@3,0CO1}FT2={@5,8EP=90l8>['afd'^^^^^^^c#c#ea^^^^'gec#'^^^^^^^:ddfa^^^^]d"af"aa"a`d"a<} FT3={HAM({l8EP=100M=127rr@85,0'a#fd'^^^^^^^^^[6r]'`daf'^^^^^^^^^rrrrEP=100@56,0'ga#'[7r]'eg'[7r]'`c#a'[7r]})l16@81,0c#defgaa#`c#;ab`c#`d`e`f`g`aM=0} FT4={EP=127@4,0SUB{l16[64r][48r]HAM({SUB{f^^ffrfrfrfrf^^f}a^^aarargrgra^^a})}l4CO4} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=NK1;FT1;FT2;FT3[FTH] /*16*/BG1={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG2={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={EP=127l4@120,0'cde'^^^} BG4={@125,5l4BR=20P=80p.T(0,127,!1)'`c`d'^^^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} TR=16DL=BGN+7BG4;DL=ME2[BG5]DL=ME2+6BG1;DL=SB1+6BG2;DL=RF1+7BG4;DL=ME4[BG5]DL=ME4+6BG1;DL=SB2+6BG2;DL=RF2;BG5;DL=RF2+4BG5;DL=RF2+7BG4;DL=ME6[BG5]DL=ME6+6BG1; DL=NK2+6BG1;DL=NK3+6BG2; //------------------------------------U&I K=2INT UI_TIME=722-17INT UI_EST=160 FUNCTION UIW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} FUNCTION UI2(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+24)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) UI2(01,01,083,00,0,K,064,4,2,127,09,0)UIW(07,07,088,00,0,K,104,1,2,127,09,0)UIW(13,13,119,00,0,0,___,5,0,127,09,0) UIW(02,02,082,00,0,K,074,2,2,080,09,6)UIW(08,08,083,00,0,K,000,3,2,100,09,2)UIW(14,14,082,01,0,K,020,2,2,127,09,0) UIW(03,03,064,00,0,K,000,2,2,080,10,6)UIW(09,09,083,00,0,K,127,3,2,100,09,2)UIW(15,15,003,00,0,K,096,2,2,110,10,0) UIW(04,04,063,00,0,K,127,2,2,080,10,0)UIW(10,10,025,00,0,0,064,3,1,127,10,0)UIW(16,16,091,00,0,0,084,2,1,120,10,0) UIW(05,05,039,01,0,K,024,2,2,127,09,0)UIW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// UIW(06,06,103,00,0,K,032,1,2,090,10,0)UIW(12,12,026,00,0,0,064,3,0,127,09,0) DL=UI_TIME+17Tempo=UI_EST;HAZ=UI_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8SB2=ME4+8 ME5=SB2+16RF2=ME5+8ME6=RF2+8INT ME7=ME6+8NK1=ME7+8NK2=NK1+8INT RF3=NK2+8 /*1*/MN1={V=100rrgggd^rb^a^g^f#^f#gre^^^rg^f#^e^de^^^rr`c`c`c`c^`d^`e`e^`e`d^^`cb^`c`d^^^`d`e`f#^r}MN2={V=110`g^`f#^`eb^b`d^`e`d^`d`e`f#`g^`f#^`g`a^`a`f#^`e`d^^^r;`e`e`e`d^^`e^`g`g`g`f#^^`g^`f#^^`e`f#^`g`a^^`b`a^^^r} MN3={>V=120[b^b^b^rb^aba^f#f#g:aaaaaf#^a`c#`d`c#b^^^r]aaaa`c#^^`c#b^`c#`d#^^^^*>[b^a^gf#^e^rc#^e^b^:a^g^f#a^d^r"b^d^a^;g^gg^^f#^e^c#^d^e^f#^^^^^^rd#^d#e^^f#^]`c#^b^ag^f#^rf#^`d^b^;`d^`c#`d^`e`f#^`e^`c#`e^`f#`g^`g^^^^^`a`f#^^^^^rrr<*/} MN4={>V=120[`f#`f#`f#`f#^bab`f#`f#`g`e^`d`c#`d`e`e`e`e^:`a^`e`e`d`e`f#^^^r]`c#^ab&&^^^`b^^^<} TR=1l8q=97DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2[MN3]MN4;DL=RF3+7@3d#d#rd#rd#rd#}) /*2&3&4*/RA={M.W(60,120,!1)@68,0If(CH==3){@60,0}If(CH==4){@72,0}}RB={M=60@82,0If(CH==3){@64,0}If(CH==4){@63,0}}RT1={EP=120SUB{[gggg^gg^]e^d^d^e^c#^c#deeee[aaaa^aa^]f#^f#^f#^f#^d^ddf#f#bb;[bbbb^bb^]b^a^a^g^e^^ef#ede[aaaa^aa^]f#^^^f#^ab^^^^^^} HAM({[bbbb^bb^]b^a^a^b^a^af#f#gab[`c#`c#`c#`c#^`c#`c#^]`c#^b^b^`c#^b^b`c#`d`e`f#`f#;[`f#`f#`f#`f#^bb^]`f#^`e^`e^`d^`c#^^`c#`d`c#b`c#[`e`e`e`e^`e`e^]`d#^^^`d#^`e`f#^^^^})} RT3={l4[16r]EP.T(70,127,!1^1^1)SUB{g^^^g#^^^a^^^}`c^^^`c#^^^`d^^^l16} RRF={l16DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;DL=ME4;RT3;DL=RF2;RT1;DL=ME7;RT3;DL=RF3;TrackKey=(K+3)RA;RT1;RB;TrackKey=K;}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BS1={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS2={[8"gg][8"ee]>[8"cc]<[8"dd]}BS3={[[4"ee][4"bb]][4"cc][4"c#c#][4"dd]"d^^^^^^^} BS4={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS5={l4q=100[e^^^"b^^^]l8q=90[4"cc][4"c#c#][4"dd]"d^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[6DM2]l8O3;r[O4]rrrrl16} DDH={@33[4MD({O1;rrO1;O2;r[[O1]r]O2;rO1;r},1,!1)[16r]]@25}DDI={@26[SUB{O1}MD({n49},8,!8)[15r]O1;rrO1;O2;r[[O1]r]O2;rO1;r]@25DM21} DD1={DM6;DM13}DD2={DM6;DM8}DD3={DM6;SUB{n49[15r]n57[15r]n55}DM20}DD4={DM6;DM21}DD5={DM6;DM7} TR=10l16DL=BGN;V=127BR=20p%=4000DD1;DD2;DD3;DD4;DD1;DD2;DDI;DD5;DD4[DD1]DD2;DD3;DD1;DD4;DD1; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26[4MidiDelay({GB},15,!8)[31r]]@25}GGI={[MD({[4GR;rGB;r]},1,!2)[16r]][3GP2]n49[7r]n57[7r]} GG1={[7GP3]GP2}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1][4GB;rrr]}GG5={[8GP1]} TR=11l16DL=BGN;PL1;V=127BR=20p%=5000GG1;GG2;GG3;GG4;GG1;GG2;GGI;GG5;GG4[GG1]GG2;GG3;GG1;GG4;GG1; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;V=127PD3;DL=SB1[PD3]DL=ME4+7PD4;DL=SB2[4PD3]DL=NK1[3PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16`daf#<'^^^^^^^p=64} FT4={HAM({[l8@82,0EP=100MD({SUB{`d^`d^`d^r`d^`d`d`c#^}b^b^b^rb^aba^},1,!8)[11r]:>EP=127@100,0bef#abf#d"b<]>EP=127@100,0"bdef#"bef#b<})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]FTH;FT1;FT2;FT3;FTH;FTI;TrackKey=(K+3)FT1;TrackKey=K; /*16*/BG1={@120,0l4'cde'^^^}BG2={@126,7l2BR=46p=127EP.T(110,127,!1)a^^^rrrrp=64}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64} TR=16DL=ME2;BG3;DL=ME2+7BG4;DL=SB1+7BG1;DL=ME4;BG3;DL=ME4+7BG4;DL=SB2+15BG1;DL=ME5+7BG1;DL=ME7;BG3;DL=ME7+7BG4;DL=NK1+6BG2;DL=NK2+7BG1; //------------------------------------BE MY LOVER INT K=1INT BM_TIME=850-17INT BM_EST=159 FUNCTION BMW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(BM_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) BMW(01,01,012,00,0,K,064,4,2,127,09,0)BMW(07,07,035,00,0,K,084,1,2,120,09,0)BMW(13,13,119,09,0,0,___,5,0,127,09,0) BMW(02,02,004,00,0,K,064,2,2,120,09,0)BMW(08,08,012,00,0,K,000,3,2,100,09,2)BMW(14,14,082,01,0,K,___,2,2,127,09,0) BMW(03,03,003,00,0,K,000,2,2,122,10,0)BMW(09,09,012,00,0,K,127,3,2,100,09,2)BMW(15,15,003,00,0,K,096,2,2,110,10,0) BMW(04,04,002,00,0,K,127,2,2,127,10,0)BMW(10,10,025,00,0,0,064,3,1,127,10,0)BMW(16,16,091,00,0,0,084,2,1,120,10,0) BMW(05,05,039,01,0,K,044,2,2,120,09,0)BMW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// BMW(06,06,030,00,0,K,032,1,2,070,10,0)BMW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=BM_TIME+17Tempo=BM_EST;HAZ=BM_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16NK1=RF2+8NK2=NK1+8ME5=NK2+8ME6=ME5+8 /*1*/MN1={EP=110[e^ee^ef#ed"b^"b^ddef#^f#f#^f#f#:gf#e^e^^^r]ge^^r}MN2={EP=120e^d^[e^gg^^gg^^f#^d^"b^e^gg^^:ga^^b^b^^r]a^b^^^} MN3={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^^rr}MN4={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^MN3} TR=1l8q=96DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2;MN4;}) /*2&3&4*/RT={If(CH==3){l128rl8}If(CH==4){l64rl8}}RT1={q=110RT[egbebegbdf#bdbdf#bcegcgcegdf#ad:adf#a]'ad'^^^} RT2={If(CH==2){l8q=160EP=90@30,0HAM2({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})}Else{l8>@82,0BR=10If(CH==3){p%=100}Else{p%=-100}EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<}} RRF={l8DL=BGN;RT1;DL=RF1;RT1;DL=RF2;RT1;DL=ME6;TrackKey=(K-1)RT2;TrackKey=K}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4BR=24q=100e&&^^^`e&&^^^e^^^^^^^c&&^^^`c&&^^^"a^^^"b^^^l8q=90}BSI={[16e`e][8c`c][4"aa]b^^^^^^&&"b} BS1={[[4e`e][4d`d][4c`c]:[4d`d]][d`d]BR=12`d^^&&d}BS2={[[4e`e][4"bb][4d`d][3c`c]:d`d]c`c} BS3={[[4"aa][4"bb]:[6c`c]["bb]][4c`c]"b^^^^^^^}BS4={[[4e`e][4d`d][4c`c][4g`g]]}BS5={l4q=100"a^^^"b^^^c^^^^^"b^q=90l8[4"aa][4"bb][4c`c]"b^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n38n40n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[7DM2][O1;r]O2;rO1;r}DM22={[7DM2]O3[7r]}DDH={[3[7DM1][O1;r]][4DM1]O3;rrrEP.T(60,127,!2^4)[6O1;r]}DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM7;DM13}DD4={DM6;DM22}DD5={@26l8[O1;rrO1;O2;rO1;rrrrO1;O2;rO1;r]l16@33DM13} TR=10l16DL=BGN;BR=20p%=1000@33DD1;DD2;DD3;DD4;DD1;DD2;DD5[DD4]DD1;DDH;DD1;DD2;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GGI={[7GP2]GB[15r]}GG1={[8GP2]}GG2={[7GP2][GR;rGB;r][GB;rrr]}GG3={[7GP2]GB[15r]}GG4={[7GP2][GR;rGB;r]GB[7r]} GG5={l8[8GB;rrr]l16[3GP2]GB[15r]} TR=11l16DL=BGN@26BR=20p%=-1000PL1;GG1;GG2;GG3;GG4;GG1;GG2;GG5[GG4]GG1;GGH;GGI;GG2;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17}PD13={[56r]rr['n28n39'r]rr} TR=12l16DL=BGN;BR=20p%=2000SUB{PD3;PD13}GG1;GG2;GG3;SUB{[PD3]PD13}GG4;GG1;GG2;GG5;SUB{[3PD3]}[GG4]GG1;SUB{PD3}GGH;GGI;SUB{PD13}GG2;GG3; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16f#gf#^d^l8bagagf#gf#ed^"b^d})} FT1={HAM({l8@103,0EP=90SUB{[e^^^^^^^d^^^^^^^c^^^^^^^d^^^^^^^]}[b^^^^^^^b^^^^^^^g^^^^^^^a^^^:`d^`c^]@104,0EP.T(60,110,!1)'af#`d'^^^})} FT2={EP=100@1,0l8HAM({['`eb'ab'`eb'^^'`eb'^'`da'ab'`da'^^'`da'^'`f#b'b`d'`f#b'^^'`f#b'^:'`e`c'^^'`e`c'^^'`f#`d'^]'`e`c'^^^SUB{g^a^}`e^`d^})} FT3={EP=100@100,0HAM({l8b^^^^^^^a^^^b^^^g^^^^^^^^ege`d`cb`cb^^^^^^^a^^^b^^^g^^^^^^^ @104,0EP.T(70,127,!1)'f#b"b'^^^^^^r})}FT4={HAM({[[@85,0EP=110l8rrMD({'bg'^},3,!4)rrrr:rrMD({'ad'^},3,!4)rrrr]:>EP=90@100,0`dgb`d^gb`d<]@100,0l16[8r]EP.T(70,127,!2)'bge'^^^^^^^})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]DL=NK1[FTH]FT2;FT3; /*16*/BG1={l4@120,0'cde'^^^}BG2={l4@126,8BR=20p%=8000'cde'^^^rrrrp=64}BG3={@126,8BR=20p%=8000l4EP.T(127,0,!1^2)'cde'^^^^^rrrrp=64} TR=16DL=ME1+7BG1;DL=ME2+7BG2;DL=ME3+7BG1;DL=ME4+7BG2;DL=NK1+7BG1;DL=NK2+7BG2;DL=ME5+7BG1;DL=ME6+7BG2; //------------------------------------KAMIKAZE SUICIDE SQUAD K=0INT KZ_TIME=962-9INT KZ_EST=160 FUNCTION KZW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(KZ_TIME+9)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) KZW(01,01,012,00,0,K,064,4,2,127,09,0)KZW(07,07,039,00,0,K,084,1,2,120,09,0)KZW(13,13,119,09,0,0,___,5,0,127,09,0) KZW(02,02,082,01,0,K,064,2,2,110,09,9)KZW(08,08,012,00,0,K,000,3,2,110,09,2)KZW(14,14,082,01,0,K,___,2,2,100,10,0) KZW(03,03,063,00,0,K,000,2,2,100,10,0)KZW(09,09,012,00,0,K,127,3,2,110,09,2)KZW(15,15,003,00,0,K,096,2,2,110,10,0) KZW(04,04,082,00,0,K,127,2,2,100,10,0)KZW(10,10,025,00,0,0,064,3,1,127,10,0)KZW(16,16,091,00,0,0,084,2,1,120,10,0) KZW(05,05,039,01,0,K,044,2,2,120,09,0)KZW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// KZW(06,06,049,00,0,K,032,1,2,080,10,0)KZW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=KZ_TIME+9Tempo=KZ_EST;HAZ=KZ_TIME+1BGN=HAZ+24ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16ME5=RF2+8ME6=ME5+8NK1=ME6+8NK2=NK1+8RF3=NK2+8ME7=RF3+8INT SB3=ME7+8INT RF4=SB3+16INT END=RF4+16 /*1*/MNH={V=110[`c#^f#^a^b`c#^`c#f#f#:ab^r]MidiDelay({ab},8,!4)}MN1={V=100[a^ag#rf#ref#^c#^^rf#f#g#a^g#g#abr:`c#^`c#aabg#r]`c#^`c#`c#b`c#^^r}MN2={V=110[b^a^g#f#^b^baag#f#^r:a^g#^f#e^c#^^^rf#g#aa]g#^g#g#^aaf#g#^^^^rrr} MN3={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#e^rf#^f#^a^b`c#^`d`c#`d`c#^^r}MN4={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#erf#^^^^^^^r`c#^f#^ag#^r}MN5={[a^ag#rMD({f#re},6,!2)[24r]]} TR=1l8>DL=HAZ+8HAM2({MNH;DL=ME1-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME3-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME5-1[7r]MN5;DL=NK2;MNH;DL=ME7;MN2;DL=SB3;MN3;MN4;}) /*2*/STR RGH={l8q=160EP=90@30,0HAM({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})} STR RGI={l16q=160EP=127M=127HAM({[10r]@30,0"ac#ef#g#a`c#^^b^rb^^`c#`c#^`c#^^^^^^[7r]@31,0ag#f#edc#;g#^c#^a^c#^b^c#`c#^^^^^^[8r]<@31,0f#&&^`f#^f#^[10r]@30,0f#&&^`f#^f#^>})} STR RG1={@31,0l16q=160EP=127HAM({[[[10r]c#ef#c#f#g#]:[[10r]ef#g#eg#b]]})}STR RG2={@31,0l16q=160EP=110HAM({[58r]BR=48"c#^&&``c#^^[65r]})} STR RG3={@30,0l4q=110EP.T(60,127,!1^1^1^1^1^1^1^1)SUB{a^^f#af#g#a`c#^^^b^`c#^`d^^`e`f#^`a^`g#^^^`f^^^}d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^p.T(127,0,!1)c#^^^q=160p=64} STR RG4={@31,0l4q=110EP.T(60,90,!1^1^1^1^1^1^1^1)q=110SUB{a^^^g#^a^f#^^^e^f#^d^^^e^^^f#^^^f^g#^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^c#^^^ EP.T(90,127,!1^1^1^1^1^1^1^1)SUB{a^^^g#^a^`c#^^^b^`c#^`e^^^`f#^^^`a^^^`g#^^^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^p.T(127,0,!1)c#^^^q=160p=64} TR=2DL=HAZ+8RGH;DL=BGN-8l16q=160RGI;DL=BGN;RG1;RG2;RG3;RG4;RG1;RG2;RG3;RG4;DL=RF2;RGI;DL=ME5;RG2;RG3[RGH]RG1;RG3;RG4[RG1]l4q=100EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^}) /*3&4*/RTH={l8>EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<} RTI={EP=127l16>SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^[16r]SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^[16r] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RT1={l16>EP=127[SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^][SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RRF={l16DL=HAZ+8RTH;DL=BGN-8RTI;RT1;DL=RF1;RT1;DL=RF2;RTI;DL=NK1[RTH]RT1;DL=RF4[RT1]l4EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^})}TR=3RRF;TR=4RRF; /*5*/BSH={l8q=100BR=12p.T(0,64,!16)f#^^^^^^^^^^^^e^^d^^^^^^^^^^^^c#^^"b^^^^"b^^c#^^^^c#^^d^^^^^^^c#^^^^^^^q=90}BSI={l4q=100f#^^^^^^^e^^^^^^^d^^^"b^^^q=90l16[c#^rc#^rc#^^^^^^^^^]l8} BS1={[4f#`f#][4d`d][4e`e][4c#`c#][4d`d][4"bb]l16[c#^rc#^rc#^^^^^^^^^]l8}BS2={[[4f#`f#][4e`e][4d`d]["bb][c#`c#]]}BS3={[6d`d][e`e][8f#`f#][8"bb][4c#`c#]`c#^^^^^^&&c#} BS4={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d][4c#`c#]}STR BS4A={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d]`c#^^^^^^&&c#} BS5={q=100l4d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^l8`c#^^^^^^&&c#q=90}BS6={l4q=100f#^^^d^^^e^^^c#^^^d^^^"b^^^l16q=90[c#^rc#^rc#^^^^^^^^^]l8} BASS={l8<MNH<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)}UL1={EP=100[23r]SUB{d^dddc#c#}f#^f#f#f#g#g#rr[23r]SUB{d^dddc#^^}f#^f#f#f#g#^^r} UL2={EP=110f#^f#^dd^f#^f#f#f#ee^r;f#^c#^"bc#^"a^^^rdc#de;f#^f#^dd^f#^f#f#f#'ea''da'^rEP=100SUB{`c#^`c#`c#^`d`db`c#^^^^}f^ff^fffc#^^^^rrr} UL3={EP=100SUB{>MN3;MN4<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaabb^}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;"b^"b^"b^"bc#^c#c#c#c#c#^rd^d^d^dEP=110SUB{f^fffg#^^}c#^c#c#c#c#^^r; EP=100SUB{a^a^a^aa^aaabb^r`c#^`c#^`c#^`c#`c#^`c#`c#`c#`e`e^r}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;SUB{d^d^d^de^eeeeera^^^^^^^rf^f^g#g#^}"b^"b^"b^"bc#^c#c#c#c#c#rd^^^^^^^rEP=110c#^c#^c#c#^r} UL4={EP=100SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)} ULMR={l8DL=HAZ+8ULH;DL=ME1;UL1;UL2;UL3;DL=ME3;UL1;UL2;UL3;DL=ME5;UL1;UL2;DL=NK2;UL4;DL=ME7;UL2;UL3}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[7DM2]BR=20p%=3000[O1;r]O6;rrrBR=20p%=1500}DM21={[6DM2]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500}DM22={[6DM2][O3;rrr][O4;r]rrrr} DDH={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r][3O3;rr][7r][3O4;rr][7r]}DD1={DM6[4DM2][3O3;rr][7r][3O4;rr][7r]}DD2={DM6;DM20}DD3={DM7;DM21}DD4={DM6;DM20}STR DD4A={DM7;DM22} DD5={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r]O3[7r]O4[7r]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500} TR=10l16DL=BGN-8BR=20p%=1500DDH;DL=BGN@25BR=20p%=1500DD1;DD2;DD3;DD4;DD4A;DD1;DD2;DD5;DD4;DD4A;DDH;DD2;DD3;O3;DL=NK2;O3;DL=RF3;DD1;DD3;DD5;DD4A;DD1;DDH;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GG1={[6GP3][[3GB;r:r][[GR]GB;r]]}GG2={[7GP3]GP8}GG3={[7GP3][4GB;r[GR]]}GG4={[7GP1]GP3} TR=11l16DL=HAZ+8BR=20p%=-1500PL1;GGH;DL=BGN-8GG1;DL=BGN;BR=20p%=-1500GG1;GG2;GG3[GG4]GG1;GG2;GG3[GG4]GG1;GG2;GG3[GGH]GG1;GG3;GGH;GG4[GG1] /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+8[PD3]DL=HAZ+8O3;DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[3PD3]DL=NK1[3PD3]DL=SB3[4PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16@82,8q=100EP=120[3ag#c#ag#c#ac#]g#f#c#g#f#c#g#c#[3ag#dag#dad]bf#dbf#dbd[f#e"bf#e"bf#"b][g#f#c#g#f#c#g#c#][ag#dag#dad]g#f#c#g#f#c#g#c#;`c#g#c#`c#g#c#`c#c#<} TR=14DL=HAZ+8l16P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)V=70SP4;V=100DL=BGN-8SPH;DL=BGN;SP1;SP2;SP3[SP4]SP1;SP2;SP3[SP4]SPH;SP2;SP3;V=60SP4;V=70SP4;V=100SP1;SP3[SP4][SP1] /*15*/FTH={l8<@23,0q=90HAM2({[8f#^^^^^&&`c#r]})>q=100}FT1={l16@115,0EP=100HAM({SUB{MidiDelay({[c#c#c#c#rc#c#rc#c#rc#c#rc#r]["b"b"b"br"b"br"b"br"b"br"br]ddddrddrddrddrdreeeereereereerer},3,!16)[c#c#c#c#rc#c#^^^^^^^^r]}MidiDelay({[f#f#f#f#rf#f#rf#f#rf#f#rf#r][g#g#g#g#rg#g#rg#g#rg#g#rg#r]aaaaraaraaraararbbbbrbbrbbrbbrbr},3,!16)aaaaraa^^^^^^^^rg#g#g#g#rg#g#^^^^^^^^r})} FT2={@85,0HAM2({q=90EP=100[l8rrMD({'f#c#'^},1,!2)rrrrrrMD({'ec#'^},1,!2)rrrrrrMD({'f#d'^},1,!2)rrrr:[8r]]l16q=100EP=127@82,1f#c#ef#g#c#f#g#ac#g#a`c#c#b`c#})} FT3={@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#ee^}b^a^g#f#^b^baag#f#^r},1,!8)[9r]@81,0l16P.onCycle(!2,32,96)HAM({[f#a`c#^f#^:rr]})P=96@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#'ea''da'^}b^a^g#f#^b^baag#f#^r},1,!8)[16r]} FT4={@82,0l16EP=110SUB{[4aaaaraar:aaraarar]f#f#rf#f#rf#r;ddddrddrddrddrdreeeereereereererf#f#f#f#rf#f#rf#f#rf#f#rf#rffffrffrg#g#g#g#rg#g#r}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr[c#c#c#c#rc#c#r] SUB{[4aaaaraar:aaraarar]bbrbbrbr;aaaaraaraaraararbbbbrbbrbbrbbrbr`c#`c#`c#`c#r`c#`c#r`c#`c#r`c#`c#r`c#rg#g#g#g#rg#g#rfrf^^^^^}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr;c#c#c#c#rc#c#rc#rc#^^^^^} TR=15l16>DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=ME5;FT2;FT3;FTH;DL=RF3;FT1;FT3;FT4;FT1; /*16*/BG1={@123,3l4BR=70[rp.T(127,30,!2^4)'cde'^^]p=64}BG2={p=64@120,0l4'cde'^^^}BG3={@123,5BR=40p.T(0,127,!1)'cd'^^^}BG4={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG6={l1@126,8'>>>cde<<<'^}BG7={p=64@128,3l8HAM({c^[4d]})@128,1c^^rc^rrd^^^^@123,2HAM({[g^^^]})@127,3HAM2({grrddrrr})@128,1e^^^^^^^^@128,3g^^'cde'}STR BG8={l1p=64@126,8'>>>cde<<<'}STR BG9={@128,3V=127l4'>cde[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^^^r<}MN4={>[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^`d`cgHAM2({RRF})TR=3RRF;TR=4RRF; //------------------------------------------------------------------------------TR=005&007;--------------------------------------------------------------------------// BSH={[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d[3"a#ra#r]"a#ra#a#[3"grgr]"grgg[3"arar]"araa[3dr`dr]`dr`d`d} BS1={[[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d]}BS2={BS1}BS3={[[[3"a#ra#r]"a#ra#a#]:[[3dr`dr]dr`d`d]][3dr`dr]dr`d`d["arar]"a^^^"a^^^} BS4={[4["a#ra#r]cr`crcr`c`c:["arar]dr`drdr`d`d][3dr`dr]dr`d`d}BS5={q=100l4["a#^^^^^^^:d^^^^^^^]d^^^"a^^^l16q=180} TR=5l16ULMR; //------------------------------------------------------------------------------TR=014;------------------------------------------------------------------------------// STR PAH={EP=127@12SUB{[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^`e`f`d<}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]} STR PAI={EP=127[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]}STR PAG={EP=127@12SUB{HAM({[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^^^^^^^^^^^<})}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r:'agd"a'^^]} STR PA1={EP=100@12[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'`dafd'^^^r'`dafd'^^]}STR PA2={PA1} STR PA3={EP=100[['afd"a#'^^^r'afd"a#'^^]:['`dafd'^^^r'`dafd'^^]]'`dafd'^^^r'`dafd'^^'gec"a'^^^rrrr} STR PA4={EP=110[4'afd"a#'^'afd"a#''ceg`c'^^'ceg`c'^:'`ceg"a'^^'`dafd'^^'`dafd'^]'`dafd'^^'`dafd'^^'`dafd'^} TR=14l8DL=HAZ[PAH]PAI;DL=BGN;PA1;PA2;PA3;PA4;PA1;DL=NK4;PAI;PAG; //------------------------------------------------------------------------------TR=015;------------------------------------------------------------------------------// STR HSH={}STR HSI={} STR HS1={EP=110@13["a#df"a#f"a#df"a#df"a#f"a#df"aeg"ag"acedfadagfd]}STR HS2={HS1} STR HS3={`dafd<'`d][`d'>`dafd<']][`d`d'>`dafd<'`d]aa'>agd"a<'arrrr>} STR HS4={`dafd<'^'>`dafd<'][`d`d'>`dafd<'`d]>} TR=15l8>DL=HAZ+8[HSH]DL=BGN;HS1;HS2;HS3;HS4;HS1;DL=NK4;HSH;HSI; //------------------------------------LYRIC Function LY(GRFD){[(GRFD)l4Lyric={"。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:"}rLyric={":。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*"}rLyric={"*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。."}rLyric={".*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。"}rLyric={"。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:"}rLyric={":。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+"}rLyric={"+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:"}rLyric={":゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。."}rLyric={".:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。"}rLyric={"。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*"}rLyric={"*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+"}rLyric={"+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。."}rLyric={".+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。"}rLyric={"。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:"}rLyric={":。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*"}rLyric={"*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。."}rLyric={".*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。"}rLyric={"。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:"}rLyric={":。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+"}rLyric={"+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:"}rLyric={":゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。."}rLyric={".:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。"}rLyric={"。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*"}rLyric={"*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+"}r]}TR=17CH=16DL=0Lyric={"MS-GS EUROBEAT 120th ANNIVERSARY NON-STOP MEGAMIX VOL.08"}DL=18Lyric={"1.MYSTERIOUS FOREST - 2006/7/17"}DL=121LY=2DL=137Lyric={"2.ONE DAY - 2006/10/09"}DL=242LY=2DL=258Lyric={"3.I’M IN DANGER BUBBLE -EXTENDED NRG MIX- - 2006/09/25 "}DL=324LY=1DL=332Lyric={"4.I’M IN DANGER BUBBLE -EXTENDED EURO MIX- - 2006/09/25 "}DL=444LY=1DL=452Lyric={"5.HOLY NIGHT - 2006/08/14"}DL=581LY=1DL=589Lyric={"6.DARKNESS NIGHTMARE SONG - 2006/09/11"}DL=714LY=1DL=722Lyric={"7.U & I - 2006/11/06"}DL=842LY=1DL=850Lyric={"8.BE MY LOVER - 2006/10/23"}DL=954LY=3DL=978Lyric={"9.KAMIKAZE SUICIDE SQUID - 2006/08/28"}DL=1151Lyric={"BONUS TRACK - 『 MY SWEET MEMORIES - オルゴールバージョン - 』"} この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)
}BS1={[8"aa][8f`f][8g`g][4c`c]["bb]"b^^^}BS2={[8"aa][8f`f][8g`g][4c`c][4"bb]} BS3={[[4"ff][4c`c]:[4"dd][4"ee]][4"ff]g^^^^^^&&"g}BS4={<[[4a`a][4g`g][4f`f][4g`g]]>}BS5={l4q=100"f^^^c^^^"d^^^"e^^^l8q.onCycle(!8,70,100)[4"ff][4c`c][4"ff]g^^^^^^&&"g} BASS={l8<SUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^r<:g^g^gggge^g^g#^br]g^g^ggabSUB{a^^^e^^}`c^^^b^^r} ULMR={l8DL=HAZ+16ULH;DL=ME2;UL2;UL3;DL=ME4;UL2[UL3]DL=ME6;UL4}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r]O1;rO6;rrr}DM21={[6DM2]O1;rrrO2;rO1;rrrO1;rO6;rrr}DM22={[7DM2]O1;rrO1;O2;rO1;r}STR DM23={[4DM2][7O1;r]O3[13r]O6;rrr} DDH={@17BR=20p%=6000[MD({MidiDelay({[O1;rrrO6;r]O1;O6;rO6;rrrr},2,!16)},3,!1)[44r]]@25BR=20p%=2000} DDI={EP.T(70,127,!1^1^1^1^1^1^1^1)p%.W(2000,-3000,!16)[4[7DM1]:[O1;r]][4O1]BR=20p%=2000}DDJ={[O3[15r]O4[15r]][7DM1][O1;r][4DM1]O3;rrrEP.T(30,120,!2^4)[6O1;r]EP=127} DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM22;DM23}DD4={DM7;DM8}DD5={[O3[15r]O4[15r]]DM23} TR=10l16DL=HAZ+16DDJ;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD2;DD5[DD4]DD1;DD2;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26l8BR=20p%.T(2500,2500,!1^1^1,5000,-5000,!1,-2500,-2500,!1^1^1,-5000,5000,!1)[8[GR;GA]GB;rGR;GA]l16BR=20p%=2500@25} GGI={@26BR=20p%.T(5000,-5000,!1^1^1^1,-1000,3000,!1^1^1^1)[16[GR]GA;r][4GP2]BR=20p%=2500@25}STR GGJ={SUB{[58r]['n28n39'r]rr}[4GP2][3GP3]GP8} GG1={[7GP3][4GB;rrr]}GG2={[7GP3]GP8}GG3={[6GP3]l8r[7GB]l16[16r]}GG4={[7GP1]GP3}GG5={SUB{[58r]['n28n39'r]rr}[4GP2][GP3]l8r[7GB]l16[16r]} TR=11l16DL=HAZ+16PL1;GGJ;DL=BGN@25BR=20p%=2500GG1;GG2;GG3;GG4;GG1;GG2;GG5[GG4]GG1;GG2;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+16PD3;DL=BGN;PD3;DL=SB1[PD3]DL=SB2[3PD3] /*13*/STR PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} DSH={@116,0[8`a`earar`a`a`a`earar`ea]@119,8} TR=13l16DL=HAZ+16PG1;PP;HAM2({DL=HAZ+19DS6;DL=BGN;PP;DL=BGN+3DS6;DL=BGN+7DS2;DL=ME1+7DS6;DL=ME2+3DS2;DL=ME2+7DS7;DL=SB1+3DS6;DL=SB1+7DS2;DL=RF1+3DS6;DL=RF1+7DS2; DL=ME3+7DS6;DL=ME4+3DS2;DL=ME4+7DS7;DL=SB2+3DS6;DL=SB2+7DS5;DL=SB2+11DS6;DL=SB2+15DS2;DL=RF2+3DS6;DL=RF2+7DS2;DL=ME5+7DS6;DL=ME6+3DS2;DL=ME6+7DS7}) /*14*/SPH={v=100[@82,8[9r]MD({'aec'^},18,!8)[21r]]}STR SPI={v.T(60,100,!1^1^1^1^1^1^1^1)@3,0MD({[8aebe`ce`ee]},1,!16)}STR SPJ={l16@39,0v=70[[a`c`ea`ea`c`e][gb`eg`egb`e][fa`cf`cfa`c][16r]]l8} SP1={@3,0v=127[aebe`ce`ee][afbf`cf`ef][gdbd`cd`dd]`ce`ce`de`ee[8r]}SP2={@1,0v=90[aebe`ce`ee][afbf`cf`ef][gdbd`cd`dd]`ce`ce`de`ee[8r]} SP3={@4,0v=100[fcgcac`cg^e`ce`de`ee:fdgdad`cg^e`ce`de`ee]afafab`c`d^^^^^^rr}SP4={l16@39,0v=90[[a`c`ea`ea`c`e][gb`eg`egb`e][fa`cf`cfa`c][gb`dg`dgb`d]]l8} TR=14DL=HAZ+16l8P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)SPJ;DL=BGN;SP1;SP2;SP3;SP4;SP1;SP2;SP3[SP4]DL=ME5;SP2;SP3; /*15*/FTH={@5,8l16>[[32r]ga^aaece^ee^MD({d&ec^},3,!4)[12r]MidiDelayRev({d&ec^},4,!4)]<} FT1={HAM({@85,0M=110EP=100l8rr'ae''ae'^^^^^^^^M=0@82,0l16EP=90egabMD({ab`c`e},1,!4)@85,0M=110EP=100l8rr'af''af'^^^^^^^^M=0@82,0l16EP=90fab`cMD({ab`c`e},1,!4) @85,0M=110EP=100l8rr'bg''bg'^^^^^^^^M=0@82,0l16EP=100gb`c`dMD({b`c`d`g},1,!4)@85,0M=110EP=100l8rr'`e`c''`e`c'^^^^l16@82,0EP=80SUB{`c^^`c`cr`crbrbr`c^^^}`e^^`e`er`er`dr`dr`e^^^M=0})} FT2={HAM({EP=100@85,0l8rrMD({'ae'^},1,!2)rrrrrr'ae'^rl16@82,0a&`c`er`er;@85,0l8rrMD({'fa'^},1,!2)rrrrrr'fa'^l16@82,8agfcfab`c;@85,0l8rrMD({'bg'^},1,!2)rrrrrr'bg'^l16@81,1gb`c`db`c`d`g;@85,0l8rrMD({'`cg'^},2,!4)rrrrrr'bg'^l16@56,0`e`er`e`er`er})} FT3={HAM({l8EP=100@100,0[MD({cfga},1,!2)rrrrMD({cefg},1,!2)rrrr:MD({dfga},1,!2)rrrrMD({eab`e},1,!2)rrrr]r@85,0SUB{ffffffg^^^^^^}aaaaaag^^^^^^rr})} FT3A={HAM({l8EP=120@11,0[MD({cfga},1,!2)rrrrMD({cefg},1,!2)rrrr:MD({dfga},1,!2)rrrrMD({eab`e},1,!2)rrrr]r@85,0SUB{ffffffg^^^^^^}aaaaaag^^^^^^rr})} FT4={HAM({[l16EP=127@88,0[26r]BR=24"g^&`e^"g^:[26r]SUB{brb^^^}`er`e^^^][24r]@82,0aebe`ce`ee})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]DL=ME5;FT2;FT3A; /*16*/BG1={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64}BG3={@80,0l4rrrBR=120p.T(127,0,!6)`gp=64} BG4={@123,1l4EP.T(100,127,!1)BR=20p.T(127,64,!1)c^^^r}BG5={@125,4l8BR=40EP.T(70,100,!1^1^1^1)p.T(127,80,!1^1^1^1)[32'cd']EP=127} TR=16DL=ME2+6BG1;BG2;DL=SB1+7BG4;DL=ME4+6BG1;BG2;DL=SB2+7BG4;DL=SB2+15BG4;DL=ME6+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED NRG MIX- INT TIME_DB=240K=1INT EST_DB=160FUNCTION DBW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(TIME_DB+1)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DBW(01,01,081,00,0,K,064,4,2,127,09,0)DBW(07,07,039,00,0,K,074,1,2,120,09,0)DBW(13,13,119,08,0,0,___,5,0,117,09,0) DBW(02,02,082,08,0,K,064,2,2,090,09,7)DBW(08,08,081,00,0,K,000,3,2,110,09,2)DBW(14,14,003,00,0,K,096,2,2,110,09,0) DBW(03,03,085,00,0,K,000,2,2,090,10,7)DBW(09,09,081,00,0,K,127,3,2,110,09,2)DBW(15,15,003,00,0,K,070,2,2,117,10,0) DBW(04,04,082,00,0,K,127,2,2,090,10,7)DBW(10,10,025,00,0,0,064,3,1,127,10,0)DBW(16,16,091,00,0,0,050,2,1,117,10,0) DBW(05,05,039,01,0,K,064,2,2,110,09,0)DBW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DBW(06,06,031,00,0,K,032,1,2,070,10,0)DBW(12,12,026,00,0,0,064,3,0,127,09,0) DL=TIME_DB+1Tempo=EST_DB;HAZ=TIME_DB+1BGN=HAZ+17ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+16 /*1*/MN1={v=100e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}STR MN1A={v=110e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={v=110a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={v=120"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} STR MN3A={v=120"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={v=120[MD({"a^"a^c"b"ae ^dc"a^^^r},1,!1^1)[16r]]} MN5={"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^c^d^e^e^d#^e^f#^;g^g^f#^f#a ^gf#e^ed#e;e^^f#^^g^ f#^^^ ^^^rl4b^^^^^^^^l8} TR=1l8>q=96V=110EP.W(110,127,!1)HAM({DL=HAZ;MN4;DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2}) /*2&3&4*/RA={@82,8If(CH==3){@85,0}If(CH==4){@82,0}}STR RB={@82,8If(CH==3){@7,0}If(CH==4){@8,0}}STR RC={@81,1If(CH==3){@81,0}If(CH==4){@82,8}} STR RD={@82,8If(CH==3){@39,0}If(CH==4){@39,8}}STR RE={@82,0If(CH==3){@62,0}If(CH==4){@63,0}} STR RT={RD} RTH={RB<[[[e^^err:e^^^f^e24f24e24d^]:e^^^b^a24b24a24d^]:e^^^f^f^rr]BR=6p.T(64,64,!8,64,32,!2)e^^^^^^^^^>p=64} STR RTI={RC;e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^RD e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^;RE;q_(-20) ggggbbb p%.T(0,0,!32,0,-1600,!32) b q_(0)p%.T(-1600,0,!16,0,0,!8,0,-4800,!16)`c^^^,,+10; p%.T(-4800,0,!16,0,700,!64,700,-700,!32,-700,700,!32,700,-700,!32,-700,700,!32,700,-700,!32,-700,0,!64)`d^^^,,+10} RT1={RA;SUB{[[e^eereere^rrrrrr:f^^f^^f^g^^g^^g^]:d^^d^^d^e^^e^^e^]e^re^re^e^^^^}HAM({[[a^aaraara^egagab:a^^`c^^`e^`d^^b^^g^]:a^^`c^^a^g^^b^^g^]`c^r`c^r`c^b^^^^rrr})} RRF={l16DL=HAZ;RTH;RTI;DL=BGN;RT1;DL=RF1;RT1}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l16[8a^ra^ra^^^^^^^^^]l8}BSI={[[4a`a][f`f][g`g][4a`a][d`d][e`e]]} BS1={[[4a`a][f`f][g`g]:[4a`a][d`d][e`e]][4f`f]l16e^re^re^e^^^^^^^l8}BS2={[8f`f][8e`e][4f`f][4d`d][4e`e][4a`a]} STR BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={q=100l4f^^^^^^^e^^^^^^^d^^^e^^^f^^^g^^^l8q.onCycle(!8,70,100)}BS6={[[4a`a][4f`f][4g`g]:[4e`e]][4b`b]>[c`c]["bb]["aa]["gg][4"f#f#][8"bb]<} BASS={l8<<@104,0CO2;CO2A<@31,0CO3; /*8&9*/UL1={v=110a^^a^^a^g^^a^^a^b^^b^bbbg^^^b^^r;a^^a^^a^b^^b^^b^`c^^^a^^rv=100SUB{a^b^`c^`d^}f^g^a^b^} UL2={>v=110SUB{c^c^"b^"bc^ccc^^^}e^e^d^de^gge^^^r<`c^^^b^a^g^a^b^`cr>SUB{c^c^"b^"bc^ccc^^^r}e^e^d^de^gge^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^r<},1,!1^1)[16r]]} UL5={v=110[>SUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3;rr[O1;r:r]O4;rrrrrrr}DM21={[6DM2]O3[7r]O4[7r]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr}DM23={[4DM2]SUB{O3[7r]O4[7r]O3;rrr[O4;r]}[3DM2]O1;rO1;rO6;rrr} STR DM24={[4DM2]SUB{O3[7r]O4[7r][O3;rrr][O4;rrr]}[3DM2]O1;rO1;rO6;rrr} STR DD={@17EP.T(50,127,!1)[6O1]r[3[O1]r]@25}DDH={@25O3[63r][[3O3;rr][7r][3O4;rr][7r]]}DDI={@25DM6;DM9} DD1={DM6;DM20}DD2={DM6;DM23}STR DD2A={DM6;DM24}DD3={DM7;DM21}DD4={DM6;DM22}DD5={@26BR=20p%=5000MidiDelay({[4[3O1]rO2;r[[O1]r]O2;rO1;r[16r]]},10,!8)@25BR=20p%=1000}DD6={@17DM6;DM9@25} DD7={[DM6]SUB{n49[7r]n57[7r]n55[7r]n57[7r]n49[15r]n57[15r]}[DM2]DM22} TR=10l16DL=HAZ;BR=20p%=1000DDH;DDI;O3;DL=BGN-1[12r]O6;DL=BGN;BR=20p%=1000DD1;DD2;DD2A;DD3;DD4;DD1;DD5;DD6;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[30GB;r[GR]][GB;rrr]}GGI={[4GP2][4GP3]}GG1={[7GP3]GB;rr[GR;r:r]GB;rrrrrrr}GG2={[7GP3]GP1}GG3={[7GP3][16r]}GG4={[3GP1][4GB;rrr][3GP1]GP2} GG5={MidiDelay({[4[4GR]GB;r[6GR]GB;r[GR][16r]]},10,!8)}GG6={[12GP1]GP8} TR=11l16DL=HAZ@26BR=20p%=1000PL1;GGH;DL=HAZ+8GGI;GB;DL=BGN@26BR=20p%=1000GG1[GG2]GG3;GG4;GG1;GG5;GGI;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+3PD4;DL=HAZ+8PD3;DL=BGN;PD3;DL=SB1;PD3;DL=ME3+7PD4;DL=ME3+8PD3; /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdrr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} DSH={EP=90[16r]DS5[16r]DS12;DS13;DS7;DS2;DS6;EP=127} TR=13l16DL=HAZ;PP;PG1;HAM2({DSH;DL=HAZ+11DS2;DL=HAZ+15DS7;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+7DS6;DL=ME1+15DS2;DL=ME2+3DS6;DL=ME2+7DS7;DL=SB1+3DS6;DL=SB1+7DS13;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+7DS6;DL=ME3+15DS2;DL=ME4+3DS6;DL=ME4+7DS7}) /*14*/SPH={l16P=96} SPI={l16P=96} SP1={@3,0l16EP=110[[['aec'^^^]'aec'^'aec'^^^'aec'^:'fc"a'^^^'fc"a'^^^'gd"b'^^^'gd"b'^^^]:'fd"a'^^^'fd"a'^^^'ge"b'^^^'ge"b'^^^][16r]}SP2={l4[32r]} STR SP2A={l8@1,0EP=100q=150SUB{HAM2({[fa`cf`cfa`c][egbebegb]dfadadfaegbebegbfa`cf`cfa`cgagab`c`d`e})}l4['afc'^^^]['ge"b'^^^]'fc"a'^^^'gd"b'^^^'aec'^^^'bgd'^^^q=100} SP3={l8@2,0EP=100q=150HAM2({[a`c`d`ea`e`d`c;gb`c`dg`d`cb;fab`cf`cba:gab`dg`d`cb]})['`ebg'^^^]q=100} SP4={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]'bg'^^^^^^^})} SP5={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]SUB{b^b^b^b^}`e^`d#^`e^`f#^})} TR=14DL=HAZ;SPH;SPI;DL=BGN;l16>SP1;SP2;SP2A;SP3;SP4;SP1;SP2;SP2A;SP3; /*15*/FTH={l16[64r]HAM({EP=100@85,0q=80MidiDelay({[4'ae'^r'ge'^r'ae'^:rrrrrrrr]},3,!8)>@56,0q=100EP.T(40,110,!4)MD({[4'ae']},1,!4)rrrr<})} STR FTI={l8EP=90[12r]BR=24p.T(64,64,!4,64,127,!4)@82,0'eg`c'^^^[12r]p=64l16@88,0HAM({`ee`dd`cca"a})l8[12r][BR=24p.T(64,64,!8,64,127,!8)@82,0'eg`c'^]p=64[8r]@85,0EP=80l16HAM({MidiDelay({SUB{d^^rd^^re^^re^^r}g^^rb^^r`c^^r`d^^r},5,!8)})} FT1={HAM({l8M=50EP=110@85,0[3rrMD({'a`e'^},2,!2)[12r]]rrMD({'`ef'^},1,!2)rrrrl16@82,0EP=90SUB{g^rg^rg^g^^^^}`c^r`c^r`c^b^^^^rrrl8})M=0} FT2={@100,0EP=80l4HAM({a^^^g^a^b^^^g^^^a^^^f^^^g^^^})HAM({l8>"g"a"bc"ac#ea<})}FT3={l8[EP=110@56,0HAM({rr'a`e'})[21r]:@100,0HAM({g^a^b^`cr})][8r]} FT4={[l8EP=120@85,0a^a^`cba`e^`d`ca^^^^[8r]:l16@85,0SUB{e^^ra^^rb^^r`c^^r}b^^r`c^^r`d^^r`e^^r][8r]} TR=15DL=HAZ;FTH;FTI;DL=BGN;FT1;FT2;DL=ME2;FT3;FT4;FT1;FT2;DL=ME4;FT3; /*16*/BG1={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG3={@80,0l4EP=110rrl16rrBR=50p.W(127,64,!16)ccp.T(127,0,!8)c^rrp=64EP=127}BG4={EP=110l4rrrBR=50p.T(127,0,!4)@80,0c} TR=16DL=HAZ+7BG3;DL=HAZ+15BG1;BG2;DL=BGN+7BG4;DL=ME2+6BG1;BG2;DL=RF1+7BG4;DL=ME3+15BG4;DL=ME4+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED EURO MIX- FUNCTION D2W(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(D2_TIME+15)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT D2_TIME=330-15INT D2_EST=160K=1 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) D2W(01,01,011,00,0,K,064,4,2,127,09,0)D2W(07,07,035,00,0,K,084,1,2,110,09,0)D2W(13,13,119,00,0,0,___,5,0,127,09,0) D2W(02,02,100,00,0,K,064,2,2,100,09,0)D2W(08,08,012,00,0,K,000,3,2,110,09,2)D2W(14,14,082,01,0,K,___,2,2,127,09,0) D2W(03,03,089,00,0,K,000,2,2,100,10,0)D2W(09,09,012,00,0,K,127,3,2,110,09,2)D2W(15,15,003,00,0,K,096,2,2,110,10,0) D2W(04,04,104,00,0,K,127,2,2,100,10,0)D2W(10,10,025,00,0,0,064,3,1,127,10,0)D2W(16,16,091,00,0,0,084,2,1,127,10,0) D2W(05,05,039,01,0,K,044,2,2,110,09,0)D2W(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// D2W(06,06,049,00,0,K,032,1,2,080,10,0)D2W(12,12,026,00,0,0,064,3,0,127,09,0) DL=D2_TIME+15Tempo=D2_EST;HAZ=D2_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+16NK1=RF2+8INT NK2=NK1+8INT NK3=NK2+8 /*1*/MN1={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}MN1A={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={EP=120a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={EP=127"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} MN3A={EP=127"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={EP=127["a^"a^c"b"ae ^dMidiDelay({c"a},10,!4)[20r]]} TR=1l8>q=97V.W(90,127,!4)DL=ME1;HAM({MN1;MN1A;MN2;MN3;DL=ME3;TrackKey=(K+3);MN1;MN1A;MN2;MN3;TrackKey=K;MN3A}) /*2&3&4*/STR RTS={If(CH==3){l64r}If(CH==4){l128r}l8}RTA={@100,0If(CH==3){@89,0}If(CH==4){@104,0}}STR RTB={@67,0If(CH==3){@66,0}If(CH==4){@68,0}} RTH={EP=100M=100RTS;RTB;a&b`cbrarEP.T(100,60,!1,60,110,!1^2)e^^^^^^^^^^^^^^^^^^^^^^^^EP=100a&b`cbrarEP.T(100,60,!1,60,110,!1^2)`d^^^^^^^^^^^^^^^^^^^^^^^^M=0} RTI={EP=100M=100RTB;a&b`cbrarEP.T(100,70,!4,70,110,!2^4)e^^^^^^^^EP=100`f&`g`f`cr`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^ EP=100a&b`cbrarEP.T(100,70,!4,70,110,!2^4)`d^^^^^^^^EP=100`d&`e`e`er`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^M=0} RT1={l8RTA;EP=127"a[aba`eaba^aba`eaba^fab`cb`c`d:`g^`f`cr`dr`e^]`e^`d^`c^b^}STR RT3={l8[48r]l4EP.T(70,100,!1)SUB{f^^^e^^^}a^^^b^^^} RRF={l8HAM({DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;TrackKey=(K+3);DL=ME4;RT3;TrackKey=K;DL=RF2;RT1;DL=NK2;RTH;RTI})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4q=100a&&^^^`a&&^^^^^^^a^^^f&&^^^`f&&^^^^^^^f^g^q=90l8}BSI={[16a`a][8f`f][4d`d][4e`e]} BS1={[[4a`a][4f`f][4d`d]:[4e`e]]e^d^c^"b^}BS2={l4q=100`f^^^f^^^`e^^^e^^^`f^^^d^^^`e^^^a^^^q=90l8} BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={l4a^^^f^^^d^^^e^^^l8[4a`a][4f`f][4d`d]e^d^c^"b^} BASS={l8<}UL2={EP=110[e^e^d^de^gge^:"g"a"bc^^^"b^"a^"g^"a^"b^cr]"g"a"gSUB{"a^^"a^^"a^"b^^^"b^^}"f^^"f^^"f^"e^^^"e^^r} UL3={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120cccg^g^:gggge^e^g#^g#^]gggab^^^g^^r} UL3A={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120ccc:g^g^gggge^e^g#^g#^]g^^g^ggge^^^^^^r} UL4={EP=100[SUB{e^e^eeef^f}c^c^ccc"a^"aMidiDelay({SUB{ff}"a"a},10,!4)[20r]]} ULMR={l8>q=97DL=ME1+8UL1;UL2;UL3;DL=ME3+8TrackKey=(K+3);UL1;UL2;UL3;TrackKey=K;UL3A;}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2][4O3;rrr]}DM21={[6DM2]O3[7r]O4[7r]}DDH={O3[61r]O1;rO4[63r]}DDI={[3[7DM1][O1;r]][4DM1]O3[15r]} DD1={DM6;DM20}DD2={@17SUB{n49}[4[7DM1]:[O1;r]][4O1]@25}DD2A={[64r]n49[15r]n57[15r]n49[7r]n57[7r][n49rrr][n55rrr]}DD3={SUB{[rrrrn49[59r]]}[3[7DM1][O1;r]][4DM1]O3[7r]O4[7r]} DD4={DM7;DM21}DD5={DM6;DM8}DD6={DM7[6DM2]O3[7r]O4[7r]}DD7={@25[O3[13r]:O1;rO4[13r]O1;r]rr[3DM1][O1;r]DM20} TR=10l16DL=BGN-2@25BR=20p%=3000O3[7r]O5[7r]O4[15r]DL=BGN@25BR=20p%=3000DD1[DD2:SUB{DD2A}]DD3;DD4;DD1;DD2;SUB{DD2A}DD5;DD6[DD4]DD7;DD1;DD2;DDI; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26BR=24p.T(127,127,!1^1,127,0,!1^1,0,0,!1^1,0,127,!1)[16[4GR]GB^^GR]@25}GGI={@26[BR=24p.T(0,127,!1^1^1^1)[8[4GR]GB^^GR]]@25} GG1={[7GP3][16r]}GG2={[32GB;r[GR]]}STR GG2A={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1]GP3} TR=11l16DL=BGN@26BR=20p%=1000PL1;GG1;GG2;GG2A;GG3;GG4;GG1;GG2;GG2A;GG3[GG4][GG1]GGH;GGI; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} PD13={@17BR=20p%=3000[10r][DR;r][DR]p%=64} TR=12l16DL=HAZ+15PD4;DL=BGN;PD3;DL=ME1+7PD13;DL=ME1+15PD4;DL=SB1;PD3;DL=SB1+7PD4;DL=RF1;PD3;DL=ME3+7PD13;DL=ME3+15PD4;DL=SB2[PD3]DL=SB2+15PD4;DL=RF2[4PD3]DL=NK3+7PD4; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16EP=80@100,0"a"e"a"bcdefe"aefa`e`g`a<})} STR FT2A={HAM({@100,0EP=80l8MD({Div{fa`c}`e^^},3,!2)[12r]MD({Div{egb}`e^^},3,!2)[12r]MD({Div{dfg}a^^},1,!2)rrrrMD({Div{ega}b^^},1,!2)rrrrMD({Div{fab}`c^^},1,!2)rrrrMD({Div{gb`c}`d^^},1,!2)rrrr})} FT3={HAM({[@85,0l4EP=110M=100r'a"a`e'^^^^rrrrrr:EP=100M=0@100,0gab`c]})rrl8rl16@117,0EP=127M=0HAM3({<`c`cg^rr>})} FT4={HAM({[l8@82,0EP=127[13r]BR=9p.T(64,64,!16,64,127,!16)'`c'^^^[7r]p=64:l16@100,0geeg#eebee`cee`de`ee]})[8r]} TR=15DL=BGN-2FTA;FT;DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;TrackKey=(K+3);FT2;FT2A;FT3;FT4;TrackKey=K;FT4[FT1]FTH;FTI; /*16*/BGH={@120,0EP.T(30,127,!1)'cde'^^^}BG1={l4BR=32p.T(32,96,!1)@30,0'aec'^^^}BG2={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64} BG4={l4BR=32rrp.T(32,96,!2)@30,0'aec'^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG6={@82,1l1BR=24SUB{p.T(0,127,!1,127,0,!1,0,127,!1,127,0,!1)}'ae'^^^SUB{FOR(INT A=1;A<30;A++){l(A)p.T(127,0,!A)r}l1}'ae'^^^}STR BG7={@82,1l4BR=24p.T(127,0,!1)'ae'^^^} TR=16DL=BGN-2BGH;DL=BGN-1BG1;DL=ME2+6BG2;DL=SB1+7BG4;DL=ME3+8BG5;DL=ME4+6BG2;DL=SB2+15BG4;DL=NK2+7BG7;DL=NK3;V.T(100,127,!1^1^1^1^1^1^1^1)BG6; //------------------------------------HOLY NIGHT INT HN_TIME=452-17INT HN_EST=160K=2FUNCTION HNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(HN_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) HNW(01,01,012,08,0,K,064,4,2,127,09,0)HNW(07,07,088,00,0,K,084,1,2,120,09,0)HNW(13,13,119,08,0,0,___,5,0,110,09,0) HNW(02,02,099,01,0,K,054,2,2,127,09,3)HNW(08,08,012,00,0,K,000,3,2,100,09,2)HNW(14,14,006,08,0,K,127,2,2,120,09,0) HNW(03,03,103,02,0,K,074,2,2,120,10,8)HNW(09,09,012,00,0,K,127,3,2,100,09,2)HNW(15,15,003,00,0,K,096,2,2,110,10,0) HNW(04,04,005,24,0,K,000,2,2,120,09,0)HNW(10,10,025,00,0,0,064,3,1,127,10,0)HNW(16,16,091,00,0,0,084,2,1,120,10,0) HNW(05,05,039,01,0,K,044,2,2,120,09,0)HNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// HNW(06,06,103,00,0,K,032,1,2,080,10,0)HNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=HN_TIME+17Tempo=HN_EST;HAZ=HN_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+12 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+12NK1=RF2+8ME5=NK1+16NK3=ME5+8INT NK4=NK3+9 /*1*/MN1={V=100[a^^a#a^^r:g^^ag^^r]`c^^af^^r;a#^aa#^`c`d^`c^`d`c^a#a^g^rag^raa#^r`c`c^^r}MN1A={V=100[a^^a#a^^r:g^^ag^^r]`c^^`d`f^^r;a#^aa#^^g^a#^aa#^^g^`c^`d`c^^`d^`e^`d`c^^^r} MN2={V=110`d^`c`c^^a#^a^ga^^a#^`c^a#a#^^a^g^f#g^^a^;a#^da#^^d^f^ef^^g^a^a#a^f#ga`d^^^^rrr} MN3={V=120`f^`e`f^^`d^`f^`e`f^^`a^`g^`e`e^^`c^`d^^r`f#`g`f#`g;`a^`f`f^^`d^`a^`f`a#^^`a^>g^g`c^^g^a^^^^rrrf^fd^^"a#^"a#^^^^^^rf^fd^^"a#^"a^^^^^^r<}MN4={V=110[MD({g^rag^raa#^r},2,!8)MidiDelay({`c`c^^r},12,!4)[16r]]} TR=1l8HAM({DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2;MN3;DL=ME5;MN4}) /*2&3&4*/RT1={"a#^`d^`c^a#^a^g^a^a#^;c^`c^a#^a^g^f#^g^a^;"g^a#^a^g^f^e^f^g^f^c^"a^c^f^^^^^^^} RTH={[["a#^`d^][4"a#]"a#^`d^:"a#^`d^`c^a#^aaaaa^a^]"a#^`d^r"a#`d^} RRF={l8DL=BGN;HAM({RT1;DL=RF1;RT1;DL=RF2;RT1;DL=NK4;RTH;})}TR=2;>P.W(10,117,!8,117,10,!8)RRF;TR=3P.W(117,10,!8,10,117,!8)RRF; /*5*/BS1={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][8"ff]<}BS2={[4f`f][4`c``c][4d`d][4a`a][8a#`a#][8`c``c]} BS3={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][4"aa]d^^^^^^^<}BS4={>[[8"a#a#][4"aa][4d`d]][12"a#a#]"a^^^^^^^<} BS5={>[[4"a#a#][4"a#]["a#a#]:[4"a#a#][4c^]]["a#^]rr"a#^<} BASS={l8<<d^dd^"a"a"af#^^^^rrr<} UL3={EP=120SUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`c`c^^a^a^^}a#^a#a#^^f^a#^a#a#^^`d^`c^aa^^e^f#^^r;`d`d`d`eSUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`e`e^^`e^`f#^^^^}a#^a#a#^^f^a#^a#a#^^`d^`c^`c`c^^`c^`d^^^^rrrSUB{[`d^`d`f^^`g^`e^^^^^^^]}a#^a#a#^^f^f^^^^^^ra#^a#a#^^f^e^^^^^^r} UL4={EP=110[MD({e^rfe^rfc^r},2,!8)MidiDelay({ee^^r},12,!4[16r]]} ULMR={l8DL=ME1+8UL1;UL2;UL3;DL=ME3+8UL1;UL2;UL3;DL=ME5;UL4}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[15r]}PD3={SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]} DD1={DM6;DM20}DD2={SUB{[12r]n49[15r]n57[15r]n53}SUB{[58r]n49rn49rrr}DM6;DM8}DD3={DM7;DM13}DD4={[DM7][6DM2]O3[15r]}DD5={[[DM2][5O1;r]rrO2;rrr:[DM2][3DM1][4O1]]O1;rrrO2;rrrrrO1;rO2;rrr} TR=10l16DL=BGN@25BR=20p%=3000SUB{PD3}DD1[DD2]DD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{O3}PD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{PD3}O3[63r]O4[55r]EP.T(70,127,!1)[8O1]DD3;DL=NK4;DD5; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]}PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127} GG1={[7GP3][16r]}GG2={[7GP3]GP2}GG3={[7GP3]PD4}GG4={[11GP1][16r]}GG5={[[4[GR]GB;r][4GR;GA;GB;GR]:[4GR;rGB;r][4GB;rrr]][4GB;rrr]} TR=11l16DL=BGN@26BR=20p%=6000GG1[GG2]GG3;GG4;GG1[GG2]GG3;GG4;GG1[GG2][GG3][16DR]DL=NK4;GG5; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} STR JJ1={[7GP8][16r]}STR JJ2={[7GP8]GP3}STR JJ3={[7GP8]EP.T(90,127,!1)[8TA]l32[16TA]l16}STR JJ4={[11GP1][16r]} TR=12l16DL=BGN@25BR=20p%=5000JJ1[JJ2]JJ3;JJ4;JJ1[JJ2]JJ3;JJ4;JJ1[JJ2][JJ3][16DR]n49 /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} STR DS18={l32`e`d#`d`c#`cba#ag#gf#fed#dc#<`e`d#`d`c#`cba#ag#gf#fed#dc#>l16}STR DS19={`e`d#`d`c#`cba#ag#gf#fed#dc#} TR=13l16PAAA; /*15*/FT1={l8[24r]EP=100@89,0HAM3({>gf#gaMidiDelay({dga`d},4,!2)<})[24r]@81,1EP.T(80,127,!1)l4'f`ca'^^^} FT2={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4f^^^g^a^g^^^EP.T(70,110,!1)@83,0'`cge'^^^} FT2A={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4>f^^^g^a^g^^^l16EP=127@100,0cefgMidiDelay({efg`c},8,!4)<[8r]} FT3={HAM({l4EP.T(70,100,!1)@83,0'`da#'^^^l8@85,0EP=100r'ge'r'af'r'a#g'r'`ca'l4EP.T(70,100,!1)@83,0'`ca'^^^})l16EP=100@100,0HAM3({>gf#gaMidiDelay({dga`d},4,!4)<[8r]})HAM({l4EP.T(70,100,!1)@83,0'a#f'^^^l8@85,0EP=100r'd"g'r'e"a'r'f"a#'r'gd'l4EP.T(70,100,!1)@83,0'ad'^^^rrrr})} FT4={l8[24r]l16EP=100@99,1HAM3({>gf#gaMidiDelay({dga`d},8,!4)<})l8[28r][32r]@81,1EP.T(60,127,!1)l4'`cae'^^^} FT5={l8[[16r]@15,9HAM({`g`f`e`ca#gfdc^^^^^^^})]} TR=15DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;FT2;FT2A;FT3;FT4;DL=NK1;FT2;FT2A;FT5;FT3@99,1l8EP=120HAM({d^f^g^a^}) /*16*/BGH={@82,1EP=127l1BR=36SUB{FOR(INT A=1;A<29;A++){l(29-A)p.T(127,0,!(29-A))r}l1}'ae'^^^EP=127} BG1={@123,3BR=48p.T(127,32,!1)l4'cg`c'^^^p=64}BG2={@120,0l4EP.T(100,127,!1)'cde'^^^}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64}BG5={@125,5l4BR=24p.T(0,127,!1)'cde'^^^p=64}BG6={@126,8l4BR=20p=80'cde'^^^p=64}BG7={l4<@128,3P=70p.T(64,64,!4,70,127,!2)'a"a`a'^^r>p=64} TR=16DL=BGN;V=127BGH;V=100DL=BGN+7BG1;DL=ME1+7BG2;DL=ME1+8BG3;DL=ME1+15BG4;DL=ME2+7BG5;DL=SB1;BG7;DL=SB1+7BG1;DL=SB1+11BG6;DL=RF1+7BG1;DL=ME3+7BG2;DL=ME3+8BG3;DL=ME3+15BG4;DL=ME4+7BG5;DL=SB2;BG7;DL=SB2+7BG1;DL=SB2+11BG6;DL=RF2+7BG1; DL=NK1+7BG2;DL=NK1+8BG3;DL=NK1+15BG4;DL=ME5;BG7;DL=ME5+4BG7;DL=ME5+7BG3;DL=NK3+7BG5;DL=NK3+8BG2;DL=NK4;BG7;DL=NK4+3BG5;DL=NK4+4BG3;DL=NK4+6BG2; //------------------------------------DARKNESS NIGHT MARE FUNCTION DNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(DN_TIME+18)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT DN_TIME=588-18INT DN_EST=158K=2 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DNW(01,01,012,00,0,K,064,4,2,127,09,0)DNW(07,07,039,01,0,K,084,1,2,120,09,0)DNW(13,13,119,00,0,0,___,5,0,127,09,0) DNW(02,02,109,00,0,K,064,2,2,100,09,0)DNW(08,08,012,00,0,K,000,3,2,100,09,2)DNW(14,14,082,01,0,K,___,2,2,127,09,0) DNW(03,03,103,00,0,K,000,2,2,090,10,0)DNW(09,09,012,00,0,K,127,3,2,100,09,2)DNW(15,15,003,00,0,K,096,2,2,110,10,0) DNW(04,04,097,00,0,K,127,2,2,100,10,0)DNW(10,10,025,00,0,0,064,3,1,127,10,0)DNW(16,16,091,00,0,0,084,2,1,127,10,0) DNW(05,05,039,00,0,K,044,2,2,120,09,0)DNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DNW(06,06,020,16,0,K,032,1,2,080,10,0)DNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=DN_TIME+18Tempo=DN_EST;HAZ=DN_TIME+1BGN=HAZ+18ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16 ME3=RF1+8ME4=ME3+8SB2=ME4+8RF2=SB2+16NK1=RF2+8ME5=NK1+8ME6=ME5+8NK2=ME6+8NK3=NK2+8 /*1*/MNH={} MN1={EP=110[a^^^agfg^^:e^^^^rg^^^gfef^^d^^^^r]e^eefga#^^a#a#agaf^^r} MN2={EP=120f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^r;f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^ra#^a^;g^fg^^e^g^fg^^a#a^^^^^aga^^^^`c#^^^} MN3={EP=127[`d^`c#^`d^`e`f^r`d^`a^`d^`a^^^^`g`f:`g^^^^^^^r`c^b^`c^`d`e^r`g^`a#^`a#^`a#^^^^`a#``c`a^^^^^^^r]`g^^^r`f^`e^`f^^a^^`f^`e^^`c#^^`e^`d^a`f^^`g^`a^^^^rrr} TR=1l8>q=95HAM2({DL=ME1;MN1;MN2;MN3;DL=ME3;MN1;MN2;MN3;})V=110DL=NK2-1MNH;DL=NK3-1MNH;DL=NK3+8l1<@127,0EP.T(80,127,!1^1^1,127,70,!1^1)'cde'^^^^^ /*2&3&4*/RT={l16EP=120[`d`drr][5`d]r`d`d}RT1={l8EP=127`d^a^`da`f`e^^a^`ea`g`f^^a^`f`g`a`f`d^`c`d^`d`e`f;`f^a#^`fa#`f`e^^a^`ea`e`d^^g^`d`c#`d`e`c#^`e`a^^^^} RT3={l4[16r]EP.T(60,100,!1^1^1)'ga#'^^^'eg'^^^'`c#a'^^^EP.T(60,110,!2)'`c#a'^^^}STR RT4={l4[16r]EP.T(70,120,!1^1^1^1)'fa#'^^^'g`c'^^^'a`d'^^^'e`c#'^^^} RRF={l8DL=BGN-1HAM({RT;DL=BGN;RT1;DL=ME2;RT3;DL=SB1+8RT4;DL=RF1;RT1;DL=ME4;RT3;DL=SB2+8RT4;RT1;DL=ME6;RT3})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/STR BBS={l16q.T(10,100,!1)[16"a]l8}STR BS={l4q=100d^^^l16[ddrr][5d]rddl8q=90}STR BSA={q=100l16[ddrr][5d]rddl8q=90}BSH={q=100l4TrackKey=(K-2)e^^^"e^^^f#^^^"f#^^^g^^^"a^^^b^^^"b^^^l8q=90TrackKey=K}BSI={TrackKey=(K-2)[8"ee][8"f#f#][4"gg][4"aa][4"bb]"b^^^^^^^TrackKey=K} BS1={[4d`d][4c#`c#][4c`c][4"bb][4"a#a#][4"aa][4"gg][4"aa]}BS2={[[4d`d][4c#`c#][4e`e][4d`d]]}BS3={[6"a#a#][c`c][8d`d][4"a#a#][4"gg][4"aa]"a^^^^^^^} BS4={[8d`d][8"gg][4e`e][4c#`c#][4d`d][4"aa];[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}BS5={[d^^^^^^^c#`c#c#`c#^^^^e^^^^^^^:d`dd`d^^^^][4d`d]} BS6={[14d`d][c`c][8"a#a#][4"gg][4"aa]}BS7={l4q=100"a#^^^^^c^d^^^^^^^"a#^^^"g^^^"a^^^"a^^^q=90l8}BS8={[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}STR BS9={q=100l4d^^^c#^^^c^^^"b^^^"a#^^^"a^^^"g^^^"a^^^l8} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O1;rrrO1;rO2;rrrO1;rO6;rrr}DM21={[6DM2]O3[7r]['n51n46'rrr]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr} DM24={[6DM2]O1;rrO1;O2;r[3O1;r]O2;rO1;r}STR DM25={SUB{n49[15r]n57[15r]n55[15r]n49}[6DM2]O3[9r]O1;rO6;rrr} STR DDD={@17BR=20p%=4000EP.T(20,127,!1)[16O1]@25BR=20p%=2000}DD={O3[15r][[O1]rr][5O1]rO1;O1}STR DDA={[[O1]rr][5O1]rO1;O1}DDH={@17BR=20p%=4000MidiDelay({[4O1;rrrrrO1;rO6;rrrO1[19r]]},3,!4)@25BR=20p%=2000}DDI={@33[4[7DM1]:[O1;r]][4O1]@25} DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM6;DM22}DD4={DM7;DM24;DM7;DM25}DD5={[4O3[15r]:O1;rrrO4[5r]O1;rO6;rrr]O3[7r]['n51n46'rrr]} TR=10l16DL=BGN-1DDA;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD5;DD3;DD4;DDH;DDI;DD2;DD3;DD4;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} STR GG={GB[15r][[GB]rr][5GB]r[GB]}STR GGA={[[GB]rr][5GB]r[GB]}GGH={[32GB;rrr]}GGI={[32GB;r[GR]]}GG1={[7GP3]GP1}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[[7GP1]:GP3][4GB;rrr]}GG5={[4[4GB;rrr]:[[GR]GB;r][GB;r[GR]]]GP3} TR=11l16DL=BGN-1@26BR=20p%=1000PL1;GGA;DL=BGN@26BR=20p%=1000GG1;GG2;GG3;GG4;GG1;GG5;GG3;GG4;GGH;GGI;GG2;GG3;GG4;GB; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[4PD3]DL=NK2[PD3]DL=NK3+8MD({n51},16,!8) /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DSH={p.T(0,127,!1)BR=24[16e]rp=64}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} TR=13l16EP=127DL=BGN;PG1;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+3DS6;DL=ME1+7DS2;DL=ME2+3DS13;DL=ME2+7DS6;DL=SB1+7DS1;DL=SB1+15DS6;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+3DS6;DL=ME3+7DS2;DL=ME4+3DS13;DL=ME4+7DS6;DL=SB2+7DS1;DL=SB2+15DS6;DL=RF2+3DS6;DL=RF2+7DS7;DL=NK1+3DS6;DL=NK1+7DS7;DL=ME5+3DS6;DL=ME5+7DS2;DL=ME6+3DS13;DL=ME6+7DS6;DL=NK2+1DS12;DL=NK2+3DS14;DL=NK2+5DS10;DL=NK2+7DS15;DL=NK3+3DS13;DL=NK3+7DS6; /*14*/SPH={v=100l16@6,8HAM({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]})} SPI={v=100l16@5,24HAM({MD({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]},1,!1)})} SP1={l8v=110@4,0d"ae"af"aa"a;c#"ae"ag"aa"a;c"af"ag"aa"a;"b"ga"gg"gf"g;"a#"fd"fe"ff"f;"a"fc"fd"ff"f;"g"d"a"d"a#"dd"d;"a"e"b"ec#"ee"e} SP2={l8v=100@1,0[d"ae"af"aa"a;c#"ae"ag"aa"a;e"af"ag"aa"a;d"ae"af"aa"a]}SP3={l8v=110@2,0["a#"fd"f:e"ff"f]ecfc[d"ae"af"aa"a]"a#"fd"fe"ff"f;"g"e"a"e"a#"ed"e;"a"ec#"ed"ee"e['aec#'^^^]} SP4={l8v=120@3,0[[d"ae"af"aa"a][gdada#d`dd]:ecgca#c`cc;ec#gc#a#c#`c#c#[d"ae"af"aa"a]]f"a#a"a#a#"a#`d"a#;gcaca#c`cc;f"ag"aa"aa#"a'a`c#'^^^^^^^} TR=14DL=BGN;P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)SP1;SP2;SP3;SP4;SP1;SP2;SP3;SP4;DL=NK1;SP1;SP2;SP3;SPH;SPI; /*15*/FT={l16EP.T(30,127,!1)@5,24HAM2({"ac#dedefgfgaa#aa#`c`d})}FTH={@35,0EP=110TrackKey=(K-2)l16MidiDelay({[[3'bg`e'rr]r[3'bg`e'r]][[3'af#`f#'rr]r[3'af#`f#'r]][3'bg`g'rr]r[3'bg`g'r][3'aa`c'rr]r[3'aa`c'r][3'b`g`e'rr]r[3'b`g`e'r][3'f#`f#b'rr]r[3'f#`f#b'r]},3,!16)TrackKey=K} FT1={l4EP=127@3,0CO1}FT2={@5,8EP=90l8>['afd'^^^^^^^c#c#ea^^^^'gec#'^^^^^^^:ddfa^^^^]d"af"aa"a`d"a<} FT3={HAM({l8EP=100M=127rr@85,0'a#fd'^^^^^^^^^[6r]'`daf'^^^^^^^^^rrrrEP=100@56,0'ga#'[7r]'eg'[7r]'`c#a'[7r]})l16@81,0c#defgaa#`c#;ab`c#`d`e`f`g`aM=0} FT4={EP=127@4,0SUB{l16[64r][48r]HAM({SUB{f^^ffrfrfrfrf^^f}a^^aarargrgra^^a})}l4CO4} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=NK1;FT1;FT2;FT3[FTH] /*16*/BG1={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG2={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={EP=127l4@120,0'cde'^^^} BG4={@125,5l4BR=20P=80p.T(0,127,!1)'`c`d'^^^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} TR=16DL=BGN+7BG4;DL=ME2[BG5]DL=ME2+6BG1;DL=SB1+6BG2;DL=RF1+7BG4;DL=ME4[BG5]DL=ME4+6BG1;DL=SB2+6BG2;DL=RF2;BG5;DL=RF2+4BG5;DL=RF2+7BG4;DL=ME6[BG5]DL=ME6+6BG1; DL=NK2+6BG1;DL=NK3+6BG2; //------------------------------------U&I K=2INT UI_TIME=722-17INT UI_EST=160 FUNCTION UIW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} FUNCTION UI2(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+24)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) UI2(01,01,083,00,0,K,064,4,2,127,09,0)UIW(07,07,088,00,0,K,104,1,2,127,09,0)UIW(13,13,119,00,0,0,___,5,0,127,09,0) UIW(02,02,082,00,0,K,074,2,2,080,09,6)UIW(08,08,083,00,0,K,000,3,2,100,09,2)UIW(14,14,082,01,0,K,020,2,2,127,09,0) UIW(03,03,064,00,0,K,000,2,2,080,10,6)UIW(09,09,083,00,0,K,127,3,2,100,09,2)UIW(15,15,003,00,0,K,096,2,2,110,10,0) UIW(04,04,063,00,0,K,127,2,2,080,10,0)UIW(10,10,025,00,0,0,064,3,1,127,10,0)UIW(16,16,091,00,0,0,084,2,1,120,10,0) UIW(05,05,039,01,0,K,024,2,2,127,09,0)UIW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// UIW(06,06,103,00,0,K,032,1,2,090,10,0)UIW(12,12,026,00,0,0,064,3,0,127,09,0) DL=UI_TIME+17Tempo=UI_EST;HAZ=UI_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8SB2=ME4+8 ME5=SB2+16RF2=ME5+8ME6=RF2+8INT ME7=ME6+8NK1=ME7+8NK2=NK1+8INT RF3=NK2+8 /*1*/MN1={V=100rrgggd^rb^a^g^f#^f#gre^^^rg^f#^e^de^^^rr`c`c`c`c^`d^`e`e^`e`d^^`cb^`c`d^^^`d`e`f#^r}MN2={V=110`g^`f#^`eb^b`d^`e`d^`d`e`f#`g^`f#^`g`a^`a`f#^`e`d^^^r;`e`e`e`d^^`e^`g`g`g`f#^^`g^`f#^^`e`f#^`g`a^^`b`a^^^r} MN3={>V=120[b^b^b^rb^aba^f#f#g:aaaaaf#^a`c#`d`c#b^^^r]aaaa`c#^^`c#b^`c#`d#^^^^*>[b^a^gf#^e^rc#^e^b^:a^g^f#a^d^r"b^d^a^;g^gg^^f#^e^c#^d^e^f#^^^^^^rd#^d#e^^f#^]`c#^b^ag^f#^rf#^`d^b^;`d^`c#`d^`e`f#^`e^`c#`e^`f#`g^`g^^^^^`a`f#^^^^^rrr<*/} MN4={>V=120[`f#`f#`f#`f#^bab`f#`f#`g`e^`d`c#`d`e`e`e`e^:`a^`e`e`d`e`f#^^^r]`c#^ab&&^^^`b^^^<} TR=1l8q=97DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2[MN3]MN4;DL=RF3+7@3d#d#rd#rd#rd#}) /*2&3&4*/RA={M.W(60,120,!1)@68,0If(CH==3){@60,0}If(CH==4){@72,0}}RB={M=60@82,0If(CH==3){@64,0}If(CH==4){@63,0}}RT1={EP=120SUB{[gggg^gg^]e^d^d^e^c#^c#deeee[aaaa^aa^]f#^f#^f#^f#^d^ddf#f#bb;[bbbb^bb^]b^a^a^g^e^^ef#ede[aaaa^aa^]f#^^^f#^ab^^^^^^} HAM({[bbbb^bb^]b^a^a^b^a^af#f#gab[`c#`c#`c#`c#^`c#`c#^]`c#^b^b^`c#^b^b`c#`d`e`f#`f#;[`f#`f#`f#`f#^bb^]`f#^`e^`e^`d^`c#^^`c#`d`c#b`c#[`e`e`e`e^`e`e^]`d#^^^`d#^`e`f#^^^^})} RT3={l4[16r]EP.T(70,127,!1^1^1)SUB{g^^^g#^^^a^^^}`c^^^`c#^^^`d^^^l16} RRF={l16DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;DL=ME4;RT3;DL=RF2;RT1;DL=ME7;RT3;DL=RF3;TrackKey=(K+3)RA;RT1;RB;TrackKey=K;}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BS1={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS2={[8"gg][8"ee]>[8"cc]<[8"dd]}BS3={[[4"ee][4"bb]][4"cc][4"c#c#][4"dd]"d^^^^^^^} BS4={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS5={l4q=100[e^^^"b^^^]l8q=90[4"cc][4"c#c#][4"dd]"d^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[6DM2]l8O3;r[O4]rrrrl16} DDH={@33[4MD({O1;rrO1;O2;r[[O1]r]O2;rO1;r},1,!1)[16r]]@25}DDI={@26[SUB{O1}MD({n49},8,!8)[15r]O1;rrO1;O2;r[[O1]r]O2;rO1;r]@25DM21} DD1={DM6;DM13}DD2={DM6;DM8}DD3={DM6;SUB{n49[15r]n57[15r]n55}DM20}DD4={DM6;DM21}DD5={DM6;DM7} TR=10l16DL=BGN;V=127BR=20p%=4000DD1;DD2;DD3;DD4;DD1;DD2;DDI;DD5;DD4[DD1]DD2;DD3;DD1;DD4;DD1; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26[4MidiDelay({GB},15,!8)[31r]]@25}GGI={[MD({[4GR;rGB;r]},1,!2)[16r]][3GP2]n49[7r]n57[7r]} GG1={[7GP3]GP2}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1][4GB;rrr]}GG5={[8GP1]} TR=11l16DL=BGN;PL1;V=127BR=20p%=5000GG1;GG2;GG3;GG4;GG1;GG2;GGI;GG5;GG4[GG1]GG2;GG3;GG1;GG4;GG1; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;V=127PD3;DL=SB1[PD3]DL=ME4+7PD4;DL=SB2[4PD3]DL=NK1[3PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16`daf#<'^^^^^^^p=64} FT4={HAM({[l8@82,0EP=100MD({SUB{`d^`d^`d^r`d^`d`d`c#^}b^b^b^rb^aba^},1,!8)[11r]:>EP=127@100,0bef#abf#d"b<]>EP=127@100,0"bdef#"bef#b<})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]FTH;FT1;FT2;FT3;FTH;FTI;TrackKey=(K+3)FT1;TrackKey=K; /*16*/BG1={@120,0l4'cde'^^^}BG2={@126,7l2BR=46p=127EP.T(110,127,!1)a^^^rrrrp=64}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64} TR=16DL=ME2;BG3;DL=ME2+7BG4;DL=SB1+7BG1;DL=ME4;BG3;DL=ME4+7BG4;DL=SB2+15BG1;DL=ME5+7BG1;DL=ME7;BG3;DL=ME7+7BG4;DL=NK1+6BG2;DL=NK2+7BG1; //------------------------------------BE MY LOVER INT K=1INT BM_TIME=850-17INT BM_EST=159 FUNCTION BMW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(BM_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) BMW(01,01,012,00,0,K,064,4,2,127,09,0)BMW(07,07,035,00,0,K,084,1,2,120,09,0)BMW(13,13,119,09,0,0,___,5,0,127,09,0) BMW(02,02,004,00,0,K,064,2,2,120,09,0)BMW(08,08,012,00,0,K,000,3,2,100,09,2)BMW(14,14,082,01,0,K,___,2,2,127,09,0) BMW(03,03,003,00,0,K,000,2,2,122,10,0)BMW(09,09,012,00,0,K,127,3,2,100,09,2)BMW(15,15,003,00,0,K,096,2,2,110,10,0) BMW(04,04,002,00,0,K,127,2,2,127,10,0)BMW(10,10,025,00,0,0,064,3,1,127,10,0)BMW(16,16,091,00,0,0,084,2,1,120,10,0) BMW(05,05,039,01,0,K,044,2,2,120,09,0)BMW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// BMW(06,06,030,00,0,K,032,1,2,070,10,0)BMW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=BM_TIME+17Tempo=BM_EST;HAZ=BM_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16NK1=RF2+8NK2=NK1+8ME5=NK2+8ME6=ME5+8 /*1*/MN1={EP=110[e^ee^ef#ed"b^"b^ddef#^f#f#^f#f#:gf#e^e^^^r]ge^^r}MN2={EP=120e^d^[e^gg^^gg^^f#^d^"b^e^gg^^:ga^^b^b^^r]a^b^^^} MN3={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^^rr}MN4={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^MN3} TR=1l8q=96DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2;MN4;}) /*2&3&4*/RT={If(CH==3){l128rl8}If(CH==4){l64rl8}}RT1={q=110RT[egbebegbdf#bdbdf#bcegcgcegdf#ad:adf#a]'ad'^^^} RT2={If(CH==2){l8q=160EP=90@30,0HAM2({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})}Else{l8>@82,0BR=10If(CH==3){p%=100}Else{p%=-100}EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<}} RRF={l8DL=BGN;RT1;DL=RF1;RT1;DL=RF2;RT1;DL=ME6;TrackKey=(K-1)RT2;TrackKey=K}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4BR=24q=100e&&^^^`e&&^^^e^^^^^^^c&&^^^`c&&^^^"a^^^"b^^^l8q=90}BSI={[16e`e][8c`c][4"aa]b^^^^^^&&"b} BS1={[[4e`e][4d`d][4c`c]:[4d`d]][d`d]BR=12`d^^&&d}BS2={[[4e`e][4"bb][4d`d][3c`c]:d`d]c`c} BS3={[[4"aa][4"bb]:[6c`c]["bb]][4c`c]"b^^^^^^^}BS4={[[4e`e][4d`d][4c`c][4g`g]]}BS5={l4q=100"a^^^"b^^^c^^^^^"b^q=90l8[4"aa][4"bb][4c`c]"b^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n38n40n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[7DM2][O1;r]O2;rO1;r}DM22={[7DM2]O3[7r]}DDH={[3[7DM1][O1;r]][4DM1]O3;rrrEP.T(60,127,!2^4)[6O1;r]}DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM7;DM13}DD4={DM6;DM22}DD5={@26l8[O1;rrO1;O2;rO1;rrrrO1;O2;rO1;r]l16@33DM13} TR=10l16DL=BGN;BR=20p%=1000@33DD1;DD2;DD3;DD4;DD1;DD2;DD5[DD4]DD1;DDH;DD1;DD2;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GGI={[7GP2]GB[15r]}GG1={[8GP2]}GG2={[7GP2][GR;rGB;r][GB;rrr]}GG3={[7GP2]GB[15r]}GG4={[7GP2][GR;rGB;r]GB[7r]} GG5={l8[8GB;rrr]l16[3GP2]GB[15r]} TR=11l16DL=BGN@26BR=20p%=-1000PL1;GG1;GG2;GG3;GG4;GG1;GG2;GG5[GG4]GG1;GGH;GGI;GG2;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17}PD13={[56r]rr['n28n39'r]rr} TR=12l16DL=BGN;BR=20p%=2000SUB{PD3;PD13}GG1;GG2;GG3;SUB{[PD3]PD13}GG4;GG1;GG2;GG5;SUB{[3PD3]}[GG4]GG1;SUB{PD3}GGH;GGI;SUB{PD13}GG2;GG3; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16f#gf#^d^l8bagagf#gf#ed^"b^d})} FT1={HAM({l8@103,0EP=90SUB{[e^^^^^^^d^^^^^^^c^^^^^^^d^^^^^^^]}[b^^^^^^^b^^^^^^^g^^^^^^^a^^^:`d^`c^]@104,0EP.T(60,110,!1)'af#`d'^^^})} FT2={EP=100@1,0l8HAM({['`eb'ab'`eb'^^'`eb'^'`da'ab'`da'^^'`da'^'`f#b'b`d'`f#b'^^'`f#b'^:'`e`c'^^'`e`c'^^'`f#`d'^]'`e`c'^^^SUB{g^a^}`e^`d^})} FT3={EP=100@100,0HAM({l8b^^^^^^^a^^^b^^^g^^^^^^^^ege`d`cb`cb^^^^^^^a^^^b^^^g^^^^^^^ @104,0EP.T(70,127,!1)'f#b"b'^^^^^^r})}FT4={HAM({[[@85,0EP=110l8rrMD({'bg'^},3,!4)rrrr:rrMD({'ad'^},3,!4)rrrr]:>EP=90@100,0`dgb`d^gb`d<]@100,0l16[8r]EP.T(70,127,!2)'bge'^^^^^^^})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]DL=NK1[FTH]FT2;FT3; /*16*/BG1={l4@120,0'cde'^^^}BG2={l4@126,8BR=20p%=8000'cde'^^^rrrrp=64}BG3={@126,8BR=20p%=8000l4EP.T(127,0,!1^2)'cde'^^^^^rrrrp=64} TR=16DL=ME1+7BG1;DL=ME2+7BG2;DL=ME3+7BG1;DL=ME4+7BG2;DL=NK1+7BG1;DL=NK2+7BG2;DL=ME5+7BG1;DL=ME6+7BG2; //------------------------------------KAMIKAZE SUICIDE SQUAD K=0INT KZ_TIME=962-9INT KZ_EST=160 FUNCTION KZW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(KZ_TIME+9)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) KZW(01,01,012,00,0,K,064,4,2,127,09,0)KZW(07,07,039,00,0,K,084,1,2,120,09,0)KZW(13,13,119,09,0,0,___,5,0,127,09,0) KZW(02,02,082,01,0,K,064,2,2,110,09,9)KZW(08,08,012,00,0,K,000,3,2,110,09,2)KZW(14,14,082,01,0,K,___,2,2,100,10,0) KZW(03,03,063,00,0,K,000,2,2,100,10,0)KZW(09,09,012,00,0,K,127,3,2,110,09,2)KZW(15,15,003,00,0,K,096,2,2,110,10,0) KZW(04,04,082,00,0,K,127,2,2,100,10,0)KZW(10,10,025,00,0,0,064,3,1,127,10,0)KZW(16,16,091,00,0,0,084,2,1,120,10,0) KZW(05,05,039,01,0,K,044,2,2,120,09,0)KZW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// KZW(06,06,049,00,0,K,032,1,2,080,10,0)KZW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=KZ_TIME+9Tempo=KZ_EST;HAZ=KZ_TIME+1BGN=HAZ+24ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16ME5=RF2+8ME6=ME5+8NK1=ME6+8NK2=NK1+8RF3=NK2+8ME7=RF3+8INT SB3=ME7+8INT RF4=SB3+16INT END=RF4+16 /*1*/MNH={V=110[`c#^f#^a^b`c#^`c#f#f#:ab^r]MidiDelay({ab},8,!4)}MN1={V=100[a^ag#rf#ref#^c#^^rf#f#g#a^g#g#abr:`c#^`c#aabg#r]`c#^`c#`c#b`c#^^r}MN2={V=110[b^a^g#f#^b^baag#f#^r:a^g#^f#e^c#^^^rf#g#aa]g#^g#g#^aaf#g#^^^^rrr} MN3={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#e^rf#^f#^a^b`c#^`d`c#`d`c#^^r}MN4={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#erf#^^^^^^^r`c#^f#^ag#^r}MN5={[a^ag#rMD({f#re},6,!2)[24r]]} TR=1l8>DL=HAZ+8HAM2({MNH;DL=ME1-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME3-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME5-1[7r]MN5;DL=NK2;MNH;DL=ME7;MN2;DL=SB3;MN3;MN4;}) /*2*/STR RGH={l8q=160EP=90@30,0HAM({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})} STR RGI={l16q=160EP=127M=127HAM({[10r]@30,0"ac#ef#g#a`c#^^b^rb^^`c#`c#^`c#^^^^^^[7r]@31,0ag#f#edc#;g#^c#^a^c#^b^c#`c#^^^^^^[8r]<@31,0f#&&^`f#^f#^[10r]@30,0f#&&^`f#^f#^>})} STR RG1={@31,0l16q=160EP=127HAM({[[[10r]c#ef#c#f#g#]:[[10r]ef#g#eg#b]]})}STR RG2={@31,0l16q=160EP=110HAM({[58r]BR=48"c#^&&``c#^^[65r]})} STR RG3={@30,0l4q=110EP.T(60,127,!1^1^1^1^1^1^1^1)SUB{a^^f#af#g#a`c#^^^b^`c#^`d^^`e`f#^`a^`g#^^^`f^^^}d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^p.T(127,0,!1)c#^^^q=160p=64} STR RG4={@31,0l4q=110EP.T(60,90,!1^1^1^1^1^1^1^1)q=110SUB{a^^^g#^a^f#^^^e^f#^d^^^e^^^f#^^^f^g#^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^c#^^^ EP.T(90,127,!1^1^1^1^1^1^1^1)SUB{a^^^g#^a^`c#^^^b^`c#^`e^^^`f#^^^`a^^^`g#^^^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^p.T(127,0,!1)c#^^^q=160p=64} TR=2DL=HAZ+8RGH;DL=BGN-8l16q=160RGI;DL=BGN;RG1;RG2;RG3;RG4;RG1;RG2;RG3;RG4;DL=RF2;RGI;DL=ME5;RG2;RG3[RGH]RG1;RG3;RG4[RG1]l4q=100EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^}) /*3&4*/RTH={l8>EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<} RTI={EP=127l16>SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^[16r]SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^[16r] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RT1={l16>EP=127[SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^][SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RRF={l16DL=HAZ+8RTH;DL=BGN-8RTI;RT1;DL=RF1;RT1;DL=RF2;RTI;DL=NK1[RTH]RT1;DL=RF4[RT1]l4EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^})}TR=3RRF;TR=4RRF; /*5*/BSH={l8q=100BR=12p.T(0,64,!16)f#^^^^^^^^^^^^e^^d^^^^^^^^^^^^c#^^"b^^^^"b^^c#^^^^c#^^d^^^^^^^c#^^^^^^^q=90}BSI={l4q=100f#^^^^^^^e^^^^^^^d^^^"b^^^q=90l16[c#^rc#^rc#^^^^^^^^^]l8} BS1={[4f#`f#][4d`d][4e`e][4c#`c#][4d`d][4"bb]l16[c#^rc#^rc#^^^^^^^^^]l8}BS2={[[4f#`f#][4e`e][4d`d]["bb][c#`c#]]}BS3={[6d`d][e`e][8f#`f#][8"bb][4c#`c#]`c#^^^^^^&&c#} BS4={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d][4c#`c#]}STR BS4A={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d]`c#^^^^^^&&c#} BS5={q=100l4d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^l8`c#^^^^^^&&c#q=90}BS6={l4q=100f#^^^d^^^e^^^c#^^^d^^^"b^^^l16q=90[c#^rc#^rc#^^^^^^^^^]l8} BASS={l8<MNH<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)}UL1={EP=100[23r]SUB{d^dddc#c#}f#^f#f#f#g#g#rr[23r]SUB{d^dddc#^^}f#^f#f#f#g#^^r} UL2={EP=110f#^f#^dd^f#^f#f#f#ee^r;f#^c#^"bc#^"a^^^rdc#de;f#^f#^dd^f#^f#f#f#'ea''da'^rEP=100SUB{`c#^`c#`c#^`d`db`c#^^^^}f^ff^fffc#^^^^rrr} UL3={EP=100SUB{>MN3;MN4<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaabb^}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;"b^"b^"b^"bc#^c#c#c#c#c#^rd^d^d^dEP=110SUB{f^fffg#^^}c#^c#c#c#c#^^r; EP=100SUB{a^a^a^aa^aaabb^r`c#^`c#^`c#^`c#`c#^`c#`c#`c#`e`e^r}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;SUB{d^d^d^de^eeeeera^^^^^^^rf^f^g#g#^}"b^"b^"b^"bc#^c#c#c#c#c#rd^^^^^^^rEP=110c#^c#^c#c#^r} UL4={EP=100SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)} ULMR={l8DL=HAZ+8ULH;DL=ME1;UL1;UL2;UL3;DL=ME3;UL1;UL2;UL3;DL=ME5;UL1;UL2;DL=NK2;UL4;DL=ME7;UL2;UL3}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[7DM2]BR=20p%=3000[O1;r]O6;rrrBR=20p%=1500}DM21={[6DM2]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500}DM22={[6DM2][O3;rrr][O4;r]rrrr} DDH={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r][3O3;rr][7r][3O4;rr][7r]}DD1={DM6[4DM2][3O3;rr][7r][3O4;rr][7r]}DD2={DM6;DM20}DD3={DM7;DM21}DD4={DM6;DM20}STR DD4A={DM7;DM22} DD5={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r]O3[7r]O4[7r]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500} TR=10l16DL=BGN-8BR=20p%=1500DDH;DL=BGN@25BR=20p%=1500DD1;DD2;DD3;DD4;DD4A;DD1;DD2;DD5;DD4;DD4A;DDH;DD2;DD3;O3;DL=NK2;O3;DL=RF3;DD1;DD3;DD5;DD4A;DD1;DDH;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GG1={[6GP3][[3GB;r:r][[GR]GB;r]]}GG2={[7GP3]GP8}GG3={[7GP3][4GB;r[GR]]}GG4={[7GP1]GP3} TR=11l16DL=HAZ+8BR=20p%=-1500PL1;GGH;DL=BGN-8GG1;DL=BGN;BR=20p%=-1500GG1;GG2;GG3[GG4]GG1;GG2;GG3[GG4]GG1;GG2;GG3[GGH]GG1;GG3;GGH;GG4[GG1] /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+8[PD3]DL=HAZ+8O3;DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[3PD3]DL=NK1[3PD3]DL=SB3[4PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16@82,8q=100EP=120[3ag#c#ag#c#ac#]g#f#c#g#f#c#g#c#[3ag#dag#dad]bf#dbf#dbd[f#e"bf#e"bf#"b][g#f#c#g#f#c#g#c#][ag#dag#dad]g#f#c#g#f#c#g#c#;`c#g#c#`c#g#c#`c#c#<} TR=14DL=HAZ+8l16P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)V=70SP4;V=100DL=BGN-8SPH;DL=BGN;SP1;SP2;SP3[SP4]SP1;SP2;SP3[SP4]SPH;SP2;SP3;V=60SP4;V=70SP4;V=100SP1;SP3[SP4][SP1] /*15*/FTH={l8<@23,0q=90HAM2({[8f#^^^^^&&`c#r]})>q=100}FT1={l16@115,0EP=100HAM({SUB{MidiDelay({[c#c#c#c#rc#c#rc#c#rc#c#rc#r]["b"b"b"br"b"br"b"br"b"br"br]ddddrddrddrddrdreeeereereereerer},3,!16)[c#c#c#c#rc#c#^^^^^^^^r]}MidiDelay({[f#f#f#f#rf#f#rf#f#rf#f#rf#r][g#g#g#g#rg#g#rg#g#rg#g#rg#r]aaaaraaraaraararbbbbrbbrbbrbbrbr},3,!16)aaaaraa^^^^^^^^rg#g#g#g#rg#g#^^^^^^^^r})} FT2={@85,0HAM2({q=90EP=100[l8rrMD({'f#c#'^},1,!2)rrrrrrMD({'ec#'^},1,!2)rrrrrrMD({'f#d'^},1,!2)rrrr:[8r]]l16q=100EP=127@82,1f#c#ef#g#c#f#g#ac#g#a`c#c#b`c#})} FT3={@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#ee^}b^a^g#f#^b^baag#f#^r},1,!8)[9r]@81,0l16P.onCycle(!2,32,96)HAM({[f#a`c#^f#^:rr]})P=96@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#'ea''da'^}b^a^g#f#^b^baag#f#^r},1,!8)[16r]} FT4={@82,0l16EP=110SUB{[4aaaaraar:aaraarar]f#f#rf#f#rf#r;ddddrddrddrddrdreeeereereereererf#f#f#f#rf#f#rf#f#rf#f#rf#rffffrffrg#g#g#g#rg#g#r}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr[c#c#c#c#rc#c#r] SUB{[4aaaaraar:aaraarar]bbrbbrbr;aaaaraaraaraararbbbbrbbrbbrbbrbr`c#`c#`c#`c#r`c#`c#r`c#`c#r`c#`c#r`c#rg#g#g#g#rg#g#rfrf^^^^^}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr;c#c#c#c#rc#c#rc#rc#^^^^^} TR=15l16>DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=ME5;FT2;FT3;FTH;DL=RF3;FT1;FT3;FT4;FT1; /*16*/BG1={@123,3l4BR=70[rp.T(127,30,!2^4)'cde'^^]p=64}BG2={p=64@120,0l4'cde'^^^}BG3={@123,5BR=40p.T(0,127,!1)'cd'^^^}BG4={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG6={l1@126,8'>>>cde<<<'^}BG7={p=64@128,3l8HAM({c^[4d]})@128,1c^^rc^rrd^^^^@123,2HAM({[g^^^]})@127,3HAM2({grrddrrr})@128,1e^^^^^^^^@128,3g^^'cde'}STR BG8={l1p=64@126,8'>>>cde<<<'}STR BG9={@128,3V=127l4'>cde[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^^^r<}MN4={>[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^`d`cgHAM2({RRF})TR=3RRF;TR=4RRF; //------------------------------------------------------------------------------TR=005&007;--------------------------------------------------------------------------// BSH={[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d[3"a#ra#r]"a#ra#a#[3"grgr]"grgg[3"arar]"araa[3dr`dr]`dr`d`d} BS1={[[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d]}BS2={BS1}BS3={[[[3"a#ra#r]"a#ra#a#]:[[3dr`dr]dr`d`d]][3dr`dr]dr`d`d["arar]"a^^^"a^^^} BS4={[4["a#ra#r]cr`crcr`c`c:["arar]dr`drdr`d`d][3dr`dr]dr`d`d}BS5={q=100l4["a#^^^^^^^:d^^^^^^^]d^^^"a^^^l16q=180} TR=5l16ULMR; //------------------------------------------------------------------------------TR=014;------------------------------------------------------------------------------// STR PAH={EP=127@12SUB{[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^`e`f`d<}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]} STR PAI={EP=127[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]}STR PAG={EP=127@12SUB{HAM({[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^^^^^^^^^^^<})}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r:'agd"a'^^]} STR PA1={EP=100@12[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'`dafd'^^^r'`dafd'^^]}STR PA2={PA1} STR PA3={EP=100[['afd"a#'^^^r'afd"a#'^^]:['`dafd'^^^r'`dafd'^^]]'`dafd'^^^r'`dafd'^^'gec"a'^^^rrrr} STR PA4={EP=110[4'afd"a#'^'afd"a#''ceg`c'^^'ceg`c'^:'`ceg"a'^^'`dafd'^^'`dafd'^]'`dafd'^^'`dafd'^^'`dafd'^} TR=14l8DL=HAZ[PAH]PAI;DL=BGN;PA1;PA2;PA3;PA4;PA1;DL=NK4;PAI;PAG; //------------------------------------------------------------------------------TR=015;------------------------------------------------------------------------------// STR HSH={}STR HSI={} STR HS1={EP=110@13["a#df"a#f"a#df"a#df"a#f"a#df"aeg"ag"acedfadagfd]}STR HS2={HS1} STR HS3={`dafd<'`d][`d'>`dafd<']][`d`d'>`dafd<'`d]aa'>agd"a<'arrrr>} STR HS4={`dafd<'^'>`dafd<'][`d`d'>`dafd<'`d]>} TR=15l8>DL=HAZ+8[HSH]DL=BGN;HS1;HS2;HS3;HS4;HS1;DL=NK4;HSH;HSI; //------------------------------------LYRIC Function LY(GRFD){[(GRFD)l4Lyric={"。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:"}rLyric={":。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*"}rLyric={"*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。."}rLyric={".*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。"}rLyric={"。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:"}rLyric={":。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+"}rLyric={"+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:"}rLyric={":゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。."}rLyric={".:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。"}rLyric={"。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*"}rLyric={"*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+"}rLyric={"+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。."}rLyric={".+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。"}rLyric={"。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:"}rLyric={":。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*"}rLyric={"*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。."}rLyric={".*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。"}rLyric={"。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:"}rLyric={":。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+"}rLyric={"+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:"}rLyric={":゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。."}rLyric={".:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。"}rLyric={"。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*"}rLyric={"*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+"}r]}TR=17CH=16DL=0Lyric={"MS-GS EUROBEAT 120th ANNIVERSARY NON-STOP MEGAMIX VOL.08"}DL=18Lyric={"1.MYSTERIOUS FOREST - 2006/7/17"}DL=121LY=2DL=137Lyric={"2.ONE DAY - 2006/10/09"}DL=242LY=2DL=258Lyric={"3.I’M IN DANGER BUBBLE -EXTENDED NRG MIX- - 2006/09/25 "}DL=324LY=1DL=332Lyric={"4.I’M IN DANGER BUBBLE -EXTENDED EURO MIX- - 2006/09/25 "}DL=444LY=1DL=452Lyric={"5.HOLY NIGHT - 2006/08/14"}DL=581LY=1DL=589Lyric={"6.DARKNESS NIGHTMARE SONG - 2006/09/11"}DL=714LY=1DL=722Lyric={"7.U & I - 2006/11/06"}DL=842LY=1DL=850Lyric={"8.BE MY LOVER - 2006/10/23"}DL=954LY=3DL=978Lyric={"9.KAMIKAZE SUICIDE SQUID - 2006/08/28"}DL=1151Lyric={"BONUS TRACK - 『 MY SWEET MEMORIES - オルゴールバージョン - 』"}
p=64}BG3={@80,0l4rrrBR=120p.T(127,0,!6)`gp=64} BG4={@123,1l4EP.T(100,127,!1)BR=20p.T(127,64,!1)c^^^r}BG5={@125,4l8BR=40EP.T(70,100,!1^1^1^1)p.T(127,80,!1^1^1^1)[32'cd']EP=127} TR=16DL=ME2+6BG1;BG2;DL=SB1+7BG4;DL=ME4+6BG1;BG2;DL=SB2+7BG4;DL=SB2+15BG4;DL=ME6+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED NRG MIX- INT TIME_DB=240K=1INT EST_DB=160FUNCTION DBW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(TIME_DB+1)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DBW(01,01,081,00,0,K,064,4,2,127,09,0)DBW(07,07,039,00,0,K,074,1,2,120,09,0)DBW(13,13,119,08,0,0,___,5,0,117,09,0) DBW(02,02,082,08,0,K,064,2,2,090,09,7)DBW(08,08,081,00,0,K,000,3,2,110,09,2)DBW(14,14,003,00,0,K,096,2,2,110,09,0) DBW(03,03,085,00,0,K,000,2,2,090,10,7)DBW(09,09,081,00,0,K,127,3,2,110,09,2)DBW(15,15,003,00,0,K,070,2,2,117,10,0) DBW(04,04,082,00,0,K,127,2,2,090,10,7)DBW(10,10,025,00,0,0,064,3,1,127,10,0)DBW(16,16,091,00,0,0,050,2,1,117,10,0) DBW(05,05,039,01,0,K,064,2,2,110,09,0)DBW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DBW(06,06,031,00,0,K,032,1,2,070,10,0)DBW(12,12,026,00,0,0,064,3,0,127,09,0) DL=TIME_DB+1Tempo=EST_DB;HAZ=TIME_DB+1BGN=HAZ+17ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+16 /*1*/MN1={v=100e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}STR MN1A={v=110e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={v=110a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={v=120"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} STR MN3A={v=120"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={v=120[MD({"a^"a^c"b"ae ^dc"a^^^r},1,!1^1)[16r]]} MN5={"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^c^d^e^e^d#^e^f#^;g^g^f#^f#a ^gf#e^ed#e;e^^f#^^g^ f#^^^ ^^^rl4b^^^^^^^^l8} TR=1l8>q=96V=110EP.W(110,127,!1)HAM({DL=HAZ;MN4;DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2}) /*2&3&4*/RA={@82,8If(CH==3){@85,0}If(CH==4){@82,0}}STR RB={@82,8If(CH==3){@7,0}If(CH==4){@8,0}}STR RC={@81,1If(CH==3){@81,0}If(CH==4){@82,8}} STR RD={@82,8If(CH==3){@39,0}If(CH==4){@39,8}}STR RE={@82,0If(CH==3){@62,0}If(CH==4){@63,0}} STR RT={RD} RTH={RB<[[[e^^err:e^^^f^e24f24e24d^]:e^^^b^a24b24a24d^]:e^^^f^f^rr]BR=6p.T(64,64,!8,64,32,!2)e^^^^^^^^^>p=64} STR RTI={RC;e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^RD e^^erre^ ^^f^e24f24e24d^;e^^erre^f^rrrrrr;e^^erre^ ^^f^e24f24e24d^;RE;q_(-20) ggggbbb p%.T(0,0,!32,0,-1600,!32) b q_(0)p%.T(-1600,0,!16,0,0,!8,0,-4800,!16)`c^^^,,+10; p%.T(-4800,0,!16,0,700,!64,700,-700,!32,-700,700,!32,700,-700,!32,-700,700,!32,700,-700,!32,-700,0,!64)`d^^^,,+10} RT1={RA;SUB{[[e^eereere^rrrrrr:f^^f^^f^g^^g^^g^]:d^^d^^d^e^^e^^e^]e^re^re^e^^^^}HAM({[[a^aaraara^egagab:a^^`c^^`e^`d^^b^^g^]:a^^`c^^a^g^^b^^g^]`c^r`c^r`c^b^^^^rrr})} RRF={l16DL=HAZ;RTH;RTI;DL=BGN;RT1;DL=RF1;RT1}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l16[8a^ra^ra^^^^^^^^^]l8}BSI={[[4a`a][f`f][g`g][4a`a][d`d][e`e]]} BS1={[[4a`a][f`f][g`g]:[4a`a][d`d][e`e]][4f`f]l16e^re^re^e^^^^^^^l8}BS2={[8f`f][8e`e][4f`f][4d`d][4e`e][4a`a]} STR BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={q=100l4f^^^^^^^e^^^^^^^d^^^e^^^f^^^g^^^l8q.onCycle(!8,70,100)}BS6={[[4a`a][4f`f][4g`g]:[4e`e]][4b`b]>[c`c]["bb]["aa]["gg][4"f#f#][8"bb]<} BASS={l8<<@104,0CO2;CO2A<@31,0CO3; /*8&9*/UL1={v=110a^^a^^a^g^^a^^a^b^^b^bbbg^^^b^^r;a^^a^^a^b^^b^^b^`c^^^a^^rv=100SUB{a^b^`c^`d^}f^g^a^b^} UL2={>v=110SUB{c^c^"b^"bc^ccc^^^}e^e^d^de^gge^^^r<`c^^^b^a^g^a^b^`cr>SUB{c^c^"b^"bc^ccc^^^r}e^e^d^de^gge^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rSUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^r<},1,!1^1)[16r]]} UL5={v=110[>SUB{c^c^ccc"a^"a"a"a^^^}e^e^eeee^ccc^^^rULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3;rr[O1;r:r]O4;rrrrrrr}DM21={[6DM2]O3[7r]O4[7r]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr}DM23={[4DM2]SUB{O3[7r]O4[7r]O3;rrr[O4;r]}[3DM2]O1;rO1;rO6;rrr} STR DM24={[4DM2]SUB{O3[7r]O4[7r][O3;rrr][O4;rrr]}[3DM2]O1;rO1;rO6;rrr} STR DD={@17EP.T(50,127,!1)[6O1]r[3[O1]r]@25}DDH={@25O3[63r][[3O3;rr][7r][3O4;rr][7r]]}DDI={@25DM6;DM9} DD1={DM6;DM20}DD2={DM6;DM23}STR DD2A={DM6;DM24}DD3={DM7;DM21}DD4={DM6;DM22}DD5={@26BR=20p%=5000MidiDelay({[4[3O1]rO2;r[[O1]r]O2;rO1;r[16r]]},10,!8)@25BR=20p%=1000}DD6={@17DM6;DM9@25} DD7={[DM6]SUB{n49[7r]n57[7r]n55[7r]n57[7r]n49[15r]n57[15r]}[DM2]DM22} TR=10l16DL=HAZ;BR=20p%=1000DDH;DDI;O3;DL=BGN-1[12r]O6;DL=BGN;BR=20p%=1000DD1;DD2;DD2A;DD3;DD4;DD1;DD5;DD6;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[30GB;r[GR]][GB;rrr]}GGI={[4GP2][4GP3]}GG1={[7GP3]GB;rr[GR;r:r]GB;rrrrrrr}GG2={[7GP3]GP1}GG3={[7GP3][16r]}GG4={[3GP1][4GB;rrr][3GP1]GP2} GG5={MidiDelay({[4[4GR]GB;r[6GR]GB;r[GR][16r]]},10,!8)}GG6={[12GP1]GP8} TR=11l16DL=HAZ@26BR=20p%=1000PL1;GGH;DL=HAZ+8GGI;GB;DL=BGN@26BR=20p%=1000GG1[GG2]GG3;GG4;GG1;GG5;GGI;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+3PD4;DL=HAZ+8PD3;DL=BGN;PD3;DL=SB1;PD3;DL=ME3+7PD4;DL=ME3+8PD3; /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdrr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} DSH={EP=90[16r]DS5[16r]DS12;DS13;DS7;DS2;DS6;EP=127} TR=13l16DL=HAZ;PP;PG1;HAM2({DSH;DL=HAZ+11DS2;DL=HAZ+15DS7;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+7DS6;DL=ME1+15DS2;DL=ME2+3DS6;DL=ME2+7DS7;DL=SB1+3DS6;DL=SB1+7DS13;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+7DS6;DL=ME3+15DS2;DL=ME4+3DS6;DL=ME4+7DS7}) /*14*/SPH={l16P=96} SPI={l16P=96} SP1={@3,0l16EP=110[[['aec'^^^]'aec'^'aec'^^^'aec'^:'fc"a'^^^'fc"a'^^^'gd"b'^^^'gd"b'^^^]:'fd"a'^^^'fd"a'^^^'ge"b'^^^'ge"b'^^^][16r]}SP2={l4[32r]} STR SP2A={l8@1,0EP=100q=150SUB{HAM2({[fa`cf`cfa`c][egbebegb]dfadadfaegbebegbfa`cf`cfa`cgagab`c`d`e})}l4['afc'^^^]['ge"b'^^^]'fc"a'^^^'gd"b'^^^'aec'^^^'bgd'^^^q=100} SP3={l8@2,0EP=100q=150HAM2({[a`c`d`ea`e`d`c;gb`c`dg`d`cb;fab`cf`cba:gab`dg`d`cb]})['`ebg'^^^]q=100} SP4={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]'bg'^^^^^^^})} SP5={l8@4,0EP=100HAM2({['`ca'^'`ca'^[3'`ca']'af'^'af''af''af'^^^^'`dg'^'`dg'^[4'`dg']:'bg'^^^'bg#'^^^]SUB{b^b^b^b^}`e^`d#^`e^`f#^})} TR=14DL=HAZ;SPH;SPI;DL=BGN;l16>SP1;SP2;SP2A;SP3;SP4;SP1;SP2;SP2A;SP3; /*15*/FTH={l16[64r]HAM({EP=100@85,0q=80MidiDelay({[4'ae'^r'ge'^r'ae'^:rrrrrrrr]},3,!8)>@56,0q=100EP.T(40,110,!4)MD({[4'ae']},1,!4)rrrr<})} STR FTI={l8EP=90[12r]BR=24p.T(64,64,!4,64,127,!4)@82,0'eg`c'^^^[12r]p=64l16@88,0HAM({`ee`dd`cca"a})l8[12r][BR=24p.T(64,64,!8,64,127,!8)@82,0'eg`c'^]p=64[8r]@85,0EP=80l16HAM({MidiDelay({SUB{d^^rd^^re^^re^^r}g^^rb^^r`c^^r`d^^r},5,!8)})} FT1={HAM({l8M=50EP=110@85,0[3rrMD({'a`e'^},2,!2)[12r]]rrMD({'`ef'^},1,!2)rrrrl16@82,0EP=90SUB{g^rg^rg^g^^^^}`c^r`c^r`c^b^^^^rrrl8})M=0} FT2={@100,0EP=80l4HAM({a^^^g^a^b^^^g^^^a^^^f^^^g^^^})HAM({l8>"g"a"bc"ac#ea<})}FT3={l8[EP=110@56,0HAM({rr'a`e'})[21r]:@100,0HAM({g^a^b^`cr})][8r]} FT4={[l8EP=120@85,0a^a^`cba`e^`d`ca^^^^[8r]:l16@85,0SUB{e^^ra^^rb^^r`c^^r}b^^r`c^^r`d^^r`e^^r][8r]} TR=15DL=HAZ;FTH;FTI;DL=BGN;FT1;FT2;DL=ME2;FT3;FT4;FT1;FT2;DL=ME4;FT3; /*16*/BG1={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG3={@80,0l4EP=110rrl16rrBR=50p.W(127,64,!16)ccp.T(127,0,!8)c^rrp=64EP=127}BG4={EP=110l4rrrBR=50p.T(127,0,!4)@80,0c} TR=16DL=HAZ+7BG3;DL=HAZ+15BG1;BG2;DL=BGN+7BG4;DL=ME2+6BG1;BG2;DL=RF1+7BG4;DL=ME3+15BG4;DL=ME4+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED EURO MIX- FUNCTION D2W(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(D2_TIME+15)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT D2_TIME=330-15INT D2_EST=160K=1 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) D2W(01,01,011,00,0,K,064,4,2,127,09,0)D2W(07,07,035,00,0,K,084,1,2,110,09,0)D2W(13,13,119,00,0,0,___,5,0,127,09,0) D2W(02,02,100,00,0,K,064,2,2,100,09,0)D2W(08,08,012,00,0,K,000,3,2,110,09,2)D2W(14,14,082,01,0,K,___,2,2,127,09,0) D2W(03,03,089,00,0,K,000,2,2,100,10,0)D2W(09,09,012,00,0,K,127,3,2,110,09,2)D2W(15,15,003,00,0,K,096,2,2,110,10,0) D2W(04,04,104,00,0,K,127,2,2,100,10,0)D2W(10,10,025,00,0,0,064,3,1,127,10,0)D2W(16,16,091,00,0,0,084,2,1,127,10,0) D2W(05,05,039,01,0,K,044,2,2,110,09,0)D2W(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// D2W(06,06,049,00,0,K,032,1,2,080,10,0)D2W(12,12,026,00,0,0,064,3,0,127,09,0) DL=D2_TIME+15Tempo=D2_EST;HAZ=D2_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+16NK1=RF2+8INT NK2=NK1+8INT NK3=NK2+8 /*1*/MN1={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}MN1A={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={EP=120a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={EP=127"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} MN3A={EP=127"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={EP=127["a^"a^c"b"ae ^dMidiDelay({c"a},10,!4)[20r]]} TR=1l8>q=97V.W(90,127,!4)DL=ME1;HAM({MN1;MN1A;MN2;MN3;DL=ME3;TrackKey=(K+3);MN1;MN1A;MN2;MN3;TrackKey=K;MN3A}) /*2&3&4*/STR RTS={If(CH==3){l64r}If(CH==4){l128r}l8}RTA={@100,0If(CH==3){@89,0}If(CH==4){@104,0}}STR RTB={@67,0If(CH==3){@66,0}If(CH==4){@68,0}} RTH={EP=100M=100RTS;RTB;a&b`cbrarEP.T(100,60,!1,60,110,!1^2)e^^^^^^^^^^^^^^^^^^^^^^^^EP=100a&b`cbrarEP.T(100,60,!1,60,110,!1^2)`d^^^^^^^^^^^^^^^^^^^^^^^^M=0} RTI={EP=100M=100RTB;a&b`cbrarEP.T(100,70,!4,70,110,!2^4)e^^^^^^^^EP=100`f&`g`f`cr`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^ EP=100a&b`cbrarEP.T(100,70,!4,70,110,!2^4)`d^^^^^^^^EP=100`d&`e`e`er`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^M=0} RT1={l8RTA;EP=127"a[aba`eaba^aba`eaba^fab`cb`c`d:`g^`f`cr`dr`e^]`e^`d^`c^b^}STR RT3={l8[48r]l4EP.T(70,100,!1)SUB{f^^^e^^^}a^^^b^^^} RRF={l8HAM({DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;TrackKey=(K+3);DL=ME4;RT3;TrackKey=K;DL=RF2;RT1;DL=NK2;RTH;RTI})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4q=100a&&^^^`a&&^^^^^^^a^^^f&&^^^`f&&^^^^^^^f^g^q=90l8}BSI={[16a`a][8f`f][4d`d][4e`e]} BS1={[[4a`a][4f`f][4d`d]:[4e`e]]e^d^c^"b^}BS2={l4q=100`f^^^f^^^`e^^^e^^^`f^^^d^^^`e^^^a^^^q=90l8} BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={l4a^^^f^^^d^^^e^^^l8[4a`a][4f`f][4d`d]e^d^c^"b^} BASS={l8<}UL2={EP=110[e^e^d^de^gge^:"g"a"bc^^^"b^"a^"g^"a^"b^cr]"g"a"gSUB{"a^^"a^^"a^"b^^^"b^^}"f^^"f^^"f^"e^^^"e^^r} UL3={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120cccg^g^:gggge^e^g#^g#^]gggab^^^g^^r} UL3A={EP=100[SUB{e^e^eeef^fff}c^c^ccc"a^"a"a"arEP=120ccc:g^g^gggge^e^g#^g#^]g^^g^ggge^^^^^^r} UL4={EP=100[SUB{e^e^eeef^f}c^c^ccc"a^"aMidiDelay({SUB{ff}"a"a},10,!4)[20r]]} ULMR={l8>q=97DL=ME1+8UL1;UL2;UL3;DL=ME3+8TrackKey=(K+3);UL1;UL2;UL3;TrackKey=K;UL3A;}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2][4O3;rrr]}DM21={[6DM2]O3[7r]O4[7r]}DDH={O3[61r]O1;rO4[63r]}DDI={[3[7DM1][O1;r]][4DM1]O3[15r]} DD1={DM6;DM20}DD2={@17SUB{n49}[4[7DM1]:[O1;r]][4O1]@25}DD2A={[64r]n49[15r]n57[15r]n49[7r]n57[7r][n49rrr][n55rrr]}DD3={SUB{[rrrrn49[59r]]}[3[7DM1][O1;r]][4DM1]O3[7r]O4[7r]} DD4={DM7;DM21}DD5={DM6;DM8}DD6={DM7[6DM2]O3[7r]O4[7r]}DD7={@25[O3[13r]:O1;rO4[13r]O1;r]rr[3DM1][O1;r]DM20} TR=10l16DL=BGN-2@25BR=20p%=3000O3[7r]O5[7r]O4[15r]DL=BGN@25BR=20p%=3000DD1[DD2:SUB{DD2A}]DD3;DD4;DD1;DD2;SUB{DD2A}DD5;DD6[DD4]DD7;DD1;DD2;DDI; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26BR=24p.T(127,127,!1^1,127,0,!1^1,0,0,!1^1,0,127,!1)[16[4GR]GB^^GR]@25}GGI={@26[BR=24p.T(0,127,!1^1^1^1)[8[4GR]GB^^GR]]@25} GG1={[7GP3][16r]}GG2={[32GB;r[GR]]}STR GG2A={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1]GP3} TR=11l16DL=BGN@26BR=20p%=1000PL1;GG1;GG2;GG2A;GG3;GG4;GG1;GG2;GG2A;GG3[GG4][GG1]GGH;GGI; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} PD13={@17BR=20p%=3000[10r][DR;r][DR]p%=64} TR=12l16DL=HAZ+15PD4;DL=BGN;PD3;DL=ME1+7PD13;DL=ME1+15PD4;DL=SB1;PD3;DL=SB1+7PD4;DL=RF1;PD3;DL=ME3+7PD13;DL=ME3+15PD4;DL=SB2[PD3]DL=SB2+15PD4;DL=RF2[4PD3]DL=NK3+7PD4; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16EP=80@100,0"a"e"a"bcdefe"aefa`e`g`a<})} STR FT2A={HAM({@100,0EP=80l8MD({Div{fa`c}`e^^},3,!2)[12r]MD({Div{egb}`e^^},3,!2)[12r]MD({Div{dfg}a^^},1,!2)rrrrMD({Div{ega}b^^},1,!2)rrrrMD({Div{fab}`c^^},1,!2)rrrrMD({Div{gb`c}`d^^},1,!2)rrrr})} FT3={HAM({[@85,0l4EP=110M=100r'a"a`e'^^^^rrrrrr:EP=100M=0@100,0gab`c]})rrl8rl16@117,0EP=127M=0HAM3({<`c`cg^rr>})} FT4={HAM({[l8@82,0EP=127[13r]BR=9p.T(64,64,!16,64,127,!16)'`c'^^^[7r]p=64:l16@100,0geeg#eebee`cee`de`ee]})[8r]} TR=15DL=BGN-2FTA;FT;DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;TrackKey=(K+3);FT2;FT2A;FT3;FT4;TrackKey=K;FT4[FT1]FTH;FTI; /*16*/BGH={@120,0EP.T(30,127,!1)'cde'^^^}BG1={l4BR=32p.T(32,96,!1)@30,0'aec'^^^}BG2={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64} BG4={l4BR=32rrp.T(32,96,!2)@30,0'aec'^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG6={@82,1l1BR=24SUB{p.T(0,127,!1,127,0,!1,0,127,!1,127,0,!1)}'ae'^^^SUB{FOR(INT A=1;A<30;A++){l(A)p.T(127,0,!A)r}l1}'ae'^^^}STR BG7={@82,1l4BR=24p.T(127,0,!1)'ae'^^^} TR=16DL=BGN-2BGH;DL=BGN-1BG1;DL=ME2+6BG2;DL=SB1+7BG4;DL=ME3+8BG5;DL=ME4+6BG2;DL=SB2+15BG4;DL=NK2+7BG7;DL=NK3;V.T(100,127,!1^1^1^1^1^1^1^1)BG6; //------------------------------------HOLY NIGHT INT HN_TIME=452-17INT HN_EST=160K=2FUNCTION HNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(HN_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) HNW(01,01,012,08,0,K,064,4,2,127,09,0)HNW(07,07,088,00,0,K,084,1,2,120,09,0)HNW(13,13,119,08,0,0,___,5,0,110,09,0) HNW(02,02,099,01,0,K,054,2,2,127,09,3)HNW(08,08,012,00,0,K,000,3,2,100,09,2)HNW(14,14,006,08,0,K,127,2,2,120,09,0) HNW(03,03,103,02,0,K,074,2,2,120,10,8)HNW(09,09,012,00,0,K,127,3,2,100,09,2)HNW(15,15,003,00,0,K,096,2,2,110,10,0) HNW(04,04,005,24,0,K,000,2,2,120,09,0)HNW(10,10,025,00,0,0,064,3,1,127,10,0)HNW(16,16,091,00,0,0,084,2,1,120,10,0) HNW(05,05,039,01,0,K,044,2,2,120,09,0)HNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// HNW(06,06,103,00,0,K,032,1,2,080,10,0)HNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=HN_TIME+17Tempo=HN_EST;HAZ=HN_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+12 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+12NK1=RF2+8ME5=NK1+16NK3=ME5+8INT NK4=NK3+9 /*1*/MN1={V=100[a^^a#a^^r:g^^ag^^r]`c^^af^^r;a#^aa#^`c`d^`c^`d`c^a#a^g^rag^raa#^r`c`c^^r}MN1A={V=100[a^^a#a^^r:g^^ag^^r]`c^^`d`f^^r;a#^aa#^^g^a#^aa#^^g^`c^`d`c^^`d^`e^`d`c^^^r} MN2={V=110`d^`c`c^^a#^a^ga^^a#^`c^a#a#^^a^g^f#g^^a^;a#^da#^^d^f^ef^^g^a^a#a^f#ga`d^^^^rrr} MN3={V=120`f^`e`f^^`d^`f^`e`f^^`a^`g^`e`e^^`c^`d^^r`f#`g`f#`g;`a^`f`f^^`d^`a^`f`a#^^`a^>g^g`c^^g^a^^^^rrrf^fd^^"a#^"a#^^^^^^rf^fd^^"a#^"a^^^^^^r<}MN4={V=110[MD({g^rag^raa#^r},2,!8)MidiDelay({`c`c^^r},12,!4)[16r]]} TR=1l8HAM({DL=ME1;MN1;MN1A;MN2;MN3;DL=ME3;MN1;MN1A;MN2;MN3;DL=ME5;MN4}) /*2&3&4*/RT1={"a#^`d^`c^a#^a^g^a^a#^;c^`c^a#^a^g^f#^g^a^;"g^a#^a^g^f^e^f^g^f^c^"a^c^f^^^^^^^} RTH={[["a#^`d^][4"a#]"a#^`d^:"a#^`d^`c^a#^aaaaa^a^]"a#^`d^r"a#`d^} RRF={l8DL=BGN;HAM({RT1;DL=RF1;RT1;DL=RF2;RT1;DL=NK4;RTH;})}TR=2;>P.W(10,117,!8,117,10,!8)RRF;TR=3P.W(117,10,!8,10,117,!8)RRF; /*5*/BS1={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][8"ff]<}BS2={[4f`f][4`c``c][4d`d][4a`a][8a#`a#][8`c``c]} BS3={>[4"a#a#][4c`c][4"aa][4d`d][4"gg][4c`c][4"aa]d^^^^^^^<}BS4={>[[8"a#a#][4"aa][4d`d]][12"a#a#]"a^^^^^^^<} BS5={>[[4"a#a#][4"a#]["a#a#]:[4"a#a#][4c^]]["a#^]rr"a#^<} BASS={l8<<d^dd^"a"a"af#^^^^rrr<} UL3={EP=120SUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`c`c^^a^a^^}a#^a#a#^^f^a#^a#a#^^`d^`c^aa^^e^f#^^r;`d`d`d`eSUB{`d^`d`d^^a#^`d^`d`d^^`f^`e^`e`e^^`e^`f#^^^^}a#^a#a#^^f^a#^a#a#^^`d^`c^`c`c^^`c^`d^^^^rrrSUB{[`d^`d`f^^`g^`e^^^^^^^]}a#^a#a#^^f^f^^^^^^ra#^a#a#^^f^e^^^^^^r} UL4={EP=110[MD({e^rfe^rfc^r},2,!8)MidiDelay({ee^^r},12,!4[16r]]} ULMR={l8DL=ME1+8UL1;UL2;UL3;DL=ME3+8UL1;UL2;UL3;DL=ME5;UL4}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[15r]}PD3={SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]} DD1={DM6;DM20}DD2={SUB{[12r]n49[15r]n57[15r]n53}SUB{[58r]n49rn49rrr}DM6;DM8}DD3={DM7;DM13}DD4={[DM7][6DM2]O3[15r]}DD5={[[DM2][5O1;r]rrO2;rrr:[DM2][3DM1][4O1]]O1;rrrO2;rrrrrO1;rO2;rrr} TR=10l16DL=BGN@25BR=20p%=3000SUB{PD3}DD1[DD2]DD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{O3}PD3;SUB{PD3}DD4;SUB{PD3}DD1[DD2]SUB{PD3}O3[63r]O4[55r]EP.T(70,127,!1)[8O1]DD3;DL=NK4;DD5; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]}PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127} GG1={[7GP3][16r]}GG2={[7GP3]GP2}GG3={[7GP3]PD4}GG4={[11GP1][16r]}GG5={[[4[GR]GB;r][4GR;GA;GB;GR]:[4GR;rGB;r][4GB;rrr]][4GB;rrr]} TR=11l16DL=BGN@26BR=20p%=6000GG1[GG2]GG3;GG4;GG1[GG2]GG3;GG4;GG1[GG2][GG3][16DR]DL=NK4;GG5; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} STR JJ1={[7GP8][16r]}STR JJ2={[7GP8]GP3}STR JJ3={[7GP8]EP.T(90,127,!1)[8TA]l32[16TA]l16}STR JJ4={[11GP1][16r]} TR=12l16DL=BGN@25BR=20p%=5000JJ1[JJ2]JJ3;JJ4;JJ1[JJ2]JJ3;JJ4;JJ1[JJ2][JJ3][16DR]n49 /*13*/PP={BR=24p.W(127,0,!16)}PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} STR DS18={l32`e`d#`d`c#`cba#ag#gf#fed#dc#<`e`d#`d`c#`cba#ag#gf#fed#dc#>l16}STR DS19={`e`d#`d`c#`cba#ag#gf#fed#dc#} TR=13l16PAAA; /*15*/FT1={l8[24r]EP=100@89,0HAM3({>gf#gaMidiDelay({dga`d},4,!2)<})[24r]@81,1EP.T(80,127,!1)l4'f`ca'^^^} FT2={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4f^^^g^a^g^^^EP.T(70,110,!1)@83,0'`cge'^^^} FT2A={HAM({l16EP=120M=100[10r]@63,0fa'`f`c'^^^[12r]@62,0'`cg'^^^[8r]@82,8fefgagaa#[10r]@56,0EP=110'af'r'af'rrr})@15,8M=0l4>f^^^g^a^g^^^l16EP=127@100,0cefgMidiDelay({efg`c},8,!4)<[8r]} FT3={HAM({l4EP.T(70,100,!1)@83,0'`da#'^^^l8@85,0EP=100r'ge'r'af'r'a#g'r'`ca'l4EP.T(70,100,!1)@83,0'`ca'^^^})l16EP=100@100,0HAM3({>gf#gaMidiDelay({dga`d},4,!4)<[8r]})HAM({l4EP.T(70,100,!1)@83,0'a#f'^^^l8@85,0EP=100r'd"g'r'e"a'r'f"a#'r'gd'l4EP.T(70,100,!1)@83,0'ad'^^^rrrr})} FT4={l8[24r]l16EP=100@99,1HAM3({>gf#gaMidiDelay({dga`d},8,!4)<})l8[28r][32r]@81,1EP.T(60,127,!1)l4'`cae'^^^} FT5={l8[[16r]@15,9HAM({`g`f`e`ca#gfdc^^^^^^^})]} TR=15DL=BGN;FT1;FT2;FT2A;FT3;FT4;FT1;FT2;FT2A;FT3;FT4;DL=NK1;FT2;FT2A;FT5;FT3@99,1l8EP=120HAM({d^f^g^a^}) /*16*/BGH={@82,1EP=127l1BR=36SUB{FOR(INT A=1;A<29;A++){l(29-A)p.T(127,0,!(29-A))r}l1}'ae'^^^EP=127} BG1={@123,3BR=48p.T(127,32,!1)l4'cg`c'^^^p=64}BG2={@120,0l4EP.T(100,127,!1)'cde'^^^}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64}BG5={@125,5l4BR=24p.T(0,127,!1)'cde'^^^p=64}BG6={@126,8l4BR=20p=80'cde'^^^p=64}BG7={l4<@128,3P=70p.T(64,64,!4,70,127,!2)'a"a`a'^^r>p=64} TR=16DL=BGN;V=127BGH;V=100DL=BGN+7BG1;DL=ME1+7BG2;DL=ME1+8BG3;DL=ME1+15BG4;DL=ME2+7BG5;DL=SB1;BG7;DL=SB1+7BG1;DL=SB1+11BG6;DL=RF1+7BG1;DL=ME3+7BG2;DL=ME3+8BG3;DL=ME3+15BG4;DL=ME4+7BG5;DL=SB2;BG7;DL=SB2+7BG1;DL=SB2+11BG6;DL=RF2+7BG1; DL=NK1+7BG2;DL=NK1+8BG3;DL=NK1+15BG4;DL=ME5;BG7;DL=ME5+4BG7;DL=ME5+7BG3;DL=NK3+7BG5;DL=NK3+8BG2;DL=NK4;BG7;DL=NK4+3BG5;DL=NK4+4BG3;DL=NK4+6BG2; //------------------------------------DARKNESS NIGHT MARE FUNCTION DNW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(DN_TIME+18)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT DN_TIME=588-18INT DN_EST=158K=2 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) DNW(01,01,012,00,0,K,064,4,2,127,09,0)DNW(07,07,039,01,0,K,084,1,2,120,09,0)DNW(13,13,119,00,0,0,___,5,0,127,09,0) DNW(02,02,109,00,0,K,064,2,2,100,09,0)DNW(08,08,012,00,0,K,000,3,2,100,09,2)DNW(14,14,082,01,0,K,___,2,2,127,09,0) DNW(03,03,103,00,0,K,000,2,2,090,10,0)DNW(09,09,012,00,0,K,127,3,2,100,09,2)DNW(15,15,003,00,0,K,096,2,2,110,10,0) DNW(04,04,097,00,0,K,127,2,2,100,10,0)DNW(10,10,025,00,0,0,064,3,1,127,10,0)DNW(16,16,091,00,0,0,084,2,1,127,10,0) DNW(05,05,039,00,0,K,044,2,2,120,09,0)DNW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// DNW(06,06,020,16,0,K,032,1,2,080,10,0)DNW(12,12,026,00,0,0,064,3,0,127,09,0) DL=DN_TIME+18Tempo=DN_EST;HAZ=DN_TIME+1BGN=HAZ+18ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16 ME3=RF1+8ME4=ME3+8SB2=ME4+8RF2=SB2+16NK1=RF2+8ME5=NK1+8ME6=ME5+8NK2=ME6+8NK3=NK2+8 /*1*/MNH={} MN1={EP=110[a^^^agfg^^:e^^^^rg^^^gfef^^d^^^^r]e^eefga#^^a#a#agaf^^r} MN2={EP=120f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^r;f^e^SUB{d^^^^^^^^^}rrrff^a`d^^^ra#^a^;g^fg^^e^g^fg^^a#a^^^^^aga^^^^`c#^^^} MN3={EP=127[`d^`c#^`d^`e`f^r`d^`a^`d^`a^^^^`g`f:`g^^^^^^^r`c^b^`c^`d`e^r`g^`a#^`a#^`a#^^^^`a#``c`a^^^^^^^r]`g^^^r`f^`e^`f^^a^^`f^`e^^`c#^^`e^`d^a`f^^`g^`a^^^^rrr} TR=1l8>q=95HAM2({DL=ME1;MN1;MN2;MN3;DL=ME3;MN1;MN2;MN3;})V=110DL=NK2-1MNH;DL=NK3-1MNH;DL=NK3+8l1<@127,0EP.T(80,127,!1^1^1,127,70,!1^1)'cde'^^^^^ /*2&3&4*/RT={l16EP=120[`d`drr][5`d]r`d`d}RT1={l8EP=127`d^a^`da`f`e^^a^`ea`g`f^^a^`f`g`a`f`d^`c`d^`d`e`f;`f^a#^`fa#`f`e^^a^`ea`e`d^^g^`d`c#`d`e`c#^`e`a^^^^} RT3={l4[16r]EP.T(60,100,!1^1^1)'ga#'^^^'eg'^^^'`c#a'^^^EP.T(60,110,!2)'`c#a'^^^}STR RT4={l4[16r]EP.T(70,120,!1^1^1^1)'fa#'^^^'g`c'^^^'a`d'^^^'e`c#'^^^} RRF={l8DL=BGN-1HAM({RT;DL=BGN;RT1;DL=ME2;RT3;DL=SB1+8RT4;DL=RF1;RT1;DL=ME4;RT3;DL=SB2+8RT4;RT1;DL=ME6;RT3})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/STR BBS={l16q.T(10,100,!1)[16"a]l8}STR BS={l4q=100d^^^l16[ddrr][5d]rddl8q=90}STR BSA={q=100l16[ddrr][5d]rddl8q=90}BSH={q=100l4TrackKey=(K-2)e^^^"e^^^f#^^^"f#^^^g^^^"a^^^b^^^"b^^^l8q=90TrackKey=K}BSI={TrackKey=(K-2)[8"ee][8"f#f#][4"gg][4"aa][4"bb]"b^^^^^^^TrackKey=K} BS1={[4d`d][4c#`c#][4c`c][4"bb][4"a#a#][4"aa][4"gg][4"aa]}BS2={[[4d`d][4c#`c#][4e`e][4d`d]]}BS3={[6"a#a#][c`c][8d`d][4"a#a#][4"gg][4"aa]"a^^^^^^^} BS4={[8d`d][8"gg][4e`e][4c#`c#][4d`d][4"aa];[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}BS5={[d^^^^^^^c#`c#c#`c#^^^^e^^^^^^^:d`dd`d^^^^][4d`d]} BS6={[14d`d][c`c][8"a#a#][4"gg][4"aa]}BS7={l4q=100"a#^^^^^c^d^^^^^^^"a#^^^"g^^^"a^^^"a^^^q=90l8}BS8={[8d`d][8"gg][4"a#a#][4c`c][4d`d]"a^^^^^^^}STR BS9={q=100l4d^^^c#^^^c^^^"b^^^"a#^^^"a^^^"g^^^"a^^^l8} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O1;rrrO1;rO2;rrrO1;rO6;rrr}DM21={[6DM2]O3[7r]['n51n46'rrr]}DM22={[6DM2]O3[7r]O4;rO1;rO6;rrr} DM24={[6DM2]O1;rrO1;O2;r[3O1;r]O2;rO1;r}STR DM25={SUB{n49[15r]n57[15r]n55[15r]n49}[6DM2]O3[9r]O1;rO6;rrr} STR DDD={@17BR=20p%=4000EP.T(20,127,!1)[16O1]@25BR=20p%=2000}DD={O3[15r][[O1]rr][5O1]rO1;O1}STR DDA={[[O1]rr][5O1]rO1;O1}DDH={@17BR=20p%=4000MidiDelay({[4O1;rrrrrO1;rO6;rrrO1[19r]]},3,!4)@25BR=20p%=2000}DDI={@33[4[7DM1]:[O1;r]][4O1]@25} DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM6;DM22}DD4={DM7;DM24;DM7;DM25}DD5={[4O3[15r]:O1;rrrO4[5r]O1;rO6;rrr]O3[7r]['n51n46'rrr]} TR=10l16DL=BGN-1DDA;DL=BGN@25BR=20p%=2000DD1;DD2;DD3;DD4;DD1;DD5;DD3;DD4;DDH;DDI;DD2;DD3;DD4;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} STR GG={GB[15r][[GB]rr][5GB]r[GB]}STR GGA={[[GB]rr][5GB]r[GB]}GGH={[32GB;rrr]}GGI={[32GB;r[GR]]}GG1={[7GP3]GP1}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[[7GP1]:GP3][4GB;rrr]}GG5={[4[4GB;rrr]:[[GR]GB;r][GB;r[GR]]]GP3} TR=11l16DL=BGN-1@26BR=20p%=1000PL1;GGA;DL=BGN@26BR=20p%=1000GG1;GG2;GG3;GG4;GG1;GG5;GG3;GG4;GGH;GGI;GG2;GG3;GG4;GB; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[4PD3]DL=NK2[PD3]DL=NK3+8MD({n51},16,!8) /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DSH={p.T(0,127,!1)BR=24[16e]rp=64}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr} TR=13l16EP=127DL=BGN;PG1;DL=BGN+3DS6;DL=BGN+7DS7;DL=ME1+3DS6;DL=ME1+7DS2;DL=ME2+3DS13;DL=ME2+7DS6;DL=SB1+7DS1;DL=SB1+15DS6;DL=RF1+3DS6;DL=RF1+7DS7; DL=ME3+3DS6;DL=ME3+7DS2;DL=ME4+3DS13;DL=ME4+7DS6;DL=SB2+7DS1;DL=SB2+15DS6;DL=RF2+3DS6;DL=RF2+7DS7;DL=NK1+3DS6;DL=NK1+7DS7;DL=ME5+3DS6;DL=ME5+7DS2;DL=ME6+3DS13;DL=ME6+7DS6;DL=NK2+1DS12;DL=NK2+3DS14;DL=NK2+5DS10;DL=NK2+7DS15;DL=NK3+3DS13;DL=NK3+7DS6; /*14*/SPH={v=100l16@6,8HAM({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]})} SPI={v=100l16@5,24HAM({MD({MD({dfargrfgrd},2,!4)[22r]MD({efargrfgre},2,!4)[22r]MD({fa`cra#raa#rf},2,!4)[22r]MD({fgargrfgre},2,!4)[22r]},1,!1)})} SP1={l8v=110@4,0d"ae"af"aa"a;c#"ae"ag"aa"a;c"af"ag"aa"a;"b"ga"gg"gf"g;"a#"fd"fe"ff"f;"a"fc"fd"ff"f;"g"d"a"d"a#"dd"d;"a"e"b"ec#"ee"e} SP2={l8v=100@1,0[d"ae"af"aa"a;c#"ae"ag"aa"a;e"af"ag"aa"a;d"ae"af"aa"a]}SP3={l8v=110@2,0["a#"fd"f:e"ff"f]ecfc[d"ae"af"aa"a]"a#"fd"fe"ff"f;"g"e"a"e"a#"ed"e;"a"ec#"ed"ee"e['aec#'^^^]} SP4={l8v=120@3,0[[d"ae"af"aa"a][gdada#d`dd]:ecgca#c`cc;ec#gc#a#c#`c#c#[d"ae"af"aa"a]]f"a#a"a#a#"a#`d"a#;gcaca#c`cc;f"ag"aa"aa#"a'a`c#'^^^^^^^} TR=14DL=BGN;P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)SP1;SP2;SP3;SP4;SP1;SP2;SP3;SP4;DL=NK1;SP1;SP2;SP3;SPH;SPI; /*15*/FT={l16EP.T(30,127,!1)@5,24HAM2({"ac#dedefgfgaa#aa#`c`d})}FTH={@35,0EP=110TrackKey=(K-2)l16MidiDelay({[[3'bg`e'rr]r[3'bg`e'r]][[3'af#`f#'rr]r[3'af#`f#'r]][3'bg`g'rr]r[3'bg`g'r][3'aa`c'rr]r[3'aa`c'r][3'b`g`e'rr]r[3'b`g`e'r][3'f#`f#b'rr]r[3'f#`f#b'r]},3,!16)TrackKey=K} FT1={l4EP=127@3,0CO1}FT2={@5,8EP=90l8>['afd'^^^^^^^c#c#ea^^^^'gec#'^^^^^^^:ddfa^^^^]d"af"aa"a`d"a<} FT3={HAM({l8EP=100M=127rr@85,0'a#fd'^^^^^^^^^[6r]'`daf'^^^^^^^^^rrrrEP=100@56,0'ga#'[7r]'eg'[7r]'`c#a'[7r]})l16@81,0c#defgaa#`c#;ab`c#`d`e`f`g`aM=0} FT4={EP=127@4,0SUB{l16[64r][48r]HAM({SUB{f^^ffrfrfrfrf^^f}a^^aarargrgra^^a})}l4CO4} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=NK1;FT1;FT2;FT3[FTH] /*16*/BG1={@126,7l2BR=100p=127PAN(!1^1^4,1)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG2={@126,7l2BR=100p=127PAN(!1^1^4,0)EP.T(120,127,!1)a^^^rrrrp=64P=64}BG3={EP=127l4@120,0'cde'^^^} BG4={@125,5l4BR=20P=80p.T(0,127,!1)'`c`d'^^^}BG5={@126,8BR=40l4P=96EP=100p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} TR=16DL=BGN+7BG4;DL=ME2[BG5]DL=ME2+6BG1;DL=SB1+6BG2;DL=RF1+7BG4;DL=ME4[BG5]DL=ME4+6BG1;DL=SB2+6BG2;DL=RF2;BG5;DL=RF2+4BG5;DL=RF2+7BG4;DL=ME6[BG5]DL=ME6+6BG1; DL=NK2+6BG1;DL=NK3+6BG2; //------------------------------------U&I K=2INT UI_TIME=722-17INT UI_EST=160 FUNCTION UIW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} FUNCTION UI2(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(UI_TIME+24)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) UI2(01,01,083,00,0,K,064,4,2,127,09,0)UIW(07,07,088,00,0,K,104,1,2,127,09,0)UIW(13,13,119,00,0,0,___,5,0,127,09,0) UIW(02,02,082,00,0,K,074,2,2,080,09,6)UIW(08,08,083,00,0,K,000,3,2,100,09,2)UIW(14,14,082,01,0,K,020,2,2,127,09,0) UIW(03,03,064,00,0,K,000,2,2,080,10,6)UIW(09,09,083,00,0,K,127,3,2,100,09,2)UIW(15,15,003,00,0,K,096,2,2,110,10,0) UIW(04,04,063,00,0,K,127,2,2,080,10,0)UIW(10,10,025,00,0,0,064,3,1,127,10,0)UIW(16,16,091,00,0,0,084,2,1,120,10,0) UIW(05,05,039,01,0,K,024,2,2,127,09,0)UIW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// UIW(06,06,103,00,0,K,032,1,2,090,10,0)UIW(12,12,026,00,0,0,064,3,0,127,09,0) DL=UI_TIME+17Tempo=UI_EST;HAZ=UI_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8SB2=ME4+8 ME5=SB2+16RF2=ME5+8ME6=RF2+8INT ME7=ME6+8NK1=ME7+8NK2=NK1+8INT RF3=NK2+8 /*1*/MN1={V=100rrgggd^rb^a^g^f#^f#gre^^^rg^f#^e^de^^^rr`c`c`c`c^`d^`e`e^`e`d^^`cb^`c`d^^^`d`e`f#^r}MN2={V=110`g^`f#^`eb^b`d^`e`d^`d`e`f#`g^`f#^`g`a^`a`f#^`e`d^^^r;`e`e`e`d^^`e^`g`g`g`f#^^`g^`f#^^`e`f#^`g`a^^`b`a^^^r} MN3={>V=120[b^b^b^rb^aba^f#f#g:aaaaaf#^a`c#`d`c#b^^^r]aaaa`c#^^`c#b^`c#`d#^^^^*>[b^a^gf#^e^rc#^e^b^:a^g^f#a^d^r"b^d^a^;g^gg^^f#^e^c#^d^e^f#^^^^^^rd#^d#e^^f#^]`c#^b^ag^f#^rf#^`d^b^;`d^`c#`d^`e`f#^`e^`c#`e^`f#`g^`g^^^^^`a`f#^^^^^rrr<*/} MN4={>V=120[`f#`f#`f#`f#^bab`f#`f#`g`e^`d`c#`d`e`e`e`e^:`a^`e`e`d`e`f#^^^r]`c#^ab&&^^^`b^^^<} TR=1l8q=97DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2[MN3]MN4;DL=RF3+7@3d#d#rd#rd#rd#}) /*2&3&4*/RA={M.W(60,120,!1)@68,0If(CH==3){@60,0}If(CH==4){@72,0}}RB={M=60@82,0If(CH==3){@64,0}If(CH==4){@63,0}}RT1={EP=120SUB{[gggg^gg^]e^d^d^e^c#^c#deeee[aaaa^aa^]f#^f#^f#^f#^d^ddf#f#bb;[bbbb^bb^]b^a^a^g^e^^ef#ede[aaaa^aa^]f#^^^f#^ab^^^^^^} HAM({[bbbb^bb^]b^a^a^b^a^af#f#gab[`c#`c#`c#`c#^`c#`c#^]`c#^b^b^`c#^b^b`c#`d`e`f#`f#;[`f#`f#`f#`f#^bb^]`f#^`e^`e^`d^`c#^^`c#`d`c#b`c#[`e`e`e`e^`e`e^]`d#^^^`d#^`e`f#^^^^})} RT3={l4[16r]EP.T(70,127,!1^1^1)SUB{g^^^g#^^^a^^^}`c^^^`c#^^^`d^^^l16} RRF={l16DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;DL=ME4;RT3;DL=RF2;RT1;DL=ME7;RT3;DL=RF3;TrackKey=(K+3)RA;RT1;RB;TrackKey=K;}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BS1={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS2={[8"gg][8"ee]>[8"cc]<[8"dd]}BS3={[[4"ee][4"bb]][4"cc][4"c#c#][4"dd]"d^^^^^^^} BS4={[[4"ee][4"aa][4"f#f#]:[4"bb]]l16"b^^^"b^"b"b^^^^^^^^l8}BS5={l4q=100[e^^^"b^^^]l8q=90[4"cc][4"c#c#][4"dd]"d^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[6DM2]l8O3;r[O4]rrrrl16} DDH={@33[4MD({O1;rrO1;O2;r[[O1]r]O2;rO1;r},1,!1)[16r]]@25}DDI={@26[SUB{O1}MD({n49},8,!8)[15r]O1;rrO1;O2;r[[O1]r]O2;rO1;r]@25DM21} DD1={DM6;DM13}DD2={DM6;DM8}DD3={DM6;SUB{n49[15r]n57[15r]n55}DM20}DD4={DM6;DM21}DD5={DM6;DM7} TR=10l16DL=BGN;V=127BR=20p%=4000DD1;DD2;DD3;DD4;DD1;DD2;DDI;DD5;DD4[DD1]DD2;DD3;DD1;DD4;DD1; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={@26[4MidiDelay({GB},15,!8)[31r]]@25}GGI={[MD({[4GR;rGB;r]},1,!2)[16r]][3GP2]n49[7r]n57[7r]} GG1={[7GP3]GP2}GG2={[8GP3]}GG3={[7GP3][16r]}GG4={[7GP1][4GB;rrr]}GG5={[8GP1]} TR=11l16DL=BGN;PL1;V=127BR=20p%=5000GG1;GG2;GG3;GG4;GG1;GG2;GGI;GG5;GG4[GG1]GG2;GG3;GG1;GG4;GG1; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=BGN;V=127PD3;DL=SB1[PD3]DL=ME4+7PD4;DL=SB2[4PD3]DL=NK1[3PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16`daf#<'^^^^^^^p=64} FT4={HAM({[l8@82,0EP=100MD({SUB{`d^`d^`d^r`d^`d`d`c#^}b^b^b^rb^aba^},1,!8)[11r]:>EP=127@100,0bef#abf#d"b<]>EP=127@100,0"bdef#"bef#b<})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]FTH;FT1;FT2;FT3;FTH;FTI;TrackKey=(K+3)FT1;TrackKey=K; /*16*/BG1={@120,0l4'cde'^^^}BG2={@126,7l2BR=46p=127EP.T(110,127,!1)a^^^rrrrp=64}BG3={@126,8BR=40l4P=96EP=110p.T(127,0,!1^1)'gfe'^^^^^^^EP=127p=64} BG4={@123,5l4BR=24p.T(32,127,!1)'cde'^^^p=64} TR=16DL=ME2;BG3;DL=ME2+7BG4;DL=SB1+7BG1;DL=ME4;BG3;DL=ME4+7BG4;DL=SB2+15BG1;DL=ME5+7BG1;DL=ME7;BG3;DL=ME7+7BG4;DL=NK1+6BG2;DL=NK2+7BG1; //------------------------------------BE MY LOVER INT K=1INT BM_TIME=850-17INT BM_EST=159 FUNCTION BMW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(BM_TIME+17)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) BMW(01,01,012,00,0,K,064,4,2,127,09,0)BMW(07,07,035,00,0,K,084,1,2,120,09,0)BMW(13,13,119,09,0,0,___,5,0,127,09,0) BMW(02,02,004,00,0,K,064,2,2,120,09,0)BMW(08,08,012,00,0,K,000,3,2,100,09,2)BMW(14,14,082,01,0,K,___,2,2,127,09,0) BMW(03,03,003,00,0,K,000,2,2,122,10,0)BMW(09,09,012,00,0,K,127,3,2,100,09,2)BMW(15,15,003,00,0,K,096,2,2,110,10,0) BMW(04,04,002,00,0,K,127,2,2,127,10,0)BMW(10,10,025,00,0,0,064,3,1,127,10,0)BMW(16,16,091,00,0,0,084,2,1,120,10,0) BMW(05,05,039,01,0,K,044,2,2,120,09,0)BMW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// BMW(06,06,030,00,0,K,032,1,2,070,10,0)BMW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=BM_TIME+17Tempo=BM_EST;HAZ=BM_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+8ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16NK1=RF2+8NK2=NK1+8ME5=NK2+8ME6=ME5+8 /*1*/MN1={EP=110[e^ee^ef#ed"b^"b^ddef#^f#f#^f#f#:gf#e^e^^^r]ge^^r}MN2={EP=120e^d^[e^gg^^gg^^f#^d^"b^e^gg^^:ga^^b^b^^r]a^b^^^} MN3={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^^rr}MN4={EP=127e^f#^[g^e^bgrf#^^d^:bf#rg^^e^ggab`d^^b^ag^]barb^^^gggab^^^^MN3} TR=1l8q=96DL=ME1;HAM({MN1;MN2;MN3;DL=ME3;MN1;MN2;MN4;}) /*2&3&4*/RT={If(CH==3){l128rl8}If(CH==4){l64rl8}}RT1={q=110RT[egbebegbdf#bdbdf#bcegcgcegdf#ad:adf#a]'ad'^^^} RT2={If(CH==2){l8q=160EP=90@30,0HAM2({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})}Else{l8>@82,0BR=10If(CH==3){p%=100}Else{p%=-100}EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<}} RRF={l8DL=BGN;RT1;DL=RF1;RT1;DL=RF2;RT1;DL=ME6;TrackKey=(K-1)RT2;TrackKey=K}TR=2;>RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4BR=24q=100e&&^^^`e&&^^^e^^^^^^^c&&^^^`c&&^^^"a^^^"b^^^l8q=90}BSI={[16e`e][8c`c][4"aa]b^^^^^^&&"b} BS1={[[4e`e][4d`d][4c`c]:[4d`d]][d`d]BR=12`d^^&&d}BS2={[[4e`e][4"bb][4d`d][3c`c]:d`d]c`c} BS3={[[4"aa][4"bb]:[6c`c]["bb]][4c`c]"b^^^^^^^}BS4={[[4e`e][4d`d][4c`c][4g`g]]}BS5={l4q=100"a^^^"b^^^c^^^^^"b^q=90l8[4"aa][4"bb][4c`c]"b^^^^^^^} BASS={l8<ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n38n40n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[6DM2]O3[9r][O4;r]rr}DM21={[7DM2][O1;r]O2;rO1;r}DM22={[7DM2]O3[7r]}DDH={[3[7DM1][O1;r]][4DM1]O3;rrrEP.T(60,127,!2^4)[6O1;r]}DD1={DM6;DM20}DD2={DM6;DM21}DD3={DM7;DM13}DD4={DM6;DM22}DD5={@26l8[O1;rrO1;O2;rO1;rrrrO1;O2;rO1;r]l16@33DM13} TR=10l16DL=BGN;BR=20p%=1000@33DD1;DD2;DD3;DD4;DD1;DD2;DD5[DD4]DD1;DDH;DD1;DD2;DD3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GGI={[7GP2]GB[15r]}GG1={[8GP2]}GG2={[7GP2][GR;rGB;r][GB;rrr]}GG3={[7GP2]GB[15r]}GG4={[7GP2][GR;rGB;r]GB[7r]} GG5={l8[8GB;rrr]l16[3GP2]GB[15r]} TR=11l16DL=BGN@26BR=20p%=-1000PL1;GG1;GG2;GG3;GG4;GG1;GG2;GG5[GG4]GG1;GGH;GGI;GG2;GG3; /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17}PD13={[56r]rr['n28n39'r]rr} TR=12l16DL=BGN;BR=20p%=2000SUB{PD3;PD13}GG1;GG2;GG3;SUB{[PD3]PD13}GG4;GG1;GG2;GG5;SUB{[3PD3]}[GG4]GG1;SUB{PD3}GGH;GGI;SUB{PD13}GG2;GG3; /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16f#gf#^d^l8bagagf#gf#ed^"b^d})} FT1={HAM({l8@103,0EP=90SUB{[e^^^^^^^d^^^^^^^c^^^^^^^d^^^^^^^]}[b^^^^^^^b^^^^^^^g^^^^^^^a^^^:`d^`c^]@104,0EP.T(60,110,!1)'af#`d'^^^})} FT2={EP=100@1,0l8HAM({['`eb'ab'`eb'^^'`eb'^'`da'ab'`da'^^'`da'^'`f#b'b`d'`f#b'^^'`f#b'^:'`e`c'^^'`e`c'^^'`f#`d'^]'`e`c'^^^SUB{g^a^}`e^`d^})} FT3={EP=100@100,0HAM({l8b^^^^^^^a^^^b^^^g^^^^^^^^ege`d`cb`cb^^^^^^^a^^^b^^^g^^^^^^^ @104,0EP.T(70,127,!1)'f#b"b'^^^^^^r})}FT4={HAM({[[@85,0EP=110l8rrMD({'bg'^},3,!4)rrrr:rrMD({'ad'^},3,!4)rrrr]:>EP=90@100,0`dgb`d^gb`d<]@100,0l16[8r]EP.T(70,127,!2)'bge'^^^^^^^})} TR=15DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3[FT4]DL=NK1[FTH]FT2;FT3; /*16*/BG1={l4@120,0'cde'^^^}BG2={l4@126,8BR=20p%=8000'cde'^^^rrrrp=64}BG3={@126,8BR=20p%=8000l4EP.T(127,0,!1^2)'cde'^^^^^rrrrp=64} TR=16DL=ME1+7BG1;DL=ME2+7BG2;DL=ME3+7BG1;DL=ME4+7BG2;DL=NK1+7BG1;DL=NK2+7BG2;DL=ME5+7BG1;DL=ME6+7BG2; //------------------------------------KAMIKAZE SUICIDE SQUAD K=0INT KZ_TIME=962-9INT KZ_EST=160 FUNCTION KZW(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(KZ_TIME+9)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) KZW(01,01,012,00,0,K,064,4,2,127,09,0)KZW(07,07,039,00,0,K,084,1,2,120,09,0)KZW(13,13,119,09,0,0,___,5,0,127,09,0) KZW(02,02,082,01,0,K,064,2,2,110,09,9)KZW(08,08,012,00,0,K,000,3,2,110,09,2)KZW(14,14,082,01,0,K,___,2,2,100,10,0) KZW(03,03,063,00,0,K,000,2,2,100,10,0)KZW(09,09,012,00,0,K,127,3,2,110,09,2)KZW(15,15,003,00,0,K,096,2,2,110,10,0) KZW(04,04,082,00,0,K,127,2,2,100,10,0)KZW(10,10,025,00,0,0,064,3,1,127,10,0)KZW(16,16,091,00,0,0,084,2,1,120,10,0) KZW(05,05,039,01,0,K,044,2,2,120,09,0)KZW(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// KZW(06,06,049,00,0,K,032,1,2,080,10,0)KZW(12,12,026,00,0,0,064,3,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP; DL=KZ_TIME+9Tempo=KZ_EST;HAZ=KZ_TIME+1BGN=HAZ+24ME1=BGN+8ME2=ME1+8SB1=ME2+8RF1=SB1+16ME3=RF1+8ME4=ME3+8 SB2=ME4+8RF2=SB2+16ME5=RF2+8ME6=ME5+8NK1=ME6+8NK2=NK1+8RF3=NK2+8ME7=RF3+8INT SB3=ME7+8INT RF4=SB3+16INT END=RF4+16 /*1*/MNH={V=110[`c#^f#^a^b`c#^`c#f#f#:ab^r]MidiDelay({ab},8,!4)}MN1={V=100[a^ag#rf#ref#^c#^^rf#f#g#a^g#g#abr:`c#^`c#aabg#r]`c#^`c#`c#b`c#^^r}MN2={V=110[b^a^g#f#^b^baag#f#^r:a^g#^f#e^c#^^^rf#g#aa]g#^g#g#^aaf#g#^^^^rrr} MN3={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#e^rf#^f#^a^b`c#^`d`c#`d`c#^^r}MN4={[`c#^f#^a^b`c#^`c#f#f#ab^r]f#^f#^a^bg#^g#g#g#f#erf#^^^^^^^r`c#^f#^ag#^r}MN5={[a^ag#rMD({f#re},6,!2)[24r]]} TR=1l8>DL=HAZ+8HAM2({MNH;DL=ME1-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME3-1[7r]MN1;MN2;V=120MN3;MN4;DL=ME5-1[7r]MN5;DL=NK2;MNH;DL=ME7;MN2;DL=SB3;MN3;MN4;}) /*2*/STR RGH={l8q=160EP=90@30,0HAM({[f#c#g#c#ac#`c#f#^c#g#c#ac#`c#c#][f#"bg#"ba"b`c#:f#^"bg#"ba"b`c#"b]f^^g#`c#^^^^})} STR RGI={l16q=160EP=127M=127HAM({[10r]@30,0"ac#ef#g#a`c#^^b^rb^^`c#`c#^`c#^^^^^^[7r]@31,0ag#f#edc#;g#^c#^a^c#^b^c#`c#^^^^^^[8r]<@31,0f#&&^`f#^f#^[10r]@30,0f#&&^`f#^f#^>})} STR RG1={@31,0l16q=160EP=127HAM({[[[10r]c#ef#c#f#g#]:[[10r]ef#g#eg#b]]})}STR RG2={@31,0l16q=160EP=110HAM({[58r]BR=48"c#^&&``c#^^[65r]})} STR RG3={@30,0l4q=110EP.T(60,127,!1^1^1^1^1^1^1^1)SUB{a^^f#af#g#a`c#^^^b^`c#^`d^^`e`f#^`a^`g#^^^`f^^^}d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^p.T(127,0,!1)c#^^^q=160p=64} STR RG4={@31,0l4q=110EP.T(60,90,!1^1^1^1^1^1^1^1)q=110SUB{a^^^g#^a^f#^^^e^f#^d^^^e^^^f#^^^f^g#^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^c#^^^ EP.T(90,127,!1^1^1^1^1^1^1^1)SUB{a^^^g#^a^`c#^^^b^`c#^`e^^^`f#^^^`a^^^`g#^^^}f#^^^^^e^d^^^^^c#^"b^^^c#^^^d^^^p.T(127,0,!1)c#^^^q=160p=64} TR=2DL=HAZ+8RGH;DL=BGN-8l16q=160RGI;DL=BGN;RG1;RG2;RG3;RG4;RG1;RG2;RG3;RG4;DL=RF2;RGI;DL=ME5;RG2;RG3[RGH]RG1;RG3;RG4[RG1]l4q=100EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^}) /*3&4*/RTH={l8>EP=80SUB{[4c#c#rc#rc#rc#]"b"br"br"br"bc#c#rc#rc#rc#ddrdrdrdc#c#rc#^^^^}f#f#rf#rf#rf#g#g#rg#rg#rg#aarararabbrbrbrb;aarararabbrbrbrb`c#`c#r`c#r`c#r`c#g#g#rf^^^^<} RTI={EP=127l16>SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^[16r]SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^[16r] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RT1={l16>EP=127[SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^][SUB{e^^e^re^^^^^^^^^}a^^a^rg#^^^^^^^^^] [SUB{e^^e^rc#^^^^^^^^^}g#^^g#^rf#^^^^^^^^^]SUB{c#^^c#^rc#^^^^^^^^^c#^^c#^rc#^^^^^^^^^}f#^^f#^rf^^^^^^^^^a^^a^rg#^^^^^^^^^<} RRF={l16DL=HAZ+8RTH;DL=BGN-8RTI;RT1;DL=RF1;RT1;DL=RF2;RTI;DL=NK1[RTH]RT1;DL=RF4[RT1]l4EP.T(90,127,!1)SUB{`c#^^^}HAM({f#^^^})}TR=3RRF;TR=4RRF; /*5*/BSH={l8q=100BR=12p.T(0,64,!16)f#^^^^^^^^^^^^e^^d^^^^^^^^^^^^c#^^"b^^^^"b^^c#^^^^c#^^d^^^^^^^c#^^^^^^^q=90}BSI={l4q=100f#^^^^^^^e^^^^^^^d^^^"b^^^q=90l16[c#^rc#^rc#^^^^^^^^^]l8} BS1={[4f#`f#][4d`d][4e`e][4c#`c#][4d`d][4"bb]l16[c#^rc#^rc#^^^^^^^^^]l8}BS2={[[4f#`f#][4e`e][4d`d]["bb][c#`c#]]}BS3={[6d`d][e`e][8f#`f#][8"bb][4c#`c#]`c#^^^^^^&&c#} BS4={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d][4c#`c#]}STR BS4A={[6f#`f#][e`e][6d`d][c#`c#][4"bb][4c#`c#][4d`d]`c#^^^^^^&&c#} BS5={q=100l4d^^^^^e^f#^^^^^^^"b^^^^^^^c#^^^l8`c#^^^^^^&&c#q=90}BS6={l4q=100f#^^^d^^^e^^^c#^^^d^^^"b^^^l16q=90[c#^rc#^rc#^^^^^^^^^]l8} BASS={l8<MNH<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)}UL1={EP=100[23r]SUB{d^dddc#c#}f#^f#f#f#g#g#rr[23r]SUB{d^dddc#^^}f#^f#f#f#g#^^r} UL2={EP=110f#^f#^dd^f#^f#f#f#ee^r;f#^c#^"bc#^"a^^^rdc#de;f#^f#^dd^f#^f#f#f#'ea''da'^rEP=100SUB{`c#^`c#`c#^`d`db`c#^^^^}f^ff^fffc#^^^^rrr} UL3={EP=100SUB{>MN3;MN4<}SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaabb^}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;"b^"b^"b^"bc#^c#c#c#c#c#^rd^d^d^dEP=110SUB{f^fffg#^^}c#^c#c#c#c#^^r; EP=100SUB{a^a^a^aa^aaabb^r`c#^`c#^`c#^`c#`c#^`c#`c#`c#`e`e^r}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddc#c#^r;SUB{d^d^d^de^eeeeera^^^^^^^rf^f^g#g#^}"b^"b^"b^"bc#^c#c#c#c#c#rd^^^^^^^rEP=110c#^c#^c#c#^r} UL4={EP=100SUB{a^a^a^aa^aaaaa^ra^a^a^aa^aaa}f#^f#^f#^f#f#^f#f#f#ee^rd^d^d^dd^dddMidiDelay({SUB{bb}c#c#},8,!4)} ULMR={l8DL=HAZ+8ULH;DL=ME1;UL1;UL2;UL3;DL=ME3;UL1;UL2;UL3;DL=ME5;UL1;UL2;DL=NK2;UL4;DL=ME7;UL2;UL3}TR=8ULMR;TR=9;>ULMR; /*10*/OA={n27n32n33n35n36}O1={'OA'}O2={'n28n39n55OA'}O3={'n49OA'}O4={'n57OA'}O5={'n51n59OA'}O6={'n38n40OA'}DM1={O1;rrr}DH1={[7DM1][2O1;r]} DM2={O1;rrrO2;rrr}DM3={DM2;O1;rrrO2;rrO2}DM4={[7DN2]O1;rrrO2;rO1;r}DM5={[7DM2]O1;O2;r[2O1]r[2O1]}DM6={[7DM2]O1;rrr[2O2;r]}DM7={[7DM2]O1;rrrO2;r[2O2]}DM8={[6DM2]O1;rrrO1;rO2;rrrO1;rO2;r[2O2]} DM9={[6DM2]O3[7r]['n28n39'r][4'n28n39']}DM10={[7DM2][3O1]r[4O1]}DM11={[6DM2][O2;r[O1]][O2;r][O2]rr}DM12={O1;rrrO4;rO1;rrrO4;rO1;O4;rO4}DM13={[6DM2]O3[7r][n54rrr]}DM14={[7DM1][O1;r][4O1;rrr]O3[7r]['n28n39'r]rrrr} DM15={[[O1;r]O4;r[O1]:rO4[O1;r:O4;r]][O1]O4;r[4'n27n28']}DM16={[6DM2]rrr['n39n28'r:rr]O1;r[4O1]}DM17={[6DM2]p.W(0,127,!16)[3DM1]p%=2000O1;r[O1]}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]}DM19={[O1;r]O4;rO1;rrrO1;rO4;r[O4]} DM20={[7DM2]BR=20p%=3000[O1;r]O6;rrrBR=20p%=1500}DM21={[6DM2]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500}DM22={[6DM2][O3;rrr][O4;r]rrrr} DDH={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r][3O3;rr][7r][3O4;rr][7r]}DD1={DM6[4DM2][3O3;rr][7r][3O4;rr][7r]}DD2={DM6;DM20}DD3={DM7;DM21}DD4={DM6;DM20}STR DD4A={DM7;DM22} DD5={O3[29r]O1;rO4[29r]O1;rO3[15r]O4[15r]O3[7r]O4[7r]O3[9r]BR=20p%=3000O1;rO6;rrrBR=20p%=1500} TR=10l16DL=BGN-8BR=20p%=1500DDH;DL=BGN@25BR=20p%=1500DD1;DD2;DD3;DD4;DD4A;DD1;DD2;DD5;DD4;DD4A;DDH;DD2;DD3;O3;DL=NK2;O3;DL=RF3;DD1;DD3;DD5;DD4A;DD1;DDH;O3; /*11*/GR={'n42n85'}GA={n44}GB={'n51n46'}TA={n54}MT={n51}DR={'n38n40n82n85'}PL1={If(MODE1==GS){P.onCycle(!8,32,90)}Else{P.onCycle(!8,20,90)}}PL2={P.onCycle(!16,0,32,96,127)If(MODE1==TWM){P.onCycle(!16,0,32,70,80)}} GP1={[2GR;GA;GB;r][2GR;GA;GB;GR]}GP2={[3GR;rGB;r]GR;r[2GB]}GP3={[3[GR]GB;r][2GR][2GB]}GP4={[GR]GB;GR}GP5={[3GP4][GR][GB]}GP6={[GR][TA]}GP7={[GP6][GR]TA;GR;GP6}GP8={[3[GR]GB;GR][2GR][2GB]} GGH={[7GP2][4GB;rrr]}GG1={[6GP3][[3GB;r:r][[GR]GB;r]]}GG2={[7GP3]GP8}GG3={[7GP3][4GB;r[GR]]}GG4={[7GP1]GP3} TR=11l16DL=HAZ+8BR=20p%=-1500PL1;GGH;DL=BGN-8GG1;DL=BGN;BR=20p%=-1500GG1;GG2;GG3[GG4]GG1;GG2;GG3[GG4]GG1;GG2;GG3[GGH]GG1;GG3;GGH;GG4[GG1] /*12*/PDH={@25[O3[5r]O5;O4[8r]O5[5r]O3;O5[8r]]}PD1={@26P.onCycle(!16,0,127)n27r[4DR]rr[3DR]l32[DR]l16[4DR]P=64}PD2={@26EP.T(20,127,!1^1^1)[48DR]}PD3={@33SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}[48r][3n51rrr][2n51r]}PD3A={@25SUB{n49}[48r][3n51rrr]SUB{rrn57}[2n51r]SUB{n49}} PD4={@26EP.T(40,100,!1)[8DR]l32[16DR]l16EP=127}PD5={@26[3DR;r][5DR]r[4DR]}PD6={@26[4DR;r][3DR]r[4DR]}PD7={@26BR=20p.T(127,32,!1)[8DR]l32[8DR]l16[4DR]p%=0} PD8={@9BR=30p.T(32,100,!1)[16DR]p=64}PD9={@33BR=30p.T(110,32,!1)[8DR]l32[16DR]l16p=64}PD10={@26[3O2;r:[O1]]O2;rl32[8O1]l16@33}PD11={BR=20p.T(127,32,!1)[16n51]p=64}PD12={@26[4O2][4O1][O2][6O1]@17} TR=12l16DL=HAZ+8[PD3]DL=HAZ+8O3;DL=BGN;PD3;DL=SB1[3PD3]DL=SB2[3PD3]DL=NK1[3PD3]DL=SB3[4PD3] /*13*/PG1={P.onCycle(!8,0,22,106,127,106,22)}DS1={br`br`gr`e`c`cargrdr}DS2={[8r][4`c]grgg}DS3={[8r]d`dd`drd`dd}DS4={gr`drbrggrg`dggg`dg}DS5={`d`dr`dararfrfrcrcc}DS6={[10r]`ar`ergr}DS7={[12r]`eaer}DS8={p.T(127,0,!1)BR=20[16e]rp=64}DS9={[`d#][a#][g][d#][8r]}DS10={[8`g]`c`cgrcr"gr} DS11={[rrrr`dafd]}DS12={[4`g][4`d]ggrgrgrg}DS13={[8r][`dr]`dad"a}DS14={[3`g]rgggr`gr`ggrg`g`g}DS15={`g`gr`d`drggrddr["gr]}DS16={[8r]`gr`crgrcr}DS17={eeeeddddgrrrerrr}DSH={[`d`dr`darafrrl32[3`d][3a][6f]l16ffrffrfarrl32[3d][3a][6`d]l16]} TR=13l16l16@82,8q=100EP=120[3ag#c#ag#c#ac#]g#f#c#g#f#c#g#c#[3ag#dag#dad]bf#dbf#dbd[f#e"bf#e"bf#"b][g#f#c#g#f#c#g#c#][ag#dag#dad]g#f#c#g#f#c#g#c#;`c#g#c#`c#g#c#`c#c#<} TR=14DL=HAZ+8l16P.onCycle(!8,0,24,32,96,92,127,92,96,32,24)EP.onCycle(!8,80,110,80,127)V=70SP4;V=100DL=BGN-8SPH;DL=BGN;SP1;SP2;SP3[SP4]SP1;SP2;SP3[SP4]SPH;SP2;SP3;V=60SP4;V=70SP4;V=100SP1;SP3[SP4][SP1] /*15*/FTH={l8<@23,0q=90HAM2({[8f#^^^^^&&`c#r]})>q=100}FT1={l16@115,0EP=100HAM({SUB{MidiDelay({[c#c#c#c#rc#c#rc#c#rc#c#rc#r]["b"b"b"br"b"br"b"br"b"br"br]ddddrddrddrddrdreeeereereereerer},3,!16)[c#c#c#c#rc#c#^^^^^^^^r]}MidiDelay({[f#f#f#f#rf#f#rf#f#rf#f#rf#r][g#g#g#g#rg#g#rg#g#rg#g#rg#r]aaaaraaraaraararbbbbrbbrbbrbbrbr},3,!16)aaaaraa^^^^^^^^rg#g#g#g#rg#g#^^^^^^^^r})} FT2={@85,0HAM2({q=90EP=100[l8rrMD({'f#c#'^},1,!2)rrrrrrMD({'ec#'^},1,!2)rrrrrrMD({'f#d'^},1,!2)rrrr:[8r]]l16q=100EP=127@82,1f#c#ef#g#c#f#g#ac#g#a`c#c#b`c#})} FT3={@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#ee^}b^a^g#f#^b^baag#f#^r},1,!8)[9r]@81,0l16P.onCycle(!2,32,96)HAM({[f#a`c#^f#^:rr]})P=96@82,0l8EP=110MD({SUB{f#^f#^dd^f#^f#f#f#'ea''da'^}b^a^g#f#^b^baag#f#^r},1,!8)[16r]} FT4={@82,0l16EP=110SUB{[4aaaaraar:aaraarar]f#f#rf#f#rf#r;ddddrddrddrddrdreeeereereereererf#f#f#f#rf#f#rf#f#rf#f#rf#rffffrffrg#g#g#g#rg#g#r}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr[c#c#c#c#rc#c#r] SUB{[4aaaaraar:aaraarar]bbrbbrbr;aaaaraaraaraararbbbbrbbrbbrbbrbr`c#`c#`c#`c#r`c#`c#r`c#`c#r`c#`c#r`c#rg#g#g#g#rg#g#rfrf^^^^^}[f#f#f#f#rf#f#r:f#f#rf#f#rf#r]eereerer[ddddrddr:ddrddrdr]c#c#rc#c#rc#r;"b"b"b"br"b"br"b"br"b"br"brc#c#c#c#rc#c#rc#c#rc#c#rc#rddddrddrddrddrdr;c#c#c#c#rc#c#rc#rc#^^^^^} TR=15l16>DL=BGN;FT1;FT2;FT3;FT4;FT1;FT2;FT3;FT4;DL=ME5;FT2;FT3;FTH;DL=RF3;FT1;FT3;FT4;FT1; /*16*/BG1={@123,3l4BR=70[rp.T(127,30,!2^4)'cde'^^]p=64}BG2={p=64@120,0l4'cde'^^^}BG3={@123,5BR=40p.T(0,127,!1)'cd'^^^}BG4={>>@123,5l32P=70BR=36p.T(64,32,!1)[32`e]<p=64} BG6={l1@126,8'>>>cde<<<'^}BG7={p=64@128,3l8HAM({c^[4d]})@128,1c^^rc^rrd^^^^@123,2HAM({[g^^^]})@127,3HAM2({grrddrrr})@128,1e^^^^^^^^@128,3g^^'cde'}STR BG8={l1p=64@126,8'>>>cde<<<'}STR BG9={@128,3V=127l4'>cde[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^^^r<}MN4={>[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^`d`cgHAM2({RRF})TR=3RRF;TR=4RRF; //------------------------------------------------------------------------------TR=005&007;--------------------------------------------------------------------------// BSH={[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d[3"a#ra#r]"a#ra#a#[3"grgr]"grgg[3"arar]"araa[3dr`dr]`dr`d`d} BS1={[[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d]}BS2={BS1}BS3={[[[3"a#ra#r]"a#ra#a#]:[[3dr`dr]dr`d`d]][3dr`dr]dr`d`d["arar]"a^^^"a^^^} BS4={[4["a#ra#r]cr`crcr`c`c:["arar]dr`drdr`d`d][3dr`dr]dr`d`d}BS5={q=100l4["a#^^^^^^^:d^^^^^^^]d^^^"a^^^l16q=180} TR=5l16ULMR; //------------------------------------------------------------------------------TR=014;------------------------------------------------------------------------------// STR PAH={EP=127@12SUB{[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^`e`f`d<}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]} STR PAI={EP=127[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]}STR PAG={EP=127@12SUB{HAM({[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^^^^^^^^^^^<})}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r:'agd"a'^^]} STR PA1={EP=100@12[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'`dafd'^^^r'`dafd'^^]}STR PA2={PA1} STR PA3={EP=100[['afd"a#'^^^r'afd"a#'^^]:['`dafd'^^^r'`dafd'^^]]'`dafd'^^^r'`dafd'^^'gec"a'^^^rrrr} STR PA4={EP=110[4'afd"a#'^'afd"a#''ceg`c'^^'ceg`c'^:'`ceg"a'^^'`dafd'^^'`dafd'^]'`dafd'^^'`dafd'^^'`dafd'^} TR=14l8DL=HAZ[PAH]PAI;DL=BGN;PA1;PA2;PA3;PA4;PA1;DL=NK4;PAI;PAG; //------------------------------------------------------------------------------TR=015;------------------------------------------------------------------------------// STR HSH={}STR HSI={} STR HS1={EP=110@13["a#df"a#f"a#df"a#df"a#f"a#df"aeg"ag"acedfadagfd]}STR HS2={HS1} STR HS3={`dafd<'`d][`d'>`dafd<']][`d`d'>`dafd<'`d]aa'>agd"a<'arrrr>} STR HS4={`dafd<'^'>`dafd<'][`d`d'>`dafd<'`d]>} TR=15l8>DL=HAZ+8[HSH]DL=BGN;HS1;HS2;HS3;HS4;HS1;DL=NK4;HSH;HSI; //------------------------------------LYRIC Function LY(GRFD){[(GRFD)l4Lyric={"。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:"}rLyric={":。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*"}rLyric={"*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。."}rLyric={".*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。"}rLyric={"。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:"}rLyric={":。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+"}rLyric={"+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:"}rLyric={":゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。."}rLyric={".:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。"}rLyric={"。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*"}rLyric={"*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+"}rLyric={"+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。."}rLyric={".+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。"}rLyric={"。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:"}rLyric={":。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*"}rLyric={"*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。."}rLyric={".*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。"}rLyric={"。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:"}rLyric={":。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+"}rLyric={"+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:"}rLyric={":゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。."}rLyric={".:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。"}rLyric={"。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*"}rLyric={"*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+"}r]}TR=17CH=16DL=0Lyric={"MS-GS EUROBEAT 120th ANNIVERSARY NON-STOP MEGAMIX VOL.08"}DL=18Lyric={"1.MYSTERIOUS FOREST - 2006/7/17"}DL=121LY=2DL=137Lyric={"2.ONE DAY - 2006/10/09"}DL=242LY=2DL=258Lyric={"3.I’M IN DANGER BUBBLE -EXTENDED NRG MIX- - 2006/09/25 "}DL=324LY=1DL=332Lyric={"4.I’M IN DANGER BUBBLE -EXTENDED EURO MIX- - 2006/09/25 "}DL=444LY=1DL=452Lyric={"5.HOLY NIGHT - 2006/08/14"}DL=581LY=1DL=589Lyric={"6.DARKNESS NIGHTMARE SONG - 2006/09/11"}DL=714LY=1DL=722Lyric={"7.U & I - 2006/11/06"}DL=842LY=1DL=850Lyric={"8.BE MY LOVER - 2006/10/23"}DL=954LY=3DL=978Lyric={"9.KAMIKAZE SUICIDE SQUID - 2006/08/28"}DL=1151Lyric={"BONUS TRACK - 『 MY SWEET MEMORIES - オルゴールバージョン - 』"}
p=64} BG3={@80,0l4EP=110rrl16rrBR=50p.W(127,64,!16)ccp.T(127,0,!8)c^rrp=64EP=127}BG4={EP=110l4rrrBR=50p.T(127,0,!4)@80,0c} TR=16DL=HAZ+7BG3;DL=HAZ+15BG1;BG2;DL=BGN+7BG4;DL=ME2+6BG1;BG2;DL=RF1+7BG4;DL=ME3+15BG4;DL=ME4+6BG1;BG2; //------------------------------------I'M IN DANGER BUBBLE - EXTENDED EURO MIX- FUNCTION D2W(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(D2_TIME+15)CH=X2;@(X3,XA,XB)o5v=100EP=127V=100l4M=0p%=0TrackKey=0TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)} INT D2_TIME=330-15INT D2_EST=160K=1 //-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M) D2W(01,01,011,00,0,K,064,4,2,127,09,0)D2W(07,07,035,00,0,K,084,1,2,110,09,0)D2W(13,13,119,00,0,0,___,5,0,127,09,0) D2W(02,02,100,00,0,K,064,2,2,100,09,0)D2W(08,08,012,00,0,K,000,3,2,110,09,2)D2W(14,14,082,01,0,K,___,2,2,127,09,0) D2W(03,03,089,00,0,K,000,2,2,100,10,0)D2W(09,09,012,00,0,K,127,3,2,110,09,2)D2W(15,15,003,00,0,K,096,2,2,110,10,0) D2W(04,04,104,00,0,K,127,2,2,100,10,0)D2W(10,10,025,00,0,0,064,3,1,127,10,0)D2W(16,16,091,00,0,0,084,2,1,127,10,0) D2W(05,05,039,01,0,K,044,2,2,110,09,0)D2W(11,11,025,00,0,0,064,3,0,127,09,0)//--Light source ver1.7--// D2W(06,06,049,00,0,K,032,1,2,080,10,0)D2W(12,12,026,00,0,0,064,3,0,127,09,0) DL=D2_TIME+15Tempo=D2_EST;HAZ=D2_TIME+1BGN=HAZ+16ME1=BGN+8ME2=ME1+16SB1=ME2+8RF1=SB1+8 ME3=RF1+8ME4=ME3+16SB2=ME4+8RF2=SB2+16NK1=RF2+8INT NK2=NK1+8INT NK3=NK2+8 /*1*/MN1={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "g^^^ "b^^^ "a^"b^c#^^r}MN1A={EP=120e^^d^^c^d^^c^^"b^ "g^^"b ^"acd "b^^^ d^^r;e^^d^^c^d^^c^^"b^ "a^^^ "b^^r c^d^e^f^} MN2={EP=120a^a^g^ga ^edc^"bcde^^^d^c^"b^c^d^er;a^a^g^ga ^edc^"bc"b"b^^c^^d^ e^^^e^^r}MN3={EP=127"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^"b^"bcde f^^^e^^r} MN3A={EP=127"a^"a^c"b"ae ^dc"ar"a"bc "b^"b^"bc"b"a "b^c^d^er;"a^"a^c"b"ae ^dc"ar"a"bc"b^^"b^"bc"b "b^^^ ^^^r} MN4={EP=127["a^"a^c"b"ae ^dMidiDelay({c"a},10,!4)[20r]]} TR=1l8>q=97V.W(90,127,!4)DL=ME1;HAM({MN1;MN1A;MN2;MN3;DL=ME3;TrackKey=(K+3);MN1;MN1A;MN2;MN3;TrackKey=K;MN3A}) /*2&3&4*/STR RTS={If(CH==3){l64r}If(CH==4){l128r}l8}RTA={@100,0If(CH==3){@89,0}If(CH==4){@104,0}}STR RTB={@67,0If(CH==3){@66,0}If(CH==4){@68,0}} RTH={EP=100M=100RTS;RTB;a&b`cbrarEP.T(100,60,!1,60,110,!1^2)e^^^^^^^^^^^^^^^^^^^^^^^^EP=100a&b`cbrarEP.T(100,60,!1,60,110,!1^2)`d^^^^^^^^^^^^^^^^^^^^^^^^M=0} RTI={EP=100M=100RTB;a&b`cbrarEP.T(100,70,!4,70,110,!2^4)e^^^^^^^^EP=100`f&`g`f`cr`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^ EP=100a&b`cbrarEP.T(100,70,!4,70,110,!2^4)`d^^^^^^^^EP=100`d&`e`e`er`drEP.T(100,70,!4,70,110,!2^4)`e^^^^^^^^M=0} RT1={l8RTA;EP=127"a[aba`eaba^aba`eaba^fab`cb`c`d:`g^`f`cr`dr`e^]`e^`d^`c^b^}STR RT3={l8[48r]l4EP.T(70,100,!1)SUB{f^^^e^^^}a^^^b^^^} RRF={l8HAM({DL=BGN;RT1;DL=ME2;RT3;DL=RF1;RT1;TrackKey=(K+3);DL=ME4;RT3;TrackKey=K;DL=RF2;RT1;DL=NK2;RTH;RTI})}TR=2RRF;TR=3RRF;TR=4RRF; /*5*/BSH={l4q=100a&&^^^`a&&^^^^^^^a^^^f&&^^^`f&&^^^^^^^f^g^q=90l8}BSI={[16a`a][8f`f][4d`d][4e`e]} BS1={[[4a`a][4f`f][4d`d]:[4e`e]]e^d^c^"b^}BS2={l4q=100`f^^^f^^^`e^^^e^^^`f^^^d^^^`e^^^a^^^q=90l8} BS2A={[8f`f][8e`e][4d`d][4e`e][4f`f][4g`g]}BS3={[[4a`a][4g`g][4f`f]:[4g`g]][e^^^]}BS4={[[4a`a][4f`f][4g`g][4e`e]]} BS5={l4a^^^f^^^d^^^e^^^l8[4a`a][4f`f][4d`d]e^d^c^"b^} BASS={l8<
p=64} BG6={l1@126,8'>>>cde<<<'^}BG7={p=64@128,3l8HAM({c^[4d]})@128,1c^^rc^rrd^^^^@123,2HAM({[g^^^]})@127,3HAM2({grrddrrr})@128,1e^^^^^^^^@128,3g^^'cde'}STR BG8={l1p=64@126,8'>>>cde<<<'}STR BG9={@128,3V=127l4'>cde[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^^^r<}MN4={>[aaag^^e^e^^f^refaaag^^`c^:a#^^a^rag]`d^a`d^`d`cgHAM2({RRF})TR=3RRF;TR=4RRF; //------------------------------------------------------------------------------TR=005&007;--------------------------------------------------------------------------// BSH={[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d[3"a#ra#r]"a#ra#a#[3"grgr]"grgg[3"arar]"araa[3dr`dr]`dr`d`d} BS1={[[[3"a#ra#r]"a#ra#a#][3"arar]"araa[3dr`dr]dr`d`d]}BS2={BS1}BS3={[[[3"a#ra#r]"a#ra#a#]:[[3dr`dr]dr`d`d]][3dr`dr]dr`d`d["arar]"a^^^"a^^^} BS4={[4["a#ra#r]cr`crcr`c`c:["arar]dr`drdr`d`d][3dr`dr]dr`d`d}BS5={q=100l4["a#^^^^^^^:d^^^^^^^]d^^^"a^^^l16q=180} TR=5l16ULMR; //------------------------------------------------------------------------------TR=014;------------------------------------------------------------------------------// STR PAH={EP=127@12SUB{[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^`e`f`d<}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]} STR PAI={EP=127[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r'agd"a'^^]}STR PAG={EP=127@12SUB{HAM({[[`a`d`f`a^:`a^`g]>`d`ca#<`g`c`e`g^:``c^`a#`a`a`g`a^`f`g`f]`g`g>`c`d^a`d^^^^^^^^^^^<})}[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'af#d"a'^^^r:'agd"a'^^]} STR PA1={EP=100@12[['afd"a#'^^^r'afd"a#'^^]'gec"a'^^^r'gec"a'^^'`dafd'^^^r'`dafd'^^]}STR PA2={PA1} STR PA3={EP=100[['afd"a#'^^^r'afd"a#'^^]:['`dafd'^^^r'`dafd'^^]]'`dafd'^^^r'`dafd'^^'gec"a'^^^rrrr} STR PA4={EP=110[4'afd"a#'^'afd"a#''ceg`c'^^'ceg`c'^:'`ceg"a'^^'`dafd'^^'`dafd'^]'`dafd'^^'`dafd'^^'`dafd'^} TR=14l8DL=HAZ[PAH]PAI;DL=BGN;PA1;PA2;PA3;PA4;PA1;DL=NK4;PAI;PAG; //------------------------------------------------------------------------------TR=015;------------------------------------------------------------------------------// STR HSH={}STR HSI={} STR HS1={EP=110@13["a#df"a#f"a#df"a#df"a#f"a#df"aeg"ag"acedfadagfd]}STR HS2={HS1} STR HS3={`dafd<'`d][`d'>`dafd<']][`d`d'>`dafd<'`d]aa'>agd"a<'arrrr>} STR HS4={`dafd<'^'>`dafd<'][`d`d'>`dafd<'`d]>} TR=15l8>DL=HAZ+8[HSH]DL=BGN;HS1;HS2;HS3;HS4;HS1;DL=NK4;HSH;HSI; //------------------------------------LYRIC Function LY(GRFD){[(GRFD)l4Lyric={"。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:"}rLyric={":。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*"}rLyric={"*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。."}rLyric={".*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。"}rLyric={"。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:"}rLyric={":。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+"}rLyric={"+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。.:"}rLyric={":゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。."}rLyric={".:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*。"}rLyric={"。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚*"}rLyric={"*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。.+"}rLyric={"+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。."}rLyric={".+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:。"}rLyric={"。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚:"}rLyric={":。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*゚"}rLyric={"゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。.*"}rLyric={"*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。."}rLyric={".*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:。"}rLyric={"。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚:"}rLyric={":。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+゚"}rLyric={"゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚+"}rLyric={"+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:゚"}rLyric={"゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。.:"}rLyric={":゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。."}rLyric={".:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*。"}rLyric={"。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚*"}rLyric={"*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+゚"}rLyric={"゚*。.:゚+゚:。.*゚:。.+゚*。.:゚+゚:。.*゚:。+"}r]}TR=17CH=16DL=0Lyric={"MS-GS EUROBEAT 120th ANNIVERSARY NON-STOP MEGAMIX VOL.08"}DL=18Lyric={"1.MYSTERIOUS FOREST - 2006/7/17"}DL=121LY=2DL=137Lyric={"2.ONE DAY - 2006/10/09"}DL=242LY=2DL=258Lyric={"3.I’M IN DANGER BUBBLE -EXTENDED NRG MIX- - 2006/09/25 "}DL=324LY=1DL=332Lyric={"4.I’M IN DANGER BUBBLE -EXTENDED EURO MIX- - 2006/09/25 "}DL=444LY=1DL=452Lyric={"5.HOLY NIGHT - 2006/08/14"}DL=581LY=1DL=589Lyric={"6.DARKNESS NIGHTMARE SONG - 2006/09/11"}DL=714LY=1DL=722Lyric={"7.U & I - 2006/11/06"}DL=842LY=1DL=850Lyric={"8.BE MY LOVER - 2006/10/23"}DL=954LY=3DL=978Lyric={"9.KAMIKAZE SUICIDE SQUID - 2006/08/28"}DL=1151Lyric={"BONUS TRACK - 『 MY SWEET MEMORIES - オルゴールバージョン - 』"}