[HowTo]SpamBot in AutoIt erstellen

02/09/2011 16:29 HackTec#1
Wir brauchen als erstes :


[Only registered and activated users can see links. Click Here To Register...]

[Only registered and activated users can see links. Click Here To Register...]

...



wenn ihr beides habt macht ein neues projekt oder benutzt einfach das ( könnt es ja löschen wenn ihr net wollt :D )
[Only registered and activated users can see links. Click Here To Register...]




Quote:
#include <IE.au3>
Global $Paused
HotKeySet("{PAUSE}", "_Pause")
HotKeySet("{ESC}","_Exit")
HotKeySet("{NUMPAD0}", "_Markt")

die hotkeys


Quote:
while 1
Sleep(9999999999)
wend
die schleife


Quote:
Func _Pause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Pause"',0,0)
WEnd
ToolTip("")
EndFunc
script in pause modus


Quote:
Func _Markt()
Sleep(1)
Send("{B 1}")
Send("{A 1}")
Send("{N 1}")
Send("{N 1}")
Send("{E 1}")
Send("{D 1}")
Send("{! 1}")
Send("{S 1}")
Send("{P 1}")
Send("{A 1}")
Send("{M 1}")
Send("{- 1}")
Send("{B 1}")
Send("{L 1}")
Send("{O 1}")
Send("{C 1}")
Send("{K 1}")
Send("{T 1}")
Send("{ENTER}")
sleep(20)
Send("{s 1}")
Send("{c 1}")
Send("{a 1}")
Send("{n 1}")
Send("{- 1}")
Send("{i 1}")
Send("{p 1}")
Send("{- 1}")
Send("{ENTER}")
sleep(200)
Send("{. 1}")
sleep(200)
Send("{. 1}")
sleep(200)
Send("{. 1}")
sleep(200)
Send("{. 1}")
sleep(200)
Send("{. 1}")
sleep(200)
Send("{. 1}")
Send("{O 1}")
Send("{K 1}")
Send("{ENTER}")
$Paused = NOT $Paused
Sleep(99)
EndFunc
erste funktion
HotKeySet("{NUMPAD0}", "_Markt")

bei Send("{K 1}") heißt es das er einmal die K taste drueckt


wenn man sich das durchliest muesste man es direkt kapieren ^^

Quote:
Func _Exit()
Exit 0
EndFunc
und noch die exit funktion


kurze rede langer sinn ich bin dicht :D
02/09/2011 16:41 McFrodo#2
das ist kein How to, hast einfach code hin geschrieben fertig... nich mal begründet oder so
02/10/2011 15:46 HackTec#3
so besser? ^^^halloo ich war herbe dicht ^^
02/10/2011 17:09 hermy™#4
mach mal mit screnns udn so oder ein vid ich check des nich das is kein thx wert