untitled for augmented violinist, live coder, singing bowl and PA system (2019)

untitled.js

s0.initCam(0)

src(s0).out(o0)

solid()
  .layer(o0)
  //.kaleid(3)
  .diff(src(o1).scale(1,()=>1+a.fft[1]*0.01,()=>1+a.fft[1]*0.03))
  .modulate(noise(10,0.1))
  .out(o1)

render(o1)

untitled.tidal

do -- untitled for singing bowl and PA 2019-06-14
  let woodlong  = n (sl 3 $ r 3) # s "sbwl"
      feltlong  = n (sl 3 $ r 3) # s "sbfl"
      woodshort = n (sl 4 $ r 4) # s "sbws"
      feltshort = n (sl 4 $ r 4) # s "sbfs"
  bpm 120
  let mx = [0.00, 0.00, 0.00]
  p "bowl" . fa 1.00
    -- . spaceOut ([0.01,0.02..1])
    $ stack [
        fa 1.00 $ note ("0" + 0.00) # cut 1
        -- ,fa 1.00 $ note ("-12" + 0.00) # cut 2
        -- ,fa 1.00 $ note ("12" + 0.00) # cut 3
    ] # woodlong -- feltlong
    # io "0:1" -- "0.25:0.5"
    # go' (mx!!0) 7

  p "left" . fa 1.00
    -- . spaceOut ([0.01,0.02..1])
    $ stack [
        fa 1.00 $ note ("0" + 0.00) # cut 4
        -- ,fa 1.00 $ note ("0" + 0.00) # cut 5
        -- ,fa 1.00 $ note ("0" + 0.00) # cut 6
    ] # feltlong -- woodshort
    # io "0.05:0.1" -- "0:1"
    # rvb "0.5:0.5" -- "0.1:0.1"
    # go' (mx!!1) 0 # pan 0

  p "right" . fa 1.00
    -- . spaceOut ([0.01,0.02..1])
    $ stack [
        fa 1.00 $ note ("0" - 0.00) # cut 8
        -- ,fa 1.00 $ note ("0" - 0.00) # cut 9
        -- ,fa 1.00 $ note ("0" - 0.00) # cut 10
    ] # feltlong -- woodshort
    # io "0.05:0.1" -- "0:1"
    # rvb "0.5:0.5" -- "0.1:0.1"
    # go' (mx!!2) 1 # pan 1

hush