LED点阵汉字显示移动程序

由程序看来p2口是用来控制点阵行扫描的，p1口负责送显示的数据

p2=0x01

//起始行高电平

for(i=0i<8i++)

//循环点亮8行，循环送8次数据

{

p1=tab[i]

delay(100)

//每行点亮时送上相应的显示数据（即tab[i]里的数据）

p2=p2<扒州源<1|p2>>7

//

点亮下一行

其实点阵显示就是：(针对16*16点阵显示一个汉字)

静止的春态显示就是扫第一行时送汉字的第一行，扫第二行时送汉字的第二行...扫第16行时送汉字的第16行，这叫第一帧扫完。如果想让字动那么扫第二帧时，行扫描第一行时，送汉字的第二行数据，行扫描第二行时，送汉字的第三行数据...就这样错开一行，再下一帧时再错开一行，直至错开迹简16次一个完整的字就上移至上面了。

总的说来就是一帧一帧的显示，每帧显示汉字的一个画面，重叠在一起就看见字在动了。

一．基于51的点阵屏显示：（1）点亮第一个8*8点阵:

1.首先在Proteus下选择我们需要的元件，AT89C51、74LS138、MATRIX-8*8-GREEN(在这里使用绿色的点阵)。在Proteus 6.9中8*8的点阵总共有四种颜色，分别为MATRIX-8*8-GREEN，MATRIX-8*8-BLUE，MATRIX-8*8-ORANGE ，MATRIX-8*8-RED。

在这里请牢记：红色的为上列选下行选；其它颜色的为上行选下列选！而所有的点阵都是高电平选中列，低电平选中行！也就是说如果某一个点所处的行信号为低，列信号为高，则该点被点亮！此结论是我们编程的基础。

2.在选择完以上三个元件后，我们开始布线，具体如下图：

这里P2是列选，P3连接38译码器后作为行选。

选择38译码器的原因：38译码器每次可输出相应一个I/O口的低电平，正好与点阵屏的低电平选中行相对，并且节省了I/O口，大大方便了我们的编程和以后的扩展。

3.下面让我们把它点亮，先看一个简单的程序：

（将奇数行偶数列的点点亮，效果如下图）

下面是源代码薯配裤：

/************8*8LED点阵屏显示*****************/

#include<reg51.h>

void delay(int z) //延时函数

{

int x,y

for(x=0x<zx++)

for(y=0y<110y++)

}

void main()

{

while(1)

{

P3=0 //行选，选择第一行

P2=0x55//列选，即该行显示的数据

delay(5) //延时

/*****下同*****/

P3=2//第三行

P2=0x55

delay(5)

P3=4//第五行

P2=0x55

delay(5)

P3=6 //第七行

P2=0x55

delay(5)

}

}

上面的程序实现了将此8*8点阵的奇数行偶数列的点点亮的功能。重点让我们看while循环内，首先是行选P3=0，此时38译码器的输入端为000，则输出端为01111111，即B0端为低电平，此时选中了点阵屏的第一行，接着列选我们给P2口赋0x55,即01010101，此时又选中了偶数列，紧接着延时。然后分别对第三、五、七行进行相同的列选。这样就点亮了此点阵屏奇数行偶数列交叉的点。

完成这个程序，我们会发现其实点阵屏的原理是如此简单，和数码管的动态显示非常相似，只不过换了一种方式而已。

对不起啦，我传了三次图片都没传上，郁闷哪！希望你能理解哈！数简 不过卖物我有传一份WORD文档在我的空间里面

点阵原理就是一个LED的两端都接IO，当正极为1，负极为0时点亮相应的LED。

下面是8×8的LED点阵程序，参考一下吧

#include<reg51.h>

#define uchar unsigned char

#define 弊枝扮uint unsigned 搭察int

uchar code TAB[]={

0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00,

0x00,0x82,0xFE,0x82,0x80,0xC0,0x00,0x00,

0x00,0x7C,0x82,0x82,0x82,0x7C,0x00,0x00,

0x02,0x0E,0x72,0x80,0x70,0x0E,0x02,0x00,

0x00,0x82,0xFE,0x92,0xBA,0x82,0xC6,0x00,

0X00,0X00,0X00,0X00,0X00,0X00,0X00,0X00

}

/*delay(uint t)

{

uint a,b

for(a=0a<ta++)

for(b=0b<110b++)

} */

void main(void)

{

uint i,j,xx

uchar bittemp=0x01

while(1)

{

for(i=0i<40i++)

{

for(xx=0xx<500xx++)

{

bittemp=0x80

for(j=0j<8j++)

{

P2=0x00 //消隐

P0= ~TAB[i+8-j]

P2 = bittemp

bittemp 租灶>>= 1

}

}

}

}

}

---