Basic Illegalist bot to Lua5
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
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

Basic Illegalist bot to Lua5

Started by Skynet, 03 March, 2005, 16:07:41

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Skynet

Converted  Ptaczek Illegalist bot ,i use it alot  
converted basic script to lua5
 


code:---------------------------------------------------------------------------------------------------
-- 
Created by PtaczekJan-32003
-- Searches for specified patternsUseful for illegal share checking

BotName 
"ShareCheck"

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


Kicked = {}

function 
NewUserConnected(user)
	
if( 
Kicked[user.sName] == 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(userdata)
	
if( 
string.sub(data13) == "$SRthen
	
	
_,_,nick string.finddata"\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
:--------------------------------------------------------------------------------------------------

Copyright SkynetSystems 2000-2005 @Phoenix Network

uffetjur

bah, op clients are better
samples for dvd rar archives is included in original releases this samples are of format .vob and about 50 - 70 mb this script doesnt sort that one out
Somewhere in Cyberspace

SMF spam blocked by CleanTalk