|
|
仿真原理圖：http://www.zg4o1577.cn/bbs/dpj-101350-1.html
單片機(jī)源程序如下:
- #include"stc.h"
- #define uchar unsigned char
- unsigned long num;
- uchar j,k;
- uchar a0,b0,c0,d0,e0,f0,g0,h0;
- sbit dula=P2^6;
- sbit wela=P2^7;
- unsigned char code table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,
- 0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x00};
- void delay(uchar i)
- {
- for(j=i;j>0;j--)
- for(k=125;k>0;k--);
- }
- void display(uchar a,uchar b,uchar c,uchar d,uchar e,uchar f,uchar g,uchar h)
- {
- dula=0;
- P0=table[a];
- dula=1;
- dula=0;
-
- wela=0;
- P0=0xfe;
- wela=1;
- wela=0;
- delay(5);
-
- P0=table[b];
- dula=1;
- dula=0;
-
- P0=0xfd;
- wela=1;
- wela=0;
- delay(5);
- P0=table[c];
- dula=1;
- dula=0;
-
- P0=0xfb;
- wela=1;
- wela=0;
- delay(5);
-
- P0=table[d];
- dula=1;
- dula=0;
-
- P0=0xf7;
- wela=1;
- wela=0;
- delay(5);
-
- P0=table[e];
- dula=1;
- dula=0;
-
- P0=0xef;
- wela=1;
- wela=0;
- delay(5);
-
- P0=table[f];
- dula=1;
- dula=0;
-
- P0=0xdf;
- wela=1;
- wela=0;
- delay(5);
- P0=table[g];
- dula=1;
- dula=0;
-
- P0=0xbf;
- wela=1;
- wela=0;
- delay(5);
- P0=table[h];
- dula=1;
- dula=0;
-
- P0=0x7f;
- wela=1;
- wela=0;
- delay(5);
- }
- void main()
- {
- num=94556225;//這個(gè)是被顯示的整數(shù)，只要不超過(guò)六位，均可顯示出來(lái)。
- //同學(xué)們可以隨意更改這個(gè)num變量的值試驗(yàn)下。
- while(1)
- {
-
- if(num<10)
- {
- a0=num;b0=16;c0=16;d0=16;e0=16;f0=16;g0=16;h0=16;
- }
- else
- {
- if(num<100)
- {a0=num/10;b0=num%10;c0=16;d0=16;e0=16;f0=16;g0=16;h0=16;}
- else
- {
- if(num<1000)
- {a0=num/100;b0=num%100/10;c0=num%10;d0=16;e0=16;f0=16;g0=16;h0=16;}
- else
- {
- if(num<10000)
- {a0=num/1000;b0=num%1000/100;c0=num%100/10;d0=num%10;e0=16;f0=16;g0=16;h0=16;}
- else
- {
- if(num<100000)
- {a0=num/10000;b0=num%10000/1000;c0=num%1000/100;d0=num%100/10;e0=num%10;f0=16;g0=16;h0=16;}
- else
- {
- if(num<1000000)
- {a0=num/100000;b0=num%100000/10000;c0=num%10000/1000;d0=num%1000/100;e0=num%100/10;f0=num%10;g0=16;h0=16;}
- else
- ……………………
- …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
所有資料51hei提供下載:
數(shù)碼管顯示任一九位以下整數(shù).rar
(19.06 KB, 下載次數(shù): 11)
2017-12-11 22:14 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
