// так как будем использовать 32-битный регистр {$ifndef ver80} function 3DNowSupport: Boolean; assembler; asm push ebx mov @Result, True mov eax, $80000000 dw $A20F cmp eax, $80000000 jbe @NOEXTENDED // 3DNow не поддерживается mov eax, $80000001 dw $A20F test edx, $80000000 jnz @EXIT // 3DNow поддерживается @NOEXTENDED: mov @Result, False @EXIT: pop ebx end; {$endif}