|
|
| (9 intermediate revisions by the same user not shown) |
| Line 1: |
Line 1: |
| − | == Repeat Clicker ==
| + | :[[User:Kibble/Macros/Grass_Picker|Grass Picker]] |
| − | <pre>
| + | :[[user:Kibble/Macros/Repeat_Clicker|Repeat Clicker/Keypress]] |
| − | // Repeat Clicker
| |
| − | // coded by: kibble
| |
| − | | |
| − | // Instructions: Start the macro and hold the mouse cursor over the spot you wish to click
| |
| − | // and wait for the macro to start. It will save the location, you can move the | |
| − | // cursor after the macro starts.
| |
| − | | |
| − | // Declares
| |
| − | constants
| |
| − | objWindow = eGenesis Client // <-- Program Window Title
| |
| − | intCount = 500 // <-- Number of Times to Repeat
| |
| − | intDelay = 25 // <-- Delay in seconds between clicks
| |
| − | end // 15 = fish, 25 = limestone/dirt(no food)
| |
| − | | |
| − | constructs
| |
| − | MousePnt = list
| |
| − | end
| |
| − | | |
| − | // Init
| |
| − | SetActiveWindow $objWindow
| |
| − | delay 3 sec // <-- Delay before the macro saves the mouse position
| |
| − | listadd MousePnt, {MouseX}
| |
| − | listadd MousePnt, {MouseY}
| |
| − | delay 2 sec // <-- Delay before the macro starts after getting mouse position.
| |
| − | | |
| − | mousepos MousePnt[1], MousePnt[2]
| |
| − | leftclick
| |
| − | | |
| − | // Main
| |
| − | loop $intCount
| |
| − | delay $intDelay sec
| |
| − | setactivewindow $objWindow
| |
| − | mousepos MousePnt[1], MousePnt[2]
| |
| − | leftclick
| |
| − | end
| |
| − | </pre>
| |
| − | | |
| − | == Grass Picker ==
| |
| − | <pre>
| |
| − | // 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>
| |
