notebook/strudel/20250915.md
2025-09-16 14:11:34 +09:00

1.5 KiB

samples({
loop0: 'loop/0_Life-Beat136bpm.wav',
loop1: 'loop/2_Life136bpm.wav',
}, 'https://raw.githubusercontent.com/HarakaraSite/samples/master/');

$:sound("sbd*4").gain(0.6).decay(0.5)
$_:sound("hh*8").gain(0.7).sometimesBy(0.1, x=>x.ply("2"))
$_:note("c2 c2 cs2 c2 e2 cs2 c2 c2").n(1).sound("supersaw")
  .decay(sine.range(0.3,0.6).slow(2))
$:sound("loop0")
  .sometimesBy(0.2,x=>x.speed("-1|0.8|1.1")).pan("<0.7 -0.7>")
  .scrub(rand.seg(8).rib("1|5|3|7",2)).sometimesBy(0.2,x=>x.ply(2))
  .gain(0.8)
  .lpf(sine.range(1200,1800).slow(2))
  //.loopAt(2)
$_:sound("loop1").scrub(rand.seg(16).rib(irand(8),1))
  .speed("<0.8 1 1.1 0.9>")
  .degradeBy(0.6)
  .gain(0.8)
  //.loopAt(2)
  .lpf(1800)

setcps(170/60/4)

$_:sound("sbd").struct(irand(3)
                      .pick(["1 0 1 0","1? 1? 1 0","1? 0 1 1?"]).fast(2))
  .sometimesBy(0.1,x=>x.ply(2)).lpf(300).lpq(5)
  .decay(1.2)._pianoroll()
$:sound("sd").struct(irand(4)
                     .pick(["0 1 0 1",
                            "1? 1 0 1?",
                            "0 1? 1 1",
                           "1? 1 1 1?"]).fast(2))
  .sometimesBy(0.15,x=>x.ply("2|4"))
  .delay(1/16).delayfb(1/32).decay(0.5)
$_:sound("cr").degradeBy(0.25).decay(0.7)
$:sound("hh*8").degradeBy(0.15).sometimesBy(0.2,x=>x.ply("2|4"))

$_:note("<[0 1]@2 [[1|2]@2 1] [0 [2|1]] [1 0]>"
    .inhabit(["c2 cs2 c2 c2", "cs2 cs2 f2 cs2","f2 f2 e2 f2"]))
    .sometimes(x=>x.rev())
    .sound("supersaw").detune(1.2).decay(0.3)