Smaller:

alias half {
  while $0 {
    var %s %s $left($1,$ceil($calc($len($1)/2)))
    tokenize 32 $2-
  }
  msg $active %s
}

EDIT: Is there a reason for mine being Gummo 'Edition'?