写一个程序显示所按字符集对应的ASCII码先用2位十六进制数显示ASCII码，然后再用八进制数显示ASCII码


答：
；----------------------------------------------------
assume        cs:code,ss:stack
stack        segment stack
        dw 128 dup (0)
stack        ends
code        segment
start:
        mov ah,1
        int 21h
        and ax,0ffh
        push ax
        call crlf
        pop ax
        call hex
        push ax
        mov dl,'H'
        mov ah,2
        int 21h
        call crlf
        pop ax
        call octal
        mov dl,'Q'
        mov ah,2
        int 21h

        mov ah,4ch
        int 21h
;
hex        proc
        xor ah,ah
        mov cl,4
        mov si,2
a:        rol al,cl
        push ax
        and al,0fh
        cmp al,10
        jb a1
        add al,37h
a1:        add al,30h
        mov dl,al
        mov ah,2
        int 21h
        pop ax
        dec si
        cmp si,0
        jz ok
        jmp a
ok:        ret
hex        endp
;
octal        proc
        xor ah,ah
        mov bl,8
        mov cx,0
b:        
        div bl
        inc cx
        mov dl,ah
        xor dh,dh
        push dx
        cmp al,8
        jb b1
        xor ah,ah
        jmp b
b1:        and ax,0fh
        push ax
        inc cx
b2:        pop dx
        add dx,0030h
        mov ah,2
        int 21h
        loop b2
        ret 2
octal        endp
;
crlf        proc
        mov dl,0dh
        mov ah,2
        int 21h
        mov dl,0ah
        mov ah,2
        int 21h
        ret
crlf        endp
;
code        ends
end        start

；----------------------------------------------------