tek/demos/project.edn
2024-07-08 17:27:58 +03:00

68 lines
2.2 KiB
Clojure

(bpm 150)
(track { :name "Drums" :gain +0.0 }
(sampler { :name "DrumKit1" :dir "/home/user/Lab/Music/pak" }
(sample { :midi 34 :name "808" :file "808.wav" })
(sample { :midi 35 :name "KC1" :file "kik.wav" })
(sample { :midi 36 :name "KC2" :file "kik2.wav" })
(sample { :midi 38 :name "SN1" :file "sna.wav" })
(sample { :midi 40 :name "SN2" :file "sna2.wav" })
(sample { :midi 42 :name "HH1" :file "chh.wav" })
(sample { :midi 44 :name "HH2" :file "chh2.wav" }))
(phrase { :name "4 kicks" :beats 4 :steps 16 }
(:00 (36 128))
(:04 (36 128))
(:08 (36 128))
(:12 (36 128)))
(phrase { :name "5 kicks" :beats 4 :steps 16 }
(:00 (36 128))
(:04 (36 128))
(:08 (36 128))
(:12 (36 128))
(:14 (36 128)))
(phrase { :name "D Beat" :beats 4 })
;(:00 (44 :100) (:34 :100) (:35 :100))
;(:02 (42 :100) )
;(:04 (42 :080) (:38 :100) )
;(:06 (44 :120) )
;(:08 (42 :100) (:34 :100) (:35 :100))
;(:10 (42 :100) (:34 :100) (:35 :100))
;(:12 (44 :100) (:40 :100) )
;(:13 (44 :100) )
;(:14 (44 :100) )
;(:15 (42 :100) )))
(phrase { :name "Garage" :beats 4 }
(:00 (44 100) (36 100) (35 100))
(:01 (44 100))
(:02 (44 100) (35 100))
(:03 (44 100))
(:04 (44 100) (40 100))
(:06 (44 100))
(:07 (44 100) (34 100))
(:09 (44 100))
(:10 (44 100))
(:11 (35 100) (36 100))
(:12 (44 100) (40 100))
(:14 (44 100))))
(track { :name "Bass" :gain +0.0 }
(phrase { :name "Bass 1" :beats 4 })
(phrase { :name "Bass 2" :beats 4 })
(phrase { :name "Bass 3" :beats 4 })
(phrase { :name "Bass 4" :beats 4 })
(phrase { :name "Bass 5" :beats 4 })
(phrase { :name "Bass 6" :beats 4 })
(phrase { :name "Bass 7" :beats 4 })
(phrase { :name "Bass 8" :beats 4 }))
(track { :name "Lead" :gain +0.0 }
(phrase { :name "Lead 1" :beats 4 })
(phrase { :name "Lead 2" :beats 4 })
(phrase { :name "Lead 3" :beats 4 })
(phrase { :name "Lead 4" :beats 4 })
(phrase { :name "Lead 5" :beats 4 })
(phrase { :name "Lead 6" :beats 4 })
(phrase { :name "Lead 7" :beats 4 })
(phrase { :name "Lead 8" :beats 4 }))