用汇编语言编译一个程序＼从键盘输入一个字符串将其每个字符的ASCII码显示在屏幕上

用汇编语言编译一个程序＼从键盘输入一个字符串将其每个字符的ASCII码显示在屏幕上

data segment para
str1 db ‘one’, ’$’
str2 db ‘Two’, ’$’
str3 db ‘Three’, ’$’
str4 db ‘four’, ’$’
str5 db ‘five’, ’$’
tab dw str1,str2,str3,str4,str5
data ends
ssg segment stack
dw 256 dup(?)
ssg ends
code segment para
assume cs:code,ss:ssg,ds:data
main proc far
mov ax, data
mov ds, ax
mov ah, 1 ;键盘输入
int 21h
call asc2bin
mov bl, al
mov bh, 0
dec bx
shl bx, 1
mov dx, tab[bx]
mov ah, 9
int 21h
mov ax, 4c00h
Int 21h
main endp
;将ASCII转换为二进制数
;入口：AL存放ASCII
;出口：转换后数值在AL
asc2bin proc
sub al, 30h
cmp al, 9
jbe next
sub al, 7
next: ret
asc2bin endp
end main

data segment para str1 db ‘one’, ’$’ str2 db ‘two’, ’$’ str3 db ‘three’, ’$’ str4 db ‘four’, ’$’ str5 db ‘five’, ’$’ tab dw str1,str2,str3,str4,str5 data ends ssg segment stack dw 256 dup(?) ssg ends code segment para assume cs:code,ss:ssg,ds:data main proc far mov ax, data mov ds, ax mov ah, 1 ;键盘输入 int 21h call asc2bin mov bl, al mov bh, 0 dec bx shl bx, 1 mov dx, tab[bx] mov ah, 9 int 21h mov ax, 4c00h int 21h main endp ;将ascii转换为二进制数 ;入口：al存放ascii ;出口：转换后数值在al asc2bin proc sub al, 30h cmp al, 9 jbe next sub al, 7 next: ret asc2bin endp end main 上面的程序是：从键盘输入1~5之间的一个数，在屏幕上显示one…five。虽然不一样，但要求差不多，希望对你有帮助！