data segment
db "Beginner's ALL-purpose Symbolic Istruction Code.",0
data ends
code segment
assume cs:code,ds:data,ss:stack
start:
mov ax,data
mov ds,ax
mov si,0
call letterc
mov ah,4ch
int 21h
letterc:
cmp byte ptr ds:[si],61h
jb s1
cmp byte ptr ds:[si],7ah
ja s1
sub byte ptr ds:[si],20h
jmp s2
s1: cmp byte ptr ds:[si],0
je s3
s2:inc si
jmp letterc
s3:ret
code ends
end start |