14433ad.asm

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

dbuf0   equ     30h
temp    equ     40h

        org 0
ad:     mov r0,#dbuf0
        mov @r0,#10h
        inc r0
        setb p3.3
ab2:     jnb p3.3,ab2
ab1:    jb  p3.3,ab1
       ; mov dptr,#0ffffh
ad0:    movx a,@dptr
        jnb acc.4,ad0
        jnb acc.3,ad1
        mov @r0,#0
        sjmp ad2
ad1:    mov @r0,#1
ad2:    inc r0
ad3:    movx a,@dptr
        jnb acc.5,ad3
        anl a,#0fh
        mov @r0,a
        inc r0
ad4:    movx a,@dptr
        jnb acc.6,ad4
        anl a,#0fh
        mov @r0,a
        inc r0
ad5:    movx a,@dptr
        jnb acc.7,ad5
        anl a,#0fh
        mov @r0,a
        acall disp1
        ajmp ad

disp1:  mov r0,#dbuf0
        mov r1,#temp
        mov r2,#5
dp10:   mov dptr,#segtab
        mov a,@r0
        movc a,@a+dptr
        mov @r1,a
        inc r0
        inc r1
        djnz r2,dp10
        mov r0,#temp
        mov r1,#5
dp12:   mov r2,#8
        mov a,@r0
dp13:   rlc a
        mov p3.0,c
        clr p3.1
        setb p3.1
        djnz r2,dp13
        inc r0
        djnz r1,dp12
        ret
segtab: db 3fh,6,5bh,4fh,66h,6dh
        db 7dh,7,7fh,6fh,77h,7ch
        db 58h,5eh,7bh,71h,0,40h
        end