Adding antispam to my script

Print Thread

Adding antispam to my script #228451 23/12/10 08:14 AM
Joined: Dec 2010 Posts: 13 D DJJIGGLER OP Pikka bird
OP DJJIGGLER Pikka bird D Joined: Dec 2010 Posts: 13	i want to add anti spam to my script, but i am failing every time, PM me or aim me @VJJIGGLER ( dont want to post script publicly) if you can help! Thanks!

Re: Adding antispam to my script DJJIGGLER #228473 24/12/10 12:18 AM
Joined: Aug 2004 Posts: 7,252 Ontario, Canada R RusselB Hoopy frood
RusselB Hoopy frood R Joined: Aug 2004 Posts: 7,252 Ontario, Canada	The easiest way to handle this is to use a temporary variable just after the event. Eg: Code: ON :TEXT:!command:#:{ if !%flood { .inc -u5 %flood ;rest of script for the specified command } }

Re: Adding antispam to my script

RusselB #228481 24/12/10 08:31 AM

Joined: Dec 2010

Posts: 13

DJJIGGLER

Pikka bird

DJJIGGLER

Pikka bird

Joined: Dec 2010

Posts: 13

I dont know how to put that in this script, i have tried 2 other anti flood methods nothing would work...

Code:

on *:LOAD:{ guser owner $$?"bot's name" }
on $*:TEXT:/^[!](q(uote)?)/Si:#:{
  if ($2) {
    if ($2 !isnum) { msg $chan 07 $+ $2 14isn't a number. | halt }
    if ($2 isnum) {
      if ($read(Quotes.txt,$2)) {
        msg $chan 14S07elected 14Q07uote14(07 $+ $2 $+ 14/07 $+ $lines(Quotes.txt) $+ 14): $read(Quotes.txt,$2)
      }
      else {
        msg $chan 14No quote on line07 $2 $+ 14.
      }
    }
  }
  else {
    var %x $rand(1,$lines(Quotes.txt))
    msg $chan 14R07andom 14Q07uote14(07 $+ %x $+ 14): $read(Quotes.txt,%x)
  }
}

Last edited by DJJIGGLER; 24/12/10 11:28 AM.

Re: Adding antispam to my script

DJJIGGLER #228482 24/12/10 01:32 PM

Joined: Jan 2008

Posts: 57

DeSync

Babel fish

DeSync

Babel fish

Joined: Jan 2008

Posts: 57

Code:

on $*:TEXT:/^[!](q(uote)?)/Si:#:{
  if !%flood {
    inc -u5 %flood
    if ($2) {
      if ($2 !isnum) { msg $chan 07 $+ $2 14isn't a number. | halt }
      if ($2 isnum) {
        if ($read(Quotes.txt,$2)) {
          msg $chan 14S07elected 14Q07uote14(07 $+ $2 $+ 14/07 $+ $lines(Quotes.txt) $+ 14): $read(Quotes.txt,$2)
        }
        else {
          msg $chan 14No quote on line07 $2 $+ 14.
        }
      }
    }
    else {
      var %x $rand(1,$lines(Quotes.txt))
      msg $chan 14R07andom 14Q07uote14(07 $+ %x $+ 14): $read(Quotes.txt,%x)
    }
  }
}

Last edited by DeSync; 24/12/10 01:33 PM.

Re: Adding antispam to my script

DeSync #228494 25/12/10 10:15 AM

Joined: Dec 2010

Posts: 13

DJJIGGLER

Pikka bird

DJJIGGLER

Pikka bird

Joined: Dec 2010

Posts: 13

Thank you so much, now i can add it to other scripts!

Originally Posted By: DeSync

Code:

on $*:TEXT:/^[!](q(uote)?)/Si:#:{
  if !%flood {
    inc -u5 %flood
    if ($2) {
      if ($2 !isnum) { msg $chan 07 $+ $2 14isn't a number. | halt }
      if ($2 isnum) {
        if ($read(Quotes.txt,$2)) {
          msg $chan 14S07elected 14Q07uote14(07 $+ $2 $+ 14/07 $+ $lines(Quotes.txt) $+ 14): $read(Quotes.txt,$2)
        }
        else {
          msg $chan 14No quote on line07 $2 $+ 14.
        }
      }
    }
    else {
      var %x $rand(1,$lines(Quotes.txt))
      msg $chan 14R07andom 14Q07uote14(07 $+ %x $+ 14): $read(Quotes.txt,%x)
    }
  }
}

Link Copied to Clipboard

Forums mIRC Help Adding antispam to my script