Как проверить наличие у проца SSE3

Здравствуйте.
Такой вот вопросец
Пишу на Delphi с использованием asm
как програмно можно определить наличие у процессора SSE3?
В инете нашел такой совет

mov eax,1
cpuid

Если 26-ой бит в регистре EDX установлен, то SSE2 поддерживается.
Если 0-ой бит в регистре ECX установлен, то поддерживатеся SSE3.

так вот как на асме проверить вышеприведенное условие?

 

можно поставить SEH и вызвать SSE3 инструкцию

 

and ecx, 1
jz no_sse3

 

afybc
Зачем and советуешь? че уже test нету?

 

Это чтоб для наглядности =) Если ecx == 0, то не поддерживает. Если ecx == 1 - поддерживает.
А так конечно же можно и даже нужно test, если не требуется изменять операнд.

 

afybc
test это должно войти в привычку, ибо в след. проекте он может не глядя сделать багу, ибо сила привычки!

 

EvilsInterrupt
Ты опять советуешь использовать ограниченный набор инструкций? Нельзя сдерживать полёт мысли ассемблерщика, пугая его багами.

 

IceStudent
Это из опыта! Человек должен сразу обязан писать как можно правильный код! Почему, потому что возникнет меньше багов, и вырученное время из-за более правильного кода можно потратить на поиск более сложных багов или же для добавления новой возможности!

зы:
Я до сих пор не пойму почему не любят при создании пользовательских Прог, не системных, ООП юзать! Это гораздо облегчает и структурирует код! Я как перешел на ООП повысил производительность значительно. Щас вот балдею от XML облегчает создание конфигирирование ПО. Это я к тому что, если это не слишком трудно, то почему бы и не улучшить код сразу?

 

Ну да. Один раз сделал багу, так теперь никогда and не юзать?

 

Здравствуйте.

написал функцию определяющую наличие SSE3 у проца.
Как вы считаете алгоритм оптимален?
//========

function CheckSSE3(): Boolean;
label NoSSE3;
var
TempCheck: LongWord;
begin
TempCheck:= 1;
asm
push eax
push ebx
push ecx
push edx
mov eax,1
cpuid
test ecx, 1
jz NoSSE3
mov edx, 0
mov TempCheck, edx
NoSSE3:
pop edx
pop ecx
pop ebx
pop eax
end;
Result:= (TempCheck=0);
end;


//======

и если не сложно протестируйте прогу, оссобенно те у кого проц не держит SSE3.

Спасибо

 

Код (Text):

1. Function CheckSSE3(): Boolean; assembler;
2. asm
3.     mov     eax,1
4.     cpuid
5.     xor     eax,eax
6.     shr     ecx,1
7.     adc     eax,eax
8. end;

 

[deleted]

 

Код (Text):

1. __asm{
2.   xor eax,eax
3.   inc eax
4.   cpuid
5.   and ecx,1
6.   mov [Result],ecx
7. }

 

2n0name
Нам же не регистр нужно прибавить, а флаг переноса...

 

всем спасибо.
приятно было почувствовать себя ламером ))

 

точно. туплю.

 

Код (Text):

1.   xor eax,eax
2.   inc eax
3.   push eax
4.   cpuid
5.   pop eax
6.   and eax,ecx

 

Мда Это делается гораздо проще:

Код (Text):

1. function CheckSSE3:Boolean;
2. asm
3.   push ebx
4.   mov eax,1
5.   cpuid
6.   mov eax,ecx
7.   and eax,1
8.   pop ebx  
9. end;

PS: Не фиг се, сколько уже понаписали ))) Торможу, однако...

 

У dinoweb красивей

Имелось ввиду это.
Только можно mov eax,ecx вместо Result.

 

Да, ebx ещё сохранить, как у leo.