Da kann ich mir eine Bemerkung nicht verkneifen:
Nur ware Schrott-Taschenrechner lassen die Eingabe eines Rechen-Minus ohne vorhergehende Zifferneingabe zu.
Ich habe noch 'nen Taschenrechner aus meinen letzten Schultagen (so 1980). Und selbst der verweigert ein Rechen-Minus, wenn ich nicht vorher eine Ziffer eintippe.
-7^2 ist -7*7
GtaSpider, ich bin erschüttert. Sag mal gehst du nicht aufs Gymnasium..... 
Also, hätte nie gedacht dass man solche Selbstverständlichkeiten erläutern muß.
Was bedeutet Quadrat ? - Ich multipliziere eine Zahl mit sich selbst!
Im Fall: -7^ wird also -7 mit sich selbst (wieder -7) multipliziert.
Ergo: heißt -7^= -7 * -7
Regel: minus mal minus gleich plus
daraus folgt: -7^= -7 * -7 = 49
quod erat demonstrandum 
Cooles Thema
-(7^2) = -49
Das bedeutet aber: -1 mal 7 zum Quadrat
Und das wäre wirklich: -49
Aber -7 zum Quadrat ist und bleibt +49
Hi,
ich hab dir mal ein Skript zum Aufbröseln der Servernachricht erstellt:
#include <array.au3>
Dim $str = '_tutor_look_angle.._tutor_look_distance.200._tutor_message_character_display_tim' & _
'e_coefficient.0.07._tutor_message_minimum_display_time.1._tutor_message_repeats.' & _
'5._tutor_view_distance.1000.'
Dim $arNum[10] = ['0','1','2','3','4','5','6','7','8','9'], $strOut = '', $arOut
$str = StringStripWS(StringReplace($str, '.', ' '),3)
$arChars = StringSplit($str, '')
If IsArray($arChars) Then
For $i = 1 To $arChars[0]
If ( $arChars[$i] = ' ' ) Then
If ( _ArraySearch($arNum, $arChars[$i-1]) <> -1 ) Then ; Zeichen davor eine Ziffer ?
If ( _ArraySearch($arNum, $arChars[$i+1]) <> -1 ) Then _; Zeichen danach eine Ziffer ?
$arChars[$i] = '.'
EndIf
EndIf
$strOut &= $arChars[$i]
Next
;~ ConsoleWrite($strOut)
EndIf
$arOut = StringSplit($strOut, ' _', 1)
For $i = 1 To $arOut[0]
If StringLeft($arOut[$i], 1) <> '_' Then $arOut[$i] = '_' & $arOut[$i]
Next
_ArrayDisplay($arOut)
So, mal schnell aus dem Ärmel (ohne Garantie,nur damit du die Richtung siehst):
; 1. Aufruf:
_Select($reply, $Antwort, $Zahl1, $behalten1)
; 2. Aufruf:
_Select($reply2, $Antwort2, $Zahl2, $behalten2)
; usw.
Func _Select($REPLY, $ANTWORT, ByRef $ZAHL, ByRef $BEHALTEN)
$REPLY=GUICtrlRead($ANTWORT[$z])
select
case $REPLY = $ZAHL
GUICtrlCreatePic("grün.gif", 200, $top, 20, 20)
$BEHALTEN=$REPLY
$ZAHL = "leer"
case $REPLY = $Zahl2 OR $REPLY = $Zahl3 OR $REPLY = $Zahl4
GUICtrlCreatePic("grau.gif", 200, $top, 20, 20)
case $REPLY <> $ZAHL OR $REPLY <> $Zahl2 OR $REPLY <> $Zahl3 OR $REPLY <> $Zahl4
GUICtrlCreatePic("rot.gif", 200, $top, 20, 20)
EndSelect
EndFunc
Du kannst es glauben, ein "\" fehlt.
Deinem Pfad fehlt am Ende ein Backslash, siehe deine Fehlermeldung.
Also mußt du vor deinem Dateinamen einen Backslash einfügen.
Hab ich absichtlich rausgelassen, da mit der aktuellen Autoit-Version _ArrayDisplay( ) auch für 2D-Arrays funktioniert.
Asche auf mein Haupt, habe ich fehlinterpretiert. man soll nicht zu viel gleichzeitig machen.
Stimmt, diese Fälle sollten ausgeschlossen werden, sry.
Dim $files[3]=['abc"cvghaj.doc','ahjdg&dlmsh.xls','abc.def.doc']
Dim $pattern = '([\w"&.]*)'
For $i = 0 To UBound($files)-1
If StringRegExp($files[$i], $pattern) = 1 Then
MsgBox(0, '',$files[$i] & ' - Match' )
Else
MsgBox(0, '',$files[$i] & ' - No Match' )
EndIf
Next
Funktioniert tadellos. 
Hi,
dieses Pattern erkennt alle 3 Problemfälle:
$pattern = "([\w"&.]*)"
Das kannst du so verwenden, wenn du den Dateinamen einzeln zur Prüfung an die RegEx Funktion übergibst.
Sollten die Dateinamen mit Pfadangaben sein oder in einem anderen Kontext stehen, wird es evtl. Probleme geben.
Schau mal hier rein:
String ist Pfad?
Das sollte dir helfen können.
Wenn wirklich JEDES Zeichen vorkommen darf:
$pattern = ".*"
Allerdings hast du damit keine Selektionsmöglichkeit. Es wird einfach jedes Zeichen genommen
Besser du zeigst mal woraus du selektieren willst.
Dann mußt du die anderen " durch ' ersetzen:
[autoit]Send('(npcname ' & GUICtrlRead($Input5) &' ' & '"' & GUICtrlRead($Input1) & '"' &')')
[/autoit]Aber noch 'ne Anmerkung zum Titel.
Schon besser als Fragezeichen 
Aber etwas in der Richtung: "Einbinden Input in Send-Befehl" würde auf das Problem direkt verweisen
Send("(gennpc (index " & GUICtrlRead($Input5) &" ) (country 2) (kind 0) (shape 3) (html 1000) (map 0) {enter}(xy 215368 296999 42352) (dir 215632 296621))")
[/autoit]Ist das Absicht mit den Leerstellen zwischen den Blöcken?
Ich bin ja nur von mir ausgegangen. Und da ich kein Gamer bin, fällt es da nicht auf fruchtbaren Boden.
Aber es gibt im Forum auch ein paar CS-Zocker. Wirst dein Feedback schon noch bekommen.
Prima, freut mich dass du meine Anregung mit der Funktion umgesetzt hast.
Weiter so.
Du könntest sogar deine Select-Blöcke noch in eine eigene Funktion packen:
$reply_n, $$zahl_n übergeben an die Funktion und als Return $behalten_n zurückgeben.
Edit: 20 Hits, keine Antwort
Vielleicht gehts anderen auch, wie mir. Ich weiß nicht was ein Half-Life Server ist. Also guck ich mir dein Skript an.
Jetzt weiß ich zwar noch immer nicht, was ein Half-Life Server ist, sehe aber das es irgendwas mit CounterStrike zu tun hat und somit ist es für mich nicht mehr interessant.
@WoW-Unit
Bitte verwende aussagekräftige Titel für deinen Thread.
Fragezeichen oder etwas wie "Hilfe, ich komme nicht weiter" etc. werden dir nicht viele Antworten bescheren.
Also, in Zukunft machst du es besser.
Wie vorhin vermutet: $z nimmt einen zu großen Wert an.
Ich habs grad in deinem Code nicht gefunden. Aber mal als Beispiel:
Dim $array[6] heißt Array mit 6 Elementen, wärein einer Schleife
For $z = 0 To 5
;...
Next
Wenn du hier $z von 0 bis 6 laufen lassen würdest, erhältst du die gleiche Fehlermeldung.
Immer beachten: Arrays sind Null-basiert. Also das letzte Element ist immer Ubound(Array)-1
Edit
Ich glaube, das könnte es sein: $z=$z+1
Du erhöhst $z ohne zu prüfen ob $z damit Ubound(Array)-1 überschreitet.
Also brauchst du eine Abbruchbedingung, damit $z nicht erneut erhöht wird.
Editor: SciTE4AutoIt
DER AutoIt-Editor. Download siehe Portal, oben rechts.
