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 ] ]
  }
}