Beiträge von xWerter

xWerter

Ich fange jetzt an mit den Items

xWerter

Zitat von General Kaboom

Ich frage mich eher wie ein textbasierendes RPG im Multiplayer funktionieren soll

Google mal das hier: morgengrauen textbasiertes spiel und nimm das erste ergebnis. Soetwas in der art würde ich halt gerne clientbasiert machen

xWerter

Ich hätte an einen Multiplayer gedacht sowas würde mich mal brennend interessieren

xWerter

Hallo,

mir ist gerade eine Idee gekommen jedoch zweifle ich an der umsetzbarkeit.
Mein Vorhaben:

Ich würde gerne ein Textbasiertes Rpg machen. Die Userdaten sowie die gegenstände sollen alle auf einen server gespeichert sein und den dazugehörigen Client würde ich gerne mit Autoit schreiben.

Nun meine frage: wäre es möglich das Autoit sich die dateien per Tcp zieht und auch die Userdaten an den Server wieder zurückschickt.

Mfg
xWerter

xWerter

zu langsam...

xWerter

NEUE VERSION 2.0

xWerter

Hallo,

ich schreibe ja zur zeit an meinem NotizErsteller und will jetzt das mein button speichern ausgegraut wird wenn das inputfeld für den dateinamen leer ist. Den code habe ich schon geschrieben jedoch weiß ich nicht an welche stelle ich ihn schreiben muss. Hier der code:

AutoIt

if GUICtrlRead($Dateiname) = "" Then
  GUICtrlSetState($Speichern, $GUI_DISABLE)
endif

mein zweites Problem liegt hier:

AutoIt

Dim $iMsgBoxAnswer
$iMsgBoxAnswer = MsgBox(262196,"Sicher?","Wollen Sie diese Datei wirklich löschen?")
Select
   Case $iMsgBoxAnswer = "6" ;Yes
	MsgBox(0, "ok", "datei wird gelöscht...")
   Case $iMsgBoxAnswer = "7"  ;No
exit
EndSelect

welchen befehl nehme ich her dass wenn auf no gedrückt wird einfach die aktion abgebrochen wird und nicht das ganze skript endet?

MFG
xWerter

xWerter

habe jetzt nochmal eine neue Version gepostet.

v2.0

Spoiler anzeigen

hinzugefügt wurde:
-möglichkeit beim löschen auch den Papierkorb leeren
-möglichkeit eingegebenen Text nach speichern auf in die Zwischenablage zu kopieren
-Sicherheitsabfragen
-DankeButton

Fehler:
-wie in der vorherigen Version(wird noch immer daran gearbeitet.)

hinzufügen möchte ich noch:
-speicherbutton ausgrauen

weitere Verbesserungsvorschläge wären mir sehr wichtig

v1.1

Spoiler anzeigen

hinzugefügt wurde:

-Datei Laden
-Datei Löschen
-Ein neues Format(*.doc)

Fehler sind noch vorhanden
Datei Laden: wichtig hierbei ist es das man wenn man bei der auswahlliste auf den leeren platzhalter klickt.

Hinzufügen möchte ich noch
-Speicherbutton ausgrauen

Danke an euer Feedback hat mich sehr gefreut das ich auf meine Fehler hingewiesen wurde und auch Verbesserungsvorschläge bekommen habe.

MFG
xWerter

weitere Verbesserungsvorschläge wären mir sehr wichtig

xWerter

Hallo,

ich habe einen NotizErsteller geschrieben der euch eine Textdatei mit angegebenen Namen und Inhalt auf euren Desktop erstellt.

Spoiler anzeigen

AutoIt: NotizErsteller

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <file.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("NotizErsteller v1.0", 615, 275, 192, 124)
GUISetBkColor(0x3F3F3F)
$TEXT = GUICtrlCreateInput("TEXT", 16, 40, 569, 21)
$DateiName = GUICtrlCreateInput("DateiName", 32, 72, 545, 21)
$DATUM = GUICtrlCreateLabel("Datum " &@MDAY &"." &@MON &"." &@YEAR, 40, 232, 147, 33)
$Speichern = GUICtrlCreateButton("Speichern", 192, 224, 209, 41)
$Label2 = GUICtrlCreateLabel("GEMACHT VON xWERTER", 8, 8, 139, 17)
GUICtrlSetBkColor(-1, 0x5B8C04)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $Speichern
			$inhalt = GUICtrlRead($Text)
			$fileName = GUICtrlRead($Dateiname)
			_FileCreate($filename &".txt")
			$offen = FileOpen($filename &".txt")
			FileWrite($filename &".txt", $inhalt)
			Filemove($filename &".txt", @Desktopdir)
			FileClose($offen)




	EndSwitch
WEnd

Alles anzeigen

Ich würde mich über eure Meinung und Verbesserungsvorschläge freuen.

Neue Version

Spoiler anzeigen

AutoIt: Notizersteller v1.1

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <file.au3>
#include <guiedit.au3>
#RequireAdmin
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("NotizErstellter v1.1", 615, 437, 192, 124)
$Ersteller = GUICtrlCreateLabel("Gemacht von xWerter", 8, 8, 108, 17)
GUICtrlSetBkColor(-1, 0xD5462F)
$Datum = GUICtrlCreateLabel("Datum " &@MDAY &"." &@MON &"." &@YEAR, 8, 384, 99, 25)
$Speichern = GUICtrlCreateButton("Speichern", 152, 368, 225, 41)
$DeinText = GUICtrlCreateEdit("", 24, 48, 569, 145)
GUICtrlSetData(-1, "DeinText")
$DateiName = GUICtrlCreateInput("DateiName", 24, 208, 377, 21)
$List1 = GUICtrlCreateList("", 416, 200, 177, 58)
GUICtrlSetData(-1, " |.doc|.txt")
GUICtrlSetCursor (-1, 0)
$Loeschen = GUICtrlCreateButton("Dateien Löschen", 464, 416, 113, 17)
$Laden = GUICtrlCreateButton("TextDatei Laden", 344, 416, 113, 17)
$DANKE = GUICtrlCreateButton("DANKE", 0, 416, 113, 17)


GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Speichern
			$inhalt = GUICtrlRead($DeinText)
			$name = GUICtrlRead($DateiName)
			$endung = GUICtrlRead($List1)
			$offen = FileOpen($name &$endung, 2)




			FileWrite($offen, $inhalt &@CRLF)
			FileWriteLine($offen, @Mday &"." &@Mon &"." &@Year &@CRLF)
			FileWriteLine($offen, @hour &":" &@Min & ":" &@Sec)
			Fileclose($offen)
			FileMove($name &$endung, @desktopdir)
			Case $Loeschen
$delete = FileOpenDialog("Welche Datei soll gelöscht werden?", @desktopdir , "Alle (*.*)")
FileDelete ($delete)
		Case $Laden


			$edit = FileOpenDialog("Welche Datei willst du Laden?", "", "Textdateien (*.txt;*.doc)")
			$inhalt = FileRead($edit)
		_GUICtrlEdit_SetText($DateiName, $edit)
		_GUICtrlEdit_SetText($DeinText, $inhalt)


		case $DANKE
			MsgBox(0, "Danke!", "Danke an Oscar und Bugfix für die Verbesserungsvorschläge")


	EndSwitch
WEnd

Alles anzeigen

Neue Version 2.0

Spoiler anzeigen

AutoIt: NotizManager v2.0

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <file.au3>
#include <guiedit.au3>
#include <Misc.au3>
#RequireAdmin
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("NotizErsteller v2.0", 653, 439, 192, 124)
$Ersteller = GUICtrlCreateLabel("Gemacht von xWerter", 8, 8, 108, 17)
GUICtrlSetBkColor(-1, 0xD5BC78)
$DateiName = GUICtrlCreateInput("DateiName", 24, 232, 377, 21)
$Datum = GUICtrlCreateLabel("Datum " &@MDAY &"." &@MON &"." &@YEAR , 8, 384, 99, 25)
$Speichern = GUICtrlCreateButton("Speichern", 152, 368, 225, 41)
$DeinText = GUICtrlCreateEdit("DeinText", 24, 72, 569, 145)
GUICtrlSetData(-1, "DeinText")
$List1 = GUICtrlCreateList("", 416, 224, 177, 58)
GUICtrlSetData(-1, "|.doc|.txt")
GUICtrlSetCursor (-1, 0)
$Loeschen = GUICtrlCreateButton("Dateien Löschen", 464, 416, 113, 17)
$Laden = GUICtrlCreateButton("TextDatei Laden", 344, 416, 113, 17)
$DANKE = GUICtrlCreateButton("DANKE", 0, 416, 113, 17)
$Anleitung1 = GUICtrlCreateLabel("Hier Kommt rein was später einmal in deiner Datei stehen soll.", 24, 40, 556, 20)
$Anleitung2 = GUICtrlCreateLabel("hier kannst du deinen Dateinamen eintrage. Ohne Dateiendung!", 24, 264, 374, 41)
$Anleitung3 = GUICtrlCreateLabel("Hier kannst du deine Dateiendung auswählen", 416, 296, 220, 17)
$Zwischenablage = GUICtrlCreateCheckbox("Zwischenablage", 8, 336, 105, 25)
$Papierkorb = GUICtrlCreateCheckbox("Papierkorb", 8, 320, 105, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Speichern
			$inhalt = GUICtrlRead($DeinText)
			$name = GUICtrlRead($DateiName)
			$endung = GUICtrlRead($List1)
			$offen = FileOpen($name &$endung, 2)
			FileWrite($offen, $inhalt &@CRLF)
			FileWriteLine($offen, @Mday &"." &@Mon &"." &@Year &@CRLF)
			FileWriteLine($offen, @hour &":" &@Min & ":" &@Sec)
			Fileclose($offen)
			FileMove($name &$endung, @desktopdir)
			if GUICtrlRead($Zwischenablage) = 1 Then
			ClipPut($inhalt)
EndIf
		Case $Loeschen
			$lesen = GUICtrlRead($Papierkorb)
				$delete = FileOpenDialog("Welche Datei soll gelöscht werden?", @desktopdir , "Alle (*.*)")
			if MsgBox(262196,"Sicher?","Wollen Sie diese Datei wirklich löschen?") = 6 then
        MsgBox(0, "ok", "datei wird gelöscht...")
		FileDelete ($delete)


			$huhu = GUICtrlRead($Papierkorb)
		if GUICtrlRead($Papierkorb) = 1 Then
			FileRecycleEmpty("C:\")
		EndIf
			EndIf
			Case $Laden
			MsgBox(0, "Achtung", "Diese Funktion beinhaltet leider noch einen Fehler, deswegen musst du die Dateiendung nach den Laden aus den Dateinamenfeld löschen")
			$edit = FileOpenDialog("Welche Datei willst du Laden?", "", "Textdateien (*.txt;*.doc)")
			$inhalt = FileRead($edit)
		_GUICtrlEdit_SetText($DateiName, $edit)
		_GUICtrlEdit_SetText($DeinText, $inhalt)
		case $DANKE
			MsgBox(64,"Danke!","Danke an Oscar, BugFix, bernd670 und Kanashius")
		Case $Zwischenablage
	EndSwitch
WEnd

Alles anzeigen

MFG
xWerter

xWerter

Falls es jemanden interessiert habe ich nun eine Lösung für mein Problem gefunden.

Code

#include <IE.au3>


$ende = "progress-bar-action"
$button2 = _IEGetObjByName($oIE, $ende)
_IEAction($button2, "click")

xWerter

Zitat von Andy

Hi,du kannst die deutsche Hilfe runterladen und in Scite per F1 nutzen.
Es bietet sich bei dieser Gelegenheit an, in Scite im Extras-Menü ALLE der dort ca. 50 Funktionen durchzuprobieren, damit du siehst, welche Möglichkeiten die Kombination von Scite und AutoIt bietet.

danke dir Andy für deine schnelle Hilfe!

xWerter

Zitat von Charly2091

Versuchs mal mit controlclick . Die benötigten Daten bekommst Du, wenn Du Glück hast, über die AU3info

ControlClick ("Internet Explorer_Server", "", progress-bar-action, "left") wäre das dann richtig? progress-bar-action ist der name also die id des buttons steht zumindest im quellcode der seite

xWerter

Zitat von xWerter

geht jetzt wieder, danke

xWerter

hallo,

wie kann ich autoit auf einen ganz bestimmten button drücken lassen ich möchte jedoch nicht einfach nur mouseclick verwenden sondern irgendwas was den button mit der passenden id(namen) findet.

und dann hätte ich noch eine frage kann man sich die hilfe von autoit nicht irgendwie in deutsch anzeigen lassen, die im web geht nicht da bekomme ich immer die meldung unsichere verbindung. Was kann ichh dagegen machen ich benutze googlechrome als browser.

MFG
xWerter

Beiträge von xWerter

Textbasiertes Spiel

Textbasiertes Spiel

Textbasiertes Spiel

Textbasiertes Spiel

IE: Login auf Website funktioniert nicht

NotizErsteller

GUICtrlSetState

NotizErsteller

NotizErsteller

auf ganz bestimmten button drücken

auf ganz bestimmten button drücken

auf ganz bestimmten button drücken

auf ganz bestimmten button drücken

auf ganz bestimmten button drücken