Jonne Valola / PokittoLib Featured

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

Dependents:   YATTT sd_map_test cPong SnowDemo ... more

PokittoLib

Library for programming Pokitto hardware

How to Use

  1. Import this library to online compiler (see button "import" on the right hand side
  2. DO NOT import mbed-src anymore, a better version is now included inside PokittoLib
  3. Change My_settings.h according to your project
  4. Start coding!

POKITTO_HW/HWSound.cpp@31:f4b9b85c7b62, 2018-01-30 (annotated)

Committer:
Pokitto
Date:
Tue Jan 30 10:41:47 2018 +0000
Revision:
31:f4b9b85c7b62
Child:
32:6d5a63b6d5b6
Sound output improvements added:  louder, clearer, faster!

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Pokitto 31:f4b9b85c7b62 1 /**************************************************************************/
Pokitto 31:f4b9b85c7b62 2 /*!
Pokitto 31:f4b9b85c7b62 3 @file HWSound.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 "mbed.h"
Pokitto 31:f4b9b85c7b62 38 #include "HWSound.h"
Pokitto 31:f4b9b85c7b62 39 //#include "MCP4018.h"
Pokitto 31:f4b9b85c7b62 40 #include "SoftwareI2C.h"
Pokitto 31:f4b9b85c7b62 41 #include "Pokitto_settings.h"
Pokitto 31:f4b9b85c7b62 42 #include "PokittoDisk.h"
Pokitto 31:f4b9b85c7b62 43 #include "PokittoGlobs.h"
Pokitto 31:f4b9b85c7b62 44 #include "Synth.h"
Pokitto 31:f4b9b85c7b62 45 #include "timer_11u6x.h"
Pokitto 31:f4b9b85c7b62 46 #include "clock_11u6x.h"
Pokitto 31:f4b9b85c7b62 47 //#include "beat_11025.h"
Pokitto 31:f4b9b85c7b62 48
Pokitto 31:f4b9b85c7b62 49
Pokitto 31:f4b9b85c7b62 50
Pokitto 31:f4b9b85c7b62 51
Pokitto 31:f4b9b85c7b62 52 using namespace Pokitto;
Pokitto 31:f4b9b85c7b62 53
Pokitto 31:f4b9b85c7b62 54 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 55 pwmout_t* obj = &audiopwm;
Pokitto 31:f4b9b85c7b62 56 #endif
Pokitto 31:f4b9b85c7b62 57
Pokitto 31:f4b9b85c7b62 58 /** Sound Variables **/
Pokitto 31:f4b9b85c7b62 59 #if (POK_STREAMING_MUSIC > 0)
Pokitto 31:f4b9b85c7b62 60 unsigned char buffers[4][BUFFER_SIZE];
Pokitto 31:f4b9b85c7b62 61 volatile int currentBuffer = 0, oldBuffer = 0;
Pokitto 31:f4b9b85c7b62 62 volatile int bufindex = 0, vol=1;
Pokitto 31:f4b9b85c7b62 63 volatile unsigned char * currentPtr;
Pokitto 31:f4b9b85c7b62 64 volatile unsigned char * endPtr;
Pokitto 31:f4b9b85c7b62 65 int8_t streamvol=3;
Pokitto 31:f4b9b85c7b62 66 uint32_t streamcounter=0;
Pokitto 31:f4b9b85c7b62 67 uint8_t streamstep=0;
Pokitto 31:f4b9b85c7b62 68 #endif
Pokitto 31:f4b9b85c7b62 69
Pokitto 31:f4b9b85c7b62 70 #if POK_ENABLE_SOUND > 0
Pokitto 31:f4b9b85c7b62 71 pwmout_t Pokitto::audiopwm; // this way (instead of PwmOut class) pwm doesn't start screaming until it is initialized !
Pokitto 31:f4b9b85c7b62 72 //Ticker Pokitto::audio;
Pokitto 31:f4b9b85c7b62 73
Pokitto 31:f4b9b85c7b62 74 using namespace Pokitto;
Pokitto 31:f4b9b85c7b62 75
Pokitto 31:f4b9b85c7b62 76 /** stream output and status */
Pokitto 31:f4b9b85c7b62 77 uint8_t Pokitto::streambyte,Pokitto::streamon;
Pokitto 31:f4b9b85c7b62 78
Pokitto 31:f4b9b85c7b62 79 uint8_t soundbuf[256], soundbufindex=0, Pokitto::HWvolume=0;
Pokitto 31:f4b9b85c7b62 80 bool volpotError=false; //test for broken MCP4018
Pokitto 31:f4b9b85c7b62 81
Pokitto 31:f4b9b85c7b62 82 uint16_t soundbyte;
Pokitto 31:f4b9b85c7b62 83
Pokitto 31:f4b9b85c7b62 84
Pokitto 31:f4b9b85c7b62 85 #if POK_USE_DAC > 0
Pokitto 31:f4b9b85c7b62 86 #if POK_BOARDREV == 1
Pokitto 31:f4b9b85c7b62 87 /** 2-layer board rev 1.3 **/
Pokitto 31:f4b9b85c7b62 88 DigitalOut dac0(P1_6);
Pokitto 31:f4b9b85c7b62 89 DigitalOut dac1(P1_0);
Pokitto 31:f4b9b85c7b62 90 DigitalOut dac2(P1_16);
Pokitto 31:f4b9b85c7b62 91 DigitalOut dac3(P0_19);
Pokitto 31:f4b9b85c7b62 92 DigitalOut dac4(P0_17);
Pokitto 31:f4b9b85c7b62 93 DigitalOut dac5(P1_12);
Pokitto 31:f4b9b85c7b62 94 DigitalOut dac6(P1_15);
Pokitto 31:f4b9b85c7b62 95 DigitalOut dac7(P1_8);
Pokitto 31:f4b9b85c7b62 96 #else
Pokitto 31:f4b9b85c7b62 97 /** 4-layer board rev 2.1 **/
Pokitto 31:f4b9b85c7b62 98 DigitalOut dac0(P1_28);
Pokitto 31:f4b9b85c7b62 99 DigitalOut dac1(P1_29);
Pokitto 31:f4b9b85c7b62 100 DigitalOut dac2(P1_30);
Pokitto 31:f4b9b85c7b62 101 DigitalOut dac3(P1_31);
Pokitto 31:f4b9b85c7b62 102 /* has daniel made a mistake ?*/
Pokitto 31:f4b9b85c7b62 103 DigitalOut dac4(P2_20);
Pokitto 31:f4b9b85c7b62 104 DigitalOut dac5(P2_21);
Pokitto 31:f4b9b85c7b62 105 DigitalOut dac6(P2_22);
Pokitto 31:f4b9b85c7b62 106 DigitalOut dac7(P2_23);
Pokitto 31:f4b9b85c7b62 107
Pokitto 31:f4b9b85c7b62 108 DigitalOut amp(P1_17);
Pokitto 31:f4b9b85c7b62 109
Pokitto 31:f4b9b85c7b62 110 #endif // POK_BOARDREV
Pokitto 31:f4b9b85c7b62 111 #endif // POK_USE_DAC
Pokitto 31:f4b9b85c7b62 112
Pokitto 31:f4b9b85c7b62 113 #if POK_BOARDREV == 2
Pokitto 31:f4b9b85c7b62 114 //MCP4018 volpot(P0_5,P0_4);
Pokitto 31:f4b9b85c7b62 115
Pokitto 31:f4b9b85c7b62 116 /**
Pokitto 31:f4b9b85c7b62 117 * @brief Handle interrupt from 32-bit timer 0
Pokitto 31:f4b9b85c7b62 118 * @return Nothing
Pokitto 31:f4b9b85c7b62 119 */
Pokitto 31:f4b9b85c7b62 120
Pokitto 31:f4b9b85c7b62 121 uint32_t p=0;
Pokitto 31:f4b9b85c7b62 122
Pokitto 31:f4b9b85c7b62 123 extern "C" void TIMER32_0_IRQHandler(void)
Pokitto 31:f4b9b85c7b62 124 {
Pokitto 31:f4b9b85c7b62 125 if (Chip_TIMER_MatchPending(LPC_TIMER32_0, 1)) {
Pokitto 31:f4b9b85c7b62 126 Chip_TIMER_ClearMatch(LPC_TIMER32_0, 1);
Pokitto 31:f4b9b85c7b62 127 //pokSoundBufferedIRQ();
Pokitto 31:f4b9b85c7b62 128 pokSoundIRQ();
Pokitto 31:f4b9b85c7b62 129 }
Pokitto 31:f4b9b85c7b62 130 }
Pokitto 31:f4b9b85c7b62 131
Pokitto 31:f4b9b85c7b62 132
Pokitto 31:f4b9b85c7b62 133 void initHWvolumecontrol() {
Pokitto 31:f4b9b85c7b62 134 HWvolume=0;
Pokitto 31:f4b9b85c7b62 135 volpotError=true;
Pokitto 31:f4b9b85c7b62 136 //if (volpot.put(HWvolume)) volpotError=true; //try if MCP4018 answers
Pokitto 31:f4b9b85c7b62 137 setHWvolume(VOLUME_STARTUP);
Pokitto 31:f4b9b85c7b62 138 }
Pokitto 31:f4b9b85c7b62 139
Pokitto 31:f4b9b85c7b62 140 int Pokitto::setHWvolume(uint8_t v) {
Pokitto 31:f4b9b85c7b62 141 HWvolume = 0x7F&v;
Pokitto 31:f4b9b85c7b62 142 //if (!volpotError) return volpot.put(HWvolume); //use normal I2C
Pokitto 31:f4b9b85c7b62 143 /* fallback method for broken MCP4018 */
Pokitto 31:f4b9b85c7b62 144 SoftwareI2C swvolpot(P0_4, P0_5); //swapped SDA,SCL
Pokitto 31:f4b9b85c7b62 145 swvolpot.write(0x5e,HWvolume);
Pokitto 31:f4b9b85c7b62 146 return HWvolume;
Pokitto 31:f4b9b85c7b62 147 }
Pokitto 31:f4b9b85c7b62 148
Pokitto 31:f4b9b85c7b62 149 uint8_t Pokitto::getHWvolume() {
Pokitto 31:f4b9b85c7b62 150 return HWvolume;
Pokitto 31:f4b9b85c7b62 151 }
Pokitto 31:f4b9b85c7b62 152
Pokitto 31:f4b9b85c7b62 153 void Pokitto::changeHWvolume(int8_t v) {
Pokitto 31:f4b9b85c7b62 154 int temp = HWvolume + v;
Pokitto 31:f4b9b85c7b62 155 if (temp < 0) temp = 0; //prevent volume "looparound" than can make a massive crack
Pokitto 31:f4b9b85c7b62 156 if (temp > 127) temp = 127;
Pokitto 31:f4b9b85c7b62 157 setHWvolume(temp);
Pokitto 31:f4b9b85c7b62 158 }
Pokitto 31:f4b9b85c7b62 159
Pokitto 31:f4b9b85c7b62 160 uint8_t Pokitto::ampIsOn() {
Pokitto 31:f4b9b85c7b62 161 return amp;
Pokitto 31:f4b9b85c7b62 162 }
Pokitto 31:f4b9b85c7b62 163
Pokitto 31:f4b9b85c7b62 164 void Pokitto::ampEnable(uint8_t v) {
Pokitto 31:f4b9b85c7b62 165 if (v>1) v=1; // limit against funny values
Pokitto 31:f4b9b85c7b62 166 amp=v;
Pokitto 31:f4b9b85c7b62 167 }
Pokitto 31:f4b9b85c7b62 168 #endif // POK_BOARDREV == 2
Pokitto 31:f4b9b85c7b62 169
Pokitto 31:f4b9b85c7b62 170 void Pokitto::dac_write(uint8_t value) {
Pokitto 31:f4b9b85c7b62 171 #if POK_USE_DAC > 0
Pokitto 31:f4b9b85c7b62 172 #if POK_BOARDREV == 1 // was 1
Pokitto 31:f4b9b85c7b62 173 if (value & 1) SET_DAC0 else CLR_DAC0;
Pokitto 31:f4b9b85c7b62 174 value >>= 1;
Pokitto 31:f4b9b85c7b62 175 if (value & 1) SET_DAC1 else CLR_DAC1;
Pokitto 31:f4b9b85c7b62 176 value >>= 1;
Pokitto 31:f4b9b85c7b62 177 if (value & 1) SET_DAC2 else CLR_DAC2;
Pokitto 31:f4b9b85c7b62 178 value >>= 1;
Pokitto 31:f4b9b85c7b62 179 if (value & 1) SET_DAC3 else CLR_DAC3;
Pokitto 31:f4b9b85c7b62 180 value >>= 1;
Pokitto 31:f4b9b85c7b62 181 if (value & 1) SET_DAC4 else CLR_DAC4;
Pokitto 31:f4b9b85c7b62 182 value >>= 1;
Pokitto 31:f4b9b85c7b62 183 if (value & 1) SET_DAC5 else CLR_DAC5;
Pokitto 31:f4b9b85c7b62 184 value >>= 1;
Pokitto 31:f4b9b85c7b62 185 if (value & 1) SET_DAC6 else CLR_DAC6;
Pokitto 31:f4b9b85c7b62 186 value >>= 1;
Pokitto 31:f4b9b85c7b62 187 if (value & 1) SET_DAC7 else CLR_DAC7;
Pokitto 31:f4b9b85c7b62 188 #else
Pokitto 31:f4b9b85c7b62 189 //uint32_t val;
Pokitto 31:f4b9b85c7b62 190 //val = value<<28; //lower 4 bits go higher - because port mask is used, no AND is needed to clear bits
Pokitto 31:f4b9b85c7b62 191 //val += value<<(15-4); //higher 4 bits go lower. No need to shift by 15 because bits are in the higher nibble
Pokitto 31:f4b9b85c7b62 192 /* daniel has made a mistake with ports */
Pokitto 31:f4b9b85c7b62 193 //val = ((value&0x70)<<(28-4)); //higher 4 bits go higher - because port mask is used, no AND is needed to clear bits
Pokitto 31:f4b9b85c7b62 194 //val += value<<(15); //lower 4 bits go lower. No need to shift by 15 because bits are in the higher nibble
Pokitto 31:f4b9b85c7b62 195 //SET_MASK_DAC;
Pokitto 31:f4b9b85c7b62 196 //LPC_GPIO_PORT->MPIN[1] = val; // write bits to port
Pokitto 31:f4b9b85c7b62 197 //CLR_MASK_DAC;
Pokitto 31:f4b9b85c7b62 198 /* fixed here */
Pokitto 31:f4b9b85c7b62 199 /*val=value;
Pokitto 31:f4b9b85c7b62 200 SET_MASK_DAC_LO;
Pokitto 31:f4b9b85c7b62 201 LPC_GPIO_PORT->MPIN[1] = val<<28; // write lower 4 bits to port
Pokitto 31:f4b9b85c7b62 202 CLR_MASK_DAC_LO;
Pokitto 31:f4b9b85c7b62 203 SET_MASK_DAC_HI;
Pokitto 31:f4b9b85c7b62 204 LPC_GPIO_PORT->MPIN[2] = val<<(20-4); // write bits to port
Pokitto 31:f4b9b85c7b62 205 CLR_MASK_DAC_HI; */
Pokitto 31:f4b9b85c7b62 206 if (value & 1) SET_DAC0 else CLR_DAC0;
Pokitto 31:f4b9b85c7b62 207 value >>= 1;
Pokitto 31:f4b9b85c7b62 208 if (value & 1) SET_DAC1 else CLR_DAC1;
Pokitto 31:f4b9b85c7b62 209 value >>= 1;
Pokitto 31:f4b9b85c7b62 210 if (value & 1) SET_DAC2 else CLR_DAC2;
Pokitto 31:f4b9b85c7b62 211 value >>= 1;
Pokitto 31:f4b9b85c7b62 212 if (value & 1) SET_DAC3 else CLR_DAC3;
Pokitto 31:f4b9b85c7b62 213 value >>= 1;
Pokitto 31:f4b9b85c7b62 214 if (value & 1) SET_DAC4 else CLR_DAC4;
Pokitto 31:f4b9b85c7b62 215 value >>= 1;
Pokitto 31:f4b9b85c7b62 216 if (value & 1) SET_DAC5 else CLR_DAC5;
Pokitto 31:f4b9b85c7b62 217 value >>= 1;
Pokitto 31:f4b9b85c7b62 218 if (value & 1) SET_DAC6 else CLR_DAC6;
Pokitto 31:f4b9b85c7b62 219 value >>= 1;
Pokitto 31:f4b9b85c7b62 220 if (value & 1) SET_DAC7 else CLR_DAC7;
Pokitto 31:f4b9b85c7b62 221 //CLR_MASK_DAC;
Pokitto 31:f4b9b85c7b62 222 #endif // BOARDREV
Pokitto 31:f4b9b85c7b62 223 #endif
Pokitto 31:f4b9b85c7b62 224 }
Pokitto 31:f4b9b85c7b62 225
Pokitto 31:f4b9b85c7b62 226 /** SOUND INIT **/
Pokitto 31:f4b9b85c7b62 227 void Pokitto::soundInit() {
Pokitto 31:f4b9b85c7b62 228 uint32_t timerFreq;
Pokitto 31:f4b9b85c7b62 229 pwmout_init(&audiopwm,POK_AUD_PIN);
Pokitto 31:f4b9b85c7b62 230 pwmout_period_us(&audiopwm,POK_AUD_PWM_US); //was 31us
Pokitto 31:f4b9b85c7b62 231 pwmout_write(&audiopwm,0.1f);
Pokitto 31:f4b9b85c7b62 232
Pokitto 31:f4b9b85c7b62 233 #if POK_GBSOUND > 0
Pokitto 31:f4b9b85c7b62 234 /** GAMEBUINO SOUND **/
Pokitto 31:f4b9b85c7b62 235 audio.attach_us(&audio_IRQ, 1000000/(POK_AUD_FREQ>>0));
Pokitto 31:f4b9b85c7b62 236 #else
Pokitto 31:f4b9b85c7b62 237 /** NOT GAMEBUINO SOUND **/
Pokitto 31:f4b9b85c7b62 238 //audio.attach_us(&pokSoundBufferedIRQ, 1000000/(POK_AUD_FREQ>>0));
Pokitto 31:f4b9b85c7b62 239 /* Initialize 32-bit timer 0 clock */
Pokitto 31:f4b9b85c7b62 240 Chip_TIMER_Init(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 241
Pokitto 31:f4b9b85c7b62 242 /* Timer rate is system clock rate */
Pokitto 31:f4b9b85c7b62 243 timerFreq = Chip_Clock_GetSystemClockRate();
Pokitto 31:f4b9b85c7b62 244
Pokitto 31:f4b9b85c7b62 245 /* Timer setup for match and interrupt at TICKRATE_HZ */
Pokitto 31:f4b9b85c7b62 246 Chip_TIMER_Reset(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 247
Pokitto 31:f4b9b85c7b62 248 /* Enable both timers to generate interrupts when time matches */
Pokitto 31:f4b9b85c7b62 249 Chip_TIMER_MatchEnableInt(LPC_TIMER32_0, 1);
Pokitto 31:f4b9b85c7b62 250
Pokitto 31:f4b9b85c7b62 251 /* Setup 32-bit timer's duration (32-bit match time) */
Pokitto 31:f4b9b85c7b62 252 Chip_TIMER_SetMatch(LPC_TIMER32_0, 1, (timerFreq / POK_AUD_FREQ));
Pokitto 31:f4b9b85c7b62 253
Pokitto 31:f4b9b85c7b62 254 /* Setup both timers to restart when match occurs */
Pokitto 31:f4b9b85c7b62 255 Chip_TIMER_ResetOnMatchEnable(LPC_TIMER32_0, 1);
Pokitto 31:f4b9b85c7b62 256
Pokitto 31:f4b9b85c7b62 257 /* Start both timers */
Pokitto 31:f4b9b85c7b62 258 Chip_TIMER_Enable(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 259
Pokitto 31:f4b9b85c7b62 260 /* Clear both timers of any pending interrupts */
Pokitto 31:f4b9b85c7b62 261 #define TIMER_32_0_IRQn 18
Pokitto 31:f4b9b85c7b62 262 NVIC_ClearPendingIRQ((IRQn_Type)TIMER_32_0_IRQn);
Pokitto 31:f4b9b85c7b62 263
Pokitto 31:f4b9b85c7b62 264 /* Redirect IRQ vector - Jonne*/
Pokitto 31:f4b9b85c7b62 265 NVIC_SetVector((IRQn_Type)TIMER_32_0_IRQn, (uint32_t)&TIMER32_0_IRQHandler);
Pokitto 31:f4b9b85c7b62 266
Pokitto 31:f4b9b85c7b62 267 /* Enable both timer interrupts */
Pokitto 31:f4b9b85c7b62 268 NVIC_EnableIRQ((IRQn_Type)TIMER_32_0_IRQn);
Pokitto 31:f4b9b85c7b62 269 #endif // POK_GAMEBUINO_SUPPORT
Pokitto 31:f4b9b85c7b62 270
Pokitto 31:f4b9b85c7b62 271 //emptySong();
Pokitto 31:f4b9b85c7b62 272 //emptyOscillators();
Pokitto 31:f4b9b85c7b62 273 //emptyBlocks();
Pokitto 31:f4b9b85c7b62 274 //emptyPatches();
Pokitto 31:f4b9b85c7b62 275 #ifdef TEST_SOUND
Pokitto 31:f4b9b85c7b62 276 testOsc();
Pokitto 31:f4b9b85c7b62 277 #endif // TEST_SOUND
Pokitto 31:f4b9b85c7b62 278 #if POK_BOARDREV == 2
Pokitto 31:f4b9b85c7b62 279 initHWvolumecontrol();
Pokitto 31:f4b9b85c7b62 280 #endif
Pokitto 31:f4b9b85c7b62 281
Pokitto 31:f4b9b85c7b62 282 }
Pokitto 31:f4b9b85c7b62 283
Pokitto 31:f4b9b85c7b62 284
Pokitto 31:f4b9b85c7b62 285 uint8_t Pokitto::streamPaused() {
Pokitto 31:f4b9b85c7b62 286 return !streamon;
Pokitto 31:f4b9b85c7b62 287 }
Pokitto 31:f4b9b85c7b62 288
Pokitto 31:f4b9b85c7b62 289 void Pokitto::pauseStream() {
Pokitto 31:f4b9b85c7b62 290 streamon=0;
Pokitto 31:f4b9b85c7b62 291 }
Pokitto 31:f4b9b85c7b62 292
Pokitto 31:f4b9b85c7b62 293 void Pokitto::playStream() {
Pokitto 31:f4b9b85c7b62 294 streamon=1;
Pokitto 31:f4b9b85c7b62 295 }
Pokitto 31:f4b9b85c7b62 296
Pokitto 31:f4b9b85c7b62 297
Pokitto 31:f4b9b85c7b62 298 void pokPauseStream() {
Pokitto 31:f4b9b85c7b62 299 streamon=0;
Pokitto 31:f4b9b85c7b62 300 }
Pokitto 31:f4b9b85c7b62 301
Pokitto 31:f4b9b85c7b62 302 void pokPlayStream() {
Pokitto 31:f4b9b85c7b62 303 streamon=1;
Pokitto 31:f4b9b85c7b62 304 }
Pokitto 31:f4b9b85c7b62 305
Pokitto 31:f4b9b85c7b62 306
Pokitto 31:f4b9b85c7b62 307
Pokitto 31:f4b9b85c7b62 308 void pokSoundBufferedIRQ() {
Pokitto 31:f4b9b85c7b62 309 uint8_t output = soundbuf[soundbufindex++];
Pokitto 31:f4b9b85c7b62 310 //if (p==sizeof(beat_11025_raw)) p=0;
Pokitto 31:f4b9b85c7b62 311 //soundbuf[soundbufindex++] = output;
Pokitto 31:f4b9b85c7b62 312 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*output)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 313 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 314 }
Pokitto 31:f4b9b85c7b62 315
Pokitto 31:f4b9b85c7b62 316 void pokSoundIRQ() {
Pokitto 31:f4b9b85c7b62 317 //#define TICKY 0xFFFF //160
Pokitto 31:f4b9b85c7b62 318 //#define INCY 409
Pokitto 31:f4b9b85c7b62 319 uint8_t output=0;
Pokitto 31:f4b9b85c7b62 320 //if (test==TICKY) test=0;
Pokitto 31:f4b9b85c7b62 321 //if (test<(TICKY/2)) { tpin=1; pwmout_write(&audiopwm,(float)0/(float)255);}//dac_write(0);}
Pokitto 31:f4b9b85c7b62 322 //else {tpin=0; pwmout_write(&audiopwm,(float)255/(float)255);}//dac_write(64);}
Pokitto 31:f4b9b85c7b62 323 //test+=INCY;
Pokitto 31:f4b9b85c7b62 324 //return;
Pokitto 31:f4b9b85c7b62 325 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 326 pwmout_t* obj = &audiopwm;
Pokitto 31:f4b9b85c7b62 327 #endif
Pokitto 31:f4b9b85c7b62 328 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 329 #if POK_STREAMFREQ_HALVE
Pokitto 31:f4b9b85c7b62 330 streamstep = 1-streamstep;
Pokitto 31:f4b9b85c7b62 331 #else
Pokitto 31:f4b9b85c7b62 332 streamstep = 1;
Pokitto 31:f4b9b85c7b62 333 #endif // POK_STREAMFREQ_HALVE
Pokitto 31:f4b9b85c7b62 334 streamstep &= streamon; // streamon is used to toggle SD music streaming on and off
Pokitto 31:f4b9b85c7b62 335 if (streamstep) {
Pokitto 31:f4b9b85c7b62 336 output = (*currentPtr++);
Pokitto 31:f4b9b85c7b62 337 if(streamvol && streamon) {
Pokitto 31:f4b9b85c7b62 338 output >>= 3-streamvol;
Pokitto 31:f4b9b85c7b62 339 streambyte = output;
Pokitto 31:f4b9b85c7b62 340 } else {
Pokitto 31:f4b9b85c7b62 341 streambyte = 0; // duty cycle
Pokitto 31:f4b9b85c7b62 342 output = 0;
Pokitto 31:f4b9b85c7b62 343 }
Pokitto 31:f4b9b85c7b62 344 if (currentPtr >= endPtr)
Pokitto 31:f4b9b85c7b62 345 {
Pokitto 31:f4b9b85c7b62 346 currentBuffer++;
Pokitto 31:f4b9b85c7b62 347 if (currentBuffer==4) currentBuffer=0;
Pokitto 31:f4b9b85c7b62 348 currentPtr = buffers[currentBuffer];
Pokitto 31:f4b9b85c7b62 349 endPtr = currentPtr + BUFFER_SIZE;
Pokitto 31:f4b9b85c7b62 350 }
Pokitto 31:f4b9b85c7b62 351 }
Pokitto 31:f4b9b85c7b62 352 #endif // POK_STREAMING_MUSIC
Pokitto 31:f4b9b85c7b62 353
Pokitto 31:f4b9b85c7b62 354 /** DO ADDITIONAL SOUND PROCESSING (NOT STREAM) OF SOUND HERE **/
Pokitto 31:f4b9b85c7b62 355
Pokitto 31:f4b9b85c7b62 356 #if POK_ENABLE_SYNTH
Pokitto 31:f4b9b85c7b62 357 /** if song is being played from sd **/
Pokitto 31:f4b9b85c7b62 358 if (playing) {
Pokitto 31:f4b9b85c7b62 359 notetick++;
Pokitto 31:f4b9b85c7b62 360 updatePlaybackSD(playerpos&7);
Pokitto 31:f4b9b85c7b62 361 }
Pokitto 31:f4b9b85c7b62 362 /** oscillators update **/
Pokitto 31:f4b9b85c7b62 363 osc1.count += osc1.cinc + (osc1.pitchbend >> 4); // counts to 65535 and overflows to zero WAS 8 !
Pokitto 31:f4b9b85c7b62 364 osc2.count += osc2.cinc + (osc2.pitchbend >> 4); // counts to 65535 and overflows to zero
Pokitto 31:f4b9b85c7b62 365 osc3.count += osc3.cinc + (osc3.pitchbend >> 4); // counts to 65535 and overflows to zero
Pokitto 31:f4b9b85c7b62 366 Marr[tick](); // call mixing function
Pokitto 31:f4b9b85c7b62 367 --tick;
Pokitto 31:f4b9b85c7b62 368
Pokitto 31:f4b9b85c7b62 369 /** mixing oscillator output **/
Pokitto 31:f4b9b85c7b62 370
Pokitto 31:f4b9b85c7b62 371 uint16_t op = (uint16_t) ((osc1.output)*(osc1.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 372 op += (uint16_t) ((osc2.output)*(osc2.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 373 op += (uint16_t) ((osc3.output)*(osc3.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 374 output = (uint8_t) op;
Pokitto 31:f4b9b85c7b62 375
Pokitto 31:f4b9b85c7b62 376 #endif // POK_ENABLE_SYNTH
Pokitto 31:f4b9b85c7b62 377
Pokitto 31:f4b9b85c7b62 378 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 379 /** HARDWARE **/
Pokitto 31:f4b9b85c7b62 380 #if POK_ENABLE_SOUND > 0
Pokitto 31:f4b9b85c7b62 381 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 382 /** sound is enabled, streaming is enabled */
Pokitto 31:f4b9b85c7b62 383 #if POK_STREAM_TO_DAC > 0
Pokitto 31:f4b9b85c7b62 384 /** stream goes to DAC */
Pokitto 31:f4b9b85c7b62 385 #if POK_USE_DAC > 0
Pokitto 31:f4b9b85c7b62 386 if (streamstep) dac_write((uint8_t)streambyte); // duty cycle
Pokitto 31:f4b9b85c7b62 387 #endif // POK_USE_DAC
Pokitto 31:f4b9b85c7b62 388 #else
Pokitto 31:f4b9b85c7b62 389 /** stream goes to PWM */
Pokitto 31:f4b9b85c7b62 390 if (streamstep) {
Pokitto 31:f4b9b85c7b62 391 //pwmout_write(&audiopwm,(float)streambyte/(float)255);
Pokitto 31:f4b9b85c7b62 392 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*streambyte)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 393 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 394 //dac_write((uint8_t)streambyte); // duty cycle
Pokitto 31:f4b9b85c7b62 395 }
Pokitto 31:f4b9b85c7b62 396 #endif // POK_STREAM_TO_DAC
Pokitto 31:f4b9b85c7b62 397 #endif // POK_STREAMING_MUSIC
Pokitto 31:f4b9b85c7b62 398 #if POK_STREAM_TO_DAC > 0
Pokitto 31:f4b9b85c7b62 399 /** synth goes to PWM */
Pokitto 31:f4b9b85c7b62 400 //pwmout_write(&audiopwm,(float)output/(float)255);
Pokitto 31:f4b9b85c7b62 401 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*output)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 402 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 403 #else
Pokitto 31:f4b9b85c7b62 404 dac_write((uint8_t)output);
Pokitto 31:f4b9b85c7b62 405 #endif // decide where synth is output
Pokitto 31:f4b9b85c7b62 406 soundbyte = (output+streambyte)>>1;
Pokitto 31:f4b9b85c7b62 407 soundbuf[soundbufindex++]=soundbyte;
Pokitto 31:f4b9b85c7b62 408 #endif //POK_ENABLE_SOUND
Pokitto 31:f4b9b85c7b62 409 #endif // HARDWARE
Pokitto 31:f4b9b85c7b62 410 }
Pokitto 31:f4b9b85c7b62 411
Pokitto 31:f4b9b85c7b62 412
Pokitto 31:f4b9b85c7b62 413 void Pokitto::updateSDAudioStream() {
Pokitto 31:f4b9b85c7b62 414 if (streamPaused()) return;
Pokitto 31:f4b9b85c7b62 415
Pokitto 31:f4b9b85c7b62 416 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 417 if (oldBuffer != currentBuffer) {
Pokitto 31:f4b9b85c7b62 418 if (currentBuffer==0) fileReadBytes(&buffers[3][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 419 else if (currentBuffer==1) fileReadBytes(&buffers[0][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 420 else if (currentBuffer==2) fileReadBytes(&buffers[1][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 421 else fileReadBytes(&buffers[2][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 422 oldBuffer = currentBuffer;
Pokitto 31:f4b9b85c7b62 423 streamcounter += BUFFER_SIZE;
Pokitto 31:f4b9b85c7b62 424 } else return;
Pokitto 31:f4b9b85c7b62 425
Pokitto 31:f4b9b85c7b62 426 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 427 if ( streamcounter > fs.fsize - (BUFFER_SIZE*6)) {
Pokitto 31:f4b9b85c7b62 428 #else
Pokitto 31:f4b9b85c7b62 429 if ( streamcounter > getFileLength() - (BUFFER_SIZE*6)) {
Pokitto 31:f4b9b85c7b62 430 #endif
Pokitto 31:f4b9b85c7b62 431 streamcounter=0;
Pokitto 31:f4b9b85c7b62 432 #if POK_STREAM_LOOP
Pokitto 31:f4b9b85c7b62 433 fileRewind();
Pokitto 31:f4b9b85c7b62 434 #else
Pokitto 31:f4b9b85c7b62 435 pokPauseStream();
Pokitto 31:f4b9b85c7b62 436 #endif
Pokitto 31:f4b9b85c7b62 437 }
Pokitto 31:f4b9b85c7b62 438 #endif
Pokitto 31:f4b9b85c7b62 439 }
Pokitto 31:f4b9b85c7b62 440
Pokitto 31:f4b9b85c7b62 441
Pokitto 31:f4b9b85c7b62 442 #endif // POK_ENABLE_SOUND
Pokitto 31:f4b9b85c7b62 443
Pokitto 31:f4b9b85c7b62 444
Pokitto 31:f4b9b85c7b62 445