yes something like that but
when I tested that script in the window
I get this error

* /set: line too long (line 7, script3.mrc)
Code:
  [color:red]  
alias getl {
  var %e = $line(@test,0)
  var %i = 0
  while (%i < %e) {
    /inc %i
    if ($left($gettok($line(@test,%i),1,32),1) != $chr(33) ) {
  [color:blue]  /var %lines = $addtok(%lines,%i,32)[/color] 
    }
  }
  var %e = $gettok(%lines,0,32) 
  while (%e != 0) {
    dline @test $gettok(%lines,%e,32)
    /dec %e
  }
}

[/color]  






Intelligence: It's better to ask a stupid question, then to prove it by not asking....