String split?

[botanic 0]

how can I go about setting the bold text below into a set of variables from a txt file?

2: 1: 0 |(Off) Note | chan= 1 | pitch=e 4

|On Note | chan= 1 | pitch=D 4 | vol=110

Edited September 1, 2007 by botanic

[Zedna 200]

$line = "2: 1: 0 |(Off) Note | chan= 1 | pitch=e 4"
$line = StringSplit($line,"|")

$a = $line[1]
$b = $line[2]
$c = GetValue($line[3])
$d = GetValue($line[4])

Func GetValue($text)
    $text = StringSplit($text,"=")
    Return $text[2]
EndFunc

Edited September 1, 2007 by Zedna