HW 6.2 Spring 2015 NMHU New Mexico Highlands. Changing Octaves on KL tap sensor project.

Dependencies:   SLCD TSI mbed

Fork of slider_diatonic_v1 by Stanley Cohen

slider_diatonic_v1.cpp

Committer:
bomalley
Date:
2015-02-23
Revision:
4:761f247c603e
Parent:
3:f68e9cdfaf2d

File content as of revision 4:761f247c603e:

#include "mbed.h"
#include "SLCD.h"
#include "TSISensor.h"


#define CHANNELON   0
#define CHANNELOFF  1
#define LCDLEN      10
#define DATATIME    100 //milli seccnds
//LCD messages

//Button
#define BUTOFF 1
#define BUTON  0
#define BUTTON PTC3

// Operating parameters
#define SIDETONE    700.0   
#define TONEMIN     200.0
#define TONEINT     800.00 // So tone max is 1000
#define TONEON      0.50
#define TONEOFF     0.0
#define SPEEDAST    0
#define TONEAST     1
#define NUMTONES    10
#define LEDPERIOD   0.001

#define OCTAVECHANGE 2 //double to increase frequency
//#define PRINTDEBUG

Serial pc(USBTX, USBRX);

InterruptIn myButton(BUTTON);//button to change octaves

float diatonicScale[NUMTONES] = {246.94, 261.63,293.66,329.63,349.23,392.00,440.00,493.88,523.25,587.33};
SLCD slcd; //define LCD display

TSISensor tsiScaling; // Capacitive sensor/slider


PwmOut led(LED_RED);
DigitalOut outPin(PTC9); //J1-16
PwmOut soundOut(PTA13);
Timer dataTimer;
// Global scalars
char lcdData[LCDLEN];

float tonePeriod;
float toneFreq = SIDETONE;

int buttonState = BUTOFF;

void LCDMessNoDwell(char *lMess){
        slcd.Home();
        slcd.clear();
        slcd.printf(lMess);
} 
  
void diatonicAdjust( float scaling) {
    int tempInt;
    int scaleIndex;
    static int oldScaleIndex = 0;
/* There appears to be a set up time for setting the PWM time period
only do a nes set up if the indext changes.
*/
    scaleIndex = (int)(NUMTONES * scaling);
    if (scaleIndex != oldScaleIndex) {
        if(buttonState == BUTON)
        {
            toneFreq = diatonicScale[scaleIndex * OCTAVECHANGE];
        }
        else
        {
            toneFreq = diatonicScale[scaleIndex];
        }
        tonePeriod = 1.0/toneFreq;  
        soundOut.period(tonePeriod); // adjusting period
        soundOut.write(TONEON); // there is a setup time for both period and DF
        oldScaleIndex = scaleIndex;
    } else {
        return;
    }
#ifdef PRINTDEBUG
    pc.printf(" %f,%d\n\r",scaling, scaleIndex );
#endif
    tempInt = (int)toneFreq;
    sprintf (lcdData,"%4d",tempInt);
    LCDMessNoDwell(lcdData);
    return;
}
void lightAdjust( float scaling) { // Control brightness of LED
    float tempDutyFactor;
    
    tempDutyFactor = 1.0 - scaling; //LED is a sinking connection                                   // anode is held at 5V
    led.write(tempDutyFactor); //adjusting duty factor
    return;
}

void pressed()
{
    buttonState = !buttonState;
}

int main(){
    int tempInt;
    float tempValue;
    
    tonePeriod = 1.0/toneFreq; 
    soundOut.period(tonePeriod);
    led.period(tonePeriod);
    led.write(CHANNELOFF);
    outPin.write(CHANNELOFF);
    
    tempInt = (int)toneFreq;
    sprintf (lcdData,"%4d",tempInt);
    LCDMessNoDwell(lcdData);
   // Start data timer
    dataTimer.start();
    dataTimer.reset(); 
      
    while (true) {
        myButton.fall(&pressed);
        if (dataTimer.read_ms() > DATATIME){ // check to see if enough time has passed
                                            // to read the touch pad
            tempValue = tsiScaling.readPercentage();
            if(tempValue > 0) {
                // soundOut.write(TONEON); // set duty factor to 50%
                diatonicAdjust(tempValue);
                lightAdjust(tempValue);
            } else { 
                soundOut.write(TONEOFF); // set dutyfactor to 0%
                LCDMessNoDwell("SOFF");
            }       
            dataTimer.reset();
        }                 
    } // while forever
}// end main