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.

Seed Macro

From A Tale in the Desert
Revision as of 23:11, 22 December 2008 by Coyan (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigationJump to search
// make sure you pin your plant/flax window in the upper left corner of your screen
Constants
  CenterX = 637 // at 1280x1024 this is my center windowed
  CenterY = 527 // at 1280x1024 this is my center windowed
  VariableY = 527 // this doesn't need to be set, it gets set while running
  VariableX = 637 // this doesn't need to be set, it gets set while running
  TopY = 10 //Top of the window for zooming
  TopCY = 40 //Topclickable Y
  TopCX = 40 // Topclickable X
	Gridup = 5 //number of flax top to bottom
	Gridside = 5 //number of flax side to side
	Column = 1 //leave this at 1
	LittleDelay = 400 // delay for menu function
	NormDelay = 1000 //the delay between actions
	StartDelay = 3000 //this is the zoom in delay, larger means closer
END

Procedure START
	Keys {F8}
	Keys {F8}
	MousePos $CenterX,$TopY
	Delay $StartDelay
	MousePos $CenterX,$CenterY
End

Procedure PLANT
	MousePos $TopCX, $TopCY
	LeftClick
END
Procedure CLICKMENU
	Compute VariableX = $VariableX + 15
	Compute VariableY = $VariableY - 10
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick
END

Procedure TAKESEED
	Delay $NormDelay
	Compute VariableX = $CenterX
	Compute VariableY = $CenterY - 100
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick
	Call CLICKMENU
END

Procedure TAKESEEDEVEN
	Delay $NormDelay
	Compute VariableX = $CenterX + 53
	Compute VariableY = $CenterY - 50
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 35
	Compute VariableY = $CenterY + 25
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 35
	Compute VariableY = $CenterY + 75
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 20
	Compute VariableY = $CenterY + 75
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 20
	Compute VariableY = $CenterY + 85
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU
END

Procedure TAKESEEDODD
	Delay $NormDelay
	Compute VariableX = $CenterX + 73
	Compute VariableY = $CenterY + 30
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 45
	Compute VariableY = $CenterY - 25
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 45
	Compute VariableY = $CenterY - 80
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 30
	Compute VariableY = $CenterY - 95
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU

	Delay $NormDelay
	Compute VariableX = $CenterX + 15
	Compute VariableY = $CenterY - 95
	MousePos $VariableX, $VariableY
	Delay $LittleDelay
	LeftClick

	Call CLICKMENU
END

//This is where the actual macro starts, everything above are procedures
Call START
Delay $NormDelay
Compute Gridup = $Gridup-1
Compute VariableX = $CenterX+53

Loop $Gridside

	If $Column = 1 or $Column = 3 or $Column = 5 or $Column = 7
		Compute VariableY = $CenterY-50
	Else
		Compute VariableY = $CenterY+50
	End

	Call Plant
	Loop $Gridup
		MousePos $CenterX,$VariableY
		LeftClick
		Delay $NormDelay
		Call Plant
	END
	Compute $Column = $Column + 1
	MousePos $VariableX,$CenterY
	LeftClick
	Delay $NormDelay
END

Compute VariableX = $CenterX-(($Gridside)*50) //these take us back to the start of the grid
Compute VariableY = $CenterY + (($Gridup+2)*50)-20
MousePos $VariableX,$VariableY
LeftClick

Compute VariableX = $CenterX // set the mouse to hoover over the first flax patch
Compute VariableY = $CenterY-50
MousePos $VariableX, $VariableY
Delay 32000 //wait for the seeds to be there
LeftClick

loop 5

	Call CLICKMENU

	Loop $Gridup // do the first column of beds
		Call TAKESEED
	END

	Call TAKESEEDEVEN

	Call TAKESEEDODD

	Call TAKESEEDEVEN

	Call TAKESEEDODD

	Delay 2000
	
	Compute VariableX = $CenterX-(($Gridside-1)*50)+10 //these take us back to the start of the grid
	Compute VariableY = $CenterY + (($Gridup+1)*50)-20
	MousePos $VariableX,$VariableY
	LeftClick

	Compute VariableX = $CenterX // set the mouse to hoover over the first flax patch
	Compute VariableY = $CenterY-50
	MousePos $VariableX, $VariableY
	Delay 26500 //wait for the seeds to be there for the second and subsequent runs
	LeftClick

END

back to Macro list:[Mosaic Macros]