/******************************************************************************
/*                                                                            *
/*                                                                            *
/*  1365*6=8192                                                               *
/******************************************************************************
.title BGM‚»‚Ì1
.mmltype fb386 
.partmax 14
.fm  FM_1_F1.FMB
.pcm pcmfrc.PMB 
.part 0  0 
.part 1  1
.part 2  2
.part 3  3
.part 4  4
.part 5  5
.part 6  6
.part 7  7
.part 8  8
.part 9  9    
.part 10 10  
.part 11 11  
.part 12 12  
.part 13 13  
/**
.subpart md0     0
.subpart md1     1
.subpart sho     2
.subpart bass    3
.subpart syn0    4
.subpart syn1    5
/
.subpart ah0     6
.subpart ah1     7
.subpart hit     8
.subpart snare   10
.subpart tom     11
.subpart dum     12
.subpart hihat   13
.next
/******************************************************************************
#define md0    q8v/115v14t170@1u0 
#define md1    q8v/115v14    @1u0 
#define sho    q8v/113v15@4
#define bass   q8v/115v14@27
#define syn0   q8v/115v10@49
#define syn1   q8v/115v10@49
#define ah0    q8v/85v15o4@3k0
#define ah1    q8v/85v15o4@3k0
/#define mar    q8v/127v13o4
#define hit    q8v/127v13o4@2
#define snare  q8v/127v13@1o2u1024
#define tom    q8v/127v15@1u-2048
#define dum    q8v/127v15o5@1
#define hihat  q8v/40v12o5@1
.playsub
.next
/******************************************************************************
#define bassa  o3l8q6aaaaaaaa   gggggggg ffffffffgggg gegb
#define syn0a  @17v15o5l8  rrcc<b>crc rc<b>rcc<b>r rrcc<b>crc rc<b>rdd<b>r
#define syn1a  @17v15o4l8  rraagara   ragraagr rraagara ragrbbgr
#define shoa   o4v14a1b1>c1d1<
#define ah0a   o3  a1g1f1g1
#define ah1a   o3  e1d1c1d1
#define ah0b   o3  a1g1f1b1
#define ah1b   o3  e1d1c1g1
#define psga   @115v5 o3r1r1 a2.&a8&$cho(b,64,16,x,-1365,0)&b8&b2.
#define psgb   @115v7 o4 $cho(a,64,16,x,-8192,0)&$vib(a,64,56,sin,0,100,45)
#define snarea l4o2cdc8c8dcdc8c8dcdc8c8dcdc8c8d16r16d16d16
#define snareb o2l4rdrdrdrd rdrdrdrd16r16r16r16
#define tomb   o4l16r1r1r1r2.rbag
#define hihata o2l8(g+g+g+g+g+g+g+g+)4
#define crcyma o3l4v12gggggggggggggggg
/******************************************************************************
#define md0c   @1l8o5c4<barab>c&c4<be&e2       f4.  g& g2 a4.b&b2 
#define shoc   l8v10e4 dcrcd e&e4 d<g&g2       a4. b& b2>c4.d&d2 
#define psgc   l8v10e4 dcrcd e&e4 d<g&g2       a4. b& b2>c4.d&d4&g4 
#define bassc  o3l8q6v13aaaaaaaa ggggggggq8 v15d4>d16r16<e& e>e16r16<e16>e16r< f4>f16r16<g& g>g16r16<g16>g16rv13
#define marc   @16o5l8q8v15a>ce<a>cega< gb>d<gb>dfg< fa>c<fa>cfg< gb>dgb>dga 
#define snarec l4(o2cd)3 cd16r16r16r16 r2.d
#define tomc   o4l16r1r2.rbgd r1r2.rbgd
#define cymc   l4o3v10d-r2.r1 v10l8d-4.f-&f-2 a4.d-&d-2
/******************************************************************************
#define bass   $bassa
#define syn0   $syn0a 
#define syn1   $syn1a 
#define sho    $shoa
#define ah0    $ah0a
#define ah1    $ah1a
#define md0    %d16$psga
#define md1    $psga
#define snare  $snarea
#define dum    o3@1%r15d-1r1r1r2.%l15d-4
.playsub
.next
#define bass   $bassa
#define syn0   $syn0a
#define syn1   $syn1a
#define sho    $shoa
#define ah0    $ah0b
#define ah1    $ah1b
#define md0    %d%0o4c1<b1%d16>u-8192a2.&a8 $psgb
#define md1    o3    a1g1         >u-7920a2.&a8 $psgb
#define snare  $snarea
#define dum    o3@1%r15d-1r1r1r2.%l15d-4
.playsub
.next
#define md0    v15%d%0$md0c
#define md1    v13%d4 $md0c
#define sho    o5 $shoc
#define bass   $bassc
#define syn0   @49v8o3a1g1 v13d4r8e2&e8 f4r8g2&g8
#define syn1   @49v8o3e1d1<v13a4r8b2&b8>c4r8d2&d8
#define snare  $snarec
#define tom    $tomc
#define dum    $cymc
.playsub
.next
/**** ‚“‚‹‚‰‚�  ****
#define md0    $md0c
#define md1    $md0c
#define sho    o5 $psgc
#define bass   $bassc
/#define psg    o6 $psgc
#define syn0  v8o3a1g1 v13d4r8e2&e8 f4r4 l16o1v15@119  a>cea>cea>c
#define syn1  v8o3e1d1<v13a4r8b2&b8>c4r4 l16o1v15@119r32 a>cea>cea>c32
#define snare  $snarec
#define tom    $tomc
#define dum    $cymc
.playsub
.next
/********************** ‚f‚t‚h‚s‚d‚q ******************************************
#define syn0   $syn0a
#define syn1   $syn1a
#define ah0    $ah0a
#define ah1    $ah1a
#define bass   $bassa
#define sho    $marc
#define md0    v/120v15%d%0@119     l16o4%r8$cho(a,64,8,x,0,-1365)&$cho(a,64,8,x,-1365,0)&$vib(a,64,48,sin,0,140,45) age>c<bge<a<ab>cf<bceg  (fab>c)2 fc<af afc<a (gb>c+d)2 gd<bgbgd<b
#define md1    v/120v15%d32u+50@119l16o4%r8$cho(a,64,8,x,50,-1300)&$cho(a,64,8,x,-1300,50)&a2. age>c<bge<a<ab>cf<bceg (fab>c)2 fc<af afc<a (gb>c+d)2 gd<bgbgd<b
#define snare  $snarea
#define dum    o3@1%r15d-1r1r1r2.%l15d-4
#define hihat  o6l8q3(b+b+b+b+)8
#define hit    r1r1r1r2r8v15o4%r15g8%l15b8>%r15d8
.playsub
.next
#define syn0   $syn0a
#define syn1   $syn1a
#define ah0    $ah0a
#define ah1    $ah1a
#define bass   o3l8q6aaaaaaaa   gggggggg ffffffff gdg>c4<beg
#define sho    $marc
#define md0  o4(ea)8 v14u-150(eaea)2v13u-300(eaea)2  v12u-450(eaea)2v11u-450(eaea)2u0     v15l8gdg>c4<beg
#define md1  o4(ea)8 v14u-100(eaea)2v13u-250(eaea)2    v12u-400(eaea)2v11u-550(eaea)2u0%d%0 v15l8d<b>dg4.<b>d
#define snare  $snarea
#define tom    o4r1r1r1v15l16bag RRRfe dR R8
#define dum    o3d-1r1r1r2.v15A8A8
#define hihat  o6l8(b+b+b+b+)8
.playsub
.next
/******************************************************************************
#define syn0   v12o4l8f>f<ff>f<ff>f< g>g<gg>g<gg>g< a>a<aa>a<aa>a
#define syn1   v11o4l8c>c<cc>c<cc>c< d>d<dd>d<dd>d< e>e<ee>e<ee>e
#define ah0    F1G1A1
#define ah1    C1D1E1
#define bass   ffffffff gggggggg aaaaaaaa 
#define sho    @9v14O2u0f4.&$cho(f,64,16,x,0,8192)&f4. u0g4.&$cho(g,64,16,x,0,8192)&g4. u0a1&$cho(a,64,16,x,0,8192)&a2
/#define mar    o5l8q8 fa>c<fa>cfg< gb>d<gb>dga< a>ce<a>cega< 
#define md0    u0v15o4 e4.<a8r8a8b8>c8&$cho(c,64,8,x,0,1000)& c4 u0c4.<b4 b4>c8<>u-8192a8&a2&$cho(a,64,16,x,-8192,0)&$vib(a,128,64,sin,0,100,30)
#define md1    u0v15o4 c4.<f8r8f8g8a8&$cho(a,64,8,x,0,1643)& a4 u0a4. g4 g4.>u-8192 e8&e2&$cho(e,64,16,x,-8192,0)&$vib(e,128,64,sin,0,100,30)
#define snare  $snarea
#define hihat  o6l8(b+b+b+b+b+b+b+b+)3
#define tom    o4r1r1r1v15l16  bag RRRo4fe cR R8
#define dum    o3r1r1r1r2.v15g+4
.playsub
.next
.end
#define bass   o1l8q6aaaaaaaa   gggggggg ffffffff gggggggg16.
#define syn0   v10o5l8  rrcc<b>crc rc<b>rcc<b>r rrcc<b>crc rc<b>rdd<b>
#define syn1   v10o4l8  rraagara   ragraagr rraagara ragrbbg
#define syn2   v10o5l8  rreedere   redreedr rreedere redrgge
#define sho    o4v15a1b1>c1d2.<
#define ah0    @53v13 o4  a1g1f1g2.&g8.
#define ah1       v13 o4  e1d1c1d2.&d8.
#define bassd  o2l4crc8c8r crc8c8r crc8c8r crc8c8
#define snare  o2l4rdrdrdrd rdrdrdrd16
#define hihat  o2l8(g+g+g+g+g+g+g+g+)3 g+g+g+g+g+g+g+g+16
#define dum    o3a1r1r1r2.d-8
.playsub
.end