51单片机心形灯汇编程序Word文件下载.docx

51单片机心形灯汇编程序Word文件下载.docx

《51单片机心形灯汇编程序Word文件下载.docx》由会员分享，可在线阅读，更多相关《51单片机心形灯汇编程序Word文件下载.docx（29页珍藏版）》请在冰点文库上搜索。

MOVP0,A

ACALLDELAY

RLA

DJNZR1,DAN1

;

单个跑马灯

DAN22:

MOVP2,A

CALLDELAY1

DJNZR1,DAN22

MOVP3,#0FFH

DAN33:

MOVP3,A

DJNZR1,DAN33

DAN44:

MOVP1,A

DJNZR1,DAN44

DAN11:

MOVP0,A

ACALLDELAY1

DJNZR1,DAN11

单个跑马灯

DAN222:

CALLDELAY2

DJNZR1,DAN222

MOVP3,#0FFH

DAN333:

DJNZR1,DAN333

DAN444:

DJNZR1,DAN444

DAN111:

ACALLDELAY2

DJNZR1,DAN111

D1AN22:

CALLDELAY3

DJNZR1,D1AN22

D1AN33:

DJNZR1,D1AN33

D1AN44:

DJNZR1,D1AN44

D1AN11:

MOVP0,A

ACALLDELAY3

DJNZR1,D1AN11

DAN2A:

CALLDELAY4

DJNZR1,DAN2A

DAN3A:

DJNZR1,DAN3A

DAN4A:

DJNZR1,DAN4A

MOVR1,#08H;

DAN1A:

ACALLDELAY4

DJNZR1,DAN1A

DAN2A1:

DJNZR1,DAN2A1

DAN3A1:

DJNZR1,DAN3A1

DAN4A1:

DJNZR1,DAN4A1

MOVR1,#12H

DAN1A1:

DJNZR1,DAN1A1

MOVR1,#4

JIAOTI:

;

交替闪烁

MOVP0,#01010101B

MOVP1,#01010101B

MOVP2,#01010101B

MOVP3,#01010101B

MOVP0,#B

MOVP1,#B

MOVP2,#B

MOVP3,#B

DJNZR1,JIAOTI

QUAN:

闪烁的频率由慢变快

MOVP0,#00H

MOVP1,#00H

MOVP2,#00H

MOVP3,#00H

DJNZR1,QUAN

渐渐变亮，然后熄灭

MOVA,#07FH

JIAN2:

RRA

ANLA,P2

DJNZR1,JIAN2

JIAN3:

ANLA,P3

DJNZR1,JIAN3

MOVP3,#00H

MOVA,#07FH

JIAN4:

ANLA,P1

DJNZR1,JIAN4

MOVP3,#00H

JIAN1:

ANLA,P0

DJNZR1,JIAN1

MOVP3,#01010101B

ANLP2,#00010101B

ANLP2,#00000101B

ANLP2,#00000001B

ANLP2,#00000000B

ANLP3,#00010101b

ANLP3,#00000101b

ANLP3,#00000001b

ANLP3,#00000000b

CALLDELAY

ANLP1,#00010101b

ANLP1,#00000101b

ANLP1,#00000001b

ANLP1,#00000000b

ANLP0,#B

ANLP0,#00000000B

CALLDELAY

ORLP0,#01000000b

ORLP0,#01010000b

ORLP0,#01010100b

ORLP0,#01010101b

ORLP1,#00000010b

ORLP1,#00001010b

ORLP1,#00101010b

ORLP1,#b

ORLP3,#00000010b

ORLP3,#00001010b

ORLP3,#00101010b

ORLP3,#b

ORLP2,#00000010b

ORLP2,#00001010b

ORLP2,#00101010b

ORLP2,#b

ANLP0,#00010101B

ANLP2,#00101010B

ANLP0,#00000101B

ANLP2,#00001010B

ANLP0,#00000001B

ANLP2,#00000010B

ANLP1,#B

ANLP3,#00101010B

ANLP3,#00001010B

ANLP3,#00000010B

ANLP1,#00000000B

ANLP3,#00000000B

ORLP1,#01000000B

ORLP3,#00000001B

ORLP1,#01010000B

ORLP3,#00000101B

ORLP1,#01010100B

ORLP3,#00010101B

ORLP1,#01010101B

ORLP3,#01010101B

ORLP0,#00000000B

ORLP2,#00000001B

ORLP0,#00001010B

ORLP2,#00000101B

ORLP0,#00101010B

ORLP2,#00010101B

ORLP0,#B

ORLP2,#01010101B

ORLP2,#B

ORLP1,#00000011B

ORLP3,#B

ORLP1,#00001111B

ORLP1,#00111111B

ORLP1,#B

ANLP1,#01111111B

ANLP3,#B

ANLP1,#00111111B

ANLP1,#00011111B

ANLP1,#00001111B

ANLP1,#00000111B

ANLP1,#00000011B

ANLP1,#00000001B

ANLP2,#B

JIAOT:

MOVP0,#00110011B

MOVP1,#00110011B

MOVP2,#00110011B

MOVP3,#00110011B

DJNZR1,JIAOT

MOVR1,#6

SIGE:

MOVP1,#01111111B

MOVP2,#01111111B

MOVP3,#01111111B

MOVP1,#00111111B

MOVP2,#00111111B

MOVP3,#00111111B

MOVP1,#00011111B

MOVP2,#00011111B

MOVP3,#00011111B

MOVP1,#00001111B

MOVP2,#00001111B

MOVP3,#00001111B

MOVP1,#00000111B

MOVP2,#00000111B

MOVP3,#00000111B

MOVP1,#000000111B

MOVP2,#00000011B

MOVP3,#00000011B

MOVP1,#00000001B

MOVP2,#00000001B

MOVP3,#00000001B

MOVP0,#00000000B

MOVP1,#00000000B

MOVP2,#00000000B

MOVP3,#00000000B

DJNZR1,SIGE

M