Main cleaner
 

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

Main cleaner

Started by Techno_man, 10 October, 2005, 16:40:10

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Techno_man

Hi, I want a script that clean mainchat.

4 example if i write !wash the bot clean che chat.


tnx  :]

Markitos

QuoteOriginally posted by Techno_man
Hi, I want a script that clean mainchat.

4 example if i write !wash the bot clean che chat.


tnx  :]
Search...

Techno_man

i've tried to search but i've found nothing  X(  X(

HillyBilly

screencleaner

Cheers HB

6Marilyn6Manson6

Try this:

--ScreenCleaner.lua 1.1 by yepyepyep4711 and ??????Hawk??????
--!cls will wipe the main chat clean (does that remind you of something? ;) )
--the command will be added to the rightclick menu of the OPs (optional)

CanDo = { 
[0] = 1, -- Master 
[1] = 1, -- Operator 
[2] = 1, -- VIP 
[3] = 0, -- Reg 
[4] = 0, -- Moderator 
[5] = 1, -- Netfounder 
[-1] =0, -- User 
} 


function ChatArrival(curUser, sData)
    sData=string.sub(sData,1,string.len(sData)-1)
    local _,_,cmd = string.find(sData,"%b<>%s+(%S+)")
    	if cmd and cmd=="!cls" and CanDo[curUser.iProfile] == 1 then
   		SendToAll("Cleaner",string.rep("\r\n\r\n",2000))
		return 1
	end
end

function OpConnected(curUser)
    	if CanDo[curUser.iProfile] == 1 then
    		curUser:SendData("$UserCommand 255 7")
    		curUser:SendData("$UserCommand 1 3 ? OPERATOR ?\\ ? Clear Screen$<%[mynick]> !cls|")
                                     curUser:SendData("$UserCommand 0 3 |") 							-- separator
    	end
end

c ya

Techno_man

Thanks so much!!  8o  8o

6Marilyn6Manson6

QuoteOriginally posted by Techno_man
Thanks so much!!  8o  8o


Welcome :)

SMF spam blocked by CleanTalk