PtokaX forum

excused is possible  translate this script to lua5???  :P         


code:---------------------------------------------------------------------------------------------------
-- Created by Ptaczek, Jan-3, 2003
-- Searches for specified patterns. Useful for illegal share checking

BotName = "ShareCheck"

Files = {
   ["rape"]="Do not share  porn!",
   ["preteen"]="No pre-teen here!",
   ["nazi"]="No nazi related material here!",
   [".VOB"]="No VOB files here!"
             ["incest"]="Do not share  porn!",
             ["blowjob"]="Do not share  porn!",
             ["fucking"]="Do not share porn!", 
}

Kicked = {}

function NewUserConnected(user)
   if( Kicked[user.sName] == 1 ) then
      Kicked[user.sName] = nil
   end
   for i,v in Files do
      user:SendData("$Search Hub:"..BotName.." F?F?0?1?"..i)
   end
end

function ChatArrival(user, data)
   if( string.sub(data, 1, 3) == "$SR" ) then
      _,_,nick = string.find( data, "\05(%S*)|$" )
      if( nick == BotName and Kicked[user.sName] == nil ) then
         Kicked[user.sName] = 1
         Reason = FindWhat(data)
         SendToOps(BotName, "*** User "..user.sName.." kicked. Reason: "..Reason)
         user:SendPM(BotName, "You were kicked. "..Reason)
         user:Disconnect()
      end
   end
end

function FindWhat(data)
   for i,v in Files do
      if( string.find(string.lower(data), i) ) then
         return v
      end
   end
   return "Other files"
end

code:--------------------------------------------------------------------------------------------------

If I were you, I'd use a client with ADL search for this.

having a little time to control my hub, this script would have been perfect.
I would prefer to use one similar script  ;)

Quote from: Kastor on 28 January, 2007, 23:10:05
having a little time to control my hub, this script would have been perfect.
I would prefer to use one similar script  ;)

It is quite ineffective and can cause false kicks. For instance, it may kick for 'skyscraper'. :-)