rendered paste body//*****************************************************************************// File Name : datalogger.c// // Title : Windlogger// Revision : 0.2 22-10-2006// Revision History:// When Who Description of change// ----------- ----------- -----------------------// 20-Oct-2002 pstang Created the program// Oct - 2006 RifRaf changes stuff//***************************************************************************** //----- Include Files ---------------------------------------------------------#include <avr/io.h> // include I/O definitions (port names, pin names, etc)#include <avr/signal.h> // include "signal" names (interrupt names)#include <avr/interrupt.h> // include interrupt support #include "global.h" // include our global settings#include "uart.h" // include uart function library#include "rprintf.h" // include printf function library#include "timer.h" // include timer function library (timing, PWM, etc)#include "a2d.h" // include A/D converter function library#include "vt100.h" // include VT100 terminal support#include "lcd.h" // include Character LCD support//#include "i2ceeprom.h" // include I2C EEPROM support//#include "i2c.h" // include I2C support#include "extint.h" // include external interrupt library#include "spi.h" // include SPI interface functions#include "mmc.h" // include MMC card access functions#include "debug.h"#define SetBit(BIT, PORT) PORT |= (1<<BIT)#define ClearBit(BIT, PORT) PORT &= ~(1<<BIT)#define IsHigh(BIT, PORT) (PORT & (1<<BIT)) != 1#define IsLow(BIT, PORT) (PORT & (1<<BIT)) == 1#define on 0#define off 1//User Variablesu16 RPMDivider = 28;u16 WSDivider = 2.5;u16 VOLTDivider = 45;u16 WindVoltOffset = 0;u16 SolarVoltOffset = 0;u16 OutputVoltOffset = 0;u16 WindAmpDivider = 175;u16 SolarAmpDivider = 175;u16 OutputAmpDivider = 175;//global variablesunsigned int volts,shuntvolts,solarvolts,outvolts,recttemp,outtemp,insidetemp,barometer; // Current valuesunsigned int battvolts,windamp,solaramp,outamp,recttempOut,outtempOut,insidetempOut,barometerOut; // Current valuesunsigned int maxvolts,maxshuntvolts,maxsolarvolts,maxoutvolts,maxrecttemp,maxouttemp,maxinsidetemp,maxbarometer; // Max valuesunsigned int minvolts,minshuntvolts,minsolarvolts,minoutvolts,minrecttemp,minouttemp,mininsidetemp,minbarometer; // Min valuesunsigned int windWatts;unsigned int mode; // Dummy load on or offvolatile u16 Int0Count;volatile u16 Int1Count;u16 rpm, wmrpm; // AC Volts IN frequency per 0 secondsu16 windpulse, speed; // Windspeed Pulses per 0 secondsu16 direction; // Wind Directionu16 maxwmrpm, minwmrpm, maxspeed, minspeed; // max and minsu32 sector=0;u08 buffer[0x200];int c;int i;// functions void SwitchToCharging(void);void SwitchToLoad(void);void Setup(void);void rpmSetup(void);void SetMinMax(void);void mmcStart(void);void mmcWriteBuffer(void);void checkDirection(void);void myInt0Handler(void);void myInt1Handler(void); //----- Begin Code ------------------------------------------------------------void Setup(void){ uartInit(); uartSetBaudRate(115200); // set UART speed to 9600 baud rprintfInit(uartSendByte); timerInit(); // initialize vt100 terminal vt100Init(); a2dInit(); DDRA = 0x00; // configure a2d port (PORTA) as input so we can receive analog signals PORTA = 0x00; // make sure pull-up resistors are turned off //DDRB = 0xFC; //PORTB = 0xF0; //DDRC = 0xF0; //PORTC = 0xFC; //DDRD = 0xFC; //PORTD = 0xF0; a2dSetPrescaler(ADC_PRESCALE_DIV64); a2dSetReference(ADC_REFERENCE_256V); lcdInit(); // initialize LCD timerPause(100); // print welcome message vt100ClearScreen(); //vt100SetCursorPos(1,0); //rprintfProgStrM("\r\nMMC Test!\r\n"); timerPause(1000); // initialize MMC interface mmcInit(); timerPause(1000); mmcStart(); timerPause(1000);} int main(void){ Setup(); rpmSetup(); SwitchToCharging(); mode = 1; rprintfInit(lcdDataWrite); // direct printf output to LCD lcdClear(); // clear LCD lcdGotoXY(0,0); //goto line 1 , pos 1 rprintf("AVR WINDLOGGER 2006"); //welcome message lcdGotoXY(0,1); //goto line 2 , pos 1 rprintf("Wind Solar Load Mon"); //welcome message timerPause(3000); while (1) // do this until finished or broken { volts = a2dConvert10bit(0); // Get ADC Value shuntvolts = a2dConvert10bit(1); // Get ADC Value solarvolts = a2dConvert10bit(2); // Get ADC Value outvolts = a2dConvert10bit(3); // Get ADC Value recttemp = a2dConvert10bit(4); // Get ADC Value outtemp = a2dConvert10bit(5); // Get ADC Value insidetemp = a2dConvert10bit(6); // Get ADC Value barometer = a2dConvert10bit(7); // Get ADC Value if (volts > 620) { mode = 0; SwitchToLoad(); } if (volts < 580) { mode = 1; SwitchToCharging(); } Int0Count = 0; // reset interrupt counters Int1Count = 0; // reset interrupt counters timerPause(3000); // wait 3 seconds rpm = Int0Count; // get counter values windpulse = Int1Count; // get counter values checkDirection(); rprintfInit(uartSendByte); vt100SetCursorPos(1,1); rprintf("[<V>%d</V><I>%d</I><R>%d</R><S>%d</S><M>%d<M><D>%d</D><T1>%d</T1><T2>%d</T2><T3>%d</T3><B>%d</B>]\r\n",volts,shuntvolts,rpm,windpulse,mode,direction,recttemp,outtemp,insidetemp,barometer); mmcWriteBuffer(); SetMinMax(); //Update LCD rprintfInit(lcdDataWrite); // direct printf output to LCD lcdClear(); lcdGotoXY(0,0); //goto line 1 , pos 1 rprintf("V%d.%d A%d.%d W%d.%d",battvolts/10,battvolts%10,windamp/10,windamp%10,windWatts/10,windWatts%10); lcdGotoXY(0,1); //goto line 2 , pos 1 rprintf("%dRPM %dKph %d %d",wmrpm,speed, outtempOut, insidetempOut); } } void checkDirection(void) { if (0) { } else if ( !(PINC & (1<<PC5)) & !(PINC & (1<<PC4)) & !(PIND & (1<<PD7))) {direction = 1; } // NNNE else if ( !(PINC & (1<<PC5)) & !(PINC & (1<<PC4)) & !(PINC & (1<<PC3))) {direction = 5; } else if ( !(PINC & (1<<PC4)) & !(PINC & (1<<PC3)) & !(PINC & (1<<PC2))) {direction = 9; } else if ( !(PINC & (1<<PC3)) & !(PINC & (1<<PC2)) & !(PIND & (1<<PD4))) {direction = 13; } else if ( !(PINC & (1<<PC2)) & !(PIND & (1<<PD4)) & !(PIND & (1<<PD5))) {direction = 17; } else if ( !(PIND & (1<<PD4)) & !(PIND & (1<<PD5)) & !(PIND & (1<<PD6))) {direction = 21; } else if ( !(PIND & (1<<PD5)) & !(PIND & (1<<PD6)) & !(PIND & (1<<PD7))) {direction = 25; } else if ( !(PINC & (1<<PC5)) & !(PIND & (1<<PD6)) & !(PIND & (1<<PD7))) {direction = 29; } else if ( !(PINC & (1<<PC4)) & !(PIND & (1<<PD7))) {direction = 0; } // N else if ( !(PINC & (1<<PC5)) & !(PINC & (1<<PC4))) {direction = 2; } // NNE else if ( !(PINC & (1<<PC5)) & !(PINC & (1<<PC3))) {direction = 4; } else if ( !(PINC & (1<<PC4)) & !(PINC & (1<<PC3))) {direction = 6; } else if ( !(PINC & (1<<PC4)) & !(PINC & (1<<PC2))) {direction = 8; } // E else if ( !(PINC & (1<<PC3)) & !(PINC & (1<<PC2))) {direction = 10; } else if ( !(PINC & (1<<PC3)) & !(PIND & (1<<PD4))) {direction = 12; } else if ( !(PINC & (1<<PC2)) & !(PIND & (1<<PD4))) {direction = 14; } else if ( !(PINC & (1<<PC2)) & !(PIND & (1<<PD5))) {direction = 16; } // S else if ( !(PIND & (1<<PD4)) & !(PIND & (1<<PD5))) {direction = 18; } else if ( !(PIND & (1<<PD4)) & !(PIND & (1<<PD6))) {direction = 20; } else if ( !(PIND & (1<<PD5)) & !(PIND & (1<<PD6))) {direction = 22; } else if ( !(PIND & (1<<PD5)) & !(PIND & (1<<PD7))) {direction = 24; } // W else if ( !(PIND & (1<<PD6)) & !(PIND & (1<<PD7))) {direction = 26; } else if ( !(PINC & (1<<PC5)) & !(PIND & (1<<PD6))) {direction = 28; } else if ( !(PINC & (1<<PC5)) & !(PIND & (1<<PD7))) {direction = 30; } else if ( !(PINC & (1<<PC5))) {direction = 3; } // ENEE else if ( !(PINC & (1<<PC4))) {direction = 7; } else if ( !(PINC & (1<<PC3))) {direction = 11; } else if ( !(PINC & (1<<PC2))) {direction = 15; } else if ( !(PIND & (1<<PD4))) {direction = 19; } else if ( !(PIND & (1<<PD5))) {direction = 23; } else if ( !(PIND & (1<<PD6))) {direction = 27; } else if ( !(PIND & (1<<PD7))) {direction = 31; } else { direction = -1; }}void SetMinMax(void) //set maximums and minimums{ wmrpm = rpm/RPMDivider*60; if (wmrpm > maxwmrpm) { maxwmrpm = wmrpm; } if (wmrpm <= minwmrpm) { minwmrpm = wmrpm; } speed = windpulse/WSDivider; if (speed > maxspeed) { maxspeed = speed; } if (speed <= minspeed) { minspeed = speed; } battvolts = volts/VOLTDivider*10; if (battvolts > maxvolts) { maxvolts = battvolts; } if (battvolts <= minvolts) { minvolts = battvolts; } windamp = (shuntvolts - WindVoltOffset) / WindAmpDivider*10; if (windamp > maxshuntvolts) { maxshuntvolts = windamp; } if (windamp <= minshuntvolts) { minshuntvolts = windamp; } windWatts = (battvolts/10) * (windamp/10)*10; solaramp = (solarvolts - SolarVoltOffset) / SolarAmpDivider*10; if (solaramp > maxsolarvolts) { maxsolarvolts = solaramp; } if (solaramp <= minsolarvolts) { minsolarvolts = solaramp; } outamp = (outvolts - OutputVoltOffset) / OutputAmpDivider*10; if (outamp > maxoutvolts) { maxoutvolts = outamp; } if (outamp <= minoutvolts) { minoutvolts = outamp; } recttempOut = recttemp*0.254; if (recttempOut > maxrecttemp) { maxrecttemp = recttempOut; } if (recttempOut <= minrecttemp) { minrecttemp = recttempOut; } outtempOut = outtemp*0.254; if (outtempOut > maxouttemp) { maxouttemp = outtempOut; } if (outtempOut <= minouttemp) { minouttemp = outtempOut; } insidetempOut = insidetemp*0.254; if (insidetempOut > maxinsidetemp) { maxinsidetemp = insidetempOut; } if (insidetempOut <= mininsidetemp) { mininsidetemp = insidetempOut; } barometerOut = barometer*0.254; if (barometerOut > maxbarometer) { maxbarometer = barometerOut; } if (barometerOut <= minbarometer) { minbarometer = barometerOut; }}void rpmSetup(void){ extintInit(); extintConfigure(EXTINT0, EXTINT_EDGE_RISING); extintConfigure(EXTINT1, EXTINT_EDGE_RISING); extintAttach(EXTINT0, myInt0Handler); extintAttach(EXTINT1, myInt1Handler); sbi(GIMSK, INT0); sbi(GIMSK, INT1);}void myInt0Handler(void){ Int0Count++;}void myInt1Handler(void){ Int1Count++;}void SwitchToCharging(void) { ClearBit(4, PORTB) ; return;} void SwitchToLoad(void) { SetBit(4, PORTB) ; return;} void mmcStart(void){ //Code added to fill buffer with something int i; u08 mystring[20] = "01234567890123456789"; c = 0; for (i=0;i<=512;i++) { buffer[i] = mystring[c]; c++; if (c > 19) { c = 0; } } //Code added to fill buffer with something // initialize card rprintf("\r\nResetting MMC/SD Card\r\n"); mmcReset(); }void mmcWriteBuffer(void){ // write current sector with data from buffer vt100SetCursorPos(4,10); rprintf("\r\nWrite Sector %d\r\n", sector); mmcWrite(sector, buffer); sector+=512;}