Hi,
kann man z.b. die Konsole eines Minecraft Servers in eine Gui einbinden?
So das man die Konsole halt nich als zweites Fenster geöffnet hat.
Mfg und Danke
Beiträge von Nakroma
-
-
-
Selbst wenn ich hundertmal draufdrücke passier nix
-
[autoit]
Func right()
[/autoit]
$left = $left + 10
ControlMove("human", "stand", $Pic11, $left, $top)
EndFuncBild bewegt sich bei ausführen der Func nicht.
-
Klappt nicht, Bild bewegt sich überhaupt nicht
-
Irgendwie check ich nicht, wie man das ins Script einbauen soll...^^
-
Und wie geht das? Kenn mich mit GDI´s nicht aus
-
Hi,
Das was ich in der SuFu gefunden hab, hat mir nicht wirklich weiter geholfen. Und zwar will ich ein Bild in meinem Spiel ohne flackern fortbewegen, da das ziemlich stört.Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
;===========================INCLUDES=============================
#include <GUIConstantsEx.au3>
#include <GuiToolbar.au3>
#include <StaticConstants.au3>
#include <ToolbarConstants.au3>
#include <WindowsConstants.au3>
;============================INCLUDESENDE========================
;============================VARS================================
$left = 16
$top = 32
;============================VARSENDE============================
;============================HOTKEYS=============================
HotKeySet("{right}", "right")
HotKeySet("{left}", "left")
;============================HOTKEYSENDE=========================
;============================GUI=================================
#Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\tarek\eigene dateien\autoit\waveright\go.kxf
$Form1_1 = GUICreate("Wave", 672, 414, 201, 124)
$Pic1 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\pic\attack_01.jpg", 8, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$ToolBar1 = _GUICtrlToolbar_Create($Form1_1, 0)
$Pic2 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\pic\bar_over.jpg", 0, 312, 670, 20, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic3 = GUICtrlCreatePic("", 88, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic4 = GUICtrlCreatePic("", 168, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic5 = GUICtrlCreatePic("", 248, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic6 = GUICtrlCreatePic("", 328, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic7 = GUICtrlCreatePic("", 408, 344, 68, 52, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic8 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\pic\bar_right.jpg", 504, 331, 20, 81, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic9 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\pic\inventar_00.jpg", 540, 344, 44, 44, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic10 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\pic\menu_00.jpg", 600, 344, 44, 44, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Pic11 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\ani\stand.jpg", 16, 32, 200, 277, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetTip(-1, "stand")
$Pic12 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\ani\attack_01.jpg", 16, 32, 200, 277, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetState(-1, $GUI_HIDE)
GUICtrlSetTip(-1, "attack01")
$Pic13 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\ani\attack_02.jpg", 16, 32, 200, 277, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetState(-1, $GUI_HIDE)
GUICtrlSetTip(-1, "attack02")
$Pic14 = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Tarek\Eigene Dateien\AutoIt\WaveRIGHT\ani\menial_stand.jpg", 448, 32, 200, 277, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlSetTip(-1, "menial_stand")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#Region ### START Koda GUI section ### Form=.\kfx\menu.kxf
$Form2 = GUICreate("Menü", 153, 231, 447, 289)
$Button1 = GUICtrlCreateButton("Back", 39, 16, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Hilfe", 39, 64, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("HotKeys", 39, 96, 75, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Interface", 39, 128, 75, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Exit", 39, 160, 75, 25, $WS_GROUP)
GUISetState(@SW_HIDE, $Form2)
#EndRegion ### END Koda GUI section ###
;============================GUIENDE==============================
;============================WHILE================================
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Pic10
GUISetState(@SW_SHOW, $Form2)
Case $Button1
GUISetState(@SW_HIDE, $Form2)
Case $Button5
Exit
Case $Pic1
GUICtrlSetPos($Pic11, $left, $top)
GUICtrlSetPos($Pic12, $left, $top)
GUICtrlSetPos($Pic13, $left, $top)
GUICtrlSetState($Pic11, 32)
GUICtrlSetState($Pic12, 16)
Sleep(100)
GUICtrlSetState($Pic12, 32)
GUICtrlSetState($Pic13, 16)
Sleep(100)
GUICtrlSetState($Pic13, 32)
GUICtrlSetState($Pic11, 16)EndSwitch
[/autoit] [autoit][/autoit] [autoit][/autoit]
WEnd
;===========================WHILEENDE==============================
;===========================FUNCS==================================
Func right()
$left = $left + 10
GUICtrlSetPos($Pic11, $left, $top)
EndFunc
Func left()
$left = $left - 10
GUICtrlSetPos($Pic11, $left, $top)
EndFunc
;===========================FUNCSENDE==============================Thx schonmal im Vorraus
Mfg Nakroma -
Irre ich mich oder ist das nicht einfach
[autoit]
[/autoit]
$input = InputBox("lala", "Bitte Name eingeben")
MsgBox(0, "Name", "Dein Spielername: " & $input)?
-
Hehe danke
aw-too-it
O_o -
Dumme Frage...
Heist es
"Auto-Ei-Tii" oder "Auto-It"
Heist es
"gui", "ge-u-i" oder "Gai"
?
Mfg Nakroma -
Erklärt sich von selbst.
Hier der Code:Spoiler anzeigen
[autoit]#include <GuiConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
Opt("GuiOnEventMode", 1)
$run = False
$time = 0
$mGui = GUICreate("LogManager", 300, 100)
$label = GUICtrlCreateLabel("Mode wählen", 10, 10)
$help = GUICtrlCreateButton("?", 280, 0, 20, 20)
$easy = GUICtrlCreateButton("Easy", 40, 40)
$normal = GUICtrlCreateButton("Normal", 80, 40)
$hard = GUICtrlCreateButton("Hard", 130, 40)
$try = 0
HotKeySet("{enter}", "enter")
Global $label = GUICtrlCreateDummy()
$code = Random(1, 50, 1)
$gui = GUICreate("Log", 300, 400)
$pic = GUICtrlCreatePic("S:\Daten\Log\tk.bmp", 0, 0, 300, 400)
$input = GUICtrlCreateInput("", 20, 300, 260, 15)
$pic2 = GUICtrlCreatePic("S:\Daten\Log\licht.bmp", 20, 320, 10, 10)
$pic3 = GUICtrlCreatePic("S:\Daten\Log\licht2.bmp", 20, 320, 10, 10)
GUICtrlSetState($pic2, 32)
GUICtrlSetState($pic3, 32)
GUISetState(@SW_Show, $mGui)
GUICtrlSetOnEvent($easy, "easy")
GUICtrlSetOnEvent($normal, "normal")
GUICtrlSetOnEvent($hard, "hard")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE")
GUICtrlSetOnEvent($help, "help")
Func easy()
Global $mode = 1
GUISetState(@SW_Hide, $mGui)
GUISetState(@SW_Show, $gui)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE")
Global $max_time = 20
$run = True
EndFunc
Func normal()
Global $mode = 2
GUISetState(@SW_Hide, $mGui)
GUISetState(@SW_Show, $gui)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE")
Global $max_time = 20
$run = True
EndFunc
Func hard()
Global $mode = 3
GUISetState(@SW_Hide, $mGui)
GUISetState(@SW_Show, $gui)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSE")
Global $max_time = 5
$run = True
EndFunc
Func help()
ShellExecute("S:\Daten\Log\help.txt")
EndFunc
Func Close()
Exit
EndFuncWhile 1
[/autoit] [autoit][/autoit] [autoit]
If $run = True Then
$time = $time + 1
$lTime = GUICtrlCreateLabel($time, 10, 10)
If $time > $max_time Then
MsgBox(0, "Log", "LogIn fehlgeschlagen")
Exit
EndIf
Sleep(1000)
EndIf
WEndFunc enter()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$try = $try + 1
GUICtrlDelete($label)
Sleep(1)
$readout = Int(GUICtrlRead($input))
If $readout = $code Then
HotKeySet("{enter}")
MsgBox(0, "Log", "LogIn war erfolgreich")
MsgBox(0, "Log", "Du hast " & $try & " Versuche gebraucht");~ If FileExists("S:\Daten\Log\highscore.txt") Then
[/autoit]
;~ $iTry = IniRead("highscore.txt", "data", "try", "")
;~ $iTime = IniRead("highscore.txt", "data", "time", "")
;~ If $iTry < $try Then
;~ MsgBox(0, "Highscore", "Neuer Highscore! Du warst " & $iTry - $try & " Versuche schneller")
;~ IniWrite("highscore.txt", "data", "time", $try)
;~ EndIf
;~ If $iTime < $time Then
;~ MsgBox(0, "Highscore", "Neuer Highscore! Du warst " & $iTime - $time & " Sekunden schneller")
;~ IniWrite("highscore.txt", "data", "time", $time)
;~ EndIf
;~ Else
;~ IniWrite("highscore.txt", "data", "time", $try)
;~ IniWrite("highscore.txt", "data", "time", $time)
;~ EndIf
Exit
EndIf
If $readout < $code Then
If $mode < 2 Then Beep(100)
If $readout < $code - 7 Then
GUICtrlSetState($pic2, 16)
GUICtrlSetState($pic3, 32)
Else
GUICtrlSetState($pic3, 16)
GUICtrlSetState($pic2, 32)
EndIf
EndIf
If $readout > $code Then
If $mode < 2 Then Beep(1000)
If $readout > $code + 7 Then
GUICtrlSetState($pic2, 16)
GUICtrlSetState($pic3, 32)
Else
GUICtrlSetState($pic3, 16)
GUICtrlSetState($pic2, 32)
EndIf
EndIf
$label = GUICtrlCreateLabel($readout, 20, 275, 260, 15)
GUICtrlSetData($input, "")
EndFunc -
Hehe lustig
Mein Rekord ist 136 -
Danke euch
-
beantwortet nicht meine Frage.
Ich will eine aufgabe die man nur einmal am tag lösen kannst. -
Ich will ja machen, das wenn die aufgabe gelöst ist wird ein datum festgesetzt. Wenn das datum überschritten ist, ist die aufgabe wieder lösbar.
-
Also könnt ichs z.B. so machen:
[autoit]
[/autoit]
Func Aufgabe()
$hour = IniRead....
$min = IniRead....
If @hour = $hour and @min = $min Then
Aufgabe
IniWrite("bsp.ini", "zeit", "hour", @hour)
IniWrite("bsp.ini", "zeit", "min", @min)
EndIf
EndFunc -
Eben.
Aber wie liest man das Datum aus? -
Hallo,
Hab bei Google nix gefunden also frage ich mal hier.
Ich will eine Aufgabe machen die nur einmal am Tag funktioniert. Wie krieg ich das hin?
Welche Befehle sollte ich nutzen?
Mfg Nakroma -
Gehts also auch so?:
[autoit]
[/autoit]
Func card()
If $turn = "player1" Then
Pl1 Karte ziehen
ElsIf $turn = "player2" Then
Pl2 Karte ziehen