//------------------------------------------------------------------------------
曲名{"迷宮の月"}
作者{"クジラ飛行机"}
//------------------------------------------------------------------------------
// ベースラインの作成にTRndM5を使用
// TRndM5 --- [URL] https://n3s.nadesi.com/widget.php?2652&run=1
//------------------------------------------------------------------------------
TimeBase      = 96 
TimeSignature = 4,4
Tempo         = 100
//------------------------------------------------------------------------------
// Setup
Str A00 = { CH(1) 音色(MutedTrumpet) V=115 v120 l8 o5 q95 REV(110) P(63) }
Str B00 = { CH(2) 音色(SlapBass1)    V=100 v120 l8 o3 q90 REV(100) P(63) }
Str C00 = { CH(3) 音色(RockOrgan)    V=115 v100 l8 o5 q99 REV(100) P(63) }
Str D00 = { CH(4) 音色(81)           V=115 v100 l8 o5 q99 REV(120) P(63) }
Str E00 = { CH(5) 音色(Cello)        V=115 v090 l8 o4 q99 REV(100) P(63) }
Str F00 = { CH(6) 音色(FingerBase)   V=120 v100 l8 o2 q90 REV(030) P(63) }
Str G00 = { CH(10) @1                V=115 v110 l8        REV(100) } 
//------------------------------------------------------------------------------
Str A01 = { o6 l16 
  ede^ ^dedc < bage > gaga
  rrde e^^^ ed{gab-}8 age^
  rcef g^^e dede a^^g
  eged fabg egec dgb`e 
}
Str A02 = { o6 l16 
  a^^^ ^dedc < bage > edc"b
  ra^^ e^^^ dc{gab-}8 age^
  de{fga}8 b^^e gefd a^^g
  eged fabg egec dgb`e 
}
//------------------------------------------------------------------------------
Str B01 = { o3l16; [4 g`e | rg | er | d-g | rd- | d-`e | ge | gr ]  }
Str B02 = { o3l16 [4 e`e g`g b`b g`g | grgg eree ] }
//------------------------------------------------------------------------------
Str C01A = { `dd | ^d | a^ | `c`d | `dc | b`d | ac | dc }
Str C01 = {
  o5l16
  [4
    v70  S{ Key(12) C01A  }
    v50  S{ Key(08) C01A  }
    v120    Key(00) C01A 
  ]
}
Str C02 = { o5 l4 [2 S{ egeg } b`ea`e r1 ] }
//------------------------------------------------------------------------------
Str D01 = { o5l8 [2 C01A ] }
//------------------------------------------------------------------------------
Str E01 = { o4l2q100 efeg | agbg }
//------------------------------------------------------------------------------
Str F01 = { o2l16 [4 C01A ] }
Str F02 = { o2l16; [2 `eebc | `ecaf | ^cb`c | `drar | `d`cad | ^d`dr | ge^`d | bdf`c ] }
Str F03 = { o2l16; [2 e`e`cc | c`dd`c | bfa`c | `dedf | `d`dr`c | ^cca | aerd | `eae`e ] }
//------------------------------------------------------------------------------
Str G01 = {
  v90  l16 S{ [4 R{ ohhh hhhh ohhh:hhhh } ] R{hrhh32h32} }
  v110 l16    [4 R{ brrr srrr brbr:srrb } ] R{srss}
}
Str G02 = {
  v90  l16 S{ [4 R{ oooo hhhh oooo hhhh } ] }
  v110 l16    [4 R{ brrr brrr brbr:brrb } ] R{rsss}
}
Str G03 = {
  v90 l16 S{ [4 R{ crrr crrr crrr crrr } ] }
  v90  l16 S{ [4 R{ hrhh hrhh hrhh hrhh } ] }
  v110 l16    [4 R{ bbbb srbr brbr:srbb } ] R{ssss}
}

//------------------------------------------------------------------------------
// Play
//------------------------------------------------------------------------------
Str ___ = { l1 rrrr }
音源初期化;
PLAY(A00,B00,C00,D00,E00,F00,G00)
PLAY(___,___,___,D01,___,___,___)
PLAY(___,___,___,D01,___,F01,G01)
PLAY(___,B01,C01,D01,___,F01,G01)
PLAY(___,___,___,D01,E01,F02,G02)
PLAY(___,B01,C01,D01,___,F02,G02)
PLAY(A01,___,C01,___,___,F01,G01)
PLAY(A02,___,C01,D01,___,F01,G01)
PLAY(___,___,C02,___,E01,F03,G03)
PLAY(___,___,C02,___,E01,F03,G03)
PLAY(___,B01,C01,D01,___,F01,G01)
PLAY(___,B01,C01,D01,___,F01,G01)
PLAY(___,___,___,D01,___,___,___)
PLAY(___,___,___,D01,___,___,___)