Bot Programmierkurs by NetMax

Page 7 of 7 « First 56 7
04/27/2012 13:39 Dziunia#91
Everythink ok thanks a lot ;)
08/09/2012 11:57 Yiv#92
Bei mir funktioniert das "senden im Hintergrund" nicht.

Mein Code:
PHP Code:
AutoItSetOption("WinTitleMatchMode", 4)
$windowname="Spam.txt - Editor"
$handle = WinGetHandle($windowname, "")
If @error Then
    MsgBox(4096, "Error", "Fenster konnte nicht gefunden werden")
Else
    while 1
        ControlSend($windowname, '', '', "Test{ENTER}")
        sleep(150)
    WEnd
EndIf 
Wenn ich das jetzt ausführe (und ja "Spam.txt - Editor" ist offen) sendet er den Text nur, wenn ich das Fenster aktiv habe (im Vordergrund). Wenn ich nun aber beispielsweise ein anderes Editorfenster im Vordergrund habe, sendet er nicht!

Wer kann mir helfen?
08/13/2012 22:09 leDakon#93
Könntest du auch vllt ein Tutorial machen wie man ein Bot für zb " Realm of the Mad God " Programmiert? :)
12/16/2012 15:04 110coder#94
Huhu, habe auch mal angefangen. Wollte das per Start also Y das Programm loslegt.
Jetzt muss ich aber immer wieder die "Start" Taste drücken.


HotKeySet("{ende}", "Terminate")
HotKeySet ("{y}", "start")

Func start()
Send ("{enter}")
Sleep (3000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (7000)
Send ("{ESC}")
EndFunc


Func Terminate()
Exit 0
EndFunc

while 1
sleep (100)
WEnd
12/18/2012 00:43 Requiable#95
Quote:

HotKeySet("{ende}", "Terminate")
HotKeySet ("{y}", "start")

$startstop = false
Func start()
$startstop = Not $startstop
If $startstop Then
While 1
Send ("{enter}")
Sleep (3000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (5000)
Send ("{enter}")
Sleep (7000)
Send ("{ESC}")
WEnd
Else
While 1
Sleep(10)
WEnd
EndFunc


Func Terminate()
Exit 0
EndFunc

while 1
sleep (100)
WEnd
nun kannst du über y starten und stoppen und er macht es in einer schleife.
01/11/2013 18:01 gforke#96
danke für das tutorial wollte mir damit eine art bot machen der halte alle paar millisekunden die taste eins drückt aber wenn ich das program starten will kommt immer die fehler meldung
ControlSend(windowname, '','', "1")
ControlSend(windowname^ ERROR

Error: Missing separator character after keyword.
das ist der code den ich benutzt habe kann mir bitte jemand sagen wo der fehler liegt
AutoItSetOption("WinTitleMatchMode", 4)
Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
$zeitLeveln = InputBox("Frage?","Wielange Leveln bis geschlafen wird? (zeit in Millisekunden)")
$zeitSchlafen = InputBox("Frage?","Wielange soll geschlafen werden? (zeit in Millisekunden)")
$timer1 = TimerInit ()
$windowname="Don´t Starve"
$handle = WinGetHandle($windowname, "")
if @error Then
MsgBox(4096, "Error", "Could not find the correct window")
Else

While 1
IF(TimderDiff($timer1) > $zeitLeveln) Then
ControlSend(windowname, '','', "1")
Sleep($zeitSchlafen)
ControlSend($Windowname, '', '', "1")
$timer1 = TimerInit()
EndIf
ControlSend($windowname,'',''," ")
Sleep(150)
WEnd


EndIf



Func TogglePause()
$Paused = Not $Paused
While $Paused
Sleep(100)
WEnd
EndFunc

Func Terminate()
Exit 0
EndFunc
01/12/2013 12:43 110coder#97
Code:
While 1
IF(TimderDiff($timer1) > $zeitLeveln) Then
ControlSend(windowname, '','', "1")
Sleep($zeitSchlafen)
ControlSend($Windowname, '', '', "1")
$timer1 = TimerInit()
EndIf
ControlSend($windowname,'',''," ")
Sleep(150)
WEnd


EndIf
Hast groß geschrieben und sonst immer klein das w...
bei ControlSend($Windowname, '', '', "1")
01/12/2013 12:43 Requi#98
Schau dir das mal genau an
Code:
ControlSend(windowname,....)
Variablen werden mit $ definiert. Dies hast du dort vergessen :D
07/26/2013 09:30 Hackslary21st#99
Quote:
Originally Posted by DaJuBi View Post
Bei mir funktioniert das "senden im Hintergrund" nicht.

Mein Code:
PHP Code:
AutoItSetOption("WinTitleMatchMode", 4)
$windowname="Spam.txt - Editor"
$handle = WinGetHandle($windowname, "")
If @error Then
    MsgBox(4096, "Error", "Fenster konnte nicht gefunden werden")
Else
    while 1
        ControlSend($windowname, '', '', "Test{ENTER}")
        sleep(150)
    WEnd
EndIf 
Wenn ich das jetzt ausführe (und ja "Spam.txt - Editor" ist offen) sendet er den Text nur, wenn ich das Fenster aktiv habe (im Vordergrund). Wenn ich nun aber beispielsweise ein anderes Editorfenster im Vordergrund habe, sendet er nicht!

Wer kann mir helfen?
Also ich hatte das gleiche, bis ich dann anstatt $window (oder wie auch immer ihr die nennt) $handle genommen hab. Und bei mir findet er das Fenster nur wenn ich " - Editor" weglasse kann sein weil es vllt. notepad.exe heisst. ka.

Wenn es immer noch nicht funktioniert probier das:

Code:
ControlSend($handle, "", "Edit1", "MESSAGE")
Edit1 hat irgendwas mit Windows Edit control zu tun, keine ahnung ^^

Hoffe es funktioniert jetzt bei dir auch :D
03/31/2016 22:31 Premiumlike#100
PHP Code:
#RequireAdmin
AutoItSetOption("WinTitleMatchMode", 4)
$windowname="Arma 3"
$handle = WinGetHandle($windowname, "")
If [MENTION=2544426]Error T[/MENTION]hen
    MsgBox(4096, "Error", "Arma 3 konnte nicht gefunden werden")
    Exit  0
Else
WinActivate("Arma 3")
WinWaitActive("Arma 3")
EndIf
Global $Paused, $counter = 0
HotKeySet("{F8}+{F6}", "TogglePause")
HotKeySet("{F7}+{F6}", "Terminate")
    while 1
        Send("{LWIN}")
        sleep(2000)
    WEnd

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Bot Pausiert',0,0, $counter, 1)
    WEnd
    ToolTip("")
EndFunc
Func Terminate()
    Exit  0
EndFunc 
Soweit Funktioniert mein Script nur will er Leider nicht im Spiel Pausieren oder Terminieren
07/31/2016 18:26 BosniaWarlord#101
Kode Form Designer([Only registered and activated users can see links. Click Here To Register...]) funkioniert nicht mehr

Page 7 of 7 « First 56 7