LED心形灯.doc

LED0 EQU P1LED2 EQU P2LED1 EQU P0MARK BIT 00HMARK1 BIT 01HTIME EQU 30H;时间缓冲区 SHI EQU 31H ;时长数据缓冲区！KEY EQU P3.2KEY1 EQU P3.3CTH EQU (65536-50000)/256CTL EQU (65536-50000) MOD 256ORG 0000HJMP STARTORG 0003HJMP INT_0ORG 000BHJMP TIME0ORG 0030HSTART: MOV P1,#00H MOV P0,#0FFHMOV P2,#0FFHMOV DPTR,#ABCMOV SP,#5FHMOV SHI,#20MOV R0,SHIMOV R7,#20CLR MARKCLR MARK1MOV TMOD,#01H MOV TH0,#CTH;初始指针MOV TL0,#CTLSETB EASETB IT0SETB EX0SETB ET0SETB TR0MOV TIME,R0CALL DISPLAYMAIN: MOV LED0,#21H;北，红灯亮 CJNE R0,#3,MAINMOV SHI,#04NEXT: MOV R6,#3A1: MOV LED0,#01HCALL DELAY_500MS MOV LED0,#21HCALL DELAY_500MSDJNZ R6,A1S1: JBC MARK,A2SJMP S1A2: MOV LED0,#11H; BEI HUANG DENG LIANGMOV SHI,#20JBC MARK,MAIN1SJMP A2MAIN1: MOV LED0,#0CH ;XI HONG DENG LIANGCJNE R0,#3,MAIN1MOV SHI,#04NEXT1: MOV R6,#3A3: MOV LED0,#08H CALL DELAY_500MSMOV LED0,#0CHCALL DELAY_500MSDJNZ R6,A3S2: JBC MARK,A4SJMP S2A4: MOV LED0,#0AHMOV SHI,#20 JBC MARK,MAIN SJMP A4DELAY_500MS: MOV R5,#20K1: MOV R4,#50K2: MOV R3,#250DJNZ R3,$DJNZ R4,K2DJNZ R5,K1RETDISPLAY:MOV A,TIME MOV B,#10DIV ABMOVC A,A+DPTRMOV LED2,A MOV A,BMOVC A,A+DPTRMOV LED1,ARETABC: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90HINT_0: PUSH ACCPUSH PSWSETB RS1SETB RS0MOV R5,#70K4: MOV R4,#250 DJNZ R4,$DJNZ R5,K4JB KEY,ITT_2MOV TIME,#20CALL DISPLAYITT_1: MOV LED0,#00010010BCALL DELAY_500MSMOV LED0,#00HJNB KEY,ITT_2CALL DELAY_500MS JB KEY,ITT_1ITT_2: JNB KEY ,$POP PSWPOP ACCRETITIME0: PUSH ACC PUSH PSW MOV TH0,#CTH;初始指针 MOV TL0,#CTL DJNZ R7,TIME1 MOV R7,#20 DJNZ R0,TIME2 SETB