C51 LED交通灯控制

ORG 0000H LJMP MAIN ORG 0003H LJMP INT ORG 0030H MAIN: MOV A,#10000010B ;初始化 B口为输入，A口为输出 MOV DPTR,#7FFFH MOVX @DPTR,A MOV IE,#81H SETB IT0 MAIN1: LCALL CHECK ;调用检测开关输入的程序 MOV DPTR,#7CFFH ;A放行，B禁止 MOV A,#7BH MOV B,A MOVX @DPTR,A MOV R0,#05H MAIN2: LCALL DELLAY ;A提醒，B禁止 DJNZ R0,MAIN2 MOV B,#0BBH MOV A,B MOV DPTR,#7CFFH MOVX @DPTR,A MOV R0,#02H MAIN3: LCALL DELLAY ;A禁止，B放行 DJNZ R0,MAIN3 MOV B,#0CFH MOV A,B MOV DPTR,#7CFFH MOVX @DPTR,A MOV R0,#05H MAIN4: LCALL DELLAY ;A禁止，B提醒 DJNZ R0,MAIN4 MOV B,#0D7H MOV A,B MOV DPTR,#7CFFH MOVX @DPTR,A MOV R0,#02H MAIN5: LCALL DELLAY DJNZ R0,MAIN1 CHECK: MOV DPTR,#7DFFH MOVX A,@DPTR RLC A JC MAIN1 ;PB7输入高电平则转移 RET DELLAY: ;延时1s MOV R7,#250 DEL1: MOV R6,#250 DEL2: LCALL CHECK ;调用检测开关输入的程序 DJNZ R6,DEL2 DJNZ R7,DEL1 RET INT: PUSH PSW PUSH ACC MOV DPTR,#7CFFH MOV A,#0DBH MOVX @DPTR,A MOV R3,#10 MOV R1,#9 DELL1: MOV A,R1 MOV DPTR,#TAB MOVC A,@A+DPTR MOV p1,A DEC R1 MOV R2,#250 DELL2: MOV R5,#250 DELL3: MOV R4,#5 DELL4: DJNZ R4,DELL4 DJNZ R5,DELL3 DJNZ R2,DELL2 DJNZ R3,DELL1 POP ACC POP PSW MOV P1,#0ffH MOV DPTR,#7CFFH MOV A,B MOVX @DPTR,A RETI TAB: DB 0c0h,0F9H,0A4H,0B0H,99H DB 92H,82H,0F8H,80H,90H END