Write with channel name ;
alias test {
msg $1 $+(4+,$str(-,4),$str(-,$len($1)),$str(-,$len($2)),4+)
msg $1 $chr(124) $+(,$rand(2,14),$2,,$chr(44)) $+(4,$1,) $chr(124)
msg $1 $+(4+,$str(-,4),$str(-,$len($1)),$str(-,$len($2)),4+)
}
or
Write without channel name ;
alias test {
msg $1 $+(4+,$str(-,2),$str(-,$len($2-)),4+)
msg $1 $chr(124) $+(,$rand(2,14),$2-,) $chr(124)
msg $1 $+(4+,$str(-,2),$str(-,$len($2-)),4+)
}