Difference between revisions of "Grass Macro"

Latest revision as of 04:46, 5 February 2009

@@ Line 1: / Line 1: @@
-<pre>
+:[[Macros]]
-// Grass Picker
-// coded by: kibble
-// Instructions:
-// Make sure there is a grass icon in the same spot of the screen when
-// stepping to the left and right.
-// Start the Macro and hold your mouse over the grass icon.
-// Wait for the macro to start picking grass.
-// Declares
-constants
-  objWindow = eGenesis Client       // <-- Program Window Title
-  intCount = 500                    // <-- Number of Times to Repeat
-  intDelay = 5                      // <-- Seconds in delay between Picks
-  bSwitch = 0
-end
-constructs
-  MousePnt = list
-end
-// Init
-SetActiveWindow $objWindow
-delay 3 sec                         // <-- Delay before the mouse position is captured
-listadd MousePnt, {MouseX}
-listadd MousePnt, {MouseY}
-delay 2 sec                         // <-- Delay before start after mouse capture
-mousepos MousePnt[1], MousePnt[2]
-leftclick
-// Main
-loop $intCount
-  delay $intDelay sec
-  call Move
-  delay 1 sec
-  mousepos MousePnt[1], MousePnt[2]
-  leftclick
-end
-// Procedures
-procedure Move
-  if $bSwitch = 0
-    keys {left}
-    setconst bSwitch = 1
-  else
-    keys {right}
-    setconst bSwitch = 0
-  end
-end
-</pre>