51单片机开发板实例程序(共11页)

1、精选优质文档-倾情为你奉上51单片机实验开发板实验程序1.P1口第一个二极管亮 #includevoid main()P1=0xfd;2. P1口第一个二极管闪烁#include#define unit unsigned int#define uchar unsigned char sbit led1=P10;void delay();void main()while(1)led1=0;delay();led1=1;delay();void delay()unit x,y;for(x=100;x0;x-)for(y=2000;y0;y-); 3.1602液晶显示器移屏显示字符#include#

2、define uchar unsigned char#define uint unsigned intuchar code table=I LIKE MCU!;uchar code table1=WWW.TXMCU.COM;sbit lcden=P34;sbit lcdrs=P35;sbit dula=P26;sbit wela=P27;uchar num;void delay(uint z)uint x,y;for(x=z;x0;x-)for(y=110;y0;y-);void write_com(uchar com)lcdrs=0;P0=com;delay(5);lcden=1;delay

3、(5);lcden=0;void write_data(uchar date)lcdrs=1;P0=date;delay(5);lcden=1;delay(5);lcden=0;void init()dula=0;wela=0;lcden=0;write_com(0x38); /设置16x2显示。5x7点阵，8位数据接口write_com(0x0e); /显示设置光标不显示write_com(0x06); /光标移动，地址指针加一write_com(0x01); /显示清屏/write_com(0x80+0x10);void main()init();write_com(0x80+0x10);

4、/显示第一行的位置for(num=0;num11;num+)/显示第一行，有11个字符write_data(tablenum);delay(20);/write_com(1); /清屏write_com(0x80+0x53); /第二行显示位置for(num=0;num13;num+) /显示第二行 有13个字符write_data(table1num);delay(20);for(num=0;num16;num+)/向左移16个字符write_com(0x1c); / 左移0001 1100delay(200);while(1);4.温度计（1602显示，18b20传感器采集温度）：#inc

5、lude#define uchar unsigned char#define uint unsigned intsbit dula=P26;sbit wela=P27;sbit DQ=P37;/ds18b20与单片机连接口sbit RS=P35;/sbit RW=P31;sbit EN=P34;unsigned char code str1=temperature: ;unsigned char code str2= ; uchar data disdata5;uint tvalue;/温度值uchar tflag;/温度正负标志/*lcd1602程序*/ void delay1ms(unsi

6、gned int ms)/延时1毫秒（不够精确的） unsigned int i,j; for(i=0;ims;i+) for(j=0;j0;i-) DQ = 0; /给脉冲信号 dat=1; DQ = 1; /给脉冲信号 if(DQ) dat|=0x80; delay_18B20(10); return(dat); void ds1820wr(uchar wdata)/*写数据*/ unsigned char i=0; for (i=8; i0; i-) DQ = 0; DQ = wdata&0x01; delay_18B20(10); DQ = 1; wdata=1; read_temp(

7、)/*读取温度值并转换*/ uchar a,b; ds1820rst(); ds1820wr(0xcc);/*跳过读序列号*/ ds1820wr(0x44);/*启动温度转换*/ ds1820rst(); ds1820wr(0xcc);/*跳过读序列号*/ ds1820wr(0xbe);/*读取温度*/ a=ds1820rd(); b=ds1820rd(); tvalue=b; tvalue=8; tvalue=tvalue|a; if(tvalue0x0fff) tflag=0; else tvalue=tvalue+1; tflag=1; tvalue=tvalue*(0.625);/温度

8、值扩大10倍，精确到1位小数return(tvalue); /*/ void ds1820disp()/温度值显示 uchar flagdat; disdata0=tvalue/1000+0x30;/百位数 disdata1=tvalue%1000/100+0x30;/十位数 disdata2=tvalue%100/10+0x30;/个位数 disdata3=tvalue%10+0x30;/小数位 if(tflag=0) flagdat=0x20;/正温度不显示符号 else flagdat=0x2d;/负温度显示负号:- if(disdata0=0x30) disdata0=0x20;/如果

9、百位为0，不显示 if(disdata1=0x30) disdata1=0x20;/如果百位为0，十位为0也不显示 wr_com(0xc0);wr_dat(flagdat);/显示符号位 wr_com(0xc1); wr_dat(disdata0);/显示百位 wr_com(0xc2); wr_dat(disdata1);/显示十位 wr_com(0xc3); wr_dat(disdata2);/显示个位 wr_com(0xc4); wr_dat(0x2e);/显示小数点 wr_com(0xc5); wr_dat(disdata3);/显示小数位 /*主程序*/ void main() ini

10、t_play();/初始化显示 while(1)read_temp();/读取温度 ds1820disp();/显示 5.温度计（1602液晶显示，18b20采集温度，先显示学号，在显示温度）#include#include #define uchar unsigned char#define uint unsigned intsbit DQ=P37;/ds18b20与单片机连接口sbit RS=P35;/sbit RW=P21;sbit EN=P34;sbit dula=P26;sbit wela=P27;uchar code str1= Temperature is ;uchar code

11、 str2=;uchar code str3=set_hightemp: ;uchar code str4=set_lowtemp: ;uchar code str5=studentN0: ;uchar code str6=:;uchar data disdata5;uchar set_hightemp=33,set_lowtemp=0;/uchar p=0;/uchar aa2;uint tvalue;/温度值uchar tflag;/温度正负标志/*lcd1602程序*/void delay1ms(uint ms)/延时1毫秒uint i,j;for(i=0;ims;i+)for(j=0;

12、j114;j+); void delay1s(uint s)uint i;for(i=0;i0;i-) DQ = 0; /给脉冲信号 dat=1; DQ = 1; /给脉冲信号 if(DQ) dat|=0x80; delay_18B20(10); return(dat);void ds1820wr(uchar wdata)/*写数据*/uchar i=0;for (i=8; i0; i-) DQ = 0;DQ = wdata&0x01;delay_18B20(10);DQ = 1;wdata=1; read_temp()/*读取温度值并转换*/uchar a,b;ds1820rst(); ds

13、1820wr(0xcc);/*跳过读序列号*/ds1820wr(0x44);/*启动温度转换*/ds1820rst(); ds1820wr(0xcc);/*跳过读序列号*/ds1820wr(0xbe);/*读取温度*/a=ds1820rd();b=ds1820rd();tvalue=b;tvalue=8;tvalue=tvalue|a;if(tvalue0x0fff)tflag=0;elsetvalue=tvalue+1;tflag=1; tvalue=tvalue*(0.625);/温度值扩大10倍，精确到1位小数return(tvalue);void ds1820disp()/温度值显示

14、uchar flagdat;disdata0=tvalue/1000+0x30;/百位数disdata1=tvalue%1000/100+0x30;/十位数disdata2=tvalue%100/10+0x30;/个位数disdata3=tvalue%10+0x30;/小数位if(tflag=0)flagdat=0x20;/正温度不显示符号elseflagdat=0x2d;/负温度显示负号:-if(disdata0=0x30)disdata0=0x20;/如果百位为0，不显示if(disdata1=0x30)disdata1=0x20;/如果百位为0，十位为0也不显示wr_com(0xc0+4);wr_dat(flagdat);/显示符号位wr_com(0xc1+4);wr_dat(disdata0);/显示百位wr_com(0xc2