refactor: id-ification

blocks/drums.tidal

@@ -37,10 +37,10 @@ d9 $ "808bd:1"
 # gain 0.9
 
 d2
-$ every 2 (off (6/12) (|+0))
-$ every' 2 1 (off (3/12) (|+0))
-$ every' 4 1 (off (5/12) (|+0))
-$ every' 4 1 (off (6/12) (|+0))
+$ every 2 (off (6/12) id)
+$ every' 2 1 (off (3/12) id)
+$ every' 4 1 (off (5/12) id)
+$ every' 4 1 (off (6/12) id)
 $ every' 8 6 (# n "2 0 0")
 $ every' 8 7 (# gain 0)
 $ s "dr"
@@ -53,27 +53,27 @@ $ degrade
 $ s "dr dr dr dr dr dr sn ~ dr dr dr dr sn"
 
 d1
-$ every 1 (off (8/16) (|+ 0))
-$ every 2 (off (9/16) (|+0))
-$ every 2 (off (10/16) (|+0))
-$ every 2 (off (14/16) (|+0))
--- $ every 4 (off (15/16) (|+0))
+$ every 1 (off (8/16) id)
+$ every 2 (off (9/16) id)
+$ every 2 (off (10/16) id)
+$ every 2 (off (14/16) id)
+-- $ every 4 (off (15/16) id)
 $ every' 4 3 (# pan 1)
 $ every' 4 4 (# pan 1)
 $ s "dr"
 -- $ every 1 (# s "~")
 
 d1 -- progression geometrique de tk
-$ every 1 (off 0.125 (|+ 0))
-$ every 2 (off 0.5 (|+ 0))
-$ every 4 (off 0.375 (|+ 0))
-$ every 8 (off 0.75 (|+ 0))
-$ every 16 (off 0.875 (|+ 0))
+$ every 1 (off 0.125 id)
+$ every 2 (off 0.5 id)
+$ every 4 (off 0.375 id)
+$ every 8 (off 0.75 id)
+$ every 16 (off 0.875 id)
 $ "jazz:3"
 
 d1 -- batterie chaloupee
-$ every 4 (off 0.125 (|+0))
-$ every 4 (off 0.25 (|+0))
+$ every 4 (off 0.125 id)
+$ every 4 (off 0.25 id)
 $ euclid 3 8
 $ s "dr"
 # n 0

blocks/melody.tidal

@@ -10,7 +10,7 @@ $ s "<arpy*8 ~>"
 # gain 0.8
 
 d7
-$ someCycles (degrade . off 0.5 (|+ 0))
+$ someCycles (degrade . off 0.5 id)
 $ s "~ dsynth(<4 3 5>,8)"
 -- $ off 0.25 (|- note 7)
 # note (scale "major" "0 7")

blocks/voice.tidal

@@ -11,7 +11,7 @@ $ whenmod 32 18 (# gain 0.6)
 $ whenmod 32 20 (# gain 0.4)
 $ whenmod 32 16 (# gain 0.7)
 $ sometimes (# gain (sine - 0.3))
-$ chunk 4 (off 0.625 (|+ 0))
+$ chunk 4 (off 0.625 id)
 $ chop 4
 $ s "moan"
 # note "[4,8]"

live/FOSDEM/techno_du_soir.tidal

@@ -29,7 +29,7 @@ $ s "bass3(<1 3>,8)"
 
 d5
 $ whenmod 128 64 (jux rev)
-$ whenmod 32 24 (off 0.125 (|+ 0))
+$ whenmod 32 24 (off 0.125 id)
 $ every 2 (# gain 0.8)
 $ rarely (rev)
 $ sometimes (superimpose (|-| note 7))

live/amazonbeat.tidal

@@ -16,7 +16,7 @@ d2
 $ whenmod 64 48 (# silence)
 $ whenmod 32 24 (# n 4)
 $ whenmod 16 8 (rev)
-$ sometimes (off 0.125 (|+ 0))
+$ sometimes (off 0.125 id)
 $ s "bass3(<<1 5> 3>, 8)"
 # note "0 5 7"
 # pan 0.2
@@ -30,7 +30,7 @@ $ s "bass3(<<1 5> 3>, 8)"
 d3
 $ whenmod 8 7 rev
 $ whenmod 8 6 (# note "0 4 7 4")
-$ whenmod 8 6 (off 0.125 (|+ 0))
+$ whenmod 8 6 (off 0.125 id)
 -- $ sometimes (jux rev)
 $ sometimes (off 0.25 (|+ "<0 7>"))
 $ sometimes (off 0.5 rev)

live/autotune.tidal

 
 d1
 -- $ every 2 (0.125 ~>)
--- $ every 4 (off 0.125 (|+0))
+-- $ every 4 (off 0.125 id)
 -- $ every' 8 7 (rev)
 -- $ every' 8 8 (# gain 0)
 -- $ every' 16 15 (# gain 0)
--- $ every' 16 16 (off 0.25 (|+0))
+-- $ every' 16 16 (off 0.25 id)
 -- $ every 2 ""
 $ every 4 (degrade)
-$ every 4 (off 0.125 (|+0))
+$ every 4 (off 0.125 id)
 $ every' 8 7 (sometimes $ hurry 2)
 $ s "house(4,4)"
 

live/bdmania.tidal

@@ -5,7 +5,7 @@ $ sound "bd"
 
 d2 -- tic toc
 $ someCycles (degrade . fast 2)
-$ every 8 (off (1/8) (|+0))
+$ every 8 (off (1/8) id)
 $ every' 16 7 degrade
 $ every 16 (# gain 0)
 $ s "bd(5,8)"
@@ -27,7 +27,7 @@ $ sound "bd"
 # gain 0.5
 
 d8 -- helico
-$ every' 4 3 (off 0.125 (|+ 0))
+$ every' 4 3 (off 0.125 id)
 $ every 8 (# gain 0)
 $ every' 8 7 (# gain 1.2)
 $ rev $ iter 4 $ loopAt 4 $ chop 16 $ "bd"

live/bodgan2.tidal

@@ -3,7 +3,7 @@ d1 $ s "dr(<2 <8 1>>,4)"
 d1 $ s "bogdan"
 
 d1
-$ whenmod 8 4 (off 0.125 (|+ 0))
+$ whenmod 8 4 (off 0.125 id)
 $ s "bogdan(<<1 2> 4>, 2)"
 # gain 1.5
 
@@ -15,7 +15,7 @@ $ s "hh(<2 4>,4) ~ hh <~ hh>"
 d3
 $ fast 2
 $ degradeBy 0.3
-$ superimpose (off (choose [0.25, 0.5]) (|+ 0))
+$ superimpose (off (choose [0.25, 0.5]) id)
 $ s "bogdan:2"
 # note (scale "dorian" (irand 7))
 # gain 0.8

live/briquets.tidal

@@ -20,9 +20,9 @@ $ whenmod 64 31 ( -- étincelle
     const $ s "[lighter:6/2,pebbles]" # release 0.2 # speed 2 # attack 0.3
 )
 $ sometimesBy 0.4 (const $ s "wind:1?,wind?" # speed 0.5 # gain 0.6) -- parfois du vent
-$ sometimes (off 0.5 (|+ 0)) -- retente
-$ sometimes (off 0.25 (|+ 0)) -- retente
-$ almostNever (off 0.375 (|+ 0)) -- retente lentement
+$ sometimes (off 0.5 id) -- retente
+$ sometimes (off 0.25 id) -- retente
+$ almostNever (off 0.375 id) -- retente lentement
 $ almostNever (off 0.125 (|> 3)) -- dérape
 $ sometimesBy 0.3 (|> 6) -- grosse étincelle
 $ euclid "<1 0 0 0 1 1 0 0 1 1 1 0 1 1 1 1 1 2 1 2 4 2 4 6 7 6 7 8 7 6 8 8>" 8

live/briquets2.tidal

@@ -2,7 +2,7 @@ setcps 0.5
 
 d1
 $ fast 2
-$ sometimes (off 0.5 (|+ 0)) -- retente
+$ sometimes (off 0.5 id) -- retente
 $ almostNever (off 0.125 (|> 3)) -- dérape
 $ euclid "<1 2 4 8>" 8
 $ s "lighter"
@@ -29,7 +29,7 @@ d7 $ s "<[bd ~ ~ [~ bd]] [[bd ~ bd bd] [~ bd bd ~] ~ bd]>"
 
 d8
 -- $ sometimes (off 0.125 (|+ 1))
-$ sometimes (off 0.125 (|+ 0))
+$ sometimes (off 0.125 id)
 $ somecyclesBy 0.8 (fast 1.5) $ somecycles (slow 2)
 $ s "bass3(<2 4 2 6>,8)"
 # note (scale "minPent" "3 3 4 0")

live/chill.tidal

@@ -10,15 +10,15 @@ $ chop 4 $ s "lighter:1*4"
 # pan (0.25 + sine / 2)
 
 d1
-$ often (off 0.25 (|+0))
-$ rarely (off 0.125 (|+0))
+$ often (off 0.25 id)
+$ rarely (off 0.125 id)
 $ sometimes rev
 $ s "<dr dr*2> <hh:0 <hh:0 ~>>"
 
 d2
 -- $ every 2 ()
 -- $ every' 2 1 (# gain 0)
-$ every 2 (off 0.125 (|+ 0))
+$ every 2 (off 0.125 id)
 -- $ degrade
 -- $ euclid "<1 3>" 8
 $ s "bass3"
@@ -42,8 +42,8 @@ $ s "[bass3*2 ~] . [bass3*2] . ~"
 d1
 $ rarely (# n 2) -- parfois cuivre
 $ every 8 (# s "hh:0")
-$ every 2 (off 0.125 (|+ 0))
-$ every 4 (off 0.5 (|+ 0))
+$ every 2 (off 0.125 id)
+$ every 4 (off 0.5 id)
 $ euclid 1 2
 $ s "dr" # n 0
 

live/chill/bad_bad_guy.tidal

@@ -23,8 +23,8 @@ $ note ("<<0 3> <0 3> <0 -4> <0 -4>>" + "0 7 ~ 0 6 7 6 3")
 
 d3 -- pont 80 drums
 $ fast 2
-$ someCycles ((off 0.625 (|+ 0)) . (# n "3"))
-$ off 0.125 (|+ 0)
+$ someCycles ((off 0.625 id) . (# n "3"))
+$ off 0.125 id
 $ s "e"
 # s "electro1"
 # n "2"

live/chill/dub.tidal

@@ -57,7 +57,7 @@ $ "h?*8"
 d7 -- lead second
 $ sometimes (|+ note 7)
 $ sometimes (|- note 7)
-$ someCycles (degrade . off 0.5 (|+ 0))
+$ someCycles (degrade . off 0.5 id)
 $ s "~ dsynth(<4 3 5>,8)"
 # note (scale "major" "0 7")
 |- note "<12 9 7 12 5>" - 21

live/chill/major_nostalgia.tidal

@@ -6,27 +6,24 @@ $ every 4 (sometimes (# s "cpu:6"))
 $ s "[sosKick,[hh*2 dr:1 hh dr:1]]"
 
 d2 -- drums
-$ whenmod 16 8 (# gain (1.2 * tri))
-$ whenmod 16 6 (# gain (1 * tri))
-$ whenmod 16 4 (# gain (0.9 * tri))
-$ whenmod 16 0 (# gain (0.8 * tri))
-$ someCycles (fast 2)
+-- $ someCyclesBy (slow 16 $ sine) (fast 2)
 $ euclid "<2 4 2 6>" "<4 8>"
 $ "hh:12"
 
 d3 -- basse
 $ whenmod 8 4 (|- note 5) -- quinte
-$ someCyclesBy 0.2 ((# room 0.2) . (# dry 8))
+$ someCyclesBy 1 ((# size 0.5) . (# dry 1))
 $ someCycles (# attack 0.2)
 $ note (scale "major" "0(3,8) [<3 3 -6 -6> -2(<1 2 4>, 6)]" - 7)
 # s "bassWarsaw"
+# gain 1.1
 
 d4 -- lead piano
-$ whenmod 32 16 (someCycles $ degrade)
+-- $ whenmod 32 16 (someCycles $ degrade)
 $ whenmod 8 4 (|- note 5) -- quinte
-$ someCycles (jux rev)
-$ whenmod 16 14 (|+ note 15)
-$ whenmod 16 10 (|- note 3)
+-- $ someCycles (jux rev)
+-- $ whenmod 16 14 (|+ note 15)
+-- $ whenmod 16 10 (|- note 3)
 $ whenmod 4 2 (|- note 7)
 $ someCycles (off 0.125 (|+ note "<12 7 12 12>"))
 $ someCycles (off 0.25 (|- note 5))
@@ -34,40 +31,29 @@ $ note (scale "major" "~ [3,<8 7 5>,10]" - 7)
 # s "superpiano"
 # sustain 2
 # velocity 0.8
-# gain 0.9
+-- # gain 0.7
 
 d5 -- choeur fou
-$ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>")
-$ whenmod 64 32 (# gain 0.9)
+$ whenmod 64 60 (# gain (slow 4 $ (0.9 - tri * 0.4)))
 $ whenmod 8 4 (|- note 7) -- quinte
--- $ superimpose ((|+ note 5) . degrade) -- variations quinte
-$ someCyclesBy 0.2 rev
-$ chop "<2 4 6 8>"
-$ off 0.25 (|+ 7)
-$ s "moogBass" # cut 1
-# note (scale "major" "<1 0 [1 3] ~>")
-
-
-d5 -- choeur fou
--- $ whenmod 64 60 (# gain "<0.8 0.75 0.7 0.65>")
--- $ whenmod 64 32 (# gain 0.9)
-$ whenmod 8 4 (|- note 7) -- octave inferieure
-$ superimpose ((|+ note 5) . degrade) -- variations quinte
+-- $ sometimesBy (slow 32 $ sine) -- variations quinte
+  -- superimpose ((|+ note 5) . degrade)
 $ someCyclesBy 0.2 rev
 $ chop "<2 4 6 8>"
 $ off 0.25 (|+ 7)
 $ s "moogBass" # cut 1
 # note (scale "major" "<1 0 [1 3] ~>")
+# gain 1.1
 
 d6 -- final aigu
 $ whenmod 64 32 degrade
+$ whenmod 8 4 rev
 $ sometimes degrade
-$ sometimes rev
-$ whenmod 64 48 (# gain 0.8)
 $ off 0.25 (|- note 7)
 $ off 0.125 (|- note 7)
 $ off 0.125 (|- note 3)
 $ note (scale "major" "0 3 7 12")
 # s "~ sosBell ~"
+# gain 0.8
 # release 0.5
-# gain 0
+-- # gain 0

live/chill/neige.tidal

@@ -12,7 +12,7 @@ $ someCyclesBy 0.1 (# s "snare:7") -- tok
 $ someCyclesBy 0.1 (# s "snare:6") -- frappe
 $ someCyclesBy 0.3 (# s "snare:5") -- etouffe
 $ whenmod 16 10 (# s "sn:1")
-$ someCycles (off 0.125 (|+ 0))
+$ someCycles (off 0.125 id)
 $ s "~ snare"
 # gain 0.6
 
@@ -31,7 +31,7 @@ $ n (scale "ma" "<[0,3,7] [0,3,5] [0,3,4] [0,3,2] [0,3]>")
 d5
 $ slow 2
 $ whenmod 16 8 (degrade)
-$ sometimes (off 0.125 (|+ 0))
+$ sometimes (off 0.125 id)
 $ sometimes (off 0.25 (|+ note 3))
 $ sometimes (|+ note 2)
 $ note "<0 0*2 0?*4> <3?*4 3*2 3>"

live/china.tidal

@@ -15,7 +15,7 @@ $ s "808hc*2"
 # gain (choose [0.7, 0.8, 0.9, 1])
 
 d3
-$ often (fast 2 . off 0.125 (|+ 0) . (# gain 0.6))
+$ often (fast 2 . off 0.125 id . (# gain 0.6))
 $ s "bass3(<<2 3> 4>,4)"
 # note (scale "chinese" "0 1 3 5")
 # gain tri

live/clinique.tidal

@@ -8,10 +8,10 @@ $ s "clubkick"
 # n "<0 0 0 4>"
 
 d2 -- basse au feeling
-$ whenmod 8 7 (off 0.5 (|+ 0))
+$ whenmod 8 7 (off 0.5 id)
 $ whenmod 8 6 (# gain 0.8)
 $ whenmod 8 4 (rev)
-$ often (off 0.125 (|+ 0))
+$ often (off 0.125 id)
 $ rarely (off 0.25 (# note 0))
 $ s "bass3(<1 <3 5>>,8)"
 # note "0 <12 5> 7"

live/contrevent.tidal

@@ -43,8 +43,8 @@ $ s "superpiano(<<1 5> 3>,8)"
 d4 -- drums du mouvement
 $ sometimes (# n (choose [1,5,7])) -- 1,2,5,7
 $ often (jux rev)
-$ rarely (off 0.5 (|+0))
-$ sometimes (off 0.25 (|+0))
+$ rarely (off 0.5 id)
+$ sometimes (off 0.25 id)
 $ s "<[dr*3 ~] {dr dr dr dr dr ~ ~ ~}>"
 # gain 0.9
 

live/digestion_roll.tidal

@@ -5,7 +5,7 @@ solo 1
 d1
 $ whenmod 16 14 (# silence)
 $ whenmod 16 8 (degradeBy "0.2 0")
-$ whenmod 4 1 (sometimes (off 0.25 (|+ 0)))
+$ whenmod 4 1 (sometimes (off 0.25 id))
 $ every 4 (fast 2)
 $ s "kicklinn*2"
 # gain 0.9
@@ -14,7 +14,7 @@ d2
 $ degradeBy 0.05
 $ whenmod 8 4 (off 0.125 (# s "808oh"))
 $ every' 4 3 (fast 8)
-$ every' 4 1 (off 0.125 (|+ 0))
+$ every' 4 1 (off 0.125 id)
 $ s "dr"
 
 d3

live/dnb.tidal

@@ -7,7 +7,7 @@ $ s "kicklinn"
 
 d1
 $ every 8 (rev)
-$ every 4 (off 0.125 (|+0))
+$ every 4 (off 0.125 id)
 $ s "dr*4 <dr*4 <dr*8 [dr*4 cp*2]>>"
 
 -- poum: sn
@@ -25,7 +25,7 @@ $ every 16 (rev)
 $ every 8 (hurry 2)
 $ chunk 4 (# crush 2)
 $ every 4 (off 0 (|> 5))
-$ every 4 (off 0.125 (|+ 0))
+$ every 4 (off 0.125 id)
 $ s "glitch2:2(<3 5 7>,8)"
 # gain 0.8
 
@@ -42,10 +42,10 @@ $ s "superpiano(1,8)"
 # sustain 2
 
 d5
-$ every 2 (off 0.25 (|+ 0))
+$ every 2 (off 0.25 id)
 $ every' 4 3 (off 0.375 (|- 3))
 $ every 4 (off 0.375 (|- 5))
-$ every 4 (off 0.375 (|+ 0))
+$ every 4 (off 0.375 id)
 $ every' 8 5 (# gain 0)
 $ every' 8 6 (# gain 0)
 $ every' 8 7 (# gain 0)
@@ -54,9 +54,9 @@ $ s "trump"
 # gain 0.8
 
 d6
-$ every 2 (off 0.125 (|+0))
-$ every' 4 3 (off 0.375 (|+0))
-$ every' 4 4 (off 0.5 (|+0))
+$ every 2 (off 0.125 id)
+$ every' 4 3 (off 0.375 id)
+$ every' 4 4 (off 0.5 id)
 $ every 8 (rev)
 $ every' 8 7 (# gain 0)
 $ s "bass3(<3 5 3 1>,8)"
@@ -80,8 +80,8 @@ d1 $ s "~ [sn*2 ht] ~ [lt*2 mt] dr:0*4"
 d3 $ s "numbers*4" # n (1 + run 4)
 
 d4
-$ every 4 (off 0.125 (|+ 0))
-$ every 8 (off 0.25 (|+ 0))
+$ every 4 (off 0.125 id)
+$ every 8 (off 0.25 id)
 $ every 16 (chunk 4 (rev))
 $ every 16 (# note 7)
 $ every' 2 1 (jux rev)

live/dnb/dansant.tidal

@@ -21,10 +21,10 @@ $ note (scale "aeolian" "[0|12]*8")
 # gain (slow 64 $ cosine * 0.7 + 0.2)
 
 d4 -- drumroll
-$ rarely (off (1/16) (|+ 0))
+$ rarely (off (1/16) id)
 $ sometimesBy 0.05 (# n 1)
 $ s "dr*8"
-# gain (slow 16 $ sine * 0.3 + 0.5)
+# gain (slow 16 $ sine * 0.3 + 0.7)
 
 d7 -- dark background
 $ s "arp(<1 1 3 3>,8)"

live/etienne.tidal

@@ -4,12 +4,12 @@ $ euclid "<2 2 2 3 3 3>" "<5 5 5 8 8 8>"
 $ s "kick:4"
 
 d2
--- $ every "<2 4>" (off 0.125 (|+ 0))
-$ every "<2 4>" (off (1/8) (|+ 0))
+-- $ every "<2 4>" (off 0.125 id)
+$ every "<2 4>" (off (1/8) id)
 $ s "~ sn:1 [hh*4] 808cy"
 
 d3
-$ often (off (1/16) (|+ 0))
+$ often (off (1/16) id)
 $ s "drum*8"
 # n 2
 # gain 0.8

live/francesca.tidal

@@ -22,7 +22,7 @@ $ s "kick:14 [electro1:2, arp]"
 
 
 d2 -- drumroll
-$ off 0.125 (|+ 0)
+$ off 0.125 id
 $ degradeBy "0.5 0.2 0.5 0.8 0.5 0.9 0.5 0.1"
 $ s "dr*8"
 # n 0

live/friday2.tidal

@@ -33,7 +33,7 @@ $ someCyclesBy 0.1 (degradeBy 0.6)
 $ someCyclesBy 0.1 (
   degradeBy 0.4 . fast 2 . (# note (scale "dorian" (-7))) . (# s "superpiano")
 )
-$ sometimes (off 0.25 (|+ 0))
+$ sometimes (off 0.25 id)
 $ off 0.125 (
   # note (scale "dorian" (-7) + "0 3 0")
 )

live/friday_feb.tidal

@@ -6,7 +6,7 @@ d1 $ sound "~ clap:1"
 # lpf "<100,100 .. 1000 1000,100 .. 100>"
 
 d2
-$ off (1/16) (|+ 0)
+$ off (1/16) id
 $ degradeBy "0 0 0.8 0.4 0.5 0.6 0.7 0.2"
 $ s "dr*8"
 

live/fusion/acid_jazz.tidal

@@ -28,7 +28,7 @@ $ s "[~ hh ~ <hh [hh ~ hh]>]*2"
 
 d6 -- white noise
 $ whenmod 64 48 (degradeBy 0.9)
-$ rarely (off 0.5 (|+ 0))
+$ rarely (off 0.5 id)
 $ sometimes (jux rev)
 $ (# speed (rand / 2))
 $ s "glitch:2" -- # n (run 8)

live/fusion/anthropocene.tidal

@@ -7,9 +7,9 @@ setcps 0.5
 d1 --beat
 -- $ someCyclesBy 0.1 ((# s "beating") . (stut 4 0.5 0.25)) -- 2: tension
 $ fix ((# s "sosKick") . (# gain 1.2)) (s "k") -- 1: kick soft
--- $ fix ((off 0.5 (|+ 0)) . (# s "[kick:0,reverbkick]")) (s "k") -- 2: kick harder
--- $ fix ((someCyclesBy 0.25 (off 0.125 (|+0))) . (>| s "kick:5(<<2 2 4 4 4 4 2 2 3 4 4 3 2 2 0 0> 4>,4)")) (s "k") -- 3: kick hard (heartbeat)
--- $ fix (((off 0.125 (|+0) . (>| s "kick:5*<1 2 1 1>")))) (s "k") -- kick hard (heartbeat)
+-- $ fix ((off 0.5 id) . (# s "[kick:0,reverbkick]")) (s "k") -- 2: kick harder
+-- $ fix ((someCyclesBy 0.25 (off 0.125 id)) . (>| s "kick:5(<<2 2 4 4 4 4 2 2 3 4 4 3 2 2 0 0> 4>,4)")) (s "k") -- 3: kick hard (heartbeat)
+-- $ fix (((off 0.125 id . (>| s "kick:5*<1 2 1 1>")))) (s "k") -- kick hard (heartbeat)
 -- $ s "k(2,4)" -- 1 tranquille
 -- $ s "k(<2 2 2 2 4 4 4 4>,4)" -- 1 setup 4 temps
 -- $ s "k(4,4)" -- 1 final 4 temps

live/fusion/mad_piano.tidal

@@ -62,5 +62,5 @@ $ whenmod 8 5 (# gain 1.2)
 $ whenmod 8 0 (# gain 0)
 $ sometimes (hurry 2)
 $ sometimes (0.125 ~>)
-$ sometimes (off 0.5 (|+ 0))
+$ sometimes (off 0.5 id)
 $ s "[dr:3?,dr:4?]*<2 4 8 8>"

live/hip/roll.tidal

@@ -12,7 +12,7 @@ $ s "kick:13"
 # gain 0.8
 
 d3
-$ every 4 (off 0.125 (|+ 0))
+$ every 4 (off 0.125 id)
 $ s "~ sn:4"
 # gain 0.8
 

live/home.tidal

@@ -9,11 +9,11 @@ d4 $ s "superhammond(<1,3>,8)"
 -- Drum sandbox
 
 d1
-$ every 2 (off 0.125 (|+0)) -- 1,3
-$ every 4 (off 0.25 (|+0)) -- 1
-$ every' 4 1 (off 0.125 (|+0)) -- 2
-$ every' 4 2 (off 0.375 (|+0)) -- 3
-$ every' 4 3 (off 0.25 (|+0)) -- 4
+$ every 2 (off 0.125 id) -- 1,3
+$ every 4 (off 0.25 id) -- 1
+$ every' 4 1 (off 0.125 id) -- 2
+$ every' 4 2 (off 0.375 id) -- 3
+$ every' 4 3 (off 0.25 id) -- 4
 $ every' 8 7 (# gain "0 0") -- Pont
 $ every' 8 8 (# gain "0 0") -- Pont
 $ s "<bd <[dr*4 ~]*2 ulgab>>"
@@ -50,7 +50,7 @@ $ fast 2
 $ every 2 (# up "[0,<5,7>]")
 $ every' 2 1 (off 0 (|- 7))
 $ every' 4 3 (slow 2)
-$ every' 4 3 (off 0.25 (|+ 0))
+$ every' 4 3 (off 0.25 id)
 $ every' 4 3 (# up "[0,5] [3,10?]")
 $ every 8 (# up "[-7,0] [0,5]")
 $ every 16 (rev)

live/jam/chalet.tidal

@@ -33,8 +33,8 @@ $ s "hh:5 dr*4 dr*2 dr"
 d5 -- drums sautillants
 $ someCycles ((# n 4) . (# gain 0.8)) -- tambour armee
 -- $ sometimes (# n 0)
-$ sometimesBy 0.8 (off 0.25 (|+ 0))
-$ sometimes (off 0.125 (|+ 0))
+$ sometimesBy 0.8 (off 0.25 id)
+$ sometimes (off 0.125 id)
 $ s "~ 808sd:2"
 
 d6 -- bass

live/noise/decentering.tidal

@@ -8,7 +8,7 @@ $ n "[0,1] 9"
 
 d2 -- beat
 $ fast 2
-$ every 4 (sometimes (off "<0.125 0.25>" (|+ 0)))
+$ every 4 (sometimes (off "<0.125 0.25>" id))
 $ whenmod 32 30 degrade
 $ whenmod 32 26 degrade
 $ s "house"
@@ -41,7 +41,7 @@ $ s "birds" # n (irand 10)
 # gain 0.7
 
 d7 -- moineau roll
-$ sometimesBy (slow 16 $ sine * 0.95) (off (1/16) (|+ 0))
+$ sometimesBy (slow 16 $ sine * 0.95) (off (1/16) id)
 $ s "birds3(<[3|6] 8>,8)"
 # gain (slow 64 $ 0.9 - sine * 0.4)
 

live/noise/vie_hivernale.tidal

@@ -61,7 +61,7 @@ $ note (scale "melodicMajor" "0 7 0 <7 [4 7]>")
 d8
 $ degradeBy "0 0.8 0 0.2"
 $ superimpose (  -- complement med cloche
-  -- (off (1/16) (|+ 0)) . -- double
+  -- (off (1/16) id) . -- double
   fast 2 .
   (# s "808mc") .
   (# gain 0.5)
@@ -75,7 +75,7 @@ $ s "f*8"
 # gain 0.7
 
 d10
-$ every' 4 1 (often (off 0.125 (|+ 0)))
+$ every' 4 1 (often (off 0.125 id))
 $ fast 2
 $ s "~ clap:1"
 # gain (slow 16 $ sine * 0.5 + 0.3)

live/nuit.tidal

@@ -4,8 +4,8 @@ setcps 0.5
 
 d1
 $ degrade
-$ off 0.125 (|+ 0)
-$ every 8 (off 0.5 (|+ 0))
+$ off 0.125 id
+$ every 8 (off 0.5 id)
 $ every 16 degrade
 $ sometimesBy 0.10 (# n 7)
 $ sometimesBy 0.10 (# n 8)
@@ -17,13 +17,13 @@ d2 $ s "<bd*2 bd(2,5)> ~ dr*4"
 
 d3
 $ fast 2
-$ every' 4 3 (off 0.25 (|+ 0))
+$ every' 4 3 (off 0.25 id)
 $ every 8 (rev)
 $ every' 16 12 (hurry 2)
 $ every' 16 12 (off 0.125 (|+ 2))
-$ every' 16 12 (off 0.375 (|+ 0))
+$ every' 16 12 (off 0.375 id)
 $ every' 16 12 (off 0.875 (|+ 7))
-$ every' 16 12 (off 0.75 (|+ 0))
+$ every' 16 12 (off 0.75 id)
 $ every' 16 12 (off 1 (|+ 2))
 $ every' 16 12 (# gain 1.2)
 -- $ every' 16 13 (# gain 0)

live/pianotrap.tidal

@@ -39,7 +39,7 @@ d4
 $ whenmod 32 28 (# gain cosine)
 $ degradeBy 0.3
 $ off (1/16) (|+ 2)
-$ off (1/8) (|+ 0)
+$ off (1/8) id
 $ s "bass3*4"
 # note "<[0 5 0 0] [5 5 0 0] [7 5 0 7] [0 5 0 7]>"
 

live/scratch.tidal

@@ -15,5 +15,5 @@ $ s "superhammond*4"
 d1
 $ every 16 rev
 $ every 2 (off "0.125" (|* 2))
-$ every 8 (off "~ 0.125" (|+ 0))
+$ every 8 (off "~ 0.125" id)
 $ s "mouth:4 hh:3"

live/seb.tidal

 setcps 1
 
 d1
-$ sometimes (off 0.125 (|+ 0))
+$ sometimes (off 0.125 id)
 $ s "clubkick(<<1 2> 4>,4)"
 # gain 0.8
 

live/techno/blade-piano.tidal

@@ -16,8 +16,8 @@ $ s "cs80leadMH*2"
 d2
 $ whenmod 64 48 (# silence)
 -- $ fast 2
-$ every 4 (off 0.75 (|+ 0))
-$ off 0.5 (|+ 0)
+$ every 4 (off 0.75 id)
+$ off 0.5 id
 $ s "reverbkick(<2 4 4 4 3 4>,4)"
 # gain 0.7
 
@@ -25,7 +25,7 @@ d3
 $ whenmod 64 48 (# gain 0)
 -- $ whenmod 64 8 (# gain 1)
 $ fast 2
-$ every 2 (off 0.25 (|+ 0))
+$ every 2 (off 0.25 id)
 $ s "~ cp"
 # s "realclaps"
 # pan 0.4
@@ -41,7 +41,7 @@ $ whenmod 31 24 (|+ note 0)
 $ whenmod 31 16 (|- note 7)
 $ whenmod 31 8 (|+ note 0)
 $ whenmod 31 0 (|+ note 7)
-$ someCyclesBy 0.2 (off (1/16) (|+ 0))
+$ someCyclesBy 0.2 (off (1/16) id)
 $ someCycles (off (1/8) (|- 7))
 $ superimpose ((|- note 21) . (# gain 0.7))
 $ note (

live/techno/delic_jazz.tidal

@@ -26,7 +26,7 @@ $ whenmod 128 64 rev
 $ whenmod 64 48 (
   const
   $ slow 4
-  $ sometimesBy 0.3 (off 0.125 (|+ 0))
+  $ sometimesBy 0.3 (off 0.125 id)
   $ "[p p p ~] [~ p p p] [~ ~ [p p?] ~] [p p? p? p] [p]"
   # s "superpiano"
   # n "[7 5 4 ~] [~ 4 2 0] [~ ~ 0 ~] [-1 -1 -1 0] [-1]"

live/techno/experience_vertige.tidal

 setcps 0.5
 
 d1
-$ sometimesBy "0.9 0 0.1 0" (0.125 ~>) -- decalage
-$ sometimesBy "0 0 0 0.8" (off 0.125 (|+ 0)) -- double heartbeat
-$ s "k*4"
+-- $ sometimesBy "0.9 0 0.1 0" (0.125 ~>) -- decalage
+-- $ sometimesBy "0 0 0 0.8" (off 0.125 id) -- double heartbeat
+$ s "k*2"
 # s "kick:5"
-# gain 0.6
+# gain 0.75
 
 d1
 $ fast 4
--- $ every' 16 15 (# gain 0)
+$ every' 16 15 (# gain 0)
 $ every' 8 7 (0.25 ~>)
--- $ whenmod 8 6 (sometimes (off 0.5 (|+ 0)))
+$ whenmod 8 6 (sometimes (off 0.5 id))
 $ s "kick:4"
 # gain 0.65
 
 d1
 $ every' 16 15 (# gain 0)
 $ every' 8 7 (0.25 ~>)
-$ sometimes (off 0.5 (|+ 0))
+$ sometimes (off 0.5 id)
 $ euclid 5 8
 $ s "kick:4"
 # gain 0.65
@@ -34,7 +34,7 @@ $ s "d"
 
 d3
 $ fast 2
-$ every 4 (sometimes (off "<0.25 0.125>" (|+ 0)))
+$ every 4 (sometimes (off "<0.25 0.125>" id))
 $ s "~ s"
 # s "snare"
 # gain 0.8
@@ -42,7 +42,7 @@ $ s "~ s"
 d4
 $ sometimesBy -- double
 (slow 16 $ sine * 0.8 + 0.1)
-(off "<0.25 0.125>" (|+ 0))
+(off "<0.25 0.125>" id)
 $ s "<~ c?> ~ c ~"
 # s "clap:8"
 # gain (slow 4 $ (0.9 - tri * 0.5))
@@ -54,18 +54,18 @@ $ stut 4 0.5 0.125
 $ (# crush ("<6,0.05 .. 0>"))
 $ note (scale "major" (fast 2 $ "[0,<~ <[7|4] <14 <10 14>>>>]"))
 # s "bassWarsaw"
-# gain 0.75
+# gain 0.8
 |- note 24
 
 d6 -- continuous laser
-$ rev
+-- $ rev
 $ s "bd" >| speed (
   segment 100 $
   range (slow 8 $ cosine * 50)
         (slow 8 $ "<20 30 40 50 40 30 20>")
   saw
 )
-# gain 0.5
+# gain 0.45
 |- note "[<12 ~>,24,<-12 -12?>]"
 
 d7 -- basse grave moog weird
@@ -85,6 +85,6 @@ $ euclid "[<3 3?>,5?]" 8
 $ s "s"
 # s "superfork"
 # room 0.5
-# gain 0.85
+# gain 0.5
 # pan (slow 4 $ sine)
 |- note 12

live/techno/friday_tired.tidal

@@ -12,7 +12,7 @@ $ whenmod 32 16 (# gain 0.8)
 $ whenmod 32 15 (# gain 0.7)
 $ whenmod 32 14 (# gain 0.6)
 $ whenmod 32 0 (# gain 0)
-$ every 4 (off 0.25 (|+ 0))
+$ every 4 (off 0.25 id)
 $ s "~ [cp sn:1]"
 
 d3 -- TODO: Better drums
@@ -26,7 +26,7 @@ d4 -- TODO: Better bass
 -- play one per cycle
 d4
 -- $ off 0.25 (|+ note 7)
--- $ off 0.125 (|+ 0) 
+-- $ off 0.125 id 
 $ note "<0(3,8) 3 5 12*2>"
 # s "bass3:2"
 # sustain 4

live/techno/german_wings.tidal

@@ -21,7 +21,7 @@ $ whenmod 16 10 ( -- 80s drumroll
   -- const $ n "[2 <[3 2] [2 3]> ~] [3 2 <3? ~>]" # s "electro1"
 )
 $ whenmod 32 16 (degrade)
-$ whenmod 16 8 (off 0.125 (|+ 0))
+$ whenmod 16 8 (off 0.125 id)
 $ sometimes (# s "dr")
 $ s "hh(<4 4 3 4>,8)"
 

live/techno/kart.tidal

@@ -10,7 +10,7 @@ $ s "kick:5 dr:9(<<1 1 1 3> 1 1 <3 2 2 2>>,4)"
 # gain 0.8
 
 d2
-$ someCyclesBy 0.2 (off 0.25 (|+ 0))
+$ someCyclesBy 0.2 (off 0.25 id)
 $ s "~ clap:1"
 # gain 0.9
 

live/techno/laser_roll.tidal

 setcps 1
 
 d1 -- lightly varying kick
-$ jux (|+ 0)
+$ jux id
 $ whenmod 16 10 (every' 2 1 (0.125 ~>))
 $ every 8 (0.25 <~)
 $ every 4 (0.5 ~>)
@@ -26,8 +26,8 @@ d3 -- simple claps
 $ whenmod 64 32 (# gain "<0.64,0.01 .. 0.96>")
 $ whenmod 64 28 (# gain "<0.4,0.05 .. 0.6>")
 $ whenmod 64 0 (# gain 0)
-$ every 8 (off 0.25 (|+ 0))
-$ every 4 (off 0.25 (|+ 0))
+$ every 8 (off 0.25 id)
+$ every 4 (off 0.25 id)
 $ (0.5 ~>)
 $ s "jazz:4"
 

live/techno/major_nostalgia.tidal

 setcps 0.5
 
 d1 -- batterie
-$ whenmod 64 16 (fast 4 . (every 4 (off 0.5 (|+ 0))))
+$ whenmod 64 16 (fast 4 . (every 4 (off 0.5 id)))
 $ s "{popkick,kick:5}"
 # gain 0.8
 

live/techno/phazer.tidal

@@ -23,7 +23,7 @@ $ s "electro1:4"
 
 d4
 $ every 4 (jux rev)
-$ sometimes (off 0.125 (|+ 0))
+$ sometimes (off 0.125 id)
 $ s "~ electro1:2"
 
 d5
@@ -50,5 +50,5 @@ $ note (scale "aeolian" "<c c f f>(<3 1>,<8 1>) a5(2,<4 2 1>)")
 
 
 d7
-$ whenmod 32 16 (someCycles (off (1/16) (|+ 0)))
+$ whenmod 32 16 (someCycles (off (1/16) id))
 $ s "~ ~ ~ glitch:2"

live/techno/progressive_tuesday.tidal

@@ -32,7 +32,7 @@ $ whenmod 64 32 ( -- seconde aigue
   every' 8 7 (off 0.25 ((|> note (4 - 12)) . whenmod 16 10 (# crush 6)))
 . every' 8 5 (off 0.25 (|> note (7 - 12)))
 )
-$ often (off 0.25 (|+ 0))
+$ often (off 0.25 id)
 $ note (slow 2 $ scale "aeolian" "<0 2 4 0>")
 # s "bassWarsaw"
 |- note 24
@@ -40,7 +40,7 @@ $ note (slow 2 $ scale "aeolian" "<0 2 4 0>")
 
 d6 -- electro bass
 $ stut "<1 2 4 8 4 2 1>" 0.8 0.125
-$ often (off 0.25 (|+ 0))
+$ often (off 0.25 id)
 $ note (slow 2 $ scale "aeolian" "<0 2 4 0>")
 # s "bassWarsaw"
 # crush 6

live/techno/soleil_neige.tidal

@@ -5,12 +5,12 @@ d1 $ s "<kick [~ kick ~ ~]>"
 # gain 0.8
 
 d2
-$ every 4 (off 0.25 (|+ 0))
+$ every 4 (off 0.25 id)
 $ s "~ kick:1"
 # gain 0.9
 
 d3
--- $ every' 4 3 (off 0.25 (|+ 0))
+-- $ every' 4 3 (off 0.25 id)
 $ s "~ <clap clap clap [clap clap]>"
 # gain 0.8
 

live/trilles.tidal

@@ -4,7 +4,7 @@ setcps 1
 -- trille: "[1 2 1 2 1 2] ~"
 
 d1
-$ every 2 (off 0.25 (|+0))
+$ every 2 (off 0.25 id)
 $ every' 4 3 (off 0 (# s "sn:1"))
 $ every' 8 7 (off 0.5 (# gain 0.8))
 $ every' 8 7 (off 0.75 (# gain 0.8))

live/tutobeat.tidal

@@ -2,8 +2,8 @@ setcps 1
 
 d1
 $ sometimes rev
-$ every 2 (off 0.125 (|+0))
-$ every 4 (off 0.5 (|+0))
+$ every 2 (off 0.125 id)
+$ every 4 (off 0.5 id)
 $ s "bd"
 
 d2

notes.md

@@ -128,6 +128,13 @@
 --- 8 tata sourd
 --- 9 tak tak bois
 
+-- drum Drums divers
+--- 0 Bass drum leger rebond clair
+--- 1 Aigu, caisse claire  
+--- 2 Tic légèrement sablé
+--- 3 Crayon sur du papier, ou maracas
+--- 4 Cymbale
+--- 5 Cymbale étouffée
 
 -- gabba
 -- 0 frappe bruitée, court
@@ -138,7 +145,6 @@
 -- ulgab: gabba long, reverb
 --- 0 sale, 1 rebond, 2 crash, 3 crash joyeux, 4 idem rebond
 
-
 -- rave
 --- 0 are you ready
 --- 1 whoo alright

sandbox/alphadance.tidal

@@ -11,8 +11,8 @@ $ s "alphabet(3,8)" # n (irand 26)
 # gain 0.75
 
 d2
-$ every 4 (off 0.125 (|+ 0))
-$ every' 4 2 (off 0.25 (|+ 0))
+$ every 4 (off 0.125 id)
+$ every' 4 2 (off 0.25 id)
 $ s "bd"
 
 d9
@@ -21,8 +21,8 @@ $ s "cp"
 
 d3
 $ every' 8 6 (0.125 <~)
-$ every 8 (off 0.25 (|+ 0))
-$ every 2 (off 0.125 (|+ 0))
+$ every 8 (off 0.25 id)
+$ every 2 (off 0.125 id)
 $ s "hh"
 
 -- Birdline

sandbox/blues.tidal

@@ -11,7 +11,7 @@ d4 $ s "sn sn sn cp"
 -- Baseline grid
 d1
 $ off 0 (|+ n 7)
-$ off 0.25 (|+ 0)
+$ off 0.25 id
 $ s "<<arpy:1 arpy:2 arpy:3 arpy:1> arpy:2 arpy:1 <arpy:1 arpy:1 arpy:3 arpy:3>>"
 
 -- Base rythm

sandbox/techno.tidal

@@ -40,7 +40,7 @@ $ s "superhammond*4"
 (
   off 0 (|- 7)
   (
-    off 0.125 (|+ 0)
+    off 0.125 id
     "[0,5] <0 3> <0 5 0,12>"
   )
 )