assume cs:code,ds:data

data segment
                db "Beginner's All-purpose Symolic Instruction Code.",0
data ends

code segment
        start:
        mov ax,data
        mov ds,ax
        mov si,0
        
        call letterc
        
        mov ax,4c00h
        int 21h
        
        ;-----------------------------------------------------letterc begin
        letterc:
        mov cl,[si]
        mov ch,0
        jcxz return
        
        cmp cl,61H
        jb pass
        cmp cl,7aH
        ja pass
        
        and byte ptr [si],11011111B

        pass:
        inc si
        jmp letterc
        
        return:
        ret
        
        
        ;-----------------------------------------------------letterc end
code ends
end start