|
You last visited: Today at 12:20
Advertisement
Femster umbennenung
Discussion on Femster umbennenung within the AutoIt forum part of the Coders Den category.
11/12/2010, 15:15
|
#16
|
elite*gold: 1 
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by omer36
was genau geht denn nicht? ändert es nicht den title von lc?
active ändert den title vom activen fenster.. (wie der name schon sagt)
also starte lc und führe dann das aus...
|
Also der title wird geändert aber er macht dann auf den geänderten Titel kein Controlsend.
|
|
|
|
11/12/2010, 15:21
|
#17
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
|
Quote:
Originally Posted by nilsheigener
Also der title wird geändert aber er macht dann auf den geänderten Titel kein Controlsend.
|
was auch logisch ist, bei dem hier?
Code:
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{tab}")
sleep (200)
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{f1}")
sleep(3200)
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{f2}")
wenn du das so startest müsste dir scite/au3 fehler anzeigen...
PHP Code:
#RequireAdmin
HotKeySet("{Numpad3}", "Beenden")
HotKeySet("{Numpad2}", "Starten")
Func starten()
$newname = Random(1000, 25000, 1)
WinSetTitle("[active]", "", $newname)
While 1
If StringRight(@MIN, 1) == 1 Then
ControlSend($newname, "", "", "{tab}")
Sleep(200)
ControlSend($newname, "", "", "{f1}")
Sleep(3200)
ControlSend($newname, "", "", "{f2}")
Sleep(1500)
EndIf
WEnd
EndFunc
Func beenden()
Exit
EndFunc
While 1
Sleep(100)
WEnd
|
|
|
|
|
11/12/2010, 15:27
|
#18
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by omer36
was auch logisch ist, bei dem hier?
Code:
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{tab}")
sleep (200)
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{f1}")
sleep(3200)
ControlSend([COLOR="Red"]LastChaos[/COLOR], "", "", "{f2}")
wenn du das so startest müsste dir scite/au3 fehler anzeigen...
PHP Code:
#RequireAdmin
HotKeySet("{Numpad3}", "Beenden")
HotKeySet("{Numpad2}", "Starten")
Func starten()
$newname = Random(1000, 25000, 1)
WinSetTitle("[active]", "", $newname)
While 1
If StringRight(@MIN, 1) == 1 Then
ControlSend($newname, "", "", "{tab}")
Sleep(200)
ControlSend($newname, "", "", "{f1}")
Sleep(3200)
ControlSend($newname, "", "", "{f2}")
Sleep(1500)
EndIf
WEnd
EndFunc
Func beenden()
Exit
EndFunc
While 1
Sleep(100)
WEnd
|
So hatte ich es als erstes schon. es bennent das fenster erfolgreich um, aber führt im fenster nicht die befehle (Tab,F1,F2) aus. Ich habe es grade auch probiert ohne If StringRight(@MIN, 1) == 1 Then hilft aber auch nicht.
mfg
|
|
|
|
|
11/12/2010, 15:42
|
#19
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
|
warum hast du eig. die "controlID" für lc nicht mit reingeschrieben? also bei controlsend
versuchs mal mit dem, vllt klappt ja dann...
|
|
|
|
|
11/12/2010, 15:50
|
#20
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Code:
#RequireAdmin
HotKeySet("{Numpad3}", "Beenden")
HotKeySet("{Numpad2}", "Starten")
While 1
Sleep(100)
WEnd
Func starten()
$newname = Random(1000, 25000, 1)
$hnewname = wingethandle($newname)
WinSetTitle("[active]", "", $newname)
While 1
If StringRight(@MIN, 1) == 1 Then
ControlSend($hnewname, "", "", "{tab}")
Sleep(200)
ControlSend($hnewname, "", "", "{f1}")
Sleep(3200)
ControlSend($hnewname, "", "", "{f2}")
Sleep(1500)
EndIf
WEnd
EndFunc
Func beenden()
Exit
EndFunc
Probier mal das, und bitte ein bisschen mehr Code Aufräumen, das heißt Functions nach unten 
|
|
|
|
|
11/12/2010, 15:51
|
#21
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by omer36
warum hast du eig. die "controlID" für lc nicht mit reingeschrieben? also bei controlsend
versuchs mal mit dem, vllt klappt ja dann...
|
PHP Code:
#RequireAdmin
HotKeySet("{Numpad3}", "Beenden")
HotKeySet("{Numpad2}", "Starten")
Func starten()
$newname = Random(1, 10, 1)
WinSetTitle("[active]", "", $newname)
While 1
ControlSend($newname, "", "[Class:Nksp]", "{tab}")
Sleep(200)
ControlSend($newname, "", "[Class:Nksp]", "{f1}")
Sleep(3200)
ControlSend($newname, "", "[Class:Nksp]", "{f2}")
Sleep(1500)
WEnd
EndFunc
Func beenden()
Exit
EndFunc
While 1
Sleep(100)
WEnd
So siehts jetzt aus und geht immer noch nicht.^^
|
|
|
|
|
11/12/2010, 16:00
|
#22
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
|
kann ja sein dass ich mich irre, aber soweit ich noch weiß, gilt das class:nksp als "title" von controlsend...
und die id müsste das sein (zumindest in lcUS)
ViewPort Window1
ControlSend($newname, "", "ViewPort Window1", "{tab}")
hmm?
|
|
|
|
|
11/12/2010, 16:22
|
#23
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by omer36
kann ja sein dass ich mich irre, aber soweit ich noch weiß, gilt das class:nksp als "title" von controlsend...
und die id müsste das sein (zumindest in lcUS)
ViewPort Window1
ControlSend($newname, "", "ViewPort Window1", "{tab}")
hmm?
|
Danke das du dir so viel zeit nimmst geht aber immer noch nicht.  ^^
|
|
|
|
|
11/12/2010, 16:28
|
#24
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Mal mein Script angucken und testen?
|
|
|
|
|
11/12/2010, 17:27
|
#25
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by pinguin94
Mal mein Script angucken und testen?
|
Mhh das geht danke euch allen.^^ hatte deinen Script nicht gesehen (bin wohl blind).
edit: geht nun allerdings noch nicht multiclient tauglich. Am besten wäre wenn sich der script dann auch nur auf das geänderte fenster bezieht.
|
|
|
|
|
11/12/2010, 18:14
|
#26
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,254
|
dann machs doch einfach so:
per winsettitle änderste eines der fenster.
den 2.fenster lässte wie es ist, und startest dein bot auf ihn...
mit dem geänderten spiels tdu dann so weiter...
ohne iwelche Random() dies das...
|
|
|
|
|
11/12/2010, 20:26
|
#27
|
elite*gold: 0
Join Date: Sep 2010
Posts: 210
Received Thanks: 45
|
Also hier ist mal die Lösung....
Quote:
#RequireAdmin
#include <PostMessage.au3>
$start="no"
$handle=1
HotKeySet("{Numpad4}", "Beenden")
HotKeySet("{Numpad3}", "Windowname")
HotKeySet("{Numpad2}", "stoppen")
HotKeySet("{Numpad1}", "Starten")
Func Windowname()
$newname = Random(1, 10, 1)
WinSetTitle("[active]", "", $newname)
$handle=WinGetHandle("[active]")
EndFunc
While 1
If $start="yes" Then
_PostMessage_Send($handle,"{Tab}")
Sleep(1500)
_PostMessage_Send($handle,"{F1}")
Sleep(1500)
_PostMessage_Send($handle,"{F2}")
Sleep(1500)
EndIf
Sleep(10)
WEnd
Func Starten()
$start="yes"
EndFunc
Func beenden()
Exit
EndFunc
Func stoppen()
$start="no"
EndFunc
|
Die Includes sind hier :
Die beiden .au3 Datein in Include Ordner und du brauchst nur den PostMessage.au3 zu includen.....
Gut dabe ist auch dass diese Art des Tastensendes keine Nebenwirkung hat wie ControlSend...
ControlSend läst Tasten einrasten wärend der Bot aktiv ist ... 
|
|
|
|
|
11/13/2010, 10:13
|
#28
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by Lighthex
Also hier ist mal die Lösung....
Die Includes sind hier :
Die beiden .au3 Datein in Include Ordner und du brauchst nur den PostMessage.au3 zu includen.....
Gut dabe ist auch dass diese Art des Tastensendes keine Nebenwirkung hat wie ControlSend...
ControlSend läst Tasten einrasten wärend der Bot aktiv ist ... |
Der kklappt nun aller letzte frage und thread ist geklärt:#
wo muss ich jetzt inden script von lighthex das aeinbauen:
If StringRight(@MIN, 1) == 1 Then
bei If´s tue ich mich immer schwer.^^
edit so hier:
PHP Code:
#RequireAdmin
#include <PostMessage.au3>
$start="no"
$handle=1
HotKeySet("{Numpad4}", "Beenden")
HotKeySet("{Numpad3}", "Windowname")
HotKeySet("{Numpad2}", "stoppen")
HotKeySet("{Numpad1}", "Starten")
Func Windowname()
$newname = Random(1, 10, 1)
WinSetTitle("[active]", "", $newname)
$handle=WinGetHandle("[active]")
EndFunc
While 1
If $start="yes" and StringRight(@MIN, 1) == 1 Then
_PostMessage_Send($handle,"{Tab}")
Sleep(1500)
_PostMessage_Send($handle,"{F1}")
Sleep(1500)
_PostMessage_Send($handle,"{F2}")
Sleep(1500)
EndIf
Sleep(10)
WEnd
Func Starten()
$start="yes"
EndFunc
Func beenden()
Exit
EndFunc
Func stoppen()
$start="no"
EndFunc
|
|
|
|
|
11/13/2010, 17:56
|
#29
|
elite*gold: 2
Join Date: Mar 2008
Posts: 1,778
Received Thanks: 1,222
|
Code:
#RequireAdmin
#include <PostMessage.au3>
$start="no"
$handle=1
HotKeySet("{Numpad4}", "Beenden")
HotKeySet("{Numpad3}", "Windowname")
HotKeySet("{Numpad2}", "stoppen")
HotKeySet("{Numpad1}", "Starten")
Func Windowname()
$newname = Random(1, 10, 1)
WinSetTitle("[active]", "", $newname)
$handle=WinGetHandle("[active]")
EndFunc
While 1
If ($start="yes") and (StringRight(@MIN, 1) == 1) Then
_PostMessage_Send($handle,"{Tab}")
Sleep(1500)
_PostMessage_Send($handle,"{F1}")
Sleep(1500)
_PostMessage_Send($handle,"{F2}")
Sleep(1500)
EndIf
Sleep(10)
WEnd
Func Starten()
$start="yes"
EndFunc
Func beenden()
Exit
EndFunc
Func stoppen()
$start="no"
EndFunc
Klammern um beide Zustände der If Abfrage.
|
|
|
|
|
11/13/2010, 18:15
|
#30
|
elite*gold: 1
Join Date: Aug 2009
Posts: 3,021
Received Thanks: 1,842
|
Quote:
Originally Posted by pinguin94
Code:
#RequireAdmin
#include <PostMessage.au3>
$start="no"
$handle=1
HotKeySet("{Numpad4}", "Beenden")
HotKeySet("{Numpad3}", "Windowname")
HotKeySet("{Numpad2}", "stoppen")
HotKeySet("{Numpad1}", "Starten")
Func Windowname()
$newname = Random(1, 10, 1)
WinSetTitle("[active]", "", $newname)
$handle=WinGetHandle("[active]")
EndFunc
While 1
If ($start="yes") and (StringRight(@MIN, 1) == 1) Then
_PostMessage_Send($handle,"{Tab}")
Sleep(1500)
_PostMessage_Send($handle,"{F1}")
Sleep(1500)
_PostMessage_Send($handle,"{F2}")
Sleep(1500)
EndIf
Sleep(10)
WEnd
Func Starten()
$start="yes"
EndFunc
Func beenden()
Exit
EndFunc
Func stoppen()
$start="no"
EndFunc
Klammern um beide Zustände der If Abfrage. |
Ok merkte aber das es auch ohne die Klammern ging.^^
Kann geclosed werden.
|
|
|
|
All times are GMT +2. The time now is 12:20.
|
|
