Checking for a condition throughout the script

[truther242]

So let's say that I have a script that writes words in notepad. It’s all working great until notepad suddenly decides to crash. How do I make sure that the program constantly checks “has notepad crashed?” while still running the main code?

So for example

$test = winactive(“notepad.exe”)
If $test = 0 then ;notepad crashed

How would I keep this running WHILE my code writes in notepad? If I were just to write

While 1
$test = winactive(“notepad.exe”)
If $test = 0 then ;notepad crashed

Well the code would be stuck here and the rest of the code would not be executed.

What I want to do is constantly check if notepad has crashed if it has stop whatever the main code is doing an relaunch notepad

Hope you understand

[Melba23]

truther242,

Use an Adlib function to check at regular intervals - your main script is only momentarily interrupted each time.

M23

[truther242]

truther242,

Use an Adlib function to check at regular intervals - your main script is only momentarily interrupted each time.

M23

works amazingly thanks

[truther242]

truther242,

Use an Adlib function to check at regular intervals - your main script is only momentarily interrupted each time.

M23

Until I tested it a few times it worked amazingly Anyways my problem is that after the adlib has been executed and relaunched notepad.exe the adlib function that runs throughout the program stops. How do I keep the function running after fixing the first crash?

I tried this but it does not seem to make the adlib function check every 250 ms again :<

AdlibRegister("Order",250)
Func order()
$test = WinActive("Notepad")
If $test = 0 then relauncnotepad()
endfunc
relauncnotepad()
AdlibRegister("Order",250)
Etc..
endfunc

Edited October 29, 2012 by truther242

[kylomas]

truther242,

The adlib will not stop till you unregister it. Your problem lies elsewhere. Are you sure that this test is true when you expect it to be?

If $test = 0 then relauncnotepad()

Also, how is notepad stopping?

kylomas

[truther242]

this is the code

expandcollapse popup

AdlibRegister("Order",250)
$Time = _Timer_Init()
main()

func main()
while 1
WinActivate("ChillControl V.exe")
MouseClick("left",438,423,2)
sleep(2000)
MouseClick("left",426,357,2)
sleep(2000)
MouseClick("left",442,580,2)

sleep(2000)

if $RunTime > 0.1 Then
WinActivate("ChillControl V.exe")
Send("!+{F4}")
$QTS = 1
EndIf

WEnd

EndFunc

func Order()
$Spot = WinActive("ChillControl V.exe")
$RunTime = _Timer_Diff($Time)
$RunTime = $RunTime / 1000
$RunTime = $RunTime / 60
ToolTip("RUNTIME " & $RunTime, 0 , 0)
if $Spot= 0 AND $QTS = 1 Then reset()

EndFunc
func reset()
Run("C:Program Files (x86)Antec CCChillControl V.exe")
sleep(2000)
$QTS = 0
$Time = _Timer_Init()
main()

EndFunc

for some reason the adlib function stops running after first reset

Edited October 30, 2012 by truther242

[kylomas]

truther242,

Tooltip may be blocking. Send your calc back to the main loop with a variable and issue the tooltip there.

kylomas

edit: I also would not call another func from the adlib. Send a true/false variable back to the mainloop and call from there.

Edited October 30, 2012 by kylomas