I have scripted some nice Protections for my Bot.

This are 3 nice Protections which have to be in every good bot.

1. Join Part Protection

2. Nickflood Protection

3. Channelflood Protection

Have Fun with this Addon

For any Problems send a mail to BushidoTheOne@aol.com
or
visit #mIRC-Support on IrCQnet irc.icq.com

Greetz BoZzInDaHouse

*************************************************************************************************
                                          Protections
*************************************************************************************************
on *:load: {
set %joinparts 3
set %floodnicks 3
set %floodtime 3 
set %floodmaxlines 4
}

*************************************************************************************************
Join Part Protection
*************************************************************************************************

on *:join:#:{ 
  if (%Join/Part [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] == $null) {
  set -u20 %Join/Part [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] 1 }
  else {
    inc %Join/Part [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ]
    if (%Join/Part [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] == %joinparts) { 
      ban -ku14400 # $nick 2 14Banned: Join/Part Flood 09::14 $fulldate 09:: 
    }
  } 
}

*************************************************************************************************
NickFlood Protection
*************************************************************************************************

on *:nick:{ 
  if (%NickFlood [ $+ [ $network ] $+ [ $address($newnick,2) ] ] == $null) {
  set -u120 %NickFlood [ $+ [ $network ] $+ [ $address($newnick,2) ] ] 1 }
  else {
    inc %NickFlood [ $+ [ $network ] $+ [ $address($newnick,2) ] ]
    if (%NickFlood [ $+ [ $network ] $+ [ $address($newnick,2) ] ] == %floodnicks) { 
      nickflood $newnick
    }
  } 
}
alias nickflood {      
  var %nickflood1 = $comchan($1,0)
  while (%nickflood1) {
    writeini Banlist.ini Global $address($1,2) Nick Flood (Set by $me on $fulldate $+ )
    ban -ku14400 $comchan($1,%nickflood1) $1 2 14Banned: Nick Flood 09::14 $fulldate 09::
    dec %nickflood1 
  }
}

*************************************************************************************************
Flood Protection
*************************************************************************************************

on *:text:*:#:{
  if (($nick isop #) || ($nick ishop #)) { halt }
  else {
    if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] == $null) {
      set -u [ $+ [ %Floodtime ] ] %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] 1 
    }
    if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] < %floodmaxlines) {
      inc %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] 
    }
    else {
      if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] == %floodmaxlines) {
        inc %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ]    
        if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] == 1) { 
          notice $nick Please stop flooding 
          unset %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] 
        }
        if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] == 2) { 
          kick # $nick No Flood. 
          unset %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ] 
        }
        if (%textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ] == 3) { 
          unset %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] $+ [ text ] ]
          unset %textFlood [ $+ [ $network ] $+ [ # ] $+ [ $address($nick,2) ] ]
          ban -ku14400 # $nick 2 14Banned: Flood 09::14 $fulldate 09:: 
        }
      }
    }
  }
}