led_pwm_lcd2

ATMEGA8-lcdd在flash 存贮中应用-学习AVR的朋友们挺多的

#include <avr/io.h>
#include <avr/interrupt.h>
#include <avr/signal.h>
#include <stdio.h>
#include <avr/eeprom.h>
#include <avr/pgmspace.h>
#define uchar unsigned char
#define uint unsigned int
#define sbi(x,y) (x|=(1<<y))
#define cbi(x,y)  (x&=~(1<<y))

#define lcd_di PA6
#define lcd_rw PA3
#define lcd_e PA4
#define lcd_cs1 PA7
#define lcd_cs2 PA5

unsigned char timer=0;
unsigned char count=0; 		//AD转换结果
unsigned int loop=0,s=0;
prog_uchar DispCode[]={0x3f,0x06,0x5b,0x4F,0x66,0x6d,0x7d,0x07,0x7f,0x6f,
0x77,0x7C,0x39,0x5E,0x79,0x71,0x80,0x00}; //数码管译码表

/*--  文字:  一  --*/
/*--  楷体_GB231212;  此字体下对应的点阵为：宽x高=16x16   --*/
static unsigned char yi[] PROGMEM = {
                 0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x02,0x02,0x02,0x02,0x03,0x01,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xaa};

const char FlashString[] PROGMEM = "This is a string held completly in flash memory.";

static unsigned char icon[] PROGMEM  ={
                 /*--  宽度x高度=16x16  --*/
0x00,0x08,0x14,0x2A,0x14,0x08,0x00,0x7F,0x7F,0xC3,0xC3,0xC3,0xC3,0xC3,0xFB,0x39,
0x3C,0x3F,0x03,0x03,0x03,0x03,0x03,0x3E,0x3E,0x03,0x03,0x03,0x03,0x03,0xFF,0xFC};


void delay(unsigned int v)
          {
           while(v)v--;
           }

/////////////////////
////////


void wcode(unsigned char c,uchar cs1,uchar cs2)
{
if(cs1==0)
   {
   cbi(PORTA,lcd_cs1);
   }
else
   {
   sbi(PORTA,lcd_cs1);
   }
if(cs2==0)
  {
  cbi(PORTA,lcd_cs2);
  }
else
  {
  sbi(PORTA,lcd_cs2);
  }

  cbi(PORTA,lcd_di);
  cbi(PORTA,lcd_rw);
   PORTC=c;
   cbi(PORTA,lcd_e);
  delay(10);
   sbi(PORTA,lcd_e);
  delay(10);
   cbi(PORTA,lcd_e);
  }

void wdata(uchar cdata,uchar cs1,uchar cs2)
{
if(cs1==0)
   {
   cbi(PORTA,lcd_cs1);
   }
else
   {
   sbi(PORTA,lcd_cs1);
   }
if(cs2==0)
  {
  cbi(PORTA,lcd_cs2);
  }
else
  {
  sbi(PORTA,lcd_cs2);
  }

  sbi(PORTA,lcd_di);
  cbi(PORTA,lcd_rw);
PORTC=cdata;
   cbi(PORTA,lcd_e);
  delay(10);
   sbi(PORTA,lcd_e);
  delay(10);
   cbi(PORTA,lcd_e);
  }


void set_startline(unsigned char i)
{
  i=0xc0+i;
  wcode(i,1,1);
  }
void set_adr(unsigned char x,unsigned char y)
{
 x=x+0xb8;y=y+0x40;
 wcode(x,1,1);	   
 wcode(y,1,1);
 }


void dison_off(unsigned char o)
{
  o=o+0x3e;
  wcode(o,1,1);
  }


uchar inva(unsigned char b)
{
uchar v1=0;
uchar v2=0;
char i;
uchar j1=0x80;
uchar j2=0x01;
for(i=7;i>=1;i=i-2)
{
v1=((b<<i)&j1)|v1;
v2=((b>>i)&j2)|v2;
j1=j1>>1;
j2=j2<<1;
}
return(v1|v2);
}


//////////////////////
////////////////////


void adc_init(void)		//ADC初始化
{
 DDRF=0x00;
 PORTF=0x00;
 ADCSRA =0x00; 		//设置前，先关闭ADC
 ADMUX|=(1<<REFS0); 
 ACSR=(1<<ACD);     //关闭模拟比较器
 ADCSRA=(1<<ADEN)|(1<<ADSC)|(1<<ADPS2)|(1<<ADPS1)|(0<<ADPS0);	//64分频
}




void uart0_init(void)
      {
	  UCSR0B=0X00;
	  UBRR0L=0X33;
	  UCSR0B=0X98;
	  }

void sendchar(unsigned char c)
      {
	  UDR0=c;
	  while(!(UCSR0A&0X40));
	  UCSR0A|=0X40;  
	  }


void  send(unsigned char const *str)
{ 
   while(1)
   {  if( *str == '\0' ) break;
      sendchar(*str++);	    // 发送数据
   }
}


SIGNAL(SIG_OVERFLOW1)
      {
	  TCNT1=64900;
       
	timer++;
	if(timer>=100)   //〈256  //改变时间
	   {
	   PORTD=0xff^PORTD;   //改变引脚
	   timer=0;
	   }


	  }
/*
void debug_P(const char *addr)
{
char c;
while ((c = pgm_read_byte(addr++)))
sendchar(c);
}
*/
//(pgm_read_byte(&icon[loop]))
void clr_disp()
    {
   unsigned char clr_i;
   for(clr_i=0;clr_i<8;clr_i++)
      {
	   set_adr(clr_i,0);
       for(loop=0;loop<64;loop++)
          {
          wdata(0,1,1);
           }
         }
	}


void disp_paly()
     {
	 delay(100);
set_startline(s);
s++;
if(s>=64)
   s=0;
set_adr(0,0);
for(loop=0;loop<16;loop++)
{
delay(500);
wdata(inva((pgm_read_byte(&icon[loop]))),1,1);
}
for(loop=16;loop<64;loop++)
{
wdata(0,1,1);
}

set_adr(1,0);
for(loop=0;loop<64;loop++)
{
wdata(0,1,1);
}

for(loop=16;loop<32;loop++)
{
wdata(inva((pgm_read_byte(&icon[loop]))),1,1);
}
	 
	 }

int main (void)
{
const unsigned char  SEND_STRING[] = "welcome to avr\n";
unsigned int adc_rel=0;

	DDRC=0xff;//数据口
	PORTC=0xff;  
    DDRA=0xff;//控制口
	PORTA=0xff;  

 	DDRD=0xff;
	PORTD=0xff;   

 sei();
 adc_init();
	 TCCR1A=0X00;
	 TCCR1B=(1<<CS10);
	 TIMSK|=(1<<TOIE1);
     TCNT1=61712;
 uart0_init(); 
send(SEND_STRING);
dison_off(1);
clr_disp();
while(1)
    { 
	disp_paly();
	  delay(50000); 
	  delay(50000);
   
	 ADMUX= ADMUX&0xf0;
	  delay(50000);
   ADCSRA|=(1<<ADSC);                                  //启动ADC转换
   while(ADCSRA& (1<<ADSC));                           //判断ADC转换是否结束

   adc_rel=ADC; 
   count=adc_rel*10/102;
    //sendchar(0XAA);
    sendchar(count);
/////////////////////////

	  delay(50000); 
	  delay(50000);
  
 ADMUX|= ADMUX+3;
   delay(50000);
   ADCSRA|=(1<<ADSC);                                  //启动ADC转换
   while(ADCSRA& (1<<ADSC));                           //判断ADC转换是否结束

   adc_rel=ADC; 
   count=adc_rel*10/102;
  //  sendchar(0XAA);
    sendchar(count);




  /*
  for(count=0;count<32;count++ )
     {
     sendchar((pgm_read_byte(&yi[count])));
     delay(50000);	
     } 
	 */

	 }
	
	return (0); 
}