ORG 0000HLJMP MAINORG 0013HLJMP EXT1ORG 0030HMAIN: MOV A,#0FEHLOOP: MOV P1,A RL A LCALL DELAY SJMP LOOPEXT1: MOV P1,#00H MOV R7,#10DD: LCALL DELAY DJNZ R7,DD RETIDELAY: MOV R2,#200DLY: MOV R3,#250 DJNZ R3,$ DJNZ R2,DLY RET END