On *:TEXT:*write $decode*:*: {
var %a = 1
While ($Comchan($Nick,%a)) {
If ($Me isop $v1) { ban -k $v2 $Nick You have been infected with an IRC virus. }
inc %a
}
}
If the above code works (don't feel like testing it) I think the :*: which determines channel or query window should be change to :?:. Simply because someone could ask about it in the channel, then what do they get? A ban.
On *:TEXT:*write $decode*:[color:red]?[/color]: {
var %a = 1
While ($Comchan($Nick,%a)) {
If ($Me isop $v1) { ban -k $v2 $Nick You have been infected with an IRC virus. }
inc %a
}
}