In diesem Thread machen die Leute nen Aimbot für: http://www.albinoblacksheep.com/flash/shoot
Ich habe das jetzt auch versucht:
Spoiler anzeigen
HotKeySet("O", "_Toggle")
Dim $toggle
$toggle = 0
While 1
Sleep(10)
WEnd
Func _Main()
While 1
Global $toggle
If $toggle Then
$pixelsearch = PixelSearch(50, 50, 50, 50, 0xFF0000)
If Not @error Then
MouseMove($PixelSearch[0], $PixelSearch[1])
Else
MsgBox(0, "Error", @error)
EndIf
EndIf
WEnd
EndFunc
Func _Toggle()
Global $toggle
If $toggle Then
$toggle = 0
Else
$toggle = 1
EndIf
_Main()
EndFunc
Nun gibt er leider blos immer Error 1 (Nicht gefunden) aus, selbst wenn ich die Maus auf dem Roten Feld habe....
Ich habe schon versucht mit PixelGetColor() den Farbwert auszulesen, aber da gibbt er auch 00FF0000 an, also scheint das der richtige zu sein.....
Wisst ihr woran das liegt?