assume cs:codesg,ds:data
data segment
db " Beginner's All - purpose Sysmbolic Instruction code.",0
data ends
codesg segment
start:
mov ax,data
mov ds,ax
mov di,0
call letterc
mov ax,4c00h
int 21h
letterc:
mov al,ds:[di]
cmp al,0
jz ok
cmp al,61H
jb next
cmp al,7aH
ja next
and al,11011111B
mov ds:[di],al
next:
inc di
jmp letterc
ok:
ret
codesg ends
end start
data segment
db " Beginner's All - purpose Sysmbolic Instruction code.",0
data ends
codesg segment
start:
mov ax,data
mov ds,ax
mov di,0
call letterc
mov ax,4c00h
int 21h
letterc:
mov al,ds:[di]
cmp al,0
jz ok
cmp al,61H
jb next
cmp al,7aH
ja next
and al,11011111B
mov ds:[di],al
next:
inc di
jmp letterc
ok:
ret
codesg ends
end start