StringSplit help

[ileandros]

Please help i am going crazy with these string functions.

I got a big hex like this:

$data = "0x30783330373833333330333733383333333633333338333333373333333433333337333333343333333733333330333333373333333333333333333433313333333233343336333333323334333633333337333333333333333333333332333333333333333533333333333333393333333233343335333333363333333833333336333433363333333733333334333333363333333633333336333333393333333633343333333333363333333533333332333433353333333633333333333333363334333633333336333433343333333233343336333333363333333733333336333333353333333733333334333333323334333633333336333333313333333333333339333333333333333333333333333333353333333333333333333333363333333333333333333333333333333633333335333333333333333733333333333333333333333633333331333333333333333433333333333333373333333333333338333333333333333733333333333333323333333633333336333333333333333833333333333333363333333633333331333333333333333933333333333333363333333333333339333333333333333733333333333333393333333633333335333333363333333433333336333333343333333333333337333333333333333533333336333333353333333633333334333333333333333233333333333333383333333633333335333333363333333233333336333333343333333633333334333333333333333533333333333333363333333233343336333333333333333533333333333333313333333333333333333333333333333433333333333333303333333633333333333333363333333133333336333333333333333233343336333333333333333233333333333333353333333333333336333333323334333633333333333333373333333633333335333333333333333733333333333333353333333333333334333333333333333533333336333333353333333633333331333333333333333433333336333333333333333333333333333333333333333233333336333333363333333333333332333333333333333833333333333333383333333233343336333333363333333233333336333333323333333633333333333333333333333533333333333333383333333333333335333333363333333533333332333433363333333633343333333333363334333633333336333333373333333233343335333333363333333533333337333333383333333633333335"

what i want to do is to console write this number from the beggining to end every 12 numbers + @CRLF.

As i read the help files for stringsplit it isn't what i am looking for.

Which function should i use?

After an hour of headache i came up with this which doesnt seem to be excaclty what i wanted to achieve since it displays the stringlength and for some wierd reasons to me it does an endless loop

$data = "0x30783330373833333330333733383333333633333338333333373333333433333337333333343333333733333330333333373333333333333333333433313333333233343336333333323334333633333337333333333333333333333332333333333333333533333333333333393333333233343335333333363333333833333336333433363333333733333334333333363333333633333336333333393333333633343333333333363333333533333332333433353333333633333333333333363334333633333336333433343333333233343336333333363333333733333336333333353333333733333334333333323334333633333336333333313333333333333339333333333333333333333333333333353333333333333333333333363333333333333333333333333333333633333335333333333333333733333333333333333333333633333331333333333333333433333333333333373333333333333338333333333333333733333333333333323333333633333336333333333333333833333333333333363333333633333331333333333333333933333333333333363333333333333339333333333333333733333333333333393333333633333335333333363333333433333336333333343333333333333337333333333333333533333336333333353333333633333334333333333333333233333333333333383333333633333335333333363333333233333336333333343333333633333334333333333333333533333333333333363333333233343336333333333333333533333333333333313333333333333333333333333333333433333333333333303333333633333333333333363333333133333336333333333333333233343336333333333333333233333333333333353333333333333336333333323334333633333333333333373333333633333335333333333333333733333333333333353333333333333334333333333333333533333336333333353333333633333331333333333333333433333336333333333333333333333333333333333333333233333336333333363333333333333332333333333333333833333333333333383333333233343336333333363333333233333336333333323333333633333333333333333333333533333333333333383333333333333335333333363333333533333332333433363333333633343333333333363334333633333336333333373333333233343335333333363333333533333337333333383333333633333335"
$len = StringLen($data)
ConsoleWrite($len & @CR)
While (True)
If $len <= 1870 Then
Do
$len = $len - 12
ConsoleWrite($len & @CRLF)
Until StringLen($len) <= 0
EndIf
WEnd

Edited March 4, 2013 by ileandros

[ripdad]

here is one way...

Local $data = "0x30783330373833333330333733383333333633333338333333373333333433333337333333343333333733333330333333373333333333333333333433313333333233343336333333323334333633333337333333333333333333333332333333333333333533333333333333393333333233343335333333363333333833333336333433363333333733333334333333363333333633333336333333393333333633343333333333363333333533333332333433353333333633333333333333363334333633333336333433343333333233343336333333363333333733333336333333353333333733333334333333323334333633333336333333313333333333333339333333333333333333333333333333353333333333333333333333363333333333333333333333333333333633333335333333333333333733333333333333333333333633333331333333333333333433333333333333373333333333333338333333333333333733333333333333323333333633333336333333333333333833333333333333363333333633333331333333333333333933333333333333363333333333333339333333333333333733333333333333393333333633333335333333363333333433333336333333343333333333333337333333333333333533333336333333353333333633333334333333333333333233333333333333383333333633333335333333363333333233333336333333343333333633333334333333333333333533333333333333363333333233343336333333333333333533333333333333313333333333333333333333333333333433333333333333303333333633333333333333363333333133333336333333333333333233343336333333333333333233333333333333353333333333333336333333323334333633333333333333373333333633333335333333333333333733333333333333353333333333333334333333333333333533333336333333353333333633333331333333333333333433333336333333333333333333333333333333333333333233333336333333363333333333333332333333333333333833333333333333383333333233343336333333363333333233333336333333323333333633333333333333333333333533333333333333383333333333333335333333363333333533333332333433363333333633343333333333363334333633333336333333373333333233343335333333363333333533333337333333383333333633333335"
$data = StringRegExpReplace($data, '(.{12})', '\1' & @CRLF)
ConsoleWrite($data)

-edit-

and another way...

Local $data = "0x30783330373833333330333733383333333633333338333333373333333433333337333333343333333733333330333333373333333333333333333433313333333233343336333333323334333633333337333333333333333333333332333333333333333533333333333333393333333233343335333333363333333833333336333433363333333733333334333333363333333633333336333333393333333633343333333333363333333533333332333433353333333633333333333333363334333633333336333433343333333233343336333333363333333733333336333333353333333733333334333333323334333633333336333333313333333333333339333333333333333333333333333333353333333333333333333333363333333333333333333333333333333633333335333333333333333733333333333333333333333633333331333333333333333433333333333333373333333333333338333333333333333733333333333333323333333633333336333333333333333833333333333333363333333633333331333333333333333933333333333333363333333333333339333333333333333733333333333333393333333633333335333333363333333433333336333333343333333333333337333333333333333533333336333333353333333633333334333333333333333233333333333333383333333633333335333333363333333233333336333333343333333633333334333333333333333533333333333333363333333233343336333333333333333533333333333333313333333333333333333333333333333433333333333333303333333633333333333333363333333133333336333333333333333233343336333333333333333233333333333333353333333333333336333333323334333633333333333333373333333633333335333333333333333733333333333333353333333333333334333333333333333533333336333333353333333633333331333333333333333433333336333333333333333333333333333333333333333233333336333333363333333333333332333333333333333833333333333333383333333233343336333333363333333233333336333333323333333633333333333333333333333533333333333333383333333333333335333333363333333533333332333433363333333633343333333333363334333633333336333333373333333233343335333333363333333533333337333333383333333633333335"

Local $s = ''

For $i = 1 To StringLen($data) Step 12
    $s &= StringMid($data, $i, 12) & @CRLF
Next

ConsoleWrite($s)

-edit2-

Or maybe I misunderstood?...

Local $data = "0x30783330373833333330333733383333333633333338333333373333333433333337333333343333333733333330333333373333333333333333333433313333333233343336333333323334333633333337333333333333333333333332333333333333333533333333333333393333333233343335333333363333333833333336333433363333333733333334333333363333333633333336333333393333333633343333333333363333333533333332333433353333333633333333333333363334333633333336333433343333333233343336333333363333333733333336333333353333333733333334333333323334333633333336333333313333333333333339333333333333333333333333333333353333333333333333333333363333333333333333333333333333333633333335333333333333333733333333333333333333333633333331333333333333333433333333333333373333333333333338333333333333333733333333333333323333333633333336333333333333333833333333333333363333333633333331333333333333333933333333333333363333333333333339333333333333333733333333333333393333333633333335333333363333333433333336333333343333333333333337333333333333333533333336333333353333333633333334333333333333333233333333333333383333333633333335333333363333333233333336333333343333333633333334333333333333333533333333333333363333333233343336333333333333333533333333333333313333333333333333333333333333333433333333333333303333333633333333333333363333333133333336333333333333333233343336333333333333333233333333333333353333333333333336333333323334333633333333333333373333333633333335333333333333333733333333333333353333333333333334333333333333333533333336333333353333333633333331333333333333333433333336333333333333333333333333333333333333333233333336333333363333333333333332333333333333333833333333333333383333333233343336333333363333333233333336333333323333333633333333333333333333333533333333333333383333333333333335333333363333333533333332333433363333333633343333333333363334333633333336333333373333333233343335333333363333333533333337333333383333333633333335"

For $i = 1 To StringLen($data) Step 12
    ConsoleWrite($i & @CRLF)
Next

Edited March 4, 2013 by ripdad

[FireFox]

@ripdad

I think you're right, but it would be very weird that ileandros wants to include the hex prefix.

Therefore your $i start should be 3.

Br, FireFox.

[czardas]

Not quite sure what you're doing, but maybe you might like to look at _StringEqualSplit(), or the modification by guinness further down the page.

[guinness]

Thanks for reminding me. I updated the code.

[czardas]

Thanks for reminding me. I updated the code.

Yeah, I should change the error checking to what you have (tomorrow), it's neater. I see you simplified it.

Edited March 5, 2013 by czardas

[guinness]

Yeh, it was just something I said the other day about exclusively checking for 0 or using Not when the value was boolean, that got me thinking.