Break text into new lines

[KilliK]

Hello.

I have this text which is basically one line:
--AAA-BBB--CCC-DDD--EEE-FFF...etc

I am trying to break it so that each part which starts with -- is put in a new line.
Ι want to look like this:
--AAA-BBB
--CCC-DDD
--EEE-FFF
...and so on

I am trying to do it with the below code but with no success.

Code: Select all

loop, parse, textstring, --
newstring .= A_LoopField . "`r`n"

can someone help me with this?

[Ravenlord]

Code: Select all

StringReplace, textstring, textstring, --, `n, All

[jeeswg]

Some ideas:

Code: Select all

q:: ;split text by '--', using RegExReplace
vText := "--AAA-BBB--CCC-DDD--EEE-FFF"
;[^a] means not a, in RegEx, text between square brackets is a character class
;[^\-] means not -, - is escaped with \ because - has a special meaning within a character class e.g. [a-z] means all of the characters from a to z
;$1 contains whatever is within the first set of parentheses
vText := RegExReplace(vText, "([^\-])--", "$1`r`n-")
MsgBox, % vText
return

w:: ;split text by '--', using StrReplace
vText := "--AAA-BBB--CCC-DDD--EEE-FFF"
vText := StrReplace(vText, "--", "`r`n--")
vText := LTrim(vText, "`r`n")
MsgBox, % vText
return

e:: ;split text by '--', using StrSplit
vText := "--AAA-BBB--CCC-DDD--EEE-FFF"
oArray := StrSplit(vText, "--")
vText := ""
for vKey, vValue in oArray
	vText .= (A_Index=1?"":"`r`n--") vValue
vText := LTrim(vText, "`r`n")
MsgBox, % vText
return

[garry]

another example

Code: Select all

x:="--"
string=--AAA-BBB--CCC-DDD--EEE-FFF
a:=StrSplit(String,x)
Loop % a.MaxIndex()
   c .= If (A_Index =a.maxindex() ) ? a[a_index] . "`n" : a[a_index] . "`n--"
msgbox,%c%

[KilliK]

thank you for your help, I ll test your code asap. thank you again.