#TITLE 信長の野望・武将風雲録(OPN) / メイン・織田
#ARTIST Yoko Kanno
#CODING Mayu Hiraizumi (dic.nicovideo.jp/u/11448931)
#COMMENT JASRAC work code：- / MML coded: 2014/12/23 rev.1 / B minor


/* Ini ====================================================================== */

/* All part 1 */  $ALL1  = t87.53 ; /* (72time/49.356sec)*60sec %1=7.141ms */
/* All part 2 */  $ALL2  = x2     ; /* 96dB dynamic range */
/*  Tone part */  $ALLT  = ns0    ;
/*     Repeat */  $LOOP  = 24     ;

/* Volume @V0～127 (default=121) */
/* YM2203 FM_0  */  $FM0  = @V121 ;
/* YM2203 FM_1  */  $FM1  = @V121 ;
/* YM2203 FM_2  */  $FM2  = @V121 ;
/* YM2203 SSG_0 */  $SSG0 = @V121 ;


/* Data ===================================================================== */

/* FM */

#OPN@1 {
  2,  7,
 13,  6,  2,  8,  1, 25,  2,  2,  0,  0,
 15,  8,  0,  8,  1, 32,  1,  6,  2,  0,
 21,  7,  0,  8,  2, 42,  0,  2,  0,  0,
 18,  4,  0,  8,  2,  0,  1,  2,  1,  0,
 15 } /* TL+=23 */

#OPN@2 {
  4,  3,
 31, 14,  0, 15, 15, 33,  3, 11,  3,  0,
 30,  9,  7,  6,  1, 10,  3,  1,  0,  0,
 31, 16,  5,  0, 10, 23,  1,  7,  0,  0,
 30,  7,  4,  7,  1,  0,  3,  1,  3,  0,
 15 } /* TL+=32 */

#OPN@3 {
  2,  7,
 14, 10,  0,  5,  1, 26,  2,  1,  0,  0,
 25, 13,  3, 15, 15, 30,  1, 10,  2,  0,
 15, 11,  0,  5,  2, 54,  1,  1,  0,  0,
 18,  3,  0,  8,  2,  0,  1,  1,  1,  0,
 15 } /* TL+=23 */

#OPN@4 {
  4,  7,
 15,  0,  0,  2,  0, 30,  3,  1,  0,  0,
 13,  2,  0,  7,  3,  0,  0,  2,  0,  0,
 15,  0,  0,  2,  0, 31,  3,  1,  0,  0,
 12,  2,  0,  8,  3,  0,  0,  2,  0,  0,
 15 } /* TL+=32 */

$V17 = @X110 ; /* 127-23 +6 */
$V1B = @X106 ; /* 127-27 +6 */
$V20 = @X101 ; /* 127-32 +6 */
$V21 = @X100 ; /* 127-33 +6 */


/* SSG */

#WAV13 0,80 F2 F7 F9 FA FA F9 F8 F7 F6 F5 F4 F3 F2 F1 F0 EF EE EC EB EA E9 E8 E7 E6 E5 E4 E4 E3 E1 E0 E0 DF DE DD DD DC DB DB DA D9 D8 D8 D7 D6 D6 D5 D5 D4 D3 D3 D2 D1 D1 D0 D0 CF CF CE CE CD CD CC CB CB CA CA C9 C9 C9 C8 C8 C7 C7 C6 C6 C5 C5 C4 C4 C4 C3 C3 C2 C2 C1 C1 C1 C0 C0 C0 BF BF BE BE BE BD BD BC BC A3 0D 09 06 05 05 05 06 07 08 0A 0B 0C 0D 0E 0F 10 11 12 14 15 16 17 18 19 1A 1A 1B 1C 1D 1E 1F 20 21 21 22 23 23 24 25 25 26 27 28 29 29 2A 2A 2B 2B 2C 2D 2D 2E 2F 2F 30 30 31 31 32 32 33 33 34 35 35 35 36 36 37 37 38 38 38 39 3A 3A 3A 3B 3B 3C 3C 3C 3D 3D 3E 3E 3F 3F 3F 40 40 40 41 41 42 42 43 43 43

$W09 = @X106 ; /* 127-(15-9)x4-3 +6 */


/* OTHER */

$L0 = @L0,0;


/* FM_0 ===================================================================== */
/* ★ リリース（休符）部分でLFOを無効にした */

$LF1 = @L36,23,-0,78,99,0;

$ALL1 $ALL2 $ALLT $FM0 q16 l12 @14-1
/:$LOOP $V17 $LF1
 /:2 o3
  @Q2b6 <@Q1f+ @Q2f+4&f+6 @Q1g+ @Q9a8 @Q1g+24 f+ e4&ec+>a
  @Q2b6 <@Q1f+ @Q2f+4&f+6 @Q1b  @Q9a8 @Q1g+24 f+ @Q2e4&e6 @Q1f+
  @Q2g6 <@Q1d  @Q2d4 &d6  @Q1e  @Q9d8 @Q1c24 >b  @Q2a4&a6 @Q1b
  @Q2f+6 >@Q1b <@Q0f+2&f+%283r%5
 :/
 $V1B @Q11 /:4 ereef+def+d :/
 /:2 @Q0e%91r%5 @Q2d4&d6 / @Q1a :/ @Q1e @Q0f+2.&f+4&f+%94 $L0 r%2 r6 @Q1 >f+ /* ★ */
:/ ;


/* FM_1 ===================================================================== */

$ALL1 $ALL2 $ALLT $FM1 @Q0 @14-2
/:$LOOP $V20
 /:2 l24 o5
  /:4 q8 r12.ddr q6 d12c+12 e12d12c+12>b12< :/
  /:2 q8 r12.eer q6 e12d12  f+12e12d12 c12 :/
  /:2 q8 r12.ddr q6 d12c+12 e12d12c+12>b12< :/
 :/
 $V21 q6l12 o4 /:2 brbb<d>ab<d>a :/ < /:2 crccd>b<cd / >b< :/ c
 /:2 drddefedc :/ c+rc+c+dedc+>b <c+rc+c+def+g+a+
:/;


/* FM_2 ===================================================================== */

$LF2 = @L16,24,-0,64,99,0;

$ALL1 $ALL2 $ALLT $FM2 l4 @14-3 @Q0 $V17 $L0
/:$LOOP
 o3 q10 /:2 /:4 b<f+>f+ :/ <cg>g <cg>g  b<f+>f+ b<f+>f+ :/
 @14-4 $V20 $LF2
 o5 q16 @Q2 c12& /:2 g12&a12&b4&b6< c12> @Q9b12. @Q1 a24&g12&a2 / >a12&< :/
 @14-3 @Q0 $V17 $L0
 o3 q10 b-<f>b- g<dg >f+<c+>f+ f+<c+f+
:/;


/* SSG_0 ==================================================================== */

$ALL1 $ALL2 $ALLT $SSG0 q16 @Q0 l4 @13-0 @E1,0,0,127,0 $W09
/:$LOOP
 /:2 l24 o4
  /:4 q7 r12.f+f+r q5 f+12e12  g+12f+12e12 d12 :/
  /:2 q7 r12.g g r q5 g12 f+12 a12 g12 f+12e12 :/
  /:2 q7 r12.f+f+r q5 f+12e12  g12 f+12e12 d12 :/
 :/
 l12 /:4 grggaf+gaf+ :/
 /:2 frffgagfe :/ ereef+gf+ed ereef+g+a+b<c+
:/;