speed.c

butterflylogger_src_20060822 for atmel avr

//
//Atmel AVR Design Contest 2006 Registration Number AT3221
//

//***************************************************************************
//
//  File........: speed.c
//
//  Author(s)...: Nick Lott
//
//  Target(s)...: ATmega169
//
//  Compiler....: AVR-GCC 3.3.1; avr-libc 1.0
//
//  Description.: Wind Speed monitoring routines for AVR Butterfly 
//
//  Revisions...: 1.0
//
//  YYYYMMDD - VER. - COMMENT                                       - SIGN.
//
//  20040419 - 1.0  - Created                                       - NAL
//  20050610 -        Ported to GCC									- NAL
//
//***************************************************************************


//#include <inavr.h>
//#include "iom169.h"
#include <avr/io.h>
#include <avr/interrupt.h>
#include <avr/pgmspace.h>
#include <avr/sleep.h>
#include <inttypes.h>

#include "main.h"
#include "speed.h"
#include "ADC.h"
#include "BCD.h"
#include "LCD_functions.h"
#include "Timer0.h"
#include "usart.h"                       
#include "dataflash.h"

int glastSpeed; // last 1 second count
BOOL glogSpeed; // tell RTC to add to 60 sec log
int gSpeedSeconds; // no of seconds counted
int gSpeedTotal; // used for counting the wind events
int gSpeedSecondsToLog;
extern BOOL gLogNow;

/******************************************************************************
*
*   Function name:  Speed_init
*
*   returns:        none
*
*   parameters:     none
*
*   Purpose:        Start Timer/Counter1 using a
*                   T1 pin with falling edge
*
*******************************************************************************/
void Speed_init(void)
{
    cli(); // mt __disable_interrupt();  // disable global interrupt

	// Mode: Normal top=FFFFh
	// OC1A output: Discon.
	// OC1B output: Discon.
	// Noise Canceler: Off
	// Input Capture on Falling Edge

	TCCR1A=0x00;		
	TCCR1B=(1<<CS12)|(1<<CS11); 	// Clock source: T1 pin Falling Edge
	TCNT1H=0x00;
	TCNT1L=0x00;
	OCR1AH=0x00;
	OCR1AL=0x00;
	OCR1BH=0x00;
	OCR1BL=0x00;
	
	gSpeedSecondsToLog= DEFAULT_SECONDSTOLOG;
	
	//enable pull up on PG3 ( remember to remove R200 )
	DDRG	&= ~(1<<PG3);				//Set to input
#if SPEED_EN_INTERNALPULLUP
	PORTG	|= (1<<PG3);				//Enable Internal Pullup
#endif
    sei(); // __enable_interrupt();  // enable global interrupt
}


/*****************************************************************************
*
*   Function name : SpeedFunc
*
*   Returns :       char ST_state (to the state-machine)
*
*   Parameters :    char input (from joystick)
*
*   Purpose :       Veiw current windspeed (per second)
*
*****************************************************************************/
char SpeedFunc(char input)
{
    static char enter = 1;
    
    if (enter)
    {
        enter = 0;
        // Enable auto-run of the ShowSpeed function every 10ms 
        // (it will actually be more than 10ms because of the SLEEP)        
        Timer0_RegisterCallbackFunction(ShowSpeed);        
    }
    else
        LCD_UpdateRequired(TRUE, 0); 

    if (input == KEY_PREV)
    {
        // Disable the auto-run 
        Timer0_RemoveCallbackFunction(ShowSpeed);
        
        enter = 1;  // Set enter to 1 before leaving the TemperatureFunc
        
        return ST_SPEED;
    }
    else
        return ST_SPEED_FUNC;    
}    


/*****************************************************************************
*
*   Function name : PrintSpeed
*
*   Returns :       nothing
*
*   Parameters :    int speed
*
*   Purpose :       log the total to flash after 60 seconds
*
*****************************************************************************/
void PrintSpeed(unsigned int Speed)
{
	unsigned long Temp;
    char D[6],i;
	
	Temp = int2BCD5(Speed);                
	D[0] = '0';
	
	for (i=5;i;i--){
		D[(int)i] = (Temp & 0x0F) + '0';       
		if(D[(int)i]  > '9')        // if the hex-value is over 9, add 7 in order to go 
			D[(int)i]  += 7;        // jump to the character in the ASCII-table
		(Temp >>= 4);
	}
	
	for (i=0;i<6;i++){
		USART_Tx(D[(int)i]);
	}
	
	USART_Tx(' ');    

}


/*****************************************************************************
*
*   Function name : ShowSpeed
*
*   Returns :       nothing
*
*   Parameters :    nothing
*
*   Purpose :       Show speed (last 1 sec) as rpm on LCD
*
*****************************************************************************/
void ShowSpeed(void)
{
  int Temp;
	char D[3],i;	
	
	 if (!gLogNow) // don't read while log in progress
	{
		Temp = CHAR2BCD3(glastSpeed*60);                
		
		 for (i=3;i;i--){				
			 D[(int)i-1] = (Temp & 0x0F) + '0';       
			 if(D[(int)i-1] > '9')        // if the hex-value is over 9, add 7 in order to go 
				 D[(int)i-1] += 7;        // jump to the character in the ASCII-table
			 (Temp >>= 4);
		 }/*
		TM = ((Temp >>= 4)& 0x0F) + '0';
		if(TM > '9')        // if the hex-value is over 9, add 7 in order to go 
			TM += 7;        // jump to the character in the ASCII-table
		
		TH = ((Temp >>= 4)& 0x0F) + '0';
		if(TH > '9')        // if the hex-value is over 9, add 7 in order to go 
			TH += 7;        // jump to the character in the ASCII-table
		  */
		LCD_putc(0, 'R');
		LCD_putc(1, 'P');
		LCD_putc(2, 'M');
		
		LCD_putc(3, D[0]);
		LCD_putc(4, D[1]);
		LCD_putc(5, D[2]);
		LCD_putc(6, '\0');
	}
}