on ^&*:text:*:*:{
echo -mbflirt $iif(#,#,$nick) $pcol $1-
haltdef
}
on ^&*:chat:*:{
echo -mbflirt =$nick $pcol $1-
haltdef
}
on &*:input:*:{
if /* !iswm $1 && $window($active).type isin query channel chat {
!.msg $active $1-
var %pcol = 4[&&&4]
if # {
echo -ati $replace(%pcol,&&&,$+(,$nick(#,$me).color,$left($remove($nick(#,$me).pnick,$me),1),$me,)) $1-
}
else echo -ati $replace(%pcol,&&&,$+(,$cnick($me).color,$me,)) $1-
halt
}
}
alias pcol {
var %pcol = 4[&&&4]
if # {
return $replace(%pcol,&&&,$+(,$nick(#,$nick).color,$left($remove($nick(#,$nick).pnick,$nick),1),$nick,))
}
return $replace(%pcol,&&&,$+(,$cnick($nick).color,$nick,))
}