Автор: Fred, Vladivostok (---.dialup.primorye.ru)
Дата: давно
Фред уже пришел ! Вам рецепт гинеколога нужен ? Получайте ! :-)))
@@ExecFunction$qp4FUNC proc near
push ebp
mov ebp,esp
add esp,-12
push ebx
push esi
mov eax,dword ptr [ebp+8]
@1:
mov edx,dword ptr [eax]
mov dword ptr [ebp-4],edx
lea edx,dword ptr [eax+8]
mov eax,dword ptr [eax+4]
mov dword ptr [ebp-8],eax
mov ecx,dword ptr [ebp-8]
test ecx,ecx
jns short @2
add ecx,3
@2:
sar ecx,2
sub ESP, dword ptr [ebp-8]
mov dword ptr [ebp-12] , ESP
xor eax,eax
cmp ecx,eax
jle short @4
@3:
mov ebx,dword ptr [ebp-12]
mov esi,dword ptr [edx]
mov dword ptr [ebx+4*eax],esi
@5:
inc eax
add edx,4
cmp ecx,eax
jg short @3
@4:
call DWORD PTR dword ptr [ebp-4]
add ESP, dword ptr [ebp-8]
@6:
pop esi
pop ebx
mov esp,ebp
pop ebp
ret
@@ExecFunction$qp4FUNC endp
| |
