Trade seeds for merchant leveling in Dwarf Fortress

trade.au3

Global $df_window = "Dwarf Fortress"
Global $sleep_time = 1000
AutoItSetOption("SendKeyDelay", 150)
AutoItSetOption("MouseClickDownDelay", 20)

; use standard scale
; center on your broker

For $i = 1 To 20
    WinWaitActive($df_window)

	Sleep($sleep_time)
	MouseClick("right", 552, 600, 2, 0)

	Sleep($sleep_time)
	MouseClick("left", 552, 600, 2, 0)

	Sleep($sleep_time)
	MouseClick("left", 972, 112, 1, 0)

	Sleep($sleep_time)
	MouseClick("left", 1024, 248, 1, 0)

	Sleep($sleep_time)
	MouseClick("left", 240, 156, 1, 0)
	;MouseClick("left", 240, 196, 1, 0)

	Sleep($sleep_time)
	Send("^t")

	Sleep($sleep_time)
	Send("see{ENTER}")

	Sleep($sleep_time)
	MouseMove(800, 242, 0)
	MouseClick("left")

	Sleep($sleep_time)
	Send("see{ENTER}{DOWN}{ENTER}")

	Sleep($sleep_time)
	MouseClick("right", 840, 986, 1, 0)

	Sleep($sleep_time)
	MouseClick("left", 840, 986, 1, 0)

	Sleep($sleep_time)
	Send("{ENTER}")

Next