第一届51测试网有奖征文精彩回放，深圳学林电子版权所有 www.51c51.com  （专业51单片机学习网站）转载注明出处！

更多精彩稿件请访问论坛http://www.51c51.com/bbs/index.asp

8X8LED点阵屏循环显示0-----9和A-----Z

实验目的：用8X8LED点阵屏循环显示0-----9和A-----Z，并且让字符有上移、下移、跳变三种切换显示效果

实验器材：奇天板编程器，8X8LED点阵屏1块，NPN三极管8个

把奇天板上P1和P0口上相连的跳线拔下参照图示连接8X8LED点阵屏（实际只用了5X8点阵）和8只NPN三极管，点阵屏的阳极通过三极管连到P1口，阴极直接与P0口相接，注意顺序不要接错，否则代码表要重做。显示的缺点就是当同一行上的发光管都为显示状态时亮度会略低些。

org 0000h

  ljmp dbg

dbg: mov sp,#50h

     mov p0,#0ffh           ;P0置1

     mov p1,#00h           ;p1置0

     mov r4,#200            ;显示时间长度

a1:  mov r1,#11111110b       ；字符显示0 把阴极显示初值送R1

     mov dptr,#tab            ；阳极显示代码送指针

     mov r2,#00h            ；阳极显示代码从0开始

     mov r3,#08             ；总共显示8次完成一个字符

     lcall a2                 ；调显示

     djnz r4,a1               ；循环显示200次

     mov 60h,#00h           ；B1—A3为字符上移显示

     mov r0,#08

b1:  mov r4,#20

     mov r2,60h

     inc r2

     mov 60h,r2

b2:  mov r1,#0feh

     mov dptr,#tab

     mov r2,60h

     mov r3,#08

     lcall a2

     djnz r4,b2

     djnz r0,b1

     mov r4,#200

a3: mov r1,#11111110b      ；显示字符1

     mov dptr,#tab

     mov r2,#09

     mov r3,#08

     lcall a2

     djnz r4,a3

     mov 60h,#98

     mov r0,#08

c2:  mov r2,60h          ；C2---A5为字符下移显示

     dec r2

     mov 60h,r2

     mov r4,#20

c1:  mov r1,#0feh

     mov dptr,#tab

     mov r2,60h

     mov r3,#08

     lcall a2

     djnz r4,c1

     djnz r0,c2

     mov r4,#200

a5: mov r1,#11111110b  ；显示字符2

     mov dptr,#tab

     mov r2,#18

     mov r3,#08

     lcall a2

     djnz r4,a5

     mov r4,#200

a7: mov r1,#11111110b       ；显示字符3

     mov dptr,#tab

     mov r2,#27

     mov r3,#08

     lcall a2

     djnz r4,a7

     mov r4,#200

a9: mov r1,#11111110b      ；显示字符4

     mov dptr,#tab

     mov r2,#36

     mov r3,#08

      lcall a2

     djnz r4,a9

     mov r4,#250

a11: mov r1,#11111110b     ；显示字符5

     mov dptr,#tab

     mov r2,#45

     mov r3,#08

     lcall a2

     djnz r4,a11

     mov r4,#200

a13: mov r1,#11111110b   ；显示字符6

     mov dptr,#tab

     mov r2,#54

     mov r3,#08

     lcall a2

     djnz r4,a13

     mov r4,#200

a15: mov r1,#11111110b    ；显示字符7

     mov dptr,#tab

     mov r2,#63

     mov r3,#08

     lcall a2

     djnz r4,a15

     mov r4,#200

a17: mov r1,#11111110b    ；显示字符8

     mov dptr,#tab

     mov r2,#72

     mov r3,#08

     lcall a2

     djnz r4,a17

     mov r4,#200

a19: mov r1,#11111110b     ；显示字符9

     mov dptr,#tab

     mov r2,#81

     mov r3,#08

     lcall a2

     djnz r4,a19

     mov r4,#200

z1: mov r1,#11111110b     ；显示字符A

     mov dptr,#zm

     mov r2,#00h

     mov r3,#08

     lcall a2

     djnz r4,z1

     mov r4,#200

z2: mov r1,#11111110b    ；显示字符B

     mov dptr,#zm

     mov r2,#08

     mov r3,#08

     lcall a2

     djnz r4,z2

     mov r4,#200

z3: mov r1,#11111110b     ；显示字符C

     mov dptr,#zm

     mov r2,#16

     mov r3,#08

     lcall a2

     djnz r4,z3

     mov r4,#200

z4: mov r1,#11111110b    ；显示字符D

     mov dptr,#zm

     mov r2,#24

     mov r3,#08

     lcall a2

     djnz r4,z4

     mov r4,#200

z5: mov r1,#11111110b    ；显示字符E

     mov dptr,#zm

     mov r2,#32

     mov r3,#08

     lcall a2

     djnz r4,z5

     mov r4,#200

z6: mov r1,#11111110b    ；显示字符F

     mov dptr,#zm

     mov r2,#40

     mov r3,#08

     lcall a2

     djnz r4,z6

     mov r4,#200

z7: mov r1,#11111110b    ；显示字符G

     mov dptr,#zm

     mov r2,#48

     mov r3,#08

     lcall a2

     djnz r4,z7

     mov r4,#200

z8: mov r1,#11111110b     ；显示字符H

     mov dptr,#zm

     mov r2,#56

     mov r3,#08

     lcall a2

     djnz r4,z8

     mov r4,#200

z9: mov r1,#11111110b     ；显示字符I

     mov dptr,#zm

     mov r2,#64

     mov r3,#08

     lcall a2

     djnz r4,z9

     mov r4,#200

z10: mov r1,#11111110b    ；显示字符J

     mov dptr,#zm

     mov r2,#72

     mov r3,#08

     lcall a2

     djnz r4,z10

     mov r4,#200

z11: mov r1,#11111110b     ；显示字符K

     mov dptr,#zm

     mov r2,#80

     mov r3,#08

     lcall a2

     djnz r4,z11

     mov r4,#200

z12: mov r1,#11111110b     ；显示字符L

     mov dptr,#zm

     mov r2,#88

     mov r3,#08

     lcall a2

     djnz r4,z12

     mov r4,#200

z13: mov r1,#11111110b      ；显示字符M

     mov dptr,#zm

     mov r2,#96

     mov r3,#08

     lcall a2

     djnz r4,z13

     mov r4,#200

z14: mov r1,#11111110b       ；显示字符N   

     mov dptr,#zm

     mov r2,#104

     mov r3,#08

     lcall a2

     djnz r4,z14

     mov r4,#200

z15: mov r1,#11111110b      ；显示字符O

     mov dptr,#zm

     mov r2,#112

     mov r3,#08

     lcall a2

     djnz r4,z15

     mov r4,#200

z16: mov r1,#11111110b      ；显示字符P

     mov dptr,#zm

     mov r2,#120

     mov r3,#08

     lcall a2

     djnz r4,z16

     mov r4,#200

z17: mov r1,#11111110b       ；显示字符Q

     mov dptr,#zm

     mov r2,#128

     mov r3,#08

     lcall a2

     djnz r4,z17

     mov r4,#200

z18: mov r1,#11111110b      ；显示字符R

     mov dptr,#zm

     mov r2,#136

     mov r3,#08

     lcall a2

     djnz r4,z18

     mov r4,#200

z19: mov r1,#11111110b      ；显示字符S

     mov dptr,#zm

     mov r2,#144

     mov r3,#08

     lcall a2

     djnz r4,z19

     mov r4,#200

z20: mov r1,#11111110b      ；显示字符T

     mov dptr,#zm

     mov r2,#152

     mov r3,#08

     lcall a2

     djnz r4,z20

     mov r4,#200

z21: mov r1,#11111110b     ；显示字符U

     mov dptr,#zm

     mov r2,#160

     mov r3,#08

     lcall a2

     djnz r4,z21

     mov r4,#200

z22: mov r1,#11111110b     ；显示字符V

     mov dptr,#zm

     mov r2,#168

     mov r3,#08

     lcall a2

     djnz r4,z22

     mov r4,#200

z23: mov r1,#11111110b     ；显示字符W

     mov dptr,#zm

     mov r2,#176

     mov r3,#08

     lcall a2

     djnz r4,z23

     mov r4,#200

z24: mov r1,#11111110b   ；显示字符X 

     mov dptr,#zm

     mov r2,#184

     mov r3,#08

     lcall a2

     djnz r4,z24

     mov r4,#200

z25: mov r1,#11111110b     ；显示字符Y   

     mov dptr,#zm

     mov r2,#192

     mov r3,#08

     lcall a2

     djnz r4,z25

     mov r4,#200

z26: mov r1,#11111110b      ；显示字符Z

     mov dptr,#zm

     mov r2,#200

     mov r3,#08

     lcall a2

     djnz r4,z26

     ljmp dbg

del1ms: mov r7,#200       ； 延时子程序

     q1:mov r6,#2

     q2:djnz r6,q2

        djnz r7,q1

       ret

a2:  mov a,r2          ；显示子程序

     mov r2,a

     movc a,@a+dptr

     mov p1,a

     mov p0,r1

     lcall del1ms

     inc r2

     mov a,r1

     rl a

     mov r1,a

     djnz r3,a2

     ret

tab:db 1ch,22h,22h,22h,22h,22h,22h,1ch,00h       阳极代码表

    db 18h,38h,18h,18h,18h,18h,18h,3ch ,00h

    db 1ch,22h,2h,4h,08h,10h,20h,3eh,00h

    db 1ch,22h,2h,1ch,2h,2h,22h,1ch,00h

    db 04h,0ch,14h,14h,24h,24h,3eh,04h,00h

    db 3eh,20h,20h,3ch,2h,2h,22h,1ch,00h

    db 01ch,22h,20h,3ch,22h,22h,22h,1ch,00h

    db 3eh,2h,4h,8h,10h,10h,10h,10h,00h

    db 1ch,22h,22h,1ch,22h,22h,22h,1ch,00h

    db 1ch,22h,22h,22h,1eh,02h,22h,1ch,00h

    db 1ch,22h,2h,4h,08h,10h,20h,3eh,00h

    db 18h,38h,18h,18h,18h,18h,18h,3ch ,00h

zm: db 4h,0ah,11h,11h,1fh,11h,11h,11h ;A

    db 1eh,11h,11h,1eh,11h,11h,11h,1eh ;B

    db 0eh,11h,10h,10h,10h,11h,11h,0eh   ;C

    db 1eh,11h,11h,11h,11h,11h,11h,1eh   ;D

    db 1fh,10h,10h,1eh,10h,10h,10h,1fh   ;E

    db 1fh,10h,10h,1eh,10h,10h,10h,10h   ;F

    db 0eh,11h,10h,10h,17h,12h,0eh,2h    ;G

    db 11h,11h,11h,1fh,11h,11h,11h,11h    ;H

    db 0eh,4h,4h,4h,4h,4h,4h,1fh          ;I

    db 1fh,2h,2h,2h,2h,12h,12h,0ch        ;J

    db 11h,12h,14h,18h,14h,12h,11h,11h     ;K

    db 10h,10h,10h,10h,10h,10h,10h,1fh    ;L

    db 11h,1bh,15h,15h,15h,11h,11h,11h    ;M

    db 11h,19h,15h,15h,15h,15h,13h,11h    ;N

    db 0eh,11h,11h,11h,11h,11h,11h,0eh    ;O

    db 1eh,11h,11h,1eh,10h,10h,10h,10h    ;P

    db 0eh,11h,11h,11h,11h,15h,12h,0dh    ;Q

    db 1eh,11h,11h,1eh,18h,14h,12h,11h    ;R

    db 0eh,11h,10h,8h,4h,2h,11h,0eh       ;S

    db 1fh,4h,4h,4h,4h,4h,4h,4h           ;T

    db 11h,11h,11h,11h,11h,11h,11h,0eh    ;U

    db 11h,11h,11h,11h,11h,11h,0ah,4h     ;V

    db 11h,11h,11h,15h,15h,15h,1bh,11h    ;W

    db 11h,11h,0ah,4h,04h,0ah,11h,11h     ;X

    db 11h,11h,11h,0ah,4h,4h,4h,4h        ;Y

    db 1fh,1h,2h,4h,0ch,8h,10h,1fh        ;Z   

    end