Custom themeing - mIRC Discussion Forums

I made this lil deal to spice up the look of my scriipt after staring at the same thing for nearly 2 years. I'm pretty sure it's self explanitory.

theme {
%themez = $strip($1-,burc)
%mbz = $calc($len(%themez) - 2)
%theme1 = $left(%themez,1)
%theme2 = $mid(%themez,%mbz)
%theme3 = $right(%themez,1)
%theme = $+(9,%theme1,10,%theme2,09,%theme3)
return %theme
}

echo # $theme(join 01,01 $str($chr(160),10) 09 $nick $+ : $+ $address($nick,2)) | halt }

this is what it should return or what i would like it to return:

9j10oin Ho0tz:**@6F3E771A.93465C4C.88AB6266.I9P

Unfortunately it's only returning the text below:

j.IPP

I hope i've explained what i'm looking for help on. If not please ask questions. Any help u can give will be greatly appeciated.

Thank you,

Steven aka arkt1k

Code:

theme {
  var %t = $strip($1-)
  return $+($chr(3),09,$left(%t,1),$chr(3),10,$mid(%t,2,-1),$chr(3),09,$right(%t,1))
}

That works great thanks.