90s_glassatm (5) 90s_matrix (7) 90s_megafx (338) 90s_synatm (35) 90s_weird (13) celtic_guitar80 (50) celtic_guitar85 (18) do setcps (85/60/4) let g = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.05 0.45 saw))) d1 $ g $ "k . k(3,8)" # "jazz" # gain 0.8 d2 $ g $ fast 2 $ "~ s" # "snare:29" # gain 0.85 d3 $ g $ slice 4 ("0 <~ 1> <0 2> < ~3>") $ "c/2" # "celtic_guitar85:12" # cut 4 # gain 0.8 d10 -- fx once $ "90s_megafx:132" # cut 10 -- # begin 0.2 # gain 0.75 -- 2: Il etait un paysan mineur -- 3: Puis un paysan majeur -- 5: Majeur et ses amis -- 4: Aigu ritournelle -- 7: Aigu -- 6: Resolu bass -- CELTIC TECHNO do setcps (120/60/4) let g = whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.45 0.15 saw)) d1 $ g $ mask "<t(1,4)!4 t(2,4)!3 t t!12 f!3 t(1,4) f!3 t(3,4,1) t!3 f>" $ "k*4" # "jazz" # gain 0.65 d3 $ g $ mask "<f!3 [f t] f!3 [f t f t] t!24>" $ fast "<1!7 2 1!4 2!4>" $ "hh*[8 <8 [8 <[4 <8 4>]!3 16>]>]" # gain 0.75 d4 $ g $ whenmod 64 32 (>| n "<20!3 21 20!2 21 21 20 21 20 20 21 21 20 21>") $ someCyclesBy "<0!32 1!32>" (>| n "4/2") $ "celtic_guitar80" # cut 4 # gain 0.67 d10 -- fx $ "~ <~!7 90s_megafx:335>" # gain 0.5 # room 0.8 # cut 10 -- ScratchPad: Play with scratch mixes! once $ "scratch_short" # gain 0.7 # n "<0 1 0 2>" # cut 2 once $ "scratch_med:4" # gain 0.9 # cut 9 resetCycles