Something

on ^*:TEXT:*:?: { 
  bset -t &asciitext 1 $1-
  var %s = 1
  while (%s < $bvar(&asciitext,0)) {
    echo $iif(%s == 1,-ti2 $iif($chan,$chan,$nick) $+(<,$nick,>),-i2 iif($chan,$chan,$nick)) $bvar(&asciitext,%s,200))
    inc %s 200 
  }
  haltdef
}