update: small improvements to several tunes

parent 2882972e
......@@ -18,5 +18,5 @@ d2 $ s "~ [arpy(4,5,6)]"
# gain 0.8
-- Kick line
d3 $ s "808bd*4 <sn [cp ~ cp ~] sn cp*3>"
d3 $ s "808bd*2 <sn [cp ~ cp ~] sn cp*3>"
# n (irand 2)
-- 8-bit blues
hush
setcps 1.1
hush
d4 $ s "sn sn sn cp"
-- Baseline grid
d1 $ sound "<<arpy:1 arpy:2 arpy:3 arpy:1> arpy:2 arpy:1 <arpy:1 arpy:1 arpy:3 arpy:3>>"
d1
$ off 0 (|+ n 7)
$ off 0.25 (|+ 0)
$ s "<<arpy:1 arpy:2 arpy:3 arpy:1> arpy:2 arpy:1 <arpy:1 arpy:1 arpy:3 arpy:3>>"
-- Base rythm
d2 $ sound "[bd <sn:2 sn:2 sn:3*3>]/3 [bd sn*1 bd*1]/3"
......
......@@ -11,5 +11,20 @@ d1 $ s "[808lc 808lc/2 ~]"
d1 $ s "808mc*2"
d2 $ s "<808bd 808cy 808hc 808ht 808lc 808lt 808mc 808mt 808oh 808sd 909 ~ ~>"
-- Parov : Psychedelic jazz, Fusion, Klangwolke (Pt.2 pattern piano 2.15)
setcps 0.46
hush
d1 $ s "tech:5*4" # note (-4)
d2 $ s "[~ hh ~ <hh [hh ~ hh]>]*2"
d3 $ s "bd sn bd cp"
d1 $ s "superpiano*4" # velocity 0.5 # sustain 3
-- Flo the kid I see you smiling Piano riff
--samples:
-- 808 (6) 808bd (25) 808cy (25) 808hc (5) 808ht (5) 808lc (5) 808lt (5) 808mc (5) 808mt (5) 808oh (5) 808sd (25) 909 (1) ab (12) ade (10) ades2 (9) ades3 (7) ades4 (6) alex (2) alphabet (26) amencutup (32) armora (7) arp (2) arpy (11) auto (11) baa (7) baa2 (7) bass (4) bass0 (3) bass1 (30) bass2 (5) bass3 (11) bassdm (24) bassfoo (3) battles (2) bd (24) bend (4) bev (2) bin (2) birds (10) birds3 (19) bleep (13) blip (2) blue (2) bottle (13) breaks125 (2) breaks152 (1) breaks157 (1) breaks165 (1) breath (1) bubble (8) can (14) casio (3) cb (1) cc (6) chin (4) circus (3) clak (2) click (4) clubkick (5) co (4) coins (1) control (2) cosmicg (15) cp (2) cr (6) crow (4) d (4) db (13) diphone (38) diphone2 (12) dist (16) dork2 (4) dorkbot (2) dr (42) dr2 (6) dr55 (4) dr_few (8) drum (6) drumtraks (13) e (8) east (9) electro1 (13) em2 (6) erk (1) f (1) feel (7) feelfx (8) fest (1) fire (1) flick (17) fm (17) foo (27) future (17) gab (10) gabba (4) gabbaloud (4) gabbalouder (4) glasstap (3) glitch (8) glitch2 (8) gretsch (24) gtr (3) h (7) hand (17) hardcore (12) hardkick (6) haw (6) hc (6) hh (13) hh27 (13) hit (6) hmm (1) ho (6) hoover (6) house (8) ht (16) if (5) ifdrums (3) incoming (8) industrial (32) insect (3) invaders (18) jazz (8) jungbass (20) jungle (13) juno (12) jvbass (13) kicklinn (1) koy (2) kurt (7) latibro (8) led (1) less (4) lighter (33) linnhats (6) lt (16) made (7) made2 (1) mash (2) mash2 (4) metal (10) miniyeah (4) moan (1) monsterb (6) moog (7) mouth (15) mp3 (4) msg (9) mt (16) mute (28) newnotes (15) noise (1) noise2 (8) notes (15) numbers (9) oc (4) odx (15) off (1) outdoor (6) pad (3) padlong (1) pebbles (1) perc (6) peri (15) pluck (17) popkick (10) print (11) proc (2) procshort (8) psr (30) rave (8) rave2 (4) ravemono (2) realclaps (4) reverbkick (1) rm (2) rs (1) sax (22) sd (2) seawolf (3) sequential (8) sf (18) sheffield (1) short (5) sid (12) sine (6) sitar (8) sn (52) space (18) speakspell (12) speech (7) speechless (10) speedupdown (9) stab (23) stomp (10) subroc3d (11) sugar (2) sundance (6) tabla (26) tabla2 (46) tablex (3) tacscan (22) tech (13) techno (7) tink (5) tok (4) toys (13) trump (11) ul (10) ulgab (5) uxay (3) v (6) voodoo (5) wind (10) wobble (1) world (3) xmas (1) yeah (31)
hush
unsolo 3
solo 2
setcps 0.65
......@@ -22,7 +22,6 @@ $ n "<<0(3,8) [0|3 3|5 5 7|12]> [12 ~ 5 3]>"
|+ (choose [0,2])
|- 7 -- octave
# s "superpiano" # sustain 0.5
# gain 0.8
d2 $ "cp"
......@@ -36,8 +35,9 @@ $ s "<[[cr,bd] sn bd [hh*2 ~ hh]] [sn cr,mt cr,bd sn] [bd cr,mt,hh*2 sn mt,cr]>"
-- ligne de basse au feeling
d3
$ every 2 (rev) -- inverse une séquence sur deux
$ every 8 (hurry 2) -- accélère une séquence sur huit
$ note "<0 3(3,8) [5 ~ 3*2 5?]>"
$ chunk 4 (degrade) -- dégrade un quart de la séquence chaque cycle
$ every 1 (off 0.125 (|> choose [0])) -- accélère une séquence sur huit
$ up "<0 3(3,8) [5 ~ 3*2 5?]>"
# s "bass3"
-- impro synthé
......
......@@ -2,7 +2,9 @@ hush
setcps 0.5
once $ s "rave:0" # crush 4
once
$ every 2 (# cut "0.5")
$ s "rave:0"
d1 -- ligne de basse basique
$ every 4 (rev)
......@@ -38,15 +40,17 @@ $ s "superhammond*4"
(
off 0 (|- 7)
(
off 0.125 (|+ 0) "<0,5> <0 3> <0 5 0,12>"
off 0.125 (|+ 0)
"[0,5] <0 3> <0 5 0,12>"
)
)
# gain 0.9
# gain 0.7
d7 -- skatman
$ sometimes (# crush 0)
$ every 2 (fast 2)
$ s "rave:6"
# gain 0.4
-- TODO reuse/adapt: Kick rythm?
d5
......@@ -67,3 +71,14 @@ $ every' 4 1 (off 0 (|+ 1))
-- $ every 16 (hurry 2)
$ note "[[1|0] . 1*4]. . [0*3]"
# s "rave2:0"
-- Outro
d3 $ silence
d5 $ silence
d4 $ silence
d1 $ silence
d2 $ silence
......@@ -5,15 +5,25 @@ setcps 0.5
d1 $ s "bd*2 sn bd*2 <cp bd,cp sn,cp cp*2>"
d2 $ s "<birds glitch*2>" # n (irand 4)
# gain 0.4
d3 $ n "<[a5,cs5,e5,g5]*3 [d5,fs5,g5,a5]>"
# s "supersaw"
# gain 0.5
d4 $ jux rev $ every 4 rev $ n (off 0.125 (+5) "<a5,cs5 a5>")
d4
$ jux rev
$ every 4 rev
$ n (off 0.125 (+5) "<a5,cs5 a5>")
# s "superpiano"
# gain 0.75
d5 $ n (off 0.125 (+7) "<a5,cs5 a5>")
d5
$ every 4 (jux rev)
$ n
(
off 0.125 (+7)
"<a5,cs5 a5>"
)
# s "supersiren"
# gain "<0*3 0.5>"
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment