-- La vibe: techno basse vibratoire do setcps (120/60/4) let gDjf = (whenmod 64 32 (# djf (slow 32 $ range 0 0.5 saw))) d1 $ gDjf $ mask "<[t f!3]!4 [t f t f]!4 t!24 f!4 t f!3 [t f]!4 t!24>" $ fast 4 $ "jazz" # gain 0.65 d2 $ gDjf $ "~ . <cp!7 cp*2> ~" # gain (slow 16 $ range 0.5 0.8 saw) # lpf 2000 d3 -- Bass marche nocturne $ sometimesBy "<0!16 1!16 0!3 1 0 0 1 0 0!3 1 1!3 0 1!16>" ( -- La Vibe juxBy 0.25 ( (|+ note 12) . (# room 0.1) . (# sz 0.1) . scramble 4 . ply 4 )) $ note ("c [~ f] . c <c <g b4>>") # octave 2 # legato 1 # "superpwm" # gain (slow 32 $ range 0.45 0.65 cosine) # pan 0.4 # room 0.2 # size 0.3 d4 $ often (stut 4 0.9 "<q e s>") $ mask "t . <t t? f t> t" $ "hh*[4 <8 <4 16>>]" # gain (slow 32 $ range 0.65 0.9 sine) # pan (slow 32 $ range 0.4 0.8 sine) # cut 4
