On *:Text:*:#channel: { swear $1- }
On *:Action:*:#channel: { swear $1- }
alias -l swear {
if ($nick !isop #) && (!$hget(swear)) hmake swear 10
var %swr = 1
while ($gettok($swear,%swr,32)) {
if ($+(*,$gettok($swear,%swr,32),*) iswm $strip($1-)) {
hinc swear $nick
var %swear = $gettok($swear,%swr,32)
if ($hget(swear,$nick) == 1) do something here
if ($hget(swear,$nick) == 3) .do something here
}
inc %swr
}
}