.exe zu .au3

04/11/2008 18:14 Numaron Goes Green#1
Mein Freund hat für mich einen Bot gebastelt und ihn mir zugeschickt, nur leider als .exe-Datei.

Da ich neugierig bin, will ich wissen, wie dieser funktioniert :)

Ist es irgendwie möglich diese in eine.au3-Datei zu machen?
04/11/2008 18:18 Azunai#2
schick mir die exe mal via pm, evtl kann ich dir den code nachbilden
04/11/2008 19:05 Azunai#3
Code:
$A = Random(4000, 4200)
$B = Random(1000, 1200)
$C = Random(2000, 2200)
$D = Random(3000, 3200)
$E = Random(7000, 7200)
$F = Random(7000, 7300)
$G = Random(5000, 5200)
$H = Random(6000, 6200)
$I = 0
$J = 0
Sleep($B)
Do
	Call("WINTERGARTEN")
	Call("LAUFEN")
	Call("QUEST")
	Call("AUFGEBEN")
	Send("{H}")
	Sleep(100)
	MouseClick("left", 349, 161, 1, 1)
	Sleep(500)
	If PixelGetColor(616, 252) = (7164538) Then
		Send("{H}")
		Call("SPENDEN")
	Else
		Send("{H}")
	EndIf
	Sleep(100)
	$J = $J + 1
Until $J = 9999999

Func WINTERGARTEN()
	Sleep(Random(100, 150))
	Send("{V}")
	Sleep(Random(100, 200))
	If PixelGetColor(137, 797) = (39) Then
		Send("{A down}")
		Sleep(1050)
		Send("{A up}")
		Sleep(100)
		Send("{Ö}")
		Sleep(100)
		Send("{Space}")
		Sleep(10840)
	EndIf
	If PixelGetColor(137, 797) = (65831) Then
		Send("{A down}")
		Sleep(1050)
		Send("{A up}")
		Sleep(100)
		Send("{Ö}")
		Sleep(100)
		Send("{Space}")
		Sleep(7450)
	EndIf
	If PixelGetColor(137, 797) = (14540267) Then
		Send("{D down}")
		Sleep(320)
		Send("{D up}")
		Sleep(100)
		Send("{Ö}")
		Sleep(100)
		Send("{Space}")
		Sleep(6810)
	EndIf
	Send("{R}")
	Sleep(Random(12000, 12100))
EndFunc


Func LAUFEN()
	Send("{F5}")
	Sleep(500)
	MouseClick("left", 1069, 113, 1, 1)
	Sleep(300)
	Send("{F6}")
	Sleep(500)
	MouseClick("left", 1025, 111, 1, 1)
	Sleep(300)
	Send("{F7}")
	Sleep(500)
	MouseClick("left", 1122, 153, 1, 1)
	Sleep(300)
	Send("{F8}")
	Sleep(500)
	MouseClick("left", 1123, 304, 1, 1)
	Sleep(600)
	MouseClick("left", 1240, 585, 1, 1)
	Sleep(600)
	MouseClick("left", 1240, 710, 1, 1)
	Sleep(600)
	MouseClick("left", 1240, 835, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 835, 1, 1)
	Sleep(2100)
	MouseClick("left", 1325, 585, 1, 1)
	Sleep(200)
	MouseClick("left", 1325, 710, 1, 1)
	Sleep(200)
	MouseClick("left", 1325, 835, 1, 1)
	Sleep(5500)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 835, 1, 1)
	Sleep(2100)
	MouseClick("left", 1350, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1350, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1350, 835, 1, 1)
	Sleep(4400)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 835, 1, 1)
	Sleep(2100)
	MouseClick("left", 1375, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1375, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1375, 835, 1, 1)
	Sleep(1000)
	Send("{F5}")
	Sleep(500)
	MouseClick("left", 1107, 62, 1, 1)
	Sleep(3000)
	MouseClick("left", 1400, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(300)
	MouseClick("left", 1400, 710, 1, 1)
	Sleep(300)
	MouseClick("left", 1400, 835, 1, 1)
	Sleep(2100)
	MouseClick("left", 1325, 585, 1, 1)
	Sleep(7000)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(3000)
	MouseClick("left", 1325, 585, 1, 1)
	Sleep(2500)
EndFunc


Func QUEST()
	Send("{E down}")
	Sleep(2000)
	Send("{E up}")
	Sleep(200)
	Send("{Space}")
	Sleep(2000)
	MouseClick("left", 832, 603, 1, 1)
	Sleep(1000)
	MouseClick("left", 1290, 585, 1, 1)
	Sleep(100)
	MouseClick("left", 712, 568, 1, 1)
	Sleep(4500)
	Send("{Space}")
	Sleep(500)
	MouseClick("left", 694, 551, 1, 1)
	Sleep(100)
EndFunc


Func AUFGEBEN()
	Send("{-}")
	Send("{R}")
	Send("{e}")
	Send("{s}")
	Send("{i}")
	Send("{g}")
	Send("{n}")
	Send("{Enter}")
	Sleep(3300)
	MouseClick("left", 803, 474, 1, 1)
	Sleep($F)
EndFunc


Func SPENDEN()
	Send("{G}")
	Sleep(300)
	MouseClick("left", 763, 108, 1, 1)
	Sleep(9000)
	Send("{W down}")
	Sleep(900)
	Send("{W up}")
	Send("{Q down}")
	Sleep(1300)
	Send("{Q up}")
	Sleep(50)
	Send("{V}")
	Sleep(100)
	Send("{Space}")
	Sleep(1500)
	MouseClick("left", 708, 478, 1, 1)
	Sleep(1000)
	MouseClick("left", 680, 531, 1, 1)
	Sleep(200)
	MouseClick("left", 763, 108, 1, 1)
	Sleep(9000)
	Send("{P}")
	Sleep(300)
	MouseClick("left", 683, 378, 1, 1)
	Sleep(300)
	MouseClick("left", 609, 509, 2, 1)
	Sleep(200)
	MouseClick("left", 597, 571, 2, 1)
	Send("{P}")
	Sleep(100)
	Send("{G}")
	Sleep(100)
EndFunc
04/11/2008 19:32 -Anthrax-#4
ach wie gemein.....mein link dazu wurde gelöscht bei der alten version davon ^^
04/11/2008 19:37 scbiz#5
Quote:
Originally Posted by -Anthrax- View Post
ach wie gemein.....mein link dazu wurde gelöscht bei der alten version davon ^^
Ich glaube, dass mein Link auch nicht lange in meinem Post bleibt. Vor den Decompilern haben diese geskillten Leute (wie MarcoPolo1990), die ausschließlich mit AU3 arbeiten können, zu viel Angst. :rolleyes:
04/11/2008 19:41 Azunai#6
daher versuch ich nichtmal die links zu posten :P
04/12/2008 00:38 Term!nX#7
Gibts eigentlich was gegen den Obfuscator von au3?
04/12/2008 11:13 Azunai#8
gute frage wenn 2 post vorher des ding liegt :P
04/12/2008 15:11 Valvepro#9
bitchbi was hab ich dir gesagt >.<
04/12/2008 15:32 Azunai#10
was ? ich habs doch nicht gepostet xD und auch nicht irgendwem gegeben :P
04/13/2008 12:32 Term!nX#11
Quote:
Originally Posted by bitchbi View Post
gute frage wenn 2 post vorher des ding liegt :P
Ein Obfuscation rückgängig-macher ist kein decompiler...

(woher hätte ich wissen sollen, dass ein derartiges Tool enthalten ist, wenn es als decompiler bezeichnet wird, nich so frech mein lieber :F)
04/13/2008 16:46 Azunai#12
komm sei ma still hier :)
du lässt dich garnetmehr bei icq blicken :P
04/14/2008 14:55 Term!nX#13
Nee dat stimmt schon, ich hasse alle instant messenger :>
04/15/2008 01:45 -Anthrax-#14
trillian astra ist doch nice ;P
04/15/2008 13:26 Term!nX#15
Es liegt am Wesen der Instantmessenger :>