Hmm..... i should be a little more specific, theres probably an easier way to do this anyhow.
Code:
   if ($did == 6) { 
    var %n = $numtok($did(5),32))
    while (%n > 0) {
      /whois $gettok($did(5),%n,32)  
      dec -c %n
    }
  }

Can i use some method other than identifying that theres x tokens in a line then whois token x,then token x-1 and so on till x == 0.