th39.asm

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

       ;P1 键盘读入口
DBUF   EQU  30H
TEMP   EQU  40H
YJ     EQU  50H
YJ1    EQU  51H
GONG   EQU  52H


       ORG   0000H
START: MOV   R3,#0
       MOV   GONG,#0
       MOV   30H,#10H
       MOV   31H,#10H
       MOV   32H,#10H
       MOV   33H,#10H
       MOV   34H,#10H
MLoop: ACALL  DISP
 WAIT: ACALL  TestKey
       jz     WAIT
       ACALL  GetKey
       INC    R3

        CJNE  A,#0,NEXT1
              LJMP  E1
NEXT1:  CJNE  A,#1,NEXT2
              LJMP  E1
NEXT2:  CJNE  A,#2,NEXT3
              LJMP  E1
NEXT3:  CJNE  A,#3,NEXT4
              LJMP  E1
NEXT4:  CJNE  A,#4,NEXT5
              LJMP  E1
NEXT5:  CJNE  A,#5,NEXT6
              LJMP  E1
NEXT6:  CJNE  A,#6,NEXT7
              LJMP  E1
NEXT7:  CJNE  A,#7,NEXT8
              LJMP  E1
NEXT8:  CJNE  A,#8,NEXT9
              LJMP  E1
NEXT9:  CJNE  A,#9,NEXT10
              LJMP  E1
NEXT10: CJNE  A,#10,NEXT11
              LJMP  E2
NEXT11: CJNE  A,#11,NEXT12
              LJMP  E2
NEXT12: CJNE  A,#12,NEXT13
              LJMP  E2
NEXT13: CJNE  A,#13,NEXT14
              LJMP  E2
NEXT14: CJNE  A,#14,NEXT15
              LJMP  E2
NEXT15: LJMP  E3

E1:     CJNE  R3,#1,N1
        LJMP  E11
N1:     CJNE  R3,#2,N2
        LJMP  E12
N2:     CJNE  R3,#3,N3
        LJMP  E13
N3:     LJMP  E3

E11:    MOV   R4,A
        MOV   34H,A
        MOV   33H,#10H
        MOV   32H,#10H
        LJMP  MLOOP

E12:    MOV   R7,A
        MOV   B,#10
        MOV   A,R4
        MUL   AB
        ADD   A,R7
        MOV   R4,A
        MOV   32H,#10H
        MOV   33H,34H
        MOV   34H, R7
        LJMP  MLOOP

E13:    MOV   R7,A
        MOV   B,#10
        MOV   A,R4
        MUL   AB
        JB    OV,OUT0
        ADD   A,R7
        JB    CY,OUT0
        MOV   R4,A
        MOV   32H,33H
        MOV   33H,34H
        MOV   34H,R7
        LJMP  MLOOP
 OUT0:  LJMP  E3

E2:     MOV   34H,#10H
        MOV   33H,#10H
        MOV   32H,#10H
        MOV   R0,GONG      ;与上次功能键交换
        MOV   GONG,A
        MOV   A,R0
        CJNE  A,#10,N21
        LJMP  JIA        ;+
N21:    CJNE  A,#11,N22
        LJMP  JIAN       ;-
N22:    CJNE  A,#12,N23
        LJMP  CHENG      ;*
N23:    CJNE  A,#13,N24
        LJMP  CHU        ;/
N24:    CJNE  A,#0,N25
        LJMP  FIRST
N25:    LJMP  DEN        ;=


FIRST: MOV    YJ,R4
       MOV    R3,#0
       LJMP   DISP1

JIA:   MOV    A,YJ
       ADD    A,R4
       JB     CY,OUT1
       MOV    YJ,A
       MOV    R3,#0
       LJMP   DISP1
 OUT1: LJMP   E3

JIAN:  MOV    A,YJ
       SUBB   A,R4
       JB     CY,OUT2
       MOV    YJ,A
       MOV    R3,#0
       LJMP   DISP1
 OUT2: LJMP   E3

CHENG: MOV    A,YJ
       MOV    B,A
       MOV    A,R4
       MUL    AB
       JB     OV,OUT3
       MOV    YJ,A
       MOV    R3,#0
       LJMP   DISP1
 OUT3: LJMP   E3

CHU:   MOV    A,R4
       MOV    B,A
       MOV    A,YJ
       DIV    AB
       MOV    YJ,A
       MOV    R3,#0
       LJMP   DISP1

DEN:   MOV    R3,#0
       LJMP   DISP1

E3:    MOV    R3,#0
       MOV    R4,#0
       MOV    YJ,#0
       MOV    GONG,#0
       MOV    30H,#10H
       MOV    31H,#10H
       MOV    32H,#10H
       MOV    33H,#10H
       MOV    34H,#10H
       LJMP   MLOOP

DISP1:
       MOV    B,#10
       MOV    A,YJ
       DIV    AB
       MOV    YJ1,A
       MOV    A,B
       MOV    34H,A
       MOV    A,YJ1
       JZ     DISP11
       MOV    B,#10
       MOV    A,YJ1
       DIV    AB
       MOV    YJ1,A
       MOV    A,B
       MOV    33H,A
       MOV    A,YJ1
       JZ     DISP11
       MOV    32h,A
DISP11:LJMP   MLOOP


           ;     串行静态显示  DISP1.ASM   5　LED
           ;