#yazi1renk off
on *:input:*:{
  if ($left($1,1) != /) {
    var %Jnk
    var %e = 0
    while %e != $numtok($1-,32) {
      inc %e 1
      var %Jnk = %Jnk $+(04,$left($token($1-,%e,32),1),01) $+ $right($gettok($1-,%e,32),-1)
    }
    msg $active %Jnk
    halt
  }
}
#yazi1renk end