; main part
mov bx, OFFSET buffer
add bx, 1

iter:
 add bx, 1
 mov al, [bx]
 cmp al, 40h
 jbe nextword
 cmp al, 4Dh
 jbe print
 cmp al, 60h
 jbe nextword
 cmp al, 6Dh
 jbe print
 jmp nextword

print:
 mov ah, 2
 mov dl, al
 int 21h
 cmp al, 20h
 jz iter
 mov ah, 21h

znaki:
 cmp [bx + 1], ah
 jz printprobel
 add ah, 1
 cmp ah, 30h
 jbe znaki
 add bx, 1
 mov al, [bx]
 cmp al, 13
 jz cancel
 jmp print

nextword:
 cmp al, 20h
 jz iter
 add bx, 1
 mov al, [bx]
 cmp al, 13
 jz cancel
 jmp nextword

printprobel:
 mov ah, 2
 mov dl, 20h
 int 21h
 jmp iter

cancel:
 mov ah, 2
 mov dl, 10
 int 21h
 mov ah, 4ch
 int 21h

error_no_file:
 mov dl, 1
 mov ah, 2
 int 21h
 mov ah, 4ch
 int 21h

END