仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）
單片機源程序如下:
/********************************************************************
*********************************************************************/
#include<reg52.h> //庫文件
#define uchar unsigned char//宏定義無符號字符型
#define uint unsigned int //宏定義無符號整型
/********************************************************************
初始定義
*********************************************************************/
unsigned char code seg7code[16]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e };
unsigned char k;
uchar jiange=2; //間隔時間
uchar chixu=1; //持續時間
/********************************************************************
延時函數
*********************************************************************/
void delay10ms(void) //延時程序
{
unsigned char i,j;
for(i=20;i>0;i--)
for(j=248;j>0;j--);
}
/********************************************************************
鍵盤函數
*********************************************************************/
void Getch ( ) //取鍵值函數
{
unsigned char X,Y,Z;
P1=0x0f; //先對P3 置數 行掃描
if(P1!=0x0f) //判斷是否有鍵按下
{
delay10ms(); //延時,軟件去干擾
if(P1!=0x0f) //確認按鍵按下
{
X=P1; //保存行掃描時有鍵按下時狀態
P1=0xf0; //列掃描
Y=P1; //保存列掃描時有鍵按下時狀態
Z=X|Y; //取出鍵值
/*********************************************************************/
switch ( Z ) //判斷鍵值（那一個鍵按下）
{
case 0xee: k=0; break; //對鍵值賦值
case 0xed: k=1; break;
case 0xeb: k=2; break;
case 0xe7: k=3; break;
case 0xde: k=4; break;
case 0xdd: k=5; break;
case 0xdb: k=6; break;
case 0xd7: k=7; break;
case 0xbe: k=8; break;
case 0xbd: k=9; break;
case 0xbb: k=10;break;
case 0xb7: k=11;break;
case 0x7e: k=12;break;
case 0x7d: k=13;break;
case 0x7b: k=14;break;
case 0x77: k=15;break;
}
}
}
}
/**********************T0中斷服務程序*******************/
void timer0(void)interrupt 1 using 1
{
static uint count=0;
static uint state=0;
static uchar i=0;
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
count++;
if(count <200) //10s
{
P2=0x00;
P3=0x00;
}
else if(count==200)
{
P2=0xFF;
P3=0xFF;
}
else if(count<200+180*jiange)
{
if(count %(20*jiange) ==0)
{
state=count;
P2=(0xFF)^(1<<i);
i++;
if(i==8) i=0;
}
else if(state+20*chixu==count)
{
P2=(0xFF);
state=0;
}
}
else if(count<200+180*jiange+100)
{
P2=0xFF;
P3=0xF0;
}
else
{
count=0;
}
}
/********************************************************************
主函數
*********************************************************************/
void main(void)
{
uchar key=0;
TMOD=0x01;//定時器工作方式1
TH0=(65536-50000)/256;//定時器附初值
TL0=(65536-50000)%256;
EA=1; //開全局中斷
ET0=1;//開定時器中斷
TR0=1;//啟動定時
while(1)
{
Getch(); //調用取鍵值函數
if((k<8)&&(k>0)) //矩陣鍵盤前兩行修改持續時間
{
chixu=k;
}
else if(k>=8) //矩陣鍵盤后兩行修改間隔時間
{
jiange=k-7;
}
}
}
/********************************************************************
結束
*********************************************************************/
全部資料51hei下載地址：
噴泉燈.rar
(67.92 KB, 下載次數: 23)
2020-6-12 13:00 上傳
點擊文件名下載附件
|
