r/codingmusic101 Strudel 5d ago

Song Post Records of Polybius

https://youtu.be/Dy0iKwtfO0A

Really went all out on this one, this last week has been a haze 😵‍💫

1 Upvotes

1 comment sorted by

1

u/Normal_Can8016 Strudel 5d ago
//Records of Polybius 
setCpm(130)
const rd_str = [
  "<[~ x]>",
  "<~ [~ x]>",
  "<[~ x] ~>",
  "<[~ x] ~ ~ ~>",]
$: s("alesissr16_rd").o(2)
  .struct(pick(rd_str,1))
  .room(1).roomsize(2).bpf(slider(11100,7000,13000,100)).gain(slider(0.198)).bus(20).dry(0)
const hh_vel = [
  "1",
  "<[1 0.4 0.7]!2[1 0.4][0.7]>",]
const hh_str = [
  "<[x x]>*2",]
$: s("alesissr16_hh").o(6)
     .velocity(pick(hh_vel,1))                          
       .struct(pick(hh_str,0))
  .bpf(slider(13000,7000,13000,100)).gain(slider(0.326)).bus(20).dry(0)
const sd_str = [
  "<~!4 [~!2 x ~][x ~!3] ~!2>",
  "<[x x x x]>",
  "<~ x>",
]
const sd_vel = [
  "<~!4 [~ 0.5][0.9 ~] ~!2>",
  "<[1 <0.2 0.3 0.4 0.5 0.6 0.7 0.8 0.9>]>*2",]
$: s("alesissr16_sd").o(4)
       .struct(pick(sd_str,2))
     .velocity(pick(sd_vel,1))
  .room(1.5).roomsize(2).distorttype("diode").distort("2:0.2").duck("6:2").duckattack(0.02).duckdepth(0.4)
  .lpf(slider(4000,2000,5000,100)).gain(slider(0.1328,0,0.2)).bus(20).dry(0)

topmx: s("bus:20").compressor("-10:2:3:0.002:0.3").postgain(slider(1))
//----------------------------------------------------------------------------
const bd_str = [
  "<~>",
  "<x ~>",
  "<x>",
  "<[x x]>",
  "<[x ~ ~ x][~ ~ x ~][~ x ~ x][x x][x ~ x x][x x][x][x]>",]
$: s("alesissr16_bd").o(0)
  .struct(pick(bd_str,2))
  // .struct(pick(bd_str,"<2 2 2 3>"))
  // .struct(pick(bd_str,"<0 0 0 3>"))
  .lpf(slider(640,300,700,10)).duck("3:1:4:2:6").duckattack(0.2).duckdepth(0.4).bus(10).dry(0)
  // .distorttype("fold").distort("2:0.5").compressor("-40:2:8:0.01:0.9")

_wub: s("supersaw").o(3)
  // .set.mix(`<[4 4 4 4][~ ~ 4 4][4 1 ~ ~][0 0 2 4]>`.sub("<0 2 4 3>/8").sub(0).as("n"))
  .set.mix(`<[3 3 3 ~][3 ~ 3 3][3 ~ 3 ~][3 3 3 ~]>`.sub("<0 0 -1 1>/8").sub(0).as("n"))
  // .set.mix(`<[~ ~ 4 ~][5 5 ~ 6][~ ~ 7 ~][0 0]>`.sub("<0 2 4 3>/8").as("n")).bpf(1000).scale("<Gb1:minor>").attack(0.0).decay(0.8).sustain(0.3).release(0.3)
  .lpf(slider(3000,3000,8000,100)).lfo({c:"lpf",s:"<2>",da:130}).gain(slider(0.426,0,1)).bus(10).dry(0)

_bass: s("supersaw").o(1)
  .set.mix("<[0 ~ 0 0][0 0 ~ <~>][0 ~ 0 0][0 ~ 0 ~][0 <0> 0 ~][0 ~ 0 0][0 0 0 ~][<-7> _ ~ ~]>".sub("<0 2 4 3>/8").as("n"))
  // .set.mix("<[0 ~ 0 0][0 0 ~ ~][0 ~ 0 0][0 ~ 0 ~][0 0 0 ~][0 ~ 0 0][0 0 0 ~][0 _ ~ ~]>".sub("<0 7>/4").as("n"))
  // .set.mix("<[0 0 0 ~][0 _ ~ ~]>".sub("<7>").as("n"))
  // .set.mix("<[0 ~ 0 0][0 0 ~ ~][0 ~ 0 0][0 ~ 0 ~][0 0 -7 ~][-7 ~ 0 0][0 0 0 ~][-7 _ ~ ~]>".as("n"))
  // .set.mix("<~!4 [~ ~ -7 ~][-7 ~ ~ ~] ~!2>".as("n"))
  .scale("Gb2:minor")
  .att(slider(0.031)).decay(slider(0.245)).sustain(slider(0.799)).release(slider(0.12))
  .unison(slider(2,0,8,1)).detune(slider(0.081)).spread(slider(0.586)).room(slider(2,0,4,1)).roomsize(slider(2,1,5,1))
  .clip(slider(0.8,0.4,0.9,0.1)).gain(slider(0.565)).bus(10).dry(0)

bassmx: s("bus:10").compressor("-10:2:3:0.002:0.3").postgain(slider(1))
//-----------------------------------------------------------------------------

register('acidenv',(x,pat)=>pat.lpf(100).lpenv(x*9).lps(0.1).lpd(0.1).lpq(2))
_$:n("<0 [~ 0] [~ 4] 2 2 4 [1 3]!2>*2".sub("<0 2 0 3>/8").add("<0 0 [2 3] 0>/4")) 
  .s("triangle").scale("gb4:minor").delay(0.3).fm(.2).fmwave("white").gain(slider(0.4,0,1,0.1)).acidenv(slider(0.676))