@head {
        $time_sig 1/4
        $tempo 120
        $title "War Bit"
}

@body 
{

  %define meld { /l16/a3 /l16r2/a+3 /l16/c+4 /l16/c4 /l16r2/e-4 /l16/g-4
                 /l16/f4 /l16r2/f+4 /l16/a4 /l8/c4 /l4/a+4 /l8/r }

  %define mele { /l16/c4 /l16r2/c+4 /l16/f4 /l16/e-4 /l16r2/g-4 /l16/b-4
                 /l16/a4 /l16r2/a+4 /l16/c5 ( /l8/d+5 f+5 ) ( /l4/d-5 f5 ) /l8/r }

  %define bassd { /l16/e3 /l16/c+3 /l16/a+2 /l16/g+2 /l16/g2 /l16/g-2 
                  /l16/e-3 /l16/c+3 /l16/c3 /l16/a+2 /l16/g+2 /l16/f2 
                  /l8/c3 /l4/a+2 /l8/r }

  %define chord { ( /l16/e-3 g-3 b-3 ) /l3:16/r ( /l16/e-3 g-3 a-3 ) /l3:16/r
                  ( /l16/c+3 f+3 ) /l3:16/r ( /l16/d-3 f3 b-3 ) /l3:16/r /l4/r }

  %define drumd { /l4/bd /l4/hh_p /l4/hh_p /l4/hh_p /l4/hh_o }

  %define empty5 { /l4r5/r }
  
  %define drumfuckedup {
                ( /l16/tom_hm bd ride_bell ) /l16/cym_ride /l5:128/tom_lm /l3:128/tom_l ( /l16/cym_ride bd )
                ( /l16/cym_ride bd stick ) l16/cym_ride /l16/cym_chinese ( /l16/hh_c bd )
                ( /l16/tom_hm bd stick ) /l16/cym_ride /l5:128/tom_lm /l3:128/tom_l ( /l16/cym_ride ftom_h )
                /l16/hh_o /l16/hh_p ( /l8/bd hh_c ftom_l ride_bell ) ( /l4/bd hh_c ftom_l ride_bell )
                }

        @channel 1 mellow_d {
                $patch piano_grand_ac
                $volume 60
                %repeat 1 { ~meld ~meld/12/ ~empty5 ~empty5 }
                %repeat 1 { ~empty5 ~empty5 ~empty5 ~meld }
                %repeat 1 { ~meld ~meld/12/ ~empty5 ~empty5 }
        }

        @channel 2 mellow_e {
                $patch piano_grand_ac
                $volume 60
                %repeat 1 { ~empty5 ~empty5 ~empty5 ~empty5 }
                %repeat 1 { ~mele ~mele ~empty5 ~empty5 }
                %repeat 1 { ~mele ~mele ~empty5 ~empty5 }
        }

        @channel 3 basst {
                $patch piano_grand_ac
                $volume 120
                %repeat 1 { ~empty5 ~empty5 ~bassd/36/ ~bassd/24/ }
                %repeat 1 { ~empty5 ~empty5 ~bassd/36/ ~bassd/24/ }
                %repeat 1 { ~bassd/36/ ~bassd/24/ ~bassd/36/ ~bassd/24/ }
        }

        @channel 4 basst {
                $patch piano_grand_ac
                $volume 120
                %repeat 1 { ~empty5 ~empty5 ~bassd/36/ ~bassd/24/ }
                %repeat 1 { ~empty5 ~empty5 ~bassd/24/ ~bassd/12/ }
                %repeat 1 { ~bassd/24/ ~bassd/12/ ~bassd/24/ ~bassd/12/ }
        }

        @channel 10 drums {
                $patch 1
                $volume 1
                %repeat 4 { ~drumd }
                %repeat 4 { ~drumd }
                %repeat 4 { ~drumfuckedup }
        }

}

# Ebm Ab7 F#m Bbm

#