Gaia Online [Bots] .:Open Source:.

[£åߥ®Ñth]

Releasing several of my bot sources for others to learn with.
Old bots for Gaia Online.
--------------------------------------------------

Gaia Auto Gambler for Slots:
Nothing special here but a gambler for being AFK.
*Mozilla Firefox version.*
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)
WinWait("http://www.gaiaonline.com - Gaia Slots", "")
If Not WinActive("http://www.gaiaonline.com - Gaia Slots", "") Then WinActivate("http://www.gaiaonline.com - Gaia Slots", "")
WinWaitActive("http://www.gaiaonline.com - Gaia Slots", "")
HotKeySet("{END}", "Terminate")

$slots = 1
While $slots = 1
MouseClick("left", 236, 490, 5)
MouseClick("left", 465, 490, 1)
Sleep(9000)
WEnd

Func Terminate()
Exit 0
EndFunc   ;==>Terminate

----------------------------------------------------------------------------
Gaia Auto Browser:
better then the old refreshers or golden gaia posting bump in threads and getting people ban. It didn't make allot of gold fast, but it was persistent in gaining about about 140 gold an hour by browsing the site.
Source:
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 2)
WinWait("Gaia ::", "")
If Not WinActive("Gaia ::", "") Then WinActivate("Gaia ::", "")
WinWaitActive("Gaia ::", "")
HotKeySet("{END}", "killthebot")

;~ Forum                    http://www.gaiaonline.com/forum/viewforum.php?f=140
;~ Home                     http://www.gaiaonline.com/
;~ My Gaia                  http://www.gaiaonline.com/mygaia/
;~ House                    http://www.gaiaonline.com/homes/index.php
;~ Journal                  http://www.gaiaonline.com/journal/
;~ Car                      http://www.gaiaonline.com/auto
;~ Quests                   http://www.gaiaonline.com/quest/
;~ Friend List              http://www.gaiaonline.com/profile/friendlist.php
;~ Mail                     http://www.gaiaonline.com/profile/privmsg.php
;~ Suscribed Threads        http://www.gaiaonline.com/profile/subscription.php
;~ Mini Comic               http://www.gaiaonline.com/newsroom/?type=weekly
;~ World Map                http://www.gaiaonline.com/map/
;~ Shops                    http://www.gaiaonline.com/gaia/shopping.php
;~ Arenas                   http://www.gaiaonline.com/gaiaarena/index.php?mode=listArenas
;~ Search                   http://www.gaiaonline.com/community/search.php
;~ Going Postal             http://www.gaiaonline.com/goingpostal/
;~ News Room                http://www.gaiaonline.com/newsroom/
;~ Collectables             http://www.gaiaonline.com/collectibles/
;~ Gaia Cash                http://www.gaiaonline.com/gaiacash/
;~ Gaia Store               http://www.gaiastore.com/servlet/StoreFront
;~ Mobil Downloads          http://www.gaiaonline.com/mobile/



$fuckgaia = 0

While $fuckgaia = 0
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^^^^^^Get the Daily Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/forum/viewforum.php?f=140")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/mygaia/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/homes/index.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/journal/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/auto")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/quest/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/profile/friendlist.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/profile/privmsg.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/profile/subscription.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/newsroom/?type=weekly")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/map/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/gaia/shopping.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/gaiaarena/index.php?mode=listArenas")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/community/search.php")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/goingpostal/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/newsroom/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/collectibles/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/gaiacash/")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiastore.com/servlet/StoreFront")
Send("{ENTER}")
Sleep(50000)
MouseMove(664, 184)
MouseClick("left")
Sleep(5000)
;~ ^^^^^^ Get Bonus
MouseMove(208, 41)
MouseDown("left")
MouseUp("left")
Sleep(50)
Send("http://www.gaiaonline.com/mobile/")
Send("{ENTER}")
Sleep(50000)
WEnd


Func killthebot()
Exit 0
EndFunc   ;==>killthebot

---------------------------------------------------------------------------
Source codes for the old fishing bots, "First ones made for gaia"
That made Gaia more popular.
I watched the online status grew from 15 to 20k online to 60 to 80k online. Even those these are out dated, the source is great for others to learn from since it was a simple code.
*They must be used with the gaia fishing hack. *See the attached file to get the hack. Hack
---------------------------------------------------------------------------
Red Bait:
#Include <Misc.au3>
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 2)     ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase
Opt("WinDetectHiddenText", 1)
Opt("PixelCoordMode", 2)        ;1=absolute, 0=relative, 2=client
Opt("MouseCoordMode", 2)        ;1=absolute, 0=relative, 2=client
WinWait("Gaia Online Fishing Hack", "")
If Not WinActive("Gaia Online Fishing Hack", "") Then WinActivate("Gaia Online Fishing Hack", "")
WinWaitActive("Gaia Online Fishing Hack", "")
Sleep(100)
HotKeySet("{END}", "killthebot")


$GMbreakin = PixelChecksum(62, 453, 650, 518)
;~ Check To see If someone broke in a private/passworded room."Like GM/Mod"
While $GMbreakin = PixelChecksum(62, 453, 650, 518)
If Not @error Then
MouseClick("left", 546, 241, 1)
Sleep(900)
ElseIf @error Then
Call("killthebot")
EndIf
WEnd

Func killthebot()
Exit 0
EndFunc   ;==>killthebot

Blue Bait:
#Include <Misc.au3>
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 2)
Opt("WinDetectHiddenText", 1)
Opt("PixelCoordMode", 2)        ;1=absolute, 0=relative, 2=client
Opt("MouseCoordMode", 2)        ;1=absolute, 0=relative, 2=clientWinWait("Gaia Online Fishing Hack", "")
If Not WinActive("Gaia Online Fishing Hack", "") Then WinActivate("Gaia Online Fishing Hack", "")
WinWaitActive("Gaia Online Fishing Hack", "")
Sleep(100)
HotKeySet("{END}", "killthebot")
$GMbreakin = PixelChecksum(62, 453, 650, 518)
;~ Check To see If someone broke in a private/passworded room."Like GM/Mod"
While $GMbreakin = PixelChecksum(62, 453, 650, 518)
If Not @error Then
MouseClick("left", 476, 241, 1)
Sleep(900)
ElseIf @error Then
Call("killthebot")
EndIf
WEnd

Func killthebot()
Exit 0
EndFunc   ;==>killthebot

Green Bait:
#Include <Misc.au3>
Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 2)
Opt("WinDetectHiddenText", 1)
Opt("PixelCoordMode", 2)        ;1=absolute, 0=relative, 2=client
Opt("MouseCoordMode", 2)        ;1=absolute, 0=relative, 2=client
WinWait("Gaia Online Fishing Hack", "")
If Not WinActive("Gaia Online Fishing Hack", "") Then WinActivate("Gaia Online Fishing Hack", "")
WinWaitActive("Gaia Online Fishing Hack", "")
Sleep(100)
HotKeySet("{END}", "killthebot")

$GMbreakin = PixelChecksum(62, 453, 650, 518)
;~ Check To see If someone broke in a private/passworded room."Like GM/Mod"
While $GMbreakin = PixelChecksum(62, 453, 650, 518)
If Not @error Then
MouseClick("left", 407, 241, 1)
Sleep(900)
ElseIf @error Then
Call("killthebot")
EndIf
WEnd

Func killthebot()
Exit 0
EndFunc   ;==>killthebot