標(biāo)題:
單片機1602LCD隨機模擬顯示乘法口訣的proteus仿真
[打印本頁]
作者:
htls813073453
時間:
2017-5-14 22:13
標(biāo)題:
單片機1602LCD隨機模擬顯示乘法口訣的proteus仿真
單片機控制1602顯示乘法口訣
仿真圖(proteus仿真工程文件可到本帖附件中下載):
0.png
(29 KB, 下載次數(shù): 93)
下載附件
2017-5-15 03:15 上傳
0.png
(78.24 KB, 下載次數(shù): 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);
}
/*寫數(shù)據(jù)*/
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黑下載附件…………
復(fù)制代碼
所有資料51hei提供下載:
1602LCD隨機模擬顯示乘法口訣.zip
(48.67 KB, 下載次數(shù): 48)
2017-5-14 22:12 上傳
點擊文件名下載附件
單片機驅(qū)動控制1602液晶顯示乘法口訣
下載積分: 黑幣 -5
作者:
1987889606
時間:
2018-6-25 18:17
為什么在顯示器什么都沒有顯示出來
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1