alias skin { return $regsubex($1-,/(\W)/g,$+($chr(3),10,\1,$chr(3))) }
on *:TEXT:!say*:#:{ msg $chan $skin($2-) }
;or $skin(text, goes here)