//------------------------------------------------------------------------------
曲名{"幸せゴールイン"}
作者{"クジラ飛行机"}
//------------------------------------------------------------------------------
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) 音色(Vibraphone)   V=110 v100 l8 o5 q99 REV(100) P(63) }
Str E00 = { CH(5) 音色(49)           V=080 v090 l8 o4 q99 REV(120) 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 = { o5 l8
    e^ge geg^ | e^ge geg^ | f^ag aga^ | b^ag deg^
}
//------------------------------------------------------------------------------
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 C01 = { Unison5th{ q00 o5 l4 cccc eeee ffff gggg} }
//------------------------------------------------------------------------------
Str D01 = { l8 o5 cegb gbge | egbg egb>d< | cfaf fa`ca | gb`d`bdgb`d }
//------------------------------------------------------------------------------
Str E01 = { o5 l2q100 cg | "bg | cf | dg  }
//------------------------------------------------------------------------------
Str F01 = { o3l16q90  c^cc e^cc g^cc cccd |  e^ee g^ee b^ee eege |
    < | f^ff a^ff `c^ff fa`ca |
      | g^gg b^gg `d^gg gab`d | }
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{ crrr rrrr rrrr rrrr } ] }
  v90  l16 S{ [4 R{ hrhh hrhh hrhh hrhh } ] }
  v110 l16    [4 R{ brbr srbr brbr:srbb } ] R{srss}
}

//------------------------------------------------------------------------------
// Play
//------------------------------------------------------------------------------
Str ___ = { l1 rrrr }
音源初期化;
PLAY(A00,B00,C00,D00,E00,F00,G00)
PLAY({l8rdeg^^r},{},{l8rdeg^^r},{l8rdeg^^r},{},{},{l8R{rs{ss}srrr}})
PLAY(A01,___,C01,D01,E01,F01,G01)
PLAY(A01,___,C01,D01,___,F01,G01)
PLAY(A01,___,C01,D01,___,___,___)
PLAY({>c1},___,{c1},{g1},___,___,___)