DingGGu / bnubot

Automatically exported from code.google.com/p/bnubot
0 stars 0 forks source link

Auto-lockdown #78

Closed GoogleCodeExporter closed 9 years ago

GoogleCodeExporter commented 9 years ago
Here's the BNU`Bot 1.x (classic) auto-lockdown strategy:;

Function UserFloods(User)
    'This function is called when the bot has ops, BotMode is set, and a user is detected 
flooding.
    'The function should return the minimum number of miliseconds before UserFloodEnd() is 
called.

    bot.ShowText "NOTICE: Enabling channel lockdown for thirty minutes due to flood detection 
from " & CStr(User)
    If (bot.MyClanRank >= 3) Then
        bot.SendText "/clan private", True 'this will force instant sending, USE WITH CAUTION
        bot.SendText "Enabling lockdown..."
    Else
        bot.Lockdown = 1
    End If

    'bot.SendText "/f m Flood detected from " & CStr(User)

    Rank = bot.GetRank(CStr(User))
    If Rank <= 10 Then 'shitlist anybody who is less than or equal to 10 in rank (anybody who is 
a recruit or lower)
        bot.ShowText "Shitlisting " & CStr(User)
        bot.ParseCommand "FloodProtection@BNUBot", "add", CStr(User) & " -1", True
    End If

    UserFloods = 1800000 '30 minutes (in miliseconds) before UserFloodEnd is called
End Function

Sub UserFloodEnd()
    'Called after the flood is over. See documentation for UserFloods() for details.

'   bot.ShowText "NOTICE: Flood timer expired; disabling channel lockdown."
'   bot.Lockdown = 0
'   bot.SendText "Disabling lockdown..."
'   If (bot.MyClanRank >= 3) Then
'       bot.SendText "/clan public"
'   End If
End Sub

Original issue reported on code.google.com by sco...@gmail.com on 8 May 2008 at 4:17

GoogleCodeExporter commented 9 years ago
r1446 r1447

Original comment by sco...@gmail.com on 9 May 2008 at 2:43