PtokaX forum

Archive => Archived 5.0 boards => Finished Scripts => Topic started by: Cêñoßy†ê on 04 May, 2005, 16:16:20

Title: TagCheck
Post by: Cêñoßy†ê on 04 May, 2005, 16:16:20
Allow entry with chosen tags only.

-- Made by dEFiNE
-- Mod by nErBoS asked by Robban
-- Modded by Madman on request by exlepra
-- Converted to lua 5 by C??o?y??

BotName = frmHub:GetHubBotName()

ISP = {
"[PB]",
"[DB]",
"[pb]",
"[db]",
}

CheckProfiles = { --//Set the profiles you want to check to 1
[-1] = 1, -- Users (Unregged)
[0] = 0, -- Masters
[1] = 0, -- Operators
[2] = 0, -- VIP
[3] = 0, -- Reg
[4] = 0, -- Moderator
[5] = 0, -- NetFounder
}


function Main()
frmHub:RegBot(BotName)
end

function NewUserConnected(curUser)
if CheckProfiles[curUser.iProfile]==1 then
for key, value in ISP do
if (string.len(curUser.sName) >= string.len(value) and string.sub(string.lower(curUser.sName),1,string.len(value)) == string.lower(value)) then
return 1
end
end
curUser:SendData(BotName, "Your nick should include one of this Prefix")
ISPList(curUser)
curUser:SendData(BotName, "For Example [PB]" ..curUser.sName)
curUser:Disconnect()
end
end

OpConnected = NewUserConnected

function ISPList(curUser)
local names = ""
for index, value in ISP do
names = names.." "..value.."\r\n\t"
end
curUser:SendData("\r\n\t" ..names)
end