assume cs:code
data segment
db "Beginner's All-purpose Symbolic Instrunction Code.",0
data ends
code segment
start: mov ax,data
mov ds,ax
mov si,0
call letterc
mov dh,8
mov dl,3
mov cl,2
call show_str
mov ax,4c00h
int 21h
letterc:
push ax
push dx
push cx
s: mov al,ds:[si]
cmp al,0
jz ok1
cmp al,97
jb ok
cmp al,122
ja ok
sub al,20h
mov ds:[si],al
ok: inc si
jmp s
ok1: pop cx
pop dx
pop ax
ret
show_str:push cx
push dx
push es
push di
push bx
push si
push ax
mov ax,0b800h
mov es,ax
mov al,dl
dec al
mov ah,0
add ax,ax
mov