Check share users
 

News:

11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

Check share users

Started by Kastor, 28 January, 2007, 22:22:14

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Kastor

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:--------------------------------------------------------------------------------------------------


bastya_elvtars

If I were you, I'd use a client with ADL search for this.
Everything could have been anything else and it would have just as much meaning.

Kastor

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

bastya_elvtars

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'. :-)
Everything could have been anything else and it would have just as much meaning.

SMF spam blocked by CleanTalk