Unnamed

alias code .msg $iif(#,#,$nick) ÷ $regsubex($1-,/(.)/g,$base($asc(\1),10,2,8))) | echo $iif(#,#,nick) *** CODE $+([,$time,] <,$chr(3),$nick(#,$me).color,$nick(#,$me).pnick,$chr(3),>) $1-
on ^*:text:÷*:*:haltdef | echo $iif(#,#,$nick) *** CODE $+([,$time,] <,$chr(3),$nick(#,$nick).color,$nick(#,$nick).pnick,$chr(3),>) $regsubex($2-,/(\d{8})/g,$chr($base(\1,2,10)))