求80c51单片机汇编语言大神帮忙看一下程序

Question

程序的功能是按k1键计数，并且数字在动态数码管上显示，计数到10以后停止，然后再按k2键以后数码管上数字清零，可以继续按k1重复上述过程。使用的是80c51单片机和74LS138译码器，用了cc的八位动态数码管，电路图应该可以想像。程序如下：
TEMP EQU 22H //用来计数，可以用在10以上更大的数字上
a_bit EQU 20H // a,b分别取十位和个位
b_bit EQU 21H
ORG 0000H
LJMP MAIN
ORG 0003H
LJMP INT0S //外部中断0
ORG 0013H
LJMP INT1S //外部中断1
ORG 0100H
MAIN:MOV TMOD,#10H //初始化
MOV TL1,#0B0H
MOV TH1,#3CH //定时器延时
MOV R1,#20
MOV TEMP,#0
MOV DPTR,#TAB
MOV R7,#20
MOV R5,#1
SETB TR1
SETB EA
SETB EX0
SETB EX1
SETB IT1
SETB PX1 //开中
DISPLAY: //显示数字于数码管
CJNE R5,#1,D1 //跳出中断所需
JBC TF1,PTF1
MOV A,TEMP
MOV B,#10
DIV AB
MOV a_bit,A
MOV b_bit,B
MOV A,a_bit
MOVC A,@A+DPTR
CPL A
MOV P0,#0FFH
MOV P0,A
CPL P1.0
LCALL DEL
MOV A,b_bit
MOVC A,@A+DPTR
CPL A
MOV P0,#0FFH
MOV P0,A
CPL P1.0
LCALL DEL
AJMP DISPLAY
PTF1:
MOV TL1,#0B0H
MOV TH1,#3CH
DJNZ R1,DISPLAY
MOV R1,#20
MOV A,a_bit
MOV R0,A
MOVC A,@A+DPTR
CPL A
MOV P0,#0FFH
MOV P0,A
AJMP DISPLAY
DEL:
MOV R3,#0FFH
DJNZ R3,$
RET
INT0S:
INC TEMP
MOV A,#10
SUBB A,TEMP
JZ STOP
RETI
INT1S:
MOV R5,#0 //将r5设为跳出标记，为0时跳出中断0
RETI
STOP:
AJMP DISPLAY
D1: MOV TEMP,#0 //跳出以后清零
MOV R5,#1 //重置标记
AJMP INT0S
TAB:
DB 3FH,06H,5BH,4FH,66H
DB 6DH,7DH,07H,7FH,6FH
END
运行了以后显示到10以后一直不动，按k2没反应，跳不出中断，求纠错

Answer 1

按k1键计数，并且数字在动态数码管上显示，
计数到10以后停止，
然后再按k2键以后数码管上数字清零，
－－－－－－－－

满足这个要求，也用不着定时器呀！

程序中 T1，是干嘛的？

追问

因为要两位扫描显示

追答

TEMP   EQU   22H    //用来计数

    ORG   0000H
    JMP   MAIN
    ORG   0003H
    JMP   INT0S    //外部中断0
    ORG   0013H
    JMP   INT1S    //外部中断1

MAIN:
    SETB  EA
    SETB  EX0
    SETB  EX1   

    MOV   DPTR, #TAB
    MOV   TEMP, #0

DISPLAY:    //显示数字于数码管
    MOV   A, TEMP
    MOV   B, #10
    DIV   AB

    MOVC  A, @A+DPTR
    CPL   A
    MOV   P0, A
    CPL   P1.0
    CALL  DEL

    MOV   A, B
    MOVC  A, @A+DPTR
    CPL   A
    MOV   P0, A
    CPL   P1.0
    CALL  DEL

    JMP   DISPLAY
;-------------------------
DEL:
    DJNZ   R3, $
    DJNZ   R3, $
    RET
;-------------------------
TAB:
    DB   3FH, 06H, 5BH, 4FH, 66H
    DB   6DH, 7DH, 07H, 7FH, 6FH
;----------------------------------
INT0S:    
    DJNZ  R7, $
    JNB   P3.2, INT0S
    INC   TEMP
    MOV   R7, TEMP
    CJNE  R7, #10, EXIT  ;不等于10转移
    CLR   EX0    ;关闭外部中断0
EXIT:
    RETI
;----------------------------------
INT1S:
    MOV   TEMP, #0
    SETB  EX0    ;打开外部中断0
    RETI
;----------------------------------
END

试试看。

追问

关闭和打开外部中断为什么这么用啊

追答

你试试看，就知道了。

追问

这个不行，定时都去掉了，数码管显示不了

追答

没有定时，数码管就显示不了？

你看看下图，本程序，已经运行成功。

为了紧凑一些，改用 P2.0 来驱动位选接口。

显示程序，也要稍做改动，如下：

;-------------------------
DISPLAY:            ;显示数字于数码管
    MOV   A, TEMP
    MOV   B, #10
    DIV   AB

    MOVC  A, @A+DPTR
    CPL   A
    MOV   P0, A
    CPL   P2.0      ;改成P2口
    CALL  DEL
    MOV   P0, #255  ;消隐


    MOV   A, B
    MOVC  A, @A+DPTR
    CPL   A
    MOV   P0, A
    CPL   P2.0      ;改成P2口
    CALL  DEL
    MOV   P0, #255  ;消隐

    JMP   DISPLAY
;-------------------------

其它部分，都不变。

并没有使用定时器，显示，也可以了。