alias swear {
return swear1 swear2 swear3
}
On *:Text:*:#channel: {
if (!$hget(swear)) hmake swear 10
var %swr = 1
while ($gettok($swear,%swr,32)) {
if ($+(*,$gettok($swear,%swr,32),*) iswm $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
}
}
On *:Action:*:#channel: {
if (!$hget(swear)) hmake swear 10
var %swr = 1
while ($gettok($swear,%swr,32)) {
if ($+(*,$gettok($swear,%swr,32),*) iswm $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
}
}