标题:
单片机1602LCD随机模拟显示乘法口诀的proteus仿真
[打印本页]
作者:
htls813073453
时间:
2017-5-14 22:13
标题:
单片机1602LCD随机模拟显示乘法口诀的proteus仿真
单片机控制1602显示乘法口诀
仿真图(proteus仿真工程文件可到本帖附件中下载):
0.png
(29 KB, 下载次数: 93)
下载附件
2017-5-15 03:15 上传
0.png
(78.24 KB, 下载次数: 84)
下载附件
2017-5-15 03:15 上传
单片机源程序如下:
#include <REGX52.H>
#include <INTRINS.H>
unsigned int x,y,z;
void delay1ms(unsigned char xms)
{
unsigned char i,j;
for(i=xms;i>0;i--)
for(j=110;j>0;j--);
}
/***************液晶显示模块*****************/
sbit RS=P2^0;
sbit RW=P2^1;
sbit E=P2^2;
sbit key=P1^4;
//sbit BF=P0^7;
/*液晶忙检测
bit BusyTest(void)
{
bit result;
RS=0;
RW=1;
E=1;
_nop_();
_nop_();
_nop_();
result=BF;
_nop_();
_nop_();
_nop_();
E=0;
return result;
}*/
/*写指令*/
void Write_com(unsigned char command)
{
// while(BusyTest()!=0);
RS=0;
RW=0;
E=0;
_nop_();
_nop_();
_nop_();
P0=command;
_nop_();
_nop_();
_nop_();
E=1;
_nop_();
_nop_();
_nop_();
E=0;
}
/*写地址*/
void Write_Address(unsigned char address)
{
Write_com(address);
delay1ms(1);
}
/*写数据*/
void Write_Date(unsigned char date)
{
RS=1;
RW=0;
E=0;
_nop_();
_nop_();
_nop_();
P0=date;
_nop_();
_nop_();
_nop_();
E=1;
_nop_();
_nop_();
_nop_();
E=0;
delay1ms(1);
}
/*初始化*/
void Lcd_Int(void)
{
Write_com(0x38);
delay1ms(1);
Write_com(0x38);
Write_com(0x38);
delay1ms(1);
delay1ms(1);
Write_com(0x06);
delay1ms(1);
Write_com(0x0c);
delay1ms(1);
Write_com(0x01);
}
void writelcd(unsigned char a,b,dat)
{
if(b==1)
{
Write_Address(0x80+a);
Write_Date(dat);
}
else
{
Write_Address(0xc0+a);
Write_Date(dat);
}
}
void main()
{
TMOD = 0x01;
TH0 = 0x0EC;
TL0 = 0x78;
EA = 1;
ET0 = 1;
TR0 = 0;
Lcd_Int();
while(1)
{
if(key==0)
{
delay1ms(10);
if(key==0)
{
TR0=1;
}
while(!key);
TR0=0;
}
z=x*y;
Write_Address(0x80);
if(x/10!=0)
Write_Date(0x30+x/10);
Write_Date(0x30+x%10);
Write_Date('*');
if(y/10!=0)
Write_Date(0x30+y/10);
Write_Date(0x30+y%10);
Write_Date('=');
if(z/1000!=0)
Write_Date(0x30+z/1000);
if(z/100%10!=0)
Write_Date(0x30+z/100%10);
if(z%100/10!=0)
Write_Date(0x30+z%100/10);
……………………
…………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码
所有资料51hei提供下载:
1602LCD随机模拟显示乘法口诀.zip
(48.67 KB, 下载次数: 48)
2017-5-14 22:12 上传
点击文件名下载附件
单片机驱动控制1602液晶显示乘法口诀
下载积分: 黑币 -5
作者:
1987889606
时间:
2018-6-25 18:17
为什么在显示器什么都没有显示出来
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1