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:Oni/Macros/Onion

From ATITD5
< User:Oni‎ | Macros
Revision as of 00:32, 17 October 2010 by Oni (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigationJump to search

Onions - 1680x1050 screen resolution


Setup

  • Turn Off: Right-Click Pins/Unpins a Menu.
  • Turn Off: Right-Click Opens a Menu as Pinned.
  • Turn Off: Plant all crops where you stand.
  • Turn Off: Automatically make all planted crops guild owned.


  • Have 8 Onion Seeds and 50 Water in Jugs.
  • See images below on screen setup/mouse starting position.


  • Pin the "Plant Onions" box in the Top Left.
  • Shown is also where the macro will click to fill jugs (Water Icon).

Onion1.PNG

  • Click the "Onion Seeds" (plant onions). You will see the following:

VeggiePos.PNG

  • Click the North West single move button ONCE (circled in red).

VeggiePos2.PNG

  • Place your mouse of the start Position as shown: (Tip of mouse pointer should be on the red dot)

Onion2.PNG

  • Tab over to ACTool and hit F2 (do not move the mouse)
  • Select the number of times to run and click ok.


// Onion Growing macro made by Oni
// see image for mouse start location.
// 1680x1050 screen resolution.

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 102
rightclick
Delay 102
	Compute NewX = $NewX + 78
	Compute NewY = $NewY - 24
	mousepos $NewX, $NewY
	Delay 102
	dragto 76, 92

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

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

MousePos 172, 178
Delay 102
rightclick
Delay 102		

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

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

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

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

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

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

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

delay 6001
		
End
Retrieved from "http://www.atitd.org/wiki/t5w/index.php?title=User:Oni/Macros/Onion&oldid=32667"