keilc實驗作業——基于c51的點陣LED顯示實驗
標準答案分享
供實驗課同學下載
0.png (21.27 KB, 下載次數: 57)
下載附件
2017-1-6 00:37 上傳
單片機源程序：
- #include<reg51.h>
- #define uint unsigned int
- #define uchar unsigned char
- const uchar tab[][8]={
- 0x3c,0x66,0x6e,0x6e,0x76,0x76,0x66,0x3c,
- 0x18,0x78,0x18,0x18,0x18,0x18,0x18,0x7e,
- 0x3c,0x66,0x66,0x06,0x1c,0x30,0x66,0x7e,
- 0x3c,0x66,0x06,0x1c,0x06,0x66,0x66,0x3c,
- 0x1c,0x3c,0x6c,0xcc,0xcc,0xfe,0x0c,0x0c,
- 0x7e,0x60,0x7c,0x66,0x06,0x06,0x66,0x3c,
- 0x1c,0x30,0x60,0x7c,0x66,0x66,0x66,0x3c,
- 0x7e,0x66,0x06,0x0c,0x08,0x18,0x30,0x30,
- 0x3c,0x66,0x66,0x3c,0x66,0x66,0x66,0x3c,
- 0x3c,0x66,0x66,0x66,0x3e,0x06,0x0c,0x38,
- };
- void delay(uchar x)
- {
- uint i;
- while((x--)!=0)
- {
- for(i=0;i<125;i++)
- {;}
- }
- }
- void main(void)
- {
- uchar i,j,k,m,n,p,q;
- while(1)
- {
- for(j=0;j<10;j++)
- {
- for(q=0;q<8;q++)
- {
- for(k=0;k<15;k++)
- {
- m=0x80;
- for(i=0;i<15;i++)
- {
- P3=~m;
- n=tab[j][i];
- n=(n<<q);
- if(j==9)
- p=tab[0][i];
- else
- p=tab[j+1][i];
- p=(p>>8-q);
- n=n|p;
- P2=n;
- delay(1);
- m=(m>>1);
- }
- }
- }
-
- }
- }
- }
0.png (70.23 KB, 下載次數: 72)
下載附件
2017-1-6 00:37 上傳
所有資料下載：
實驗二-數字顯示.zip
(51.97 KB, 下載次數: 12)
2017-1-3 18:28 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
