exam401.asm

我在汇编课上完成的一些作业（上机常见习题）和汇编课本上的几个例题

;编写从键盘键入0至9中任一自然数x，求其立方值
stack segment stack
      db 200 dup(0)
stack ends
data segment
     input db 'PLEASE INPUT X(0...9):$'
     tab dw 0,1,8,27,64,125,216,343,512,729
     x db ?
     xxx dw ?
data ends
code segment
     assume cs:code, ds:data, ss:stack
begin: mov ax, data
       mov ds, ax
       mov dx, offset input
       mov ah, 9
       int 21h
       mov ah, 1
       int 21h
       and al, 0fh
       mov x, al
       add al, al
       mov bl, al
       mov bh, 0
       mov ax, tab[bx]
       mov xxx, ax
       mov ah, 02h
       mov dl, '^'
       int 21h
       mov dl, '3'
       int 21h
       mov dl, '='
       int 21h
       mov ax, xxx
       call outax
       mov ah, 4ch
       int 21h

outax  proc far      ;显示AX的内容
       push bx       ;保护现场
       push cx
       push dx
       mov bx, ax
       mov ch, 04    ;数据位计数器
rot:  mov cl, 4      ;数据位数有4bit
      rol bx, cl     ;将最高4bit移
      mov al, bl     ;到bl最低4bit
      and al, 0fh    ;并取出送到al
      add al, 30h    ;转换为ASCII码
      cmp al, 3ah    ;al>'9'?
      jb print       ;是'0' ~ '9'转
      add al,07      ;是'A' ~ 'F'再加7
print:  mov ah, 02
        mov dl, al
        int 21h      ;显示al字符
        dec ch       ;四位已经显示完没?
        jnz rot      ;还没有，转ROT
        pop dx       ;恢复现场
        pop cx
        pop bx
        ret          ;返回
outax  endp          ;子程序结束
code ends
     end begin