Benutz doch einfach eine Variable und addiere sie nach jedem Tastendruck um 1. Dann noch eine einfache If-Abfrage rein und dein Problem ist gelöst, aber was soll das bringen?
#include <Misc.au3>
;Drücke F1-F5, um in eines der "Auswahlmenüs" zu kommen und dann nochmal F1-F5, um dann etwas zu senden. Drücke F12, um aus Auswahlmenüs rauszukommen.
While 1
If _IsPressed("70") Then
Sleep(400)
_F1()
ElseIf _IsPressed("71") Then
Sleep(400)
_F2()
ElseIf _IsPressed("72") Then
Sleep(400)
_F3()
ElseIf _IsPressed("73") Then
Sleep(400)
_F4()
ElseIf _IsPressed("74") Then
Sleep(400)
_F5()
EndIf
Sleep(10)
WEnd
Func _F1()
While 1
If _IsPressed("70") Then
Send("Hi")
Sleep(400)
Return 1
ElseIf _IsPressed("71") Then
Send("Hallo")
Sleep(400)
Return 1
ElseIf _IsPressed("72") Then
Send("Haaalllöööllle")
Sleep(400)
Return 1
ElseIf _IsPressed("73") Then
Send("Moin")
Sleep(400)
Return 1
ElseIf _IsPressed("74") Then
Send("Tach")
Sleep(400)
Return 1
ElseIf _IsPressed("7B") Then
Return 1
EndIf
Sleep(10)
WEnd
EndFunc
Func _F2()
While 1
If _IsPressed("70") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("71") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("72") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("73") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("74") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("7B") Then
Return 1
EndIf
Sleep(10)
WEnd
EndFunc
Func _F3()
While 1
If _IsPressed("70") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("71") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("72") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("73") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("74") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("7B") Then
Return 1
EndIf
Sleep(10)
WEnd
EndFunc
Func _F4()
While 1
If _IsPressed("70") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("71") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("72") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("73") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("74") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("7B") Then
Return 1
EndIf
Sleep(10)
WEnd
EndFunc
Func _F5()
While 1
If _IsPressed("70") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("71") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("72") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("73") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("74") Then
Send("Dein Text könnte hier stehen!")
Sleep(400)
Return 1
ElseIf _IsPressed("7B") Then
Return 1
EndIf
Sleep(10)
WEnd
EndFunc
[Fragen zu] Gui Hide & Show / Admin Rights / Func in Func 12/12/2010 - AutoIt - 29 Replies Hi Leute,
wie ihr oben ja bereits lesen könnt habe ich ein paar Fragen.
1. Könnte mir jmd. eine Hotkeyset-Func schreiben, womit ich mit nur einer (!) Taste die GUI verstecken und wieder anzeigen lassen kann ?
2. Gibt es etwas, dass dem gescripteten Tool von selbst Adminrechte verschafft? Ich rede NICHT von RequireAdmin, da muss man ja Administrator des PCs sein.
€:
Kann "#requireadmin" rausgezögert werden ?!
Ich möchte, dass das passiert, aber erst, wenn ich einen Knopf gedrückt...
wr func net 04/02/2010 - WarRock Hacks, Bots, Cheats & Exploits - 1 Replies Wenn ich wr starte und auf game starten klcike steht da "ERROR:Cannot Find Exeute file!
was muss ich machen habe win 7
Func in IE.au3 10/15/2009 - AutoIt - 26 Replies Hallo,
mal eine Frage zur IE.au3
Ich möchte im gleichen Fenster eine andere Adresse aufrufen,
kann ich das hiermit machen ?
IENavigate(ByRef $o_object, $s_Url, $f_wait = 1)
dann hab ich da mal 2 weitere fragen zu.
Was genau kommt bei $o_object rein und was ist mit dem ByRef ?
Vielen Dank falls mir geholfen werden kann.
Need help Func 04/11/2009 - GW Bots - 12 Replies Hi all, I have a little issue with the bot I'm doin using the tt6 move to engine. I'm trying the make it scan in front of my charc on the minimap to check if enemies are present.
So here's the func:
;scan if enemy is in front of us
Func ScanEnemy1()
PixelSearch(86, 460, 173, 516, $MonsterColor_Red, 10)
If @error then
Sleep( 100 )
PixelSearch(86, 460, 173, 516, $MonsterColor_Red, 10)
if @error then return False
EndIf
loot func 11/17/2008 - Guild Wars - 15 Replies Hi
Ich weis sowas gabs schonmal in dem Thermalquellen Bot von Blackworkxx glaub ich.
Ich hab mich auch grad dran versucht, aber ich find den Fehler einfach nicht mehr.
Im moment siehts so aus:
func _loot()
for $a= 0 to 8 step 1
sleep(100)