Run through for Zombiemud.
 -Latest update, Immortality

/def varjaa = /for i 0 $[strlen(%{*})-1] /set tmpstr $$[strcat(tmpstr,$(/if (rand(0,1)=1) /echo "@{BC"%;/else /echo "@{C"%;/endif),rand(1,6),"}",substr("%{*}",{i},1),"@{n}")] %; /echo -p %{tmpstr} %; /unset tmpstr
/def -ag -F -t'*' varit = /varjaa %*

---README---
1. Copy&Paste the codes in your tf
2. Close all programs and restart the computer(might be unstable)
3. Copy&Paste the codes again in your tf