on *:INPUT:*: {
  if ($left($1-,1) != $chr(47)) {
    set -u0 %mig-cont 1
    while (%mig-cont <= $gettok($1-,0,32)) {
      if ($gettok($1-,%mig-cont,32) ison $chan) {
        set -u0 %mig-len $len($gettok($1-,%mig-cont,32))
        set -u0 %mig-rest $calc(%mig-len % 3)
        set -u0 %mig-c1 02,00
        set -u0 %mig-c2 04,00
        set -u0 %mig-c3 03,00
        if (%mig-len >= 3) {
          if (%mig-rest == 0) {
            set -u0 %mig-part $calc(%mig-len / 3)
            set -u0 %mig-comple $replace($gettok($1-,%mig-cont,32),$left($gettok($1-,%mig-cont,32),%mig-part),$+(,%mig-c1,$left($gettok($1-,%mig-cont,32),%mig-part),%mig-c2))
            %mig-comple = $replace(%mig-comple,$right(%mig-comple,%mig-part),$+(%mig-c3,$right(%mig-comple,%mig-part),))
          }
          elseif (%mig-rest == 1) {
            set -u0 %mig-part $calc(%mig-len / 3)
            set -u0 %mig-comple $replace($gettok($1-,%mig-cont,32),$left($gettok($1-,%mig-cont,32),%mig-part),$+(,%mig-c1,$left($gettok($1-,%mig-cont,32),%mig-part),%mig-c2))
            %mig-comple = $replace(%mig-comple,$right(%mig-comple,%mig-part),$+(%mig-c3,$right(%mig-comple,%mig-part),))
          }
          else {
            set -u0 %mig-part $calc((%mig-len / 3) + 1)
            set -u0 %mig-comple $replace($gettok($1-,%mig-cont,32),$left($gettok($1-,%mig-cont,32),%mig-part),$+(,%mig-c1,$left($gettok($1-,%mig-cont,32),%mig-part),%mig-c2))
            %mig-comple = $replace(%mig-comple,$right(%mig-comple,%mig-part),$+(%mig-c3,$right(%mig-comple,%mig-part),))
          }
        }
        else {
          if (%mig-txt) { %mig-txt = %mig-txt $gettok($1-,%mig-cont,32) }
          else { set -u0 %mig-txt $gettok($1-,%mig-cont,32) }
        }
        if (%mig-txt) { %mig-txt = %mig-txt %mig-comple }
        else { set -u0 %mig-txt %mig-comple }
      }
      else {
        if (%mig-txt) { %mig-txt = %mig-txt $gettok($1-,%mig-cont,32) }
        else { set -u0 %mig-txt $gettok($1-,%mig-cont,32) }
      }
      INC %mig-cont
    }
    msg $chan %mig-txt
    unset %mig-*
    halt
  }
}