Array Pain!

[Shyke]

$a = StringSplit($input, "")
For $i = 1 to $a[0]
    If $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "/" And $a[$i + 3] = "|" Then
        $output = $output & "m"
        $i = $i + 4
    EndIf
Next

That's a clippet of my code. It runs into errors when it tries to test $a[$i + 1] if it is already at the end of $a[0] as expected.

How do I work around this so I don't hit this terminal error?

[PaulIA]

$a = StringSplit($input, "")
For $i = 1 to $a[0]
    If $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "/" And $a[$i + 3] = "|" Then
        $output = $output & "m"
        $i = $i + 4
    EndIf
Next

That's a clippet of my code. It runs into errors when it tries to test $a[$i + 1] if it is already at the end of $a[0] as expected.

How do I work around this so I don't hit this terminal error?

Don't ever modify a loop variable inside the loop itself. It will bring you really bad karma. How about:

$a = StringSplit($input, "")
$i=1
while $i <= $a[0] - 3
  If $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "/" And $a[$i + 3] = "|" Then
    $output = $output & "m"
  EndIf
  $i = $i + 4
wend

[Shyke]

Err...

Here's a bigger piece of my code:

$a = StringSplit($input, "")
For $i = 1 To $a[0]
    If $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "/" And $a[$i + 3] = "|" Then
        $output = $output & "m"
        $i = $i + 4
    ElseIf $a[$i] = "|" And $a[$i + 1] = "-" And $a[$i + 2] = "|" Then
        $output = $output & "h"
        $i = $i + 3
    ElseIf $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "|" Then
        $output = $output & "n"
        $i = $i + 3
    EndIf
Next

Edited November 14, 2006 by Shyke

[PaulIA]

$a = StringSplit($input, "")
$i = 1
while $i < $a[0]
  if $i < $a[0] - 4 then
    If $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "/" And $a[$i + 3] = "|" Then
        $output = $output & "m"
        $i = $i + 4
    endif
  endif
  if $i < $a[0] - 3 then
    If $a[$i] = "|" And $a[$i + 1] = "-" And $a[$i + 2] = "|" Then
        $output = $output & "h"
        $i = $i + 3
    ElseIf $a[$i] = "|" And $a[$i + 1] = "\" And $a[$i + 2] = "|" Then
        $output = $output & "n"
        $i = $i + 3
    EndIf
  endif
Next

Same principal, just different checks.

Edit: Misplaced an endif

Edited November 14, 2006 by PaulIA