start:
mov ax, data
mov ds, ax
xor dx, dx
mov cx, 8
lea di, es:[massiv]
xor bx, bx
mov ax, 11d
cld
m1:
repne scasw
mov ax, [di-2]
call OutputInt
mov dx,offset strend
mov ah,9
int 21h
mov ax, 4c00h
int 21h
code ends
data Segment
massiv dw 11d, 11d, 66d, 665d, 66d, 344d, 266d, 5221d
strdsc db 6,0
strbuf db 6 dup (?)
strend db 13,10,'$'
data ends