code segment
main proc far
assume cs:code
start:
mov ah,01
int 21h
cmp al,27
je exit
sub al,20h
mov dl,al
mov ah,2
int 21h
jmp start
exit:
mov ah,4ch
int 21h
main endp
code ends
end start