ميكروكنترل: ضبط صوت دیجیتال توسط میکرو AVR

/*****************************************************
This program was produced by the
CodeWizardAVR V1.25.9 Professional
Automatic Program Generator
© Copyright 1998-2008 Pavel Haiduc, HP InfoTech s.r.l.
http://www.hpinfotech.com

Project : 
Version : 
Date    : 2010/05/21
Author  : Hossein Lachini                 
Company : HLachini                        
Comments: 


Chip type           : ATmega32
Program type        : Application
Clock frequency     : 8.000000 MHz
Memory model        : Small
External SRAM size  : 0
Data Stack size     : 512
*****************************************************/

#include <mega32.h> 
#include <stdlib.h>
#include <delay.h>
#include <spi.h>
#include "mmc_lib.h"
#include "Windows XP Startup.c"

#define KEY_PLAY        PIND.1
#define KEY_RECORD      PIND.2
#define KEY_ERASE       PIND.3 
#define LED             PORTB.0

#define ON              1
#define OFF             0 

#define SectorSize         512   
#define MMC_CS               PORTB.4 


#define RECORD_TIME          30

 // Alphanumeric LCD Module functions
 #asm
   .equ __lcd_port=0x15 ;PORTC  
 #endasm
 #include <lcd.h>
#define ADC_VREF_TYPE 0x60

typedef unsigned char BYTE;
typedef    unsigned int  WORD;

BYTE buf_mmc[SectorSize]; 

// Read the 8 most significant bits
// of the AD conversion result
unsigned char read_adc(unsigned char adc_input)
{
ADMUX=adc_input | (ADC_VREF_TYPE & 0xff);
// Delay needed for the stabilization of the ADC input voltage
delay_us(10);
// Start the AD conversion
ADCSRA|=0x40;
// Wait for the AD conversion to complete
while ((ADCSRA & 0x10)==0);
ADCSRA|=0x10;
return ADCH;
}

// Declare your global variables here
unsigned char t1ovf;    
// Timer 1 overflow interrupt service routine
interrupt [TIM1_OVF] void timer1_ovf_isr(void)
{
// Place your code here
 if(t1ovf)
  t1ovf--;
}  

void play_sample(void)
{
 WORD idx;
 for(idx=0;idx<DURATION;idx++)
      {
        OCR1B = data[idx]; 
        t1ovf=2;
        while(t1ovf);
      }
  OCR1B = 0;    
}   

void menu(void)
{
 lcd_clear();
 lcd_putsf("PLY   REC   ERS");
}

void record(void)
{
 WORD i,mmc_sector_num;
 lcd_clear();
 lcd_putsf("Record");
 lcd_gotoxy(0,1);
 LED = ON;
 for(mmc_sector_num=0;mmc_sector_num<RECORD_TIME*14;mmc_sector_num++)
 {
  for(i=0;i<SectorSize;i++)
  {
   buf_mmc[i] = read_adc(0);
   t1ovf=2;
   while(t1ovf);
  }
  mmc_write(mmc_sector_num, buf_mmc);
  if(mmc_sector_num%(RECORD_TIME*14/10)==0)
   lcd_putsf("#");
 } 
 LED = OFF;
 menu();
}

void play(void)
{
 WORD idx,mmc_sector_num; 
 lcd_clear();
 lcd_putsf("Play");
 lcd_gotoxy(0,1);
 LED = ON;
 for(mmc_sector_num=0;mmc_sector_num<RECORD_TIME*14;mmc_sector_num++)
 {
  mmc_read(mmc_sector_num, buf_mmc);
  for(idx=0;idx<SectorSize;idx++)
      {
        OCR1B = buf_mmc[idx]; 
        t1ovf=2;
        while(t1ovf);
      }
  if(mmc_sector_num%(RECORD_TIME*14/10)==0)
   lcd_putsf("#");
 }
 LED = OFF;
 menu();     
}

void mic2spk(void)
{
lcd_clear();
lcd_putsf("Mic -> Spk");
lcd_gotoxy(0,1);
lcd_putsf("     REC => EXIT");
 while(~KEY_ERASE)
 {
  OCR1B = 1 * read_adc(0);
  t1ovf=2;
  while(t1ovf);
 } 
 menu();
}

void adc2lcd(void)
{
 BYTE ad;
 char str[8];
 static unsigned char ad_old;
 lcd_clear();
 lcd_putsf("ADC -> LCD");
 lcd_gotoxy(0,1);
 lcd_putsf("     REC => EXIT");
 delay_ms(3000);
 while(~KEY_RECORD)
 {
  ad = read_adc(0);
  if(ad != ad_old)
  { 
   lcd_clear();
   lcd_putsf("ADC=");
   itoa(ad, str);
   lcd_gotoxy(5,0);
   lcd_puts(str); 
   lcd_gotoxy(0,1);
   ad_old = ad;
   ad/=16;
   for(;ad;ad--)
    lcd_putsf("#");
   delay_ms(100); 
  }
 }
 menu(); 
}

void testmmc(void)
{
 WORD i,mmc_sector_num;
 lcd_clear();
 lcd_putsf("Erase");
 LED = ON;
 for(mmc_sector_num=0;mmc_sector_num<DURATION/SectorSize;
mmc_sector_num++)
 {
  for(i=0;i<SectorSize;i++)
  {
   buf_mmc[i] = data[mmc_sector_num*SectorSize+i];
  }
  mmc_write(mmc_sector_num, buf_mmc);
 } 
  for(i=0;i<SectorSize;i++)
  {
   buf_mmc[i] = 0;
  }
  mmc_read(0, buf_mmc);
  for(i=0;i<SectorSize && buf_mmc[i] == data[i];i++);
  lcd_clear();
  if(i==SectorSize)
  {
   lcd_putsf("MMC OK");
   LED = OFF;
  } 
  else
  {
   lcd_putsf("MMC Fail!");
  }
 delay_ms(1000); 
 menu(); 
}

void init(void)
{
// Input/Output Ports initialization
// Port A initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTA=0x00;
DDRA=0x00;

// Port B initialization
// Func7=In Func6=Out Func5=In Func4=In Func3=In Func2=In Func1=In Func0=Out 
// State7=T State6=0 State5=T State4=T State3=T State2=T State1=T State0=0 
PORTB=0x00;
DDRB=0xB1;

// Port C initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTC=0x00;
DDRC=0x00;

// Port D initialization
// Func7=In Func6=In Func5=In Func4=Out Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=0 State3=T State2=T State1=T State0=T 
PORTD=0x00;
DDRD=0x10;

LED = OFF;

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: Timer 0 Stopped
// Mode: Normal top=FFh
// OC0 output: Disconnected
TCCR0=0x00;
TCNT0=0x00;
OCR0=0x00;

// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: 8000.000 kHz
// Mode: Ph. correct PWM top=00FFh
// OC1A output: Discon.
// OC1B output: Non-Inv.
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer 1 Overflow Interrupt: On
// Input Capture Interrupt: Off
// Compare A Match Interrupt: Off
// Compare B Match Interrupt: Off
TCCR1A=0x21;
TCCR1B=0x01;
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: Timer 2 Stopped
// Mode: Normal top=FFh
// OC2 output: Disconnected
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
// INT2: Off
MCUCR=0x00;
MCUCSR=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x04;

// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
SFIOR=0x00;

// ADC initialization
// ADC Clock frequency: 1000.000 kHz
// ADC Voltage Reference: AVCC pin
// Only the 8 most significant bits of
// the AD conversion result are used
ADMUX=ADC_VREF_TYPE & 0xff;
ADCSRA=0x83;

// LCD module initialization
lcd_init(16);

// SPI initialization
// SPI Type: Master
// SPI Clock Rate: 2000.000 kHz
// SPI Clock Phase: Cycle Half
// SPI Clock Polarity: Low
// SPI Data Order: MSB First
SPCR=0x50;
SPSR=0x00;
mmc_init();
 
LED = OFF;

// Global enable interrupts
#asm("sei")
}

void main(void)
{
// Declare your local variables here
init();
lcd_clear();
lcd_putsf("LOADING...");
lcd_gotoxy(0,1);
lcd_putsf("PLY         ERS");
play_sample();          
if(KEY_PLAY)
 mic2spk(); 
if(KEY_ERASE)
 adc2lcd();
menu();
while (1)
      {
      // Place your code here

      if(KEY_PLAY)
       play();
      if(KEY_RECORD)
       record();
      if(KEY_ERASE)
       testmmc();  
      };
}