PokittoLib is the library needed for programming the Pokitto DIY game console (www.pokitto.com)

Committer:
spinal
Date:
Sun Nov 18 15:47:54 2018 +0000
Revision:
64:6e6c6c2b664e
Parent:
31:f4b9b85c7b62
added fix for directrectangle()

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Pokitto 31:f4b9b85c7b62 1 /**************************************************************************/
Pokitto 31:f4b9b85c7b62 2 /*!
Pokitto 31:f4b9b85c7b62 3 @file Synth_oscfuncs.cpp
Pokitto 31:f4b9b85c7b62 4 @author Jonne Valola
Pokitto 31:f4b9b85c7b62 5
Pokitto 31:f4b9b85c7b62 6 @section LICENSE
Pokitto 31:f4b9b85c7b62 7
Pokitto 31:f4b9b85c7b62 8 Software License Agreement (BSD License)
Pokitto 31:f4b9b85c7b62 9
Pokitto 31:f4b9b85c7b62 10 Copyright (c) 2016, Jonne Valola
Pokitto 31:f4b9b85c7b62 11 All rights reserved.
Pokitto 31:f4b9b85c7b62 12
Pokitto 31:f4b9b85c7b62 13 Redistribution and use in source and binary forms, with or without
Pokitto 31:f4b9b85c7b62 14 modification, are permitted provided that the following conditions are met:
Pokitto 31:f4b9b85c7b62 15 1. Redistributions of source code must retain the above copyright
Pokitto 31:f4b9b85c7b62 16 notice, this list of conditions and the following disclaimer.
Pokitto 31:f4b9b85c7b62 17 2. Redistributions in binary form must reproduce the above copyright
Pokitto 31:f4b9b85c7b62 18 notice, this list of conditions and the following disclaimer in the
Pokitto 31:f4b9b85c7b62 19 documentation and/or other materials provided with the distribution.
Pokitto 31:f4b9b85c7b62 20 3. Neither the name of the copyright holders nor the
Pokitto 31:f4b9b85c7b62 21 names of its contributors may be used to endorse or promote products
Pokitto 31:f4b9b85c7b62 22 derived from this software without specific prior written permission.
Pokitto 31:f4b9b85c7b62 23
Pokitto 31:f4b9b85c7b62 24 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS ''AS IS'' AND ANY
Pokitto 31:f4b9b85c7b62 25 EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
Pokitto 31:f4b9b85c7b62 26 WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
Pokitto 31:f4b9b85c7b62 27 DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE FOR ANY
Pokitto 31:f4b9b85c7b62 28 DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
Pokitto 31:f4b9b85c7b62 29 (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
Pokitto 31:f4b9b85c7b62 30 LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
Pokitto 31:f4b9b85c7b62 31 ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
Pokitto 31:f4b9b85c7b62 32 (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
Pokitto 31:f4b9b85c7b62 33 SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
Pokitto 31:f4b9b85c7b62 34 */
Pokitto 31:f4b9b85c7b62 35 /**************************************************************************/
Pokitto 31:f4b9b85c7b62 36
Pokitto 31:f4b9b85c7b62 37 #include "Synth.h"
Pokitto 31:f4b9b85c7b62 38
Pokitto 31:f4b9b85c7b62 39 /** OSCILLATOR FUNCTIONS **/
Pokitto 31:f4b9b85c7b62 40
Pokitto 31:f4b9b85c7b62 41 void setOSC(OSC* o,byte on=1, byte wave=1, byte loop=0, byte echo=0, byte adsr=0,
Pokitto 31:f4b9b85c7b62 42 uint8_t notenumber=25, uint8_t volume=127,
Pokitto 31:f4b9b85c7b62 43 uint16_t attack=0, uint16_t decay=0, uint16_t sustain=0, uint16_t release=0,
Pokitto 31:f4b9b85c7b62 44 int16_t maxbend=0, int16_t bendrate=0, uint8_t arpmode = 0, uint8_t overdrive=0, uint8_t kick=0){
Pokitto 31:f4b9b85c7b62 45 //Serial.println("SetOsc "); osc1
Pokitto 31:f4b9b85c7b62 46 o->on = on;
Pokitto 31:f4b9b85c7b62 47 o->overdrive = overdrive;
Pokitto 31:f4b9b85c7b62 48 o->kick = kick;
Pokitto 31:f4b9b85c7b62 49 o->wave = wave;
Pokitto 31:f4b9b85c7b62 50 o->loop = loop;
Pokitto 31:f4b9b85c7b62 51 o->echo = echo; //echo shifts left 8 steps to zero
Pokitto 31:f4b9b85c7b62 52 o->echodiv = 0;
Pokitto 31:f4b9b85c7b62 53 o->adsr = adsr;
Pokitto 31:f4b9b85c7b62 54 if (arpmode) {
Pokitto 31:f4b9b85c7b62 55 if (arpmode < 4) {o->arpmode = 1; o->arpspeed = arpmode;}
Pokitto 31:f4b9b85c7b62 56 else if (arpmode < 7) {o->arpmode = 2; o->arpspeed = arpmode-3;}
Pokitto 31:f4b9b85c7b62 57 else if (arpmode < 10) {o->arpmode = 3; o->arpspeed = arpmode-6; } // vibrato trial
Pokitto 31:f4b9b85c7b62 58 else if (arpmode < 13) {o->arpmode = 4; o->arpspeed = arpmode-9; } // octave trial
Pokitto 31:f4b9b85c7b62 59 else if (arpmode < 16) {o->arpmode = 5; o->arpspeed = arpmode-12; } // funk trial*/
Pokitto 31:f4b9b85c7b62 60 } else o->arpmode = 0;
Pokitto 31:f4b9b85c7b62 61 o->arpstep = 0;
Pokitto 31:f4b9b85c7b62 62 o->count = 0;
Pokitto 31:f4b9b85c7b62 63 noiseval = xorshift16(); //random(0,0xFFFF);
Pokitto 31:f4b9b85c7b62 64
Pokitto 31:f4b9b85c7b62 65 o->cinc = cincs[notenumber]; // direct cinc from table, no calculation
Pokitto 31:f4b9b85c7b62 66 o->tonic = notenumber; // save tonic for arpeggio use
Pokitto 31:f4b9b85c7b62 67 if (wave == 2) o->cinc >>= 1; // correct pitch for saw wave
Pokitto 31:f4b9b85c7b62 68 if (wave == 4) o->cinc <<= 1; // enable higher pitch for pure noise
Pokitto 31:f4b9b85c7b62 69 o->vol = volume << 8;//volume;
Pokitto 31:f4b9b85c7b62 70
Pokitto 31:f4b9b85c7b62 71 if (adsr) {
Pokitto 31:f4b9b85c7b62 72 o->attack = attack;
Pokitto 31:f4b9b85c7b62 73 o->decay = decay;
Pokitto 31:f4b9b85c7b62 74 o->sustain = sustain;
Pokitto 31:f4b9b85c7b62 75 o->release = release;
Pokitto 31:f4b9b85c7b62 76 o->adsrphase = 1;
Pokitto 31:f4b9b85c7b62 77 if (!o->attack) o->adsrvol = o->vol; // start directly, no attack ramp
Pokitto 31:f4b9b85c7b62 78 else o->adsrvol = 0;
Pokitto 31:f4b9b85c7b62 79 } else {
Pokitto 31:f4b9b85c7b62 80 o->attack = 0;
Pokitto 31:f4b9b85c7b62 81 o->decay = 0;
Pokitto 31:f4b9b85c7b62 82 o->sustain = 0;
Pokitto 31:f4b9b85c7b62 83 o->release = 0;
Pokitto 31:f4b9b85c7b62 84 o->adsrphase = 0;
Pokitto 31:f4b9b85c7b62 85 o->adsrvol = o->vol; // will stay same all the time
Pokitto 31:f4b9b85c7b62 86 }
Pokitto 31:f4b9b85c7b62 87
Pokitto 31:f4b9b85c7b62 88 if (bendrate != 0) {
Pokitto 31:f4b9b85c7b62 89 o->bendrate = bendrate; // test value
Pokitto 31:f4b9b85c7b62 90 o->pitchbend = 0;
Pokitto 31:f4b9b85c7b62 91 o->maxbend = maxbend;
Pokitto 31:f4b9b85c7b62 92 }
Pokitto 31:f4b9b85c7b62 93 }
Pokitto 31:f4b9b85c7b62 94
Pokitto 31:f4b9b85c7b62 95 void setOSC(OSC* o,byte on, byte wave, uint16_t frq, uint8_t volume, uint32_t duration){
Pokitto 31:f4b9b85c7b62 96 o->on = on;
Pokitto 31:f4b9b85c7b62 97 o->overdrive = 0;
Pokitto 31:f4b9b85c7b62 98 o->kick = 0;
Pokitto 31:f4b9b85c7b62 99 o->wave = wave;
Pokitto 31:f4b9b85c7b62 100 o->loop = 0;//1;
Pokitto 31:f4b9b85c7b62 101 o->echo = 0;//1; //echo shifts left 8 steps to zero
Pokitto 31:f4b9b85c7b62 102 o->echodiv = 0;
Pokitto 31:f4b9b85c7b62 103 o->adsr = 0;//1;
Pokitto 31:f4b9b85c7b62 104 o->attack = 0;//200;
Pokitto 31:f4b9b85c7b62 105 o->decay = 0;//200;
Pokitto 31:f4b9b85c7b62 106 o->sustain = 0;//20;
Pokitto 31:f4b9b85c7b62 107 o->release = 0;//10;
Pokitto 31:f4b9b85c7b62 108 o->adsrphase = 0;//1;
Pokitto 31:f4b9b85c7b62 109 o->arpmode = 0;
Pokitto 31:f4b9b85c7b62 110 o->count = 0;
Pokitto 31:f4b9b85c7b62 111 noiseval = xorshift16(); //random(0,0xFFFF);
Pokitto 31:f4b9b85c7b62 112 o->cinc = ((float)0xFFFFFFFF/(float)POK_AUD_FREQ)*frq;
Pokitto 31:f4b9b85c7b62 113 if (wave == 2) o->cinc >>= 1; // correct pitch for saw wave
Pokitto 31:f4b9b85c7b62 114 if (wave == 4) o->cinc <<= 1; // enable higher pitch for pure noise
Pokitto 31:f4b9b85c7b62 115 o->vol = volume << 8;//volume;
Pokitto 31:f4b9b85c7b62 116 o->adsrvol = o->vol;
Pokitto 31:f4b9b85c7b62 117 o->duration = 0;//duration*100;
Pokitto 31:f4b9b85c7b62 118 o->maxbend = 0;//-4000;
Pokitto 31:f4b9b85c7b62 119 o->bendrate = 0;//1000;
Pokitto 31:f4b9b85c7b62 120 }
Pokitto 31:f4b9b85c7b62 121
Pokitto 31:f4b9b85c7b62 122
Pokitto 31:f4b9b85c7b62 123
Pokitto 31:f4b9b85c7b62 124 void emptyOscillators(){
Pokitto 31:f4b9b85c7b62 125 osc1.on = false; osc1.wave = 0; osc1.echo = 0; osc1.count = 0; osc1.cinc =0;
Pokitto 31:f4b9b85c7b62 126 osc1.attack = 0; osc1.loop = 0; osc1.adsrphase = 1; osc1.adsr = 1; osc1.decay = 100;
Pokitto 31:f4b9b85c7b62 127 osc1.pitchbend = 0; osc1.bendrate = 0; osc1.maxbend = 0; osc1.sustain = 0; osc1.release = 0;
Pokitto 31:f4b9b85c7b62 128
Pokitto 31:f4b9b85c7b62 129 osc2.on = false; osc2.wave = 0; osc2.echo = 0; osc2.count = 0; osc2.cinc =0;
Pokitto 31:f4b9b85c7b62 130 osc2.attack = 0; osc2.loop = 0; osc2.adsrphase = 1; osc2.adsr = 1; osc2.decay = 100;
Pokitto 31:f4b9b85c7b62 131 osc2.pitchbend = 0; osc2.bendrate = 0; osc2.maxbend = 0; osc2.sustain = 0; osc2.release = 0;
Pokitto 31:f4b9b85c7b62 132
Pokitto 31:f4b9b85c7b62 133 osc3.on = false; osc3.wave = 0; osc3.echo = 0; osc3.count = 0; osc3.cinc =0;
Pokitto 31:f4b9b85c7b62 134 osc3.attack = 0; osc3.loop = 0; osc3.adsrphase = 1; osc3.adsr = 1; osc3.decay = 100;
Pokitto 31:f4b9b85c7b62 135 osc3.pitchbend = 0; osc3.bendrate = 0; osc3.maxbend = 0; osc3.sustain = 0; osc3.release = 0;
Pokitto 31:f4b9b85c7b62 136 }
Pokitto 31:f4b9b85c7b62 137
Pokitto 31:f4b9b85c7b62 138
Pokitto 31:f4b9b85c7b62 139 void testOsc(){
Pokitto 31:f4b9b85c7b62 140 setOSC(&osc1,1,WTRI,1,0,1,25,127,10,10,20,2,0,0,0,0,0); // C3 = 25
Pokitto 31:f4b9b85c7b62 141 setOSC(&osc2,1,WTRI,1,0,1,29-12,63,2,1,20,2,0,0,14,0,0); // E3 = 29
Pokitto 31:f4b9b85c7b62 142 setOSC(&osc3,1,WSAW,1,0,1,25,15,30,30,20,2,-1,-1000,12,0,0); // G3 = 32
Pokitto 31:f4b9b85c7b62 143 }
Pokitto 31:f4b9b85c7b62 144
Pokitto 31:f4b9b85c7b62 145 void playNote(uint8_t oscnum, uint8_t notenum, uint8_t i) {
Pokitto 31:f4b9b85c7b62 146 OSC* o;
Pokitto 31:f4b9b85c7b62 147 if (oscnum == 1) o = &osc1; else if (oscnum == 2) o = &osc2; else o = &osc3;
Pokitto 31:f4b9b85c7b62 148 setOSC(o,1,patch[i].wave,patch[i].loop,patch[i].echo,patch[i].adsr,notenum,patch[i].vol,
Pokitto 31:f4b9b85c7b62 149 patch[i].attack,patch[i].decay,patch[i].sustain,patch[i].release,
Pokitto 31:f4b9b85c7b62 150 patch[i].maxbend,patch[i].bendrate,patch[i].arpmode,patch[i].overdrive,patch[i].kick);
Pokitto 31:f4b9b85c7b62 151 }
Pokitto 31:f4b9b85c7b62 152
Pokitto 31:f4b9b85c7b62 153 void makeSampleInstruments() {
Pokitto 31:f4b9b85c7b62 154 /* sample instruments for testing */
Pokitto 31:f4b9b85c7b62 155 patch[0].wave = WSQUARE;
Pokitto 31:f4b9b85c7b62 156 patch[0].on = 1;
Pokitto 31:f4b9b85c7b62 157 patch[0].vol = 127;
Pokitto 31:f4b9b85c7b62 158 patch[0].loop = 0;
Pokitto 31:f4b9b85c7b62 159 patch[0].echo = 0;
Pokitto 31:f4b9b85c7b62 160
Pokitto 31:f4b9b85c7b62 161 patch[0].adsr = 0;
Pokitto 31:f4b9b85c7b62 162 patch[0].attack = 0;
Pokitto 31:f4b9b85c7b62 163 patch[0].decay = 0;
Pokitto 31:f4b9b85c7b62 164 patch[0].sustain = 0;
Pokitto 31:f4b9b85c7b62 165 patch[0].release = 0;
Pokitto 31:f4b9b85c7b62 166
Pokitto 31:f4b9b85c7b62 167 patch[0].maxbend = -1000;
Pokitto 31:f4b9b85c7b62 168 patch[0].bendrate = 100;
Pokitto 31:f4b9b85c7b62 169 patch[0].arpmode = 3;
Pokitto 31:f4b9b85c7b62 170 patch[0].overdrive = 0;
Pokitto 31:f4b9b85c7b62 171 patch[0].kick = 0;
Pokitto 31:f4b9b85c7b62 172
Pokitto 31:f4b9b85c7b62 173 patch[1].wave = WSAW;
Pokitto 31:f4b9b85c7b62 174 patch[1].on = 1;
Pokitto 31:f4b9b85c7b62 175 patch[1].vol = 200;
Pokitto 31:f4b9b85c7b62 176 patch[1].loop = 0;
Pokitto 31:f4b9b85c7b62 177 patch[1].echo = 0;
Pokitto 31:f4b9b85c7b62 178
Pokitto 31:f4b9b85c7b62 179 patch[1].adsr = 0;
Pokitto 31:f4b9b85c7b62 180 patch[1].attack = 0;
Pokitto 31:f4b9b85c7b62 181 patch[1].decay = 0;
Pokitto 31:f4b9b85c7b62 182 patch[1].sustain = 0;
Pokitto 31:f4b9b85c7b62 183 patch[1].release = 0;
Pokitto 31:f4b9b85c7b62 184
Pokitto 31:f4b9b85c7b62 185 patch[1].maxbend = 0;
Pokitto 31:f4b9b85c7b62 186 patch[1].bendrate = 0;
Pokitto 31:f4b9b85c7b62 187 patch[1].arpmode = 1;
Pokitto 31:f4b9b85c7b62 188 patch[1].overdrive = 0;
Pokitto 31:f4b9b85c7b62 189 patch[1].kick = 0;
Pokitto 31:f4b9b85c7b62 190
Pokitto 31:f4b9b85c7b62 191 patch[2].wave = WTRI;
Pokitto 31:f4b9b85c7b62 192 patch[2].on = 1;
Pokitto 31:f4b9b85c7b62 193 patch[2].vol = 127;
Pokitto 31:f4b9b85c7b62 194 patch[2].loop = 0;
Pokitto 31:f4b9b85c7b62 195 patch[2].echo = 0;
Pokitto 31:f4b9b85c7b62 196
Pokitto 31:f4b9b85c7b62 197 patch[2].adsr = 1;
Pokitto 31:f4b9b85c7b62 198 patch[2].attack = 10;
Pokitto 31:f4b9b85c7b62 199 patch[2].decay = 0;
Pokitto 31:f4b9b85c7b62 200 patch[2].sustain = 0;
Pokitto 31:f4b9b85c7b62 201 patch[2].release = 0;
Pokitto 31:f4b9b85c7b62 202
Pokitto 31:f4b9b85c7b62 203 patch[2].maxbend = 0;
Pokitto 31:f4b9b85c7b62 204 patch[2].bendrate = 0;
Pokitto 31:f4b9b85c7b62 205 patch[2].arpmode = 1;
Pokitto 31:f4b9b85c7b62 206 patch[2].overdrive = 0;
Pokitto 31:f4b9b85c7b62 207 patch[2].kick = 0;
Pokitto 31:f4b9b85c7b62 208
Pokitto 31:f4b9b85c7b62 209 patch[3].wave = WNOISE;
Pokitto 31:f4b9b85c7b62 210 patch[3].on = 1;
Pokitto 31:f4b9b85c7b62 211 patch[3].vol = 127;
Pokitto 31:f4b9b85c7b62 212 patch[3].loop = 1;
Pokitto 31:f4b9b85c7b62 213 patch[3].echo = 1;
Pokitto 31:f4b9b85c7b62 214
Pokitto 31:f4b9b85c7b62 215 patch[3].adsr = 1;
Pokitto 31:f4b9b85c7b62 216 patch[3].attack = 0;
Pokitto 31:f4b9b85c7b62 217 patch[3].decay = 30;
Pokitto 31:f4b9b85c7b62 218 patch[3].sustain = 30;
Pokitto 31:f4b9b85c7b62 219 patch[3].release = 5;
Pokitto 31:f4b9b85c7b62 220
Pokitto 31:f4b9b85c7b62 221 patch[3].maxbend = 0;
Pokitto 31:f4b9b85c7b62 222 patch[3].bendrate = 0;
Pokitto 31:f4b9b85c7b62 223 patch[3].arpmode = 0;
Pokitto 31:f4b9b85c7b62 224 patch[3].overdrive = 0;
Pokitto 31:f4b9b85c7b62 225 patch[3].kick = 0;
Pokitto 31:f4b9b85c7b62 226
Pokitto 31:f4b9b85c7b62 227 patch[4].wave = WPNOISE;
Pokitto 31:f4b9b85c7b62 228 patch[4].on = 1;
Pokitto 31:f4b9b85c7b62 229 patch[4].vol = 127;
Pokitto 31:f4b9b85c7b62 230 patch[4].loop = 0;
Pokitto 31:f4b9b85c7b62 231 patch[4].echo = 0;
Pokitto 31:f4b9b85c7b62 232
Pokitto 31:f4b9b85c7b62 233 patch[4].adsr = 1;
Pokitto 31:f4b9b85c7b62 234 patch[4].attack = 0;
Pokitto 31:f4b9b85c7b62 235 patch[4].decay = 30;
Pokitto 31:f4b9b85c7b62 236 patch[4].sustain = 30;
Pokitto 31:f4b9b85c7b62 237 patch[4].release = 5;
Pokitto 31:f4b9b85c7b62 238
Pokitto 31:f4b9b85c7b62 239 patch[4].maxbend = 0;
Pokitto 31:f4b9b85c7b62 240 patch[4].bendrate = 0;
Pokitto 31:f4b9b85c7b62 241 patch[4].arpmode = 1;
Pokitto 31:f4b9b85c7b62 242 patch[4].overdrive = 0;
Pokitto 31:f4b9b85c7b62 243 patch[4].kick = 0;
Pokitto 31:f4b9b85c7b62 244 }
Pokitto 31:f4b9b85c7b62 245
Pokitto 31:f4b9b85c7b62 246