PtokaX forum

Archive => Archived 5.0 boards => Finished Scripts => Topic started by: -RICK- on 26 May, 2006, 11:59:02

Title: dont PM a bot
Post by: -RICK- on 26 May, 2006, 11:59:02


-- lua 5.0 -RICK-
-- on request
-- anti bot pm
-- Dont put botnames in it that uses pm commands (help is always allowed)
-- U can add users also (like checkclient)

Bot = "SCOOBYDOO"

function Main()
frmHub:RegBot(Bot)
end


Protect = {
[0] = 1,? ?-- Masters
[1] = 1,? ?-- Operators ? ?
[2] = 1,? ?-- Vips
[3] = 0,? ?-- Regs
[4] = 1,? ?-- Moderator
[5] = 1,? ?-- NetFounder? ?
[-1] = 0,? -- Users
}

tnicks = {
[1] = "SCOOBYDOO",
[2] = "-RICK-",
}


function ToArrival(user, data)
local s,e,ToUser = string.find(data, "%$To:%s(%S+)")
local s,e,cmd = string.find(data,"%$%b<>%s+(%S+)")
? ? if checknick(ToUser, data, user, cmd) then
return 1
end
end

function checknick(ToUser, data, user, cmd)
for i = 1,table.getn(tnicks) do
if string.find( ToUser, tnicks[i] , 1 , true )and Protect[user.iProfile] ~= 1 and not string.find(cmd, "help") then
? ? ? ? ? ? user:SendPM(tnicks[i], " *** I a'm a bot so i cant reply, for questions PM a OPERATOR")
? ? ? ? ? ? return 1
end
end
return
end