»論壇 › 嵌入式/單片機論壇 › 24小時必答區 › 單片機電子跑表仿真圖缺程序

單片機電子跑表仿真圖缺程序

查看數: 2827 | 評論數: 4 | 收藏 0

關燈 | 提示：支持鍵盤翻頁<-左右->

帖子模式

A2102179814

發布時間: 2022-12-9 20:22

正文摘要:

回復

ID:213173 發表于 2022-12-19 08:21

來一個有程序有仿真的

6位百分秒表仿真.rar (128.37 KB, 下載次數: 3)

ID:883242 發表于 2022-12-18 21:43

$CODE
NEW$START: DO;
$INCLUDE(REG51.DCL)
DECLARE SEG$A LITERALLY '1';
DECLARE SEG$B LITERALLY '2';
DECLARE SEG$C LITERALLY '4';
DECLARE SEG$D LITERALLY '8';
DECLARE SEG$E LITERALLY '16';
DECLARE SEG$F LITERALLY '32';
DECLARE SEG$G LITERALLY '64';
DECLARE SEG$DP LITERALLY '128';
DECLARE SEGS(10) BYTE CONSTANT (
SEG$A+SEG$B+SEG$C+SEG$D+SEG$E+SEG$F,
SEG$B+SEG$C,
SEG$A+SEG$B+SEG$D+SEG$E+SEG$G,
SEG$A+SEG$B+SEG$C+SEG$D+SEG$G,
SEG$B+SEG$C+SEG$F+SEG$G,
SEG$A+SEG$C+SEG$D+SEG$F+SEG$G,
SEG$A+SEG$C+SEG$D+SEG$E+SEG$F+SEG$G,
SEG$A+SEG$B+SEG$C,
SEG$A+SEG$B+SEG$C+SEG$D+SEG$E+SEG$F+SEG$G,
SEG$A+SEG$B+SEG$C+SEG$D+SEG$F+SEG$G);
DECLARE COUNT BYTE,DECMS WORD, VALUE WORD,DISPLAYBUFFER(7) BYTE,DEBUT BIT;
DECLARE B0 BIT AT (90H) REGISTER,
B1 BIT AT (91H) REGISTER,
B2 BIT AT (92H) REGISTER,
B3 BIT AT (93H) REGISTER,
B4 BIT AT (94H) REGISTER,
B5 BIT AT (95H) REGISTER,
P32 BIT AT (0B2H) REGISTER,
P33 BIT AT (0B3H) REGISTER,
P34 BIT AT (0B4H) REGISTER,
P35 BIT AT (0B5H) REGISTER;
INT_T0: PROCEDURE INTERRUPT 1 USING 1;
TH0=HIGH(65535-19999);
TL0=LOW(65535-19999);
IF DEBUT THEN DECMS=DECMS+1;
COUNT=COUNT+1;
IF COUNT>7 THEN COUNT=0;
P1=0FFH;
DO CASE COUNT;
DO;
B0=0;
P0=DISPLAYBUFFER(5);
END;
DO;
B1=0;
P0=DISPLAYBUFFER(4);
END;
DO;
B2=0;
P0=DISPLAYBUFFER(3);
END;
DO;
B3=0;
P0=DISPLAYBUFFER(2);
END;
DO;
B4=0;
P0=DISPLAYBUFFER(1);
END;
DO;
B5=0;
P0=DISPLAYBUFFER(0);
END;
END;
RETURN;
END INT_T0;
MPROG: DO;
DECLARE I BYTE, TEMPORARY WORD;
VALUE=0;
DECMS=0;
IE=62H;
TMOD=1;
TH0=HIGH(65535-9999);
TL0=LOW(65535-9999);
TCON=10H;
ENABLE;
LOOP:
CALL TIME(250);
TEMPORARY=DECMS;
DO I=0 TO 5;
DISPLAYBUFFER(I)=SEGS(LOW(TEMPORARY MOD 10));
TEMPORARY=TEMPORARY/10;
END;
IF DEBUT THEN DISPLAYBUFFER(2)=DISPLAYBUFFER(2)+SEG$DP;
ELSE DISPLAYBUFFER(2)=DISPLAYBUFFER(2)AND 7FH;
IF NOT P32 THEN DEBUT=1;
IF NOT P33 THEN DEBUT=0;
IF NOT P35 THEN DECMS=0;
GOTO LOOP;
END MPROG;
END NEW$START;

復制代碼

我也是閑的，用1982年的PL/M-51寫了一遍，測試通過。

ID:155507 發表于 2022-12-18 17:20

51單片機電子跑表課程設計

http://m.raoushi.com/bbs/dpj-119818-1.html

#include <reg52.h>
#define uchar unsigned char
#define uint unsigned int
uchar code Tab0[]= //定義數碼管數組，沒有小數點
{
0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f
};
uchar code Tab1[]= //定義數碼管數組，有小數點
{
0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef
};
uchar miaobiao[80]; //定義存儲秒表數組
sbit K1=P3^2; //模式選擇鍵，本程序三種模式，分別是時間顯示、秒表、時間設置
sbit K2=P3^3; //設置時間時加一/開始（暫停）秒表按鍵
sbit K3=P3^4; //切換設置位/清零秒表按鍵
sbit K4=P3^5; //秒記錄
void Delay(uchar x); //延時函數
void Display0(); //時間顯示函數
void Display1(); //秒表顯示函數
void Display2(); //時間設置顯示函數
void Display3(); //保存的秒表顯示函數
void Init(); //中斷初始化函數
void Mode_K1(); //模式切換函數
void KEY_MiaoBiao(); //檢測秒表操作按鍵
void KEY_Time_Set(); //檢測時間設置按鍵
void KEY_MiaoBiao_keep(); //檢測秒表記錄顯示按鍵操作
uchar Hours=12,Minutes=00,seconds=00; //分別定義三個變量表示時、分、秒
uchar Time0_bit=0; //用于定時器0的溢出標志
bit Set_Time=0; //設置時閃爍時長的標志位
bit Set0=0; //設置時間標志，確定是設置‘分’還設置‘時’
uchar K1_bit=0,m=0; //用于模式切換的標志
uchar Miao_Biao0,Miao_Biao1,Miao_Biao2,Miao_Biao3,Miao_Biao4; //用于秒表的變量
uchar Miao_Biao11,Miao_Biao22,Miao_Biao33,Miao_Biao44; //用于保存秒表顯示時的變量
void main()
{
Init(); //中斷初始化
while(1) //死循環
{
Mode_K1(); //模式掃描
switch(K1_bit) //模式選擇
{
case 0:
{
Display0(); //顯示時間
break;
}
case 1:
{
Display1(); //顯示秒表
KEY_MiaoBiao(); //掃描秒表操作
break;
}
case 2:
{
Display2(); //設置時間時的顯示程序，可閃爍定位
KEY_Time_Set(); //掃描按鍵
break;
}
case 3:
{
Display3(); //顯示秒表
KEY_MiaoBiao_keep(); //掃描秒表操作
break;
}
}
}
}
void KEY_Time_Set() //設置時間時的按鍵掃描函數
{
if(K1_bit==2) //判斷是否為時間設置模式
{
if(K2==0) //K2有按下（下同）
{
Delay(10); //延時消抖（下同）
if(K2==0) //再次檢測是否為誤按
{
if(Set0==0) //檢測是設置‘時’還是分，Set0為0時設置‘分’，Set0為1時設置‘時’
{
Minutes++; //‘分’加1
if(Minutes==60) //當'分'加到60時，重新賦值0
Minutes=0;
}
else
{
Hours++; //‘時’加1
if(Hours==24) //當'時'加到24時，重新賦值0
Hours=0;
}
while(!K2);//按鍵松開檢測，消除松開按鍵時的抖動干擾
}
}
if(K3==0)
{
Delay(10);
if(K3==0)
{
Set0=~Set0; //K3每按一次Set0取反，時分切換，Set0為0時設置‘分’，Set0為1時設置‘時’
while(!K3);
}
}
}
}
void KEY_MiaoBiao() //檢測秒表按鍵操作
{
if(K1_bit==1) //判斷是否為秒表模式
{
if(K2==0)
{
Delay(10);
if(K2==0)
{
TR1=~TR1; //K2每按一次TR1取反，0暫停或1開始定時器1，達到暫停或開始秒表的目的
while(!K2);
}
}
if(K4==0) //當K4按下時秒表記錄一組數據
{
Delay(10);
if(K4==0)
{
miaobiao[4*m]=Miao_Biao1;
miaobiao[4*m+1]=Miao_Biao2;
miaobiao[4*m+2]=Miao_Biao3;
miaobiao[4*m+3]=Miao_Biao4;
m++;
while(!K4);
}
}
if(K3==0)
{
Delay(10);
if(K3==0) //當K3按下時秒表所有數據清零，并停止定時器1
{
uchar i;
for(i=0;i<81;i++)
{
miaobiao[i]=0; //清除所有秒記錄數據
}
TR1=0; //停止定時器1
Miao_Biao0=0; //清零數據
Miao_Biao1=0;
Miao_Biao2=0;
Miao_Biao3=0;
Miao_Biao4=0;
m=0; //秒表記錄清零
while(!K3);
}
}
}
}
void KEY_MiaoBiao_keep() //檢測秒表記錄顯示按鍵操作
{
if(K1_bit==3) //判斷是否為秒表記錄顯示模式
{
if(K2==0)
{
Delay(10);
if(K2==0)
{
m++;
while(!K2);
}
}
Miao_Biao11=miaobiao[4*m];
Miao_Biao22=miaobiao[4*m+1];
Miao_Biao33=miaobiao[4*m+2];
Miao_Biao44=miaobiao[4*m+3];
if(K3==0)
{
Delay(10);
if(K3==0) //當K3按下時秒表所有數據清零，并停止定時器1
{
uchar i;
for(i=0;i<81;i++)
{
miaobiao[i]=0; //清除所有秒記錄數據
}
while(!K3);
}
}
}
}
void Mode_K1() //模式選擇鍵，本程序三種模式，分別是時間顯示、秒表、時間設置
{
if(K1==0)
{
Delay(10);
if(K1==0)
{
K1_bit++;
// if(K1_bit==1) m=0;
if(K1_bit==3) m=0;
if(K1_bit==4)
{
K1_bit=0;
}
while(!K1);
/***********************************************************************
*************當K1_bit為0時顯示時鐘，為1時進入秒表，*********************
*******************為2時進入時間設置模式，3時進入秒表記錄顯示***********
***********************************************************************/
}
}
}
void Time1() interrupt 3 //定時器1函數
{
TH1=(65536-50000)/256; //重裝初值
TL1=(65536-50000)%256;
Miao_Biao0++;
if(Miao_Biao0==2) //以下為秒表數據處理，每兩次循環進行一次操作
{
Miao_Biao0=0;
Miao_Biao1++; //Miao_Biao1每加1次為100ms
if(Miao_Biao1==10)
{
Miao_Biao1=0;
Miao_Biao2++;
if(Miao_Biao2==60)
{
Miao_Biao2=0;
Miao_Biao3++;
if(Miao_Biao3==60)
{
Miao_Biao3=0;
Miao_Biao4++;
if(Miao_Biao4==10)
Miao_Biao4=0;
}
}
}
}
}
void Time0() interrupt 1 //定時器0函數
{
TH0=(65536-50000)/256; //重裝初值
TL0=(65536-50000)%256;
Time0_bit++;
if((Time0_bit%10)==0) //每溢出10次Time0_bit取反一次
Set_Time=~Set_Time; //0.5秒閃爍一次
if(Time0_bit==20) //以下為時間數據處理
{
Time0_bit=0;
seconds++;
if(seconds==60)
{
seconds=0;
Minutes++;
if(Minutes==60)
{
Minutes=0;
Hours++;
if(Hours==24)
{
Hours=0;
}
}
}
}
}
void Init() //中斷初始化函數
{
EA=1; //開總中斷
TMOD=0X11; //定時器工作方式選擇，定時器0和定時器1都選擇第1種工作方式
TH0=(65536-50000)/256; //定時器0裝初值，定時50ms
TL0=(65536-50000)%256;
ET0=1; //開定時器0開關
TR0=1; //開定時器0小開關
TH1=(65536-50000)/256; //定時器1裝初值，定時50ms
TL1=(65536-50000)%256;
ET1=1; //開定時器1開關
TR1=0; //關定時器1小開關
}
void Display3() //顯示保存的秒表
{
P0=Tab0[Miao_Biao11%10]; //顯示1/10秒的個位
P1=0xdf; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao22%10]; //顯示秒的個位，需要加上小數點做分隔符
P1=0xef; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Miao_Biao22/10]; //顯示秒的十位
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao33%10]; //顯示分的個位，需要加上小數點做分隔符
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Miao_Biao33/10]; //顯示分的十位
P1=0xfd; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao44%10]; //顯示時的個位，需要加上小數點做分隔符
P1=0xfe; //段選
Delay(10); //延時
P0=0X00; //消隱
}
void Display2() //時間設置時的顯示函數
{
if(Set0==0) //判斷是否為設置‘時’還是‘分’
{
P0=Tab0[seconds%10]; //顯示秒的個位
P1=0xdf; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[seconds/10]; //顯示秒的十位
P1=0xef; //段選
Delay(10); //延時
P0=0X00; //消隱
if(Set_Time) //這個if語句實現分鐘以0.5秒的頻率閃爍
{
P0=Tab1[Minutes%10]; //顯示分的個位，需要加上小數點做分隔符
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Minutes/10]; //顯示分的十位
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
}
else
{
P0=0x00; //顯示分的個位，需要加上小數點做分隔符
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=0x00; //顯示分的十位
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
}
P0=Tab1[Hours%10]; //顯示時的個位，需要加上小數點做分隔符
P1=0xfd; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Hours/10]; //顯示時的十位
P1=0xfe; //段選
Delay(10); //延時
P0=0X00; //消隱
}
else //‘時’鐘閃爍
{
P0=Tab0[seconds%10]; //顯示秒的個位
P1=0xdf; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[seconds/10]; //顯示秒的十位
P1=0xef; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Minutes%10]; //顯示分的個位，需要加上小數點做分隔符
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Minutes/10]; //顯示分的十位
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
if(Set_Time) //這個if語句實現‘時’鐘以0.5秒的頻率閃爍
{
P0=Tab1[Hours%10]; //顯示時的個位，需要加上小數點做分隔符
P1=0xfd; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Hours/10]; //顯示時的十位
P1=0xfe; //段選
Delay(10); //延時
P0=0X00; //消隱
}
else
{
P0=0x00; //顯示時的個位，需要加上小數點做分隔符
P1=0xFF; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=0X00; //顯示時的十位
P1=0xFF; //段選
Delay(10); //延時
P0=0X00; //消隱
}
}
}
void Display1() //顯示秒表
{
P0=Tab0[Miao_Biao1%10]; //顯示1/10秒的個位
P1=0xdf; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao2%10]; //顯示秒的個位，需要加上小數點做分隔符
P1=0xef; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Miao_Biao2/10]; //顯示秒的十位
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao3%10]; //顯示分的個位，需要加上小數點做分隔符
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Miao_Biao3/10]; //顯示分的十位
P1=0xfd; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Miao_Biao4%10]; //顯示時的個位，需要加上小數點做分隔符
P1=0xfe; //段選
Delay(10); //延時
P0=0X00; //消隱
}
void Display0() //顯示時鐘
{
P0=Tab0[seconds%10]; //顯示秒的個位
P1=0xdf; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[seconds/10]; //顯示秒的十位
P1=0xef; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Minutes%10]; //顯示分的個位，需要加上小數點做分隔符
P1=0xf7; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Minutes/10]; //顯示分的十位
P1=0xfb; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab1[Hours%10]; //顯示時的個位，需要加上小數點做分隔符
P1=0xfd; //段選
Delay(10); //延時
P0=0X00; //消隱
P0=Tab0[Hours/10]; //顯示時的十位
P1=0xfe; //段選
Delay(10); //延時
P0=0X00; //消隱
}
void Delay(uchar x) //延時
{
uchar i,j;
for(i=x;i>0;i--)
for(j=110;j>0;j--);
}

復制代碼

ID:476772 發表于 2022-12-18 13:50

這個要根據實際需求編寫程序，編譯后的HEX文件加載到單片機中。

帳號		自動登錄	找回密碼
密碼			立即注冊

欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

單片機電子跑表 仿真圖 缺程序

正文摘要:

回復

單片機電子跑表仿真圖缺程序