mmdl.asm

学习单片机一个简单程序和硬件的开发

      ORG 0000H
      MOV R0,#21
      MOV 20H,#8BH
  KEY:JNB P1.0,KEY1
      JNB P1.1,KEY2
      SJMP KEY
 KEY1:DJNZ R0,L1
      LJMP ALARM
   L1:MOV R1,#5
      LCALL DEL
      MOV A,P0
      CJNE A,20H,KEY1
      CLR P2.0
      MOV R0,#21
   K1:MOV 20H,P0
      JNB P1.0,K1
   K3:MOV A,P0
      CJNE A,20H,K2
      CPL P2.0
      MOV R1,#2
      LCALL DEL
      SJMP K3
   K2:SETB P2.0
      SJMP KEY
 KEY2:DJNZ R0,L2
      LJMP ALARM
   L2:MOV R1,#5
      LCALL DEL
      MOV A,P0
      CJNE A,20H,KEY2
      CLR P2.1
      MOV R0,#21
      JNB P1.1,$
   K5:MOV A,P0
      CJNE A,20H,K4
      CPL P2.1
      MOV R1,#2
      LCALL DEL
      SJMP K5
   K4:SETB P2.1
      SJMP KEY
ALARM:CPL P2.2
      LCALL DELAY
      SJMP ALARM
  DEL:MOV R2,#100
 DEL1:MOV R3,#250
 DEL2:NOP
      NOP
      DJNZ R3,DEL2
      DJNZ R2,DEL1
      DJNZ R1,DEL
      RET
 DELAY:MOV R4,#250
 LOOP:NOP
      NOP
      DJNZ R4,LOOP
      RET
      END