[Release]Pickupbot

[meddi]

Hi,
Ich hab aus Langweile einen Pickupbote erstellt
F1=Start
F2=Pause
Hier ist ein Screen:

AhnLab-V3	2010.08.07.00	2010.08.06	-
AntiVir	8.2.4.34	2010.08.06	-
Antiy-AVL	2.0.3.7	2010.08.06	-
Authentium	5.2.0.5	2010.08.07	-
Avast	4.8.1351.0	2010.08.07	-
Avast5	5.0.332.0	2010.08.07	-
AVG	9.0.0.851	2010.08.07	-
BitDefender	7.2	2010.08.07	-
CAT-QuickHeal	11.00	2010.08.07	-
ClamAV	0.96.0.3-git	2010.08.07	-
Comodo	5672	2010.08.07	-
DrWeb	5.0.2.03300	2010.08.07	-
Emsisoft	5.0.0.36	2010.08.07	Trojan.Win32.Inject.aoxz!A2
eSafe	7.0.17.0	2010.08.05	-
eTrust-Vet	36.1.7773	2010.08.07	-
F-Prot	4.6.1.107	2010.08.07	-
F-Secure	9.0.15370.0	2010.08.07	Suspicious:W32/Malware!Gemini
Fortinet	4.1.143.0	2010.08.07	-
GData	21	2010.08.07	-
Ikarus	T3.1.1.84.0	2010.08.07	-
Jiangmin	13.0.900	2010.08.07	-
Kaspersky	7.0.0.125	2010.08.07	-
McAfee	5.400.0.1158	2010.08.07	-
McAfee-GW-Edition	2010.1	2010.08.06	Heuristic.BehavesLike.Win32.Packed.A
Microsoft	1.6004	2010.08.07	-
NOD32	5348	2010.08.06	-
Norman	6.05.11	2010.08.07	-
nProtect	2010-08-07.01	2010.08.07	-
Panda	10.0.2.7	2010.08.07	-
PCTools	7.0.3.5	2010.08.07	-
Prevx	3.0	2010.08.07	-
Rising	22.59.05.04	2010.08.07	-
Sophos	4.56.0	2010.08.07	-
Sunbelt	6700	2010.08.07	-
SUPERAntiSpyware	4.40.0.1006	2010.08.07	Trojan.Agent/Gen-Goo
Symantec	20101.1.1.7	2010.08.07	-
TheHacker	6.5.2.1.336	2010.08.07	-
TrendMicro	9.120.0.1004	2010.08.07	-
TrendMicro-HouseCall	9.120.0.1004	2010.08.07	-
VBA32	3.12.12.8	2010.08.04	-
ViRobot	2010.7.29.3961	2010.08.07	-
VirusBuster	5.0.27.0	2010.08.07	-

[xmoeglll]

wenns ein autoit pickubbot ist kannste den wieder einpacken des is ne sache von 5min und braucht eig keiner hier!!! außerdem gabs dafür glaub mal en sammelthread!! achso und nicht böse gemeint aber ....

PHP Code:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>


HotKeySet("{F10}", "_Start")
HotKeySet("{F11}", "_Stop")

$Form1_1 = GUICreate("PickupBot© by xmoegggl®", 279, 200, 351, 237)
$Start = GUICtrlCreateLabel("Start (F10)", 24, 40, 105, 33, $WS_GROUP)
$Stop = GUICtrlCreateLabel("Stop (F11)", 24, 80, 107, 33, $WS_GROUP)
GUISetState(@SW_SHOW)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd


Func _Start()

    While 1
        Send("y")
        Sleep(25)
    WEnd
EndFunc   ;==>_Start


Func _Stop()
    While 1
        Sleep(1500)
    WEnd

EndFunc   ;==>_Stop 


dass kann glaub ich fast jeder wenn ers will ...


EDIT: falls es nicht so en kack ding is dann sry aber davon gibts dann auch schon 2stk

okay es is ein autoit dingsda

[Metzer]

Gehört in den Sammelthread.

~ reported ~