点阵程序--自己写的.doc

。硬件简单介绍一下：行驱动用154四线译码器加8550驱动，列用74hc595移位寄存器驱动。#include#define uchar unsigned char#define uint unsigned int#define LINE P2/定义行线IO口，即74HC154控制端#define shudu 12/字移动的速度sbit DATA=P12;/74HC595数据端sbit CLK=P10;/74HC595移位脉冲端sbit CLKR=P11;/74HC595数据锁存端uchar move;/移动几位变量uchar line;/行变量uint word;/字节变量uchar ji,gai;/字节变量uchar BUF4;/4组缓存数组以便左移右移等功能动态更改数据uchar code table=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:笨 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x08,0x7F,0xFC,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x08,0x3F,0xFC,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x04,0xFF,0xFE,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;/*下拉、下移数组*/uchar code table1=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:蛋 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x80,0x78,0x80,0x4B,0xFC,0x48,0x40,0x48,0x48,0x48,0x30,0x78,0xD2,0x4B,0x0A,0x4F,0xF6,0x49,0x20,0x79,0x20,0x4A,0x20,0x02,0x22,0x04,0x22,0x08,0x1E,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,;uchar code table2=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:虫 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x80,0x00,0x40,0x78,0x40,0x17,0xFE,0x10,0x00,0x13,0xF8,0x7A,0x08,0x12,0x08,0x13,0xF8,0x10,0x40,0x12,0x50,0x1A,0x48,0x64,0x44,0x04,0x44,0x09,0x40,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table3=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:傻 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x09,0x00,0x09,0x80,0x11,0x04,0x13,0xFE,0x22,0x04,0x34,0x48,0x68,0x40,0xA2,0x50,0x23,0x48,0x22,0x48,0x24,0x44,0x24,0x46,0x28,0x44,0x21,0x40,0x20,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table4=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:瓜 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x10,0x20,0x08,0x28,0xFF,0x24,0x00,0x24,0x00,0x20,0x7F,0xFE,0x42,0x50,0x42,0x50,0x7E,0x50,0x08,0x50,0x2C,0x50,0x2A,0x90,0x4A,0x92,0x89,0x12,0x2A,0x0E,0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table5=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:琼 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x00,0x0F,0xF0,0x08,0x10,0x0F,0xF0,0x08,0x10,0x0F,0xF0,0x00,0x00,0xFF,0xFE,0x01,0x00,0x09,0x00,0x09,0xF8,0x09,0x00,0x15,0x00,0x23,0x00,0x40,0xFE,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table6=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:你 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x04,0x7F,0xFE,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table7=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字:是 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x01,0x00,0x01,0x00,0x02,0x80,0x02,0x40,0x04,0x20,0x09,0x18,0x11,0x0E,0x61,0x04,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table8=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字: 猪 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x08,0x40,0x88,0x44,0x53,0xF4,0x20,0x48,0x50,0x50,0x97,0xFE,0x08,0x40,0x18,0x80,0x29,0xFC,0x4B,0x04,0x8D,0x04,0x09,0xFC,0x09,0x04,0x11,0x04,0x51,0xFC,0x21,0x04,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table9=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字: 婆 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x40,0x40,0x23,0xFE,0x8A,0x44,0x4A,0x40,0x13,0xF8,0x15,0x10,0x64,0xA0,0x28,0x40,0x30,0xB0,0x25,0x0C,0x7F,0xFE,0x08,0x20,0x04,0x40,0x03,0x80,0x0C,0x60,0x70,0x1C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;uchar code table10=0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,/*- 文字: 啊 -*/*- 宋体12; 此字体下对应的点阵为：宽x高=16x16 -*/0x00,0x00,0xF7,0x7E,0x95,0x04,0x95,0x04,0x96,0x74,0x96,0x54,0x95,0x54,0x95,0x54,0x95,0x54,0xF5,0x54,0x97,0x74,0x04,0x04,0x04,0x04,0x04,0x04,0x04,0x14,0x04,0x08,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00;/*左覆盖数组*/uchar code table11=0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00,0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00;/*右覆盖数组*/uchar code table12=0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00,0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00;/*延时子程序*/void delay(uchar z) uchar x,y; for(x=2;x0;x-) for(y=z;y0;y-);/*74HC595送数子程序*/void song(uchar z)/带参数函数 uchar num,hang;/定义变量 hang=z;/将形参给变量 for(num=0;num=1;/将数移走一位 /*间断显示*/void jian() /字数要减半 while(word0;move-)/字间断显示的速度 ji=word; for(line=0;line16;line+) song(tableji*2+1);/先右半屏 song(tableji*2);/再左半屏 ji+;/下一行 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; LINE=line;/打开列 delay(17); word=ji; void shang() /字数减半 while(word0;move-) ji=word;/将变量存起来 for(line=0;line1) for(move=20;move0;move-) ji=word;/给倒数第2个字位置地址码给ji变量 for(line=0;line16;line+) song(table2ji*2+1);/发右半屏数注意这是数组1的代码 song(table2ji*2);/发左半屏数 ji+; CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; LINE=line; delay(5); word-=1;/数组数减1一行，形成下移 void yixian() uchar s; for(s=0;s2;s+) BUFs*2=table3word+(32*s)+(line*2);/左半屏代码，line表示行数，word表示字数 BUFs*2+1=table3word+(32*s+1)+(line*2);/右半屏代码 void yipai() uchar temp,yi; if(move8)/处理移动次数小于8次的部分 yi=move; temp=(BUF1(8-yi); song(temp);/发送给74HC595 temp=(BUF0(8-yi); song(temp);/发送给74HC595 else/处理移动次数小于8次以外的部分 yi=move-8; temp=(BUF2(8-yi);/原理同上 song(temp);/发送给74HC595 temp=(BUF1(8-yi);/原理同上 song(temp);/发送给74HC595 void zuo() uchar i; while(word64) for(move=0;move16;move+)/要移多少位？ for(i=0;ishudu;i+)/一字移动的速度 for(line=0;line16;line+)/扫描16次，即完成一个字的移动 yixian();/调用一线子程序 yipai();/调用数据转换子程序 LINE=line;/打开行线，即174HC154行线端 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; word=word+32;/一个字显示完了，就显示下一个字 void yixian1() uchar s; for(s=0;s2;s+) BUFs*2=table4word+(32*s)+(line*2);/左半屏代码，line表示行数，word表示字数 BUFs*2+1=table4word+(32*s+1)+(line*2);/右半屏代码 void yipai1() uchar temp,yi; if(move8)/处理移动次数小于8次的部分 yi=move;/小于8次就直接给移动的次数 temp=(BUF0yi); song(temp);/发送给74HC595 temp=(BUF3yi);/*将第2个字的右半屏数与第1个字左半屏的数左移8-yi次，然后或上右半屏的yi次数,注此句是处理左半屏的数*/ song(temp);/发送给74HC595 else/处理移动次数小于8次以外的部分 yi=move-8;/不小于8次就给move-8次给变量 temp=(BUF3yi);/*将第2个字的右半屏数左移8-yi次， 然后或上第1个字左半屏的yi次数,注此句是处理右半屏的数*/ song(temp);/发送给74HC595 temp=(BUF2yi);/*将第2个字的左半屏数左移8-yi次， 然后或上第2个字的右半屏的yi次数,注此句是处理左半屏的数*/ song(temp);/发送给74HC595 void you() uchar i; while(word64) for(move=0;move16;move+)/要移多少位？ for(i=0;ishudu;i+)/一字移动的速度 for(line=0;line16;line+)/扫描16次，即完成一个字的移动 yixian1();/调用一线子程序 yipai1();/调用数据转换子程序 LINE=line;/打开行线，即174HC154行线端 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; word=word+32;/一个字显示完了，就显示下一个字 void shang1()/快速上移完一个整体字 ji=word;/将变量给计数器 for(line=0;line16;line+)/循环16次得到一个整体字 song(table5ji*2+1);/先发右半屏数 song(table5ji*2);/再发左半屏数 ji+;/取下一行数 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; LINE=line;/打开行 delay(10); void shangla()/字数减半 uchar i; while(word32) for(i=0;i16;i+)/循环16次将一个字上移16次 shang1();/调用显示 word+=1; for(i=0;i150;i+)/上移完一个字后，停留一段时间，从而形成上拉 shang1(); void xia1() ji=word; for(line=0;line1) for(i=0;i16;i+)/将一个字下位16次 xia1();/调用显示子程序 word-=1;/下拉1位 for(i=0;i150;i+)/下拉16次后停下来 xia1();/调用显示 void yixian2() uchar s; for(s=0;s2;s+) BUFs*2=table7word+(32*s)+(line*2);/左半屏代码，line表示行数，word表示字数 BUFs*2+1=table7word+(32*s+1)+(line*2);/右半屏代码 void yipai2() uchar temp,yi; if(move8)/处理移动次数小于8次的部分 yi=move; temp=(BUF1(8-yi);/*将第1个字的右半屏数左移yi次， 然后或上第2个字左半屏的8-yi次数,注此句是处理右半屏的数*/ song(temp);/发送给74HC595 temp=(BUF0(8-yi);/*将第1个字的左半屏数左移yi次， 然后或上第1个字右半屏的8-yi次数,注此句是处理左半屏的数*/ song(temp);/发送给74HC595 else/处理移动次数小于8次以外的部分 yi=move-8; temp=(BUF2(8-yi);/原理同上 song(temp);/发送给74HC595 temp=(BUF1(8-yi);/原理同上 song(temp);/发送给74HC595 void zuo2() for(line=0;line16;line+)/扫描16次，即完成一个字的移动 yixian2();/调用一线子程序 yipai2();/调用数据转换子程序 LINE=line;/打开行线，即174HC154行线端 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; void zuola() uchar x; while(word64) for(move=0;move16;move+)/要移多少位？ zuo2(); for(x=0;x150;x+) zuo2(); word=word+32;/一个字显示完了，就显示下一个字 void yixian3() uchar s; for(s=0;s2;s+) BUFs*2=table8word+(32*s)+(line*2);/左半屏代码，line表示行数，word表示字数 BUFs*2+1=table8word+(32*s+1)+(line*2);/右半屏代码 void yipai3() uchar temp,yi; if(move8)/处理移动次数小于8次的部分 yi=move;/小于8次就直接给移动的次数 temp=(BUF0yi);/*将第1个字的左半屏数左移8-yi次， 然后或上右半屏的yi次数,注此句是处理右半屏的数*/ song(temp);/发送给74HC595 temp=(BUF3yi);/*将第2个字的右半屏数与第1个字左 半屏的数左移8-yi次，然后或上右半屏的yi次数,注此句是处理左半屏的数*/ song(temp);/发送给74HC595 else/处理移动次数小于8次以外的部分 yi=move-8;/不小于8次就给move-8次给变量 temp=(BUF3yi);/*将第2个字的右半屏数左移8-yi次， 然后或上第1个字左半屏的yi次数,注此句是处理右半屏的数*/ song(temp);/发送给74HC595 temp=(BUF2yi);/*将第2个字的左半屏数左移8-yi次， 然后或上第2个字的右半屏的yi次数,注此句是处理左半屏的数*/ song(temp);/发送给74HC595 void you3() for(line=0;line16;line+)/扫描16次，即完成一个字的移动 yixian3();/调用一线子程序 yipai3();/调用数据转换子程序 LINE=line;/打开行线，即174HC154行线端 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; void youla() uchar i; while(word64) for(move=0;move16;move+)/要移多少位？ you3(); for(i=0;i150;i+) you3(); word=word+32;/一个字显示完了，就显示下一个字 void yixian4() uchar s; for(s=0;s2;s+) BUFs*2=table9word+(32*s)+(line*2);/左半屏代码，line表示行数，word表示字数 BUFs*2+1=table9word+(32*s+1)+(line*2);/右半屏代码 void yipai4() uchar temp,yi; if(move8)/处理移动次数小于8次的部分 yi=move; temp=(BUF1);/发送左半屏的数，在移动右半屏时，左半屏不动 song(temp);/发送给74HC595 temp=(BUF2&gai)|(BUF0&gai); song(temp);/发送给74HC595 else/处理移动次数小于8次以外的部 yi=move-8; temp=(BUF3&gai)|(BUF1&gai);/*将第1个字的左半屏数第0列清0或上第二 个字左半屏最后1行*/ song(temp);/发送给74HC595 temp=BUF2;/发送右半屏的数，在移动左半屏时，右半屏不动 song(temp);/发送给74HC595 void fu4() uchar i; for(i=0;i2;i+)/一字移动的速 for(line=0;line16;line+)/扫描16次，即完成一个字的移动 yixian4();/调用一线子程序 yipai4();/调用数据转换子程序 LINE=line;/打开行线，即174HC154行线端 CLKR=1;/在74HC595处锁存起来 CLKR=0; CLKR=1; void zuofu() uchar o; while(word64) for(move=0;move16;move+)/移动16次，形成覆盖 gai=table11move;/移动一次改变一次覆盖变量 fu4();/调用覆盖子程序 for(o=0;o60;o+)/一字完后，停一段时间 f