let melody = slow 6 $ "0 2 [4 8 .] [3 4 3] 8 4 9" scalePattern = slow 12 "" d1 $ note ((scaleP scalePattern $ off 4 ((+ 2 ).slow 2) $ off 1 (inversion.slow 2) $ off 3 (inversion.slow 3) $ off 1.5 ((+ 2).rev.slow 2) $ generateMelodicSeed ))#s "[pe-gtr:10,midi]" #gain 1 #orbit 0 #midichan 1 do cps (86/60/2) d9 $ midicmd "midiClock*48" # s "midi"
index > /home/xinniw/Documents/garden/Songwriting.md

Contents


index > /home/xinniw/Documents/garden/Songwriting.md