home *** CD-ROM | disk | FTP | other *** search
Text File | 1993-07-21 | 5.6 KB | 134 lines | [TEXT/ScoM] |
- (lib-drum track1 '(azhr zh zh zhr zh zh azi zh zhr azir zh zh azph zh zph zh azhr zh zh azhr zh azh azh zh zhr azir zh zh azph zh zph zh))
- (lib-drum track2 '(aqhu qh qh aqhu hrd h pi h ahu apiu h hr hd h hd aph aqhu pqh qh aqhu hrd h ph ah ahu apiu h hr hd hd hd h))
- (lib-drum track3 '(aqh qh qh qh hrd h api h h api h hr ahd h hd ph ah ph h ah qhrd ah aph h h api h hr aqhd hd hd h))
- (lib-drum track4 '(azth zth zth zh zqthr zth azi zh zh azi zh zhr azqh zh zh zh azthr zth zth azthr zqth azh azh zh zhr azir zh zh azqh zh zh zh))
- (lib-drum track5 '(p p p t p t c p a c a t a a t t p dp p t dp t c dp a c da t da a dt =))
- (lib-drum track6 '(dhl bd bdh bd bhl bd bdh bd dhlr bd bdhr bdr bhl bd bdhl bd lhd db hdb db lhb db hdb db rlhd db rhdb rdb lhb db lhdb db))
- (lib-drum track7 '(hj g hg bj bdhj g hj dhb hj bg dhg bj bhj dg dhj bdk jh g gh jb jhdb g jh bhd jh gb ghd jb jhb gd jhd kdb))
- (lib-drum track8 '(bh b dh p dh d bh b hq bq hq b dh b h b h b h b dh b h b dhq bq dhq b dh b dh b))
- (lib-drum track9 '(b b pbhi b bdh = b b b b bd = d b b d b b ihbp b hdb = b b b b db = d b b d))
- (lib-drum track10 '(hg = bh b h = bhd b bhgr r bhr b h = bh b gh = hb b h = dhb b rghb r rhb b h = hb b))
-
- (comment
-
- ; ---- track1
-
- (def-beat
- ; 1------------2------------3------------4------------
- beat0 1/16 "- - - - - - -- - - " (a)
- beat1 1/16 "------ -- --------------- ------" (h)
- beat2 1/16 " - - - " (i)
- beat3 1/16 " - - - - " (p)
- beat4 1/16 "- - -- - - -- " (r)
- beat5 1/16 "--------------------------------" (z)
- )
-
- ; ---- track2
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 "- - -- -- - --- " (a)
- beat1 1/16 " - - - - --- " (d)
- beat2 1/16 "------ -- --------------- ------" (h)
- beat3 1/16 " - - - " (i)
- beat4 1/16 " - - - - - - " (p)
- beat5 1/16 "---- ---- " (q)
- beat6 1/16 " - - - - " (r)
- beat7 1/16 "- - -- - - -- " (u)
- )
-
- ; ---- track3
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 "- - - - - - -- - - " (a)
- beat1 1/16 " - - - - --- " (d)
- beat2 1/16 "------ -- --------------- ------" (h)
- beat3 1/16 " - - - " (i)
- beat4 1/16 " - - - - - - " (p)
- beat5 1/16 "---- - - " (q)
- beat6 1/16 " - - - - " (r)
- )
-
- ; ---- track4
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 "- - - - - - -- - - " (a)
- beat1 1/16 "------ -- --------------- ------" (h)
- beat2 1/16 " - - - " (i)
- beat3 1/16 " - - - - " (q)
- beat4 1/16 " - - - - -- " (r)
- beat5 1/16 "--- -- ----- " (t)
- beat6 1/16 "--------------------------------" (z)
- )
-
- ; ---- track5
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 " - - -- - - -- " (a)
- beat1 1/16 " - - - - " (c)
- beat2 1/16 " - - - - - - " (d)
- beat3 1/16 "--- - - --- - - " (p)
- beat4 1/16 " - - - -- - - - - " (t)
- )
-
- ; ---- track6
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 " ------- ------- ------- -------" (b)
- beat1 1/16 "---- ------- ------- ------- ---" (d)
- beat2 1/16 "- - - - - - - - - - - - - - - - " (h)
- beat3 1/16 "- - - - - - - - - - " (l)
- beat4 1/16 " - -- - -- " (r)
- )
-
- ; ---- track7
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 " -- - - -- - -- - - -- -" (b)
- beat1 1/16 " - - - --- - - - ---" (d)
- beat2 1/16 " -- - -- - -- - -- - " (g)
- beat3 1/16 "- - - --- - - - - - - --- - - - " (h)
- beat4 1/16 "- -- - - -- - - -- - - -- - " (j)
- beat5 1/16 " - -" (k)
- )
-
- ; ---- track8
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat0 1/16 "-- -- - - - - - - - - - - - -" (b)
- beat1 1/16 " - -- - - - - - - " (d)
- beat2 1/16 "- - - - - - - - - - - - - - - - " (h)
- beat3 1/16 " - " (p)
- beat4 1/16 " --- --- " (q)
- )
-
- ; ---- track9
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 "----- ----- -- ----- ----- -- " (b)
- beat2 1/16 " - - - - - - - -" (d)
- beat3 1/16 " - - - - " (h)
- beat4 1/16 " - - " (i)
- beat5 1/16 " - - " (p)
- )
-
- ; ---- track10
-
- (define-rhythms
- ; 1------------2------------3------------4------------
- beat1 1/16 " -- --- -- -- -- --- -- --" (b)
- beat2 1/16 " - - " (d)
- beat3 1/16 "- - - - " (g)
- beat4 1/16 "- - - - - - - - - - - - - - - - " (h)
- beat5 1/16 " --- --- " (r)
- )
- )
-
-