adjustable

Freely adjustable chromatic tuning table for tonewheels
Author: Johannes Taelman
License: BSD
Github: jt/tuning/adjustable.axo

Inlets

frac32 detune

Outlets

None

Parameters

frac32.s.map.pitch C

frac32.s.map.pitch Db

frac32.s.map.pitch D

frac32.s.map.pitch Eb

frac32.s.map.pitch E

frac32.s.map.pitch F

frac32.s.map.pitch Gb

frac32.s.map.pitch G

frac32.s.map.pitch Ab

frac32.s.map.pitch A

frac32.s.map.pitch Bb

frac32.s.map.pitch B

Declaration
static const uint32_t LENGTHPOW = 4;
static const uint32_t LENGTH = 1 << LENGTHPOW;
static const uint32_t LENGTHMASK = (1 << LENGTHPOW) - 1;
static const uint32_t BITS = 32;
static const uint32_t GAIN = 0;
int32_t array[LENGTH];
Init
int i;
for (i = 0; i < LENGTH; i++) {
  array[i] = 0;
}
Control Rate
array[0] = mtof48k_ext_q31(param_C + inlet_detune);
array[1] = mtof48k_ext_q31(param_Db + inlet_detune);
array[2] = mtof48k_ext_q31(param_D + inlet_detune);
array[3] = mtof48k_ext_q31(param_Eb + inlet_detune);
array[4] = mtof48k_ext_q31(param_E + inlet_detune);
array[5] = mtof48k_ext_q31(param_F + inlet_detune);
array[6] = mtof48k_ext_q31(param_Gb + inlet_detune);
array[7] = mtof48k_ext_q31(param_G + inlet_detune);
array[8] = mtof48k_ext_q31(param_Ab + inlet_detune);
array[9] = mtof48k_ext_q31(param_A + inlet_detune);
array[10] = mtof48k_ext_q31(param_Bb + inlet_detune);
array[11] = mtof48k_ext_q31(param_B + inlet_detune);

Privacy

© 2024 Zrna Research