代码：
assume cs:code
data segment
db "Beginner's All-purpose Symbolic Instruction Code.",0
data ends

code segment
begin:  mov ax,data
        mov ds,ax
        mov si,0
        call letterc
        
        mov ax,4c00h
        int 21h
;----letterc子程序        -----
;功能：将包含任何字符以0结尾的字符串中的小写字母转变成大写字母。
;参数：ds:si指向字符串的首地址。
letterc:;
        mov al,[si]
        cmp al,0
        je lok
        cmp al,61h
        jb next
        cmp al,7ah
        ja next
        sub al,20h
        mov [si],al
 next:  inc si
        jmp short letterc
 lok:        ret        
        
;----------------------------
code ends
end begin