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.

User:Shayra

From ATITD5
Revision as of 03:59, 23 September 2010 by Shayra (talk | contribs)
Jump to navigationJump to search

AC Tools Macro:

This is Dharma's Continuous Flaxer from T3. I had to modify the mouse position for Weeding with Water/Weeding. Other than that it is unchanged. It plants 12 beds and will continue to harvest as long as you have supplies.


// Dharma's Continuous Flaxing Macro V1.1

// Set your resolution to 1280 by 1024

// Make sure your ATITD window is maximized and AC Tool is not maximized, so the ATITD title bar is visible

// Pin open your planting window and drag it to the upper left corner.

// Enter Cartagropher View and zoom all the way in.

// Turn on "Enable hotkeys on flax"

// Turn off "Camera Moves quite fast" and "Camera moves unreasonably fast" options

// This macro works best on reasonably flat ground.

// It is tolerant of lag, but not impervious, so keep an eye on it.

// It might be more reliable if you have high frames per second, if you have trouble, try lowering your graphics settings.

// Look for comments below on how to customize

constants

	// plant is the number of flax beds to plant before stopping
	plant = 240

	MouseX = 0
	MouseY = 0

	MouseXStart = 0
	MouseYStart = 0

	cycle = 0

	moveTime = 1400

end

call Flax

procedure Test

	MousePos 100, 10
	Delay 300
	LeftClick
	Delay 1 sec
	MousePos 700, 512
	Call WeedAtMousePos

end

procedure Flax

	MousePos 100, 10
	Delay 300
	LeftClick
	Delay 1 sec

	while $plant >= 12

		Call PlantFlax

		loop 5
			Call MoveRight
			Call PlantFlax
		end

		Call MoveDown
		Call PlantFlax

		loop 5
			Call MoveLeft
			Call PlantFlax
		end

		Delay 10000 // Delay some time because the first weeds grow more slowly than the second

		loop cycle = 1 to 3

			if $cycle = 1
				MousePos 640, 250
			else
				MousePos 540, 250
			end

			Call WeedAtMousePos

			MousePos 850, 400
			Call WeedAtMousePos

			loop 3
				MousePos 1000, 450
				Call WeedAtMousePos
			end
			MousePos 980, 450
			Call WeedAtMousePos

			MousePos 750, 750
			Call WeedAtMousePos

			MousePos 450, 600
			Call WeedAtMousePos

			loop 3
				MousePos 250, 550
				Call WeedAtMousePos
			end

			MousePos 250, 550
			Call WeedAtMousePos
		end

		Call MoveLeft
		Call MoveUp

		compute $plant = $plant - 12
	end

end

procedure PlantGrid

	Call PlantFlax	
	loop 2
		Call MoveRight
		Call PlantFlax	
	end
	Call MoveDown
	Call PlantFlax	
	loop 2
		Call MoveLeft
		Call PlantFlax	
	end
	Call MoveDown
	Call PlantFlax	
	loop 2
		Call MoveRight
		Call PlantFlax	
	end

end

procedure PlantFlax

		MousePos 40, 40
		Call ClickFast
		Delay 800	

end

procedure WeedAtMousePos

		Compute MouseXStart = {MouseX}
		Compute MouseYStart = {MouseY}
		Compute MouseX = $MouseXStart + 7
		Compute MouseY = $MouseYStart - 11

		Call ClickFast
		Delay 200
		LoadRGB $MouseX,$MouseY
		// Force the menu to appear if it didn't appear
		While {RGBRed} < 200
			Call ClickFast
			Delay 200
			LoadRGB $MouseX,$MouseY
		End

		// Redisplay the menu until "Weed" appears
		Compute MouseX = $MouseXStart + 20
		Compute MouseY = $MouseYStart
		LoadRGB $MouseX,$MouseY
		While {RGBRed} > 0 and {RGBRed} < 120 and {RGBBlue} < 120 and {RGBGreen} < 120
			Call ClickFast
			Delay 200
			LoadRGB $MouseX,$MouseY
		End

		// Select "Weed"
		Compute MouseX = $MouseXStart + 30
		Compute MouseY = $MouseYStart - 4
		Call ClickFast
		MousePos $MouseX, $MouseY
		Call ClickFast
		Delay 1400

end

procedure MoveUp

		MousePos 640, 272
		Call ClickFast
		Delay $moveTime

end

procedure MoveDown

		MousePos 640, 752
		Call ClickFast
		Delay $moveTime

end

procedure MoveLeft

		MousePos 370, 532
		Call ClickFast
		Delay $moveTime

end

procedure MoveRight

		MousePos 880, 512
		Call ClickFast
		Delay $moveTime

end

procedure ClickFast

		Delay 250
		LeftClick
		Delay 50

end