| Code: |
program SendMacroCheck( who )
const PATH_TO_CHECK := "check";
const ANSWERING_TIME := 120;
var proc := Start_Script(PATH_TO_CHECK, { who, GetPid() } );
var result := Wait_For_Event(ANSWERING_TIME);
if (result == 0)
// Timeout!
SysLog(who.name + " is AFK!");
// Kill's the gump off the player's screen.
proc.Kill();
else
// Answered in time, no reaction.
return 1;
endif
endprogram
|
| Code: |
// Using yesNo gump (gumps-package) in this test
program check( params )
var who := params[1];
var pid := params[2];
var proc := GetProcess(pid);
// Return value does not matter; only the fact that player clicked.
YesNo(who, "Are you AFK?");
// Let timer script know that player clicked.
proc.SendEvent(1);
endprogram
|
