138点阵.c

51单片机控制138与595移动显示程序

#include<reg52.h>
#define uchar unsigned char
#define addbype 24 //加字
#define addcl   2  //加时间
sbit clk=P3^1;
sbit rd=P3^0;
sbit p=P1^5;
sbit p13=P1^3;
uchar code str[]=

{0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,

 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,

 0xF7,0xF7,0xF7,0xF7,0xF6,0xF1,0xF7,0x00,0xF5,0xF6,0xF7,0xF7,0xF6,0xF5,0xF3,0xF7,
0xFF,0xEF,0xDF,0xBF,0x7F,0xFF,0xFF,0x01,0xFF,0xFF,0x7F,0xBF,0xCF,0xE3,0xF7,0xFF,/*"长",0*/

0xFE,0xFE,0xC0,0xFE,0xE0,0xFD,0x00,0xFB,0xF7,0xC0,0x37,0xF0,0xF7,0xF7,0xF0,0xFF,
0xFF,0xFF,0x03,0xFF,0x07,0xFF,0x01,0xDF,0xE7,0x11,0xDB,0x1F,0xDF,0xDF,0x1F,0xFF,/*"春",1*/

0xFF,0xC0,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0xFF,0xFF,
0xFF,0x03,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x01,0xFF,0xFF,/*"工",2*/

0xFB,0xFB,0xFB,0xFB,0xBB,0xDB,0xDB,0xEB,0xE3,0xEB,0xFB,0xFB,0xFB,0x00,0xFF,0xFF,
0xBF,0xBF,0xBF,0xBB,0xB9,0xB3,0xB7,0xAF,0xAF,0x9F,0xBF,0xBF,0xBB,0x01,0xFF,0xFF,/*"业",3*/

0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0xFE,0xFD,0xFD,0xFD,0xFB,0xFB,0xF7,0xEF,0xDF,0xBF,
0xFF,0xFF,0xFF,0xFF,0xFF,0x01,0xFF,0x7F,0x7F,0xBF,0xBF,0xDF,0xEF,0xE7,0xF1,0xFB,/*"大",4*/

0xFE,0xEF,0xF3,0xF7,0x80,0xBF,0x70,0xFF,0xFF,0x80,0xFF,0xFF,0xFF,0xFF,0xFD,0xFE,
0xF7,0x73,0x37,0x6F,0x01,0xFB,0x17,0xBF,0x7F,0x01,0x7F,0x7F,0x7F,0x7F,0x7F,0xFF, /*"学",5*/

0xBF,0xDF,0xCF,0xDF,0xFF,0x0C,0xEF,0xEF,0xEF,0xEF,0xEF,0xED,0xEB,0xE7,0xEF,0xFF,
0xDF,0xDF,0xDF,0xDF,0xDF,0x01,0xDF,0xDF,0xDF,0xDF,0xDF,0xDF,0xDF,0xDF,0xDF,0xDF,/*"计",0*/

0xBF,0x81,0xB7,0x40,0xDF,0xC0,0xDF,0xC0,0xDF,0xC0,0xF7,0x00,0xF7,0xEF,0xEF,0xDF,
0xBF,0x81,0x6F,0x07,0xEF,0x0F,0xEF,0x0F,0xEF,0x0F,0xBF,0x01,0xBF,0xBF,0xBF,0xBF,/*"算",1*/

0xEF,0xEF,0xEF,0x01,0xEF,0xEF,0xC7,0xCB,0xAB,0xAF,0x6E,0xEE,0xED,0xED,0xEB,0xEF,
0xFF,0x07,0x77,0x77,0x77,0x77,0x77,0x77,0x77,0x77,0xF7,0xF5,0xF5,0xF5,0xF9,0xFF,/*"机",2*/

0xF9,0x87,0xF7,0xF7,0x01,0xE7,0xE3,0xD5,0xD7,0xB7,0x74,0xF7,0xF7,0xF7,0xF7,0xF7,
0xF7,0x77,0xB7,0xB7,0xF7,0x77,0xB7,0xB7,0xF1,0x87,0x77,0xF7,0xF7,0xF7,0xF7,0xF7,/*"科",3*/

0xFE,0xEF,0xF3,0xF7,0x80,0xBF,0x70,0xFF,0xFF,0x80,0xFF,0xFF,0xFF,0xFF,0xFD,0xFE,
0xF7,0x73,0x37,0x6F,0x01,0xFB,0x17,0xBF,0x7F,0x01,0x7F,0x7F,0x7F,0x7F,0x7F,0xFF,/*"学",4*/

0xFF,0xF7,0xF7,0xF0,0xF7,0xF7,0xF0,0xFF,0xFF,0xFF,0x80,0xFF,0xFF,0xFF,0xFF,0xFF,
0xFF,0xFF,0xFB,0x01,0xFF,0xFF,0x03,0xFB,0xFB,0xDB,0x0B,0xFB,0xFB,0xB7,0xCF,0xFF,/*"与",5*/

0xFF,0xC0,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0xFF,0xFF,
0xFF,0x03,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x01,0xFF,0xFF,/*"工",6*/

0xF2,0x8E,0xEE,0xEE,0x02,0xEE,0xCF,0xC4,0xAB,0xAF,0x6C,0xEF,0xEF,0xEF,0xE8,0xEF,
0x07,0xF7,0xF7,0xF7,0xF7,0x07,0xFF,0x03,0xBF,0xBF,0x03,0xBF,0xBF,0xBF,0x01,0xFF,/*"程",7*/

0xFE,0xEF,0xF3,0xF7,0x80,0xBF,0x70,0xFF,0xFF,0x80,0xFF,0xFF,0xFF,0xFF,0xFD,0xFE,
0xF7,0x73,0x37,0x6F,0x01,0xFB,0x17,0xBF,0x7F,0x01,0x7F,0x7F,0x7F,0x7F,0x7F,0xFF,/*"学",8*/

0xFF,0x07,0x70,0x6B,0x5F,0x5C,0x6F,0x77,0x70,0x56,0x6E,0x7E,0x7D,0x7D,0x7B,0x77,
0x7F,0xBF,0x01,0xFB,0xFF,0x07,0xFF,0xFF,0x01,0xDF,0xDF,0xDF,0xDD,0xDD,0xDD,0xE1,/*"院",9*/
0xFE,0xFE,0xFE,0xC0,0xDE,0xDE,0xC0,0xDE,0xDE,0xDE,0xC0,0xDE,0xFE,0xFE,0xFF,0xFF,
0xFF,0xFF,0xFF,0x07,0xF7,0xF7,0x07,0xF7,0xF7,0xF7,0x07,0xF7,0xFD,0xFD,0x01,0xFF,/*"电",0*/

0xFF,0xC0,0xFF,0xFF,0xFF,0xFE,0xFE,0xFE,0x00,0xFE,0xFE,0xFE,0xFE,0xFE,0xFA,0xFD,
0xFF,0x0F,0xDF,0xBF,0x7F,0xFF,0xFF,0xFB,0x01,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,/*"子",1*/

0xF7,0xF3,0xE7,0xE8,0xCF,0xCC,0xAF,0x6C,0xEF,0xEC,0xED,0xED,0xED,0xEC,0xED,0xFF,
0x7F,0x9F,0xBF,0x01,0xFF,0x07,0xFF,0x07,0xFF,0x07,0xF7,0xF7,0xF7,0x07,0xF7,0xFF,/*"信",2*/

0xFE,0xFD,0xE0,0xEF,0xE0,0xEF,0xE0,0xEF,0xE0,0xFF,0xF6,0xD7,0xD7,0x97,0xF8,0xFF,
0xFF,0xFF,0x0F,0xEF,0x0F,0xEF,0x0F,0xEF,0x0F,0xFF,0xFF,0x7B,0x6D,0xED,0x0F,0xFF,/*"息",3*/

0xFF,0xC0,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0x00,0xFF,0xFF,
0xFF,0x03,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0x01,0xFF,0xFF,/*"工",4*/

0xF2,0x8E,0xEE,0xEE,0x02,0xEE,0xCF,0xC4,0xAB,0xAF,0x6C,0xEF,0xEF,0xEF,0xE8,0xEF,
0x07,0xF7,0xF7,0xF7,0xF7,0x07,0xFF,0x03,0xBF,0xBF,0x03,0xBF,0xBF,0xBF,0x01,0xFF,/*"程",5*/

0xFE,0xFE,0xC0,0xFD,0xFD,0x00,0xFB,0xF7,0xF0,0xFF,0xFF,0xFD,0xFE,0xFF,0xFF,0xFF,
0xFF,0xFF,0x07,0xFF,0xFF,0x01,0xFF,0xDF,0x0F,0xDF,0xBF,0x7F,0xFF,0x7F,0xBF,0xFF,/*"专",6*/

0xFB,0xFB,0xFB,0xFB,0xBB,0xDB,0xDB,0xEB,0xE3,0xEB,0xFB,0xFB,0xFB,0x00,0xFF,0xFF,
0xBF,0xBF,0xBF,0xBB,0xB9,0xB3,0xB7,0xAF,0xAF,0x9F,0xBF,0xBF,0xBB,0x01,0xFF,0xFF,/*"业",7*/

};



char w=8;
uchar cnt,y=1;
init();     //初始化
put_data();
main()
{
init();
while(1)put_data();
}
init(){
TMOD=0x01;
TH0=0x3c;
TL0=0xb0;
EA=1;
ET0=1;
TR0=1;
SCON=0x00;
}
put_data(){
uchar k,j;
unsigned int i;
for(k=0;k<16;k++)
 {
 ET0=0;

 rd=1;
 i=48+16*y+k;
 for(;i>=16*y;i-=16)
 {
 SBUF=str[i];
 while(!TI) ;
 TI=0;
 }
 for(j=0;j<w;j++)
  {
  rd=(str[i]>>j)&0x01;
  clk=0;
  clk=1;
  }
 P1=k;
 p13=~p13;
 p=0;
 p=1;
 }
 ET0=1;
}
 void timer(void) interrupt 1
 {
TH0=0x3c;
TL0=0xb0;
if(++cnt==addcl){
cnt=0;
w--;
if(w<=0){
w=8;
y++;
if(y>addbype*2)y=1;
  }
  }
  }