on *:LOAD:{
/set %Bannword Kappa FrankerZ DansGame
}
On @*:TEXT:*:#hearthstoneness: {
if ($nick !isop #) {
set %Badword. [ $+ [ $nick ] ] 0
var %i = 0
while (%i < $numtok(%Bannword,32)) {
inc %i
var %current.word = $gettok(%Bannword,%i,32)
if ($regex($1-,/ $+ %current.word $+ /g) > 0 ) {
%Badword. [ $+ [ $nick ] ] = %Badword. [ $+ [ $nick ] ] + $regex($1-,/ $+ %current.word $+ /g)
if ( %Badword. [ $+ [ $nick ] ] >= 5 ) {
msg #hearthstoneness Stop spamming emotes, $nick $+ !
msg # .timeout $nick 10
unset %Badword. [ $+ [ $nick ] ]
return
}
}
ON *:TEXT:*:#hearthstoneness: {
IF ($nick !isop $chan) {
VAR %x = 1
WHILE ($gettok(%Bannword,%x,32)) {
IF ($findtok($1-,$v1,32)) {
INC %Badword. [ $+ [ $nick ] ]
VAR %Badword_repeat $true
BREAK
}
INC %x
}
IF (%Badword. [ $+ [ $nick ] ] >= 5) {
MSG $chan Stop spamming emotes, $nick $+ !
MSG $chan .timeout $nick 10
UNSET %Badword. [ $+ [ $nick ] ]
}
ELSEIF ((%Badword. [ $+ [ $nick ] ]) && (!%Badword_repeat)) UNSET %Badword. [ $+ [ $nick ] ]
}
}