простейший watchdog для гпу майнера, для вин

[Djs0m]

vbs

set shell=createobject("wscript.shell")
do While i<10
i=1
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery ("SELECT * FROM Win32_Process WHERE Name = " & "'ваш майнер (имя процесса).exe'")
If colProcesses.Count = 0 Then
'Wscript.Echo " miner running."
shell.Run "%comspec% /K C:\m\miner.bat", 1, True
'Else
'For Each objProcess in colProcesses
'Wscript.Echo objProcess.CommandLine
'Next
End If
WScript.Sleep 300000
i=i-1
Loop

Edited 26 Aug 2016, 09:15 by Djs0m