Repeat Text Warning (3 times) for metin

repeat_warner.mrc

ON *:TEXT:*:#: {
  tokenize 32 $strip($1-)

  var %hash = REPEATS_ $+ $chan
  var %times = $hget(%hash,$nick $+ _TIMES)
  var %last_msg = $hget(%hash,$nick $+ _LAST_MSG)
  var %md5 = $md5($1-,0)

  if (!%last_msg) { hadd -m %hash $nick $+ _LAST_MSG %md5 | hinc -u3 %hash $nick $+ _TIMES 1 | return }
  if (%last_msg !== %md5) { hadd -m %hash $nick $+ _LAST_MSG %md5 | hadd -u3 %hash $nick $+ _TIMES 1 | return }

  hadd -m %hash $nick $+ _LAST_MSG %md5
  hinc -u3 %hash $nick $+ _TIMES 1

  var %times = $hget(%hash,$nick $+ _TIMES)

  if (%times == 3) { msg $chan ( $+ $nick $+ ): WARNING! -> Stop repeating the same message here! (3 times so far) | hdel -w %hash $nick $+ _* }
}