//------------------------------------------------------------------------------
曲名{"進め！黒ネコ迷宮"}
作者{"クジラ飛行机"}
//------------------------------------------------------------------------------
// 変更履歴
// 2023/12/04 - GeneralUser GS 1.471 対応 - https://schristiancollins.com/generaluser.php
// 2023/12/02 - ベースラインを太くして曲を長くした
// 2023/11/?? - 適当に作って投稿
//------------------------------------------------------------------------------
TimeBase = 96 
TimeSignature = 4,4
Tempo = 130
//------------------------------------------------------------------------------
// Setup
Str A00 = { CH(1) 音色(DistortionGuitar)  V=120 v120 l8 o5 q95 REV(90) P(63) }
Str B00 = { CH(2) 音色(BrassSection)     V=110  v120 l8 o5 q90 REV(80) P(63) }
Str C00 = { CH(3) 音色(RockOrgan)    V=115 v100 l8 o5 q99 REV(80) P(63) }
Str D00 = { CH(4) 音色(Vibraphone)   V=110 v100 l8 o5 q99 REV(60) P(63) }
Str E00 = { CH(5) 音色(49) V=110 v090 l8 o4 q99 REV(120) P(93) }
Str F00 = { CH(6) 音色(81)  V=120 v110 l8 o2 q90 REV(010) P(33) }
Str FF0 = { CH(7) 音色(34)  V=120 v120 l8 o2 q90 REV(010) P(64) }
Str G00 = { CH(10) @1  V=120 v120 l8        REV(80) } 
//------------------------------------------------------------------------------
Str RIFF1 = { egab egfg | egab- ageg }
//------------------------------------------------------------------------------
Str A01 = {  l16 q99  [4 o4 RIFF1 ]  }
Str A02 = { l16 o5
  gage | e^d^ | eg{age}^ | d^^^
  <g^^^ | ^^ed | e^^^ | > e^^^
  defa | b`eg`e | aged | ede^
  de^^^ | d＆e^^^ | gab&b- | ag^e
}
Str A03 = {
  gage | e^d^ | eg{age}^ | d^^^
  g{fef}^d | e^ed | e^ed |  e^b^
  defa | b`eg`e | aged | ede^
  de^^^ | de^^^ | gabb- | ag^e
}
Str A04 = { l16 o5
  g^ge | ed+d^ | eg{age}^ | 'db'^^^
  <g^^^ | ^^ed | 'eb'^^^ | > e^^^
  defa | b`eg`e | aged | ede^
  de^^^ | d＆e^^^ | gab&b- | ag^e
}
Str A05 = {
  gage | e^d^ | eg{age}^ | d^^^
  g{fef}^d | e^ed | e^ed |  e^b^
  defa | b`eg`e | b>de&d< | ede^
  de^^^ | de^^g- | gabb- | >d&e&de<
}
//------------------------------------------------------------------------------
// BRASS
Str B10 = {
	 l16 o6 q50 
    eree | eeee | rere | eeee
    rere | rere |  e4  | eree 
    eeee | rere | eeee | rere | 
    rere | e8g8 | e8g8 | e4
}
Str B01 = { l16 o5 q50  OctaveUnison{
	 l16 o6 q50 
    eree | eeee | rere | eeee
    rere | rere |  e4  | eree 
    eeee | rere | eeee | rere | 
    rere | e8g8 | e8g8 | e4
}}
Str B02 = { l16 o5
  	[2[2
		gage | rere |  gage | : rre8
	] d4 ]
}
Str B03 = {
	 l16 o6 q50 
    eree | gere | rere | eere
    rere | rare |  b^a^  | g^^^ 
    eree | rere | redd- | "b^e^ | 
    rere | e8g8 | e8g8 | e4
}
Str B04 = {
	 l16 o6 q50 
    eree | rrrr | erge | eeee
    a^e^ | d^"b^ | deee  | rrrr
    eree | rrrr | g^a^ | b^^^ | 
    rere | rrrr | deee | rgrg
}

//------------------------------------------------------------------------------
// ORGAN
Str C01 = { Unison5th{ q99 o5 l1 v110 e g b a } }
Str C02 = { Unison5th{ q99 o5 l1 v110 e b2a2 e2g2 b } }
//------------------------------------------------------------------------------
// VIB
Str D01 = { l8 OctaveUnison{ o5 [2 egab egf{g&b&g} | : egab- ageg ] a^ba | e`ed`e } }
Str D02 = { l8 OctaveUnison{ o5 [2 egab egfe | : egab- ageg ] a^ba | g`ede } }
//------------------------------------------------------------------------------
// STRINGS
Str E01 = { o5 l2q100 eg | "bg | ef | gb  }
//------------------------------------------------------------------------------
// BASS
Str F01 = { o2 l16q90 [4 RIFF1 ] }
Str F02 = { o2 l16q90 [4 eeee | eeee | eeee | eeee ] }
Str F03 = { o2 l16q90 [2 [2 e^eg | e^eg |  e^e^ | :e^eg] eggg ] }
Str F04 = { o2l16; [4 ga | b^ | b-a | ea | `ee | g`g | ^g | b-`e ]  }
//------------------------------------------------------------------------------
// DRUMS
Str G01 = {
  v90 l16 S{ [4 R{ crrr rrrr crrr rrrr } ] }
  v90  l16 S{ [4 R{ hrhh hrhh hrhh hrhh } ] }
  v110 l8       [4 R{ brbr :srrr } ] R{srss}
}
Str G02 = {
  v90 l16 S{ [4 R{ crrr rrrr crrr rrrr } ] }
  v90  l16 S{ [4 R{ hrrr hrrr hrhr hrhr } ] }
  v110 l8       [4 R{ brbr :srrr } ] R{ss {sss} s}
}
Str G03 = {
  v110 l4 [4 R{ bbbb } ]
}
//------------------------------------------------------------------------------
// Play
//------------------------------------------------------------------------------
Str ___ = { l1 rrrr }
音源初期化;
PLAY(A00,B00,C00,D00,E00,F00,FF0,G00)
PLAY({r1}, {r1}, {r1}, {r1}, {r1}, {r1}, {r1},{l16 R{ sv50srs v80srss v90 'cs'sss  v100 s{ss}s{ss} } })
// intro
PLAY(___,___,C01,D01,___,F01,F01,G01)
PLAY(A01,___,C02,D02,E01,F03,F03,G01)
PLAY(___,B01,C01,D01,___,F02,F02,G02)
// A-melo
PLAY(A02,___,C02,D02,___,F02,F02,G02)
PLAY(A03,___,C02,D02,___,F02,F02,G02)
// Riff
PLAY(A01,___,C01,D02,E01,F01,F01,G01)
PLAY(A01,___,C02,D01,E01,F01,F01,G01)
// A-Melo
PLAY(A04,B02,C01,D02,___,F02,F02,G02)
PLAY(A05,B02,C02,D02,___,F02,F02,G02)
// RIff
PLAY(A01,___,C01,D02,E01,F01,F01,G01)
PLAY(A01,B04,C02,D01,E01,F01,F01,G01)
// Blur
PLAY(___,___,C01,D01,___,F04,F04,G01)
PLAY(___,B10,C02,D02,___,___,F04,G03)
// Riff
PLAY(A01,___,C02,D02,E01,F03,F03,G01)
PLAY(A01,___,C02,D01,E01,F03,F03,G01)
// Riff
PLAY(A01,B03,C02,D02,E01,F03,F03,G01)
PLAY(A01,B03,C02,D01,E01,F03,F03,G01)
// ending
PLAY({e1},{q100a1},{e1},{e1},___,___,___,{R{ c1 }})
PLAY(___,___,C01,D01,___,F01,F01,G01)
PLAY(___,___,C01,D01,___,F01,F01,G01)
PLAY(___,___,C01,D01,___,F01,F01,G01)