Log in
Register
|
![[Quote]](./styles/templates/default/images/lang/en/icon_quote.gif "Reply with quote"){kind=icon}
Отправлено:
|
|
Тренировался на BGInfo
Пригодится для примера. Рядом со скриптом положить QRes Что то недокончил, не помню уже что --------------------- P.S. Подправил (убрал с панели задач, оставил в трее) Добавил процент ОЗУ кодENVI^ forcelocal=1 ENVI &nc=1 FIND --pid &pd, MSTR &I1=<1>%&pd% MSTR &T1=<2>%&pd% MSTR &nc=<3>%&pd% SET &ll=-100 WAIT 250 SCRN ScrW,ScrH calc l=%ScrW%-310 ww _SUB ww,L-100T-100W1H1,, call win _end _SUB win,L%l%T20W390H500,BGinfo+,,,#:0xC0C0C0, MENU ,Скрыть,ENVI @win.Visible=0 MENU ,Показать,ENVI @win.Visible=1 MENU ,Выйти,exit 2 ENVI @this.FONT=11:Tahoma FIND MEM=?,FullR REGI $HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0\ProcessorNameString,pr REGI $HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\BIOS\BaseBoardManufacturer,mp REGI $HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\BIOS\BaseBoardProduct,mpp LABE -left L9,L1T10W350H28,%mp% %mpp%,,0xFFFFFF#0xC0C0C0, LABE -left L9,L1T30W350H28,%pr%,,0xFFFFFF#0xC0C0C0, PBAR cpu,L1T54W215H15,0 TIME ,500, CALL proc CALL proc LABE -left L10,L1T80W100H15,RAM : %FullR% Mb,,0xFFFFFF#0xC0C0C0, LABE -left L20,L125T80W100H21,,*,0xFFFFFF#0xC0C0C0, LABE -left L11,L1T100W300H15,- - - - - - - - - - - - - - - - - - - - - - - - - - - ,,0xFFFFFF#0xC0C0C0, envi n=1 FDRV *ab DrvAll= *: FORX * %DrvAll%,CurDsk, {* FORM V= %CurDsk% SET AllDrv= %AllDrv% %CurDsk% FIND %CurDsk%\=?,FullS IFEX %CurDsk%\=?,FreeS team calc f1=%FullS%/1048576|calc f3=%FreeS%/1048576 calc #s1=((%f1%-%f3%)*100)/%f1% team CALC m=%n%*35+82|calc mm=%n%*35+100 IFEX $%f1%>1024,TEAM CALC f2=%f1%/1024|ENVI g= Gb!ENVI g= Mb IFEX $%f3%>1024,TEAM CALC f4=%f3%/1024|ENVI gg= Gb!ENVI gg= Mb team MSTR f=0,6,%f2%|MSTR ff=0,6,%f4% envi tx= LABE -left L%n%,L1T%m%W300H15,%CurDsk% %f% %g% free %ff% %gg%,,0xFFFFFF#0xC0C0C0, %tx% envi p=PBAR Pbar%n%,L1T%mm%W215H10,%s1% %p% ifex $%s1%>90,ENVI @Pbar%n%.percent=%s1%::0x0F1CEA calc n=%n%+1 } HKEY Ctrl+Alt+I,KILL *force \ _END _SUB proc FIND --pid &pd, MSTR &I2=<1>%&pd% MSTR &T2=<2>%&pd% CALC #&I21=%&I2% - %&I1% CALC #&T21=%&T2% - %&T1% CALC &P= 100 - 100 * %&I21% / %&T21% / %&nc% ##1 FIND $%P%=-0.0, SET P=0 IFEX $%P%<0, EXIT IFEX $%ll%=%P%, EXIT SET ll=%P% ENVI @cpu=%&P%;%&P%%% ENVI @cpu.percent=%&P%::0xEA0F29 ENVI &I1=%&I2% ENVI &T1=%&T2% IFEX MEMU=?,&MemU IFEX MEMA=?,&MemA CALC &vu= 100 - 100 * %MemU% / %MemA% ##1 ENVI @L20=busy: %&vu%% _END 
Last edited by avalat on Yesterday 10:47; edited 6 times in total |
|
[qpost=undefined] Да можно добавить еще производитель и модель материнской платы Код: HKLM\HARDWARE\DESCRIPTION\System\BIOS\BaseBoardManufacturer HKLM\HARDWARE\DESCRIPTION\System\BIOS\BaseBoardProduct 
|
|
Дамы и господа, для того, чтобы помочь вам скоротать время полета, на борту нашего лайнера имеются библиотека, кинозал, три бара, ресторан, бассейн и два теннисных корта. А теперь я попрошу вас пристегнуть ремни безопасности, потому что сейчас вместе со всей этой фигней мы попытаемся взлететь! 
|
|
Gvint64, в принципе korsak7 правильно заметил.
Не надо забивать кучу лишнего инфа. Хотя производитель и материнка не думаю что будут лишними. Но надо проверить на PE как будет работать. Будет ли все ето показывать. 
|
Page 2 of 3
Current time is: 03-Mar 01:38
All times are UTC + 3
|
You cannot post new topics in this forum
You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You cannot attach files in this forum You can download files in this forum |