/*
   [FC] MACROSS - TITLE - (C)NAMCO 1985
   original MDX by Tara-Cho
   FlMML MML    by LinearDrive [2011-02-20] [FlMML rev.38704]
*/

#OCTAVE REVERSE
#VELOCITY REVERSE

/* ＦＣ三角波定義 */
#WAV10 0,89ABCDEFFEDCBA987654321001234567

/* シーケンサ初期化用 */
$INITSQ = r8 q16 @q0 x0 @x127 @v0 ns0 @d0 @l0,0,0,0,0,0;


/* ＭＭＬ定義 (ch.A) */
$A0 = $INITSQ @5@w2  @e1,0, 128,0, 0  o6 v9
;
$A1 = 
   g24a24a+24>c24<a+24a24g24a24f24g24a24a+24<
   a4>a16f+16a16>d16f+16d16<a16f+16 
   a4.g16f+16g2
   g4.f16e16f4g4
   a16a16r4a16a16r4c+2.
;


/* ＭＭＬ定義 (ch.B) */
$B0 = $INITSQ @5@w2  @e1,0, 128,0, 0  o6 v7
;
$B1 = 
   d+24f24g24a24g24f24d+24f24d24d+24f24g24<
   f+4>d8.f+8.a8
   f+4.e16d16e4b24>c24d24e24d24c24<
   e4.d16c16d4d4
   d16d16r4d16d16r4<a2.
;


/* ＭＭＬ定義 (ch.C) */
$C0 = $INITSQ @10-0 @e1,0,0,127,0 o4 v15
;
$C1 = 
   r2 q12 d4 q6 a8.>d8. q8 f+8< q12 
   /:2  /:3 c16>c16< :/     g16e16  :/ < 
   /:2  /:3 a+16>a+16< :/ > f16d16< :/ > 
   a16a16r4<a16a16r4>a2
;


/* ＭＭＬ定義 (ch.D) */
$NZ1 = @e1,0,  2,127,0,0, 0  ns2 c16;
$NZ2 = @e1,0,  2,127,2,0, 0  ns6 c16;
$NZ3 = @e1,0,128,  0,     0  ns2 c2.;
$D0 = $INITSQ @7 o0 v8
;
$D1 = 
   r1r4 
   /:4 $NZ1$NZ1$NZ1$NZ1 $NZ2 $NZ1$NZ1$NZ1 :/ 
   /:2 $NZ1$NZ1$NZ1$NZ1 $NZ1$NZ1 :/ 
   $NZ3
;


/* 演奏 */
t152
$A0 $A1;
$B0 $B1;
$C0 $C1;
$D0 $D1;


/*EOF*/