PtokaX forum

Archive => Archived 5.0 boards => Request for scripts => Topic started by: badtrip on 26 June, 2005, 15:58:27

Title: !regme only if you have a tag
Post by: badtrip on 26 June, 2005, 15:58:27
hello ,

I need help on this script plz

--## Self Register 1.0
--## Secure Pass and Nick (thanks to RabidWombat)
--## Made by nErBoS
--## Updated to Lua 5 by Pothead
--## Commands;
--## !regme - Register the user who uses the command

sBot = "Reg-Bot"

function ChatArrival(user, data)
if (string.sub(data,1,1) == "<" or string.sub(data,1,5+strlen(sBot)) == "$To: "..sBot) then
data = string.sub(data,1,string.len(data)-1)
s,e,cmd = string.find(data, "%b<>%s+(%S+)")
if (cmd == "!regme") then
local s,e,pass = string.find(data, "%b<>%s+%S+%s+(%S+)")
if (pass == nil) then
user:SendData(sBot, "Syntax Error, !regme , you must write a password.")
elseif (string.find(pass, "[%c|\n\r]")) then
user:SendData(sBot, "Invalid Password. Try Again.")
elseif (string.find(user.sName, "[%c|\n\r]")) then
user:SendData(sBot, "Your nick is invalid. Please choose a new one.")
else
AddRegUser(user.sName, pass, 3)
SendToOps(sBot, "The user "..user.sName.." has registered himself.")
user:SendData(sBot, "You have been successufly registered with the pass: "..pass)
user:SendData(sBot, "Please reconnect and type your password.")
end
return 1
end
end
end

if possible i need a modification on the regme script

ex: user only reg if they have the tag [pt] (pt) on the nick


best regard
Title:
Post by: ??????Hawk?????? on 26 June, 2005, 16:23:30
sBot = "Reg-Bot"
sTag = "[pt]"
function ChatArrival(user, data)
data = string.sub(data,1,string.len(data)-1)
s,e,cmd = string.find(data, "%b<>%s+(%S+)")
if (cmd == "!regme") then
local s,e,pass = string.find(data, "%b<>%s+%S+%s+(%S+)")
if (pass == nil) then
user:SendData(sBot, "Syntax Error, !regme , you must write a password.")
elseif (string.find(pass, "[%c|\n\r]")) then
user:SendData(sBot, "Invalid Password. Try Again.")
elseif (string.find(user.sName, "[%c|\n\r]")) then
user:SendData(sBot, "Your nick is invalid. Please choose a new one.")
else
AddRegUser(sTag..user.sName, pass, 3)
SendToOps(sBot, "The user "..user.sName.." has registered himself.")
user:SendData(sBot, "You have been successufly registered with the pass: "..pass)
user:SendData(sBot, "Please add the tag "..sTag.." to the front of your nick and reconnect  using your password.")
end
return 1
end
end
Title:
Post by: badtrip on 27 June, 2005, 15:29:15
hello,

tks my friend  ;)