EUR0: Nostalgie... Tak já to vykopnu, abych to trochu ožilo. Už je to fakt léta, co jsem to viděl naposledy, tak mě klidně rozsekejte :)
mov si,pole
mov cx,10
xor dx,dx
cykl:
lodsw
(X)
else:
loop cykl
mov [v4],dx
kde na místo
(X)
patří buď
cmp ax,dx
(a) jb else (d) ja else
mov dx,ax
nebo
(b) and ax,1 (c) or ax,ax
jnz else
inc dx