marcoonroad

// @ts-check

'use strict'

// NOTE: XENHARMONIC / MICROTONAL PIANO SAMPLE TEST
// TODO: MUST HANDLE PITCHED CLASSES (SINGLE OCTAVE) VS OPEN VOICINGS (2+ OCTAVES)

const roundBy5 = number => Math.round(number * 100000) / 100000

function computeFrequenciesTable(tuningFrequency, edoScale) {

marcoonroad

await samples('github:tidalcycles/dirt-samples')
await samples('github:yaxu/clean-breaks')

// DISCLAIMER:
//   POTENTIALLY DANGEROUS, DON'T LOAD ANY RANDOM EXTERNAL SCRIPT
//   IN THIS WAY, ONLY LOAD TRUSTED SCRIPTS THAT ARE FIXED SNAPSHOTS,
//   THAT IS, THEIR CODE WON'T EVER CHANGE AGAIN, AVOID USING RELATIVE
//   VERSION TAGS LIKE @latest AND SORT OF THAT -- YOU'VE BEEN WARNED --
//
// The seeded PRNG engine is a library that I made long ago called spadille:

marcoonroad

// NOTE: this is an spinback/backspin (DJ hip-hop plates) implemented using
// FM-synthesis in Strudel, use with caution and with lower gains/octaves (bassline)
// - by the increasing index, the spinback would sound more "thin/stretched" on plate

$: note("<e0 eb0 f0 d#0>")
  .scale("C:chromatic")
  .scaleTranspose(12)
  .sound("sawtooth")
  .fast(4)
  .color("red")

marcoonroad

(function () {
  if (window.__waRecorder) {
    console.warn('[waRecorder] Already installed.');
    return;
  }

  const state = {
    contexts: new Set(),
    recording: false,
    buffers: [],       // array of [Float32Array, Float32Array, ...] per channel, per block

marcoonroad

// pulsing reese saw bass (for texture)

$: note("a#1") // base bass note
  .sound("sawtooth")
  .layer(
    pattern => pattern.struct("[x -]").transpose(0),
    pattern => pattern.struct("[- x]").transpose(12) // octave jump
  )
  .cutoff(2000)
  .ftype("ladder")

marcoonroad

const edo = 311
const semitones = Array.from(
  { length: edo },
  (_, semitone) => semitone
)
const ratios =
  semitones.map(ratio =>
    Math.pow(2, ratio/edo))

const tail = pattern =>

marcoonroad

let tuning = 216
let root = 216
let edo = 31
let tempo = 135
let signature = 4
let ratio = Math.pow(2, 1/edo)
let frequencies = Array.from(
  { length: edo },
  (_, semitone) =>
    root * Math.pow(ratio, semitone)

marcoonroad

let tuning = 440
let root = 261.63
let edo = 72
let tempo = 135
let signature = 4
let ratio = Math.pow(2, 1/edo)
let frequencies = Array.from(
  { length: edo },
  (_, semitone) =>
    root * Math.pow(ratio, semitone)

marcoonroad

// angelcore sample(s)

const leads = (isUpper) =>
  n(
    !isUpper ?
    `< 61 61 63*2 -    63 65 61*2 - 61*2 - 63 64 -  -  -    72*2 -  >` :
    `< -  -  -    64*2 -  -  -    - -    - -  -  67 69 71*2 -    73 >`
  )
  .cpm(135/4)
  .fast(6)

marcoonroad

git config core.autocrlf true
git config core.filemode false