Skip to content

Instantly share code, notes, and snippets.

@tedthetrumpet
Created April 1, 2021 17:36
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save tedthetrumpet/cc826e6fb6572f09ab9316a74c0d03dc to your computer and use it in GitHub Desktop.
Save tedthetrumpet/cc826e6fb6572f09ab9316a74c0d03dc to your computer and use it in GitHub Desktop.
29 mar
x << saw (100 ~~ 400 $ sqr [2,3,5,7]) * (-28) db;
x >> audio; -- direct audio output...
delay 0.01 0.8 x >> audio; -- and delayed audio output by 0.1 seconds
delay 0.2 0.7 x >> audio; -- and delayed audio output by 0.1 seconds
delay 0.05 0.7 x >> audio -- and delayed audio output by 0.1 seconds
struct (ascii "gh") $ n "2 1 5 3 6 2 5" # s "barung"
struct (ascii "<gh ij gh qw>") $ n "2 1 5 3 6 2 5" # s "barung"
variation
x << saw (100 ~~ 400 $ sqr [2,3,5,7]) * (-20) db * sin 1;
25 mar solo ply
-- activate experimental
fast 8 $ interlace (sound "kenong:6") (sound "gong:6")
spin 5 $ s "gong" # shape 0.9
24 mar kath play
stack[
juxBy 0.6 rev $ every 4 (hurry " 0.5 3 4") $ cat [
n " 0 1 0 1 0 3 0 2" # s "peri barung" # gain 0.9,
slow 1.5 $ n " 0 4 0 5 0 1 7 1" # s "db barung" # gain 0.9]
]
---
19 Mar rewrite my piece
-- metronome
n "8 5!3 " # s "808"
mask "1 0!15" $ fast 16 $ trunc (3/8) $ n (shuffle 8 $ run 8) #s "saron"
mask "1 0!31" $ fast 32 $ trunc (3/8) $ n (shuffle 8 $ run 8) #s "saron"
-- testing this seems correct
-- order of three instruments rotates, not really a problem?
mask "1 0!3" $ fast 2 $ trunc (3/8) $ n (shuffle 8 $ run 8) # s "{demung saron peking}%8" # gain 1
-- is this a four bar repeated pattern?
mask "1 0!3" $ fast 2 $ trunc (3/8) $ n (loopFirst $ shuffle 8 $ run 8) # s "{demung saron peking}%8" # gain 1
-- ok, getting there
!setbpm 50
mask "1 0!15" $ fast 8 $ trunc (3/8) $ n (loopFirst $ shuffle 8 $ run 8) # s "{demung saron peking}%8" # gain 0.8 # up "-24" # silence
slow 2 $ struct (binary "88 88 7 88") $ s "{sf kendhang peri ul glitch}%8" # n (run 19) # silence
n "8 5!3 " # s "808" # silence
-- possible kemanak sounds
808:0, 808:2
n "~ 0 2 0 " # s "808" # silence
ab:2
bin:0 and bin:1 pitched up?
--------------
18 Mar
-- !setbpm 60 version of Heather (dados)
fast 2 $ iter 2 $ every 2 (|+ n 1) $ every 4 (|- n 2) $ stack [slow 2 $ n " ~ 3 2 ~ 5 3 ~ 3" # s "peking" # cut 2
, n "2 3 ~ 2 ~ 3 2 ~" # s "demung" # cut 1
-- , n "5*4" # s "gong" # gain 0.7# cut 3
, n "1 <2 3> ~ ~ 3 ~ ~ 2*3" # s "slenthem" # cut 4
, iter 4 $ n "3 5 3 2" # s "saron" # cut 5
-- , spin 2 $ every 2 rev $ n "4 3" # s "fada" # gain 0.6
, n "3 5 2 4" # s "kendhang"
--, n "3 5 2 4" # s "juno kurt"
]
-- endpoint kath impro
degradeBy 1 ​$ stack [
every 4 (hurry "2 2.5 3") $ cat [
n " 0 1*4 0 1*4 0 1 0 1" # s "numbers" # gain 0 # end 0.2,
slow 1.5 $ n " 0 1 0 1 0 1 0 1" # s "numbers" # gain 0],
--n "6/2" # s "gong" # gain 0.8 # up (-12),
n "6" # s "glitch" # up "[-12, -30]" # gain 0.6,
degradeBy 1 $ slow 2 $ sometimes (rev) $ every 2 (hurry 2) $ spin 4 $ n "~ 4 ~ 2 4 <3 2> 6 5" # s "peking" # vowel "i" # cut 2 # up "[-24, -12]" # gain 0.8,
--slow 2 $ n " <3> ~ ~ ~ ~ <6 5 4> ~ ~" # s "saron" # up "0" # cut 1,
degradeBy 0.5 $ sometimes (rev) $ every 6 (hurry 2) $ n " 1 2 3 4 5 6 7 8 " # s "kendhang glitch juno" # gain 0.7
--- figuring out structure of my piece
-- metronome n "8 5!3 " # s "808"
stack[
n "1" # s "click"
, slow 8 $ n "1" #s "gong"
, slow 2 $ trunc (1/81) $ n (outside 4 loopFirst $ shuffle 81 $ run 81) #s "{demung saron peking}%81" # up "0" # gain 0.8
-- , slow 4 $ struct (binary "88 88 7 88") $ s "{sf kendhang peri ul glitch}%8" # n (run 19)
]
--
15 mar working
-- kath, er…
-- must be a simpler way to write the cat at the start
cat[
n " 0 1 0 1 0 1 0 1" # s "peri" # gain 0.7,
slow 1.5 $ n " 0 1 0 1 0 1 0 1" # s "peri" # gain 0.7
]
sometimes rev $ every 6 (hurry 2) $ n "1 2 3 4 5 6 7 8" # s "kendhang glitch juno" # gain 0.7
sometimes rev $ n "~ 4 ~ 5 4 <3 2> 6 7" # s "peking" # vowel "a" # cut 2 # up "[0,0]" # gain 0.7
-- js from that
rarely (# speed 0.5) $ slow 4 $ spin 5 $ iter 4 $ n "~ 4 ~ 5 4 <3 2> 6 7" # s "peking" # vowel "{a e x o u}%8" # gain 0.7 # up "[-24,-12]"
-- not quite the same as the cat
slow "<1 1.5>" $ n " 0 1 0 1 0 1 0 1" # s "peri" # gain 0.7
-- dev HS piece
-- original
stack [n " 2 3 ~ 2 ~ 3 2 ~ " # s "saron" # cut 1, n " ~ 3 2 ~ 5 3 ~ 3 " # s "peking" # cut 2]
stack[
every 2 (rotR 0.25) $ every 4 (|- n 1) $ stack [n " 2 3 ~ 2 ~ 3 2 ~ " # s "saron" # cut 1, n " ~ 3 2 ~ 5 3 ~ 3 " # s "peking" # cut 2],
struct "1!4" $ s "kenong",
n "<2 6 5 [3(3,8)]>" # s "[gong, demung]"
]
------------
kath
120
stack [
cat [
n " 0 1 0 1 0 1 0 1" # s "peri" # gain 0.7,
slow 1.5 $ n " 0 1 0 1 0 1 0 1" # s "peri" # gain 0.7
]
,
--"6" # s "glitch" # up "[-12, -80]" # gain 0.6,
sometimes (rev) $ every 6 (hurry 2) $ n " 1 2 3 4 5 6 7 8 " # s "kendhang glitch juno" # gain 0.5
]
---- my one
slow 2 $ trunc (3/81) $ n (shuffle 81 $ run 81) #s "{demung saron peking}%64" # up "-24"
slow 4 $ struct (binary "88 88 7 88") $ s "kendhang" # n (run 19)
stack[
slow 2 $ trunc (3/81) $ n (outside 4 loopFirst $ shuffle 81 $ run 81) #s "{demung saron peking}%64" # up "-24" # gain 0.9 # vowel "i a e a a u a"
, slow 4 $ struct (binary "88 88 7 88") $ s "{sf kendhang peri ul glitch}%8" # n (run 19)
]
-- not quite yet
-- slow 8 $ struct (ascii "iaeaaua" ) $ s "kendhang" # n "8 4 8 2 7 8 6"
-- slow "8 4" $ struct (ascii "8888788" ) $ s "kendhang" # n "1 a e a a 2 a"
slow "8 8 8 8 7 8 8" $ struct (ascii "iaeaaua" ) $ s "kendhang" # n "8 4 8 2 7 8 6"
-- prep 10/3
-- chords
trunc (0.0625) $ n (shuffle 64 $ run 64) #s "{slenthem demung saron peking}%64
loopFirst $ stripe "0.125 2" $ trunc (0.0625) $ n (shuffle 64 $ run 64) #s "{slenthem demung saron peking}%64"
-- fast "<0.5 1 2 3>" $ trunc (0.0625) $ n (slow 4 $ loopFirst $ fast 4 $ shuffle 64 $ run 64) #s "{slenthem demung saron peking}%64"
fast "<0.5 1 2 3>" $ trunc (0.0625) $ n (outside 4 loopFirst $ shuffle 64 $ run 64) #s "{slenthem demung saron peking}%64"
fast "<0.5 1 4 2 4 4 8 8>" $ trunc (0.0625) $ n (outside 4 loopFirst $ shuffle 64 $ run 64) #s "{gong kenong barung slenthem}%64"
fast "<0.5 1 4 2 4 4 8 8>" $ trunc (0.0625) $ n (outside 8 loopFirst $ shuffle 64 $ run 64) #s "{kenong barung slenthem demung}%64"
--
stack[
n ""
, every 4 (struct "t(13,16)") $ n "[0 .. 3]!4" # s "expbd" # pan (range "-0.5" 0.5 $ sine)
, s "kenong!4" # up "[-12,0] 0!3"
, every 2 (|+ n 2) $ every 4 rev $ struct (ascii "ji") $ s "barung" # gain 1.2
# n "0 ~ 9 2 5*3 <6 9> 8 3!2 8 3"
]
--
struct (ascii "iu") $ n "9 2 6 4 7 8 6 2 8" # s "barung"
!setcps 100
mask (ascii "er") $ stack[
cat[
struct (ascii "iu") $ n "9 2 6 4 7 8 6 2 8" # s "barung"
, rotR 0.25 $ struct (ascii "qj") $ n "9 2 6 4 7 8 6 2 8" # s "kenong"
, struct (ascii "iu") $ n "9 2 6 4 7 8 6 2 8" # s "barung"
, struct (ascii "nb") $ n "9 2 ~ 7 4 6*2 2 8" # s "kenong"
]
, struct (ascii "wq") $ n "0 ~ 9 5 8 4 7 5" # s "kendhang"
]
mask (ascii "er jh")
mask (slow 2 $ ascii "er jh er hg")
"kendhang peri cabinet"
every 3 (|- n 2) $ mask (slow 2 $ ascii "er jh er hg") $ stack[
cat[
struct (ascii "iu") $ n "9 2 6 4 7 8 6 2 8" # s "barung"
, rotR 0.25 $ struct (ascii "qj") $ n "9 2 6 4 7 8 6 2 8" # s "kenong"
, struct (ascii "iu") $ n "9 2 6 4 7 8 6 2 8" # s "barung"
, struct (ascii "nb") $ n "9 2 ~ 7 4 6*2 2 8" # s "kenong"
] # cut 1 # up "-12"
, struct (ascii "wq") $ n "0 ~ 9 5 8 4 7 5" # s "sf:2 db peri cabinet"
]
-- jamming 6/03
superimpose ((rotL 0.25) . (# speed "-0.25")) $ loopAt 0.25 $ n 2 # s "barung"
-- iya!
stack [
spin 2 $ n " 2 3 5 7 6 4 1" # s "kendhang sf:8 barung" # up " 0 0 -19 0 0"
, n " 2 3 5 7 6 4 1" # s "peri cabinet speakspell kenong"
]
stack [
spin 2 $ n " 2 3 5 7 6 4 1 2 3" # s "kendhang sf:8 barung" # up " {0 0 -19 0 6 7}%14" # gain 0.5
, slow 2 $ iter 4 $ n " 2 3 [5 7] 5 6 4 1 3 2" # s "peri juno kenong"
, spin 3 $ n "5 6" # s "kurt" # up "-12"
]
-- silent $ stack [
mask "t(5,8)" $ spin 4 $s "peri:5 3 ul:4 2 industrial:6 cabinet: 4 5" # up "[3,0,-5] [2,-1,-5]" # gain 0.8,
every 2 ((ply 2) . (superimpose $ ply 3)) $ n "5 3 5 2 5 4 3 1" # s "kenong" # vowel "a e a o" # gain 0.7 # cut 1,
every 2 ((ply 2) . (superimpose $ ply 3)) $ n "5 [4 3] 7 6 5 4 3 2" # s "kenong" # vowel "a e a o" # gain 0.7 # cut 1 # up "-7"
] # silence
4 mar prep
!setbpm 120
iter "2 7" $ superimpose ((# up 12).((1/14) ~>)) $ loopFirst $ n (scramble 7 $ run 7) # s "barung"
iter "2 7" $ superimpose ((# up "-12").((1/14) ~>)) $ loopFirst $ n (scramble 7 $ run 7) # s "barung" # vowel "{u i o e a x}%7"
iter "2 7" $ superimpose ((# up "-5").((1/14) ~>)) $ loopFirst $ n (scramble 7 $ run 7) # s "barung" # vowel "{u i o e a x}%7" # cut 1
stack[
every 2 (# silence) $ s "saron!4"
, (1 ~>) $ every 2 (# silence) $ s "kenong!4"
]
-- yes
stack[
s ""
, whenmod 3 1 (# silence) $ loopFirst $ n "1!4" # s "demung"
, (1 ~>) $ whenmod 3 1 (# silence) $ n "2!4" # s "barung"
, (2 ~>) $ whenmod 3 1 (# silence) $ loopFirst $ n "3!4" # s "peking"
]
-- yes
stack[
s ""
, whenmod 8 1 (# silence) $ n "1!4" # s "demung"
, (1 ~>) $ whenmod 8 1 (# silence) $ n "2!4" # s "barung"
, (2 ~>) $ whenmod 8 1 (# silence) $ n "3!4" # s "peking"
, (3 ~>) $ whenmod 8 1 (# silence) $ n "4!4" # s "saron"
, (4 ~>) $ whenmod 8 1 (# silence) $ n "5!4" # s "kendhang"
, (5 ~>) $ whenmod 8 1 (# silence) $ n "5!4" # s "gong"
, (6 ~>) $ whenmod 8 1 (# silence) $ n "6!4" # s "kenong"
, (7 ~>) $ whenmod 8 1 (# silence) $ n "7!4" # s "peking"
]
-- longer cycle
slow 2 $ stack[
s ""
, whenmod 8 1 (# silence) $ n "1 2 3 5 6 5 3 2" # s "demung" # cut 1
, (1 ~>) $ whenmod 8 1 (# silence) $ n "1 2 3 5 6 5 3 2" # s "barung"
, (2 ~>) $ whenmod 8 1 (# silence) $ fast 2 $ n "1 2 3 5 6 5 3 2 6 5 3 6 4 5 1 2" # s "peking"
, (3 ~>) $ whenmod 8 1 (# silence) $ n "1 2 3 5*3 6 5 3 2" # s "saron"
, (4 ~>) $ whenmod 8 1 (# silence) $ n "1 2*2 3 5 6 5 3 2" # s "kendhang"
, (5 ~>) $ whenmod 8 1 (# silence) $ n "1 2 <3 4 > 5 6 5 3 2" # s "gong" # cut 2
, (6 ~>) $ whenmod 8 1 (# silence) $ n "1 2 3 5 6 5 <3 4> 2" # s "kenong"
, (7 ~>) $ whenmod 8 1 (# silence) $ ply 2 $ n "1 2 3 5 6 5 3 2" # s "peking"
]
-- oh ffs
slow 2 $ cat $ [n "1 2 3 5 6 5 3 2" # s "demung", n "1 2 3 5 6 5 3 2" # s "barung"]
slow 2 $ cat $ [
n "1 2 3 5 6 5 3 2" # s "demung" # cut 1
, n "1 2 3 5 6 5 3 2" # s "barung"
, fast 2 $ n "1 2 3 5 6 5 3 2 6 5 3 6 4 5 1 2" # s "peking"
, n "1 2 3 5*3 6 5 3 2" # s "saron"
, n "1 2*2 3 5 6 5 3 2" # s "kendhang"
, n "1 2 <3 4 > 5 6 5 3 2" # s "gong" # cut 2
, n "1 2 3 5 6 5 <3 4> 2" # s "kenong"
, ply 2 $ n "1 2 3 5 6 5 3 2" # s "peking"
]
-- building
mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
cat [
mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
, n (loopFirst $ (1 ~>) $ shuffle 8 $ run 8) # s "barung" |+ n 8
]
cat [
mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
, n (loopFirst $ (1 ~>) $ shuffle 8 $ run 8) # s "barung" |+ n 8
, mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
, n (loopFirst $ (2 ~>) $ shuffle 8 $ run 16) # s "barung" |+ n 8
]
stack [
cat [
mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
, n (loopFirst $ (1 ~>) $ shuffle 8 $ run 8) # s "barung" |+ n 8
, mask "t(5,8)" $ n (loopFirst $ shuffle 8 $ run 8) # s "barung"
, n (loopFirst $ (2 ~>) $ shuffle 8 $ run 16) # s "barung" |+ n 8
]
, rarely (hurry 2) $ n (shuffle 8 $ run 8) # s "kendhang"
, slow 4 $ s "gong"
]
from 24 feb roulette (probably slow tempo!)
stack[
s ""
, slow 2 $ n "6*4" # s "gong" # gain 0.6
-- , degradeBy 0 $ n "[3 5 3 2 5 6 5 3]" # s "demung kenong"
, slow 3 $ n " 6*3 ~ ~ ~ ~ ~ 2 ~ " # s " saron"
, spin 3 $ n "5!4" # s "rave"
, n "1*3 2 1*3 3 1*3 <5 4>" # s "kenong"
, fast 2 $ iter 4 $ n "4 5 4 2 5 6 7 8" # s "peking"
]
n "2*4" # s "kurt" # up "-5 0 -7 -12"
degradeBy 1 $ stack
[
fast 2 $ n "9 8 2 3 9 4 8 7 5 5 3 5 2" # s "sf" # up (range 0 12 rand)
,n " 5 2 4 3 " # s "can"
,slow 2 $ n "2 ~ 2 ~ " # s "can" # up "-12"
,n "5 2" # s "kurt gong" # up "-12"
-- , fast 1.4 $ n "6 <5 3*3> 2 7" # s "peking kurt gong:5 kenong"
,n "8 ~ 8 [2 8 8]/3 ~ 8 3" # s"peri"
]
24 Feb 2021 revisit
index bit.ly/nagacode
new: have to drop down 'MiniTidal
no tempo box: use !setbpm in terminal/chat
try the roulette?
!presetview roulette
!publishview default (should push that view to everyone)
Basic idea is this: (1) login to an ensemble and give yourself a name/handle while you do it; (2) to line up to change to code click on a + - so long as your name is at the head of the list it is your turn; (3) when you are finished your turn, click on the little x next to your name/handle to remove yourself (and if someone else is behind you in the line they will now be the head of the line)
try some other sounds?
can (14), sf (18)
slow 4 $ up (toScale [0, 2, 3.3, 4.9, 7.9, 9, 10.3, 12] "7!8") # s "gtr" # gain 0.7 # cut 1
slow 2 $ n "7!8" # s "demung" # gain 0.7 # cut 2
C pitch sounds:
demung:7, bajo (2), gtr (3), sprvibe, arpy, bass1:6 (also others 30 there, but some are f not c), flick, juno, sf
saving our own bits of code
jam
degradeBy 0.9 $ ghost $ fast "4 2" $ every 4 (|- up "[0,6]") $ iter 4 $ n "< [~ 2 ] [3 5 ] [ 6*4 ~*4 ] [1 2 3 ~ ]>" # s (sew "t(3,8)" "peking" "saron") # up "-24"
----------------------------
16 Dec sampak
slow 8 $ n "3 4 4*2 4 3 4 2 ~ 5 ~ 6 ~ 5 ~ 3 ~ 6 ~ 5 ~ 6 ~ 7 ~ ~ 3 5 6 7 ~ ~ 6 5 6 5 ~ 3 6 5 ~ 2 ~ 3 ~ 5 ~ 6 ~ 5 7 ~ 6 ~ 5 6 ~ 5 7 ~ 6 ~ 5 3 ~ 5 6 7 6 5 3 2 ~ " # s "saron" # gain 0
3 Dec notes from performances
trunc plays only part of a pattern
see also linger
1 Dec just jamming, now a piece 'redline'
-- struct "t f f t f t t f " $ off 0.5 (|+ n 8) $ every 4 (rev . (hurry 1.5)) $ n "8 8 7 3 5*2 4 6 [9 8] 2" # s "ul" # vowel "e a k o i"
-- s "pad" # n "2" # up "<0 0 0 2>"
-- up "~ 2 6 4 7 6 4 <9 2 9 7>" # s "demung:7"
-- hline ([-1,2.5,3,-4,7] / 6 * fxy * sin [0.35,(0.25 ~~ 0.4 $ sin 0.04) ]) 0.05 >> rgb
26 Nov rehearsal
mute discipline in zoom
Heather gong impro, show her the code?
Soundcheck carefully
propose weekend times
suwukan2 is out of tune!
alternative in-tune less helicopter 2 rumble (eb-e ish!)
n "[1!9,1!13]" # s "gong " # up 1.6 # gain 0.6 # pan (range (-0.5) 0.5 sine)
rumble on 1 (d)
n "[1!9,1!13]" # s "gong " # up 0 # gain 0.6 # pan (range (-0.5) 0.5 sine)
song in gm, but a bit slow
slow 25 $ n "0 1 2 3 4 5 6 7" # s "fada" # up "-4"
Tonight's deployment of Estuary includes 4 new terminal commands: !resetzones [clears all running code even if not visible]
!resetviews [clears away all custom and locally defined views, taking everyone back to the default default]
!resettempo [restarts the tempo grid at the present moment, which helps with rounding errors in some languages]
!reset [a short cut for !resetzones + !resettempo]
19 Nov rehearsal
notes
no talking: zoom audio off except when playing or singing
sophie will 'conduct' in the chat box
at start, muireann solo song once before others join
three waves of impro
so two interludes
one of those interludes live balungan
https://rcs-ac-uk.zoom.us/j/9043822682
jam
loopFirst $ (2 <~) $ scramble "<16 4>" $ n "1 2? 3 4? 5? 6 7 1" # s "kenong" # up "{-12 -7 0 12}%8" # cut 1
5 Nov rehearsal
* while on zoom, share screen and demonstrate
* settings: canvas, WebDirt, Dynamics
* reference, MiniTidal
* theme
* display images and/or videos?
* hydra not
* punctual for images ok, but need to upload to github
* CineCer0 for video, from github works:
"https://github.com/tedthetrumpet/testpage/blob/master/first%20gadhon%20rehearsal%20with%20prasad%2024%20may%202017.mp4?raw=true"
s "demung!8" # gain 0.7 # up (scale "dorian" "0 .. 7 ")
stack [
up "<c4'maj e4'min f4'maj e4'min>" # s "demung:7"
, s "slenthem:7(3,8)" # up "-12" # cut 1
, slow 2 $ s "saron!8" # up (scale "dorian" "0 1 2 3 4 5 4 3 2 1")
]
-- pad?
s "ch2018R" # n "13" # up 1
---------------------------
https://github.com/tidalcycles/Dirt-Samples
https://github.com/dktr0/cybernetic-samples/tree/master/sounds
https://github.com/dktr0/supercontinent
https://github.com/djmelan3/UPLOrc
https://github.com/tedthetrumpet/tidal/tree/master/nmsamples
-------
31 Oct jam
stack [
s "kendhang:3*<4 8 16 8>" # n (loopFirst $ (2 ~>) $ scramble 16 $ run 16),
s "bass3!16" # note "[df, df6, df7]" # gain 0.8 # cutoff (slow 3 $ range 800 8000 tri) # resonance 0.97,
sometimes (hurry 2) $ n "1 2 5 6" # s "demung",
ply 2 $ n "1 2 5 6" # s "demung"
]
-------------------
Waves (early version)
90 % 240
slow 16 $ n "[1 2 5 ~ ~ ~] ~@0.4 [6 5 ~ ~] ~@0.6 [5 7 ~ ~] ~@0.3 [6 5 ~ ~] ~@0.4 [1 2 5 ~ ~ ~ ] ~@0.4 [5 6 5 ~ ~ ~] ~@0.3 [5 5 5 7 ~ ~ ~ ~] ~@0.6 [6 5 ~ ~] ~@0.7 [1 2 5 ~ ~ ~] ~@0.8 [4 4 6 5 2 ]@1.5 [~ ~ ~ ~ ~]" # s "demung"
slow 16 $ (1/48 ~>) $ n "[1 2 5 ~ ~ ~] ~@0.4 [6 5 ~ ~] ~@0.6 [5 7 ~ ~] ~@0.3 [6 5 ~ ~] ~@0.4 [1 2 5 ~ ~ ~ ] ~@0.4 [5 6 5 ~ ~ ~] ~@0.3 [5 5 5 7 ~ ~ ~ ~] ~@0.6 [6 5 ~ ~] ~@0.7 [1 2 5 ~ ~ ~] ~@0.8 [4 4 6 5 2 ]@1.5 [~ ~ ~ ~ ~]" # s "saron"
s "gong:2!24" # gain 0.5 # speed (range 0.99 1.01 $ rand)
Chuir iad mise (Bairn's Kist)
https://www.youtube.com/watch?v=pk9MRH2ZMBI
------------------------
25 oct buildup
-- rehearse this as a solo from scratch piece?
100 % 240
!setbpm 100
n "<6 3 2 3>" # s "slenthem"
slow 4 $ s "gong:6" # up (-12)
-- start empty, write one gotra at a time
n "<[6 2 3 5] [3 2 5 2] [3 5 2 3] [5 2 3 5] >" # s "saron"
-- variation -- rarely (fast 2) $ rarely (scramble 4) $
-- variation not actually very good
-- better is just rarely (fast 4) kind of jazzy
-- copy paste above
ghost $ ply 2 $ n "<[6 2 3 5] [3 2 5 2] [3 5 2 3] [5 2 3 5] >" # s "peking" # pan (range (-0.4) 0.4 $ rand)
-- start with run 8
repeatCycles 999 $ n (scramble 8 $ run "8 16" ) # s "kendhang"
------- punctual
a << fft fx;
y << step [-0.1,0.2,-0.3,0.4] $ lfsaw cps;
x << step [0.1,-0.2,0.3,-0.4] $ lfsaw cps/3;
t << tex "https://upload.wikimedia.org/wikipedia/commons/1/14/Wayang_kulit_%28Javanese_shadow_puppetry%29_characters.jpg" [fx/2+x+a/16, fy+y];
p << prox 0 ** (32~~1 $ bipolar lo);
p* t >> video
-------
-- Hydra
-- bit too bright, but there is a setting for that
osc(20,0.1,[0.4,0.9,4]).rotate().modulateRotate(noise()).out()
!localview 2x3 [[label 1,code 2 0],[label 3,code 4 0],[label 5,code 6 0],[label 7,code 8 0],[label 9,code 10 0],[label 11,code 12 0]]
-- Oct prep for Dec livecode
* own revision
* recreate nagamas ensemble on estuary
* figure out new view editor
* find tutorials
* make sure using https://estuary.mcmaster.ca/ not intramuros
pla
every 4 (hurry 0.5) $ every 2 (fast 2) $ s "saron demung peking gong kendhang ~ kenong!2" # cut 1 # n "5 4 <3 2>" # up "-24 12" # vowel "a e i o u"
stack [s "bd!4", s "[~ sd]!2", s "[~ kendhang]!4"] # n (run 8)
ghost $ repeatCycles 1024 $ (2 <~) $ n (scramble 8 $ run 8) # s "demung" # cut 1 # gain 0.8
every 4 (scramble 8) $ repeatCycles 1024 $ (1 <~) $ n "<1 2> 1 3! 5 [6 5] 7!"# s "saron" # gain 0.8
s "gong" # n "<1! 2!>" # cut 2
repeatCycles 1024 $ s "kendhang!8" # n (scramble 8 $ run 8) # up "[0,12]"
ghost $ brak $ repeatCycles 1024 $ s "kendhang!8" # n (scramble 8 $ run 8) # up "[0,12]" # vowel "a e i o u r"
-- 16 July final rehearsal
don't forget to tell them about putting their location in. also, try to figure out why some people come in as anonymous? flush browser cache or restart or something? or use a different username?
-- 8 July
checking new shorter samples
good
make new tutorial
degradeBy
shuffle (including shuffle 31 trick)
up (range 0 12 $ sine), up (irand (-48) + 24), (range 0 24 $ rand)
avoid crush
n "6 2 7 2 3 2 7 5 6 3 3 ~ ~ 6 5 3 2 5 6 5 3 2 7 5 6 2 7 2 3 2 7 5" # s "demung" # cut 1
--------
degradeBy 0.4 $ fast 2 $ shuffle 31 $ n "6 2 7 2 3 2 7 5 6 3 3 ~ ~ 6 5 3 2 5 6 5 3 2 7 5 6 2 7 2 3 2 7 5" # s "slenthem" # cut 1 # up (range (-24) 24 $ sine)
degradeBy 0.4 $ fast "2 4" $ shuffle 31 $ n "6 2 7 2 3 2 7 5 6 3 3 ~ ~ 6 5 3 2 5 6 5 3 2 7 5 6 2 7 2 3 2 7 5" # s "slenthem" # up (slow 4 $ range (-24) 24 $ sine) # vowel "a u i o e r"
found this sitting in estuary, nice, meditative
hurry 0.5 $ ply 12 $ n "4" # s "saron"
n "6!12" # s "slenthem" # gain 0.7 # vowel "i"
hurry 0.25 $ ply 12 $ n "2" # s "peking"
n "9" # s "gong"
-- 2 July
maybe?
fast 2 $ n "{7 ~ 7 ~ 1 ~ 7 ~ 7 ~ 1 ~ 7 ~ 7 ~ 6 7 8 9 6 7 8 9 6 7 8 9 6 7 8 9 8 9 10 ~ 7 ~ 1 ~ ~ ~ 7 6 8 9 1 ~ }%72" # s "kendhang"
close, not quite
-- (32/36 <~) $ fast 2 $ n "{7 ~ 7 ~ 1 ~ 7 ~ 7 ~ 1 ~ 7 ~ 7 ~ 6 7 8 9 6 7 8 9 6 7 8 9 6 7 8 9 8 9 10 ~ 7 ~ 1 ~ ~ ~ 7 6 8 9 1 ~ ~ ~ }%72" # s "kendhang"
-- 18 June
sometimes (hurry 2) $ slowstripe 8 $ n "1(5,8)" # s "slenthem gong:6" # cut 1 # up "{13 4 8 9 12}%8"
!localview 2x4 [border { [label:0,text:1 0]} ,border { [label:2,text:3 0]} ,border { [label:4,text:5 0]} ,border { [label:6,text:7 0]} ,border { [label:8,text:9 0]} ,border { [label:10,text:11 0]} ,border { [label:12,text:13 0]} ,border { [label:14,tempo]} ]
!publishview default
https://youtu.be/PK3-X3rOLxI
naga1 naga2 naga3
-- 11 June
to do: tutorial/notes on sometimes (etc), every, ply, fast, slow, hurry, and patterning them. iter? oh, and up
moved the ensemble to https://estuary.mcmaster.ca/
password still 6532gong
!setcps 0.1
!setbpm 120
terminal: ctrl-shift-x while cursor is on something editable
Entering !presetview nameOfView at the terminal will change your local view to the preset called nameOfView
!publishview default will make that view the default view for everyone in the ensemble.
-----------
s "1 demung kenong saron peking slenthem demung kendhang"
-- numebers in s just ignored?
s "saron ~ kenong:<6 5 3> ~ kenong ~peking [demung:1 [demung:6 demung:5]]"
s "saron kenong:<6 5 3>" -- throws no error but does not work
n "1 2 7 4!2 ~ ~ 6 7 [4 6] 7" # s "saron demung gong" # cut 1
-- prep for 28 May
single code roulette
keep audio open in zoom while doing this
change to two windows
!presetview twocolumns
!publishview default
put people in order
put first bit of code
slow 2 $ n "6 [5 2] 3 7" # s "saron" # cut 1
put your name, make a (small?) change, delete your name
next person goes
double code roulette
two lots of code in left and right windows
call them A and B
on your turn make a change to A, then B
(not sure how timing of changes will work, let's try)
places within the cycle
need a long cycle?
how to do that so that people can work with
s "{gong:1 ~ ~ ~ kenong ~ ~ ~ kenong ~ ~ ~ kenong ~ ~ ~}%4" -- no
s "[<gong:1 kenong kenong kenong>]" -- not much better
n "[<~ [ 6 5 ] ~ ~>]" # s "saron" # cut 1
would be better to have a cycle of 16 beats and a slow tempo
working at different time scales
very gamelan, combine that with assigning instruments
incorporate solos into rehersals
'spacial strategies'?
-------------------------
notes on second session 21 May
Sen, Bill, Mags, Kath, Heather, Simon
chaotic and unplanned start, went on a long time
some good moments, both overplaying and not playing, left out
several people seemed to studied, one had not (admitted)
Bill had coded up the whole of Hudan Mas!
I don't think I played that often
discussion afterwards, going forward
don't do the algovoids gig
do a small 'sharing' gig for other naga mas members and friends
some sort of plan, structure
individuals, groups, or whole group: set pieces <--> improvised
agree structure and timing of concert
-----------------
Bill's Hudan Mas
stack [n "5 6 5 3 2 6 5 3 2 ~ 3 2 3 6 5 3 2 6 5 3 2 6 5 3 2 ~ 3 2 3 6 5 3 2 7 5 6 7 5 6 7 2 2 7 6 5 6 7 6" # s "demung", n "5 5 6 6 5 5 3 3 2 2 6 6 5 5 3 3 2 2 5 5 3 3 2 2 3 3 6 6 5 5 3 3 2 2 6 6 5 5 3 3 2 2 6 6 5 5 3 3 2 2 5 5 3 3 2 2 3 3 6 6 5 5 3 3 2 2 7 7 5 5 6 6 7 7 5 5 6 6 7 7 2 2 2 2 7 7 6 6 5 5 6 6 7 7 6 6" # s "peking" # cut 0]
stack [s "gong", n "5 8 ~ 8 2 8 ~ 8 2 8 ~ 8 3 8 ~ 8 2 8 ~ 8 2 8 ~ 8 2 8 ~ 8 3 8 ~ 8 2 8 ~ 8 " # s "kenong", n "~ ~ ~ 5 ~ 5 ~ 6 ~ ~ ~ 6 ~ 6 ~ 7" # s "gong" # cut 1]
n "~ 4 4 [4 1] ~ 4 4 [4 1] ~ 4 4 [4 1] [~ 4] [1 4] 1 [4 1]" # s "kendhang" # cut 1
-- js refactor
-- tempo
100 % 4000
(0.015625 ~>) $ n "[6 5 3 2 6 5 3 2 2 3 2 3 6 5 3 2]!2 [7 5 6 7 5 6 7 2 2 7 6 5 6 7 6 5]!2" # s "demung" # cut 1
ply 2 $ (0.015625 ~>) $ n "[6 5 3 2 6 5 3 2 2 3 2 3 6 5 3 2]!2 [7 5 6 7 5 6 7 2 2 7 6 5 6 7 6 5]!2" # s "peking" # cut 2 -- solo style
s "gong!4" -- every line
s "[~ ~ kenong ~]!16"
(0.0625 ~>) $ n "[2 2 3 2]!2 [7 2 5 5]!" # s "kenong"
fast 4 $ n "[~ 4 4 [4 1]]!3 [~ 4 1 4 1 ~ 4 1]" # s "kendhang"
-----------------
mentioned <> and euclid in fourth document, also commas (sort of)
ply scramble shuffle fast slow rev
note, up?
------------------
Thoughts for follow up
share video more widely with group
stack [s "~ kenong", s "demung ~"]
find out if # cps works
not yet, but get some loops to work with
encourage more regular work?
------------------
https://github.com/dktr0/estuary/blob/1f331c1a864fb8daed17d3f252c26b14e63d421f/client/src/Estuary/Languages/MiniTidal.md
https://github.com/tidalcycles/Tidal/blob/master/tidal-parse/src/Sound/Tidal/Parse.hs
------------------ 14 May
plan for first session together
record in screenflick, no actually using filmora
use lower res screen 1280*800
zoom audio only as conversation backchannel
think headphones will be essential for all
for screenflick need to set system output before launching chrome
which is why filmora is better!
get everyone into nagamas ensemble in estuary
remember to suggest turn off canvas for better performance
shift-ctrl-x
!presetview supercontinent
!publishview default
don't bother with chat window, just use comments to chat, or zoom
allow free impro first!
then restrict, eg assign each person an instrument
layer in, keep it simple
take questions at end
share recording afterwards
reminder to self of what we have covered
tempo
comment to silence
s and n
mini-notation
saron:6
~ [] * \ !
# gain
(0.25 <~) $ s "gong"
cut (need to explain using different numbers!)
tempted to introduce
<> and euclid
ply scramble shuffle fast slow rev
-- estuary notes
admin password is morelia
Global delay useful for when playing with acoustic musicians over the network. Entering !delay 0.25 at the terminal will put a delay of 0.25 seconds (for example) on all of Estuary's audio output
https://www.facebook.com/estuaryPlatform
Turn off canvas (checkbox) to improve performance
Not clear
!publishview default
!listviews
!presetview nameOfView
test ensemble password is test
Entering !presetview nameOfView at the terminal will change your local view to the preset called nameOfView
!publishview default will make that view the default view for everyone in the ensemble.
!listviews
The names of all the presets are here: https://github.com/dktr0/estuary/blob/master/client/src/Estuary/Types/View/Presets.hs
Looking at the discussion above and saying this in case it helps anyone: if you join an ensemble without entering any password, you will effectively be there an "observer" - you'll see changes others make, and can even make changes yourself, but no one will see changes you make. If you try to join an ensemble with the incorrect password, that should fail with a message. Finally, only if you join an ensemble with its correct password can you edit and other people will see your edits.
ensembles in Estuary now expire (14 days after the last action within them, by default)
ensemble name: nagamas
host password: careful, that gets shown in terminal! 6532wilujeng
participant password: 6532gong
community password: morelia
terminal: ctrl-shift-x while cursor is on something editable
----------
We're going to move the tempo box into the hideable terminal/footer. A quick fix would be to use the supercontinent preset, so in the terminal:
!presetview supercontinent
!publishview default
(to make it the default view for everyone in the ensemble)
That gives you nine editors, a tempo box, and a display of everyone in the ensemble (duplicating what is now in the terminal...)
The not-so-quick fix is to construct your own view using the not-very-documented view language built in to Estuary.
!dumpview
(will show you how your current view is defined in the view language)
!localview [text like the result of dumpview describing a valid view]
(will make your own view the view you specify)
!publishview default
(will make that view the default)
!publishview someOtherPresetName
(you can also publish views with other names so that ensembles can have multiple views)
2x3 [[label:1,text:2 0],[label:3,text:4 0],[label:5,text:6 0],[label:7,text:8 0],[label:9,text:10 0],[label:11,tempo]]
that is an example of the default view - the numbers immediately after label: and text: are zone numbers that uniquely identify editable things in the ensemble (generally speaking, don't reuse zone numbers)
the 0 after the text used to be a setting for how many rows of text there were, but now the text editors do something more adaptive/intelligent, so that parameter will probably go away
You can get more examples of how the language works by doing !listviews
to see the available presets, !presetview [name]
to change to them, and then !dumpview to dump their code
----------
estuary samples
----------
-- 2020-05-06
every 2 (fast 2) $ n " 7 6 <~ 4> [3 2]" # s "demung" # cut 1 # gain 0.9
slow 4 $ n "2!4 3!4" # s "slenthem" # gain 0.9
n "9!4 ~!12" # s "kendhang" # gain 1.2 # up "[-12, -24]"
n "7!2 [7!2] 7" # s "kendhang" # gain 1.2
slow 2 $ s "<gong:6 gong:7>"
80 % 240
------------------
s "kendhang!16" # n (shuffle 19 $ run 19) # silence
s "kenong:0!4" # silence
slow 2 $ s "demung" <| n "6 ~ 6 ~ 5 6 ~ 5 6 ~ 5 6 ~ 5 6 ~ 5 6 5 ~ 6 5 ~ 6 5 ~ 6 5 ~ 6 5 ~" # gain 0.6 # silence
slow 2 $ s "demung" <| n "2 ~ 2 3 ~ 2 3 ~ 2 3 ~ 2 3 ~ 2 3 ~ 2 ~ 3 2 ~ 3 2 ~ 3 2 ~ 3 2 ~ 3" # gain 0.6 # silence
slow 2 $ s "gong:0" # gain 0.6 # silence
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment