// @title forecast: hope @by tyow // see './evening games.str', './sleep.str', './winding down.str', './4th.str', './cafe rest.str' useRNG("precise") samples('https://samples.grbt.com.au/strudel.json') samples('https://pjvf17.github.io/soundfonts/strudel.json') samples('github:tidalcycles/dirt-samples') const weight = register('weight', (val, pat) => { if (val > 16) val = 16 if (val < 1) val = 1 return pat.s('pianosg'+val) }) // Written in JI: // 1/1 (tonic), // 3/2 (perfect just fifth), // 8/5 (just minor sixth), // 6/5 (just minor third) // 12/5 (classic minor tenth) -- this is larger than an octave // potentials: // 7/6 sm3 // 9/5 m7 // 11/7 undecimal sm6 // 14/9 sm6 // 16/9 m7 pt2 electric boo $: withSeed(x=>2, i("[[0 <- [- 1]>], - 2,- [3 | 4]]".add("<0 0 2 1>/4").apply(wchoose( [y=>y.plyWith(2, x=>x.add("-5")), 2], [y=>y.plyWith(2, x=>x.add("5")), 2], [y=>y.plyWith(2, x=>x.add("1")), 2], [y=>y.plyWith(2, x=>x.add("1")).plyWith(2, x=>x.add("5")), 1], [y=>y.plyWith(2, x=>x.add("5")).plyWith(2, x=>x.add("1")), 1], [y=>y.plyWith(2, x=>x.add("-5")).plyWith(2, x=>x.add("5")),1 ], [y=>y.plyWith(2, x=>x.add("-5")).plyWith(2, x=>x.add("1")),1 ], [y=>y.plyWith(2, x=>x.add("1")).plyWith(2, x=>x.add("-5")),1], [y=>y.mask("1"),10] ))) .xen(chooseCycles( [1/1, 3/2, 8/5, 6/5, 12/5], )).weight("4 3!4").gain(1.2)) // 0 1 5 4 _$: stack( // i("0@1 1@0.6 5@0.9 4@0.5 [[5 6] | [6 7]]".add("0 | -6 | [0,-6]")) // .xen([1/1, 7/6,9/5,11/7,14/9,16/9]).weight("4 3!4"), i("[0, 1, 5] [[0, 5, 7] [0,6,8]]") .xen([1/1, 7/6,9/5,11/7,14/9,16/9]).weight("8"), i("[5 6] 4 1 <4 2 4 6>") .xen([1/1, 7/6,9/5,11/7,14/9,16/9]).s("gm_electric_guitar_jazz"), "sd:225 hh:3000!2? oh:2000?".as("s:lpf").bank("bbox") .sometimes(ply(2)) ) // .rev() $: i("[[<<0 -5> -2 -3 -4>]@1 [-]@3]/4".add("0?, 1?, 5?")) .xen(chooseCycles( [1/1, 3/2, 8/5, 6/5, 12/5], )).att(1.5).rel(4).s("gm_violin").lpf(2000).withBase(pure(220).mul(2)) .gain(0.2) $: "sd:225 hh:3000!2? oh:2000?".as("s:lpf").bank("bbox") .sometimes(ply(2)) $: i("[[<<0 -5> -2 -3 -4>]@1]/2".add("0?, 1?, 5?")) .xen( [1/1, 3/2, 8/5, 6/5, 12/5] // cplucklong ).s(` org_farfclardbar?, cmb_tron_combo? `).withBase(220).att(2).dec(2).sus(2).rel(2) $: i("0!4".add("<0 0 2 1>/4")) .apply(chooseCycles( x=>x.plyWith(4, x=>x.add(i("<3 3 1 1>/4".add("<[0 1] [0 2] 0 0>/4"))).velocity(.4)), x=>x.superimpose(y=>y.add.out(i("4 3 2 1".add("<0 [1 5]>".add("<0 1>/4"))).fast(2))).velocity(.6), x=>x.plyWith(4, x=>x.add(i("0")).velocity(.6).s("gm_electric_guitar_muted")), ).slow(16)) .xen(chooseCycles( [1/1, 3/2, 8/5, 6/5, 12/5], )).withBase(110) .keep(s("gm_electric_guitar_jazz").rel(1)) .gain(0.7) /* Make each run of the code different (assuming use of random functions) Note 1: Will not overwrite predefined seeds Note 2: only usable on warm, as of 2026-02-16 (because of seed functions) Note 3: seed will change with each run of the code, meaning if you change something and update, the seed will change */ let d = Date.now() all(x=>withSeed(seed=>seed ? seed : d, x))