PtokaX forum

Archive => Archived 5.0 boards => Request for scripts => Topic started by: Techno_man on 10 October, 2005, 16:40:10

Title: Main cleaner
Post by: Techno_man on 10 October, 2005, 16:40:10
Hi, I want a script that clean mainchat.

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


tnx  :]
Title:
Post by: Markitos on 10 October, 2005, 16:45:03
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...
Title:
Post by: Techno_man on 10 October, 2005, 17:22:58
i've tried to search but i've found nothing  X(  X(
Title:
Post by: HillyBilly on 10 October, 2005, 17:36:28
screencleaner

Cheers HB
Title:
Post by: 6Marilyn6Manson6 on 10 October, 2005, 19:22:51
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
Title:
Post by: Techno_man on 10 October, 2005, 19:51:37
Thanks so much!!  8o  8o
Title:
Post by: 6Marilyn6Manson6 on 10 October, 2005, 19:55:28
QuoteOriginally posted by Techno_man
Thanks so much!!  8o  8o


Welcome :)