Beiträge von VinceA

Hallo alpines danke für deine schnelle Antwort.
Vor lauter Hirnen und Testen hab ich die Millisekunden nicht richtig berechnet.
Hab dein Tip ausprobiert...die Nachricht wird alle Minute an der Server gesendet und nach AdlibUnRegister wird sie nicht mehr gesendet.
Aber nun müsste die Nachricht wieder gesendet werden nach dem Game message: Match started! gelesen wurde aber leider kommt nichts.

Ich weiss nicht ob ich alles verständlich erklärt habe aber die Funktion ist nur ein Teil vom Script

Werde heute Abend mehr vom Script posten... muss mal ne runde schlafen.

Hallo zusammen
Ich weiss jetzt nicht ob der Themen Titel passt....
Meine Funktion sollte in der Editbox lesen und bei der Zeile Game message: Match started! den Text ( zBsp.Welcome to the GiTM server )aus Input lesen
und zum Beispiel alle 1 min an den Server senden und bei der Zeile Game message: Match ended! enden aber sobald wieder Game message: Match started! erscheint,
sollte es wieder die Nachricht senden und so weiter.

AdlibRegister("Messages",10000)
Func Messages()
Local $readCon = GUICtrlRead($Edit1, "")
Local $aStarted = StringRegExp($readCon, "message:\s(Match\sstarted\!)", 0)
Local $aEnded = StringRegExp($readCon, "message:\s(Match\sended\!)", 0)
If $aStarted = True Then
$readInput = GUICtrlRead($Input3)
ControlSend("C:\Program Files (x86)\Ubisoft\Far Cry 2\bin\FC2ServerLauncher.exe", "", "", "say " & $readInput & @CRLF)
If $aEnded = True Then
AdlibUnRegister("Messages")
EndIf
EndIf
EndFunc ;==>Messages

Aber leider stopt die Funktion nach AdlibUnRegister("Messages")

Hab auch andere Möglickeiten probiert hab im google gesucht und hier im Forum aber leider komme ich nicht vom fleck.
Leider bin ich mit meinen Autoit Kenntnisse am Ende.

Wie kann ich das lösen? Was für Möglichkeiten gibt es da?

Zitat von James

Du könntest .+? durch [^,]+? ersetzen, da in den Parametern sowieso kein Komma vorkommen darf. (Sollte funktionieren, ist ungetestet.)

Super, es funktioniert

Danke an euch alle für die schnelle Hilfe

Hallo chesstiger

Ich habs mit

"joined\s\((.+?)\,"

probiert.

Ausgabe

[0] = , 0x3B8DFFFFFFFF
[1] = Anonymous
[2] = dysiek7
[3] = HYENA_555
[4] = Electrosystem
[5] = DjMill1974
[6] = Bhodhi

Leider zeigt es jetzt .. , 0x3B8DFFFFFFFF.... an.
Gibt es da keine andere Möglichkeit die Zeile
8 - Client joined (, 0x42B5FFFFFFFF, XXX.209.53.91:0, PeerId: 0, Seq: 0, Data size : 0) - Session ID: 0x7B1F
auszulassen?
Oder muss ich hier auch mit _ArraySearch und _ArrayDelete arbeiten um... , 0x3B8DFFFFFFFF.. zu entfernen?

Hallo zusammen

Ich hab einiges über StrinRsgExp gelernt, aber leider komme ich hier nicht weiter..

Mit folgendem Pattern

$aResult = StrinRegExp($newline,"joined\s\((.*?)\,",3)

suche ich in einer Text-Datei die Namen der Spieler die unser Clan Server betreten und zwar in den Zeilen mit Client joined....

8 - Client joined (, 0x42B5FFFFFFFF, XXX.209.53.91:0, PeerId: 0, Seq: 0, Data size : 0) - Session ID: 0x7B1F
318 - Client joined (Anonymous, 0x24F0130C63AC9332, XXX.209.53.91:0, PeerId: 0, Seq: 0, Data size : 0) - Session ID: 0x8FEF10662DF05445
340 - Client joined (dysiek7, 0x8FAAD9E658DF515, XX.185.149.52:0, PeerId: 1, Seq: 1, Data size : 4) - Session ID: 0x8FEF10662DF05445
356 - Client joined (HYENA_555, 0x188BA0351874E372, 192.168.1.XX:0, PeerId: 2, Seq: 2, Data size : 4) - Session ID: 0x8FEF10662DF05445
367 - Client joined (Electrosystem, 0x4A08FF9FF9334F3D, XX.22.230.189:0, PeerId: 4, Seq: 4, Data size : 4) - Session ID: 0x8FEF10662DF05445
383 - Client joined (DjMill1974, 0xD6221D295BEE260C, 192.168.1.X:0, PeerId: 6, Seq: 5, Data size : 4) - Session ID: 0x8FEF10662DF05445
385 - Client joined (Bhodhi, 0x7525C3AD08557D9C, 192.168.1.X:0, PeerId: 5, Seq: 6, Data size : 4) - Session ID: 0x8FEF10662DF05445

Ausgabe

[0] =
[1] = Anonymous
[2] = dysiek7
[3] = HYENA_555
[4] = Electrosystem
[5] = DjMill1974
[6] = Bhodhi

Es funktioniert gut aber leider werden auch die folgenden Zeilen mit einbegezogen.

8 - Client joined (, 0x42B5FFFFFFFF, XXX.209.53.91:0, PeerId: 0, Seq: 0, Data size : 0) - Session ID: 0x7B1F
318 - Client joined (Anonymous, 0x24F0130C63AC9332, XXX.209.53.91:0, PeerId: 0, Seq: 0, Data size : 0) - Session ID: 0x8FEF10662DF05445

Wie kann ich die beiden Zeilen bei der suche auslassen oder ausklammern?

Ok vertstehe....Danke für eure Hilfe... Thread ist gelöst.

ja super es passt.
Aber leider wird die Logfile nicht mehr ausgelesen wenn der Server neustartet, dieLogFile wird kommplet neugeschrieben.
Erst wenn ich das schript dann neustarte wird wieder ausgelesen.
Ich hab mit ...

Run(@ScriptFullPath)

probiert aber leider hängt es sich auf...
Was kann ich da machen?

Zitat von BiNu

[autoit]

If $line = $newline Then
;Selbe Zeile
Else

[/autoit]

Ach ja was ich nicht so richtig verstehe ist, was meinst mit "Selbe Zeile"?
$line = $newline?

Zitat von PainTain

Warum das?
--> Forenregeln

Vestehe ich nicht, ich hab doch die Forenregeln gelesen.
Also ich will kein Bot programmieren oder ähnliches.....
Ich habe ein Clan https://autoit.de/www.gamers-in-the-matrix.com und wir haben einige Server für Fc2 und Battlefield 3 und möcht lediglich in der Fc2 logfile schlussendlich alle chat messages rausfiltern und dann mit Datum und Zeit versehen in eine Textdatei schreiben.

Hallo
Ich möchte ein Logfile von einem Spiel auslesen also immer die letzte Zeile.
Hab in der Hilfe Filereadline gefunden und ausprobiert.

Aber leider zeigt mir die MsgBox die Letzte Zeile nonstop also immer die gleiche Zeile bis in der logfile eine neue Zeile geschrieben wird, dann zeigt es die an aber die dann auch nonstop.
Was kann ich machen das die letzte Zeile nur einmal anzeigt wird bis eine neue Zeile in der Logfile geschrieben wird?

Ok, ich vertsehe es jetzt.

Ich habe noch sehr viel zu lernen.

Für ein Anfänger ohne jegliche Vorkenntnisse ist die Hilfe nicht immer sehr einfach zu verstehen da braucht es doch Jemand der einem das Schritt für Schritt erhlärt um die ganze Logik zu verstehen.

Vielen Dank Friesel für deine Mühe, danke auch an i2c.

Vielen dank Friesel für die ausführliche Erklärung über den OnEventMode.
Das hört sich gut an, werde es auf jeden Fall versuchen anzuwenden.

Was ich aber noch nicht so ganz kapiere ist die Endlosschleife.

Zitat von Friesel

3. Jetzt noch die Gui anzeigen lassen und in eine Endlosschleife gehn. Das Programm wartet nun, bis einer der Events ausgelöst wird:

[autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(5000)
WEnd

[/autoit]

Mit Sleep (5000), wartet das Programm nun 5 Sekunden bis ein Event ausgelöst wird oder checkt es alle 5 Sekunden ob was passiert.?
Kann man die 5000 verändern oder ist das eine Vorgabe?

Da ich mich mit GUIOnEventMode noch nicht so auskenne habe ich es für mich so angepasst.

Wie kann ich es machen das nur Einfach Auswahl möglich ist?
Leider sind meine Versuche fehlgeschlagen es fehlerfrei hinzukriegen.

Hi alle

Ist es möglich in einer Listbox items mit einem Button nach oben oder unten zu verschieben?

Habe bis her nur Bespiele für Listview oder Combobox gefunden.

Zitat von Friesel

Dir ist aber schon klar, dass die Dateiendung mit angegeben werden muss?

also so:

[autoit]

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", 16, "TEST.cfg")

[/autoit]

Nein wusste ich nicht hab auch nirgends was drüber gelesen auch nicht in der Hilfe oder ich muss es übersehen haben.

Zitat von misterspeed

Zum einen das, zum anderen wird die Warnmeldung alleine trotzdem nicht dein Problem lösen, denn wenn der Anwender "ja" sagt, dann musst du nachher trotzdem noch verhindern, dass der Text an die existierende Datei angehängt wird, sofern das von deiner Seite unerwünscht ist. Die Warnmeldung selbst hat also keinerlei Auswirkungen auf die mögliche fatale Entscheidung des Anwenders. Sie warnt den Anwender nur, verhindern kann sie nichts. Die Lösung deines eigentlichen Problems, siehe unten...

Das wusste ich auch nicht, steht auch leider nichts in der Hilfe darüber. Ich bin bis jetzt immer davon ausgegangen das die Datei ersetzt wird.

Zitat von misterspeed

$hSave = fileopen($save,2+8 ) ; öffnet Datei im (Über-)Schreibmodus, wenn sie nicht existiert wird sie mit Verzeichnisstruktur angelegt, andernfalls mit neuem Inhalt überschrieben

Hab jetzt einiges dazugelernt.

Der Code funktiontert jetzt genau so wie ich es wollte.

Func SaveSettings()
$isrvname = GUICtrlRead($Input1)
$ctext = GUICtrlRead($Edit1)
$save = FileSaveDialog("Save File", @UserProfileDir, "Config(*.cfg)", 16, $isrvname & ".cfg")
If @error Then Return 0
If StringRight($save, 4) <> ".cfg" Then $save &= ".cfg"
$hSave = FileOpen($save, 2 +
FileWrite($hSave, $ctext)
FileClose($hSave)
GUICtrlSetData($Input5, $save)
EndFunc ;==>SaveSettings

misterspeed und Friesel danke für eure Tips und Hilfe

Mit der Variable $isrvname wird ein Name ausgelesen den der User in $Input1 schreibt, also kein Pfad.
16er Flag funktioniert bei mir aber nur ohne $isrvname
Es ist egal ob ich es so benutze

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", 16, "TEST")

oder so

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", 16, $isrvname)

Der Dialog öffnet sich, der Name wird eingefügt aber es kommt kein Hinweis dass die Datei vorhanden ist und ob sie überschrieben werden soll.
Wenn die Datei vorhanden ist wird einfach alles in die .cfg File geschrieben so habe ich alles doppelt drin.

Windows 7 64 professional

Hab nochmal alles probiert aber so wie es aussieht funktioniert bei FileSaveDialog die options nicht mit default name zusammen.

Ist das ein Bug oder liegt es am Betriebssystem?

Hallo

Ich hab da ein paar Schwierigkeiten mit FileSaveDialog. Hab mich in der Autoit Hilfe und im Google
schlau gemacht aber versteh einiges noch nicht.

Ich habe Probeme es mit FileSaveDialog so hinzubekommen das wenn die Datei vorhanden ist dann die Frage beim Überschreiben einer Datei kommt.

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", "", $isrvname)

Hab dann nach Filter mit 16 versucht ging aber nur wenn ich $isrvname entfernt habe.

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", 16, $isrvname)

Funktioniert aber nur wenn ich $isrvname entferne.

$save = FileSaveDialog("Save File", @DesktopDir, "Config(*.cfg)", 16)

Aber $isrvname brauche ich denn damit schreibe ich den Namen der Datei(Servers) direkt rein, aslo so dass der User nur noch die Datei am richtigen Ort speichern muss.

Aslo habe ich eine andere Möglichkeit gesucht und habe es dann so hinbekommen

Ist das richtig so oder gibt es da eine andere Möglichkeit?
Der Code funktioniert, nur erscheint es mir zu umständig.

Aaah verstehe.

Jetzt seh ich schon ein bisschen durch den Nebel.

Danke BugFix

Tip Top, es funktioniert
Also ich hab $sOut2 entfernt und _GUICtrlListView_GetItemText in IniWrite integriert.

Die Ini Datei.

Es funktioniert , aber ist es von der programmierlogik her richtig?
Was ich nicht verstehe, warum fällt das EndIf weg wenn ich If und Then in einer Zeile schreibe?