TITLE 字符串转换测试
COMMENT $
文件:test10.asm
作者:刘江
日期:2006_11_02
功能:转换大写字符串为小写,并调用中断显示
$
.286
data segment
Buffer db 'I LOVE YOU_mm',0ah,0dh,'$'
data ends
code segment
assume cs:code,ds:data
OnChange:
push bp
mov bp,sp
;mov dx,[bp+4] ;16位,所以这里加4。要是32位就加8
mov bx,bp
add bx,04h
mov dx,[bx]
Begin:
mov al,[bx]
cmp al,'$'
jz Over
cmp al,'A'
jb IsNot
cmp al,'Z'
ja IsNot
add al,20h
mov [bx],al
IsNot:
inc bx,(bx)+1=>bx
jmp Begin
Over:
pop bp
ret
Start:
mov ax,data
mov ds,ax
mov dx,offset Buffer
mov ah,09h
int 21h
mov ax,dx
push ax
call OnChange
pop ax
mov ah,09h
int 21h
mov ah,4Ch
int 21h
code ends
end Start