@head {
        $time_sig 9/8
        $tempo 100
        $title ""
}


# b < f+ . e f+ e d b
# a < e  . d e  d c+ a
# g < d  . c+ d c+ b g
# f+ < c+ . b c+ b a f+
# e < b . a b a g e
# d < a . b c+ g f+ d
# c+ < g . f+ g f+ e c+


@body
{
#  %define piano_part1a { /l8/b4 /l8/r /l8/f+4 /l8/r /l8/e4  
#                        /l8/f+4 /l8/e4 /l8/d4 /l8/b3 }

  %define piano_part1a { /l16/b4 /l16/r /l8/r /l8/f+4 /l8/r /l8/e  
                          /l3:32/f+4 /l32/r /l5:64/e4 /l3:64/r /l16/d4 /l16/r /l16/b3 /l16/r }

  %define piano_part1b { /l16/b4 /l16/r /l8/r /l8/f+4 /l8/r /l8/e4
                         /l3:32/f+4 /l32/r /l5:64/g4 /l3:64/r /l16/f+4 /l16/r /l16/e4 /l16/r }
			  
  
  %define piano_part1c { /l8/b4 /l8/r /l8/f+4 /l8/r /l8/e4
  			 /l8/f+4 ( /l8/e4 g4 ) ( /l8/d4 f+4 ) ( /l8/b3 e4 ) }

  %define piano_part2a {  /l8/c+5 /l8/r /l8/g4 /l8/r /l8/f+4
                         /l8/g4 /l8/f+4 /l8/e4 /l8/c+4 }

  %define piano_part2b {  /l8/c+5 /l8/r /l8/g4 /l8/r /l8/f+4
                           /l8/g4 /l8/a4 /l8/g4 /l8/f+4 }
			   
  %define piano_part3 { /l8/c+4 /l8/e4 /l8/g+4 /l8/f+4 /l8/e4 
                        /l8/f+4 /l8/e4 /l4/c+4 }

  %define piano_part4 { /l8/f+3 /l8/g+3 /l8/a3 /l8/b3 /l8/a3 /l8/g+3 /l8/r /l8/d+4 /l8/g+4 }			

  %define qiano_part1a { /l16/d6 /l16/f+6 /l8/b6 /l8/b5 /l64/b6 /l3:64/c+7 /l16/b5 /l32/c+7 /l3:32/d7 
                        /l8/c+7 /l8/b6 /l8/a6 /l64/d6 /l7:64/e6 }

  %define qiano_part1b { /l16/c+6 /l16/f+6 /l8/a6 /l64/g5 /l7:64/a5 /l16/b6 /l16/a5 /l8/c+7
                          /l8/e7 /l8/d7 /l64/e7 /l7:64/c+7 /l8/b6 }
			  
#  %define qiano_part1c { /l16/

  %define qiano_part2a { /l16/f+6 /l16/g6 /l8/f+6 /l4/e6 /l8/b5 /l8/g5 /l4/e5 /l8/c+5 }

  %define qiano_part2b { /l3:32/c+4 /l3:32/d4 /l3:32/e4 /l3:32/f+4 /l3:32/g4 /l3:32/a4
                         /l3:32/b4 /l3:32/c+5 /l3:32/d5 /l3:32/e5 /l3:32/f+5 /l3:32/g5 }
  
  %define qiano_part3c { /l16/c+5 /l16/g+5 /l32/b5 /l32/c+6 /l3:16/e6
                         /l16/f+4 /l32/e5 /l32/f+5 /l16/a5 /l3:16/c+6
			 /l16/e4 /l16/e5 /l32/f+5 /l32/g+5 /l3:16/c+6 }

  %define qiano_part3b { /l8/e5 /l8/e6 /l16/e6 /l16/g+6
                         /l8/a6 /l8/a5 /l16/g+5 /l16/a5
			 /l32/c+6 /l3:32/b5 /l32/a5 /l3:32/g+5 /l32/f+5 /l3:32/e5 }

  %define qiano_part3a { /l16/c+5 /l32/c+5 /l32/r /l16/d5 /l8/c+5 /l16/b4
                         /l16/f+4 /l32/f+4 /l32/r /l16/e5 /l16/d5 /l16/c+5 /l16/b4
			 /l16/e4 /l32/e4 /l32/r /l16/e4 /l16/e4 /l16/f+4 /l16/b4 }

  %define qiano_part3d { /l8/e5 /l8/e6 /l16/e6 /l16/g+6
                         /l8/a6 /l8/a5 /l16/g+5 /l16/a5
			 ( /l32/c+6 a5 ) ( /l3:32/b5 g+5 ) ( /l32/a5 f+5 ) ( /l3:32/g+5 e5 ) 
			 ( /l32/f+5 c+5 ) ( /l3:32/e5 b4 ) }
			 
  %define qiano_part4a { /l8r7/r /l16/d+5 /l16/e+5 /l8/g+5 }

  %define qiano_part4b { /l8/a5 /l8/g+5 /l8/c+6 /l8/b5 /l3:32/r /l32/c6 /l8/c+6 /l8/r /l8/d+6 /l8/e6 }

  %define qiano_part4c { /l8/e6 /l8/f+6 /l8/d+6 /l3:32/r /l32/c6 /l8/c+6 /l8/r /l8/r /l16/d+5 /l16/e+5 /l8/g+5 } 

  %define qiano_part4d { /l8r9/r }

  %define bass_part1a { /l32/d3 /l3:32/b2 /l8/b2 /l8/d3 /l8/d3 /l8/e3 
                        /l8/e3 /l32/e3 /l3:32/f+3 /l8/e3 /l8/d3 }

  %define bass_part1b { /l32/d3 /l3:32/b2 /l8/b2 /l8/d3 /l8/d3 /l8/e3
                        /l8/e3 /l32/e3 /l3:32/f+3 /l3:64/a3 /l3:64/g3 /l2:64/f+3 /l3:64/g3 /l3:64/e3 /l2:64/d3 }
		       
  %define bass_part2b1 { /l32/a2 /l3:32/e3 /l8/e3 /l8/g3 /l8/g3 /l8/a3
                         /l8/a3 /l32/a3 /l3:32/b3 /l8/b3 /l8/b3 }
  %define bass_part2b2 { /l32/a2 /l3:32/e3 /l8/e3 /l8/g3 /l8/g3 /l8/a3
                         /l8/a3 /l32/a3 /l3:32/b3 /l8/a3 /l8/g3 }
			 
  %define bass_part2a { /l16/c+3 /l16/c+3 /l8/r /l5:64/g2 /l3:64/b2 /l8/c+3 
                       /l8/r /l8/r /l16/c+3 /l16/a2 /l8/r /l3:64/a2 /l3:64/b2 /l2:64/c+3 }

  %define bass_part3 { /l8/c+4 /l8/c+4 /l16/b3 /l16/g+3 
                       /l8/f+3 /l8/f+3 /l16/g+3 /l16/f+3 
		       /l8/e3 /l8/e3 /l16/e4 /l16/d+4 }

  %define drum_part1 { ( /l8/bd hh_c ) ( /l8/bd hh_o sd_ac ) /l8/hh_o ( /l3:64/hh_c ftom_l ) /l3:64/hh_c /l2:64/hh_c ( /l8/bd hh_o )
                       ( /l3:64/bd hh_o sd_ac ) /l3:64/hh_c /l2:64/r /l8/hh_o ( /l3:64/bd hh_o ftom_l ) /l3:64/r /l2:64/hh_o /l8/hh_c }
		    
  %define drum_part1b { ( /l8/hh_o bd ) /l8/hh_c /l8/hh_c ( /l3:64/hh_o bd ) /l3:64/r /l2:64/hh_o /l8/hh_c /l8/hh_c /l8/hh_o /l8/hh_c ( /l3:64/hh_c bd ) /l3:64/r /l2:64/hh_o }

  %define drum_part2a { ( /l8/hh_o bd ) /l8/hh_c /l8/r ( /l3:64/hh_o bd ) /l3:64/r /l2:64/hh_o /l8/hh_c 
                       /l8/r /l8/hh_o /l8/hh_c ( /l3:64/hh_c bd ) /l3:64/r /l2:64/hh_o }

  %define drum_part2b { ( /l8/hh_o bd ) ( /l8/hh_c sd_ac ) /l8/cym_crash ( /l3:64/hh_o bd ) /l3:64/r /l2:64/hh_o ( /l8/hh_c sd_ac ) 
                       /l8/cym_crash /l8/hh_o ( /l8/hh_c sd_ac ) ( /l3:64/hh_c bd sd_ac ) /l3:64/r /l2:64/hh_o }

  %define drum_part3 { /l3:32/sd_ac /l32/cym_crash 
                       ( /l8/hh_o cym_ride ) 
		       ( /l16/sd_ac hh_c ride_bell ) /l16/bd 
		       ( /l8/sd_ac bd ) 
                       /l8/hh_o 
		       ( /l8/sd_ac hh_c ) 
		       ( /l8/sd_ac cym_ride ) 
		       /l3:32/sd_ac /l32/cym_crash 
		       ( /l8/sd_ac cym_ride ) }

  @channel 1 A {
    $patch piano_grand_ac
    $volume 60
    $pan 96
    %repeat 3 { ~piano_part1a ~piano_part1b }
    %repeat 2 { ~piano_part1a }
    %repeat 2 { ~piano_part2a ~piano_part2b }
    %repeat 4 { ~piano_part1a }
    %repeat 4 { ~piano_part3 }
    %repeat 1 { /l9:8/r }
    %repeat 2 { ~piano_part2a ~piano_part2b }
    %repeat 2 { ~bass_part1a/48/ ~bass_part1b/48/ }
    %repeat 8 { ~piano_part4 }
}

@channel 2 B {
    $patch piano_grand_ac
    $volume 60
    $pan 32
    %repeat 3 { ~piano_part1a/12/ ~piano_part1b/12/ }
    %repeat 2 { ~piano_part1b/12/ }
    %repeat 2 {  ~piano_part2a/12/ ~piano_part2b/12/ }
    %repeat 4 { ~piano_part1b/12/ }
    %repeat 4 { ~piano_part3/12/ }
    %repeat 1 { /l9:8/r }
    %repeat 2 { ~piano_part2a/12/ ~piano_part2b/12/ }
    %repeat 2 { ~bass_part1a/36/ ~bass_part1b/36/ }
    %repeat 1 { /l9:8/r ~qiano_part4a ~qiano_part4b ~qiano_part4c }
    %repeat 1 { ~qiano_part4d ~qiano_part4a ~qiano_part4b ~qiano_part4c }
}

  @channel 3 C {
      $patch 32
      $volume 60
      $pan 64
      %repeat 4 { /l9:8/r }
      %repeat 2 { ~qiano_part1a/-12/ ~qiano_part1b/-12/ }
      %repeat 2 { /l9:8/r /l9:8/r }
      $pan 48
      %repeat 2 { ~qiano_part1a/-12/ ~qiano_part1b/-12/ }
      %repeat 1 { ~qiano_part3a ~qiano_part3b ~qiano_part3c ~qiano_part3d }
      %repeat 1 { /l9:8/r }
#      %repeat 2 { ~qiano_part2a ~qiano_part2b }
      %repeat 2 { /l9:8/r /l9:8/r }
#      %repeat 2 { ~qiano_part1a/-12/ ~qiano_part1b/-12/ }
}


  @channel 4 D {
      $patch 19
      $volume 40
      $pan 64
      %repeat 4 { /l9:8/r }
#      %repeat 6 { ~qiano_part1a/-12/ ~qiano_part1b/-12/  }
      $pan 80
      %repeat 4 { /l9:8/r }
      %repeat 2 { /l9:8/r /l9:8/r }
      %repeat 2 { ~qiano_part1a/-12/ ~qiano_part1b/-12/ }
      %repeat 1 { ~qiano_part3a/-12/ ~qiano_part3b/-12/ ~qiano_part3c/-12/ ~qiano_part3d/-12/ }
      %repeat 1 { /l9:8/r }
      %repeat 2 { /l9:8/r /l9:8/r }
#      %repeat 2 { ~qiano_part1a/-12/ ~qiano_part1b/-12/ }
		  

  }

  @channel 9 I {
    $patch bass_fg
    $volume 120
    %repeat 2 { /l9:8/r }
    %repeat 6 { /l9:8/r }
    %repeat 4 { /l9:8/r }
    %repeat 2 { ~bass_part1a/-12/ ~bass_part1b/-12/ }
    %repeat 4 { ~bass_part3/-12/ }
    %repeat 1 { /l9:8/r }
    %repeat 4 { /l9:8/r } 
    %repeat 2 { ~piano_part1a/-24/ ~piano_part1b/-24/ }
	    
  }
					
  @channel 9 I {
      $patch bass_fg
      $volume 120
      %repeat 2 { /l9:8/r }
      %repeat 3 { ~bass_part1a ~bass_part1b }
      %repeat 1 { ~bass_part2a ~bass_part2b1 }
      %repeat 1 { ~bass_part2a ~bass_part2b2 }
      %repeat 2 { ~bass_part1a ~bass_part1b }
      %repeat 4 { ~bass_part3 }
      %repeat 1 { /l9:8/r }
      %repeat 1 { ~bass_part2a ~bass_part2b1 }
      %repeat 1 { ~bass_part2a ~bass_part2b2 }
      %repeat 2 { ~piano_part1a/-12/ ~piano_part1b/-12/ }
		  
}
  
  @channel 10 J {
      $patch 1
      $volume 60
      %repeat 3 { /l9:8/r }
      %repeat 1 { ~drum_part1 }
      %repeat 4 { ~drum_part1b }
      %repeat 2 { ~drum_part2a ~drum_part2b }
      %repeat 4 { ~drum_part1b }
      %repeat 4 { ~drum_part3 }
      $volume 28
      /l8/r
      $volume 25
      /l8/r
      $volume 30
      /l8/cym_ride
      $volume 35
      ( /l8/cym_ride bd )
      $volume 40
      /l8/cym_ride
      $volume 45
      ( /l8/cym_ride bd )
      $volume 50
      ( /l16/cym_ride bd )
      /l16/cym_ride
      $volume 55
      ( /l3:64/cym_ride bd )
      /l3:64/cym_ride 
      /l2:64/cym_ride
      $volume 60
      ( /l32/cym_ride bd )
      /l32r3/cym_ride
			

      %repeat 2 { ~drum_part2a ~drum_part2b }
      %repeat 4 { ~drum_part1b }
	    

}

}