/*

夜のエロ渋いBGM作りました

なんかバーとかで地味にかけたいですね

AORとかに属される気がしますが、よく分かりません

低音がちょっときついかもしれません

僕のPCの音声出力がクソなので調整しにくいのです…

Dj Hino
*/

ResetGS

TrackName = {"interior light"}

Tempo 100

CH(11) SysEx$ = f0,41,10,42,12,{40,1a,15,02},f7;
CH(12) SysEx$ = f0,41,10,42,12,{40,1b,15,02},f7;
//CH(13) SysEx$ = f0,41,10,42,12,{40,1c,15,02},f7;
//CH(14) SysEx$ = f0,41,10,42,12,{40,1d,15,02},f7;

//CuePoint={"TwmReverb(127,117,70,127)"}
//Include(delay.h)
Include (unison.h)
Include(groove.h)
//MidiDelay({},3,!8)
//OctaveUnison (
//Swing16(6)

TR 1
@ 2
V 127
v 120
EP 115
REV 40
CHO 0
q 100
Swing16(9)
[8r1]

[8r1]

rr16d16g16a16b8`c16r16`d16r16`ca8^4r2
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.
rr16b16`c16b16`d8`c16r16`d16r16`c16^4.`d16`c16a16^4r
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.

rr16d16g16a16b8`c16r16`d16r16`ca8^4r2
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.
rr16b16`c16b16`d8`c16r16`d16r16`c16^4.`d16`c16a16^4r
r8a8`e16`c16r16`c8.`d8`e8`db8r8`g8r8`f+8.r8.


S{b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4g`d`cb1}
>b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4g`d`c

b1<
[7r1]

[8r1]
EP 100
rr16d16g16a16b8`c16r16`d16r16`ca8^4r2
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.
rr16b16`c16b16`d8`c16r16`d16r16`c16^4.`d16`c16a16^4r
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.
EP 115
rr16d16g16a16b8`c16r16`d16r16`ca8^4r2
r8a8`e16`c16r16`c8.`d8`e8`db8r8g8r8f+8.r8.
rr16b16`c16b16`d8`c16r16`d16r16`c16^4.`d16`c16a16^4r
r8a8`e16`c16r16`c8.`d8`e8`db8r8`g8r8`f+8.r8.


S{b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4a8b8^4g16e16g16a16}
>b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4a8b8^4g16e16g16a16<

S{b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4g`d`cb1}
>b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8r8a8r8b8^4a8b8^4g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8b8^8r8g16e16g16a16
b`c8`d8r8`c8r8b8^4g`d`c

b1<


TR 2
@ 89
V 127
v 127
EP 75
REV 80
CHO 0
q 100
Swing16(9)
>
[8r1]

[8r1]

[6r1]
r2.r8`dbgf+r8

[6r1]
r2.r8`db`g`f+r8

[8r1]

[8r1]

[8r1]

[6r1]
r2.r8`dbgf+r8

[6r1]
r2.r8`db`g`f+r8


TR 3
@ 66
V 127
v 127
EP 100
REV 50
CHO 0
q 100
M 40
P 54
Swing16(6)
[8r1]

[8r1]

[8r1]
[8r1]

[8r1]
[8r1]

[8r1]

[8r1]
[8r1]

[8r1]
[8r1]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
rr8b16&`c16^4r
r8`e16r16`c8`d16a16r16b16&`c8.^16r8
r4^16f16&g16a16`c16`e16`d16`c16a8`c16b16^4r
r16b16`c16`d16b16g16f16e16^4rr8e16r16d16r16c16r16
d8e16"a16^4rr8.g16a8`d+16&`e8r8g16a16r16`d+16&`e8r8g16a16r16`d+16&`e8r8g16a16r16`d+16&`e8^4

TR 4
@ 66
V 127
v 127
EP 60
REV 40
CHO 0
q 100
M 40
P 74
r32
Swing16(6)
[8r1]

[8r1]

[8r1]
[8r1]

[8r1]
[8r1]

[8r1]

[8r1]
[8r1]

[8r1]
[8r1]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
rr8b16&`c16^4r
r8`e16r16`c8`d16a16r16b16&`c8.^16r8
r4^16f16&g16a16`c16`e16`d16`c16a8`c16b16^4r
r16b16`c16`d16b16g16f16e16^4rr8e16r16d16r16c16r16
d8e16"a16^4rr8.g16a8`d+16&`e8r8g16a16r16`d+16&`e8r8g16a16r16`d+16&`e8r8g16a16r16`d+16&`e8^4



TR 5
@ 5
V 127
v 127
EP 70
REV 10
CHO 0
q 100
Swing16(6)
EP 65
[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]
EP 75
[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]


[4
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]

[4
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]


EP 55
[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]


[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]
EP 75
[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]

[4
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[
S{[16P.T(104,24,!8,24,104,!8)r]}
'""acegb'2.^8
'""d"f"ace'8^1
'""f"aceg'2.^8
'""e"g"bdf+'8^1]

TR 6
@ 36
V 127
v 115
EP 127
REV 10
CHO 0
q 100
Swing16(6)
<<<
[7r1]
r2.r16
EP 80
f+16g16g+16

EP 127
[
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

[4
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

[4
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

[a2.^8d8^1f2.^8e8^1]

[a2.^8d8^1f2.^8e8^1]
[
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

[4
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[
a2r8a16r8.d8^2r8g16a8`c16a8
f2r8f16r8.e8^2r8e8r16g8.]

TR 7
@ 28,8
V 127
v 127
EP 100
REV 20
CHO 20
q 100
Swing16(9)
[8r1]

[8r1]

[8r2EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r
rr8EP 70'dg'16r16EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r]

[8r2EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r
rr8EP 70'dg'16r16EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r]

[8r1]

[8r2EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r
rr8EP 70'dg'16r16EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r]

[8r2EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r
rr8EP 70'dg'16r16EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[4r2EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r
rr8EP 70'dg'16r16EP 80q 120'dg'16q 30EP 60'ea'16r16'ea'16r]

TR 8
@ 51,8
V 127
v 127
EP 55
REV 70
CHO 0
q 100
Swing16(9)
[8r1]

[8r1]

[8r1]

r1r2`d8`c8b8a8^2`c2b2f+2
e1^2`d8`c8b8a8^2`c2'eb'2'b`f+'2

>
EP.W(35,65,!2^8)
[4
'cegb'2.^8
'"f"ace'8^1
'"aceg'2.^8
'"g"bdf+'8^1]
<
EP 55

[8r1]

[8r1]

r1r2`d8`c8b8a8^2`c2b2f+2
e1^2`d8`c8b8a8^2`c2'eb'2'b`f+'2

>
EP.W(35,65,!2^8)
[4
'cegb'2.^8
'"f"ace'8^1
'"aceg'2.^8
'"g"bdf+'8^1]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[
'cegb'2.^8
'"f"ace'8^1
'"aceg'2.^8
'"g"bdf+'8^1]


TR 10
@ 1,90,1
V 127
v 115
EP 120
REV 4
CHO 0
Swing16(6)
<<
[7r1]
r4.r16EP 60[e32]EP 110e8c16EP 90e16r16EP 100e16c8

EP 120
S{`a1}
[4ce8.c16ce8c8:re8.c16ce]
re8'e`c+'8r16[e32]e16c16[`c16][g16]

S{`a1}
[4ce8.c16ce8c8re8.c16c:e]e8.e16
[4ce8.c16ce8c8:re8.c16ce]
c'e`c+'8.[`c32]`c8g8`c16`c16g8

S{`a1}
[4ce8.c16ce8c8re8.c16c:e]e8.e16
[4ce8.c16ce8c8:re8.c16ce]
c'e`c+'8.[`c32]`c8g8`c16`c16g8

[8r1]

[7r1]
r4..EP 60c16EP 80c8EP 100e8e8EP 60e16e16
EP 120
S{`c+1}
[4ce8.c16ce8c8:re8.c16ce]
c'e`c+'8.[`c32]`c8g8`c16`c16g8

S{`a1}
[4ce8.c16ce8c8re8.c16c:e]e8.e16
[4ce8.c16ce8c8:re8.c16ce]
c'e`c+'8.[`c32]`c8g8`c16`c16g8

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
S{`a1}
[4ce8.c16ce8c8re8.c16c:e]e8.e16


TR 11
@ 1,90,1
V 127
v 127
EP 90
REV 20
CHO 0
P 44
Swing16(6)
<<
[8r1]

[3[16f+8]][11f+8]r8r2

[3[16f+8]][15f+8]b-8
[3[16f+8]][11f+8]r8r2

[3[16f+8]][15f+8]b-8
[3[16f+8]][11f+8]r8r2

[8r1]

[8r1]
[3[16f+8]][11f+8]r8r2

[3[16f+8]][15f+8]b-8
[3[16f+8]][11f+8]r8r2

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[3[16f+8]][15f+8]b-8

TR 12
@ 1
V 127
v 127
EP 45
REV 20
CHO 0
P 64
BR 100
p 63
Swing16(6)
l16
EP 55
[4r1]
[4c+cddd+erd+rec+dcec+e]

[8c+cddd+erd+rec+dcec+e]

EP 45
[
[8c+cddd+erd+rec+dcec+e]]

[
[8c+cddd+erd+rec+dcec+e]]

EP 55
[8c+cddd+erd+rec+dcec+e]

EP 45
[
[8c+cddd+erd+rec+dcec+e]]

[
[8c+cddd+erd+rec+dcec+e]]

V.T(127,127,!1^1^1^1^1,127,0,!1^1^2..)
[8c+cddd+erd+rec+dcec+e]