サクラトップ > 掲示板トップ > 投稿フォーム
曲の投稿にはユーザー登録が必要です。 曲 名 作 者 名前: パスワード: 転 載 メール連絡すれば可 全て許可 メール連絡すれば可 許可しない (ゲームのBGMなど使いたい場合、許可するかどうかを指定。 サクラ本体への収録はあらかじめご承諾ください。) ゲーム制作サイト「Rmake」への転載(およびMP3変換)を許可する ジャンル ポップス ポップス ハードロック・ヘヴィーメタル ヒップホップ クラシック 歌謡曲・演歌 J-POP ロック ブルース・カントリー ダンス・エレクトロニカ ワールド アニメ・ゲーム 日本の伝統音楽・芸能 オルタナティヴロック ソウル・R&B ジャズ・フュージョン ヒーリング・ニューエイジ キッズ・ファミリー 音 源 (パソコン内蔵音源、GS音源、GM音源など) 公開 公開する 削除する (公開を中止して削除するときには、この項目を変更します。) コメント 61140文字以下にするのが大変でしたw 曲は、アコギ風です。一応、詩もあったんですけどね(-。−;) 曲データ(サクラから貼り付けます。) //------------------------------------------------------------------------------ // dSakura.dll Version.2.37 TrackName={"曲名:秋冬"};Copyright={"作曲:春日井 春日"};MetaText={"DLありがとうございます"}; //_全体のKeyの操作 Int ALL_KEY=1; //原曲は0で作曲したのですが、1のほうがいいです// /* サクラに2年ぶりくらいに投稿します…(-。−;) 1年以上パソコンが壊れて、久しぶりにサクラで作曲しました。(笑) なんか関数ばっか…FunctionをFUNCTIONと、大文字で書きました(^▽^;) 理由は特にないんですけどね。 っていうか61440文字以下にするのが大変でした(笑) さてさて今回の曲についてですが、ギターを中心に曲を作ったつもりだったのに、 なぜかギター音が目立ってないという音量の使い方がいまだ下手な自分(/_<。)ビェェン ギター進行系で作曲しました( ̄▽ ̄)b グッ! ☆Aメロ:C→G→Am→Em→F→G→Cと、C調として典型的な進行(・・;) ☆Bメロ:Am→F→G→Cと、これまたAm調として典型的? ☆サビ:FM7→G6→Am→Am7と、最近よく使われるようになったコード進行…かな? 自分の経験上の事なので、あまり信じないでください(-o-;) 一応、FM7が入っている曲は比較的、いい曲という印象があるんで、使ってみたんです けど、微妙ですね( ´△`) YAMAHAのCMで使っているコードもFM7→G6らしいですが… 極限カットします( ̄Д ̄;; 61440文字超えてます!とかいわれたのでw*/ INT Kapo=on;FUNCTION Del(Del_mm){VibratoDelay(Del_mm);};FUNCTION Dep(Dep_mm){VibratoDepth(Dep_mm);};FUNCTION CT(CT_mm){CoarseTune(CT_mm);} FUNCTION FT(FT_mm){INT R_FT_mm;INT R_RS;R_FT_mm=Random(64+FT_mm,64-FT_mm);R_RS=System.RandomSeed(R_FT_mm);FineTune(R_RS);} INT TUNING_1=0;INT TUNING_2=0;INT TUNING_3=0;INT TUNING_4=0;INT TUNING_5=0;INT TUNING_6=0;INT Ho_O_TIME=0;STR Ho_O={y64,Ho_O_TIME;}STR Ho_C={y64,0;} FUNCTION NOW_Key(INT NOW_Key_TUNING){Key(MML(Key)+NOW_Key_TUNING)};FUNCTION END_Key(INT END_Key_TUNING){Key(MML(Key)-END_Key_TUNING)} STR FRET_1={IF(Kapo==on){NOW_Key(TUNING_1)};IF(G_1==0){`e};IF(G_1==1){`f};IF(G_1==2){`f+};IF(G_1==3){`g};IF(G_1==4){`g+};IF(G_1==5){`a};IF(G_1==6){`a+}; IF(G_1==7){`b};IF(G_1==8){``c};IF(G_1==9){``c+};IF(G_1==10){``d};IF(G_1==11){``d+};IF(G_1==12){``e};IF(G_1==13){``f};IF(G_1==14){``f+};IF(G_1==15){``g};IF(G_1==16){``g+};IF(G_1==17){``a};IF(G_1==18){``a+}; IF(G_1==19){``b};IF(G_1==20){```c};IF(G_1==21){```c+};IF(G_1==22){```d};IF(G_1==23){```d+};IF(G_1==24){```e};IF(G_1==99){};IF(Kapo==on){END_Key(TUNING_1)};} STR FRET_2={IF(Kapo==on){NOW_Key(TUNING_2)};IF(G_2==0){b};IF(G_2==1){`c};IF(G_2==2){`c+};IF(G_2==3){`d};IF(G_2==4){`d+};IF(G_2==5){`e};IF(G_2==6){`f}; IF(G_2==7){`f+};IF(G_2==8){`g};IF(G_2==9){`g+};IF(G_2==10){`a};IF(G_2==11){`a+};IF(G_2==12){`b};IF(G_2==13){``c};IF(G_2==14){``c+};IF(G_2==15){``d};IF(G_2==16){``d+};IF(G_2==17){``e};IF(G_2==18){``f}; IF(G_2==19){``f+};IF(G_2==20){``g};IF(G_2==21){``g+};IF(G_2==22){``a};IF(G_2==23){``a+};IF(G_2==24){``b};IF(G_2==99){};IF(Kapo==on){END_Key(TUNING_2)};} STR FRET_3={IF(Kapo==on){NOW_Key(TUNING_3)};IF(G_3==0){g};IF(G_3==1){g+};IF(G_3==2){a};IF(G_3==3){a+};IF(G_3==4){b};IF(G_3==5){`c};IF(G_3==6){`c+}; IF(G_3==7){`d};IF(G_3==8){`d+};IF(G_3==9){`e};IF(G_3==10){`f};IF(G_3==11){`f+};IF(G_3==12){`g};IF(G_3==13){`g+};IF(G_3==14){`a};IF(G_3==15){`a+};IF(G_3==16){`b};IF(G_3==17){``c};IF(G_3==18){``c+}; IF(G_3==19){``d};IF(G_3==20){``d+};IF(G_3==21){``e};IF(G_3==22){``f};IF(G_3==23){``f+};IF(G_3==24){``g};IF(G_3==99){};IF(Kapo==on){END_Key(TUNING_3)};} STR FRET_4={IF(Kapo==on){NOW_Key(TUNING_4)};IF(G_4==0){d};IF(G_4==1){d+};IF(G_4==2){e};IF(G_4==3){f};IF(G_4==4){f+};IF(G_4==5){g};IF(G_4==6){g+}; IF(G_4==7){a};IF(G_4==8){a+};IF(G_4==9){b};IF(G_4==10){`c};IF(G_4==11){`c+};IF(G_4==12){`d};IF(G_4==13){`d+};IF(G_4==14){`e};IF(G_4==15){`f};IF(G_4==16){`f+};IF(G_4==17){`g};IF(G_4==18){`g+}; IF(G_4==19){`a};IF(G_4==20){`a+};IF(G_4==21){`b};IF(G_4==22){``c};IF(G_4==23){``c+};IF(G_4==24){``d};IF(G_4==99){};IF(Kapo==on){END_Key(TUNING_4)};} STR FRET_5={IF(Kapo==on){NOW_Key(TUNING_5)};IF(G_5==0){"a};IF(G_5==1){"a+};IF(G_5==2){"b};IF(G_5==3){c};IF(G_5==4){c+};IF(G_5==5){d};IF(G_5==6){d+}; IF(G_5==7){e};IF(G_5==8){f};IF(G_5==9){f+};IF(G_5==10){g};IF(G_5==11){g+};IF(G_5==12){a};IF(G_5==13){a+};IF(G_5==14){b};IF(G_5==15){`c};IF(G_5==16){`c+};IF(G_5==17){`d};IF(G_5==18){`d+}; IF(G_5==19){`e};IF(G_5==20){`f};IF(G_5==21){`f+};IF(G_5==22){`g};IF(G_5==23){`g+};IF(G_5==24){`a};IF(G_5==99){};IF(Kapo==on){END_Key(TUNING_5)};} STR FRET_6={IF(Kapo==on){NOW_Key(TUNING_6)};IF(G_6==0){"e};IF(G_6==1){"f};IF(G_6==2){"f+};IF(G_6==3){"g};IF(G_6==4){"g+};IF(G_6==5){"a};IF(G_6==6){"a+}; IF(G_6==7){"b};IF(G_6==8){c};IF(G_6==9){c+};IF(G_6==10){d};IF(G_6==11){d+};IF(G_6==12){e};IF(G_6==13){f};IF(G_6==14){f+};IF(G_6==15){g};IF(G_6==16){g+};IF(G_6==17){a};IF(G_6==18){a+}; IF(G_6==19){b};IF(G_6==20){`c};IF(G_6==21){`c+};IF(G_6==22){`d};IF(G_6==23){`d+};IF(G_6==24){`e};IF(G_6==99){};IF(Kapo==on){END_Key(TUNING_6)};} INT _=99;INT STROKE_TIMING=3;INT STROKE_v_INT=2;STR STROKE={t.N(0*STROKE_TIMING,2*STROKE_TIMING,4*STROKE_TIMING,6*STROKE_TIMING,8*STROKE_TIMING,10*STROKE_TIMING)}; STR STROKE_v_UP={v.N(55*STROKE_v_INT,54*STROKE_v_INT,53*STROKE_v_INT,52*STROKE_v_INT,51*STROKE_v_INT,50*STROKE_v_INT)};STR STROKE_v_DO={v.N(50*STROKE_v_INT,51*STROKE_v_INT,52*STROKE_v_INT,53*STROKE_v_INT,54*STROKE_v_INT,55*STROKE_v_INT)}; FUNCTION G_CF_A(G_1,G_2,G_3,G_4,G_5,G_6){STROKE_v_UP;STROKE;'FRET_1;FRET_2;FRET_3;FRET_4;FRET_5;FRET_6'};FUNCTION G_CF_D(G_1,G_2,G_3,G_4,G_5,G_6){STROKE_v_DO;STROKE;'FRET_6;FRET_5;FRET_4;FRET_3;FRET_2;FRET_1'};INT N_v;INT M_v=50; FUNCTION C (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,0,2,3,_)};IF(S_AorD==1){G_CF_A(0,1,0,2,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cp(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,2,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Db(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,2,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION D (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,2,0,_,_)};IF(S_AorD==1){G_CF_A(2,3,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dp(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eb(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION E (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,1,2,2,0)};IF(S_AorD==1){G_CF_A(0,0,1,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION F (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,2,3,3,1)};IF(S_AorD==1){G_CF_A(1,1,2,3,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fp(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,3,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,3,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gb(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,3,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,3,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,0,0,0,2,3)};IF(S_AorD==1){G_CF_A(3,0,0,0,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gp(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,5,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,5,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ab(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,5,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,5,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION A (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,2,2,0,_)};IF(S_AorD==1){G_CF_A(0,2,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ap(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bb(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION B (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,4,4,2,_)};IF(S_AorD==1){G_CF_A(2,4,4,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cm (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,4,5,5,3,_)};IF(S_AorD==1){G_CF_A(3,4,5,5,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,5,6,6,4,_)};IF(S_AorD==1){G_CF_A(4,5,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,5,6,6,4,_)};IF(S_AorD==1){G_CF_A(4,5,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dm (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,2,0,_,_)};IF(S_AorD==1){G_CF_A(1,3,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,7,8,8,6,_)};IF(S_AorD==1){G_CF_A(6,7,8,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,7,8,8,6,_)};IF(S_AorD==1){G_CF_A(6,7,8,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Em (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,0,2,2,0)};IF(S_AorD==1){G_CF_A(0,0,0,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fm (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,3,3,1)};IF(S_AorD==1){G_CF_A(1,1,1,3,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,2,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,2,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gm (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,5,5,3)};IF(S_AorD==1){G_CF_A(3,3,3,5,5,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,4,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,4,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,4,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,4,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Am (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,2,2,0,_)};IF(S_AorD==1){G_CF_A(0,1,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,2,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbm(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,2,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bm (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,4,4,2,_)};IF(S_AorD==1){G_CF_A(2,3,4,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION C7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,3,2,3,_)};IF(S_AorD==1){G_CF_A(0,1,3,2,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cp7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,4,3,4,_)};IF(S_AorD==1){G_CF_A(_,2,4,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Db7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,4,3,4,_)};IF(S_AorD==1){G_CF_A(_,2,4,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION D7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,1,2,0,_,_)};IF(S_AorD==1){G_CF_A(2,1,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dp7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,2,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,2,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eb7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,2,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,2,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION E7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,1,0,2,0)};IF(S_AorD==1){G_CF_A(0,0,1,0,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION F7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,2,1,3,1)};IF(S_AorD==1){G_CF_A(1,1,2,1,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fp7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,3,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,3,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gb7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,3,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,3,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,0,0,0,2,3)};IF(S_AorD==1){G_CF_A(1,0,0,0,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gp7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,5,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,5,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ab7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,5,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,5,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION A7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,0,2,0,_)};IF(S_AorD==1){G_CF_A(0,2,0,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ap7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bb7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION B7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,0,2,1,2,_)};IF(S_AorD==1){G_CF_A(2,0,2,1,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION CM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,0,2,3,_)};IF(S_AorD==1){G_CF_A(0,0,0,2,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION CpM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,1,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION DbM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,1,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION DM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,0,_,_)};IF(S_AorD==1){G_CF_A(2,2,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION DpM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,3,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION EbM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,3,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION EM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,1,1,_,0)};IF(S_AorD==1){G_CF_A(0,0,1,1,_,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION FM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,2,3,3,_)};IF(S_AorD==1){G_CF_A(0,1,2,3,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION FpM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,3,4,_,_)};IF(S_AorD==1){G_CF_A(1,2,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION GbM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,3,4,_,_)};IF(S_AorD==1){G_CF_A(1,2,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION GM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,0,0,0,2,3)};IF(S_AorD==1){G_CF_A(2,0,0,0,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION GpM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,4,5,5,_,4)};IF(S_AorD==1){G_CF_A(_,4,5,5,_,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION AbM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,4,5,5,_,4)};IF(S_AorD==1){G_CF_A(_,4,5,5,_,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION AM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,1,2,0,_)};IF(S_AorD==1){G_CF_A(0,2,1,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION ApM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,2,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION BbM7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,2,3,1,_)};IF(S_AorD==1){G_CF_A(1,3,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION BM7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,3,4,2,_)};IF(S_AorD==1){G_CF_A(2,4,2,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cm7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,4,3,5,3,_)};IF(S_AorD==1){G_CF_A(3,4,3,5,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,5,4,6,4,_)};IF(S_AorD==1){G_CF_A(4,5,4,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,5,4,6,4,_)};IF(S_AorD==1){G_CF_A(4,5,4,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dm7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,2,0,_,_)};IF(S_AorD==1){G_CF_A(1,1,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,7,6,8,6,_)};IF(S_AorD==1){G_CF_A(6,7,6,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,7,6,8,6,_)};IF(S_AorD==1){G_CF_A(6,7,6,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Em7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,0,0,2,0)};IF(S_AorD==1){G_CF_A(0,0,0,0,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fm7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,1,3,1)};IF(S_AorD==1){G_CF_A(1,1,1,1,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,2,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,2,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gm7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,3,5,3)};IF(S_AorD==1){G_CF_A(3,3,3,3,5,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,4,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,4,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,4,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,4,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Am7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,0,2,0,_)};IF(S_AorD==1){G_CF_A(0,1,0,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,2,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbm7(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,2,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bm7 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,2,4,2,_)};IF(S_AorD==1){G_CF_A(2,3,2,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cdim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,2,4,3,_)};IF(S_AorD==1){G_CF_A(2,4,2,4,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,5,3,5,4,_)};IF(S_AorD==1){G_CF_A(3,5,3,5,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,5,3,5,4,_)};IF(S_AorD==1){G_CF_A(3,5,3,5,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ddim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,0,1,0,_,_)};IF(S_AorD==1){G_CF_A(1,0,1,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,1,2,1,_,_)};IF(S_AorD==1){G_CF_A(2,1,2,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,1,2,1,_,_)};IF(S_AorD==1){G_CF_A(2,1,2,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Edim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,0,2,1,0)};IF(S_AorD==1){G_CF_A(0,2,0,2,1,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fdim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,1,3,2,1)};IF(S_AorD==1){G_CF_A(1,3,1,3,2,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,2,4,3,2)};IF(S_AorD==1){G_CF_A(2,4,2,4,3,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,2,4,3,2)};IF(S_AorD==1){G_CF_A(2,4,2,4,3,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gdim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,5,3,5,4,3)};IF(S_AorD==1){G_CF_A(3,5,3,5,4,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,6,4,6,5,4)};IF(S_AorD==1){G_CF_A(4,6,4,6,5,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,6,4,6,5,4)};IF(S_AorD==1){G_CF_A(4,6,4,6,5,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Adim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,1,2,1,0,_)};IF(S_AorD==1){G_CF_A(2,1,2,1,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,0,2,1,_)};IF(S_AorD==1){G_CF_A(0,2,0,2,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbdim(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,0,2,1,_)};IF(S_AorD==1){G_CF_A(0,2,0,2,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bdim (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,1,3,2,_)};IF(S_AorD==1){G_CF_A(1,3,1,3,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cm7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,4,3,4,3,_)};IF(S_AorD==1){G_CF_A(_,4,3,4,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,5,4,5,4,_)};IF(S_AorD==1){G_CF_A(_,5,4,5,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,5,4,5,4,_)};IF(S_AorD==1){G_CF_A(_,5,4,5,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dm7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,0,_,_)};IF(S_AorD==1){G_CF_A(1,1,1,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,2,2,_,_)};IF(S_AorD==1){G_CF_A(1,2,2,2,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,2,2,_,_)};IF(S_AorD==1){G_CF_A(1,2,2,2,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Em7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,3,_,_)};IF(S_AorD==1){G_CF_A(2,3,3,3,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fm7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,0,1,1,_,1)};IF(S_AorD==1){G_CF_A(_,0,1,1,_,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,1,2,2,_,2)};IF(S_AorD==1){G_CF_A(_,1,2,2,_,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,1,2,2,_,2)};IF(S_AorD==1){G_CF_A(_,1,2,2,_,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gm7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,3,3,_,3)};IF(S_AorD==1){G_CF_A(_,2,3,3,_,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,3,4,4,_,4)};IF(S_AorD==1){G_CF_A(_,3,4,4,_,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,3,4,4,_,4)};IF(S_AorD==1){G_CF_A(_,3,4,4,_,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Am7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,1,0,1,0,_)};IF(S_AorD==1){G_CF_A(_,1,0,1,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,1,2,1,_)};IF(S_AorD==1){G_CF_A(_,2,1,2,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbm7b5(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,1,2,1,_)};IF(S_AorD==1){G_CF_A(_,2,1,2,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bm7b5 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,3,2,3,2,_)};IF(S_AorD==1){G_CF_A(_,3,2,3,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Caug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,1,1,2,3,_)};IF(S_AorD==1){G_CF_A(_,1,1,2,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,2,3,4,_)};IF(S_AorD==1){G_CF_A(_,2,2,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,2,3,4,_)};IF(S_AorD==1){G_CF_A(_,2,2,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Daug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,0,_,_)};IF(S_AorD==1){G_CF_A(2,3,3,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,0,0,1,_,_)};IF(S_AorD==1){G_CF_A(3,0,0,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,0,0,1,_,_)};IF(S_AorD==1){G_CF_A(3,0,0,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eaug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,1,2,3,0)};IF(S_AorD==1){G_CF_A(0,1,1,2,3,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Faug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,2,3,_,_)};IF(S_AorD==1){G_CF_A(1,2,2,3,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,4,_,_)};IF(S_AorD==1){G_CF_A(2,3,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,4,_,_)};IF(S_AorD==1){G_CF_A(2,3,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gaug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,0,0,1,2,3)};IF(S_AorD==1){G_CF_A(3,0,0,1,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,_,1,2,3,4)};IF(S_AorD==1){G_CF_A(_,_,1,2,3,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,_,1,2,3,4)};IF(S_AorD==1){G_CF_A(_,_,1,2,3,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Aaug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,2,2,3,0,_)};IF(S_AorD==1){G_CF_A(1,2,2,3,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,_,1,_)};IF(S_AorD==1){G_CF_A(2,3,3,_,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbaug(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,3,3,_,1,_)};IF(S_AorD==1){G_CF_A(1,3,3,_,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Baug (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,0,0,1,2,_)};IF(S_AorD==1){G_CF_A(_,0,0,1,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Csus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,0,3,3,_)};IF(S_AorD==1){G_CF_A(1,1,0,3,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,7,6,6,4,_)};IF(S_AorD==1){G_CF_A(4,7,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,7,6,6,4,_)};IF(S_AorD==1){G_CF_A(4,7,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dsus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,2,0,_,_)};IF(S_AorD==1){G_CF_A(3,3,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(4,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(4,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Esus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,2,2,2,0)};IF(S_AorD==1){G_CF_A(0,0,2,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fsus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,2,3,3,1)};IF(S_AorD==1){G_CF_A(1,1,2,3,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,4,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,4,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,4,4,4,2)};IF(S_AorD==1){G_CF_A(2,2,4,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gsus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,1,0,0,3,3)};IF(S_AorD==1){G_CF_A(3,1,0,0,3,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,6,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,6,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Absus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,6,6,6,4)};IF(S_AorD==1){G_CF_A(4,4,6,6,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Asus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,3,2,2,0,_)};IF(S_AorD==1){G_CF_A(0,3,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,4,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbsus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,4,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bsus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,5,4,4,2,_)};IF(S_AorD==1){G_CF_A(2,5,4,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION C7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,6,3,5,3,_)};IF(S_AorD==1){G_CF_A(3,6,3,5,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cp7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,7,4,6,4,_)};IF(S_AorD==1){G_CF_A(4,7,4,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Db7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(_,2,4,3,4,_)};IF(S_AorD==1){G_CF_A(_,2,4,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION D7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,1,2,0,_,_)};IF(S_AorD==1){G_CF_A(3,1,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dp7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,9,6,8,6,_)};IF(S_AorD==1){G_CF_A(6,9,6,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eb7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,9,6,8,6,_)};IF(S_AorD==1){G_CF_A(6,9,6,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION E7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,2,0,2,0)};IF(S_AorD==1){G_CF_A(0,0,2,0,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION F7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,3,1,3,1)};IF(S_AorD==1){G_CF_A(1,1,3,1,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fp7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,4,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,4,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gb7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,4,2,4,2)};IF(S_AorD==1){G_CF_A(2,2,4,2,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,5,3,5,3)};IF(S_AorD==1){G_CF_A(3,3,5,3,5,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gp7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,6,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,6,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ab7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,6,4,6,4)};IF(S_AorD==1){G_CF_A(4,4,6,4,6,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION A7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,3,0,2,0,_)};IF(S_AorD==1){G_CF_A(0,3,0,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ap7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,4,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bb7sus4(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,1,3,1,_)};IF(S_AorD==1){G_CF_A(1,4,1,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION B7sus4 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,5,2,4,2,_)};IF(S_AorD==1){G_CF_A(2,5,2,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION C6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(5,5,5,5,3,_)};IF(S_AorD==1){G_CF_A(5,5,5,5,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cp6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,6,6,6,4,_)};IF(S_AorD==1){G_CF_A(6,6,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Db6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,6,6,6,4,_)};IF(S_AorD==1){G_CF_A(6,6,6,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION D6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,0,2,0,_,_)};IF(S_AorD==1){G_CF_A(2,0,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dp6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,1,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,1,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eb6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,1,3,1,_,_)};IF(S_AorD==1){G_CF_A(3,1,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION E6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,1,2,2,0)};IF(S_AorD==1){G_CF_A(0,2,1,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION F6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,2,3,_,_)};IF(S_AorD==1){G_CF_A(1,3,2,3,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fp6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,3,4,_,_)};IF(S_AorD==1){G_CF_A(2,4,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gb6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,3,4,_,_)};IF(S_AorD==1){G_CF_A(2,4,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,0,0,2,3)};IF(S_AorD==1){G_CF_A(0,0,0,0,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gp6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,1,3,4)};IF(S_AorD==1){G_CF_A(1,1,1,1,3,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ab6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,1,1,3,4)};IF(S_AorD==1){G_CF_A(1,1,1,1,3,4)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION A6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,2,2,0,_)};IF(S_AorD==1){G_CF_A(2,2,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ap6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,3,1,_)};IF(S_AorD==1){G_CF_A(3,3,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bb6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,3,3,1,_)};IF(S_AorD==1){G_CF_A(3,3,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION B6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,4,4,4,2,_)};IF(S_AorD==1){G_CF_A(4,4,4,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,3,0,2,3,_)};IF(S_AorD==1){G_CF_A(0,3,0,2,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,4,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,1,3,4,_)};IF(S_AorD==1){G_CF_A(1,4,1,3,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,3,2,0,_,_)};IF(S_AorD==1){G_CF_A(0,3,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(1,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,4,3,1,_,_)};IF(S_AorD==1){G_CF_A(1,4,3,1,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Eadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,0,1,2,2,0)};IF(S_AorD==1){G_CF_A(2,0,1,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,1,2,3,_,_)};IF(S_AorD==1){G_CF_A(3,1,2,3,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,2,3,4,_,_)};IF(S_AorD==1){G_CF_A(4,2,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,2,3,4,_,_)};IF(S_AorD==1){G_CF_A(4,2,3,4,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,0,2,0,2,3)};IF(S_AorD==1){G_CF_A(3,0,2,0,2,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,4,5,6,_,_)};IF(S_AorD==1){G_CF_A(6,4,5,6,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,4,5,6,_,_)};IF(S_AorD==1){G_CF_A(6,4,5,6,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Aadd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,0,2,2,0,_)};IF(S_AorD==1){G_CF_A(0,0,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,1,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbadd9(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,1,3,3,1,_)};IF(S_AorD==1){G_CF_A(1,1,3,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Badd9 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,2,4,4,2,_)};IF(S_AorD==1){G_CF_A(2,2,4,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cm6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(5,4,_,5,3,_)};IF(S_AorD==1){G_CF_A(5,4,_,5,3,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Cpm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,5,_,6,4,_)};IF(S_AorD==1){G_CF_A(6,5,_,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dbm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,5,_,6,4,_)};IF(S_AorD==1){G_CF_A(6,5,_,6,4,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dm6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,0,2,0,_,_)};IF(S_AorD==1){G_CF_A(1,0,2,0,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Dpm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(8,7,_,8,6,_)};IF(S_AorD==1){G_CF_A(8,7,_,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Ebm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(8,7,_,8,6,_)};IF(S_AorD==1){G_CF_A(8,7,_,8,6,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Em6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,2,0,2,2,0)};IF(S_AorD==1){G_CF_A(0,2,0,2,2,0)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fm6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(1,3,1,3,3,1)};IF(S_AorD==1){G_CF_A(1,3,1,3,3,1)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Fpm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,2,4,4,2)};IF(S_AorD==1){G_CF_A(2,4,2,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gbm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,4,2,4,4,2)};IF(S_AorD==1){G_CF_A(2,4,2,4,4,2)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gm6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,5,3,5,5,3)};IF(S_AorD==1){G_CF_A(3,5,3,5,5,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Gpm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,4,5,6,_,_)};IF(S_AorD==1){G_CF_A(6,4,5,6,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Abm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(6,4,5,6,_,_)};IF(S_AorD==1){G_CF_A(6,4,5,6,_,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Am6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(2,1,2,2,0,_)};IF(S_AorD==1){G_CF_A(2,1,2,2,0,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Apm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,2,0,3,1,_)};IF(S_AorD==1){G_CF_A(3,2,0,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bbm6(S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,2,0,3,1,_)};IF(S_AorD==1){G_CF_A(3,2,0,3,1,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION Bm6 (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(4,3,_,4,2,_)};IF(S_AorD==1){G_CF_A(4,3,_,4,2,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION C_ (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,1,0,2,3,3)};IF(S_AorD==1){G_CF_A(0,1,0,2,3,3)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G6_ (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(0,3,4,5,5,_)};IF(S_AorD==1){G_CF_A(0,3,4,5,5,_)};IF(M_ON==1){v(N_v)};Ho_C;}; FUNCTION G7_ (S_AorD,M_ON){Ho_O;IF(M_ON==1){N_v=MML(v);v(M_v)}IF(S_AorD==0){G_CF_D(3,3,4,3,5,3)};IF(S_AorD==1){G_CF_A(3,3,4,3,5,3)};IF(M_ON==1){v(N_v)};Ho_C;}; INT P_STROKE_TIMING=1;STR P_STROKE={t.N(0*P_STROKE_TIMING,2*P_STROKE_TIMING)}; FUNCTION P_C (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,5,3,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Cp(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,6,4,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Db(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,6,4,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_D (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,7,5,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Dp(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,8,6,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Eb(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,8,6,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_E (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,2,0);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_F (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,3,1);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Fp(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,4,2);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Gb(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,4,2);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_G (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,5,3);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Gp(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,6,4);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Ab(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,6,4);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_A (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,_,7,5);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Ap(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,3,1,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_Bb(P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,3,1,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION P_B (P_MUTE){IF(P_MUTE==1){N_v=MML(v);v(M_v)}G_CF_D(_,_,_,4,2,_);IF(P_MUTE==1){v(N_v)};}; FUNCTION A_maj(STR A_STR,A_K_C_N){ IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'};}; FUNCTION A_m(STR A_STR,A_K_C_N){ IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-24);A_STR;Key(MML(Key)-3+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'};}; FUNCTION A_7(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10-12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'};}; FUNCTION A_M7(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+11+24);A_STR;Key(MML(Key)-11+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+11+24);A_STR;Key(MML(Key)-11+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+11+24);A_STR;Key(MML(Key)-11+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+11-12);A_STR;Key(MML(Key)-11+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+11+ 0);A_STR;Key(MML(Key)-11+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+11+ 0);A_STR;Key(MML(Key)-11+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+11+ 0);A_STR;Key(MML(Key)-11+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+11+ 0);A_STR;Key(MML(Key)-11+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+11+12);A_STR;Key(MML(Key)-11-12);'};}; FUNCTION A_m7(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-24);A_STR;Key(MML(Key)-3+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10-12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'};}; FUNCTION A_dim(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-24);A_STR;Key(MML(Key)-3+24);Key(MML(Key)+6-24);A_STR;Key(MML(Key)-6+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-24);A_STR;Key(MML(Key)-6+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+9-12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+6+24);A_STR;Key(MML(Key)-6-24);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'};}; FUNCTION A_m7b5(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-24);A_STR;Key(MML(Key)-3+24);Key(MML(Key)+6-24);A_STR;Key(MML(Key)-6+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-24);A_STR;Key(MML(Key)-6+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6-12);A_STR;Key(MML(Key)-6+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+10-12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+ 0);A_STR;Key(MML(Key)-6+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+6+12);A_STR;Key(MML(Key)-6-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+6+24);A_STR;Key(MML(Key)-6-24);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'};}; FUNCTION A_aug(STR A_STR,A_K_C_N){ IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+8-24);A_STR;Key(MML(Key)-8+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+8-24);A_STR;Key(MML(Key)-8+24);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+8-12);A_STR;Key(MML(Key)-8+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+8-12);A_STR;Key(MML(Key)-8+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4- 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+8-12);A_STR;Key(MML(Key)-8+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+8+ 0);A_STR;Key(MML(Key)-8+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+8+ 0);A_STR;Key(MML(Key)-8+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+8+ 0);A_STR;Key(MML(Key)-8+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+8+12);A_STR;Key(MML(Key)-8-12);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+8+12);A_STR;Key(MML(Key)-8-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+8+12);A_STR;Key(MML(Key)-8-12);'};}; FUNCTION A_sus4(STR A_STR,A_K_C_N){ IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-24);A_STR;Key(MML(Key)-5+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+5+24);A_STR;Key(MML(Key)-5-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'};}; FUNCTION A_7sus4(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-24);A_STR;Key(MML(Key)-5+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+24);A_STR;Key(MML(Key)-10+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5-12);A_STR;Key(MML(Key)-5+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10-12);A_STR;Key(MML(Key)-10+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+ 0);A_STR;Key(MML(Key)-5+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+ 0);A_STR;Key(MML(Key)-10+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+5+12);A_STR;Key(MML(Key)-5-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+5+24);A_STR;Key(MML(Key)-5-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+5+24);A_STR;Key(MML(Key)-5-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+10+12);A_STR;Key(MML(Key)-10-12);'};}; FUNCTION A_6(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9-12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'};}; FUNCTION A_add9(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+2-22);A_STR;Key(MML(Key)-2+24);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+2-12);A_STR;Key(MML(Key)-2+12);Key(MML(Key)+4-24);A_STR;Key(MML(Key)-4+24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+2-12);A_STR;Key(MML(Key)-2+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+2-12);A_STR;Key(MML(Key)-2+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+2-12);A_STR;Key(MML(Key)-2+12);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+2+ 0);A_STR;Key(MML(Key)-2+ 0);Key(MML(Key)+4-12);A_STR;Key(MML(Key)-4+12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+2+ 0);A_STR;Key(MML(Key)-2+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+2+ 0);A_STR;Key(MML(Key)-2+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+2+ 0);A_STR;Key(MML(Key)-2+ 0);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+2+12);A_STR;Key(MML(Key)-2-12);Key(MML(Key)+4+ 0);A_STR;Key(MML(Key)-4+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+2+12);A_STR;Key(MML(Key)-2-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+2+12);A_STR;Key(MML(Key)-2-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+2+12);A_STR;Key(MML(Key)-2-12);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+2+22);A_STR;Key(MML(Key)-2-24);Key(MML(Key)+4+12);A_STR;Key(MML(Key)-4-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+2+22);A_STR;Key(MML(Key)-2-24);Key(MML(Key)+4+24);A_STR;Key(MML(Key)-4-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);'};}; FUNCTION A_m6(STR A_STR,A_K_C_N){ IF(A_K_C_N==-07){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-24);A_STR;Key(MML(Key)-3+24);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-06){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-24);A_STR;Key(MML(Key)-7+24);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-05){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+24);A_STR;Key(MML(Key)-9+24);'}; IF(A_K_C_N==-04){'Key(MML(Key)+0-12);A_STR;Key(MML(Key)-0+12);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-03){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3-12);A_STR;Key(MML(Key)-3+12);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-02){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7-12);A_STR;Key(MML(Key)-7+12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==-01){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9-12);A_STR;Key(MML(Key)-9+12);'}; IF(A_K_C_N==+00){'Key(MML(Key)+0+ 0);A_STR;Key(MML(Key)-0+ 0);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+01){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+ 0);A_STR;Key(MML(Key)-3+ 0);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+02){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+ 0);A_STR;Key(MML(Key)-7+ 0);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+03){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+ 0);A_STR;Key(MML(Key)-9+ 0);'}; IF(A_K_C_N==+04){'Key(MML(Key)+0+12);A_STR;Key(MML(Key)-0-12);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+05){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+12);A_STR;Key(MML(Key)-3-12);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+06){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+7+12);A_STR;Key(MML(Key)-7-12);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'}; IF(A_K_C_N==+07){'Key(MML(Key)+0+24);A_STR;Key(MML(Key)-0-24);Key(MML(Key)+3+24);A_STR;Key(MML(Key)-3-24);Key(MML(Key)+7+24);A_STR;Key(MML(Key)-7-24);Key(MML(Key)+9+12);A_STR;Key(MML(Key)-9-12);'};}; FUNCTION A_C (A_l,A_mm){IF(A_l==0){A_maj({c },A_mm)}IF(A_l>0){l(A_l)A_maj({c },A_mm)}}; FUNCTION A_Cp(A_l,A_mm){IF(A_l==0){A_maj({c+},A_mm)}IF(A_l>0){l(A_l)A_maj({c;},A_mm)}}; FUNCTION A_Db(A_l,A_mm){IF(A_l==0){A_maj({d-},A_mm)}IF(A_l>0){l(A_l)A_maj({d-},A_mm)}}; FUNCTION A_D (A_l,A_mm){IF(A_l==0){A_maj({d },A_mm)}IF(A_l>0){l(A_l)A_maj({d },A_mm)}}; FUNCTION A_Dp(A_l,A_mm){IF(A_l==0){A_maj({d+},A_mm)}IF(A_l>0){l(A_l)A_maj({d+},A_mm)}}; FUNCTION A_Eb(A_l,A_mm){IF(A_l==0){A_maj({e-},A_mm)}IF(A_l>0){l(A_l)A_maj({e-},A_mm)}}; FUNCTION A_E (A_l,A_mm){IF(A_l==0){A_maj({e },A_mm)}IF(A_l>0){l(A_l)A_maj({e },A_mm)}}; FUNCTION A_F (A_l,A_mm){IF(A_l==0){A_maj({f },A_mm)}IF(A_l>0){l(A_l)A_maj({f },A_mm)}}; FUNCTION A_Fp(A_l,A_mm){IF(A_l==0){A_maj({f+},A_mm)}IF(A_l>0){l(A_l)A_maj({f+},A_mm)}}; FUNCTION A_Gb(A_l,A_mm){IF(A_l==0){A_maj({g-},A_mm)}IF(A_l>0){l(A_l)A_maj({g-},A_mm)}}; FUNCTION A_G (A_l,A_mm){IF(A_l==0){A_maj({g },A_mm)}IF(A_l>0){l(A_l)A_maj({g },A_mm)}}; FUNCTION A_Gp(A_l,A_mm){IF(A_l==0){A_maj({g+},A_mm)}IF(A_l>0){l(A_l)A_maj({g+},A_mm)}}; FUNCTION A_Ab(A_l,A_mm){IF(A_l==0){A_maj({a-},A_mm)}IF(A_l>0){l(A_l)A_maj({a-},A_mm)}}; FUNCTION A_A (A_l,A_mm){IF(A_l==0){A_maj({a },A_mm)}IF(A_l>0){l(A_l)A_maj({a },A_mm)}}; FUNCTION A_Ap(A_l,A_mm){IF(A_l==0){A_maj({a+},A_mm)}IF(A_l>0){l(A_l)A_maj({a+},A_mm)}}; FUNCTION A_Bb(A_l,A_mm){IF(A_l==0){A_maj({b-},A_mm)}IF(A_l>0){l(A_l)A_maj({b-},A_mm)}}; FUNCTION A_B (A_l,A_mm){IF(A_l==0){A_maj({b },A_mm)}IF(A_l>0){l(A_l)A_maj({b },A_mm)}}; FUNCTION A_Cm (A_l,A_mm){IF(A_l==0){A_m({c },A_mm)}IF(A_l>0){l(A_l)A_m({c },A_mm)}}; FUNCTION A_Cpm(A_l,A_mm){IF(A_l==0){A_m({c+},A_mm)}IF(A_l>0){l(A_l)A_m({c;},A_mm)}}; FUNCTION A_Dbm(A_l,A_mm){IF(A_l==0){A_m({d-},A_mm)}IF(A_l>0){l(A_l)A_m({d-},A_mm)}}; FUNCTION A_Dm (A_l,A_mm){IF(A_l==0){A_m({d },A_mm)}IF(A_l>0){l(A_l)A_m({d },A_mm)}}; FUNCTION A_Dpm(A_l,A_mm){IF(A_l==0){A_m({d+},A_mm)}IF(A_l>0){l(A_l)A_m({d+},A_mm)}}; FUNCTION A_Ebm(A_l,A_mm){IF(A_l==0){A_m({e-},A_mm)}IF(A_l>0){l(A_l)A_m({e-},A_mm)}}; FUNCTION A_Em (A_l,A_mm){IF(A_l==0){A_m({e },A_mm)}IF(A_l>0){l(A_l)A_m({e },A_mm)}}; FUNCTION A_Fm (A_l,A_mm){IF(A_l==0){A_m({f },A_mm)}IF(A_l>0){l(A_l)A_m({f },A_mm)}}; FUNCTION A_Fpm(A_l,A_mm){IF(A_l==0){A_m({f+},A_mm)}IF(A_l>0){l(A_l)A_m({f+},A_mm)}}; FUNCTION A_Gbm(A_l,A_mm){IF(A_l==0){A_m({g-},A_mm)}IF(A_l>0){l(A_l)A_m({g-},A_mm)}}; FUNCTION A_Gm (A_l,A_mm){IF(A_l==0){A_m({g },A_mm)}IF(A_l>0){l(A_l)A_m({g },A_mm)}}; FUNCTION A_Gpm(A_l,A_mm){IF(A_l==0){A_m({g+},A_mm)}IF(A_l>0){l(A_l)A_m({g+},A_mm)}}; FUNCTION A_Abm(A_l,A_mm){IF(A_l==0){A_m({a-},A_mm)}IF(A_l>0){l(A_l)A_m({a-},A_mm)}}; FUNCTION A_Am (A_l,A_mm){IF(A_l==0){A_m({a },A_mm)}IF(A_l>0){l(A_l)A_m({a },A_mm)}}; FUNCTION A_Apm(A_l,A_mm){IF(A_l==0){A_m({a+},A_mm)}IF(A_l>0){l(A_l)A_m({a+},A_mm)}}; FUNCTION A_Bbm(A_l,A_mm){IF(A_l==0){A_m({b-},A_mm)}IF(A_l>0){l(A_l)A_m({b-},A_mm)}}; FUNCTION A_Bm (A_l,A_mm){IF(A_l==0){A_m({b },A_mm)}IF(A_l>0){l(A_l)A_m({b },A_mm)}}; FUNCTION A_C7 (A_l,A_mm){IF(A_l==0){A_7({c },A_mm)}IF(A_l>0){l(A_l)A_7({c },A_mm)}}; FUNCTION A_Cp7(A_l,A_mm){IF(A_l==0){A_7({c+},A_mm)}IF(A_l>0){l(A_l)A_7({c;},A_mm)}}; FUNCTION A_Db7(A_l,A_mm){IF(A_l==0){A_7({d-},A_mm)}IF(A_l>0){l(A_l)A_7({d-},A_mm)}}; FUNCTION A_D7 (A_l,A_mm){IF(A_l==0){A_7({d },A_mm)}IF(A_l>0){l(A_l)A_7({d },A_mm)}}; FUNCTION A_Dp7(A_l,A_mm){IF(A_l==0){A_7({d+},A_mm)}IF(A_l>0){l(A_l)A_7({d+},A_mm)}}; FUNCTION A_Eb7(A_l,A_mm){IF(A_l==0){A_7({e-},A_mm)}IF(A_l>0){l(A_l)A_7({e-},A_mm)}}; FUNCTION A_E7 (A_l,A_mm){IF(A_l==0){A_7({e },A_mm)}IF(A_l>0){l(A_l)A_7({e },A_mm)}}; FUNCTION A_F7 (A_l,A_mm){IF(A_l==0){A_7({f },A_mm)}IF(A_l>0){l(A_l)A_7({f },A_mm)}}; FUNCTION A_Fp7(A_l,A_mm){IF(A_l==0){A_7({f+},A_mm)}IF(A_l>0){l(A_l)A_7({f+},A_mm)}}; FUNCTION A_Gb7(A_l,A_mm){IF(A_l==0){A_7({g-},A_mm)}IF(A_l>0){l(A_l)A_7({g-},A_mm)}}; FUNCTION A_G7 (A_l,A_mm){IF(A_l==0){A_7({g },A_mm)}IF(A_l>0){l(A_l)A_7({g },A_mm)}}; FUNCTION A_Gp7(A_l,A_mm){IF(A_l==0){A_7({g+},A_mm)}IF(A_l>0){l(A_l)A_7({g+},A_mm)}}; FUNCTION A_Ab7(A_l,A_mm){IF(A_l==0){A_7({a-},A_mm)}IF(A_l>0){l(A_l)A_7({a-},A_mm)}}; FUNCTION A_A7 (A_l,A_mm){IF(A_l==0){A_7({a },A_mm)}IF(A_l>0){l(A_l)A_7({a },A_mm)}}; FUNCTION A_Ap7(A_l,A_mm){IF(A_l==0){A_7({a+},A_mm)}IF(A_l>0){l(A_l)A_7({a+},A_mm)}}; FUNCTION A_Bb7(A_l,A_mm){IF(A_l==0){A_7({b-},A_mm)}IF(A_l>0){l(A_l)A_7({b-},A_mm)}}; FUNCTION A_B7 (A_l,A_mm){IF(A_l==0){A_7({b },A_mm)}IF(A_l>0){l(A_l)A_7({b },A_mm)}}; FUNCTION A_CM7 (A_l,A_mm){IF(A_l==0){A_M7({c },A_mm)}IF(A_l>0){l(A_l)A_M7({c },A_mm)}}; FUNCTION A_CpM7(A_l,A_mm){IF(A_l==0){A_M7({c+},A_mm)}IF(A_l>0){l(A_l)A_M7({c;},A_mm)}}; FUNCTION A_DbM7(A_l,A_mm){IF(A_l==0){A_M7({d-},A_mm)}IF(A_l>0){l(A_l)A_M7({d-},A_mm)}}; FUNCTION A_DM7 (A_l,A_mm){IF(A_l==0){A_M7({d },A_mm)}IF(A_l>0){l(A_l)A_M7({d },A_mm)}}; FUNCTION A_DpM7(A_l,A_mm){IF(A_l==0){A_M7({d+},A_mm)}IF(A_l>0){l(A_l)A_M7({d+},A_mm)}}; FUNCTION A_EbM7(A_l,A_mm){IF(A_l==0){A_M7({e-},A_mm)}IF(A_l>0){l(A_l)A_M7({e-},A_mm)}}; FUNCTION A_EM7 (A_l,A_mm){IF(A_l==0){A_M7({e },A_mm)}IF(A_l>0){l(A_l)A_M7({e },A_mm)}}; FUNCTION A_FM7 (A_l,A_mm){IF(A_l==0){A_M7({f },A_mm)}IF(A_l>0){l(A_l)A_M7({f },A_mm)}}; FUNCTION A_FpM7(A_l,A_mm){IF(A_l==0){A_M7({f+},A_mm)}IF(A_l>0){l(A_l)A_M7({f+},A_mm)}}; FUNCTION A_GbM7(A_l,A_mm){IF(A_l==0){A_M7({g-},A_mm)}IF(A_l>0){l(A_l)A_M7({g-},A_mm)}}; FUNCTION A_GM7 (A_l,A_mm){IF(A_l==0){A_M7({g },A_mm)}IF(A_l>0){l(A_l)A_M7({g },A_mm)}}; FUNCTION A_GpM7(A_l,A_mm){IF(A_l==0){A_M7({g+},A_mm)}IF(A_l>0){l(A_l)A_M7({g+},A_mm)}}; FUNCTION A_AbM7(A_l,A_mm){IF(A_l==0){A_M7({a-},A_mm)}IF(A_l>0){l(A_l)A_M7({a-},A_mm)}}; FUNCTION A_AM7 (A_l,A_mm){IF(A_l==0){A_M7({a },A_mm)}IF(A_l>0){l(A_l)A_M7({a },A_mm)}}; FUNCTION A_ApM7(A_l,A_mm){IF(A_l==0){A_M7({a+},A_mm)}IF(A_l>0){l(A_l)A_M7({a+},A_mm)}}; FUNCTION A_BbM7(A_l,A_mm){IF(A_l==0){A_M7({b-},A_mm)}IF(A_l>0){l(A_l)A_M7({b-},A_mm)}}; FUNCTION A_BM7 (A_l,A_mm){IF(A_l==0){A_M7({b },A_mm)}IF(A_l>0){l(A_l)A_M7({b },A_mm)}}; FUNCTION A_Cm7 (A_l,A_mm){IF(A_l==0){A_m7({c },A_mm)}IF(A_l>0){l(A_l)A_m7({c },A_mm)}}; FUNCTION A_Cpm7(A_l,A_mm){IF(A_l==0){A_m7({c+},A_mm)}IF(A_l>0){l(A_l)A_m7({c;},A_mm)}}; FUNCTION A_Dbm7(A_l,A_mm){IF(A_l==0){A_m7({d-},A_mm)}IF(A_l>0){l(A_l)A_m7({d-},A_mm)}}; FUNCTION A_Dm7 (A_l,A_mm){IF(A_l==0){A_m7({d },A_mm)}IF(A_l>0){l(A_l)A_m7({d },A_mm)}}; FUNCTION A_Dpm7(A_l,A_mm){IF(A_l==0){A_m7({d+},A_mm)}IF(A_l>0){l(A_l)A_m7({d+},A_mm)}}; FUNCTION A_Ebm7(A_l,A_mm){IF(A_l==0){A_m7({e-},A_mm)}IF(A_l>0){l(A_l)A_m7({e-},A_mm)}}; FUNCTION A_Em7 (A_l,A_mm){IF(A_l==0){A_m7({e },A_mm)}IF(A_l>0){l(A_l)A_m7({e },A_mm)}}; FUNCTION A_Fm7 (A_l,A_mm){IF(A_l==0){A_m7({f },A_mm)}IF(A_l>0){l(A_l)A_m7({f },A_mm)}}; FUNCTION A_Fpm7(A_l,A_mm){IF(A_l==0){A_m7({f+},A_mm)}IF(A_l>0){l(A_l)A_m7({f+},A_mm)}}; FUNCTION A_Gbm7(A_l,A_mm){IF(A_l==0){A_m7({g-},A_mm)}IF(A_l>0){l(A_l)A_m7({g-},A_mm)}}; FUNCTION A_Gm7 (A_l,A_mm){IF(A_l==0){A_m7({g },A_mm)}IF(A_l>0){l(A_l)A_m7({g },A_mm)}}; FUNCTION A_Gpm7(A_l,A_mm){IF(A_l==0){A_m7({g+},A_mm)}IF(A_l>0){l(A_l)A_m7({g+},A_mm)}}; FUNCTION A_Abm7(A_l,A_mm){IF(A_l==0){A_m7({a-},A_mm)}IF(A_l>0){l(A_l)A_m7({a-},A_mm)}}; FUNCTION A_Am7 (A_l,A_mm){IF(A_l==0){A_m7({a },A_mm)}IF(A_l>0){l(A_l)A_m7({a },A_mm)}}; FUNCTION A_Apm7(A_l,A_mm){IF(A_l==0){A_m7({a+},A_mm)}IF(A_l>0){l(A_l)A_m7({a+},A_mm)}}; FUNCTION A_Bbm7(A_l,A_mm){IF(A_l==0){A_m7({b-},A_mm)}IF(A_l>0){l(A_l)A_m7({b-},A_mm)}}; FUNCTION A_Bm7 (A_l,A_mm){IF(A_l==0){A_m7({b },A_mm)}IF(A_l>0){l(A_l)A_m7({b },A_mm)}}; FUNCTION A_Cdim (A_l,A_mm){IF(A_l==0){A_dim({c },A_mm)}IF(A_l>0){l(A_l)A_dim({c },A_mm)}}; FUNCTION A_Cpdim(A_l,A_mm){IF(A_l==0){A_dim({c+},A_mm)}IF(A_l>0){l(A_l)A_dim({c;},A_mm)}}; FUNCTION A_Dbdim(A_l,A_mm){IF(A_l==0){A_dim({d-},A_mm)}IF(A_l>0){l(A_l)A_dim({d-},A_mm)}}; FUNCTION A_Ddim (A_l,A_mm){IF(A_l==0){A_dim({d },A_mm)}IF(A_l>0){l(A_l)A_dim({d },A_mm)}}; FUNCTION A_Dpdim(A_l,A_mm){IF(A_l==0){A_dim({d+},A_mm)}IF(A_l>0){l(A_l)A_dim({d+},A_mm)}}; FUNCTION A_Ebdim(A_l,A_mm){IF(A_l==0){A_dim({e-},A_mm)}IF(A_l>0){l(A_l)A_dim({e-},A_mm)}}; FUNCTION A_Edim (A_l,A_mm){IF(A_l==0){A_dim({e },A_mm)}IF(A_l>0){l(A_l)A_dim({e },A_mm)}}; FUNCTION A_Fdim (A_l,A_mm){IF(A_l==0){A_dim({f },A_mm)}IF(A_l>0){l(A_l)A_dim({f },A_mm)}}; FUNCTION A_Fpdim(A_l,A_mm){IF(A_l==0){A_dim({f+},A_mm)}IF(A_l>0){l(A_l)A_dim({f+},A_mm)}}; FUNCTION A_Gbdim(A_l,A_mm){IF(A_l==0){A_dim({g-},A_mm)}IF(A_l>0){l(A_l)A_dim({g-},A_mm)}}; FUNCTION A_Gdim (A_l,A_mm){IF(A_l==0){A_dim({g },A_mm)}IF(A_l>0){l(A_l)A_dim({g },A_mm)}}; FUNCTION A_Gpdim(A_l,A_mm){IF(A_l==0){A_dim({g+},A_mm)}IF(A_l>0){l(A_l)A_dim({g+},A_mm)}}; FUNCTION A_Abdim(A_l,A_mm){IF(A_l==0){A_dim({a-},A_mm)}IF(A_l>0){l(A_l)A_dim({a-},A_mm)}}; FUNCTION A_Adim (A_l,A_mm){IF(A_l==0){A_dim({a },A_mm)}IF(A_l>0){l(A_l)A_dim({a },A_mm)}}; FUNCTION A_Apdim(A_l,A_mm){IF(A_l==0){A_dim({a+},A_mm)}IF(A_l>0){l(A_l)A_dim({a+},A_mm)}}; FUNCTION A_Bbdim(A_l,A_mm){IF(A_l==0){A_dim({b-},A_mm)}IF(A_l>0){l(A_l)A_dim({b-},A_mm)}}; FUNCTION A_Bdim (A_l,A_mm){IF(A_l==0){A_dim({b },A_mm)}IF(A_l>0){l(A_l)A_dim({b },A_mm)}}; FUNCTION A_Cm7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({c },A_mm)}IF(A_l>0){l(A_l)A_m7b5({c },A_mm)}}; FUNCTION A_Cpm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({c+},A_mm)}IF(A_l>0){l(A_l)A_m7b5({c;},A_mm)}}; FUNCTION A_Dbm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({d-},A_mm)}IF(A_l>0){l(A_l)A_m7b5({d-},A_mm)}}; FUNCTION A_Dm7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({d },A_mm)}IF(A_l>0){l(A_l)A_m7b5({d },A_mm)}}; FUNCTION A_Dpm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({d+},A_mm)}IF(A_l>0){l(A_l)A_m7b5({d+},A_mm)}}; FUNCTION A_Ebm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({e-},A_mm)}IF(A_l>0){l(A_l)A_m7b5({e-},A_mm)}}; FUNCTION A_Em7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({e },A_mm)}IF(A_l>0){l(A_l)A_m7b5({e },A_mm)}}; FUNCTION A_Fm7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({f },A_mm)}IF(A_l>0){l(A_l)A_m7b5({f },A_mm)}}; FUNCTION A_Fpm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({f+},A_mm)}IF(A_l>0){l(A_l)A_m7b5({f+},A_mm)}}; FUNCTION A_Gbm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({g-},A_mm)}IF(A_l>0){l(A_l)A_m7b5({g-},A_mm)}}; FUNCTION A_Gm7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({g },A_mm)}IF(A_l>0){l(A_l)A_m7b5({g },A_mm)}}; FUNCTION A_Gpm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({g+},A_mm)}IF(A_l>0){l(A_l)A_m7b5({g+},A_mm)}}; FUNCTION A_Abm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({a-},A_mm)}IF(A_l>0){l(A_l)A_m7b5({a-},A_mm)}}; FUNCTION A_Am7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({a },A_mm)}IF(A_l>0){l(A_l)A_m7b5({a },A_mm)}}; FUNCTION A_Apm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({a+},A_mm)}IF(A_l>0){l(A_l)A_m7b5({a+},A_mm)}}; FUNCTION A_Bbm7b5(A_l,A_mm){IF(A_l==0){A_m7b5({b-},A_mm)}IF(A_l>0){l(A_l)A_m7b5({b-},A_mm)}}; FUNCTION A_Bm7b5 (A_l,A_mm){IF(A_l==0){A_m7b5({b },A_mm)}IF(A_l>0){l(A_l)A_m7b5({b },A_mm)}}; FUNCTION A_Caug (A_l,A_mm){IF(A_l==0){A_aug({c },A_mm)}IF(A_l>0){l(A_l)A_aug({c },A_mm)}}; FUNCTION A_Cpaug(A_l,A_mm){IF(A_l==0){A_aug({c+},A_mm)}IF(A_l>0){l(A_l)A_aug({c;},A_mm)}}; FUNCTION A_Dbaug(A_l,A_mm){IF(A_l==0){A_aug({d-},A_mm)}IF(A_l>0){l(A_l)A_aug({d-},A_mm)}}; FUNCTION A_Daug (A_l,A_mm){IF(A_l==0){A_aug({d },A_mm)}IF(A_l>0){l(A_l)A_aug({d },A_mm)}}; FUNCTION A_Dpaug(A_l,A_mm){IF(A_l==0){A_aug({d+},A_mm)}IF(A_l>0){l(A_l)A_aug({d+},A_mm)}}; FUNCTION A_Ebaug(A_l,A_mm){IF(A_l==0){A_aug({e-},A_mm)}IF(A_l>0){l(A_l)A_aug({e-},A_mm)}}; FUNCTION A_Eaug (A_l,A_mm){IF(A_l==0){A_aug({e },A_mm)}IF(A_l>0){l(A_l)A_aug({e },A_mm)}}; FUNCTION A_Faug (A_l,A_mm){IF(A_l==0){A_aug({f },A_mm)}IF(A_l>0){l(A_l)A_aug({f },A_mm)}}; FUNCTION A_Fpaug(A_l,A_mm){IF(A_l==0){A_aug({f+},A_mm)}IF(A_l>0){l(A_l)A_aug({f+},A_mm)}}; FUNCTION A_Gbaug(A_l,A_mm){IF(A_l==0){A_aug({g-},A_mm)}IF(A_l>0){l(A_l)A_aug({g-},A_mm)}}; FUNCTION A_Gaug (A_l,A_mm){IF(A_l==0){A_aug({g },A_mm)}IF(A_l>0){l(A_l)A_aug({g },A_mm)}}; FUNCTION A_Gpaug(A_l,A_mm){IF(A_l==0){A_aug({g+},A_mm)}IF(A_l>0){l(A_l)A_aug({g+},A_mm)}}; FUNCTION A_Abaug(A_l,A_mm){IF(A_l==0){A_aug({a-},A_mm)}IF(A_l>0){l(A_l)A_aug({a-},A_mm)}}; FUNCTION A_Aaug (A_l,A_mm){IF(A_l==0){A_aug({a },A_mm)}IF(A_l>0){l(A_l)A_aug({a },A_mm)}}; FUNCTION A_Apaug(A_l,A_mm){IF(A_l==0){A_aug({a+},A_mm)}IF(A_l>0){l(A_l)A_aug({a+},A_mm)}}; FUNCTION A_Bbaug(A_l,A_mm){IF(A_l==0){A_aug({b-},A_mm)}IF(A_l>0){l(A_l)A_aug({b-},A_mm)}}; FUNCTION A_Baug (A_l,A_mm){IF(A_l==0){A_aug({b },A_mm)}IF(A_l>0){l(A_l)A_aug({b },A_mm)}}; FUNCTION A_Csus4 (A_l,A_mm){IF(A_l==0){A_sus4({c },A_mm)}IF(A_l>0){l(A_l)A_sus4({c },A_mm)}}; FUNCTION A_Cpsus4(A_l,A_mm){IF(A_l==0){A_sus4({c+},A_mm)}IF(A_l>0){l(A_l)A_sus4({c;},A_mm)}}; FUNCTION A_Dbsus4(A_l,A_mm){IF(A_l==0){A_sus4({d-},A_mm)}IF(A_l>0){l(A_l)A_sus4({d-},A_mm)}}; FUNCTION A_Dsus4 (A_l,A_mm){IF(A_l==0){A_sus4({d },A_mm)}IF(A_l>0){l(A_l)A_sus4({d },A_mm)}}; FUNCTION A_Dpsus4(A_l,A_mm){IF(A_l==0){A_sus4({d+},A_mm)}IF(A_l>0){l(A_l)A_sus4({d+},A_mm)}}; FUNCTION A_Ebsus4(A_l,A_mm){IF(A_l==0){A_sus4({e-},A_mm)}IF(A_l>0){l(A_l)A_sus4({e-},A_mm)}}; FUNCTION A_Esus4 (A_l,A_mm){IF(A_l==0){A_sus4({e },A_mm)}IF(A_l>0){l(A_l)A_sus4({e },A_mm)}}; FUNCTION A_Fsus4 (A_l,A_mm){IF(A_l==0){A_sus4({f },A_mm)}IF(A_l>0){l(A_l)A_sus4({f },A_mm)}}; FUNCTION A_Fpsus4(A_l,A_mm){IF(A_l==0){A_sus4({f+},A_mm)}IF(A_l>0){l(A_l)A_sus4({f+},A_mm)}}; FUNCTION A_Gbsus4(A_l,A_mm){IF(A_l==0){A_sus4({g-},A_mm)}IF(A_l>0){l(A_l)A_sus4({g-},A_mm)}}; FUNCTION A_Gsus4 (A_l,A_mm){IF(A_l==0){A_sus4({g },A_mm)}IF(A_l>0){l(A_l)A_sus4({g },A_mm)}}; FUNCTION A_Gpsus4(A_l,A_mm){IF(A_l==0){A_sus4({g+},A_mm)}IF(A_l>0){l(A_l)A_sus4({g+},A_mm)}}; FUNCTION A_Absus4(A_l,A_mm){IF(A_l==0){A_sus4({a-},A_mm)}IF(A_l>0){l(A_l)A_sus4({a-},A_mm)}}; FUNCTION A_Asus4 (A_l,A_mm){IF(A_l==0){A_sus4({a },A_mm)}IF(A_l>0){l(A_l)A_sus4({a },A_mm)}}; FUNCTION A_Apsus4(A_l,A_mm){IF(A_l==0){A_sus4({a+},A_mm)}IF(A_l>0){l(A_l)A_sus4({a+},A_mm)}}; FUNCTION A_Bbsus4(A_l,A_mm){IF(A_l==0){A_sus4({b-},A_mm)}IF(A_l>0){l(A_l)A_sus4({b-},A_mm)}}; FUNCTION A_Bsus4 (A_l,A_mm){IF(A_l==0){A_sus4({b },A_mm)}IF(A_l>0){l(A_l)A_sus4({b },A_mm)}}; FUNCTION A_C7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({c },A_mm)}IF(A_l>0){l(A_l)A_7sus4({c },A_mm)}}; FUNCTION A_Cp7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({c+},A_mm)}IF(A_l>0){l(A_l)A_7sus4({c;},A_mm)}}; FUNCTION A_Db7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({d-},A_mm)}IF(A_l>0){l(A_l)A_7sus4({d-},A_mm)}}; FUNCTION A_D7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({d },A_mm)}IF(A_l>0){l(A_l)A_7sus4({d },A_mm)}}; FUNCTION A_Dp7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({d+},A_mm)}IF(A_l>0){l(A_l)A_7sus4({d+},A_mm)}}; FUNCTION A_Eb7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({e-},A_mm)}IF(A_l>0){l(A_l)A_7sus4({e-},A_mm)}}; FUNCTION A_E7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({e },A_mm)}IF(A_l>0){l(A_l)A_7sus4({e },A_mm)}}; FUNCTION A_F7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({f },A_mm)}IF(A_l>0){l(A_l)A_7sus4({f },A_mm)}}; FUNCTION A_Fp7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({f+},A_mm)}IF(A_l>0){l(A_l)A_7sus4({f+},A_mm)}}; FUNCTION A_Gb7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({g-},A_mm)}IF(A_l>0){l(A_l)A_7sus4({g-},A_mm)}}; FUNCTION A_G7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({g },A_mm)}IF(A_l>0){l(A_l)A_7sus4({g },A_mm)}}; FUNCTION A_Gp7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({g+},A_mm)}IF(A_l>0){l(A_l)A_7sus4({g+},A_mm)}}; FUNCTION A_Ab7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({a-},A_mm)}IF(A_l>0){l(A_l)A_7sus4({a-},A_mm)}}; FUNCTION A_A7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({a },A_mm)}IF(A_l>0){l(A_l)A_7sus4({a },A_mm)}}; FUNCTION A_Ap7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({a+},A_mm)}IF(A_l>0){l(A_l)A_7sus4({a+},A_mm)}}; FUNCTION A_Bb7sus4(A_l,A_mm){IF(A_l==0){A_7sus4({b-},A_mm)}IF(A_l>0){l(A_l)A_7sus4({b-},A_mm)}}; FUNCTION A_B7sus4 (A_l,A_mm){IF(A_l==0){A_7sus4({b },A_mm)}IF(A_l>0){l(A_l)A_7sus4({b },A_mm)}}; FUNCTION A_C6 (A_l,A_mm){IF(A_l==0){A_6({c },A_mm)}IF(A_l>0){l(A_l)A_6({c },A_mm)}}; FUNCTION A_Cp6(A_l,A_mm){IF(A_l==0){A_6({c+},A_mm)}IF(A_l>0){l(A_l)A_6({c;},A_mm)}}; FUNCTION A_Db6(A_l,A_mm){IF(A_l==0){A_6({d-},A_mm)}IF(A_l>0){l(A_l)A_6({d-},A_mm)}}; FUNCTION A_D6 (A_l,A_mm){IF(A_l==0){A_6({d },A_mm)}IF(A_l>0){l(A_l)A_6({d },A_mm)}}; FUNCTION A_Dp6(A_l,A_mm){IF(A_l==0){A_6({d+},A_mm)}IF(A_l>0){l(A_l)A_6({d+},A_mm)}}; FUNCTION A_Eb6(A_l,A_mm){IF(A_l==0){A_6({e-},A_mm)}IF(A_l>0){l(A_l)A_6({e-},A_mm)}}; FUNCTION A_E6 (A_l,A_mm){IF(A_l==0){A_6({e },A_mm)}IF(A_l>0){l(A_l)A_6({e },A_mm)}}; FUNCTION A_F6 (A_l,A_mm){IF(A_l==0){A_6({f },A_mm)}IF(A_l>0){l(A_l)A_6({f },A_mm)}}; FUNCTION A_Fp6(A_l,A_mm){IF(A_l==0){A_6({f+},A_mm)}IF(A_l>0){l(A_l)A_6({f+},A_mm)}}; FUNCTION A_Gb6(A_l,A_mm){IF(A_l==0){A_6({g-},A_mm)}IF(A_l>0){l(A_l)A_6({g-},A_mm)}}; FUNCTION A_G6 (A_l,A_mm){IF(A_l==0){A_6({g },A_mm)}IF(A_l>0){l(A_l)A_6({g },A_mm)}}; FUNCTION A_Gp6(A_l,A_mm){IF(A_l==0){A_6({g+},A_mm)}IF(A_l>0){l(A_l)A_6({g+},A_mm)}}; FUNCTION A_Ab6(A_l,A_mm){IF(A_l==0){A_6({a-},A_mm)}IF(A_l>0){l(A_l)A_6({a-},A_mm)}}; FUNCTION A_A6 (A_l,A_mm){IF(A_l==0){A_6({a },A_mm)}IF(A_l>0){l(A_l)A_6({a },A_mm)}}; FUNCTION A_Ap6(A_l,A_mm){IF(A_l==0){A_6({a+},A_mm)}IF(A_l>0){l(A_l)A_6({a+},A_mm)}}; FUNCTION A_Bb6(A_l,A_mm){IF(A_l==0){A_6({b-},A_mm)}IF(A_l>0){l(A_l)A_6({b-},A_mm)}}; FUNCTION A_B6 (A_l,A_mm){IF(A_l==0){A_6({b },A_mm)}IF(A_l>0){l(A_l)A_6({b },A_mm)}}; FUNCTION A_Cadd9 (A_l,A_mm){IF(A_l==0){A_add9({c },A_mm)}IF(A_l>0){l(A_l)A_add9({c },A_mm)}}; FUNCTION A_Cpadd9(A_l,A_mm){IF(A_l==0){A_add9({c+},A_mm)}IF(A_l>0){l(A_l)A_add9({c;},A_mm)}}; FUNCTION A_Dbadd9(A_l,A_mm){IF(A_l==0){A_add9({d-},A_mm)}IF(A_l>0){l(A_l)A_add9({d-},A_mm)}}; FUNCTION A_Dadd9 (A_l,A_mm){IF(A_l==0){A_add9({d },A_mm)}IF(A_l>0){l(A_l)A_add9({d },A_mm)}}; FUNCTION A_Dpadd9(A_l,A_mm){IF(A_l==0){A_add9({d+},A_mm)}IF(A_l>0){l(A_l)A_add9({d+},A_mm)}}; FUNCTION A_Ebadd9(A_l,A_mm){IF(A_l==0){A_add9({e-},A_mm)}IF(A_l>0){l(A_l)A_add9({e-},A_mm)}}; FUNCTION A_Eadd9 (A_l,A_mm){IF(A_l==0){A_add9({e },A_mm)}IF(A_l>0){l(A_l)A_add9({e },A_mm)}}; FUNCTION A_Fadd9 (A_l,A_mm){IF(A_l==0){A_add9({f },A_mm)}IF(A_l>0){l(A_l)A_add9({f },A_mm)}}; FUNCTION A_Fpadd9(A_l,A_mm){IF(A_l==0){A_add9({f+},A_mm)}IF(A_l>0){l(A_l)A_add9({f+},A_mm)}}; FUNCTION A_Gbadd9(A_l,A_mm){IF(A_l==0){A_add9({g-},A_mm)}IF(A_l>0){l(A_l)A_add9({g-},A_mm)}}; FUNCTION A_Gadd9 (A_l,A_mm){IF(A_l==0){A_add9({g },A_mm)}IF(A_l>0){l(A_l)A_add9({g },A_mm)}}; FUNCTION A_Gpadd9(A_l,A_mm){IF(A_l==0){A_add9({g+},A_mm)}IF(A_l>0){l(A_l)A_add9({g+},A_mm)}}; FUNCTION A_Abadd9(A_l,A_mm){IF(A_l==0){A_add9({a-},A_mm)}IF(A_l>0){l(A_l)A_add9({a-},A_mm)}}; FUNCTION A_Aadd9 (A_l,A_mm){IF(A_l==0){A_add9({a },A_mm)}IF(A_l>0){l(A_l)A_add9({a },A_mm)}}; FUNCTION A_Apadd9(A_l,A_mm){IF(A_l==0){A_add9({a+},A_mm)}IF(A_l>0){l(A_l)A_add9({a+},A_mm)}}; FUNCTION A_Bbadd9(A_l,A_mm){IF(A_l==0){A_add9({b-},A_mm)}IF(A_l>0){l(A_l)A_add9({b-},A_mm)}}; FUNCTION A_Badd9 (A_l,A_mm){IF(A_l==0){A_maj({b },A_mm)}IF(A_l>0){l(A_l)A_maj({b },A_mm)}}; FUNCTION A_Cm6 (A_l,A_mm){IF(A_l==0){A_m6({c },A_mm)}IF(A_l>0){l(A_l)A_m6({c },A_mm)}}; FUNCTION A_Cpm6(A_l,A_mm){IF(A_l==0){A_m6({c+},A_mm)}IF(A_l>0){l(A_l)A_m6({c;},A_mm)}}; FUNCTION A_Dbm6(A_l,A_mm){IF(A_l==0){A_m6({d-},A_mm)}IF(A_l>0){l(A_l)A_m6({d-},A_mm)}}; FUNCTION A_Dm6 (A_l,A_mm){IF(A_l==0){A_m6({d },A_mm)}IF(A_l>0){l(A_l)A_m6({d },A_mm)}}; FUNCTION A_Dpm6(A_l,A_mm){IF(A_l==0){A_m6({d+},A_mm)}IF(A_l>0){l(A_l)A_m6({d+},A_mm)}}; FUNCTION A_Ebm6(A_l,A_mm){IF(A_l==0){A_m6({e-},A_mm)}IF(A_l>0){l(A_l)A_m6({e-},A_mm)}}; FUNCTION A_Em6 (A_l,A_mm){IF(A_l==0){A_m6({e },A_mm)}IF(A_l>0){l(A_l)A_m6({e },A_mm)}}; FUNCTION A_Fm6 (A_l,A_mm){IF(A_l==0){A_m6({f },A_mm)}IF(A_l>0){l(A_l)A_m6({f },A_mm)}}; FUNCTION A_Fpm6(A_l,A_mm){IF(A_l==0){A_m6({f+},A_mm)}IF(A_l>0){l(A_l)A_m6({f+},A_mm)}}; FUNCTION A_Gbm6(A_l,A_mm){IF(A_l==0){A_m6({g-},A_mm)}IF(A_l>0){l(A_l)A_m6({g-},A_mm)}}; FUNCTION A_Gm6 (A_l,A_mm){IF(A_l==0){A_m6({g },A_mm)}IF(A_l>0){l(A_l)A_m6({g },A_mm)}}; FUNCTION A_Gpm6(A_l,A_mm){IF(A_l==0){A_m6({g+},A_mm)}IF(A_l>0){l(A_l)A_m6({g+},A_mm)}}; FUNCTION A_Abm6(A_l,A_mm){IF(A_l==0){A_m6({a-},A_mm)}IF(A_l>0){l(A_l)A_m6({a-},A_mm)}}; FUNCTION A_Am6 (A_l,A_mm){IF(A_l==0){A_m6({a },A_mm)}IF(A_l>0){l(A_l)A_m6({a },A_mm)}}; FUNCTION A_Apm6(A_l,A_mm){IF(A_l==0){A_m6({a+},A_mm)}IF(A_l>0){l(A_l)A_m6({a+},A_mm)}}; FUNCTION A_Bbm6(A_l,A_mm){IF(A_l==0){A_m6({b-},A_mm)}IF(A_l>0){l(A_l)A_m6({b-},A_mm)}}; FUNCTION A_Bm6 (A_l,A_mm){IF(A_l==0){A_m6({b },A_mm)}IF(A_l>0){l(A_l)A_m6({b },A_mm)}}; //------------------------------------------------------------------------------ Include(gs.h);TimeSignature=4,4;Tempo=150;System.MeasureShift = 1;ResetGM; r2 ResetGS; r2;TrackSync; Track 1 l2 q100 o4 @2 V.WE(110,90,!2) P(80) REV.WE(80,127,!2.) CHO.W(0,50,!1) Key(ALL_KEY) STR TR_1={[A_C][A_G][A_Am][A_Em][A_F][A_G][A_Csus4]A_C(1)[A_C(2)][A_G][A_Am][A_Em][A_F][A_C][A_F][A_G][A_C][A_G][A_Am][A_Em][A_F][A_G][A_C] A_C(1)[A_C(2)][A_G][A_Am][A_Em][A_F][A_C][A_F] A_G A_G7 [A_C][A_E7][A_Am][A_Em][A_F][A_G][A_C] A_C r8 A_E7(4) A_E7(8);[4A_Am(4)][4A_G][4A_F][4A_C][4A_Am][4A_G][8A_F][4A_G7sus4] A_G7(1) [A_F(2)][A_G][A_Am][A_Am7][A_Dm7][A_G][A_C] A_C r8 A_E7(4) A_E7(8)[A_F(2)][A_G][A_Am][A_Am7][A_F][A_G][A_Csus4] A_C(1);Key(ALL_KEY+1) [A_F(2)][A_G][A_Am][A_Am7][A_Dm7][A_G][A_C] A_C r8 A_E7(4) A_E7(8)[A_F(2)][A_G][A_Am][A_Am7][A_F][A_G][A_Csus4] A_C(1);Key(0)};Sub{TR_1} l2 o3 q50;Key(ALL_KEY);r4ccggaaeeffggff4e1r4ccggaaeeffccffggccggaaeeffggcc4c1r4ccggaaeeffccffgfccg+g+aaeeffggcc4c2 r8 g4.l4r8aaaaggggffffcccc aaaagggg[ffff]`c`c`c`c8 b1;l2;r4ffggaaggddggccc4.g4.r4ffggaaggffggff4e1Key(ALL_KEY+1);r4ffggaaggddggccc4.g4.r4ffggaaggffggff4e1;Key(0); Track 2 l1 q100 o4 @26,8 V(95) P.W(50,78,!1) Key(ALL_KEY) REV.W(0,127,!4.) M.W(10,20,!2) CHO.W(50,100,!2) [8r1][16r1];STROKE_TIMING=5;C_ G Am Em F C_ F l2. G STROKE_TIMING=3;l4 G7(1);l2;C_ l4;C_ l8;C_ C_(1) l2;E7 l4;E7 l8;E7 E7(1) l2;Am l4;Am l8;Am Am(1) l2;Em l4;Em l8;Em Em(1) l2;F l4;F l8;F F(1) l2;G l4;G l8;G G(1) l2;C_ l4;C_ l8C_ C_(1) l2;C_ r8 l4;E7 l8;E7(1);l4;[3Am] l8;Am Am(1) l4;[3G] l8;G G(1) l4;[3F] l8;F F(1) l4;[3C_] l8;C_ C_(1) l4;[3Am] l8;Am Am(1) l4;[3G] l8;G G(1) l4;[3F] l8;F F(1) F F(1) l4;F F l8;F F(1) l4;[3G7sus4] l8;G7sus4 G7sus4(1);STROKE_TIMING=5;l1;G7_;STROKE_TIMING=3; l4;[3FM7] l8;FM7 FM7(1) l4;[3G6_] l8;G6_ G6_(1) l4;[3Am] l8;Am Am(1) l4;[3Am7] l8;Am7 Am7(1);l4;[3Dm7] l8;Dm7 Dm7(1) l4;[3G] l8;G G(1) l4;[3C_] l8;C_ C_(1) l2;C_ r8 l4;E7 l8;E7(1); l4;[3FM7] l8;FM7 FM7(1) l4;[3G6_] l8;G6_ G6_(1) l4;[3Am] l8;Am Am(1) l4;[3Am7] l8;Am7 Am7(1);l4;[3F] l8;F F(1) l4;[3G] l8;G G(1) l4;[3Csus4] l8;Csus4 Csus4(1) l1;C;Key(ALL_KEY+1) l4;[3FM7] l8;FM7 FM7(1) l4;[3G6_] l8;G6_ G6_(1) l4;[3Am] l8;Am Am(1) l4;[3Am7] l8;Am7 Am7(1);l4;[3Dm7] l8;Dm7 Dm7(1) l4;[3G] l8;G G(1) l4;[3C_] l8;C_ C_(1) l2;C_ r8 l4;E7 l8;E7(1) l4;[3FM7] l8;FM7 FM7(1) l4;[3G6_] l8;G6_ G6_(1) l4;[3Am] l8;Am Am(1) l4;[3Am7] l8;Am7 Am7(1);l4;[3F] l8;F F(1) l4;[3G] l8;G G(1) l4;[3Csus4] l8;Csus4 Csus4(1) l1;C STROKE_TIMING=2;TempoChange(100,90,!1^1)q200;l4;[3F] l8;F F(1) l4;[3G] l8;G G(1);Tempo=60;STROKE_TIMING=9;V(127);y64,127 q500;C;y64,0;Key(0) Track 3 l4 q100 @41 o5 V.WE(100,105,!4,105,110,!2.) M.W(0,50,!2.,50,127,!4) REV.W(0,127,!1) CHO.W(0,40,!2,40,127,!2) Key(ALL_KEY) v120 [8r1]ggg2 gfed cdee4+2 rd8e8 f2.g8f8 e2.d f2gf e2&d.r8ggg2 gfed ce2.+2 rd8e8 f2.g e2.d c1 r1ggg2 gfed cde2.+4 rd8e8 f2.g8f8 e2.d f2gf e2&d.r8ggg2 g+fed cde2. r2d8e8 f8f2r8e8e8 d.c8e.d8 c1 r2 r8 l8 q90 o5;"b4"b c2.cc "b2."bc c2.cd e2.cde2+8def g2d2 `c1g1 TempoChange(150,80,!1+2.) `c1b2. Tempo(140)l8 q90 o6;de f2.fe d2.dd e1+2 r4ee ff2 red d2 dcde dcc2.r2 r8d4e8 f2r4f4 g4.r8g4g4 a4a2+2+4 r4g8g8 a2[3a6] b2 b8b8a8b8 `c1+2+4 l8 q90 o6;Key(ALL_KEY+1);de f2.fe d2.dd e1+2 r4ee ff2 red d2 dcde dcc2.r2 r8d4e8 f2r4f4 g4.r8g4g4 a4a2+2+4 r4g8g8 a2[3a6] b2 b8b8a8b8 `c1+2+4g8g8 a2[3a6] b2 b8b8a8b8 q100 v.T(100,90,!2,90,127,!2)`c1;Key(0); Track 4;l8 q90 @43 o4 Key(ALL_KEY);EP(110) V.WE(100,105,!4,105,110,!2.) M.W(0,70,!2,70,127,!2) REV.W(80,127,!1) CHO.W(0,40,!2,40,127,!2) v120;Time(40:1:0);r2rg4g a2.aa g2.ga a2.ab `c2.ab`c2+8b`c`d `e2b2 `g1`e1 `g1`f2.;l8 q90 o6;"bc d2.dd "b2."b"b "a1+2 r4cc dd2 r1 r1 r1 "b4c d2r4d4 d4.r8d4d4 e4e2+2+4 r4dd e2e6g6a6 g2 ggag g1+2+4;Key(ALL_KEY+1) l8 q90 o6;"bc d2.dd "b2."b"b "a1+2 r4cc dd2 r1 r1 r1 "b4c d2r4d4 d4.r8d4d4 e4e2+2+4 r4dd e2e6g6a6 g2 ggag g1+2+4;Key(0) Track 5 @23,1 Key(ALL_KEY); V(127) v115 CHO.W(20,100,!1) REV.WE(30,127,!1);STR Tq1={q100};STR Tq2={q120}; EP.WR(90,100,!4.,100,120,!2) STR BEND={p%.T(0,-8192,!16,-8192,0,!16)};l4;Tq1;c2dTq2;e;Tq1;g1p%.T(0,-8192,!16,-8192,0,!16)a2.aTq1;g2.g;Tq1;p%.T(0,-8192,!16,-8192,0,!16)f1;Tq1;f'eg'2d;Tq1;EP.T(127,120,!1,120,100,!2.)'"gc'1^2.;Key(0); Track 6 @9 Time(25:1:0); REV(127) CHO(50) M(20) P(120);Key(ALL_KEY);STR TR_v={EP.T(127,50,!2.)}; FUNCTION T6v(STR TR_v_STR){o7;TR_v;TR_v_STR;o6;TR_v;TR_v_STR};q150;l2;T6v{c};T6v{"g};T6v{"a};T6v{e};T6v{f};T6v{c};T6v{f};TR_v;g;TR_v;f;T6v{c};T6v{a-};T6v{a};T6v{e};T6v{f};T6v{g};T6v{c};TR_v;'`cc'1;Key(0); Track 7 @12 V(127) P(120) Time(47:1:0);Key(ALL_KEY);REV.WE(100,127,!1) CHO(20);STR TR_v7={EP.T(127,90,!2.)};o6;q120;l1;v127;TR_v7;y64,127;`c;y64,0;TR_v7;y64,127;g;y64,0;TR_v7;y64,127;`c;y64,0;EP(127);q100;y64,127;b;Key(0); Track 8 @35 V(127) EP.W(127,100,!2) P.W(10,20,!1);Time(25:1:0) Key(ALL_KEY)o2;q95;M.T(50,120,!1);l2.;v127;`cc4`gg4`aa4`ee4`ff4`cc4`ff4`gg4`cc4`a-a-4`aa4`ee4`ff4`gg4`cc4`c1;o3;l4.;q80;aa"a4gg"g4ff"f4cc"c4aa"a4gg"g4[ff"f4]gg"g4 g1; l4;v110;[3f]f8&&g8[3g]g8&&a8[3a]a8&&g8[3g]g8&&f8[3f]f8&&g8[3g]g8&&c8[4c]c1;[3f]f8&&g8[3g]g8&&a8[3a]a8&&g8[3g]g8&&f8[3f]f8&&g8[3g]g8&&f8[3f]f8&&e8;c1;Key(ALL_KEY+1) [3f]f8&&g8[3g]g8&&a8[3a]a8&&g8[3g]g8&&f8[3f]f8&&g8[3g]g8&&c8[4c]c1;[3f]f8&&g8[3g]g8&&a8[3a]a8&&g8[3g]g8&&f8[3f]f8&&g8[3g]g8&&f8[3f]f8&&e8;c1;Key(0); Track 9 @49,8 q100 o5 V.WE(90,100,!1) REV.W(40,100,!1) M.WE(20,90,!1);Key(ALL_KEY);l1;A_C;A_G;A_Am;A_Em;A_F;A_G;A_Csus4;q70;A_C;q100;A_C;A_G;A_Am;A_Em;A_F;A_C;A_F;A_G; A_C;A_G;A_Am;A_Em;A_F;A_G;A_C;q70;A_C;q100;A_C;A_G;A_Am;A_Em;A_F;A_C;A_F;A_G(2);A_G7;A_C(1);A_E7;A_Am;A_Em;A_F;A_G;A_C;A_C(2);r8;A_E7(4);r8;A_Am(1);A_G;A_F;A_C; A_Am;A_G;[A_F]A_G7sus4;A_G7;A_F;A_G;A_Am;A_Am7;A_Dm7;A_G;A_C;A_C(2);r8;A_E7(4);r8;A_F(1);A_G;A_Am;A_Am7;A_F;A_G;A_Csus4;A_C;Key(ALL_KEY+1);A_F;A_G;A_Am;A_Am7;A_Dm7;A_G;A_C;A_C(2);r8;A_E7(4);r8;A_F(1);A_G;A_Am;A_Am7;A_F;A_G;A_Csus4;A_C;Key(0); Track 10 $b{n36,};$s{n40,};$h{n42,};$m{n46,};$c{n49,};$C{n57,};$L{n43,};$M{n47,};$H{n50,};Key(0);@1 REV(127) M(90);Time(25:1:0); STR PART1_1={Rythm{l4;[8hh:hr]r2};STR PART2_1={Rythm{l4;[8sr:sr]l12;HHMMLL}};STR PART3_1={Rythm{l4;[8rr:rb]r2}};STR PART4_1={Rythm{l4;[8rr:rm]l12;[5r]c}}}; STR PART1_2={Rythm{l4;[7hhhr]r2r8hh8}};STR PART2_2={Rythm{l4;[7srss]r1}};STR PART3_2={Rythm{l4;[7rrrr8b8]b2r8bb8}};STR PART4_2={Rythm{l4;[7rrrm]c2r2}}; STR PART1_3={Rythm{l4;[8hhhr][r1]}};STR PART2_3={Rythm{l8;[8s4rs4rsr]v120;HHHMMMLL;r2.v100;ML}};STR PART3_3={Rythm{l8;[8r4br4brb][r1]}};STR PART4_3={Rythm{l4;[8rrrm]r1v120;'cC'2.r4}}; STR PART1_4={Rythm{l4;[7hhrh]r2r8hh8}};STR PART2_4={Rythm{l4;[7srss]r1}};STR PART3_4={Rythm{l4;[7rrrr8b8]b2r8bb8}};STR PART4_4={Rythm{l4;['cC'rmr[rrmr]:rrmr]c1}}; STR PART1_5={Rythm{l4;[7hhrh]r1}};STR PART2_5={Rythm{l4;[7srss]r2.M8L8}};STR PART3_5={Rythm{l4;[7rrrr8b8]r1}};STR PART4_5={Rythm{l4;['cC'rmr[rrmr]:rrmr]c1}};STR PART2_6={Rythm{l4;[7srss]}}; Sub{v107;q100;PART1_1;PART1_2;PART1_3;[PART1_4;PART1_5;]};Sub{v107;q120;PART4_1;PART4_2;PART4_3;v100;[PART4_4;PART4_5;]};Sub{v100;q90;PART2_1;PART2_2;PART2_3;v100;[PART2_4:PART2_5;]PART2_6};v100;PART3_1;PART3_2;PART3_3;[PART3_4;PART3_5;] Track 11 @19;Time(50:1:0) V.T(90,100,!1) V.WE(100,105,!4,105,110,!2.) v120 EP(120)M.WE(0,20,!2.,20,127,!4) Key(ALL_KEY) REV.W(0,20,!2.,20,100,!4) P(55);l8 q90 o5; r2.de f2.fe d2.dd e1+2 r4ee ff2 red d2 dcde dcc2. r2 r8 d4e8 f2r4f4 g4.r8g4g4 a4a2+2+4 r4g8g8 a2[3a6] b2 b8b8a8b8 `c1+2+4;Key(ALL_KEY+1);de f2.fe d2.dd e1+2 r4ee ff2 red d2 dcde dcc2. r2 r8 d4e8 f2r4f4 g4.r8g4g4 a4a2+2+4 r4g8g8 a2[3a6] b2 b8b8a8b8 `c1+2+4; この曲は自作のオリジナル曲であるか、または、作曲者の死後50年以上経過した著作権に問題がない曲であることを確認しましたか? いいえ。よく分かりません はい。著作権に問題ありません (←選択)