The Wiki for Tale 5 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:Oni/GrassAuto"

From ATITD5
Jump to navigationJump to search
(Created page with "---- Below is a general purpose grass/clay collecting macro. 1280x1024 resolution. 2nd F8 zoomed all the way in.<br> Copy and paste the below code into ACTool. ---- <pre> //Gen...")
 
Line 56: Line 56:
 
Procedure left // move left
 
Procedure left // move left
 
delay 200
 
delay 200
MousePos 360, 524
+
MousePos 150, 524
 
delay 100
 
delay 100
 
Leftclick
 
Leftclick
Line 64: Line 64:
 
Procedure right // move right
 
Procedure right // move right
 
delay 200
 
delay 200
MousePos 895, 522
+
MousePos 1130, 522
 
delay 100
 
delay 100
 
Leftclick
 
Leftclick

Revision as of 03:13, 23 September 2010


Below is a general purpose grass/clay collecting macro. 1280x1024 resolution. 2nd F8 zoomed all the way in.
Copy and paste the below code into ACTool.


//General purpose Grass and Clay collector. 1280x1024
//To begin, be in 2nd F8 view zoomed all the way in.
//hover your mouse over the icon
//you wish to collect in ATITD (i.e. be over a patch of clay or grass
//and have this program active.  Press F2, and the macro will start.
Constants
Red = 0
Green = 0
Blue = 0
XPos = 0
YPos = 0
CurrKey = 0
X2 = 0
Y2 = 0
End
SetConst XPos = {MouseX}
SetConst YPos = {MouseY}
LoadRGB $XPos, $YPos
SetConst Red = {RGBRed}
SetConst Blue = {RGBBlue}
SetConst Green = {RGBGreen}
SetConst CurrKey = {GlobalKeys}

//////////
Loop 10000
Call Grass
Call Left
Call Grass
Call Right
END
//////////

Procedure Grass
GetRed  $XPos, $YPos = $Red
	GetGreen  $XPos, $YPos = $Green
		GetBlue  $XPos, $YPos = $Blue
			setconst X2 = {mouseX}
			setconst Y2 = {mouseY}
			MousePos $XPos, $YPos
			
  		Leftclick
  		Mousepos $X2, $Y2
  		
		End
	End
End
End // Procedure Grass

Procedure left // move left
delay 200
MousePos 150, 524
delay 100
Leftclick
delay 3000
End // Procedure left

Procedure right // move right
delay 200
MousePos 1130, 522
delay 100
Leftclick
delay 3000
End // Procedure right