Bin ich jetzt irgendwie deppert?
Das ist doch das was meine Schleife macht. Auch wenn ich gerade einen kleinen Fehler gesehen habe.
AutoIt
;-- Textsample
;~ Global $Text = 'A'
;~ While Mod(StringLen($Text), 4) <> 0
;~ $Text &= ','
;~ WEnd
;~ MsgBox(0, "", $Text & ' ' & StringLen($Text))
;-- Arraysample
Global $Result
Global Const $aOperator = [8, '+', '+', '*', '-', '-', '/', '-', '+']
Global Const $aArray_1 = [40, 20, 6, 19, 75, 20, 19, 6, 75, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40]
Global $Row = 1
While 1
For $i = 1 to $aOperator[0]
;~ MsgBox(0, "", $aArray_1[$Row] & " " & $aOperator[$i] & " " & $aArray_1[$Row + 1] & " = " & Execute($aArray_1[$Row]&$aOperator[$i]&$aArray_1[$Row + 1]) & " und das in in Datei-X speichern")
$Result = $aArray_1[$Row] & " " & $aOperator[$i] & " " & $aArray_1[$Row + 1] & " = " & Execute($aArray_1[$Row] & $aOperator[$i] & $aArray_1[$Row + 1]) & " und das in in Datei-X speichern" & @CRLF ;nur zur besseren lesbarkeit als Konsolenausgabe
ConsoleWrite($Result) ;nur zur besseren lesbarkeit als Konsolenausgabe
$Row += 2
if ($Row + 1) > $aArray_1[0] then Exit
Next
WEnd
Alles anzeigen