Вот сделал наконец финальный вариант, теперь она не падает под вин, делает свое черное дело и работает пралльно! :)
format PE console
jmp start
section '.data' data readable writeable
metka db '12397632'
section '.bss' data readable writeable
pack db 4 dup ?
section '.text' code readable executable
start:
pusha
xor ecx,ecx
mov cl, 4
mov esi, metka
mov edi, pack
cld
iter:
mov ah,0
lodsb
sub al, 0x30
shl al,4
mov ah, [esi]
sub ah, 0x30
xor al,ah
mov ah, 0
stosb
loop iter
popa
ret