|
You last visited: Today at 02:47
Advertisement
[S]AutoIt Code [B]40 e*Gold
Discussion on [S]AutoIt Code [B]40 e*Gold within the AutoIt forum part of the Coders Den category.
06/18/2011, 00:39
|
#1
|
elite*gold: 0
Join Date: Feb 2011
Posts: 590
Received Thanks: 201
|
[S]AutoIt Code [B]40 e*Gold
Ich suche einen Code der Folgendes macht, wenn man das Mausrad drückt:
Er soll die rechte maustaste drücken, dann shift gedrückt halten, 0.3 Sekunden warten und dann die Linke maustaste drücken und dann wieder die rechte.
Wer mir einen funktionierenden Code abliefert bekommt 40 e*Gold.
Code einfach per PM senden.
Greets
Naval
|
|
|
06/18/2011, 01:08
|
#2
|
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
|
Quote:
Originally Posted by Naval
Ich suche einen Code der Folgendes macht, wenn man das Mausrad drückt:
Er soll die rechte maustaste drücken, dann shift gedrückt halten, 0.3 Sekunden warten und dann die Linke maustaste drücken und dann wieder die rechte.
Wer mir einen funktionierenden Code abliefert bekommt 40 e*Gold.
Code einfach per PM senden.
Greets
Naval
|
PHP Code:
#include<misc.au3>
$dll = DllOpen("user32.dll")
while 1
if _IsPressed("04",$dll) Then Start()
sleep(4)
WEnd
DllClose($dll)
Func Start()
MouseClick("right")
sleep(15)
Send("{SHIFTDOWN}")
sleep(300)
Send("{SHIFTUP}")
MouseClick("left")
sleep(21)
MouseClick("right")
EndFunc
|
|
|
06/18/2011, 01:16
|
#3
|
elite*gold: 0
Join Date: Dec 2008
Posts: 1,304
Received Thanks: 485
|
hm... irre ich mich, oder ist die dll-Sache unnötig? müsste nicht auch
PHP Code:
#include<misc.au3>
while 1 if _IsPressed("04") Then Start() sleep(4) WEnd
Func Start() MouseClick("right") sleep(15) Send("{SHIFTDOWN}") sleep(300) Send("{SHIFTUP}") MouseClick("left") sleep(21) MouseClick("right") EndFunc
gehen?
|
|
|
06/18/2011, 01:19
|
#4
|
elite*gold: 77
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
|
Quote:
Originally Posted by Reeek
hm... irre ich mich, oder ist die dll-Sache unnötig? müsste nicht auch
PHP Code:
#include<misc.au3>
while 1
if _IsPressed("04") Then Start()
sleep(4)
WEnd
Func Start()
MouseClick("right")
sleep(15)
Send("{SHIFTDOWN}")
sleep(300)
Send("{SHIFTUP}")
MouseClick("left")
sleep(21)
MouseClick("right")
EndFunc
gehen?
|
Es ist einfach schöner und auch sicherer. 
Aber du hast recht im Normalfall sollte deines auch gehen.
|
|
|
06/18/2011, 01:21
|
#5
|
elite*gold: 0
Join Date: Dec 2008
Posts: 1,304
Received Thanks: 485
|
mir ist das nur aufgefallen, da die dll niemals geschlossen wird... die While-Schleife läuft unendlich und somit wird das NACH der While-Schleife, abgesehen von Funktionen, nicht ausgeführt.
|
|
|
06/18/2011, 01:32
|
#6
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
autoit schliest automatisch alle handles und geöffneten files sobald es geschlossen wird =)
die methode, mit dem dllopen vor der schleife, ist allerdings hier deutlich geeigneter, da ansonsten bei jedem schleifendurchlauf die dll neu geladen werden müsste =)
|
|
|
06/18/2011, 01:51
|
#7
|
elite*gold: 0
Join Date: Dec 2008
Posts: 1,304
Received Thanks: 485
|
ne, das ist beides klar. Ich wollte damit sagen: die dll-close Zeile ist komplett unnötig ;D
aber das sind Kleinigkeiten... größtes Problem bei der Frage hier war wohl, welchen hexcode das Mausrad hat
|
|
|
06/18/2011, 11:54
|
#8
|
elite*gold: 0
Join Date: Feb 2011
Posts: 590
Received Thanks: 201
|
Danke an Shadow ;-D
Greets
Naval
|
|
|
 |
Similar Threads
|
Fehler bei AutoIT Code.
02/15/2011 - AutoIt - 0 Replies
Sooo, ich befasse mich seit fast 2 Tagen mit AutoIT.
Um mich etwas einzuüben, dachte ich mir, ich schreibe ein Script, das Fragen stellt, und dann alles zusammenfasst.
Aber mir ist ein Fahler passiert, den ich nicht finde.
Bis Zeile 19 klappt alles.
Dann kommt Error Meldung!
Hier das Script:
$name = inputbox ("Hallo..." , "verrätst du mir deinen Namen?" , "Hier bitte deinen Namen eingeben")
|
AutoIt Code to C++?
03/20/2010 - C/C++ - 4 Replies
Hi,
Ich hab mal eine kleine Frage kann man den simplen Code
#include <NomadMemory.au3>
#RequireAdmin
$open = _MemoryOpen(ProcessExists("....."))
While ProcessExists("......") = False
MsgBox(0, "Text", "öffne bitte ......exe")
WEnd
|
AutoIt exit code
02/04/2010 - Dekaron - 1 Replies
If all of you autoit scriptors can please add some sort of "exit" function to your scripts it would be great...its annoying having to right click and exit manually each time.
|
AutoIt Bot Code
05/20/2009 - AutoIt - 7 Replies
Ich hab versucht ein Bot mit den Befehlen ein Bild zu suche und das die Maus dort raufklickt zu scripten:
#include <ImageSearch.au3>
HotKeySet ( "{F10}" , "Start" )
HotKeySet ( "{F11}" , "Ende" )
$x1=0
$y1=0
Func Start ()
|
All times are GMT +1. The time now is 02:48.
|
|