on *:Input:#:{
if (/* !iswm $1) {
haltdef
var %t $+($chr(3),$iif($me isreg $chan,03,$replace($left($nick($chan,$me).pnick,1),@,04,%,07,+,12)),$1-)
msg $chan %t
}
}