delphi – 如何探测英特尔?高级矢量扩展的可用性？

发布时间：2020-12-15 04:18:51 所属栏目：大数据来源：网络整理

导读：如何使用Delphi 2007检查盒子是否支持AVX. 我的问题仅限于查询CPU中的支持(假设操作系统正常/带有SP1的Windows 7). PDF文件名为Introduction to Intel? Advanced Vector Extensions 作者Chris Lomont解释了如何做到这一点,并提供了一个示例代码实现,但在c.

如何使用Delphi 2007检查盒子是否支持AVX.

我的问题仅限于查询CPU中的支持(假设操作系统正常/带有SP1的Windows 7).

PDF文件名为Introduction to Intel? Advanced Vector Extensions
作者Chris Lomont解释了如何做到这一点,并提供了一个示例代码实现,但在c.

它也可以在page获得.

解决方法

这是 Intel blog上给出的汇编代码的翻译：

function isAvxSupported: Boolean;
asm
{$IFDEF CPUX86}
    push ebx
{$ENDIF}
{$IFDEF CPUX64}
    mov r10,rbx
{$ENDIF}
    xor eax,eax
    cpuid
    cmp eax,1
    jb @not_supported
    mov eax,1
    cpuid
    and ecx,018000000h
    cmp ecx,018000000h
    jne @not_supported
    xor ecx,ecx
    db 0Fh,01h,0D0h //XGETBV
    and eax,110b
    cmp eax,110b
    jne @not_supported
    mov eax,1
    jmp @done
@not_supported:
    xor eax,eax
@done:
{$IFDEF CPUX86}
    pop ebx
{$ENDIF}
{$IFDEF CPUX64}
    mov rbx,r10
{$ENDIF}
end;

此代码适用于32位和64位版本的Delphi.

更新：注册保存代码,感谢@PhiS.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!