基本程序 实现调频.txt

个人单片机入门程序集合 。很适合刚学单片机的人。用的是keil proteus

#include<reg51.h>
#include<intrins.h>
#define uint unsigned int
#define uchar unsigned char
#define ulong  unsigned long
//数据口定义
#define lcd1602_bus P0	


sbit sclk=P2^0;   //W_CLK
sbit load=P2^1;   //FQUD
sbit sdata=P2^2;  //DATA	 

//引脚定义
sbit rs_1602=P2^5;	     
sbit rw_1602=P2^6;
sbit e_1602=P2^7;
sbit alarm=P0^0;


/*********延时子程序**********/
void delay_1ms(uint t)
{
   uint i,j;
   for(i=0;i<t;i++)
     for(j=0;j<120;j++);              
}

void delay(uchar t)
{
	uchar i;
	while(t--)
	{
		/* 对于11.0592M时钟，约延时1ms */
		for (i=0;i<125;i++)
		{}
	}
} 







/***********忙判断标志，返回一个位BF********************/
bit lcd1602_busy(void)
{
	uchar busy_flag;
	rs_1602=0;
	rw_1602=1;
	_nop_();
	e_1602=1;
	_nop_();
	lcd1602_bus=0xff;
	busy_flag=lcd1602_bus;	 //e在高电平时读 
	e_1602=0;
	return (bit)(busy_flag&0x80);    //BF=1; BUSY  返回一个位
}


/********写命令，有两个参数，一个是要写的命令控制字，
第二个是用来控制是否进行忙标志的判断。
busyflag=1;
判断： 为0 
***************/
void lcd1602_wrcmd(unsigned char lcdcmd)
{
   	while(lcd1602_busy());	   //等待空闲
	lcd1602_bus=lcdcmd;
	rs_1602=0;
	rw_1602=0;
	_nop_();
	e_1602=1;
	_nop_();
	_nop_();
	e_1602=0;      //产生一个下沿	  
}



/***************向液晶写数据******************/
void lcd1602_wrdata(uchar lcddata)
{
 while(lcd1602_busy());	      //等待空闲
 lcd1602_bus=lcddata;		  //在下沿的时候写数据
 rs_1602=1;
 rw_1602=0;
 _nop_();
 e_1602=1;
 _nop_();
 _nop_();
 e_1602=0;
 //lcd_bus=0xff;
}


/************液晶的清屏************/
void lcd1602_clear(void)
{
  lcd1602_wrcmd(0x01);	   //液晶清屏控制字	并延时>40us
  delay(1);
}

/***********1602液晶的初始化***************/
void lcd1602_init(void)
{
  lcd1602_wrcmd(0x38);	    	//功能设置－－－－－8位数据接口，两行显示，5*7点阵字符显示
  delay(1);
  lcd1602_wrcmd(0x0e);	       //显示开关控制－－－－显示开关开，光标开关关，闪烁开关关
  delay(1);
  lcd1602_wrcmd(0x06);	       //输入方式设置，AC自增1, S=0;
  delay(1);		   
  lcd1602_wrcmd(0x01);         //清屏
  delay(1);
}


/**********4*4矩阵键盘****************/
/************
 矩阵键盘
D---------P1.0
C---------P1.1
B---------P1.2
A---------P1.3
1---------P1.4
2---------P1.5
3---------P1.6
4---------P1.7
按键值的分布
   D   C  B  A
1〔15 14 13 12〕
2〔11 10  9  8〕
3〔 7  6  5  4〕
4〔 3  2  1  0〕
利用已有的那个按键程序  */






uchar getkey_ii()

{
    unsigned char keycode=0xff,temp,i;
    P1=0x0f;
    temp=P1&0x0f;
    if(temp!=0x0f)        //判是否有键按下
    {
       // beep=0;
        P1=0xef;          //自第0行开始扫描输出，自列读入键值
        for(i=0;i<4;i++)
        {
            temp=P1&0x0f;
            if(temp==0x07)     //判断第0列是否有键按下
            {    
                keycode=i*4+0;
                break;
            }
            else if(temp==0x0b)//判断第1列是否有键按下
            {
                keycode=i*4+1;
                break;                                  						  
            }
            else if(temp==0x0d)//判断第2列是否有键按下
            {
                keycode=i*4+2;
                break;
            }
            else if(temp==0x0e)//判断第3列是否有键按下
            {
                keycode=i*4+3;
                break;
            }
            P1=(P1<<1)|0x1;
        }

         while((P1&0x0f)!=0x0f)   //等待释放
         {
             P1=0x0f;
         }
    //   beep=1;                                             
        
     }
     return keycode;
}



void xianshu(unsigned long a)
{          unsigned long c,p=0;
				if (a!=0) 
 			{	
                
				c=a/1000000000;
				if(c!=0)
                {lcd1602_wrdata(c+0x30);
 			     p=1;
				 }
                 c=(a%1000000000)/100000000;
                 if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                 c=(a%100000000)/10000000;
                 if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }

                 c=(a%10000000)/1000000;
                 if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                  c=(a%1000000)/100000;
                if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                 c=(a%100000)/10000;
                if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }               
                c=(a%10000)/1000;
                if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                
				c=(a%1000)/100;
                if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                
				c=(a%100)/10;
                if(c!=0 || p==1)
                 {lcd1602_wrdata(c+0x30);
 			      }
                
	            c=a%10+0x30;
         	    lcd1602_wrdata(c);   
				
            }
}


void xianshi(uchar j)
{  	uchar str[][9]={{"1.sin   "},{"2.date  "},{"3.set F "},{"4.set dF"},{"1.sin   "}};   
    uchar i;
    unsigned char offset=0x80;
          lcd1602_clear();
  	  	    lcd1602_wrcmd(offset+0x00);

             lcd1602_wrcmd(offset+0x00);
             lcd1602_wrdata('-');
			 lcd1602_wrdata('>');
             for(i=0;i<8;i++)   lcd1602_wrdata(str[j+0][i]);    
   
          	 lcd1602_wrcmd(offset+0x40);
			 lcd1602_wrdata(' ');
			 lcd1602_wrdata(' ');
             for(i=0;i<8;i++)   lcd1602_wrdata(str[j+1][i]);		   
}


ad9850(float freq, float dfreq)
{
   float fw;
    uchar i,j,temp;
    uchar d[5];
   fw=freq*34.359738368;                       //d[4]中存放控制字最高位，即相位控制字
                                               //Freq=MCLK*FW/2^32
   d[4]=0;
   d[0]=(unsigned long)fw;
   d[1]=(unsigned long)fw>>8;
   d[2]=(unsigned long)fw>>16;
   d[3]=(unsigned long)fw>>24;
  
   
    load=0; 
    sclk=0; 
    sclk=1;
    sclk=0;
    load=1;
    load=0;
    
    for(i=0;i<5;i++)
    {
        temp=d[i];
        for(j=0;j<8;j++)
        {
            sclk=0;
            if(temp&1) sdata=1;
            else sdata=0;
            sclk=1;
            temp=temp>>1;
         }
      }
      load=1;
      load=0;
  
  lcd1602_clear();
  xianshu(freq);
  lcd1602_wrdata('H');
  lcd1602_wrdata('Z');
  
  lcd1602_wrcmd(0x80+0x40);   //换行
  xianshu(dfreq);
  lcd1602_wrdata('D');
  lcd1602_wrdata('H');
  lcd1602_wrdata('Z');

}





void main()																	  		 
{	
   
    uchar i;
//	uint t;

   
 
	uchar j=0;     //标记
	ulong a=1000,b=1000 ;  //a用来记录频率；b用来记录频率间隔（开始是为1000HZ）
	
	
    uchar d[]="please insert F:";
	uchar w[]="please insert DF:" ;


	uchar str0='1';
	uchar str1='2';
	uchar str2='3';
    uchar str3='A';
	uchar str4='4';
	uchar str5='5';