[Opolon]

Celeron D тоже не показывает что он таковой

[aset]

вообщем по моему BMP самим вставлять)

[DJ Electronic]

aset, почему самим а как насчёт версии с программой я вот собрал 7z SFX внутри oeminfo.cmd oemlogo.exe и 2 папки amd и intel в них папки процессоров и в каждом oemlogo.bmp в oeminfo прописал в начале запуск oemlogo.exe и всё это дело запускается на T13 вес около 600кб, уже дистрибутив собрал и проверил

[Tau]

DJ Electronic
так выложи, пожалуйста

[Opolon]

почему самим а как насчёт версии с программой я вот собрал 7z SFX внутри oeminfo.cmd oemlogo.exe и 2 папки amd и intel в них папки процессоров и в каждом oemlogo.bmp в oeminfo прописал в начале запуск oemlogo.exe и всё это дело запускается на T13 вес около 600кб, уже дистрибутив собрал и проверил

Если можно то хотелось бы исходный скрипт от oemlogo.exe получить

[prokazzza]

Opolon

Вот исходный код

Код:

#cs
----------------------
Приложение: копирование логотипа процессора в Свойсва системы

Автор скрипта: biggreeder
----------------------
#ce
;предотвращение возможности множественного запуска скрипта
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
#NoTrayIcon

;Открытие окна Свойства системы
Run (@ScriptDir & '\CPUInfo.exe','',@SW_SHOWMINIMIZED )

WinWait ( 'CPUInfo v2.2.0 - Freeware', '' )
;Получение данных о процессоре
$processor = ControlGetText ( 'CPUInfo v2.2.0 - Freeware', '', 'TStaticText26' )
ProcessClose ( "CPUInfo.exe")

;Проверка наличия в названии процессора искомой аббревиатуры

;AMD

$Mobile1 = StringRegExp($processor, '(Mobile)', 0)
$Athlon1 = StringRegExp($processor, '(Athlon)', 0)
$641 = StringRegExp($processor, '(64)', 0)
$FX1 = StringRegExp($processor, '(FX)', 0)
$MP1 = StringRegExp($processor, '(MP)', 0)
$X21 = StringRegExp($processor, '(X2)', 0)
$XP1 = StringRegExp($processor, '(XP)', 0)
$Sempron1 = StringRegExp($processor, '(Sempron)', 0)
$Opteron1 = StringRegExp($processor, '(Opteron)', 0)
$Turion1 = StringRegExp($processor, '(Turion)', 0)
$Duron1 = StringRegExp($processor, '(Duron)', 0)
$K61 = StringRegExp($processor, '(K6)', 0)
$AMD1 = StringRegExp($processor, '(AMD)', 0)

;Intel

$Pentium1 = StringRegExp($processor, '(Pentium)', 0)
$41 = StringRegExp($processor, '(4)', 0)
$Extreme1 = StringRegExp($processor, '(Extreme', 0)
$III1 = StringRegExp($processor, '(III)', 0)
$M1 = StringRegExp($processor, '(M)', 0)
$Xeon1 = StringRegExp($processor, '(Xeon)', 0)
$H1 = StringRegExp($processor, '(HT)', 0)
$Celeron1 = StringRegExp($processor, '(Celeron)', 0)
$Core1 = StringRegExp($processor, '(Core)', 0)
$Duo1 = StringRegExp($processor, '(Duo)', 0)
$Solo1 = StringRegExp($processor, '(Solo)', 0)
$Itanium1 = StringRegExp($processor, '(Itanium)', 0)
$21 = StringRegExp($processor, '(2)', 0)
$Intel1 = StringRegExp($processor, '(Intel)', 0)
$Quad1 = StringRegExp($processor, '(Quad)', 0)

;В зависимости от типа процессора запуск sfx-архива с соответствующей картинкой для AMD
If $Athlon1 = 1 AND $641 = 1 AND $Mobile1 = 1 Then
	Run ( @ScriptDir&'\AMD\Mobile Athlon64.exe')
	Exit
EndIf
If $Athlon1 = 1 AND $641 = 1 Then
	RunWait ( @ScriptDir&'\AMD\Athlon64.exe')
	Exit
EndIf
If $Athlon1 = 1 AND $FX1 = 1 Then
	Run ( @ScriptDir&'\AMD\AthlonFX.exe')
	Exit
EndIf
If $Athlon1 = 1 AND $MP1 = 1 Then
	Run ( @ScriptDir&'\AMD\AthlonMP.exe')
	Exit
EndIf
If $Athlon1 = 1 AND $X21 = 1 Then
	Run ( @ScriptDir&'\AMD\AthlonX2.exe')
	Exit
EndIf
If $Athlon1 = 1 AND $XP1 = 1 Then
	Run ( @ScriptDir&'\AMD\AthlonXP.exe')
	Exit
EndIf
If $Mobile1 = 1 AND $Sempron1 = 1 Then
	Run ( @ScriptDir&'\AMD\Mobile Sempron.exe')
	Exit
EndIf
If $Opteron1 = 1 AND $641 = 1 Then
	Run ( @ScriptDir&'\AMD\Opteron64.exe')
	Exit
EndIf
If $Turion1 = 1 AND $X21 = 1 Then
	Run ( @ScriptDir&'\AMD\TurionX2.exe')
	Exit
EndIf
If $Turion1 = 1 Then
	Run ( @ScriptDir&'\AMD\Turion64.exe')
	Exit
EndIf
If $Athlon1 = 1 Then
	Run ( @ScriptDir&'\AMD\Athlon.exe')
	Exit
EndIf
If $Sempron1 = 1 Then
	Run ( @ScriptDir&'\AMD\Sempron.exe')
	Exit
EndIf
If $Duron1 = 1 Then
	Run ( @ScriptDir&'\AMD\Duron.exe')
	Exit
EndIf
If $K61 = 1 Then
	Run ( @ScriptDir&'\AMD\K6.exe')
	Exit
EndIf
If $AMD1 = 1 Then
	Run ( @ScriptDir&'\AMD\AMD.exe')
	Exit
EndIf

;В зависимости от типа процессора запуск sfx-архива с соответствующей картинкой для Intel
If $Pentium1 = 1 AND $III1 = 1 AND $M1 = 1 Then
	RunWait ( @ScriptDir&'\Intel\PentiumIIIM.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $III1 = 1 AND $Xeon1 = 1 Then
	Run ( @ScriptDir&'\Intel\PIIIXeon.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $41 = 1 AND $H1 = 1 Then
	Run ( @ScriptDir&'\Intel\Pentium4HT.exe')
	Exit
EndIf
If $Core1 = 1 AND $Duo1 = 1 AND $21 = 1 Then
	Run ( @ScriptDir&'\Intel\Core2Duo.exe')
	Exit
EndIf
;------------------------------------------
If $Core1 = 1 AND $Extreme1 = 1 Then
	Run ( @ScriptDir&'\Intel\Core2Extreme.exe')
	Exit
EndIf
If $Core1 = 1 AND $Quad1 = 1 Then
	Run ( @ScriptDir&'\Intel\Core2Quad.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $Extreme1 = 1 Then
	Run ( @ScriptDir&'\Intel\PentiumExtreme.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $III1 = 1 Then
	Run ( @ScriptDir&'\Intel\PentiumIII.exe')
	Exit
EndIf
If $Celeron1 = 1 AND $M1 = 1 Then
	Run ( @ScriptDir&'\Intel\CeleronM.exe')
	Exit
EndIf
If $Core1 = 1 AND $Duo1 = 1 Then
	Run ( @ScriptDir&'\Intel\CoreDuo.exe')
	Exit
EndIf
If $Core1 = 1 AND $Solo1 = 1 Then
	Run ( @ScriptDir&'\Intel\CoreSolo.exe')
	Exit
EndIf
If $Itanium1 = 1 AND $21 = 1 Then
	Run ( @ScriptDir&'\Intel\Itanium2.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $M1 = 1 Then
	Run ( @ScriptDir&'\Intel\PentiumM.exe')
	Exit
EndIf
If $Pentium1 = 1 AND $41 = 1 Then
	Run ( @ScriptDir&'\Intel\Pentium4.exe')
	Exit
EndIf
;------------------------------------------
If $Pentium1 = 1 Then
	Run ( @ScriptDir&'\Intel\PentiumD.exe')
	Exit
EndIf
If $Itanium1 = 1 Then
	Run ( @ScriptDir&'\Intel\Itanium.exe')
	Exit
EndIf
If $Xeon1 = 1 Then
	Run ( @ScriptDir&'\Intel\Xeon.exe')
	Exit
EndIf
If $Celeron1 = 1 Then
	Run ( @ScriptDir&'\Intel\Celeron.exe')
	Exit
EndIf
If $Intel1 = 1 Then
	Run ( @ScriptDir&'\Intel\Intel.exe')
	Exit
EndIf

Exit

[biggreeder]

FLINT_ и другие,
Нашел ошибку:

$Extreme1 = StringRegExp($processor, '(Extreme', 0)

Надо исправить на:

Код:

$Extreme1 = StringRegExp($processor, '(Extreme)', 0)

Из-за этой скобки дальнейшая проверка прекращается и тупо копируется логотип просто Pentium.
А вообще готов скрипт где информация о процессоре берется непосредственно из реестра (CPUInfo.exe теперь не нужен). Но думаю надо потестировать с разными процессорами.
Кто заметит "косяки" - пишите. Будем исправлять.

[YuriPet]

Выложен набор из 57 логотипов CPU:
20 шт. -"AMD"; 29 шт. -"intel"; 2 шт. -"TMT" и 6 шт. -"VIA".
Размер у всех: 88×99 пикселей.
Форматы:
29 шт. - "BMP 24 bpp" (прямоугольной формы);
28 шт. - "BMP 32 bpp" (непрямоугольной формы с "прозрачностью").
P.S. Качество, мне кажется, получше...
P.P.S. Все добросовестно "выдраны" из everest_cpuid.dll

[biggreeder]

DJ Electronic прав. Без sfx-архивов проще.

Уж больно красивые картинки выложил YuriPet. Придется переделать архив с логотипами, да и в скрипт чего-нибудь добавить.
Скрипт переделал. Заменены логотипы + добавлены новые.
Исправил свой пост
Качайте, тестируйте, сообщайте об ошибках...

[FLINT]

biggreeder В комментариях к переделанному скрипту написано, что в зависимости от типа процессора запускается sfx-архив с соответствующей картинкой. Наверно их тоже надо поправить, чтобы не вводить в заблуждение.