大小写转换

erh

assume cs:abc,ds:data

data segment 
        db 'aBcDEFghiJklMNoP'
        db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
        db 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
data ends

abc segment
   start:
        mov ax,data
        mov ds,ax
        
        sub bx,bx
        mov cx,10h
        trans:
           mov al,ds:[bx]
           and al,0dfh
           mov ds:[bx+10h],al
           or  al,20h
            mov ds:[bx+20h],al        
           add bx,1
        loop trans
                   

        mov ax,4c00H
        int 21H
abc ends

end  start

大小写转换原来这么简单，设计ascii码的也是高人啊