Показать полную графическую версию : [addon - проект] VistaPath + дополнительные аддоны и разработки
Celeron D тоже не показывает что он таковой
вообщем по моему BMP самим вставлять)
DJ Electronic
03-07-2007, 16:57
aset, почему самим а как насчёт версии с программой я вот собрал 7z SFX внутри oeminfo.cmd oemlogo.exe и 2 папки amd и intel в них папки процессоров и в каждом oemlogo.bmp в oeminfo прописал в начале запуск oemlogo.exe и всё это дело запускается на T13 вес около 600кб, уже дистрибутив собрал и проверил :)
DJ Electronic
так выложи, пожалуйста
почему самим а как насчёт версии с программой я вот собрал 7z SFX внутри oeminfo.cmd oemlogo.exe и 2 папки amd и intel в них папки процессоров и в каждом oemlogo.bmp в oeminfo прописал в начале запуск oemlogo.exe и всё это дело запускается на T13 вес около 600кб, уже дистрибутив собрал и проверил
Если можно то хотелось бы исходный скрипт от oemlogo.exe получить :)
prokazzza
03-07-2007, 19:12
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
03-07-2007, 21:50
FLINT_ и другие,
Нашел ошибку:
$Extreme1 = StringRegExp($processor, '(Extreme', 0)
Надо исправить на:
$Extreme1 = StringRegExp($processor, '(Extreme)', 0)
Из-за этой скобки дальнейшая проверка прекращается и тупо копируется логотип просто Pentium.
А вообще готов скрипт где информация о процессоре берется непосредственно из реестра (CPUInfo.exe теперь не нужен). Но думаю надо потестировать с разными процессорами.
Кто заметит "косяки" - пишите. Будем исправлять.
Выложен набор из 57 логотипов CPU (http://shareua.com/files/10b01b/cpu57logo.7z.html):
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
03-07-2007, 22:57
DJ Electronic прав. Без sfx-архивов проще.
Уж больно красивые картинки выложил YuriPet. Придется переделать архив с логотипами, да и в скрипт чего-нибудь добавить.
Скрипт переделал. Заменены логотипы + добавлены новые.
Исправил свой пост (http://forum.oszone.net/post-518692-144.html)
Качайте, тестируйте, сообщайте об ошибках...
biggreeder В комментариях к переделанному скрипту написано, что в зависимости от типа процессора запускается sfx-архив с соответствующей картинкой. Наверно их тоже надо поправить, чтобы не вводить в заблуждение.
DJ Electronic
04-07-2007, 11:17
А как на счёт процессоров VIA ??? или их счас нет вобще, что смысла дописывать скрипт нет?
P.S. у меня Athlon XP логотип что то не очень понравился
biggreeder
04-07-2007, 12:25
DJ Electronic
А как на счёт процессоров VIA ???
У меня нет возможности их проверить. Поэтому не задействовал.
у меня Athlon XP логотип что то не очень понравился
Предлагай другой. Заменим.
P.S. Вообще всё направлено на самостоятельную модификацию под свои нужды.
DJ Electronic
04-07-2007, 12:41
biggreeder, это всё понятно, я думаю просто старый логотип оставить)
DJ Electronic
P.S. у меня Athlon XP логотип что то не очень понравилсяP.P.S. Все добросовестно "выдраны" из everest_cpuid.dllвот "туды" и жалобы направлять... ;)
FreeKnight
05-07-2007, 08:34
http://forum.oszone.net/post-518692-144.html
при использовании скрипта из этого поста не правильно производится определение типа процессора...
у меня Celeron D, а скрипт запихал логотип от Celeron
а при использовании скрипта из этого поста http://forum.oszone.net/post-606233-1023.html
все встало на свои места - красуется лого Celeron D
2 FreeKnight
А ты можешь экспортировать свою ветку из реестра и выложить её сюда ?
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0
Atlant1984
05-07-2007, 09:26
Скрипт определил Intel Pentium без HT, а стоит Intel Pentium 4 с HT. Прошлый скрипт определил все верно.
biggreeder
05-07-2007, 09:51
2 All
Я уже начинаю путаться в разных версиях скриптов. Поэтому, просьба при обнаружении "нестыковок" пишите так:
1. У меня процессор - ххххх
2. Со скриптом из поста 00000 - копируется логотип процессора xxxxx (со скриптом из поста 000001 - логотип процессора yyyyy, со скриптом из поста 000002 не работает вообще)
3. Значение параметра ProcessorNameString ветки реестра HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0сюда вставить значение ProcessorNameString
FreeKnight
05-07-2007, 13:46
2 Opolon
привожу ветку реестра:
HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0
"Component Information"=hex:00,00,00,00,00,00,00,00,00,00,00,00,01,00,00,00
"Identifier"="x86 Family 15 Model 4 Stepping 9"
"Configuration Data"=hex(9):ff,ff,ff,ff,ff,ff,ff,ff,00,00,00,00,00,00,00,00
"ProcessorNameString"=" Intel(R) Celeron(R) CPU 2.80GHz"
"VendorIdentifier"="GenuineIntel"
"FeatureSet"=dword:40073fff
"~MHz"=dword:00000af0
"Update Signature"=hex:00,00,00,00,03,00,00,00
"Update Status"=dword:00000006
"Previous Update Signature"=hex:00,00,00,00,03,00,00,00
"Platform ID"=dword:00000010]
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.