und wie kann man das als exe speichern zum rumschicken?^^^^
Send("{TAB}{TAB}{TAB} ")
Send("{TAB}")
Sleep(500)
Send("{TAB}")
Sleep(500)
Send("{TAB}")
Sleep(500)
Send(" ")
AutoItSetOption("WinTitleMatchMode", 4)
$windowname="Perfect World International"
$handle = WinGetHandle($windowname, "")
If @error Then
MsgBox(4096, "Error", "Fenster konnte nicht gefunden werden")
Else
while 1
ControlSend($windowname,'','',"asd")
sleep(150)
WEnd
EndIf
Func Attack()
While 1
$pixel = 0x314755
PixelGetColor ( 572, 68)
If $pixel = 0x314755 Then
Sleep(100)
ControlSend($windowname, '', '', "1")
Sleep (1000)
ControlSend($windowname, '', '', "2")
Sleep (1000)
ControlSend($windowname, '', '', "3")
Sleep (1000)
ControlSend($windowname, '', '', "4")
ControlSend($windowname, '', '', "{F4}")
Else
ControlSend($windowname, '', '', "{Tab}")
EndIf
WEnd
EndFunc