data segment
buffer db 5 dup(?)
data ends
code segment
assume cs:code,ds:data
start proc far
mov ax,data
mov ds,ax
mov si,0
mov cx,0
L1: mov ah,01h
int 21h
cmp al,0dh
je LL
inc cx
sub al,30h
mov buffer[si],al
inc si
jmp L1
LL: mov si,0
mov al,buffer[si]
add al,30h
cmp al,2dh
jne L2
mov si,1
sub cx,2
xor ah,ah
mov al,buffer[si]
cmp cx,0
jbe L8
L7: inc si
&
buffer db 5 dup(?)
data ends
code segment
assume cs:code,ds:data
start proc far
mov ax,data
mov ds,ax
mov si,0
mov cx,0
L1: mov ah,01h
int 21h
cmp al,0dh
je LL
inc cx
sub al,30h
mov buffer[si],al
inc si
jmp L1
LL: mov si,0
mov al,buffer[si]
add al,30h
cmp al,2dh
jne L2
mov si,1
sub cx,2
xor ah,ah
mov al,buffer[si]
cmp cx,0
jbe L8
L7: inc si
&