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.

User:Oni/OnionMac

From A Tale in the Desert
< User:Oni
Revision as of 23:22, 16 June 2009 by Oni. (talk | contribs)
Jump to navigationJump to search

Steps for Setup

IMPORTANT: This macro is iffy and extremely picky about mouse start position and is slighly sensitive to lag.
Works in 1680x1050 screen resolution only
DO NOT walk away while it is running, your character may run off and lose your onion seeds.. tsk tsk.. lol.

Step 1
Double F8 View zoomed all the way in (use ALT+L to lock the screen).
Turn OFF "plant all crops where you stand" option in "Options -> One click and related"
Have 8 Onion Seeds and 50 Water in Jugs in Inventory
Stand on sand next to Aqueduct.
Pin up the plant window in top LEFT of screen.
Pin up the Aqueduct window in the top RIGHT of screen.
Onion1.PNG

Step 2
FILL your jugs before starting!!
Click Plant (Onion Seeds).
Click the small North West move button once.
Place Mouse in starting position show in image (Tip of your mouse should be on the small red dot in pic).
(do not have Color Cop open, that is just there to show a zoomed version of the starting position).
Tab Over to ACTool and hit "F2".
Select on number of time to run.
Choose Task to run.
Click "Ok".
OnionStart.bmp


IF it screws up, adjust the starting position slightly and try again


Paste the following in to ACTool.


// Onion Growing macro made by Oni - Updated 6/16/09
// Works only with Aqueduct window pinned up in TOP RIGHT!
// Pin plant window in TOP LEFT!
// see image for mouse start location.

constants
	Batch = 0
	StartX = 0
	StartY = 0
	NewX = 0
	NewY = 0
	Job = 0
	MDelay = 100
	SDelay = 200
End

SetConst StartX = {MouseX}
SetConst StartY = {MouseY}
TimeStamp $StartX, $StartY

Form Veggie, Settings
	ed1=Editbox:Batch:1
	ed2=ComboBox:Project:Onions
End

FormLoad Veggie, Veggie.frm

if ShowForm Veggie
	set Batch = Veggie[ed1]
	case
	When Veggie[ed2] = Onions
		set Job = Onions
	End
else
	Stop
End

FormSave Veggie, Veggie.frm

Loop $Batch
	Call $Job
End

Procedure Onions
	MousePos 40, 10
	leftclick
	delay 1000
	MousePos 86, 160 // close plant window
	delay 50
	rightclick
	delay 50
		/// Plant 8 onions ///
		// (1) //
	MousePos 52, 43 // plant click
	delay 300
	rightclick
	delay 1077
	MousePos 45, 84 // NW
	delay 300
	rightclick
	delay 300
	MousePos 31, 162 // click "build"
	delay 300
	rightclick
	Delay 75
		// (2) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077
	MousePos 59, 78 // N //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75
		// (3) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077		
	MousePos 74, 84 // NE //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75	
		// (4) //	
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077			
	MousePos 82, 100 // E //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75		
		// (5) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077		
	MousePos 73, 115 // SE //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75		
		// (6) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077			
	MousePos 59, 123 // S //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75		
		// (7) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077			
	MousePos 44, 114 // SW //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75		
		// (8) //
	MousePos 52, 43 // plant click
	Delay 75
	rightclick
	delay 1077			
	MousePos 35, 101 // W //
	Delay 75
	rightclick
	delay 50
	MousePos 31, 162 // click "build"
	delay 50
	rightclick
	Delay 75	
	///// END PLANT ////

		
	// PIN 1 //
	Compute NewX = $StartX + 3
	Compute NewY = $StartY - 7
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 92

MousePos 174, 92 // pin 1
Delay 75
rightclick
Delay 75	

// PIN 2 //
	Compute NewX = $StartX + 41
	Compute NewY = $StartY - 28
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 177

MousePos 172, 178
Delay 75
rightclick
Delay 75		

// PIN 3 //
	Compute NewX = $StartX + 74
	Compute NewY = $StartY - 27
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 261

MousePos 173, 261
Delay 75
rightclick
Delay 75		
	
	// PIN 4 //
	Compute NewX = $StartX + 112
	Compute NewY = $StartY + 48
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 345

MousePos 172, 347
Delay 75
rightclick
Delay 75		
	
	// PIN 5 //
	Compute NewX = $StartX + 118
	Compute NewY = $StartY + 83
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 429

MousePos 173, 430
Delay 75
rightclick
Delay 75		
	
	// PIN 6 //
	Compute NewX = $StartX + 63
	Compute NewY = $StartY + 93
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 513

MousePos 172, 514
Delay 75
rightclick
Delay 75		
	
	// PIN 7 //
	Compute NewX = $StartX - 27
	Compute NewY = $StartY + 84
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 599

MousePos 173, 598
Delay 75
rightclick
Delay 75		
	
	// PIN 8 //
	Compute NewX = $StartX - 12
	Compute NewY = $StartY + 40 
	mousepos $NewX, $NewY
Delay 75
rightclick
Delay 75
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 75
	dragto 76, 683

MousePos 173, 682
Delay 75
rightclick
Delay 75
	
keys {F4}
	/////WATER////////
	/////Set1/////
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 75
		////////Fill Jugs///////
MousePos 1418, 60
delay 50
leftclick
delay 50	
MousePos 1415, 123
delay 50
leftclick
delay 50	
	//// LOOP 1
keys {F4}
	Compute NewX = $StartX + 110
	Compute NewY = $StartY - 16
	delay 10
	mousepos $NewX, $NewY
	LoadRGB $newX, $NewY
		while {RGBgreen} < 130
		delay 10
		LoadRGB $newX, $NewY
		delay 10
		keys {F4}
		delay 10
		End
		delay 3500
		keys {F4}
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 75	
	////////Fill Jugs///////
MousePos 1418, 60
delay 50
leftclick
delay 50	
MousePos 1415, 123
delay 50
leftclick
delay 50	
	/////Set2/////
keys {F4}
	Compute NewX = $StartX + 121
	Compute NewY = $StartY - 25
	delay 10
	mousepos $NewX, $NewY
	LoadRGB $newX, $NewY
		while {RGBgreen} < 130
		delay 10
		LoadRGB $newX, $NewY
		delay 10
		keys {F4}
		delay 10
		End
		delay 3500
		keys {F4}
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 75	
		////////Fill Jugs///////
MousePos 1418, 60
delay 50
leftclick
delay 50	
MousePos 1415, 123
delay 50
leftclick
delay 50
	/////Set3/////
keys {F4}
	Compute NewX = $StartX + 127
	Compute NewY = $StartY - 30
	delay 10
	mousepos $NewX, $NewY
	LoadRGB $newX, $NewY
		while {RGBgreen} < 130
		delay 10
		LoadRGB $newX, $NewY
		delay 10
		keys {F4}
		delay 10
		End
		delay 3500
		keys {F4}
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 75	
		////////Fill Jugs///////
MousePos 1418, 60
delay 50
leftclick
delay 50	
MousePos 1415, 123
delay 50
leftclick
delay 50	
	/////Set4/////
keys {F4}
	Compute NewX = $StartX + 137
	Compute NewY = $StartY - 37
	delay 10
	mousepos $NewX, $NewY
	LoadRGB $newX, $NewY
		while {RGBgreen} < 130
		delay 10
		LoadRGB $newX, $NewY
		Delay 75
		keys {F4}
		delay 10
		End
		delay 3500
		keys {F4}
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 750
	////// Harvest////////
MousePos 55, 123
Delay 75
rightclick
Delay 75
MousePos 55, 210
Delay 75
rightclick
Delay 75
MousePos 55, 291
Delay 75
rightclick
Delay 75
MousePos 55, 376
Delay 75
rightclick
Delay 75
MousePos 55, 461
Delay 75
rightclick
Delay 75
MousePos 55, 546
Delay 75
rightclick
Delay 75
MousePos 55, 631
Delay 75
rightclick
Delay 75
MousePos 55, 717
Delay 75
rightclick
Delay 75
	////////close pin///////
MousePos 173, 93
	Delay 75
	rightclick
	Delay 75
MousePos 173, 177
	Delay 75
	rightclick
	Delay 75
MousePos 171, 262
	Delay 75
	rightclick
	Delay 75
MousePos 173, 346
	Delay 75
	rightclick
	Delay 75
MousePos 173, 431
	Delay 75
	rightclick
	Delay 75
MousePos 173, 514
	Delay 75
	rightclick
	Delay 75
MousePos 172, 600
	Delay 75
	rightclick
	Delay 75
MousePos 174, 685
	Delay 75
	rightclick
	Delay 75

delay 6001
		
End