The Wiki for Tale 4 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.

If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.

User:Asnath/Timer

From A Tale in the Desert
< User:Asnath
Revision as of 12:11, 15 May 2009 by Asnath (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigationJump to search
// 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