[theme]
name=h00k3rX! by hatred
sounds=no
ircn7script=$true

[loadmsg]
n1=,------------------- ---------------- --------- ------ ---- --- -- - 
n2=$vl Thanks for loading "h00k3rX!" established on 01.08.01             
n3=$vl Email: theloser9@hotmail.com Website: http://www.realhatred.com   
n4=$vl "Turning tears into oceans, words into sand."		         
n5='------------------- ---------------- --------- ------ ---- --- -- - 

[credits]
n1=h00k3rX by hatred - by far, the suckiest theme in the books ;]
n2=ircN 7 Theme - done by hatred

[ircN]
hc=00
sc=04
ac=14

iecho=$sc([ò) $+ $ac(¢) $+ $hc(ó]) $$+ $sc(->)
multisay=echo $colour(Own) -ti2 $gettok($1,%i.msg,44) $sc(<) $+ $ac($me) $+ $pst2($me,$gettok($1,%i.msg,44)) $+ $sc(>) $2-
say=echo $colour(Own) -ti2 $1 $sc(<) $+ $ac($me) $+ $pst2($me,$1) $+ $sc(>) $2-
multimsg=iiecho $sc(..) $+ $ac(msg) $+ $chr(40) $+ $hc($gettok($1,%i.msg,44)) $+ $chr(41) $+ $sc(..) $+ $2-
msg=iiecho $sc(..) $+ $ac(msg) $+ $sc($chr(40)) $+ $hc($1) $+ $sc($chr(41)) $+ $ac(..) $+ $sc($2-)
multidescribe=echo $colour(Action) -ti2 $gettok($1,%i.describe,44) $b($hc(..)) $pst($me,$gettok($1,%i.describe,44)) $2-
describe=echo $colour(Action) -ti2 $1 $b($hc(..)) $pst($me,$1) $2-
multiprivdescribe=echo $colour(Action) -tai2 $sc(..) $+ $ac(act) $+ $chr(40) $+ $hc($gettok($1,%i.describe,44)) $+ $chr(41) $+ $sc(..) $b($hc(=)) $me $2-
privdescribe=echo $colour(Action) -tai2 $sc(..) $+ $ac(act) $+ $chr(40) $+ $hc($1) $+ $chr(41) $+ $sc(..) $b($hc(..)) $me $2-
action=echo $colour(Action) -tai2 $b($hc(..)) $pst($me,$chan) $1-
ctcp=$hc(..) $+ $ac(ctcp) $+ $chr(40) $+ $hc($1) $+ $chr(41) $+ $hc(..) $+ $upper($2) $+ $iif($3-,$hc(.)) $+ $3-
channotice=echo $colour(Notice) -ti2 $1 $sc(-) $+ $pst($me,$1) $+ $sc(:) $+ $1 $+ $sc(-) $2-
multichannotice=echo $colour(Notice) -ti2 $gettok($1,%i.notice,44) $sc(-) $+ $pst($me,$gettok($1,%i.notice,44)) $+ $sc(:) $+ $gettok($1,%i.notice,44) $+ $sc(-) $2-
notice=$sc(..) $+ $ac(notice) $+ $sc($chr(40)) $+ $hc($1) $+ $sc($chr(41)) $+ $hc(..) $+ $sc($2-)
multinotice=$sc(..) $+ $ac(notice) $+ $chr(40) $+ $hc($gettok($1,%i.notice,44)) $+ $chr(41) $+ $sc(..) $+ $2-
lmsg=$sc(..) $+ $ac(msg) $+ $hc($chr(40)) $+ $ac(selected nicks) $+ $hc($chr(41)) $+ $sc(..) $+ $1-
lnotice=$sc(..) $+ $ac(notice) $+ $hc($chr(40)) $+ $ac(selected nicks) $+ $hc($chr(41)) $+ $sc(..) $+ $1-
shownicktext=$hc(<) $+ $nick $+ $sc(:) $+ $chan $+ $hc(>) %tmp
shownickaction=$b($hc(..)) $nick $+ $sc(:) $+ $chan %tmp
invite=$sc(..) $+ invited $hc($1) to $hc($2) $+ $sc(..)
back=ah, welcome back h00k3r
away=get away from the computer now, b1tch
awaymsg1=describe $gettok(%away.chan,%i.away,44) is gone:.. $1- $+ $u($chr(44)) $+ $replace(%msglog,on,+,off,-) $+ log $+ $b(/) $+ $replace(%pager,on,+,off,-) $+ pager $iif(%em == on,$addtok(e,$email,44)) $iif(%showuin == on,$addtok(u,%uin,44))
awaymsg2=ame is gone.. $1- $+ $u($chr(44)) $+ $replace(%msglog,on,+,off,-) $+ log $+ $b(/) $+ $replace(%pager,on,+,off,-) $+ pager $iif(%em == on,$addtok(e,$email,44)) $iif(%showuin == on,$addtok(u,%uin,44))
backmsg1=describe $gettok(%away.chan,%i.back,44) awakens.. $iif(%tmp.back != $null,$strip($right(%tmp.back,$calc($len(%tmp.back) - 2)))) $+ $u($chr(44)) $+ gone $+ $b(/) $+ $gone
backmsg2=ame awakens.. $iif(%tmp.back != $null,$strip($right(%tmp.back,$calc($len(%tmp.back) - 2)))) $+ $u($chr(44)) $+ gone $+ $b(/) $+ $gone


[nickcolors]
shitted=04
user=07
protected=12
voice=06
halfop=11
op=13
bot=14
master=03
owner=09

[mIRCcolours]
action=15
ctcp=15
highlight=15
info=15
info2=15
invite=15
join=15
kick=15
mode=04
nick=15
normal=15
notice=15
notify=15
other=15
own=00
part=15
quit=15
topic=15
wallops=15
whois=14
editbox=14
listbox=15
editbg=01
listbg=01
background=01

[mIRC]
ctcp=CTCP $hc($1) $sc(request) by $hc($nick) $cpms($2-)
pwctcp1=CTCP $hc($1) $sc(request) by $hc($nick) $cpms($str(*,$len($2))) $3-
pwctcp2=CTCP $hc($1) $sc(request) by $hc($nick) $cpms($str(*,$len($2)))) $str(*,$len($3)) $4-
chanctcp=$hc($nick) has requested a channel $sc($1) on $hc($chan) at $hc($atime) $+ $cpms($2-)
ctcpreply=CTCP $hc($1) $sc(reply) from $hc($nick) $+ : $2-
ctcppingreply=CTCP $hc(PING) $sc(reply) from $hc($nick) $+ : $iduration(%pt)
ctcppingreply0=CTCP $hc(PING) $sc(reply) from $hc($nick) $+ : 0 seconds
help=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc() $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(+h) $hc($hnick) $+ $chr(41) $ac(by) $ac($nick)
op=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(+o) $hc($opnick) $+ $chr(41) $ac(by) $ac($nick)
voice=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(+v) $hc($vnick) $+ $chr(41) $ac(by) $ac($nick)
dehelp=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(-h) $hc($hnick) $+ $chr(41) $ac(by) $ac($nick)
deop=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(-o) $hc($opnick) $+ $chr(41) $ac(by) $ac($nick)
devoice=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc(-v) $hc($vnick) $+ $chr(41) $ac(by) $ac($nick)
mode=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($nick) $ac(mode) $+ $ac($chr(41)) $chr(40) $+ $hc($1-) $+ $chr(41)
usermode=echo $colour(Mode) -tsi2 $sc(À£Á) $+ $hc(>) $ac(usermode) $sc($chr(40)) $+ $hc($1-) $+ $sc($chr(41))
servermode=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($nick) $ac(servermode) $+ $ac($chr(41)) $chr(40) $+ $hc($1-) $+ $chr(41)
serverop=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(servermode) $+ $ac($chr(41)) $chr(40) $+ $hc(+o) $hc($opnick) $+ $chr(41) $ac(by) $ac($nick)
ban=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $sc($chr(40)) $+ $hc(+b) $hc($banmask) $+ $sc($chr(41)) $ac(by) $ac($nick)
unban=echo $colour(Mode) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $ac(mode) $+ $ac($chr(41)) $sc($chr(40)) $+ $hc(-b) $hc($banmask) $+ $sc($chr(41)) $ac(by) $ac($nick)
nick=echo $colour(nick) -ti2 $comchan($newnick,%i) %h $ac(nick) $+ $sc($chr(35)) $+ $hc($right($comchan($newnick,%i),$calc($len($comchan($newnick,%i)) - 1))) $+ $sc(>) $ac($nick) $ac(to) $hc($newnick) $sc($chr(40)) $+ $ac($asctime(h.nnt)) $+ $sc($chr(41))
invite1=echo $colour(Invite) -tsi2 $hc($chr(40)) $+ $sc(invite) $sc($chan) $+ $hc($chr(41)) by $ac($nick) $+ ( $+ $ac($gettok($address,1,64)) $+ $sc(À£Á) $+ $ac($gettok($address,2,64)) $+ )
invite2=echo $colour(Invite) -tai2 $hc($chr(40)) $+ $sc(invite) $sc($chan) $+ $hc($chr(41)) by $ac($nick) $+ ( $+ $ac($gettok($address,1,64)) $+ $sc(À£Á) $+ $ac($gettok($address,2,64)) $+ )
joined=echo $colour(Join) -ti2 $chan $sc(À£Á) $+ $hc(>) you joined $chan $+ $sc(..) $+ %irc.network
join1=echo $colour(Join) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $sc(join) $+ $ac($chr(41)) $hc($nick) $ac($chr(40)) $+ $ac($gettok($address,1,64)) $+ $sc(@) $+ $ac($gettok($address,2,64)) $+ $ac($chr(41))
join2=echo $colour(Join) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $sc(join) $+ $ac($chr(41)) $hc($nick) $ac($chr(40)) $+ $ac($gettok($address,1,64)) $+ $sc(@) $+ $ac($gettok($address,2,64)) $+ $ac($chr(41))
part1=echo $colour(Part) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $sc(part) $+ $ac($chr(41)) $hc($nick) $ac($chr(40)) $+ $ac($gettok($address,1,64)) $+ $sc(@) $+ $ac($gettok($address,2,64)) $+ $ac($chr(41)) $iif($1-,$hc(;)) $+ $ac($1-)
part2=echo $colour(Part) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $sc(part) $+ $ac($chr(41)) $hc($nick) $ac($chr(40)) $+ $ac($gettok($address,1,64)) $+ $sc(@) $+ $ac($gettok($address,2,64)) $+ $ac($chr(41)) $iif($1-,$hc(;)) $+ $ac($1-)
quit1=echo $colour(quit) -ti2 $comchan($nick,%i) %h $ac(Signoff) $+ $sc($chr(35)) $+ $hc($right($comchan($nick,%i),$calc($len($chan) - 1))) $+ $sc(>) $addtok($iif($usr($nick),$u($hc($nick)),$hc($nick)),$sc($remove($address($nick,0),*)),0) $+ $sc(:) $sc($chr(40)) $+ $iif($1,$ac($1-)) $+ $sc($chr(41)) $sc($chr(40)) $+ $ac($asctime(h.nnt)) $+ $sc($chr(41))
quit2=echo $colour(quit) -ti2 $comchan($nick,%i) %h $ac(Signoff) $+ $sc($chr(35)) $+ $hc($right($comchan($nick,%i),$calc($len($chan) - 1))) $+ $sc(>) $addtok($iif($usr($nick),$u($hc($nick)),$hc($nick)),$sc($remove($address($nick,0),*)),0) $+ $sc(:) $sc($chr(40)) $+ $iif($1,$ac($1-)) $+ $sc($chr(41)) $sc($chr(40)) $+ $ac($asctime(h.nnt)) $+ $sc($chr(41))
kick=echo $colour(Kick) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $ac($chr(40)) $+ $ac($chan) $sc(kick) $+ $ac($chr(41)) $ac($knick) $+ $sc($chr(40)) $+ $ac($1-) $+ $ac($o) $+ $sc($chr(41)) $sc(...) $+ $ac(by) $ac($nick)
kickme=echo $colour(Kick) -ti2 $chan $sc(ò¢ó) $+ $hc(>) You were kicked by $sc($nick) $hc($chr(40)) $+ $sc($1-) $+ $sc($o) $+ $hc($chr(41))
kickrejoin=echo $colour(Info) -i2 $chan $sc(ò¢ó) $+ $hc(>) trying to rejoin $+ $sc(...)
servernotice1=echo $colour(Notice) -tsi2 $ac(-) $+ $hc($nick) $+ $ac(-) $sc($1-)
servernotice2=echo $colour(Notice) -tai2 $ac(-) $+ $hc($nick) $+ $ac(-) $sc($1-)
action=echo $colour(Action) -ti2 $chan $b($hc(..)) $pst2($nick,$chan) $+ $nick $1-
text=echo $colour(Normal) -ti2 $chan $ac(<) $+ $ac($nick) $+ $pst2($nick,$chan) $+ $ac(>) $1-
notice=echo $colour(Notice) -ti2 $chan $sc(-) $+ $pst2($nick,$chan) $+ $hc($nick) $+ $sc(:) $+ $chan $+ $sc(-) $ac($1-)
topic=echo $colour(Topic) -ti2 $chan $sc(ù) $+ $ac(ø) $+ $sc(ú) $sc($chr(40)) $+ $sc($chan) $c $+ 7 $+ topic $+ $c $+ $sc($chr(41)) $sc($chr(40)) $+ $hc($1-) $+ $hc($o) $+ $sc($chr(41)) $sc(...) $+ $ac(by) $pst2($nick,$chan) $+ $ac($nick)
wallops1=echo $colour(Wallops) -tsi2 $hc($nick) $+ $ac(>) $sc($1-)
wallops2=echo $colour(Wallops) -tai2 $hc($nick) $+ $ac(>) $sc($1-)

[nicklist]
top=$lfix(3,.) $+ $str(-,15) $+ . $+ $lfix(15,$chr(32)) $+ . $+ $str(-,15) $+ . $+ $lfix(15,$chr(32)) $+ .
names=$lfix(3,$vl) $fix(13,$nll($gettok($1-,%i.nline,32))) $vl $fix(13,$nll($gettok($1-,$pls(1,%i.nline),32))) $vl $fix(13,$nll($gettok($1-,$pls(2,%i.nline),32))) $vl $fix(13,$nll($gettok($1-,$pls(3,%i.nline),32))) $vl
bottom=$lfix(3,') $+ $lfix(15,$chr(32)) $+ ' $+ $str(-,15) $+ ' $+ $lfix(15,$chr(32)) $+ ' $+ $str(-,15) $+ '
namecount=4
namestop1=$lfix(3,.) $+ $str(-,63) $+ .
namestop2a=$lfix(3,$vl) Names [[ $+ $hc($3) $+ : $+ $sc($fix(2,%jstat.num2)) $+ ]] $lfix($sub(51,$len($3)),$vl)
namestop2b=$lfix(3,$vl) Next [[ $+ $hc($3) $+ : $+ $sc($fix(2,%jstat.num2)) $+ ]] $lfix($sub(52,$len($3)),$vl)

[whois]
top=$sc($addtok($addtok(Ú,$str(Ä,5),0),$str(-,3),0)) $+ $ac(Ä) $+ $sc(--) $+ $ac($str(Ä,3)) $+ $sc(-) $+ $addtok($ac($str(Ä,6)),$ac($str(-,3)),0)  $+ $hc(Ä) $+ $ac(--) $+ $sc(ÄÄ) $+ $ac(-) $+ $addtok($hc($str(Ä,9)),$hc($str(-,3)),0) $hc(--) $hc(-)
address=$sc($vl) $ac($2) $addtok($addtok($addtok($ac($chr(40)),$sc($3),0),$ac(À£Á),0),$addtok($sc($4),$ac($chr(41)),0),0)
name=$ac(³) $sc(i) $+ $ac($addtok($addtok($addtok(rcname,$chr(15),32),:,32),$6-,32))
chan=$hc($vl) $sc(c) $+ $ac($addtok($addtok($addtok(hannels,$chr(15),32),:,0),$3-,32))
server=$ac(³) $sc(s) $+ $ac($addtok($addtok($addtok($addtok($addtok(erver,$c $+ $colour(background) $+  ,32),$chr(15),32),$chr(15),32),:,32),$3,32))
away=$sc($vl) $sc(a) $+ $ac($addtok(way msg :,$3-,32))
ircop=$sc($vl) $sc(*) $ac($lower($4-))
idle=$sc($vl) $sc(i) $+ $ac($addtok(dle time:,$duration($3-),32))
bottom=$sc($addtok($addtok(À,$str(Ä,5),0),$str(-,3),0)) $+ $ac(Ä) $+ $sc(--) $+ $ac($str(Ä,3)) $+ $sc(-) $+ $addtok($ac($str(Ä,6)),$ac($str(-,3)),0) $+ $hc(Ä) $+ $ac(--) $+ $sc(ÄÄ) $+ $ac(-) $+ $addtok($hc($str(Ä,9)),$hc($str(-,3)),0) $hc(--) $hc(-)

[cwhois]
top=$o | whecho $form(whois,top)
address=$o | whecho $form(whois,address)
name=$o | whecho $form(whois,name)
chan=$o | whecho $form(whois,chan)
server=$o | whecho $form(whois,server)
away=$o | whecho $form(whois,away)
ircop=$o | whecho $form(whois,ircop)
idle=$o | whecho $form(whois,idle)
bottom=$o | whecho $form(whois,bottom)

[whowas]
top=$o | whecho $form(whois,top)
address=$o | whecho $form(whois,address)
name=$o | whecho $form(whois,name)
chan=$o | whecho $form(whois,chan)
server=$o | whecho $form(whois,server)
last=$lfix(4,$hc(³)) $+ $ac(³) $ac(last) $sc(ù) $hc($lower($4-))
bottom=$o | whecho $form(whois,bottom)


[cwhowas]
top=$sc(------.)
address=host $lfix(2,$sc($vl)) $hc($3) $+ $sc(ò¢ó) $+ $hc($o) $+ $hc($4)
name=name $lfix(2,$sc($vl)) $hc($6-)
server=server $+ $sc($vl) $hc($3)
last=last $lfix(2,$sc($vl)) $hc($4-)
bottom=$sc(------') $lfix(15,$chr(40)) $+ eow for $hc($2) $+ $chr(41))

[nickcomp]
styles=lower,default,fristbold,fristunder,lastbold,lastunder,f&l_bold,f&l_under,f&l_b&u,fb_lu,lu_fb,f&lu_mb,f&lb_mu,2imNu,qt,qt2,qt3,qt4,replace,l337,silence,silence2,silence3,silence4,pst
lower=%nlb $+ $lower($1) $+ %nrb
default=%nlb $+ ¯ $+ $lower($1) $+ %nrb
fristbold=$b($left($1,1)) $+ $iif($mid($1,2,0) > 0,$mid($1,2,$mid($1,2,0))) $+ %nrb
fristunder=$u($left($1,1)) $+ $iif($mid($1,2,0) > 0,$mid($1,2,$mid($1,2,0))) $+ %nrb
lastbold=$left($1,1) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$b($right($1,1))) $+ %nrb
lastunder=$left($1,1) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$u($right($1,1))) $+ %nrb
f&l_bold=%nlb $+ $b($left($1,1)) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$b($right($1,1))) $+ %nrb
f&l_under=%nlb $+ $u($left($1,1)) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$u($right($1,1))) $+ %nrb
f&l_b&u=%nlb $+ $u($b($left($1,1))) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$u($b($right($1,1)))) $+ %nrb
fb_lu=$b($left($1,1))) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$u($right($1,1)))) $+ %nrb
lu_fb=$u($left($1,1))) $+ $iif($len($1) > 2,$mid($1,2,$calc($mid($1,2,0) - 1))) $+ $iif($len($1) > 1,$b($right($1,1)))) $+ %nrb
f&lu_mb=%nlb $+ $u($left($1,1)) $+ $iif($len($1) > 2,$b($mid($1,2,$calc($mid($1,2,0) - 1)))) $+ $iif($len($1) > 1,$u($right($1,1))) $+ %nrb
f&lb_mu=%nlb $+ $b($left($1,1)) $+ $iif($len($1) > 2,$u($mid($1,2,$calc($mid($1,2,0) - 1)))) $+ $iif($len($1) > 1,$b($right($1,1))) $+ %nrb
2imNu=$u $+ $left($1,$int($div($sub($len($1),1),2))) $+ $u $+ $b $+ $mid($1,$pls($int($div($sub($len($1),1),2)),1),$sub(2,$mod($len($1),2))) $+ $b $+ $u $+ $right($1,$int($div($sub($len($1),1),2))) $+ $u $+ %nrb
qt=$u $+ $left($1,$int($div($sub($len($1),1),2))) $+ $b $+ $mid($1,$pls($int($div($sub($len($1),1),2)),1),$sub(2,$mod($len($1),2))) $+ $u $+ $right($1,$int($div($sub($len($1),1),2))) $+ $b $+ %nrb
qt2=$b $+ $left($1,$int($div($sub($len($1),1),2))) $+ $u $+ $mid($1,$pls($int($div($sub($len($1),1),2)),1),$sub(2,$mod($len($1),2))) $+ $b $+ $right($1,$int($div($sub($len($1),1),2))) $+ $u $+ %nrb
qt3=$b $+ $left($1,$int($div($sub($len($1),1),2))) $+ $b $+ $mid($1,$pls($int($div($sub($len($1),1),2)),1),$sub(2,$mod($len($1),2))) $+ $u $+ $right($1,$int($div($sub($len($1),1),2))) $+ $u $+ %nrb
qt4=$u $+ $left($1,$int($div($sub($len($1),1),2))) $+ $u $+ $mid($1,$pls($int($div($sub($len($1),1),2)),1),$sub(2,$mod($len($1),2))) $+ $b $+ $right($1,$int($div($sub($len($1),1),2))) $+ $b $+ %nrb
replace=%nlb $+ $lower($replace($u($1),q,$u(q),y,$u(y),p,$u(p),g,$u(g),j,$u(j),_,$u(_),$vl,$u($vl),[,$u([),],$u(]),$chr(123),$u($chr(123)),$chr(125),$u($chr(125)),$chr(47),$u($chr(47)),$chr(92),$u($chr(92))))) $+ %nrb
silence=%nlb $+ $lower($u($left($1,1))) $+ $iif($len($1) > 1,$lower($b($mid($1,2,1)))) $+ $iif($len($1) > 2,$lower($right($1,$calc($len($1) - 2)))) $+ %nrb
silence2=%nlb $+ $lower($b($left($1,1))) $+ $iif($len($1) > 1,$lower($u($mid($1,2,1)))) $+ $iif($len($1) > 2,$lower($right($1,$calc($len($1) - 2)))) $+ %nrb
silence3=%nlb $+ $lower($u($left($1,1))) $+ $iif($len($1) > 1,$lower($u($mid($1,2,1)))) $+ $iif($len($1) > 2,$lower($right($1,$calc($len($1) - 2)))) $+ %nrb
silence4=%nlb $+ $lower($b($left($1,1))) $+ $iif($len($1) > 1,$lower($b($mid($1,2,1)))) $+ $iif($len($1) > 2,$lower($right($1,$calc($len($1) - 2)))) $+ %nrb
pst=%nlb $+ $pst2($1,$chan) $+ $lower($1) $+ %nrb