jzm.asm

请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。系统会自动删除debug和release目录

    ORG 0000H
    AJMP START
    ORG 0100H
START: MOV  A,#90H
       MOV  DPTR,#7FFFH
       MOVX @DPTR,A
       LCALL JPAN
       AJMP  START


JPAN:  MOV  DPTR,#7CFCH
       MOVX A,@DPTR
       MOV  40H,A
       LCALL YS10MS
       MOVX  A,@DPTR
       CJNE  A,40H,PASS
       CJNE  A,#0FEH,NEXT1
       LJMP  KEY1
NEXT1: CJNE  A,#0FDH,NEXT2
       LJMP  KEY2
NEXT2: CJNE  A,#0FBH,NEXT3
       LJMP  KEY3
NEXT3: CJNE  A,#0F7H,NEXT4
       LJMP  KEY4
NEXT4: CJNE  A,#0EFH,NEXT5
       LJMP  KEY5
NEXT5: CJNE  A,#0DFH,NEXT6
       LJMP  KEY6
NEXT6: CJNE  A,#0BFH,NEXT7
       LJMP  KEY7
NEXT7: CJNE  A,#7FH,PASS
       LJMP  KEY8
PASS:  LJMP  JPAN

KEY1:  MOV   A,#06H
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#01H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY2:  MOV   A,#5BH
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#02H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY3:  MOV   A,#4FH
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#04H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY4:  MOV   A,#66H
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#08H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY5:  MOV   A,#6DH
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#10H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY6:  MOV   A,#7DH
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#20H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY7:  MOV   A,#07H
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#01H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
KEY8:  MOV   A,#7FH
       MOV   DPTR,#7DFDH
       MOVX  @DPTR,A
       MOV   A,#02H
       MOV   DPTR,#7EFEH
       MOVX  @DPTR,A
       LJMP  JPAN
       RET


YS10MS:MOV   R7,#05H
LOOP1: MOV   R6,#0F9H
LOOP2: NOP
       NOP
       DJNZ  R6,LOOP2
       DJNZ  R7,LOOP1
       RET
       END