Code:
Dim $char[4]
HotKeySet("{F1}", "Write")
$posXinput =
$posYinput =
$posXbutton =
$posYbutton =
Func Write()
For $i = 1 To 3
$char[$i] = Chr(Random(65, 90, 1))
Next
MouseClick("left", $posXinput, $posYinput, 1)
Sleep(100)
Send($char[1] & $char[2] & $char[3])
Sleep(100)
MouseClick("left", $posXbutton, $posYbutton, 1)
EndFunc ;==>Write
While 1
WEnd
Script tut per klick auf F1 Folgendes:
1. Klickt an einer Position (z.B. eingabefeld)
2. Schreibt 3 zufällige Buchstaben
3. Klickt an einer Position (z.B. "absenden"-Feld)
Musst dir nur noch die Koordinaten für die Klick-Positionen raussuchen
1. Klick ist:
$posXinput =
$posYinput =
2. Klick:
$posXbutton =
$posYbutton =
AutoitWindowInfoTool