lesson5-1.asm

这里提供了一些单片机的实验方面的小程序

CSEG    AT     0000H
        LJMP   START
CSEG AT 0003H
        LJMP   1000H
CSEG AT  0013H
	LJMP  2000H
   START:SETB EA
	SETB EX0
	SETB EX1
	SETB IT0
	SETB IT1
	MOV A,#0FEH
     LP:RL A
	MOV P1,A
	LCALL DELAY
        LCALL DELAY
	LJMP LP

  DELAY: MOV R0,#0FAH
    L0: MOV R1,#0FFH
    L1: DJNZ R1,L1
        DJNZ R0,L0
        RET
         
      ORG  1000H 
        MOV R2,#0FH
         CLR    EA     ;中断处理 允许外部中断
        PUSH   ACC         
        PUSH   PSW
    L2:  MOV P1,#0FFH
         LCALL DELAY
         MOV P1,#00H
         LCALL DELAY
         DJNZ R2,L2 
        POP    PSW      ;出栈
        POP    ACC
        SETB   EA        ;允许外部中断
        RETI
         
      ORG  2000H 
         MOV R3,#0FH
          CLR    EA     ;中断处理 允许外部中断
        PUSH   ACC         
        PUSH   PSW
      L4:MOV P1,#0F0H
         LCALL DELAY
         MOV P1,#0FH
         LCALL DELAY
         DJNZ R3,L4
         POP    PSW      ;出栈
        POP    ACC
        SETB   EA        ;允许外部中断
         
         RETI
         
         END