QQ瀏覽器截圖20180811171234.png (120.25 KB, 下載次數(shù): 40)
下載附件
2018-8-11 17:14 上傳
QQ瀏覽器截圖20180811171124.png (120.2 KB, 下載次數(shù): 42)
下載附件
2018-8-11 17:14 上傳
單片機源程序如下:
- #include<reg51.h>
- #define uchar unsigned char
- sbit R=P2^0;
- sbit CLK=P2^1;
- sbit STB=P2^2;
- code uchar a[]={0x20,0x08,0x20,0x10,0x20,0x10,0x25,0xFF,0x24,0x40,0x24,0x42,0x24,0x44,0x24,0x28,
- 0x24,0x28,0x24,0x10,0x24,0x10,0x24,0x28,0x20,0x24,0x20,0x42,0x28,0x41,0x10,0x00};
- code uchar b[]={0x20,0x80,0x21,0xE0,0x20,0x3E,0x24,0x20,0x24,0x20,0x24,0x20,0x25,0xFF,0x24,0x30,
- 0x24,0x68,0x24,0xA8,0x25,0x24,0x24,0x24,0x20,0x22,0x20,0x21,0x28,0x20,0x10,0x20};
- code uchar c[]={0x00,0x00,0x00,0x07,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x02,0x42,0x7F,0x00,0x00,} ;
- code uchar d[]={0x66,0x66,0x99,0x99,0x81,0x81,0x81,0x81,0x42,0x42,0x24,0x24,0x18,0x18,0x00,0x00,
- 0x66,0x66,0x99,0x99,0x81,0x81,0x81,0x81,0x42,0x42,0x24,0x24,0x18,0x18,0x00,0x00};
- void delay(int z)
- {
- int x,y;
- for (x=0;x<z;x++)
- for(y=0;y<110;y++);
- }
- void WriteByte(uchar dat)
- {
- uchar i;
- for(i=0;i<8;i++)
- {
- dat=dat>>1;
- R=CY;
- CLK=0;
- CLK=1;
- }
- }
- void main()
- {
- int num,n=0,m=0,j;
- while(1)
- {
- for(j=20;j>0;j--)
- {
- for(num=0;num<16;num++)
- {
- WriteByte(a[num*2]);
- WriteByte(a[2*num+1]);
- P1=num;
- STB=1;
- STB=0;
- delay(2);
- }
- }
- for(j=20;j>0;j--)
- {
- for(num=0;num<16;num++)
- {
- WriteByte(b[num*2]);
- WriteByte(b[2*num+1]);
- P1=num;
- STB=1;
- STB=0;
- delay(2);
- }
- }
- for(j=20;j>0;j--)
- {
- for(num=0;num<16;num++)
- {
- WriteByte(c[num*2]);
- WriteByte(c[2*num+1]);
- P1=num;
- STB=1;
- STB=0;
- delay(2);
- }
- }
- }
- }
|
QQ好友和群
QQ空間
騰訊微博
騰訊朋友
收藏
淘帖
頂
踩
