《单片机综合花样流水灯》由会员分享,可在线阅读,更多相关《单片机综合花样流水灯(17页珍藏版)》请在金锄头文库上搜索。
1、;/时间:2008.3.5- - / ;/作者: - / ;/功能:全口对撞流水花样- /ORG 0000HLJMP MAINORG 0100H MAIN: ;-闪烁-MOV R3,#8 BS0:MOV P0,#0FFHMOV P1,#0FFHMOV P2,#0FFHMOV P3,#0FFHLCALL DELAY4MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HLCALL DELAY4DJNZ R3,BS0MOV R3,#8 BS10:MOV P0,#0AAHMOV P1,#0AAHMOV P2,#0AAHMOV P3,#0AAHLCALL DELAY4
2、MOV P0,#55HMOV P1,#55HMOV P2,#55HMOV P3,#55HLCALL DELAY4DJNZ R3,BS10 ;-MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00H ;-流水部分 1-MOV R3,#3LS: MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV R2,#9MOV A,#00H KK:SETB CMOV P3,ARLC ALCALL DELAYDJNZ R2,KKMOV A,#00HMOV R2,#9 KK1:SETB CMOV P2,ARRC ALCALL DELAYD
3、JNZ R2,KK1MOV A,#00HMOV R2,#9 KK2:SETB CMOV P1,ARLC ALCALL DELAYDJNZ R2,KK2MOV A,#00HMOV R2,#9 KK3:SETB CMOV P0,ARLC ALCALL DELAYDJNZ R2,KK3DJNZ R3,LS ;-流水部分 2-MOV R3,#3 LS2: MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV A,#00HMOV R2,#9 KK32:SETB CMOV P0,ARRC ALCALL DELAYDJNZ R2,KK32 MOV A,#00HMOV
4、 R2,#9 KK22:SETB CMOV P1,ARRC ALCALL DELAYDJNZ R2,KK22MOV A,#00HMOV R2,#9 KK12:SETB CMOV P2,ARLC ALCALL DELAYDJNZ R2,KK12MOV R2,#9MOV A,#00H KK222:SETB CMOV P3,ARRC ALCALL DELAYDJNZ R2,KK222DJNZ R3,LS2 ;-流水部分 3-MOV R3,#3 LS3: MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV A,#00HMOV R2,#9 KKI:SETB C
5、MOV P3,ARLC ALCALL DELAYDJNZ R2,KKIMOV A,#00HMOV R2,#9 KKI1:SETB CMOV P2,ARRC ALCALL DELAYDJNZ R2,KKI1MOV A,#00HMOV R2,#9 KKI2:SETB CMOV P1,ARLC ALCALL DELAYDJNZ R2,KKI2MOV A,#00HMOV R2,#9 KKI3:SETB CMOV P0,ARLC ALCALL DELAYDJNZ R2,KKI3MOV A,#0FFHMOV R2,#9 IK3:CLR CMOV P3,ARLC ALCALL DELAYDJNZ R2,IK
6、3MOV A,#0FFHMOV R2,#9 IK2:CLR CMOV P2,ARRC ALCALL DELAYDJNZ R2,IK2MOV A,#0FFHMOV R2,#9KI1:CLR CMOV P1,ARLC ALCALL DELAYDJNZ R2,KI1 MOV A,#0FFHMOV R2,#9 KI:CLR CMOV P0,ARLC ALCALL DELAYDJNZ R2,KIDJNZ R3,LS3 ;-跑马灯-MOV R3,#3; 跑马灯循环次数PM1:MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV A,#00HMOV R2,#9SET
7、B C KKP:MOV P3,ARLC ALCALL DELAYDJNZ R2,KKPMOV P3,#00HMOV A,#00HMOV R2,#9SETB C KK1P:MOV P2,ARRC ALCALL DELAYDJNZ R2,KK1PMOV P2,#00HMOV A,#00HMOV R2,#9SETB C KK2P:MOV P1,ARLC ALCALL DELAYDJNZ R2,KK2PMOV P1,#00HMOV A,#00HMOV R2,#9SETB C KK3P:MOV P0,ARLC ALCALL DELAYDJNZ R2,KK3PMOV P0,#00HDJNZ R3,PM1
8、;-双向对顶跑马灯-MOV R3,#10;双跑马灯循环次数SPM:MOV 50H,#20A0: MOV R4,50HMOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV 30H,#80HMOV 31H,#01HMOV R2,#8B0: MOV A,30HMOV P0,ARR AMOV 30H,AMOV A,31HMOV P3,ARL AMOV 31H,ALCALL DELAYDJNZ R2,B0MOV P0,#00HMOV P3,#00HMOV A,#80HMOV R2,#8B1: MOV P1,AMOV P2,ARR ALCALL DELAYDJNZ
9、 R2,B1MOV P1,#00HMOV P2,#00HDEC 50HDEC 50HDJNZ R3,SPM ;-变速走马-MOV R2,#5 BPM :MOV 30H,#100MOV P0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV A,#80HMOV R3,#8 B0B: MOV P0,ALCALL DELAY3RR ADEC 30HDEC 30HDEC 30HDJNZ R3,B0BMOV P0,#00HMOV A,#80HMOV R3,#8 B1B: MOV P1,ALCALL DELAY3RR ADEC 30HDEC 30HDEC 30HDJNZ R
10、3,B1BMOV P1,#00HMOV A,#01HMOV R3,#8 B2B: MOV P2,ALCALL DELAY3RL ADEC 30HDEC 30HDEC 30HDJNZ R3,B2BMOV P2,#00HMOV A,#80HMOV R3,#8 B3B: MOV P3,ALCALL DELAY3RR ADEC 30HDEC 30HDEC 30HDJNZ R3,B3BMOV P3,#00HDJNZ R2,BPM ;-双向对顶跑马灯-MOV R2,#2 SBPM:MOV 50H,#12MOV 40H,#6SA0: MOV R4,50HMOV P0,#00HMOV P1,#00HMOV P
11、2,#00HMOV P3,#00HMOV 30H,#80HMOV 31H,#01HMOV R3,#8SB0: MOV A,30HMOV P0,ARR AMOV 30H,AMOV A,31HMOV P3,ARL AMOV 31H,ALCALL DELAY2DJNZ R3,SB0MOV P0,#00HMOV P3,#00HMOV A,#80HMOV R3,#8SB1: MOV P1,AMOV P2,ARR ALCALL DELAY2DJNZ R3,SB1MOV P1,#00HMOV P2,#00HDEC 50HDEC 50HDJNZ 40H,SA0DJNZ R2,SBPM ;-对撞部分-MOV P
12、0,#00HMOV P1,#00HMOV P2,#00HMOV P3,#00HMOV R3,#3 DZLS:MOV A,#00HMOV R2,#9MOV R7,#00HMOV R6,#00HMOV R5,#00HMOV R4,#00H dzk:MOV A,R7MOV P0,ASETB CRRC AMOV R7,AMOV A,R6MOV P3,ASETB CRLC AMOV R6,ALCALL DELAYDJNZ R2,dzkMOV R2,#9 dzk1:MOV A,R5MOV P1,ASETB CRRC AMOV R5,AMOV A,R4MOV P2,ASETB CRRC AMOV R4,AL
13、CALL DELAYDJNZ R2,dzk1MOV R2,#9MOV R7,#0FFHMOV R6,#0FFHMOV R5,#0FFHMOV R4,#0FFH dz1:MOV A,R5MOV P1,ACLR CRLC AMOV R5,AMOV A,R4MOV P2,ACLR CRLC AMOV R4,ALCALL DELAYDJNZ R2,dz1MOV R2,#9 dz:MOV A,R7MOV P0,ACLR CRLC AMOV R7,AMOV A,R6MOV P3,ACLR CRRC AMOV R6,ALCALL DELAYDJNZ R2,dzDJNZ R3,DZLSMOV R3,#3 DZLS1:MOV A,#00HMOV R7,#00HMOV