sound-stereo.js

import { parsePattern, stringToNote } from './util.js'
import Shared32Array from './shared32array.js'
import Biquad from './biquad.js'
import Oscs from './osc.js'

const PRIVATE_API = ['constructor','valueOf','_reset']
const getMethods = (obj) => {
  return Object.getOwnPropertyNames(obj)
    .filter(m => !PRIVATE_API.includes(m))
}

class Sound {
  constructor () {
    this.x0 = 0
    this.Lx0 = 0
    this.Rx0 = 0
    this.t = 0
    this._mod = Infinity
    this._wavetables_i = 0
    this._wavetables = new Array(100).fill(0)
    this._widen_buffer = new Array(256)
    this._plot_buffer = new Shared32Array(2048)

    const returnThis = () => this
    this._ignoreNext =
      Object.fromEntries(
        getMethods(Sound.prototype)
          .map(m => [m, returnThis]))
    // const returnThisStereo = () => this._stereo
    // this._ignoreNextStereo =
    //   Object.fromEntries(
    //     getMethods(Sound.prototype)
    //       .map(m => [m, returnThisStereo]))

    const returnIgnoreGrp = () => this._ignoreGrp
    this._ignoreGrp =
      Object.fromEntries(
        getMethods(Sound.prototype)
          .map(m => [m, returnIgnoreGrp]))
    this._ignoreGrp.end = returnThis
    this._ignoreNext.grp = () => this._ignoreGrp

    // const returnIgnoreGrpStereo = () => this._ignoreGrpStereo
    // this._ignoreGrpStereo =
    //   Object.fromEntries(
    //     getMethods(Sound.prototype)
    //       .map(m => [m, returnIgnoreGrpStereo]))
    // this._ignoreGrpStereo.end = returnThisStereo
    // this._ignoreNextStereo.grp = () => this._ignoreGrpStereo

    // this._stereo =
    //   Object.fromEntries(
    //     getMethods(Sound.prototype)
    //       .map(m => {
    //         let fn = (this['s' + m] ?? this[m]).bind(this)
    //         return [m, fn]
    //       }))
  }

  _reset (t) {
    this.t = t
    this.p = n
    this._wavetables_i = 0
    return this
  }

  stereo () {
    this.Lx0 = this.x0 * .5 + this.Lx0
    this.Rx0 = this.x0 * .5 + this.Rx0
    this.x0 = 0
    return this //._stereo
  }

  grp () {
    return this
  }

  end () {
    return this
  }

  // val (x=0) {
  //   this.x0 = (+x).toFinite()
  //   return this
  // }
  val (x=0) {
    this.Lx0 = this.Rx0 = (+x).toFinite()
    return this //._stereo
  }

  // vol (x=1) {
  //   this.x0 *= x
  //   return this
  // }
  vol (x=1) {
    this.Lx0 *= x
    this.Rx0 *= x
    return this //._stereo
  }

  mod (x=1,offset=0) {
    x = x * 4
    this.t %= x
    this.p = (n % (br * x))|0
    if (this.p === 0) {
      this._wavetables.fill(offset*_wavetable_len)
    }
    return this
  }

  // exp (x=1) {
  //   this.x0 *= Math.exp(-this.t * x)
  //   return this
  // }
  exp (x=1) {
    let exp = Math.exp(-this.t * x)
    this.Lx0 *= exp
    this.Rx0 *= exp
    return this //._stereo
  }

  // abs () {
  //   this.x0 = Math.abs(this.x0)
  //   return this
  // }
  abs () {
    this.Lx0 = Math.abs(this.Lx0)
    this.Rx0 = Math.abs(this.Rx0)
    return this //._stereo
  }

  // tanh (x=1) {
  //   this.x0 = Math.tanh(this.x0 * x)
  //   return this
  // }
  tanh (x=1) {
    this.Lx0 = Math.tanh(this.Lx0 * x)
    this.Rx0 = Math.tanh(this.Rx0 * x)
    return this //._stereo
  }

  // atan (x=1) {
  //   this.x0 = (2 / Math.PI)*Math.atan((Math.PI / 2) * this.x0 * x)
  //   return this
  // }
  atan (x=1) {
    this.Lx0 = (2 / Math.PI)*Math.atan((Math.PI / 2) * this.Lx0 * x)
    this.Rx0 = (2 / Math.PI)*Math.atan((Math.PI / 2) * this.Rx0 * x)
    return this //._stereo
  }

  // soft (x=1) {
  //   this.x0 = this.x0 / ((1/x) + Math.abs(this.x0))
  //   return this
  // }
  soft (x=1) {
    this.Lx0 = this.Lx0 / ((1/x) + Math.abs(this.Lx0))
    this.Rx0 = this.Rx0 / ((1/x) + Math.abs(this.Rx0))
    return this //._stereo
  }

  // on (x=1, measure=1/4, count=x) {
  //   return (t/(measure*4)|0)%count === x-1
  //     ? this
  //     : this._ignoreNext
  // }
  on (x=1, measure=1/4, count=x) {
    return (t/(measure*4)|0)%count === x-1
      ? this //._stereo
      : this._ignoreNext //Stereo
  }

  // TODO: improve this
  // play (x,offset=0,speed=1,mod) {
  //   let N = mod ?? x.length
  //   this.x0 = x[0][(( ( (this.p+offset)*speed) % N + N) % N)|0] ?? 0
  //   return this
  // }
  play (x,offset=0,speed=1,mod) {
    let N = mod ?? x[0].length
    let p = (( ( (this.p+offset)*speed) % N + N) % N)|0
    this.Lx0 = (x[0][p] ?? 0) * .5
    this.Rx0 = ((x[1] ?? x[0])[p] ?? 0) * .5
    return this //._stereo
  }

  // widen (x=.5) {
  //   let half = this.x0 * .5
  //   this._widen_buffer[n & 255] = half
  //   this.Lx0 = half
  //   this.Rx0 = this._widen_buffer[(n+((1-x)*256)) & 255]
  //   return this._stereo
  // }
  widen (x=.5) {
    this._widen_buffer[n & 255] = this.Rx0
    this.Rx0 = this._widen_buffer[(n+((1-x)*256)) & 255]
    return this //._stereo
  }

  // delay (measure=1/16,feedback=.5,amt=.5) {
  //   let d = _delays[_delays_i++]
  //   this.x0 = d.delay((bar*measure)|0).feedback(feedback).run(this.x0, amt)
  //   return this
  // }
  delay (measure=1/16,feedback=.5,amt=.5) {
    let Ld = _delays[_delays_i++]
    let Rd = _delays[_delays_i++]
    this.Lx0 = Ld.delay((bar*measure)|0).feedback(feedback).run(this.Lx0, amt)
    this.Rx0 = Rd.delay((bar*measure)|0).feedback(feedback).run(this.Rx0, amt)
    return this //._stereo
  }

  // daverb (x={}) {
  //   let d = _daverbs[_daverbs_i++]
  //   let LR = d.process(this.x0*.5, this.x0*.5, x)
  //   this.Lx0 = LR[0]
  //   this.Rx0 = LR[1]
  //   return this._stereo
  // }
  daverb (x={}) {
    let d = _daverbs[_daverbs_i++]
    let LR = d.process(this.Lx0, this.Rx0, x)
    this.Lx0 = LR[0]
    this.Rx0 = LR[1]
    return this //._stereo
  }

  // panout (x=1,LR=0) { // -1..+1  0=center
  //   main.Lx0 += this.x0 * x * (1-(.5 + .5*LR))
  //   main.Rx0 += this.x0 * x *    (.5 + .5*LR)
  //   return this
  // }

  // out (x=1) {
  //   main.x0 += this.x0 * x
  //   return this
  // }
  out (x=1,LR=0) {
    main.Lx0 += this.Lx0 * x * (2-(1 + 1*LR))
    main.Rx0 += this.Rx0 * x *    (1 + 1*LR)
    return this
  }

  plot (x=1) {
    if (i === 0) {
      this._plot_buffer.fill(0)
    }
    let co = bar / (2048*x)
    if (i === bar - 1) {
      worker.plot(this._plot_buffer, (1/x))
      return this
    }
    if ((i % co)|0 === 0) {
      this._plot_buffer[(i/co)|0] = (this.Lx0 + this.Rx0) * .5
    }
    return this
  }

  valueOf () {
    return (this.Lx0 + this.Rx0) * .5
  }
}

// aliases
Sound.prototype.mul = Sound.prototype.vol
// Sound.prototype.smul = Sound.prototype.svol

// Object.assign(Sound.prototype, Biquad)
Object.keys(Biquad).forEach(m => {
  Sound.prototype[m] = function (a0, a1, a2, a3) {
    this.Lx0 = Biquad[m].call({ x0: this.Lx0 }).x0
    this.Rx0 = Biquad[m].call({ x0: this.Rx0 }).x0
    return this //._stereo
  }
})

self._wavetable = {}
self._wavetable_len = 44100

Object.keys(Oscs).forEach(osc => {
  const table =
  _wavetable[osc] =
  _wavetable[osc] = new Float32Array(_wavetable_len)
  for (let i = 0, t = 0; i < _wavetable_len; i++) {
    t = i / _wavetable_len
    if (osc === 'noise') {
      table[i] = Oscs[osc].call(i, 1)
    } else {
      table[i] = Oscs[osc].call(t, 1)
    }
  }

  // Sound.prototype[osc] = new Function('x=1', `
  //   let index = this._wavetables[this._wavetables_i]
  //   this._wavetables[this._wavetables_i++] = (index + x) % 44100
  //   this.x0 = _wavetable.${osc}[index|0]
  //   return this
  // `)
  Sound.prototype[osc] = new Function('x=1', `
    let index = this._wavetables[this._wavetables_i]
    this._wavetables[this._wavetables_i++] = (index + x) % 44100
    this.Lx0 = this.Rx0 = _wavetable.${osc}[index|0] * .5
    return this //._stereo
  `)
})

const N = Number.prototype

Object.defineProperty(N, 'note', {
  get () {
    return Math.pow(2, (this - 57)/12) * 440
  },
  set () {},
})

const S = String.prototype

Object.defineProperty(S, 'sample', {
  get () {
    let s = samples[this]
    if (!s) {
      s = samples[this] = zeroSample
      worker.fetchSample(this)
    }
    return s
  },
  set () {},
})

Object.defineProperty(S, 'pat', {
  get () {
    let pat = patterns[this] = patterns[this] ?? parsePattern(this)
    return pat
  },
  set () {},
})

Object.defineProperty(S, 'note', {
  get () {
    return stringToNote(this)
  },
  set () {},
})

S.seq = function (x) {
  return this.pat.seq(x)
}

S.slide = function (x) {
  return this.pat.slide(x)
}

const A = Array.prototype

A.play = function (x=1,offset=0) {
  let N = this.length
  return this[(( (n*x+offset) % N + N) % N)|0]
}

A.seq = function (x) {
  let N = this.length
  return this[(( (t*(1/(x*4))) % N + N) % N)|0]
}

A.slide = function (x,speed=1) {
  let N = this.length
  let pos = (( (t*(1/(x*4))) % N + N) % N)
  let now = pos|0
  let next =  (((now + 1) % N + N) % N)|0
  let alpha = pos - now
  return this[now]+((this[next]-this[now])*Math.pow(alpha, speed))
}

const T = Object.getPrototypeOf(Float32Array).prototype // TypedArray.prototype

T.play  = A.play
T.seq   = A.seq
T.slide = A.slide

export default Sound