为1任务十二潜水泵自动控制保护器 CLR P3.2 SETB LCALL DELI POP ACC setb P3. 2 RET MOV A LEDI DⅠSP1: MOV DPTR,#DBB LCALL DISPI MOVC A, @A+DPTR CLR P3.3 Mov P1, A LCALL DELI setB P3. 3 DELI MOv R3, #10 Mov A LEDO DEL MO R4.#50 LCALL DISPI DJNZ R4,$ cLr P3. 4 DJNZ R3, DEL LCALL DEL1 RET 数码管字形码 DBB DB OCoH. OF9H. 0A4H OBOH. 99H 92H: 0-6 82H. 0F8H. 80H. 90H 7-9 END7.1 任务十二 潜水泵自动控制保护器 CLR P3.2 LCALL DEL1 SETB P3.2 MOV A,LED1 LCALL DISP1 CLR P3.3 LCALL DEL1 SETB P3.3 MOV A,LED0 LCALL DISP1 CLR P3.4 LCALL DEL1 SETB P3.4 POP ACC RET DISP1: MOV DPTR,#DBB MOVC A,@A+DPTR MOV P1,A RET DEL1: MOV R3,#10 DEL: MOV R4,#50 DJNZ R4,$ DJNZ R3,DEL RET ;数码管字形码 DBB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H ;0-6 DB 82H,0F8H,80H,90H ;7-9 END