User:Asnath/Timer

// This macro has been written for AC Tools // It is not dependent on screen resolution or view.

// Timer Macro // This simple macro will click on same position, a given number of time // for a given duration //-------------------------------------------------------------------------- // If the macro needs to click on a window menu, please pin window before start // In anycase, input data in the macro window which will appear TEHN position mouse. // Input : click interval in seconds (eg : your timer delay) // Input : Time while doing it // If you have to pin a window, make sure you pin it out of the way to avoid // overlapping with window message for out of timer if it appears. //--------------------------------------------------------------------------

constants

 StartX = 0
 StartY = 0
 Interval = 0
 Duration = 0
 DurationStop = 0
 Nbclick = 0
 I = 1

end

SetActiveWindow eGenesis Client

Form Timer, Settings

 ed1=Editbox:Interval between clicks in seconds:10
 ed2=Editbox:How long should it be running for in minutes:1

END

FormLoad Timer, Plan.frm // Get mouse coord for window

if ShowForm Timer

 Delay 3000
 Setconst startX = {mouseX}
 Setconst starty = {mouseY}
 Set Interval = Timer[ed1]
 Set Duration = Timer[ed2]
 Setconst startX = {mouseX}
 Setconst starty = {mouseY}

else

 stop

end

FormSave Timer, Timer.frm

Compute NbClick = $Duration*60/$Interval Compute Interval = $Interval*1000

While $I < $NbClick Mousepos $startX,$StartY Delay 20 Leftclick Delay 20 Delay $Interval Inc I End