Опрос датчиков

Форумы Помощь по пакетуОпрос датчиков ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 177

Рейтинг: 24

#1: 2017-01-29 18:39:13 ЛС | профиль | цитата

Есть ли возможность опрашивать датчики материнской платы? (На предмет температур в первую очередь)

В HiAsm ничего подобного не нашла, видела тему на DELFI, но там человеку посоветовали обратится к WMI! Литературу на тему WMI я конечно нашла: http://microsin.net/adminstuff/windows/wmi.html вот только это мне мало помогло.

Для самостоятельных экзорцизмов в delfi да еще и со службой wmi моих познаний явно недостаточно.
Впрочем, даже и если вдруг и нашла бы я подобный код, то самостоятельно портировать его на HiAsm явно бы не смогла!

Вопрос собственно в следующем, может кто-нибудь уже занимался подобными делами на HiAsm? Поделитесь, пожалуйста!

карма: 1

Ответов: 16884

Рейтинг: 1239

#2: 2017-01-29 18:56:20 ЛС | профиль | цитата

Такое ?

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1

HWMonitor_x32_RUS_1.23.rar [429.5KB] [550]

Ответов: 177

Рейтинг: 24

#3: 2017-01-29 19:03:54 ЛС | профиль | цитата

Tad писал(а):

Такое ?

Угу, такое!

А в виде компонента HiAsm оно есть???

карма: 1

Ответов: 497

Рейтинг: 16

#4: 2017-01-29 20:49:39 ЛС | профиль | цитата

Нужно класс и свойства класса этих датчиков

карма: 1

]

Ответов: 204

Рейтинг: 2

#5: 2017-01-29 21:18:59 ЛС | профиль | цитата

А вот интересно, возможно вытащить информацию из БИОСа? Ведь там есть данные и по температуре и по напряжению и много чего другого!

Редактировалось 1 раз(а), последний 2017-01-29 21:25:27

карма: 1

Ответов: 16884

Рейтинг: 1239

#6: 2017-01-29 23:16:52 ЛС | профиль | цитата

ogrif, https://youtu.be/f57r-usib6A

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 204

Рейтинг: 2

#7: 2017-01-29 23:42:25 ЛС | профиль | цитата

Tad писал(а):

ogrif, https://youtu.be/f57r-usib6A

Не понял посыл.

Что такое BIOS, я думаю, тут знают все.
Намекаете что сморозил глупость, так скажите в чем она???
непонятно!

Редактировалось 1 раз(а), последний 2017-01-29 23:46:13

карма: 1

Ответов: 177

Рейтинг: 24

#8: 2017-01-31 00:59:18 ЛС | профиль | цитата

А по существу вопроса, кто-нибудь может ответить????
Что-то я сомневаюсь что за 12 лет существования проекта, никто и никогда не пытался считать показания температуры процессора!

Если в пределах HiAsm это невозможно, то почему?
Если возможно, то как?
Если возможно, но только исполняя танец с бубном, то каков танец и где, чёрт возьми, бубен??!

У меня всё!

Редактировалось 2 раз(а), последний 2017-01-31 01:01:46

карма: 1

Ответов: 8959

Рейтинг: 824

#9: 2017-01-31 10:55:42 ЛС | профиль | цитата

Lora, по всей видимости ответа на ваш вопрос нет

http://forum.hiasm.com/topic/66071

карма: 19

Ответов: 655

Рейтинг: 18

#10: 2017-01-31 23:06:36 ЛС | профиль | цитата

Lora, c WMI нет ничего сложного, очень удобно использовать VBS

Add(VBJScript,15114197,826,119)
{
 WorkPoints=#6:doWork|
 EventPoints=#5:onRes|
 Script=#23:Sub doWork (Data,Index)|0:|20:On Error Resume Next|0:|17:strComputer = "."|74:Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")|0:|65:Set col1= objWMIService.ExecQuery("Select * from Win32_BIOS",,48)|25:For each obj1 in col1    |34:     sys.onRes obj1.SerialNumber  |4:Next|75:Set col2= objWMIService.ExecQuery("Select * from Win32_PhysicalMemory",,48)|26:For each obj2 in col2     |32:     sys.onRes obj2.PartNumber  |4:Next|76:Set col3= objWMIService.ExecQuery("Select * from Win32_OperatingSystem",,48)|25:For each obj3 in col3    |34:     sys.onRes obj3.SerialNumber  |4:Next|70:Set col4= objWMIService.ExecQuery("Select * from Win32_Processor",,48)|25:For each obj4 in col4    |25:     sys.onRes obj4.Name |4:Next|74:Set col5= objWMIService.ExecQuery("Select * from Win32_physicalmedia",,48)|24:For each obj5 in col5   |33:     sys.onRes obj5.SerialNumber |33:Next                             |8:End sub	|
 UseName=0
}

Собственно тут https://social.msdn.microsoft.com/Forums/ru-RU/18ce0701-e87d-4414-a8b5-8be3908a21b8/reading-cpu-temperature-wmi?forum=vblanguage и тут http://stackoverflow.com/questions/24004300/batch-file-get-cpu-temperature-in-c-and-set-as-variable данная тема обсуждалась и есть примеры.

Один момент - некоторые производители не закладывают в материнскую плату возможность получать температуру процессора через ACPI, с коим общается WMI...
Пробуйте

Редактировалось 3 раз(а), последний 2017-01-31 23:08:17

карма: 0

Ответов: 497

Рейтинг: 16

#11: 2017-01-31 23:28:37 ЛС | профиль | цитата

...
Также на просторах интернета описывается один из вариантов - просматривать данные с материнской платы напрямую используя ISA шину. Способ надежный, но нужно знать адреса всех датчиков в зависимости от чипсета. По такой системе работает SpeedFan и многие подобные программы.
Лог работы SpeedFan с одного из подручных компьютеров:

Win9x:NO 64Bit:YES GiveIO:NO SpeedFan:YES
I/O properly initialized
Linked ISA BUS at $0290
Linked ATI SBx00 SMBUS at $0B00
Linked ISA BUS at $0CCB
SB7xx/8xx PM2 found on ISA at $CCB
Scanning ISA BUS at $0290...
SuperIO Chip=IT8712F(J)
IT8712F(J) found on ISA at $290
Scanning AtiIgp SMBus at $0B00...
Scanning ISA BUS at $0CCB...
Found SAMSUNG HD161GJ on AdvSMART
Found ST3500418AS on AdvSMART
Found on AdvSMART
Bad Attributes Checksum ($75)
Bad Thresholds Checksum ($22)
ATK0110 (MB=M4A78LT-M LE) found on ACPI
Found ATI Radeon HD 4800 Series
End of detection
Loaded 0 events

На данный момент задача решена установкой серии датчиков с общей шиной на порт RS-232. Этот способ удобен тем, что данные можно получить всегда независимо от железа и ПО. Но внешний вид оставляет желать лучшего.

карма: 1

]

Ответов: 177

Рейтинг: 24

#12: 2017-02-01 00:37:28 ЛС | профиль | цитата

Gunnman писал(а):

Один момент - некоторые производители не закладывают в материнскую плату возможность получать температуру процессора через ACPI, с коим общается WMI...

Да, я уже читала где-то об этом. Скрипты работающие с wmi не на всех машинах работают адекватно.
За ссылочки спасибо, почитаю! ))

RAWY_EX писал(а):

просматривать данные с материнской платы напрямую используя ISA шину

ISA шину!!!

Мы сейчас говорим о той самой шине, которая была еще на старых компьютерах АТ?! Откуда на современных компьютерах шина ISA? Или я что-то путаю???

Помню лет в 12, пыталась из старого компа выковырять старый модем из ISA слота, чуть все пальцы не переломала. Сидел намертво!

карма: 1

Форумы Помощь по пакетуОпрос датчиков ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)