/******************************************************************************
/*                                                                            *
/*                                                                            *
/*                                                                            *
/******************************************************************************
.title LOOP—pผฎทถผรศ
.mmltype midi 
.partmax 21
.part 0  0 
.part 1  1
.part 2  2
.part 3  3
.part 4  4
.part 5  5
.part 6  5
.part 7  6
.part 8  6
.part 9  7    
.part 10 7  
.part 11 8  
.part 12 9  
.part 13 10
.part 14 10
.part 15 10
/**
.subpart md0     0
.subpart md1     1
.subpart md0s    2
.subpart md1s    3
.subpart bass    4
.subpart syn0    5
.subpart syn1    6
.subpart syn0s   7
.subpart syn1s   8
/
.subpart strs0   9
.subpart strs1  10
.subpart hit    11
.subpart snare  12
.subpart tom    13
.subpart bassd  14
.subpart hihat  15
.next
/------------------------   ‚l‚h‚c‚h‰Š๚‰ป   ----------------------------------
/$func(SC55_excl, 40 00 7F 00 )
/r2
/.next
/------------------------ ƒ}ƒNƒ’่‹`/ƒp[ƒg‰Š๚‰ป -----------------------------
#define	MONO	@C$7e/0
#define RESERVE $func(SC55_partial, 0 0 0 0 0 2 0 0 1 0 3 0 0 0 0 0 )
/
#define	md0     $func(SC55_bend, 1 2 0 0 0 0 0 0 0 0 0 0 )$MONO $RESERVE()
#define	md1     $func(SC55_bend, 2 2 0 0 0 0 0 0 0 0 0 0 )$MONO
#define	md0s    $func(SC55_bend, 3 2 0 0 0 0 0 0 0 0 0 0 )$MONO
#define	md1s    $func(SC55_bend, 4 2 0 0 0 0 0 0 0 0 0 0 )$MONO
#define bass    $MONO$func(SC55_voice,5,0,0,0,0,20) 
#define	syn0    $func(SC55_bend, 6 6 0 0 0 0 0 0 0 0 0 0 )
#define	syn0s    $func(SC55_bend, 7 6 0 0 0 0 0 0 0 0 0 0 )
.playsub
.next
/******************************************************************************
#define md0    q8v/127v15t170@c0/127@48u128 @c0$5d/64
#define md1    q8v/127v15    @c0/127@48u128 @c0$5d/64
#define md0s   q8v/127v13%d6 @c0/127@48u-128@c0$5d/64
#define md1s   q8v/127v13%d6 @c0/127@48u-128@c0$5d/64
#define bass   q6v/127v15@c0/0@40
#define syn0   q8v/127v14@31u128 @c0$5d/40
#define syn1   q8v/127v14@31u128 
#define syn0s  q8v/127v14@85u-128@c0$5d/40@c0$5b/108
#define syn1s  q8v/127v14@85u-128
#define strs0  q8v/127v15o4@49
#define strs1  q8     v15o4@49
#define snare  q8v/127v13o2u1024@17@C0$5b/108
#define tom    q8v/127v15$func(SC55_rymPart, 10 2 )@1@C0$5d/30 @C0$5b/114
#define bassd  q8     v15o1@1u0
#define hihat  q8     v12o2@1
.playsub
.next
/******************************************************************************
/**** ’่‹` ****
#define md0a   l8o5u128a4.&$cho(a,64,8,x,128,-8064)&a4>$cho(c,64,8,x,-8064,128)&c<a4.g4.f4 e4.d&
#define md1a   l8o5u128d4.&$cho(d,64,8,x,128,-8064)&d4 $cho(f,64,8,x,-8064,128)&f d4.c4.<b-4a4.a&
#define md0as  l8o5u-128a4.&$cho(a,64,8,x,-128,-8192)&a4>$cho(c,64,8,x,-8192,-128)&c<a4.g4.f4 e4.d&
#define md1as  l8o5u-128d4.&$cho(d,64,8,x,-128,-8192)&d4 $cho(f,64,8,x,-8192,-128)&f d4.c4.<b-4a4.a&
#define bassa  l8o1b-b-b-b-b-b-b-b-> cccccc>c<c dddddddd ddddd>d<C>C<
#define bassb  l8o2(d)16(c)16<(b-)16>(c)16
#define syn0a  o3b-1>c1d1&d1
#define syn1a  o3f1g1a1&a1
#define syn0b  o3a1&a1  b-1&b-1>d1&d1 d1c+1
#define syn1b  o3d1&d2.e4f1&f1  b-1&b-1a1a1
#define syn0c  l8(a>]d[<a&a>]e[<a&a>]f[<a&a>]g[<a>]f[<a>]e[<a)3 a>]d[<a&a>]e[<a&a>]f[<a&a>]]g[<a>]a[<a>]>c[<<a[
#define syn1c  l8(d a d&d>c<d&d>d<d&d>e<d>d<d>d<d)3d a d&d>c<d&d>d<d&d>e<d>f<d>g<d
#define syn0d  l8(a>]d[<aa>]e[<aa>]f[<aa>]g[<a>]f[<a>]e[<a)3a>]d[<aa>]e[<aa>]f[<aa>]]g[<a>]a[<a>]>c[<<a[
#define syn1d  l8(d a dd>c<dd>d<dd>e<d>d<d>d<d)3d a dd>c<dd>d<dd>e<d>f<d>g<d
#define syn0e  o4d1&d1c1&c1<b-1&b-1>c1&c1
#define syn1e  o3a1&a1g1&g1 f1&f1 g1&g1
#define bassda o2l8(crrrccrr)4
#define snarea o2l4(rdrd)3rdr d16r16d16d16
#define hihata o2l8(f+f+f+f+f+f+f+f+ rf+f+f+f+f+f+a+)2
#define hihatb o2l8(f+f+f+f+f+f+f+a+)3 f+f+a+f+ l16f+g+f+g+a+g+f+a+  
/**************************  ‚l‚l‚k“WŠJ  **************************************
#define md0    $md0a d2&d1
#define md1    $md1a a2&a1
#define md0s   $md0as d2&d1
#define md1s   $md1as a2&a1
#define bass   $bassa
#define syn0   $syn0a
#define syn1   $syn1a
#define syn0s  $syn0a
#define syn1s  $syn1a
#define bassd  $bassda
#define snare  $snarea
#define tom    l16o3a1r1r1r2rrdd<bbgg
#define hihat  $hihata
.playsub
.next
#define md0    $md0a d4g4e4.d&d4f4
#define md1    $md1a a4>c4<a1
#define md0s   $md0as d4g4e4.d&d4f4
#define md1s   $md1as a4>c4<a1
#define bass   $bassa
#define syn0   $syn0a
#define syn1   $syn1a
#define syn0s  $syn0a
#define syn1s  $syn1a
#define bassd  $bassda
#define snare  $snarea
#define tom    l16o3d-1r1r1r2.ac<ba
#define hihat  $hihatb
.playsub
.next
#define md0    d1&d2&d   cde  f1g2e2d1&d1& $slide(V/,d,32,48,&,x,127,40)R2v/127
#define md1    b-1&b-2&b-ab->cc1e2c2<a1&a1&$slide(V/,A,32,48,&,x,127,40)R2v/127
#define md0s   d1&d2&d   cde  f1g2e2d1&d1& $slide(V/,D,32,48,&,x,127,40)R2v/127
#define md1s   b-1&b-2&b-ab->cc1e2c2<a1&a1&$slide(V/,A,32,48,&,x,127,40)R2v/127
#define bass   o1(b-b-b-b-b-b-b-b-)2>cccccccccccccc>c<c(dddddddddddddddd)2
#define syn0   d1&d1   g1g1d1&d1&d1&d1
#define syn1   b-1&b-1>c1e4&e2.<a1&a1&a1&a1
#define syn0s  d1&d1   g1g1d1&d1&d1&d1
#define syn1s  b-1&b-1>c1e4&e2.<a1&a1&a1&a1
#define bassd  $bassda (crrrccrr)4
#define snare  $snarea (rdrd)4
#define tom    o3d-1r1r1r1 a1r1r1r2.rd<bg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    o3l16a>a<a>g&g2.dcdefedcdefgfedc< b->a<b->g&g2.< b-ab->c dcde fefg aga>c d1&d2 c+6d6e6  f1      $cho(f,64,8,x,128,8191)&f8&f2.u128
#define md1    o3l16d>d<d>d&d2.&d2.c4<           g>d<g>d&d2.  < gfga b-ab->c dcde fdeg  b-2fef4.&f2 a6b6>c+6  d1$cho(d,64,8,x,128,8191)&d8&d2.u128 
#define md0s   o3l16a>a<a>g&g2.dcdefedcdefgfedc< b->a<b->g&g2.< b-ab->c dcde fefg aga>c d1&d2 c+6d6e6  f1      $cho(f,64,8,x,-128,8064)&f8&f2.u-128
#define md1s   o3l16d>d<d>d&d2.&d2.c4<           g>d<g>d&d2.  < gfga b-ab->c dcde fdeg  b-2fef4.&f2 a6b6>c+6 d1$cho(d,64,8,x,-128,8064)&d8&d2.u-128 
#define syn0   $syn0b
#define syn1   $syn1b
#define syn0s  $syn0b
#define syn1s  $syn1b
#define bass   o2(ddddddd)2cc<(b-b-b-b-b-b-b-b-)2(gggggggg)2(aaaaaaaa)2
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3d-1r1r1r1 g1r1r1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    o3l16a>a<a>g&g2.dcdefedcdefgfedc< b->a<b->g&g2.< b-ab->c dcde fefg aga>c d1&d2 c+6d6e6  f1      $cho(f,64,8,x,128,8191)&f8&f4u128e2
#define md1    o3l16d>d<d>d&d2.&d2.c4<           g>d<g>d&d2.  < gfga b-ab->c dcde fdeg  b-2fef4.&f2 a6b6>c+6  d1$cho(d,64,8,x,128,8191)&d8&d4u128c+2 
#define md0s   o3l16a>a<a>g&g2.dcdefedcdefgfedc< b->a<b->g&g2.< b-ab->c dcde fefg aga>c d1&d2 c+6d6e6  f1      $cho(f,64,8,x,-128,8064)&f8&f4u-128e2
#define md1s   o3l16d>d<d>d&d2.&d2.c4<           g>d<g>d&d2.  < gfga b-ab->c dcde fdeg  b-2fef4.&f2 a6b6>c+6 d1$cho(d,64,8,x,-128,8064)&d8&d4u-128c+2 
#define syn0   $syn0b
#define syn1   $syn1b
#define syn0s  $syn0b
#define syn1s  $syn1b
#define bass   o2(ddddddd)2cc<(b-b-b-b-b-b-b-b-)2(gggggggg)2(aaaaaaaa)2
#define strs0  o6d1&d2l4def1&f2fef1&f1d1e1
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3d-1r1r1r1 g1r1r1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0     $slide(V/,d,16,64,&,x,127,0)r1v/127@c0$5d/94
#define md1    <$slide(V/,a,16,64,&,x,127,0)r1v/127
#define md0s    $slide(V/,d,16,64,&,x,127,0)r1v/127@c0$5d/94
#define md1s   <$slide(V/,a,16,64,&,x,127,0)r1v/127
#define strs0   $slide(V/,d,16,64,&,x,127,0)r1v/127
#define syn0   v11o3$syn0d
#define syn1   v8 o3$syn1d
#define syn0s  v13o2$syn0c
#define syn1s  v10o2$syn1c
#define bass   q8o2@c0$5d/127d1&d1c1&c1<b-1&b-1>c1&c1
#define bassd  (ccrrrrrrrrrrrrrc)4
#define tom    o3a1r1d-1r2cr<bragfr>a1r1 d-1r2cc<bbaagg
#define hihat  l8(rrg+r)16
.playsub
.next
///*************************  Šิ‘t  *****************************************
#define md0    o5$slide(V/,d,64,16,&,x,40,127)&d2.&d1e1&e1f1&f1$cho(g,32,8,x,-8134,128)& g2.&g1
#define md0s   o5$slide(V/,d,64,16,&,x,40,127)&d2.&d1e1&e1f1&f1$cho(g,32,8,x,-8192,-128)&g2.&g1
#define syn0   v11o3$syn0d
#define syn1   v8 o3$syn1d
#define syn0s  v13o2$syn0c
#define syn1s  v10o2$syn1c
#define bass   q6@c0$5d/40 $bassb
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3a1r1d-1r2cr<bragfr>a1r1 d-1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    o5l16<<defg fga>c <a>cde defg <a>cde defg fga>c< a>cdf   d1dfc<a> c8<ag a8gf gfec <b->cd cde def efg fgab-   >dfa dg>c< da>d<d >f<d>e<d>d<d(ecefgeg>c<)2(>c<g>cdeceg)2
#define md0s   V14$md0
#define md1    V/127%R15 %D4 V14 $md0
#define md1s   V/127%L15 %D3 V14 $md0
#define syn0   v11o3$syn0d
#define syn1   v8 o3$syn1d
#define syn0s  v13o2$syn0c
#define syn1s  v10o2$syn1c
#define bass   $bassb
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3a1r1R1r2cr<bragfr>D-1r1 R1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    o6agfd gfec fed<a > edc<a dfddadd>c<dd>f<d>e<d>d<d  cdc<a>c<a gagfgf efec<(ceg>)3(ec<g)2e (fdfb- b-fb->d d<b->df)2b-fb->dfdfb- >e<g>c<ge (gec ec<g> c<ge)3  
#define md0s   $md0
#define md1    $md0
#define md1s   $md0
#define syn0   v11o3$syn0d
#define syn1   v8 o3$syn1d
#define syn0s  v13o2$syn0c
#define syn1s  v10o2$syn1c
#define bass   $bassb
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3a1r1R1r2cr<bragfr>D-1r1 R1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    o4(a>cd<)16> dfc<a> c8<ag a8gf gfec <b->cd cde def efg fgab-   >dfa dg>c< da>d<d >f<d>e<d>d<d(ecefgeg>c<)2(>c<g>cdeceg)2
#define md0s   $md0
#define md1    $md0%C %D%0
#define md1s   $md0%C %D6
#define syn0   v11o3$syn0d
#define syn1   v8 o3$syn1d
#define syn0s  v13o2$syn0c
#define syn1s  v10o2$syn1c
#define bass   $bassb
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3a1r1R1r2cr<bragfr>D-1r1 R1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next
#define md0    v/127o7$cho(a,64,8,x,-8134, 128)&a1&$slide(V/,a,16,64,&,x,127,0)
#define md1    v/127o7$cho(d,64,8,x,-8134, 128)&d1&$slide(V/,d,16,64,&,x,127,0)
#define md0s   v/127o7$cho(a,64,8,x,-8192,-128)&a1&$slide(V/,a,16,64,&,x,127,0)
#define md1s   v/127o7$cho(d,64,8,x,-8192,-128)&d1&$slide(V/,d,16,64,&,x,127,0)
#define syn0   v14$syn0e
#define syn1   v14$syn1e
#define syn0s  v14$syn0e
#define syn1s  v14$syn1e
#define bass   $bassb
#define bassd  $bassda  $bassda
#define snare  $snarea  $snarea
#define tom    o3a1r1R1r2cr<bragfr>D-1r1 G1r2cc<bbaagg
#define hihat  $hihata $hihatb
.playsub
.next