|
You last visited: Today at 23:52
Advertisement
Minecraft Autoit bot HILFE!
Discussion on Minecraft Autoit bot HILFE! within the AutoIt forum part of the Coders Den category.
10/07/2012, 20:50
|
#1
|
elite*gold: 0
Join Date: Jun 2011
Posts: 70
Received Thanks: 7
|
Minecraft Autoit bot HILFE!
Hallo!
Dies ist mein erster Thread!
Ich habe einen AutoIt Minecraft Bot erstellt funktioniert einwandfrei!
Was für Funktionen?
Also der Bot kann Tag und Nacht machen!
Und habe noch was eingefügt, wenn man Minecraft nicht gestartet hat das
der Bot sich automatisch schließt.
So das soll jetzt keine veröffentlichung zum Bot werden sondern habe einen Problem!
Ich habe ja 3 Forms also 3 Fenster sozusagen Z.B. Button 1 = Form 2
Button 2 = Form 2 . Form bedeutet Fenster. Ich weis wie man durch Button klick eine Form erstellt aber ich will es so machen das wenn ich auf Button 1 klicke öffnet sich ja Form2 aber dann soll sich Form1 schliessen!
So ich hoffe mir kann einer helfen
sezer0012
|
|
|
10/07/2012, 21:11
|
#2
|
elite*gold: 528
Join Date: Jan 2012
Posts: 2,127
Received Thanks: 2,403
|
Bitte zeig uns deinen Code.
[code]HIER DEIN CODE[/code]
MfG
PS: und Glückwunsch zum ersten Thread.
|
|
|
10/07/2012, 21:15
|
#3
|
elite*gold: 0
Join Date: Jun 2011
Posts: 70
Received Thanks: 7
|
Danke, hier ist mein Code.
Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("TagNachtScript", 249, 218, 390, 356)
GUISetFont(8, 800, 0, "Rockwell")
GUISetBkColor(0x99B4D1)
$Button1 = GUICtrlCreateButton("Tag", 8, 96, 233, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Nacht", 8, 128, 233, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Einstellung", 8, 8, 233, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Exit", 8, 184, 233, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Hilfe", 8, 40, 233, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
MsgBox( 0, "WICHTIG", "WICHTIG: Minecraft muss in Vollbildmodus sein, das heist nicht F11 sondern Maximieren." )
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
MsgBox( 0, "Error", "Wenn Minecraft nicht gestartet ist schliest sich das Programm!")
If NOT ProcessExists("javaw.exe") Then Exit
If ProcessExists ("javaw.exe") Then MsgBox (0,"Check","CHECK: Ok, Minecraft ist gestartet.")
$pos = PixelSearch( 0, 993, 1276, 1021, 7974988,0)
If isArray($pos) then
MouseMove($pos[0],$pos[1],0)
MouseClick("Left")
EndIf
Sleep( 500 )
Send( "{ESC}" )
Sleep( 500 )
Send( "b" )
Sleep( 1000 )
Send( "time set 0", 10 )
Send( "{Enter}" )
Case $Button2
MsgBox( 0, "Error", "Wenn Minecraft nicht gestartet ist schliest sich das Programm!")
If NOT ProcessExists("javaw.exe") Then Exit
If ProcessExists ("javaw.exe") Then MsgBox (0,"Check","CHECK: Ok, Minecraft ist gestartet.")
$pos = PixelSearch( 0, 993, 1276, 1021, 7974988,0)
If isArray($pos) then
MouseMove($pos[0],$pos[1],0)
MouseClick("Left")
EndIf
Sleep( 500 )
Send( "{ESC}" )
Sleep( 500 )
Send( "b" )
Sleep( 1000 )
Send( "time set 12500", 10 )
Send( "{Enter}" )
Case $Button5
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Hilfe", 310, 127, 192, 124)
GUISetBkColor(0x696969)
$Group1 = GUICtrlCreateGroup("Hilfe", 8, 8, 297, 73)
$Label1 = GUICtrlCreateLabel("= Sie müssen Ingame sein um den Script zu benutzen!", 16, 32, 262, 17)
$Label2 = GUICtrlCreateLabel("= Sie müssen in Minecraft Cheats an haben!", 16, 56, 215, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Case $Button4
Exit
Case $Button3
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Einstellung", 176, 177, 635, 150)
GUISetBkColor(0x99B4D1)
$Group1 = GUICtrlCreateGroup("Problem", 8, 8, 161, 65)
$Label1 = GUICtrlCreateLabel("Bei mir in Minecraft wird es", 16, 32, 129, 17)
$Label2 = GUICtrlCreateLabel("nicht Tag/Nacht.", 16, 48, 86, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("Problem lösen!", 8, 80, 163, 89, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
MsgBox( 0, "Error", "Wenn Minecraft nicht gestartet ist schliest sich das Programm!")
If NOT ProcessExists("javaw.exe") Then Exit
If ProcessExists ("javaw.exe") Then MsgBox (0,"Check","CHECK: Ok, Minecraft ist gestartet.")
$pos = PixelSearch( 0, 993, 1276, 1021, 7974988,0)
If isArray($pos) then
MouseMove($pos[0],$pos[1],0)
MouseClick("Left")
EndIf
Send( "{ESC}" )
MouseMove( 488, 533, 6 )
MouseClick( "left" , 488, 533, 2 , 6 )
Sleep( 500 )
MouseMove( 857, 482,6 )
MouseClick( "left" , 857, 482 , 2 , 6 )
Sleep( 500 )
MouseMove( 272, 718, 6 )
MouseClick( "left" , 272, 718 , 1 , 6 )
Sleep( 1000 )
Send( "bb" )
Sleep( 500 )
MouseMove( 644, 719, 6 )
MouseClick( "left" , 644, 719 , 2 , 6 )
Sleep( 500 )
MouseMove( 694, 720, 6 )
MouseClick( "left" , 694, 720 , 2 , 6 )
Sleep( 500 )
MouseMove( 642, 318, 6 )
MouseClick( "left" , 642, 318 , 2 , 6 )
MsgBox( 0 , "Erledigt!", "So jetzt starte den Script neu dann versuch es nochmal Tag/Nacht zu machen." )
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Form1 = GUICreate("TagNachtScript", 249, 218, 390, 356)
GUISetFont(8, 800, 0, "Rockwell")
GUISetBkColor(0x99B4D1)
$Button1 = GUICtrlCreateButton("Tag", 8, 96, 233, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Nacht", 8, 128, 233, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Einstellung", 8, 8, 233, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Exit", 8, 184, 233, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Hilfe", 8, 40, 233, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
EndSwitch
WEnd
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
EndSwitch
WEnd
|
|
|
10/07/2012, 22:21
|
#4
|
elite*gold: 528
Join Date: Jan 2012
Posts: 2,127
Received Thanks: 2,403
|
Dafuq is this?
Mach mal die ganzen Includes raus, die macht man ein mal ganz am Anfang vom Script rein.
Das ist ja nicht so schön mit den ganzen While Schleifen. Schau dir mal den  an, kannst du dir auch in Koda generieren lassen. Ist viel besser und übersichtlicher, den  zu benutzen.
MfG
|
|
|
10/07/2012, 23:01
|
#5
|
elite*gold: 0
Join Date: Apr 2012
Posts: 1,214
Received Thanks: 153
|
Quote:
Originally Posted by Achat
Dafuq is this?
Mach mal die ganzen Includes raus, die macht man ein mal ganz am Anfang vom Script rein.
Das ist ja nicht so schön mit den ganzen While Schleifen. Schau dir mal den  an, kannst du dir auch in Koda generieren lassen. Ist viel besser und übersichtlicher, den  zu benutzen.
MfG
|
Sorry für ot, aber wie kann koda denn automatisch im onevent modus generieren?
|
|
|
10/07/2012, 23:15
|
#6
|
elite*gold: 528
Join Date: Jan 2012
Posts: 2,127
Received Thanks: 2,403
|
MfG
|
|
|
10/08/2012, 12:20
|
#7
|
elite*gold: 0
Join Date: Jun 2011
Posts: 70
Received Thanks: 7
|
Danke aber wie kann ich des jetzt machen das wenn ich auf einen button klicke das das fenster sich schliest dann sich Fenster 2 öffnet?
Exit geht nicht
|
|
|
10/08/2012, 12:23
|
#8
|
elite*gold: 224
Join Date: Dec 2010
Posts: 2,766
Received Thanks: 931
|
Quote:
Originally Posted by sezer0012
Danke aber wie kann ich des jetzt machen das wenn ich auf einen button klicke das das fenster sich schliest dann sich Fenster 2 öffnet?
Exit geht nicht
|
GuiDelete/Guisetstate(@SW_HIDE,$fenster)
...
|
|
|
All times are GMT +1. The time now is 23:53.
|
|