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.

Difference between revisions of "User:Kibble/Macros"

From A Tale in the Desert
Jump to navigationJump to search
m
Line 39: Line 39:
  
 
== Grass Picker ==
 
== Grass Picker ==
<pre>
+
{{:Grass Macro}}
// 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>
 

Revision as of 00:58, 5 February 2009

Repeat Clicker

// 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

Grass Picker

Macros