標(biāo)題:
lcd1602顯示(時(shí)鐘)可調(diào)分鐘和小時(shí) 帶單片機(jī)源代碼與proteus
[打印本頁]
作者:
fangmojia
時(shí)間:
2017-6-6 10:18
標(biāo)題:
lcd1602顯示(時(shí)鐘)可調(diào)分鐘和小時(shí) 帶單片機(jī)源代碼與proteus
lcd顯示基礎(chǔ)代碼,用來顯示時(shí)鐘,可調(diào)分鐘和小時(shí)。
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載):
0.png
(34.7 KB, 下載次數(shù): 32)
下載附件
2017-6-6 18:09 上傳
0.png
(78.14 KB, 下載次數(shù): 42)
下載附件
2017-6-6 18:09 上傳
單片機(jī)源程序如下:
#include<reg51.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int
uchar msec=0,sec=0,min=0,hr=0;
sbit RS=P2^0;
sbit RW=P2^1;
sbit E =P2^2;
uchar code dis[] = {" Welcome to "};
//延時(shí)子程序
void delay(uchar ms)
{
uchar i;
while(ms--)
{
for(i=0;i<250;i++);
}
}
//測(cè)試LCD忙狀態(tài)
bit lcd_bz()
{
bit result;
E = 0;
RS = 0;
RW = 1;
P0 = 0xFF;
E = 1;
delay(1);
result = (bit)(P1&0x80);
E = 0;
return result;
}
//寫指令
void lcd_wcmd(uchar cmd)
{
E = 0;
RS = 0;
delay(1);
RW = 0;
delay(1);
P0 = cmd;
delay(1);
E = 1;
delay(1);
E = 0;
}
//設(shè)定顯示位置
lcd_pos(uchar pos)
{
lcd_wcmd(pos|0x80);
}
//寫入字符
void lcd_wdat(uchar dat)
{
E = 0;
RS = 1;
delay(1);
RW = 0;
delay(1);
P0 = dat;
delay(1);
E = 1;
delay(1);
E = 0;
}
//LCD初始化
lcd_init()
{
lcd_wcmd(0x38);// 模式設(shè)置
delay(1);
lcd_wcmd(0x0C);// 顯示設(shè)置
delay(1);
lcd_wcmd(0x06);// 顯示模式
delay(1);
lcd_wcmd(0x01);// 清屏
delay(1);
}
lcd_time(uchar t)
{
lcd_wdat(t/10+48);
lcd_wdat(t%10+48);
}
//主程序
void main(void)
{
uchar n;
lcd_init(); //初始化
IE = 0x87;
IP = 0x05;
TH0 = (65536-50000)/256;
TL0 = (65536-50000)%256;
TMOD = 0x01;
TCON = 0x15;
delay(5);
lcd_pos(0x00); //第一行顯示
n = 0;
while(dis[n]!='\0')
{
lcd_wdat(dis[n]);
n++;
}
while(1)
{
lcd_pos(0x44);
lcd_time(hr);
lcd_wdat(':');
lcd_time(min);
lcd_wdat(':');
lcd_time(sec);
}
}
//外部中斷0實(shí)現(xiàn)分鐘加1
void mplus() interrupt 0
{
min++;
if(min==60)
min = 0;
}
//外部中斷1實(shí)現(xiàn)小時(shí)加1
void hplus() interrupt 2
{
hr++;
if(hr==24)
hr = 0;
}
//定時(shí)中斷計(jì)時(shí)
void jishi() interrupt 1
{
TH0 = (65536-50000)/256;
TL0 = (65536-50000)%256;
msec++;
if(msec==20)
……………………
…………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼
所有資料51hei提供下載:
lcd顯示時(shí)鐘.rar
(59.63 KB, 下載次數(shù): 33)
2017-6-6 10:16 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1