spinal cord / PokittoLib_

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

POKITTO_HW/HWSound.cpp@32:6d5a63b6d5b6, 2018-01-30 (annotated)

Committer:
Pokitto
Date:
Tue Jan 30 10:51:42 2018 +0000
Revision:
32:6d5a63b6d5b6
Parent:
31:f4b9b85c7b62
Child:
33:7d20a1e51908
Fixed also GBSOUND

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 32:6d5a63b6d5b6 128 #if POK_GBSOUND > 0
Pokitto 32:6d5a63b6d5b6 129 /** GAMEBUINO SOUND **/
Pokitto 32:6d5a63b6d5b6 130 Pokitto::audio_IRQ();
Pokitto 32:6d5a63b6d5b6 131 #else
Pokitto 32:6d5a63b6d5b6 132 /** NOT GAMEBUINO SOUND **/
Pokitto 31:f4b9b85c7b62 133 pokSoundIRQ();
Pokitto 32:6d5a63b6d5b6 134 #endif
Pokitto 31:f4b9b85c7b62 135 }
Pokitto 31:f4b9b85c7b62 136 }
Pokitto 31:f4b9b85c7b62 137
Pokitto 31:f4b9b85c7b62 138
Pokitto 31:f4b9b85c7b62 139 void initHWvolumecontrol() {
Pokitto 31:f4b9b85c7b62 140 HWvolume=0;
Pokitto 31:f4b9b85c7b62 141 volpotError=true;
Pokitto 31:f4b9b85c7b62 142 //if (volpot.put(HWvolume)) volpotError=true; //try if MCP4018 answers
Pokitto 31:f4b9b85c7b62 143 setHWvolume(VOLUME_STARTUP);
Pokitto 31:f4b9b85c7b62 144 }
Pokitto 31:f4b9b85c7b62 145
Pokitto 31:f4b9b85c7b62 146 int Pokitto::setHWvolume(uint8_t v) {
Pokitto 31:f4b9b85c7b62 147 HWvolume = 0x7F&v;
Pokitto 31:f4b9b85c7b62 148 //if (!volpotError) return volpot.put(HWvolume); //use normal I2C
Pokitto 31:f4b9b85c7b62 149 /* fallback method for broken MCP4018 */
Pokitto 31:f4b9b85c7b62 150 SoftwareI2C swvolpot(P0_4, P0_5); //swapped SDA,SCL
Pokitto 31:f4b9b85c7b62 151 swvolpot.write(0x5e,HWvolume);
Pokitto 31:f4b9b85c7b62 152 return HWvolume;
Pokitto 31:f4b9b85c7b62 153 }
Pokitto 31:f4b9b85c7b62 154
Pokitto 31:f4b9b85c7b62 155 uint8_t Pokitto::getHWvolume() {
Pokitto 31:f4b9b85c7b62 156 return HWvolume;
Pokitto 31:f4b9b85c7b62 157 }
Pokitto 31:f4b9b85c7b62 158
Pokitto 31:f4b9b85c7b62 159 void Pokitto::changeHWvolume(int8_t v) {
Pokitto 31:f4b9b85c7b62 160 int temp = HWvolume + v;
Pokitto 31:f4b9b85c7b62 161 if (temp < 0) temp = 0; //prevent volume "looparound" than can make a massive crack
Pokitto 31:f4b9b85c7b62 162 if (temp > 127) temp = 127;
Pokitto 31:f4b9b85c7b62 163 setHWvolume(temp);
Pokitto 31:f4b9b85c7b62 164 }
Pokitto 31:f4b9b85c7b62 165
Pokitto 31:f4b9b85c7b62 166 uint8_t Pokitto::ampIsOn() {
Pokitto 31:f4b9b85c7b62 167 return amp;
Pokitto 31:f4b9b85c7b62 168 }
Pokitto 31:f4b9b85c7b62 169
Pokitto 31:f4b9b85c7b62 170 void Pokitto::ampEnable(uint8_t v) {
Pokitto 31:f4b9b85c7b62 171 if (v>1) v=1; // limit against funny values
Pokitto 31:f4b9b85c7b62 172 amp=v;
Pokitto 31:f4b9b85c7b62 173 }
Pokitto 31:f4b9b85c7b62 174 #endif // POK_BOARDREV == 2
Pokitto 31:f4b9b85c7b62 175
Pokitto 31:f4b9b85c7b62 176 void Pokitto::dac_write(uint8_t value) {
Pokitto 31:f4b9b85c7b62 177 #if POK_USE_DAC > 0
Pokitto 31:f4b9b85c7b62 178 #if POK_BOARDREV == 1 // was 1
Pokitto 31:f4b9b85c7b62 179 if (value & 1) SET_DAC0 else CLR_DAC0;
Pokitto 31:f4b9b85c7b62 180 value >>= 1;
Pokitto 31:f4b9b85c7b62 181 if (value & 1) SET_DAC1 else CLR_DAC1;
Pokitto 31:f4b9b85c7b62 182 value >>= 1;
Pokitto 31:f4b9b85c7b62 183 if (value & 1) SET_DAC2 else CLR_DAC2;
Pokitto 31:f4b9b85c7b62 184 value >>= 1;
Pokitto 31:f4b9b85c7b62 185 if (value & 1) SET_DAC3 else CLR_DAC3;
Pokitto 31:f4b9b85c7b62 186 value >>= 1;
Pokitto 31:f4b9b85c7b62 187 if (value & 1) SET_DAC4 else CLR_DAC4;
Pokitto 31:f4b9b85c7b62 188 value >>= 1;
Pokitto 31:f4b9b85c7b62 189 if (value & 1) SET_DAC5 else CLR_DAC5;
Pokitto 31:f4b9b85c7b62 190 value >>= 1;
Pokitto 31:f4b9b85c7b62 191 if (value & 1) SET_DAC6 else CLR_DAC6;
Pokitto 31:f4b9b85c7b62 192 value >>= 1;
Pokitto 31:f4b9b85c7b62 193 if (value & 1) SET_DAC7 else CLR_DAC7;
Pokitto 31:f4b9b85c7b62 194 #else
Pokitto 31:f4b9b85c7b62 195 //uint32_t val;
Pokitto 31:f4b9b85c7b62 196 //val = value<<28; //lower 4 bits go higher - because port mask is used, no AND is needed to clear bits
Pokitto 31:f4b9b85c7b62 197 //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 198 /* daniel has made a mistake with ports */
Pokitto 31:f4b9b85c7b62 199 //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 200 //val += value<<(15); //lower 4 bits go lower. No need to shift by 15 because bits are in the higher nibble
Pokitto 31:f4b9b85c7b62 201 //SET_MASK_DAC;
Pokitto 31:f4b9b85c7b62 202 //LPC_GPIO_PORT->MPIN[1] = val; // write bits to port
Pokitto 31:f4b9b85c7b62 203 //CLR_MASK_DAC;
Pokitto 31:f4b9b85c7b62 204 /* fixed here */
Pokitto 31:f4b9b85c7b62 205 /*val=value;
Pokitto 31:f4b9b85c7b62 206 SET_MASK_DAC_LO;
Pokitto 31:f4b9b85c7b62 207 LPC_GPIO_PORT->MPIN[1] = val<<28; // write lower 4 bits to port
Pokitto 31:f4b9b85c7b62 208 CLR_MASK_DAC_LO;
Pokitto 31:f4b9b85c7b62 209 SET_MASK_DAC_HI;
Pokitto 31:f4b9b85c7b62 210 LPC_GPIO_PORT->MPIN[2] = val<<(20-4); // write bits to port
Pokitto 31:f4b9b85c7b62 211 CLR_MASK_DAC_HI; */
Pokitto 31:f4b9b85c7b62 212 if (value & 1) SET_DAC0 else CLR_DAC0;
Pokitto 31:f4b9b85c7b62 213 value >>= 1;
Pokitto 31:f4b9b85c7b62 214 if (value & 1) SET_DAC1 else CLR_DAC1;
Pokitto 31:f4b9b85c7b62 215 value >>= 1;
Pokitto 31:f4b9b85c7b62 216 if (value & 1) SET_DAC2 else CLR_DAC2;
Pokitto 31:f4b9b85c7b62 217 value >>= 1;
Pokitto 31:f4b9b85c7b62 218 if (value & 1) SET_DAC3 else CLR_DAC3;
Pokitto 31:f4b9b85c7b62 219 value >>= 1;
Pokitto 31:f4b9b85c7b62 220 if (value & 1) SET_DAC4 else CLR_DAC4;
Pokitto 31:f4b9b85c7b62 221 value >>= 1;
Pokitto 31:f4b9b85c7b62 222 if (value & 1) SET_DAC5 else CLR_DAC5;
Pokitto 31:f4b9b85c7b62 223 value >>= 1;
Pokitto 31:f4b9b85c7b62 224 if (value & 1) SET_DAC6 else CLR_DAC6;
Pokitto 31:f4b9b85c7b62 225 value >>= 1;
Pokitto 31:f4b9b85c7b62 226 if (value & 1) SET_DAC7 else CLR_DAC7;
Pokitto 31:f4b9b85c7b62 227 //CLR_MASK_DAC;
Pokitto 31:f4b9b85c7b62 228 #endif // BOARDREV
Pokitto 31:f4b9b85c7b62 229 #endif
Pokitto 31:f4b9b85c7b62 230 }
Pokitto 31:f4b9b85c7b62 231
Pokitto 31:f4b9b85c7b62 232 /** SOUND INIT **/
Pokitto 31:f4b9b85c7b62 233 void Pokitto::soundInit() {
Pokitto 31:f4b9b85c7b62 234 uint32_t timerFreq;
Pokitto 31:f4b9b85c7b62 235 pwmout_init(&audiopwm,POK_AUD_PIN);
Pokitto 31:f4b9b85c7b62 236 pwmout_period_us(&audiopwm,POK_AUD_PWM_US); //was 31us
Pokitto 31:f4b9b85c7b62 237 pwmout_write(&audiopwm,0.1f);
Pokitto 31:f4b9b85c7b62 238
Pokitto 32:6d5a63b6d5b6 239 //#if POK_GBSOUND > 0
Pokitto 31:f4b9b85c7b62 240 /** GAMEBUINO SOUND **/
Pokitto 32:6d5a63b6d5b6 241 //audio.attach_us(&audio_IRQ, 1000000/(POK_AUD_FREQ>>0));
Pokitto 32:6d5a63b6d5b6 242 //#else
Pokitto 31:f4b9b85c7b62 243 /** NOT GAMEBUINO SOUND **/
Pokitto 31:f4b9b85c7b62 244 //audio.attach_us(&pokSoundBufferedIRQ, 1000000/(POK_AUD_FREQ>>0));
Pokitto 31:f4b9b85c7b62 245 /* Initialize 32-bit timer 0 clock */
Pokitto 31:f4b9b85c7b62 246 Chip_TIMER_Init(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 247
Pokitto 31:f4b9b85c7b62 248 /* Timer rate is system clock rate */
Pokitto 31:f4b9b85c7b62 249 timerFreq = Chip_Clock_GetSystemClockRate();
Pokitto 31:f4b9b85c7b62 250
Pokitto 31:f4b9b85c7b62 251 /* Timer setup for match and interrupt at TICKRATE_HZ */
Pokitto 31:f4b9b85c7b62 252 Chip_TIMER_Reset(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 253
Pokitto 31:f4b9b85c7b62 254 /* Enable both timers to generate interrupts when time matches */
Pokitto 31:f4b9b85c7b62 255 Chip_TIMER_MatchEnableInt(LPC_TIMER32_0, 1);
Pokitto 31:f4b9b85c7b62 256
Pokitto 31:f4b9b85c7b62 257 /* Setup 32-bit timer's duration (32-bit match time) */
Pokitto 31:f4b9b85c7b62 258 Chip_TIMER_SetMatch(LPC_TIMER32_0, 1, (timerFreq / POK_AUD_FREQ));
Pokitto 31:f4b9b85c7b62 259
Pokitto 31:f4b9b85c7b62 260 /* Setup both timers to restart when match occurs */
Pokitto 31:f4b9b85c7b62 261 Chip_TIMER_ResetOnMatchEnable(LPC_TIMER32_0, 1);
Pokitto 31:f4b9b85c7b62 262
Pokitto 31:f4b9b85c7b62 263 /* Start both timers */
Pokitto 31:f4b9b85c7b62 264 Chip_TIMER_Enable(LPC_TIMER32_0);
Pokitto 31:f4b9b85c7b62 265
Pokitto 31:f4b9b85c7b62 266 /* Clear both timers of any pending interrupts */
Pokitto 31:f4b9b85c7b62 267 #define TIMER_32_0_IRQn 18
Pokitto 31:f4b9b85c7b62 268 NVIC_ClearPendingIRQ((IRQn_Type)TIMER_32_0_IRQn);
Pokitto 31:f4b9b85c7b62 269
Pokitto 31:f4b9b85c7b62 270 /* Redirect IRQ vector - Jonne*/
Pokitto 31:f4b9b85c7b62 271 NVIC_SetVector((IRQn_Type)TIMER_32_0_IRQn, (uint32_t)&TIMER32_0_IRQHandler);
Pokitto 31:f4b9b85c7b62 272
Pokitto 31:f4b9b85c7b62 273 /* Enable both timer interrupts */
Pokitto 31:f4b9b85c7b62 274 NVIC_EnableIRQ((IRQn_Type)TIMER_32_0_IRQn);
Pokitto 32:6d5a63b6d5b6 275 //#endif // POK_GAMEBUINO_SUPPORT
Pokitto 31:f4b9b85c7b62 276
Pokitto 31:f4b9b85c7b62 277 //emptySong();
Pokitto 31:f4b9b85c7b62 278 //emptyOscillators();
Pokitto 31:f4b9b85c7b62 279 //emptyBlocks();
Pokitto 31:f4b9b85c7b62 280 //emptyPatches();
Pokitto 31:f4b9b85c7b62 281 #ifdef TEST_SOUND
Pokitto 31:f4b9b85c7b62 282 testOsc();
Pokitto 31:f4b9b85c7b62 283 #endif // TEST_SOUND
Pokitto 31:f4b9b85c7b62 284 #if POK_BOARDREV == 2
Pokitto 31:f4b9b85c7b62 285 initHWvolumecontrol();
Pokitto 31:f4b9b85c7b62 286 #endif
Pokitto 31:f4b9b85c7b62 287
Pokitto 31:f4b9b85c7b62 288 }
Pokitto 31:f4b9b85c7b62 289
Pokitto 31:f4b9b85c7b62 290
Pokitto 31:f4b9b85c7b62 291 uint8_t Pokitto::streamPaused() {
Pokitto 31:f4b9b85c7b62 292 return !streamon;
Pokitto 31:f4b9b85c7b62 293 }
Pokitto 31:f4b9b85c7b62 294
Pokitto 31:f4b9b85c7b62 295 void Pokitto::pauseStream() {
Pokitto 31:f4b9b85c7b62 296 streamon=0;
Pokitto 31:f4b9b85c7b62 297 }
Pokitto 31:f4b9b85c7b62 298
Pokitto 31:f4b9b85c7b62 299 void Pokitto::playStream() {
Pokitto 31:f4b9b85c7b62 300 streamon=1;
Pokitto 31:f4b9b85c7b62 301 }
Pokitto 31:f4b9b85c7b62 302
Pokitto 31:f4b9b85c7b62 303
Pokitto 31:f4b9b85c7b62 304 void pokPauseStream() {
Pokitto 31:f4b9b85c7b62 305 streamon=0;
Pokitto 31:f4b9b85c7b62 306 }
Pokitto 31:f4b9b85c7b62 307
Pokitto 31:f4b9b85c7b62 308 void pokPlayStream() {
Pokitto 31:f4b9b85c7b62 309 streamon=1;
Pokitto 31:f4b9b85c7b62 310 }
Pokitto 31:f4b9b85c7b62 311
Pokitto 31:f4b9b85c7b62 312
Pokitto 31:f4b9b85c7b62 313
Pokitto 31:f4b9b85c7b62 314 void pokSoundBufferedIRQ() {
Pokitto 31:f4b9b85c7b62 315 uint8_t output = soundbuf[soundbufindex++];
Pokitto 31:f4b9b85c7b62 316 //if (p==sizeof(beat_11025_raw)) p=0;
Pokitto 31:f4b9b85c7b62 317 //soundbuf[soundbufindex++] = output;
Pokitto 31:f4b9b85c7b62 318 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*output)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 319 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 320 }
Pokitto 31:f4b9b85c7b62 321
Pokitto 31:f4b9b85c7b62 322 void pokSoundIRQ() {
Pokitto 31:f4b9b85c7b62 323 //#define TICKY 0xFFFF //160
Pokitto 31:f4b9b85c7b62 324 //#define INCY 409
Pokitto 31:f4b9b85c7b62 325 uint8_t output=0;
Pokitto 31:f4b9b85c7b62 326 //if (test==TICKY) test=0;
Pokitto 31:f4b9b85c7b62 327 //if (test<(TICKY/2)) { tpin=1; pwmout_write(&audiopwm,(float)0/(float)255);}//dac_write(0);}
Pokitto 31:f4b9b85c7b62 328 //else {tpin=0; pwmout_write(&audiopwm,(float)255/(float)255);}//dac_write(64);}
Pokitto 31:f4b9b85c7b62 329 //test+=INCY;
Pokitto 31:f4b9b85c7b62 330 //return;
Pokitto 31:f4b9b85c7b62 331 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 332 pwmout_t* obj = &audiopwm;
Pokitto 31:f4b9b85c7b62 333 #endif
Pokitto 31:f4b9b85c7b62 334 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 335 #if POK_STREAMFREQ_HALVE
Pokitto 31:f4b9b85c7b62 336 streamstep = 1-streamstep;
Pokitto 31:f4b9b85c7b62 337 #else
Pokitto 31:f4b9b85c7b62 338 streamstep = 1;
Pokitto 31:f4b9b85c7b62 339 #endif // POK_STREAMFREQ_HALVE
Pokitto 31:f4b9b85c7b62 340 streamstep &= streamon; // streamon is used to toggle SD music streaming on and off
Pokitto 31:f4b9b85c7b62 341 if (streamstep) {
Pokitto 31:f4b9b85c7b62 342 output = (*currentPtr++);
Pokitto 31:f4b9b85c7b62 343 if(streamvol && streamon) {
Pokitto 31:f4b9b85c7b62 344 output >>= 3-streamvol;
Pokitto 31:f4b9b85c7b62 345 streambyte = output;
Pokitto 31:f4b9b85c7b62 346 } else {
Pokitto 31:f4b9b85c7b62 347 streambyte = 0; // duty cycle
Pokitto 31:f4b9b85c7b62 348 output = 0;
Pokitto 31:f4b9b85c7b62 349 }
Pokitto 31:f4b9b85c7b62 350 if (currentPtr >= endPtr)
Pokitto 31:f4b9b85c7b62 351 {
Pokitto 31:f4b9b85c7b62 352 currentBuffer++;
Pokitto 31:f4b9b85c7b62 353 if (currentBuffer==4) currentBuffer=0;
Pokitto 31:f4b9b85c7b62 354 currentPtr = buffers[currentBuffer];
Pokitto 31:f4b9b85c7b62 355 endPtr = currentPtr + BUFFER_SIZE;
Pokitto 31:f4b9b85c7b62 356 }
Pokitto 31:f4b9b85c7b62 357 }
Pokitto 31:f4b9b85c7b62 358 #endif // POK_STREAMING_MUSIC
Pokitto 31:f4b9b85c7b62 359
Pokitto 31:f4b9b85c7b62 360 /** DO ADDITIONAL SOUND PROCESSING (NOT STREAM) OF SOUND HERE **/
Pokitto 31:f4b9b85c7b62 361
Pokitto 31:f4b9b85c7b62 362 #if POK_ENABLE_SYNTH
Pokitto 31:f4b9b85c7b62 363 /** if song is being played from sd **/
Pokitto 31:f4b9b85c7b62 364 if (playing) {
Pokitto 31:f4b9b85c7b62 365 notetick++;
Pokitto 31:f4b9b85c7b62 366 updatePlaybackSD(playerpos&7);
Pokitto 31:f4b9b85c7b62 367 }
Pokitto 31:f4b9b85c7b62 368 /** oscillators update **/
Pokitto 31:f4b9b85c7b62 369 osc1.count += osc1.cinc + (osc1.pitchbend >> 4); // counts to 65535 and overflows to zero WAS 8 !
Pokitto 31:f4b9b85c7b62 370 osc2.count += osc2.cinc + (osc2.pitchbend >> 4); // counts to 65535 and overflows to zero
Pokitto 31:f4b9b85c7b62 371 osc3.count += osc3.cinc + (osc3.pitchbend >> 4); // counts to 65535 and overflows to zero
Pokitto 31:f4b9b85c7b62 372 Marr[tick](); // call mixing function
Pokitto 31:f4b9b85c7b62 373 --tick;
Pokitto 31:f4b9b85c7b62 374
Pokitto 31:f4b9b85c7b62 375 /** mixing oscillator output **/
Pokitto 31:f4b9b85c7b62 376
Pokitto 31:f4b9b85c7b62 377 uint16_t op = (uint16_t) ((osc1.output)*(osc1.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 378 op += (uint16_t) ((osc2.output)*(osc2.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 379 op += (uint16_t) ((osc3.output)*(osc3.vol>>8))>>9;// >> 2 osc1.vol Marr;
Pokitto 31:f4b9b85c7b62 380 output = (uint8_t) op;
Pokitto 31:f4b9b85c7b62 381
Pokitto 31:f4b9b85c7b62 382 #endif // POK_ENABLE_SYNTH
Pokitto 31:f4b9b85c7b62 383
Pokitto 31:f4b9b85c7b62 384 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 385 /** HARDWARE **/
Pokitto 31:f4b9b85c7b62 386 #if POK_ENABLE_SOUND > 0
Pokitto 31:f4b9b85c7b62 387 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 388 /** sound is enabled, streaming is enabled */
Pokitto 31:f4b9b85c7b62 389 #if POK_STREAM_TO_DAC > 0
Pokitto 31:f4b9b85c7b62 390 /** stream goes to DAC */
Pokitto 31:f4b9b85c7b62 391 #if POK_USE_DAC > 0
Pokitto 31:f4b9b85c7b62 392 if (streamstep) dac_write((uint8_t)streambyte); // duty cycle
Pokitto 31:f4b9b85c7b62 393 #endif // POK_USE_DAC
Pokitto 31:f4b9b85c7b62 394 #else
Pokitto 31:f4b9b85c7b62 395 /** stream goes to PWM */
Pokitto 31:f4b9b85c7b62 396 if (streamstep) {
Pokitto 31:f4b9b85c7b62 397 //pwmout_write(&audiopwm,(float)streambyte/(float)255);
Pokitto 31:f4b9b85c7b62 398 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*streambyte)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 399 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 400 //dac_write((uint8_t)streambyte); // duty cycle
Pokitto 31:f4b9b85c7b62 401 }
Pokitto 31:f4b9b85c7b62 402 #endif // POK_STREAM_TO_DAC
Pokitto 31:f4b9b85c7b62 403 #endif // POK_STREAMING_MUSIC
Pokitto 31:f4b9b85c7b62 404 #if POK_STREAM_TO_DAC > 0
Pokitto 31:f4b9b85c7b62 405 /** synth goes to PWM */
Pokitto 31:f4b9b85c7b62 406 //pwmout_write(&audiopwm,(float)output/(float)255);
Pokitto 31:f4b9b85c7b62 407 uint32_t t_on = (uint32_t)(((obj->pwm->MATCHREL0)*output)>>8); //cut out float
Pokitto 31:f4b9b85c7b62 408 obj->pwm->MATCHREL1 = t_on;
Pokitto 31:f4b9b85c7b62 409 #else
Pokitto 31:f4b9b85c7b62 410 dac_write((uint8_t)output);
Pokitto 31:f4b9b85c7b62 411 #endif // decide where synth is output
Pokitto 31:f4b9b85c7b62 412 soundbyte = (output+streambyte)>>1;
Pokitto 31:f4b9b85c7b62 413 soundbuf[soundbufindex++]=soundbyte;
Pokitto 31:f4b9b85c7b62 414 #endif //POK_ENABLE_SOUND
Pokitto 31:f4b9b85c7b62 415 #endif // HARDWARE
Pokitto 31:f4b9b85c7b62 416 }
Pokitto 31:f4b9b85c7b62 417
Pokitto 31:f4b9b85c7b62 418
Pokitto 31:f4b9b85c7b62 419 void Pokitto::updateSDAudioStream() {
Pokitto 31:f4b9b85c7b62 420 if (streamPaused()) return;
Pokitto 31:f4b9b85c7b62 421
Pokitto 31:f4b9b85c7b62 422 #if POK_STREAMING_MUSIC > 0
Pokitto 31:f4b9b85c7b62 423 if (oldBuffer != currentBuffer) {
Pokitto 31:f4b9b85c7b62 424 if (currentBuffer==0) fileReadBytes(&buffers[3][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 425 else if (currentBuffer==1) fileReadBytes(&buffers[0][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 426 else if (currentBuffer==2) fileReadBytes(&buffers[1][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 427 else fileReadBytes(&buffers[2][0],BUFFER_SIZE);
Pokitto 31:f4b9b85c7b62 428 oldBuffer = currentBuffer;
Pokitto 31:f4b9b85c7b62 429 streamcounter += BUFFER_SIZE;
Pokitto 31:f4b9b85c7b62 430 } else return;
Pokitto 31:f4b9b85c7b62 431
Pokitto 31:f4b9b85c7b62 432 #ifndef POK_SIM
Pokitto 31:f4b9b85c7b62 433 if ( streamcounter > fs.fsize - (BUFFER_SIZE*6)) {
Pokitto 31:f4b9b85c7b62 434 #else
Pokitto 31:f4b9b85c7b62 435 if ( streamcounter > getFileLength() - (BUFFER_SIZE*6)) {
Pokitto 31:f4b9b85c7b62 436 #endif
Pokitto 31:f4b9b85c7b62 437 streamcounter=0;
Pokitto 31:f4b9b85c7b62 438 #if POK_STREAM_LOOP
Pokitto 31:f4b9b85c7b62 439 fileRewind();
Pokitto 31:f4b9b85c7b62 440 #else
Pokitto 31:f4b9b85c7b62 441 pokPauseStream();
Pokitto 31:f4b9b85c7b62 442 #endif
Pokitto 31:f4b9b85c7b62 443 }
Pokitto 31:f4b9b85c7b62 444 #endif
Pokitto 31:f4b9b85c7b62 445 }
Pokitto 31:f4b9b85c7b62 446
Pokitto 31:f4b9b85c7b62 447
Pokitto 31:f4b9b85c7b62 448 #endif // POK_ENABLE_SOUND
Pokitto 31:f4b9b85c7b62 449
Pokitto 31:f4b9b85c7b62 450
Pokitto 31:f4b9b85c7b62 451