Optical Theremin Applications usin Adafruit QTPY or Seeed XAIO

Applications

Sound production Optical Theremin

Optical Theremin ---> sine-interrupt-fl2

#include <Arduino.h> #include "sine1024x1024.c" #include "Adafruit_ZeroTimer.h" #include <Wire.h> #include <VL6180X.h> VL6180X sensor; // This example can have just about any frequency for the callback // automatically calculated! float freq = 10000.0; // 10 KHz float gunk; float curve; int phase = 0; int fnote = 100; float range; float range2; float grange; // timer tester Adafruit_ZeroTimer zerotimer = Adafruit_ZeroTimer(3); void TC3_Handler() { Adafruit_ZeroTimer::timerHandler(3); } // the timer callback volatile bool togglepin = false; void TimerCallback0(void) { digitalWrite(2, togglepin); togglepin = !togglepin; int val = TableS1024[(phase>>3)&0x3ff]; analogWrite(0, (int)val); phase = phase + fnote; } void setup() { pinMode(2, OUTPUT); Wire.begin(); sensor.init(); sensor.configureDefault(); sensor.setTimeout(500); Serial.begin(9600); while (!Serial) { delay(10); } Serial.println("Timer callback tester"); Serial.print("Desired freq (Hz):"); Serial.println(freq); tc_clock_prescaler prescaler = TC_CLOCK_PRESCALER_DIV1; zerotimer.enable(false); zerotimer.configure(prescaler, // prescaler =1 TC_COUNTER_SIZE_16BIT, // bit width of timer/counter TC_WAVE_GENERATION_MATCH_PWM // frequency or PWM mode ); zerotimer.setCompare(0, 6000); // 48000000/8000 = 6000 zerotimer.setCallback(true, TC_CALLBACK_CC_CHANNEL0, TimerCallback0); zerotimer.enable(true); } void loop() { range=sensor.readRangeSingleMillimeters(); grange = (range + range2)/2; gunk =(255-grange)/30; curve = exp(gunk); Serial.print(range); if (sensor.timeoutOccurred()) { Serial.print(" TIMEOUT"); } if (grange==255) { fnote=0;} else { fnote= (int)curve; } Serial.print(" "); Serial.print(gunk); Serial.print(" "); Serial.print(curve); Serial.print(" "); Serial.print(fnote); Serial.println(); range2=range; }

Optical Pluckeroo ---> sine-interrupt-fl2

#include <Arduino.h> #include "Adafruit_ZeroTimer.h" #include <Wire.h> #include <VL6180X.h> VL6180X sensor; // This example can have just about any frequency for the callback // automatically calculated! const PROGMEM int lookup_buf[255] = { 582, 582, 582, 582, 582, //A0 549, 549, 549, 549, 549, //A#0 518, 518, 518, 518, 518, //b0 489, 489, 489, 489, 489, //C1 461, 461, 461, 461, 461, 435, 435, 435, 435, 435, 411, 411, 411, 411, 411, 388, 388, 388, 388, 388, 366, 366, 366, 366, 366, 345, 345, 345, 345, 345, 326, 326, 326, 326, 326, 308, 308, 308, 308, 308, 290, 290, 290, 290, 290, 274, 274, 274, 274, 274, 259, 259, 259, 259, 259, 244, 244, 244, 244, 244, 230, 230, 230, 230, 230, 217, 217, 217, 217, 217, 205, 205, 205, 205, 205, 194, 194, 194, 194, 194, 183, 183, 183, 183, 183, 172, 172, 172, 172, 172, 163, 163, 163, 163, 163, 154, 154, 154, 154, 154, 145, 145, 145, 145, 145, 137, 137, 137, 137, 137, 129, 129, 129, 129, 129, 122, 122, 122, 122, 122, 115, 115, 115, 115, 115, 108, 108, 108, 108, 108, 102, 102, 102, 102, 102, 97, 97, 97, 97, 97, 91, 91, 91, 91, 91, 86, 86, 86, 86, 86, 81, 81, 81, 81, 81, 77, 77, 77, 77, 77, 72, 72, 72, 72, 72, 68, 68, 68, 68, 68, 64, 64, 64, 64, 64, 61, 61, 61, 61, 61, 57, 57, 57, 57, 57, 54, 54, 54, 54, 54, 51, 51, 51, 51, 51, 48, 48, 48, 48, 48, 45, 45, 45, 45, 45, 43, 43, 43, 43, 43, 40, 40, 40, 40, 40, 38, 38, 38, 38, 38, 36, 36, 36, 36, 36, 34, 34, 34, 34, 34, 32, 32, 32, 32, 32 } ; bool soundon=false; int cycles=0; int sound_buf[4096]; int freq = 16000; // 10 KHz int gunk; int phase = 0; int buf_limit; int fnote = 100; int range = 255; // timer tester Adafruit_ZeroTimer zerotimer = Adafruit_ZeroTimer(3); void TC3_Handler() { Adafruit_ZeroTimer::timerHandler(3); } // the timer callback volatile bool togglepin = false; void TimerCallback0(void) { digitalWrite(2, HIGH); if(soundon){ int val = 0x3ff & (sound_buf[phase]+512); analogWrite(0, val); int nbh = (phase != buf_limit-1) ? phase+1 : 0; sound_buf[phase] = .999 *((sound_buf[phase] + sound_buf[nbh])/2 ); // smoothe buffer // Serial.print("phase "); // Serial.println(phase); if (phase == buf_limit-1){ cycles++; phase=0; // Serial.print("cycles "); // Serial.println(cycles); } else { phase++; } if (cycles > 64) { cycles =0; soundon=false; digitalWrite(3, LOW); } digitalWrite(LED_BUILTIN, LOW); } digitalWrite(2, LOW); } void karplus_strong(unsigned int N) { for (int i=0; i<=N-1; i++){ sound_buf[i] = random(1023)-512; Serial.print("karplus"); Serial.print(i); Serial.print(" "); Serial.println(sound_buf[i]); } } void setup() { pinMode(2, OUTPUT); pinMode(3, OUTPUT); pinMode(LED_BUILTIN, OUTPUT); Wire.begin(); sensor.init(); sensor.configureDefault(); sensor.setTimeout(500); Serial.begin(115200); while (!Serial) { delay(10); } Serial.println("Timer callback tester"); Serial.print("Desired freq (Hz):"); Serial.println(freq); tc_clock_prescaler prescaler = TC_CLOCK_PRESCALER_DIV1; zerotimer.enable(false); zerotimer.configure(prescaler, // prescaler =1 TC_COUNTER_SIZE_16BIT, // bit width of timer/counter TC_WAVE_GENERATION_MATCH_PWM // frequency or PWM mode ); zerotimer.setCompare(0, 3000); // 48000000/3000 = 16000 zerotimer.setCallback(true, TC_CALLBACK_CC_CHANNEL0, TimerCallback0); zerotimer.enable(true); } void loop() { delay(100); if (!soundon){ range = sensor.readRangeSingleMillimeters(); Serial.print("range "); Serial.println(range); if (range<250){ digitalWrite(LED_BUILTIN, HIGH); gunk =(255-range); buf_limit =lookup_buf[gunk]; karplus_strong(buf_limit); Serial.print("buf_limit "); Serial.println(buf_limit); cycles=0; soundon=true; digitalWrite(3, HIGH); } } }

BOM

SAMD21 Applicationsr
Coyote Simulator
Advanced RISC
Advanced RISC
SAMD21