Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <MsgBoxConstants.au3>
- ; Press Esc to terminate script, Pause/Break to "pause"
- Global $g_bPaused = False
- HotKeySet("\", "TogglePause")
- HotKeySet("{ESC}", "Terminate")
- HotKeySet("[", "MakeMaxWater")
- HotKeySet("]", "MakeFourtyFiveWater")
- HotKeySet("`", "MakeMaxFood")
- HotKeySet("=", "Trade")
- While 1
- Sleep(100)
- WEnd
- Func Trade()
- While 1
- Send("q")
- Sleep(100)
- Send("e")
- Sleep(Random(30000, 120000, 1))
- Wend
- EndFunc
- Func TogglePause()
- $g_bPaused = Not $g_bPaused
- While $g_bPaused
- Sleep(100)
- ToolTip('Script is "Paused"', 0, 0)
- WEnd
- ToolTip("")
- EndFunc ;==>TogglePause
- Func Terminate()
- Exit
- EndFunc ;==>Terminate
- Func MakeMaxFood()
- While 1
- Sleep(3000)
- Send("3")
- Sleep(3300)
- Send("3")
- Sleep(3300)
- Send("3")
- Sleep(3300)
- Send("3")
- Sleep(3300)
- Send("3")
- Sleep(3300)
- Send("4")
- Send("4")
- Sleep(15000)
- Send("4")
- Sleep(15000)
- Send("{SPACE}")
- Sleep(2000)
- WEnd
- EndFunc
- Func MakeMaxWater()
- While 1
- Sleep(3000)
- Send("1")
- Sleep(3300)
- Send("1")
- Sleep(3300)
- Send("1")
- Sleep(3300)
- Send("1")
- Sleep(3300)
- Send("1")
- Sleep(3300)
- Send("4")
- Send("4")
- Sleep(15000)
- Send("4")
- Sleep(15000)
- Send("{SPACE}")
- Sleep(2000)
- WEnd
- EndFunc
- Func MakeFourtyFiveWater()
- While 1
- Sleep(3000)
- Send("2")
- Sleep(3300)
- Send("2")
- Sleep(3300)
- Send("2")
- Sleep(3300)
- Send("2")
- Sleep(3300)
- Send("2")
- Sleep(3300)
- Send("4")
- Send("4")
- Sleep(15000)
- Send("4")
- Sleep(15000)
- Send("{SPACE}")
- Sleep(2000)
- WEnd
- EndFunc
- Func Food()
- While 1
- Sleep(3000)
- Send("{SPACE}")
- Sleep(2000)
- Send("{F7}")1
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("{F7}")
- Sleep(3200)
- Send("7")
- Sleep(27000)
- Send("{SPACE}")
- Wend
- EndFunc
- Func BOE()
- While 1
- Sleep(3000)
- Send("{SPACE}")
- Sleep(2000)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("{F8}")
- Sleep(3200)
- Send("7")
- Sleep(27000)
- Send("{SPACE}")
- Wend
- EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement