Advertisement
westor

Repeat Protection for Koragg v1.0

Jul 2nd, 2023 (edited)
1,855
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.48 KB | None | 0 0
  1. alias repeatprot {
  2.   if (!$1-) { echo -at Repeat Protection is set to %repeatprot }
  3.   if ($1 == On) { set %RepeatProt On | echo -at Repeat Protection is set to %repeatprot }
  4.   if ($1 == Off) { set %RepeatProt Off | echo -at Repeat Protection is set to %repeatprot }
  5. }
  6.  
  7. ON @*:TEXT:*:#: {
  8.   if ($nick !isreg $chan) { return }
  9.  
  10.   tokenize 32 $strip($1-)
  11.  
  12.   var %sha = $sha512($lower($1-),0)
  13.   var %content = $+(CONTENT,$chr(166),$network,$chr(166),$nick,$chr(166),$chan)
  14.   var %repeats = $+(REPEATS,$chr(166),$network,$chr(166),$nick,$chr(166),$chan)
  15.  
  16.   if (!$hget(RP,%content)) || ($hget(RP,%content)) && ($hget(RP,%content) !== %sha) { hadd -m RP %repeats 1 }
  17.  
  18.   if ($hget(RP,%content)) && ($hget(RP,%content) == %sha) {
  19.     hinc -m RP %repeats 1
  20.  
  21.     if ($hget(RP,%repeats) == 3) {
  22.       msg $chan 👉 04[ 12 $+ $nick 04], Wir dulden keine Wiederholungen, da diese von den anderen Nutzern als störend empfunden werden. Weitere Wiederholungen von dir führen zu einem Ausschluß vom Chat.
  23.     }
  24.  
  25.     elseif ($hget(RP,%repeats) == 4) {
  26.       kick $chan $nick Wir dulden keine Wiederholungen, da diese von den anderen Nutzern als störend empfunden werden.
  27.     }
  28.  
  29.     elseif ($hget(RP,%repeats) == 5) {
  30.       ban -k $chan $nick 2 Gebannt: Wir dulden keine Wiederholungen, da diese von den anderen Nutzern als störend empfunden werden.
  31.  
  32.       hdel RP %content
  33.       hdel RP %repeats
  34.  
  35.       return
  36.     }
  37.  
  38.   }
  39.  
  40.   hadd -m RP %content %sha
  41. }
  42.  
  43. ON *:UNLOAD: { hfree -w RP }
  44.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement