Tratsch rund um Autoit / Autoit Talk | kleinere Fragen

[Benjihz]

Heey, ich möchte in meinem AutoItscript einen Teil von dem Source immer aktivieren oder deaktivieren. Das heist das ich in dem Script per Befehl(oder so) einen bestimmten teil deaktivieren kann und später wieder aktivieren und dann eine andere Funktion deaktiviere.

[Lawliet]

If setzen?

[Benjihz]

Hmm ich glaub ich heb es nicht gut erklärt.. Ich meine damit ich habe einen Klick Bot(da ich blutiger Anfänger bin) und bei dem Bot logge ich mich automatisch in ein Browsergame ein, ich will es so machen das ich eine Funktion habe im einen Grus in das Gildenforum automatisch schreiben kann, und z.B ein parr Sachen anpflanzen kann. Und da ich nicht weiß wie ich das trennen soll, wollte ich fragen wie ich verschiedene Sachen im Text deaktivieren könnte. Wenn das mit dem If die beste Möglichkeit wäre, wäre es nett wenn mir das jmd erklären könnte´da ich das nicht wirklich verstehe wie ich die Ifabfrage damit verbinden soll. Wie gesagt es is ein purer Klickbot & ganz ohne GUI. Sobald man den Bot startet legt er mit seiner Arbeit los!

[Lumi]

Originally Posted by mono0

Wie kann man bei einer Checkbox als Text ein & verwenden?

Ich denke mal, du meinst wie man eine Checkbox zum laufen bringt, bzw. mit Funktionen und so?

If GuiCtrlRead($Checkbox1) = $GUI_CHECKED Then

; Dein Code

Else

;Falls nicht, dann ...

EndIf

[mono0]

Originally Posted by Achat

Scherzfrage?

$Form1 = GUICreate("Form1", 615, 438, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("&&&&&&&&&&&&&&&&&&&&&&&&&&&", 136, 152, 305, 97)
GUISetState(@SW_SHOW)

Geht sogar mit Koda

MfG

Es geht um ein einzelnes &. Und das verschwindet bei mir immer...also es steht einfach nix da. Alles andere funktioniert.

[-STORM-]

Anführungszeichen vergessen?
Falls nein, poste mal dein Script.

[KDeluxe]

Um ein "&" anzeigen zu lassen musst du zwei "&&" verwenden. Mit "A&B" wäre die Checkbox über "Alt + B" auswählbar.

[Achat]

Wie lang dürfen $Variablen-Namen maximal sein?

MfG

[Lawliet]

4095 Zeichen. Du musst aber auch bedenken, dass es Probleme mit Funktionen und der Performance geben kann.

[Achat]

Wie kann man zuverlässig alle Kommentare in einem Autoit3-Sourcecode entfernen?

Ich habe hier schon was mit StringRegExp ausprobiert:

			ElseIf StringRegExp(StringStripWS($aSplit[$i], 8), '[\)|' & Chr(39) & '|"](;.*)', 0) Then ;[\)|'|"|\]](;.*) -> \s
				$aRegExp = StringRegExp($aSplit[$i], '[\)|' & Chr(39) & '|"]\s*(;.*)^["|'&Chr(39)&']', 1)
				If IsArray($aRegExp) And UBound($aRegExp) = 1 Then
				$aSplit[$i] = StringReplace($aSplit[$i], $aRegExp[0], '',0,1)
				ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $aRegExp = ' & $aRegExp[0] & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console
				EndIf
			EndIf

$aSplit ist

StringSplit($sSource,Chr(13),2) ;jede Zeile des Sourcecodes.

und wird in einer for-Schleife abgearbeitet.

Es entfernt aber nicht alle Kommentare. Kennt sich jemand mit StringRegExp aus? Oder wäre eine andere Lösung besser?

MfG

[-STORM-]

Wenn außer für Kommentare kein Semikolon vorkommt, ist das ziemlich leicht zu machen. Auch ohne RegEx.
Würde aber das Script zerstören, falls irgendwo eines in nem String, also zwischen Anführungszeichen, steht.

[Achat]

Originally Posted by -STORM-

Würde aber das Script zerstören, falls irgendwo eines in nem String, also zwischen Anführungszeichen, steht.

Das ist das Problem.

Zum Beispiel in der StructureConstants.au3

Global Const $tagCOMBOBOXEXITEM = "uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;int SelectedImage;int OverlayImage;" & _
		"int Indent;lparam Param"

Global Const $tagNMCOMBOBOXEX = $tagNMHDR & ";uint Mask;int_ptr Item;ptr Text;int TextMax;int Image;" & _
		"int SelectedImage;int OverlayImage;int Indent;lparam Param"

Wenn dann ein Teil des Strings gelöscht wird, funktioniert es ja gar nicht mehr, weil dann u.a. das zweite Anführungszeichen fehlt.

MfG

[-STORM-]

Du könntest die Anzahl der Anführungszeichen links vom Semikolon zählen, und nur den Teil danach löschen, falls die Anzahl gerade ist.

Falls die Anzahl ungerade ist, musst du ggf. nach nem zweiten Semikolon weiter rechts suchen und dafür wieder die Anzahl der Anführungszeichen links davon zählen usw.

Edit: Nicht vergessen, ' und " einzeln zu überprüfen, da ja eines der Zeichen in nem String stehen kann, der durch das andere angegeben wird.

[Achat]

Originally Posted by -STORM-

Du könntest die Anzahl der Anführungszeichen links vom Semikolon zählen, und nur den Teil danach löschen, falls die Anzahl gerade ist.

Falls die Anzahl ungerade ist, musst du ggf. nach nem zweiten Semikolon weiter rechts suchen und dafür wieder die Anzahl der Anführungszeichen links davon zählen usw.

Edit: Nicht vergessen, ' und " einzeln zu überprüfen, da ja eines der Zeichen in nem String stehen kann, der durch das andere angegeben wird.

If $fVarForm And Not $sNewURL Then Return SetError(5, 0, "") ; "action" must have URL specified

"" oder '' können ja auch noch im Kommentar verwendet werden

Kann man das nicht irgendwie per RegExp lösen?

Der Autoit-Obfuscator schafft es ja auch irgendwie...

#AutoIt3Wrapper_Run_Obfuscator=y
#Obfuscator_Parameters=/striponly

MfG

[Lawliet]

Du kannst es dir ja am Obfuscator von Shadow abschauen