/*

お久しぶりのhinoです

突然ですが、じつはhinoさんはアフリカ人だったんです

嘘です

*/

ResetGS

TrackName = {"GROOVE of AFRICA"}

Tempo 115

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 3
@ 88
V 127
v 127
EP 127
REV 30
CHO 0
q 100
<
[16r1]

EP.T(0,100,!1^1^1^1^1^1^1^1^1^1^1^1^1^1^1^1)
[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]

EP 127
[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]

[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[16r1]

>>
EP 80
[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


EP 127
<<
[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]
c+8.

TR 4
@ 40,90
V 127
v 127
EP 127
REV 0
CHO 127
q 100
<<<
[16r1]

[16r1]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]

[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[16r1]

[16r1]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]

[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]


[4[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8]

TR 5
@ 2//1,90
V 127
v 127
EP 94
REV 0
CHO 0
q 60
P 127
>
[16r1]

[8r1]
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

[8r1]
EP.T(0,60,!1^1^1^1^1^1^1^1)
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
:r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]
r1

[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

EP 105
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]


[16r1]

[16r1]

[8r1]
EP.T(0,60,!1^1^1^1^1^1^1^1)
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
:r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]
r1

EP 105
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

EP 115
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

TR 6
@ 2//1,90
V 127
v 127
EP 94
REV 0
CHO 0
q 60
P 0
r128
>
[16r1]

[8r1]
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

[8r1]
EP.T(0,60,!1^1^1^1^1^1^1^1)
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
:r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]
r1

[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

EP 105
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]


[16r1]

[16r1]

[8r1]
EP.T(0,60,!1^1^1^1^1^1^1^1)
[4
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
:r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]
r1

EP 105
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

EP 115
[8
[r8
['c+eg+'16]
r8
'c+eg+'16r16]
r8
'c++e+g++'16'c+eg+'16
r8
'c+eg+'16r16
r8
['c-e-g-'16]
r8
'c-e-g-'16r16]

TR 7
@ 56,90,1
V 127
v 127
EP 127
REV 127
CHO 127
[16r1]

[16r1]


['c+`c+'1r1r1r1
[4r1]]


[4'c+`c+'1r1r1r1]

[4'c+`c+'1r1r1r1]


[16r1]

[16r1]


['c+`c+'1r1r1r1
[4r1]]


[4'c+`c+'1r1r1r1]

[4'c+`c+'1r1r1r1]

[4'c+`c+'1r1r1r1]

'c+`c+'1

TR 8
@ 104
V 127
v 127
EP 110
REV 127
CHO 0
BR 6
[16r1]

[16r1]

[16r1]


[16r1]

[4[p.T(0,64,!4)'c+`c+'2.rr1]]


[16r1]

[16r1]

[16r1]

[4[p.T(0,64,!4)'c+`c+'2.rr1]]

[4[p.T(0,64,!4)'c+`c+'2.rr1]]

TR 9
@ 116
V 127
v 127
EP 127
REV 20
CHO 120
<
[16r1]

[16r1]

[16r1]


[16r1]

[16r1]

OctaveUnison (
r16e16r16e16
[3Div {eee} 4][4Div {eee} 4]
[Div {eeeee} 4Div {eee} 4
Div {eeeee} 4Div {ree} 4]
e16e16r16e16r16e16e16e16Div {ree} 4e16e16r16e16
[3e32e32e32r32e32r32e32r32][8e32]
[e32e32e16e16e16r16e16r16e16Div {eee} 4e]

[4e16e16a16a16]
e16e16a16a16r16a16r16e16Div {eaa} 4a16r16a16a16
[3a16e16r16e16r16e32e32e16e16]Div {eeeee} 4Div {aaa} 4
[4e16a16r16e16e16r16]e16e16r16a16Div {aaa} 4
[4a16a16e16e16][4a32a32e32e32]Div {raa} 4a8a8)

EP 100
OctaveUnison (
r16e16r16e16
[3Div {eee} 4][4Div {eee} 4]
[Div {eeeee} 4Div {eee} 4
Div {eeeee} 4Div {ree} 4]
e16e16r16e16r16e16e16e16Div {ree} 4e16e16r16e16
[3e32e32e32r32e32r32e32r32][8e32]
[e32e32e16e16e16r16e16r16e16Div {eee} 4e]

[4e16e16a16a16]
e16e16a16a16r16a16r16e16Div {eaa} 4a16r16a16a16
[3a16e16r16e16r16e32e32e16e16]Div {eeeee} 4Div {aaa} 4
[4e16a16r16e16e16r16]e16e16r16a16Div {aaa} 4
[4a16a16e16e16][4a32a32e32e32]Div {raa} 4a8a8)


[16r1]

[16r1]

TR 1
@ 114
V 127
v 127
EP 120
REV 20
CHO 0
[16r1]

[16r1]

[16r1]


[16r1]

[16r1]

OctaveUnison (
r16e16r16e16
[3Div {eee} 4][4Div {eee} 4]
[Div {eeeee} 4Div {eee} 4
Div {eeeee} 4Div {ree} 4]
e16e16r16e16r16e16e16e16Div {ree} 4e16e16r16e16
[3e32e32e32r32e32r32e32r32][8e32]
[e32e32e16e16e16r16e16r16e16Div {eee} 4e]

[4e16e16a16a16]
e16e16a16a16r16a16r16e16Div {eaa} 4a16r16a16a16
[3a16e16r16e16r16e32e32e16e16]Div {eeeee} 4Div {aaa} 4
[4e16a16r16e16e16r16]e16e16r16a16Div {aaa} 4
[4a16a16e16e16][4a32a32e32e32]Div {raa} 4a8a8)

EP 100
OctaveUnison (
r16e16r16e16
[3Div {eee} 4][4Div {eee} 4]
[Div {eeeee} 4Div {eee} 4
Div {eeeee} 4Div {ree} 4]
e16e16r16e16r16e16e16e16Div {ree} 4e16e16r16e16
[3e32e32e32r32e32r32e32r32][8e32]
[e32e32e16e16e16r16e16r16e16Div {eee} 4e]

[4e16e16a16a16]
e16e16a16a16r16a16r16e16Div {eaa} 4a16r16a16a16
[3a16e16r16e16r16e32e32e16e16]Div {eeeee} 4Div {aaa} 4
[4e16a16r16e16e16r16]e16e16r16a16Div {aaa} 4
[4a16a16e16e16][4a32a32e32e32]Div {raa} 4a8a8)


[16r1]

[16r1]

TR 2
@ 118
V 127
v 127
EP 127
REV 20
CHO 127
<
[16r1]

[16r1]

[16r1]


[16r1]

[16r1]

[16r1]

l16
OctaveUnison (
rbrfbrfbrbrfbrfbbbfrfcbfcfcbbfcrbcrbfrbbcfrbfcrbrbbcfrbfcrfrbbrb
[3[4c32][4f32]bbrf]rbrbbrbr
[8bccc]
bbbfffcccbbbfffc
cbbbfffcccbbbfff
[3c32c32rf32f32rb32b32rb32b32r]bbffbrbb
[3[4c32][4f32]bbrf]rbrbbrbr
[[4c32][4f32]bbrf][[4c32][4f32]]rbrbbrbr
)

[16r1]

[16r1]

TR 10
@ 27,90
V 127
v 127
EP 117
REV 10
CHO 127
BR 100
p 62
<<
[16'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]

'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
'"bc'1

[15r1]
REV 127
'"bc'1


REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1

REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1


REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1


REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1


[15r1]
REV 127
'"bc'1


REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1

REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[13'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc'1


REV 10
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
'"bc`c+`a'8.c16p 62'"bc'8c8p 60
[15'"bc'8.c16p 62'"bc'8c8p 60]
REV 127
'"bc`c+`a'1^1^1^1

TR 11
@ 27,90
V 127
v 127
EP 127
REV 80
CHO 127
BR 100
p 59
P 0
<<
[8r1]
[32r8EP 127b-16EP 0r16]

[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1


[16r1]


[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1

[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1


[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1

[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1


[16r1]



[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1

[32r8EP 127b-16EP 0r16]
[28r8EP 127b-16EP 0r16]
r1


[32r8EP 127b-16EP 0r16]
[32r8EP 127b-16EP 0r16]

TR 12
@ 27,7
V 127
v 127
EP 127
REV 30
CHO 127
BR 100
p 59
<<
[16r1]

[15r1]
r2.r16P 24[3e16]


[8r1]
[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]


[3[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]

[3[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]


[16r1]

[15r1]
P 64
EP.T(30,90,!2)[16e32]EP 127Div {ree} 4e16r16e16r16


[8r1]
[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]


[3[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]

[3[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]]
[4r8.P 104e16r8P 24e8]
[r8.P 104e16r8P 24e8]
r2
P 64
[8e16]


[[4r8.P 104e16r8P 24e8]
[3r8.P 104e16r8P 24e8]
r8.P 104e16r16P 24[3e16]]
[7r1]r2
[8e16]

TR 13
@ 27,7
V 127
v 127
EP 127
REV 30
CHO 127
BR 100
p 55
P 94
<
[16r1]

[16r1]


[8r1]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1

[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1

[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1


[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1

[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1


[8r1]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1


[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1

[[16f+8f+16t 9f+16t 0]]
[16f+8f+16t 9f+16t 0]
[12f+8f+16t 9f+16t 0]
r1


[[16f+8f+16t 9f+16t 0]]

TR 14
@ 27,7
V 127
v 127
EP 127
REV 0
CHO 127
P 0
BR 100
p 61
<<
[16r1]

[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1

[8r1]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1


[16r1]

[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1


[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1

[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1



[8r1]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1


[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1

[4
[16f+16]
[5f+16]
b-16[f+16]
[8f+16]]
[4
[16f+16]
:[5f+16]
b-16[f+16]
[8f+16]]
r1

TR 16
@ 82,1
V 127
v 127
EP 127
REV 40
CHO 30
q 100
[16r1]

[16r1]

[16r1]

[16r1]

[16r1]

[16r1]

[16r1]

[16r1]

[16r1]

OctaveUnison (
[8[c+8.e8.g+8]
c+8.e8g+16a16g+16
c-8.e-8.g-8])