Hi peepz,
I have made a Login and Register Message.
But if I add the function rightclick commands then I don't see it... only if I remove the OpUserconnected = NewUserConnected
Here is the code, maybe somebody can help me :-)
-- Login and Register Message Made by [NL]Davey
-- Updated :: Register Message 1.0 to 1.2
-- Fixed :: Litle Bug
-- Added :: On/Off
-- Added :: LoGiN MeSsaGe showed
-- Added :: Login Only
-- Added :: !registermsg <<-- to do on/off
-- Changed :: Register Message
-- Changed :: Restarting Script, script doesn't show only if RegMsgOnOff = On
-- Removed :: Logout MessaGe
-----------------------------Configauration------------------------------------------------------------------------------------------------------------------
botname = "•MeSsaGe•" -- Bot's name...
htimer = 1 -- Hours between sendings...
RegMsgOnOff = "off" -- Put this to "on" if its gona send on scriprestart & continue....
local msg = "\r\n\r\n"
msg = msg.." ¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º••º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨\r\n"
msg = msg.."\r\n"
msg = msg.." • Privat€ Pµß™, G i a n t s™:\t\tReG YouR FrienDs In This Great HuB\r\n"
msg = msg.." • Step 1:\t\t\t Reg your Friends with !addreguser [GB]Giants][ or [TB]Giants][ password OP\r\n"
msg = msg.." • Step 2:\t\t\t If you have registered him then you give him the login information\r\n"
msg = msg.." • Step 3:\t\t\t Your friend connect to the hub, and will also reg other peepz in here\r\n"
msg = msg.." • Step 4:\t\t\t Then nothing. Just Have Fun, and be nice\r\n"
msg = msg.." • SponS€R€Ð By:\t\t\t •Giants Privat€ Pµß™, G i a n t s™ CreW\r\n"
msg = msg.." ¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º••º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨\r\n"
msg = msg.."\r\n"
msg = msg.."\t\t• Online Users: "..(frmHub:GetUsersCount() or 0).."\r\n"
msg = msg.."\t\t• Peak: "..(frmHub:GetActualUsersPeak() or 0).." and All Time Peak: "..(frmHub:GetMaxUsersPeak() or 0).."\r\n"
msg = msg.."\t\t• Script Info:\t\t Register Message MaDe by [NL]Davey\t\r\n"
msg = msg.."\r\n"
msg = msg.." ¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º• ¨˜”°º•¨˜”°º••º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨•º°”˜¨\r\n"
--------------------------------------------------------------------------------------------------------------------------------------------------------------
function Main()
SetTimer(htimer*60*60*1000)
StartTimer()
frmHub:RegBot(botname)
SendToAll("\t\t¨˜”°º•¨˜”°º• Welcome To "..frmHub:GetHubName().." •º°”˜¨•º°”˜¨\t\t\t is kicking because:")
SendToAll("¨˜”°º•¨˜”°º• ....Loading Script... •º°”˜¨•º°”˜¨")
SendToAll("¨˜”°º•¨˜”°º• Starting Register MessaGe •º°”˜¨•º°”˜¨")
SendToAll("¨˜”°º•¨˜”°º• This Script is been maded by [NL]Davey •º°”˜¨•º°”˜¨")
if RegMsgOnOff == "on" then
SendToAll(botname,msg)
end
end
function OnTimer()
if RegMsgOnOff == "on" then
SendToAll(botname,msg)
end
end
function ChatArrival(user,data)
if string.find(data,"(!registermsg)") then
if user.bOperator == 1 then
if RegMsgOnOff == "off" then
RegMsgOnOff = "on"
SendToAll(botname,msg)
SendPmToOps(RC_Name,"Register message has been turned on by "..user.sName)
else
RegMsgOnOff = "off"
SendPmToOps(RC_Name,"Register message has been turned off by "..user.sName)
end
return 1
end
end
end
function NewUserConnected(user)
SendToAll(MyInfoString)
SendToAll("•••< "..user.sName.." connected to "..frmHub:GetHubName().." at "..os.date("%H:%M:%S").." o'clock. >•••\t\t\t\t\t\t\t\t\t\t\is kicking because:")
user:SendData("•••< You connected to "..frmHub:GetHubName().." at "..os.date("%H:%M:%S").." o'clock. Welcome!>•••\t\t\t\t\t\t\t\t\t\t\is kicking because:")
user:SendData("•••< This Hubs Is RunninG Message 1.2 ßy [NL]Davey >•••")
if user.iProfile == 6 then -- Owner
SendToAll(botname, "¨˜”°º•¨˜”°º•Owner "..user.sName.." arrived.•º°”˜¨•º°”˜¨")
user:SendData( "¨˜”°º•¨˜”°º•You are the best ! Owner "..user.sName.." •º°”˜¨•º°”˜¨")
elseif user.iProfile == 0 then -- Master
SendToAll(botname, "¨˜”°º•¨˜”°º•Master "..user.sName.." is back in da hub. Wacht Out ! •º°”˜¨•º°”˜¨")
user:SendData("¨˜”°º•¨˜”°º•Long time not see you. "..user.sName.." •º°”˜¨•º°”˜¨")
elseif user.iProfile == 5 then -- Netfounder
SendToAll(botname, "¨˜”°º•¨˜”°º•Netfounder "..user.sName.." arrived with his ladies. Welcome Back •º°”˜¨•º°”˜¨")
user:SendData("¨˜”°º•¨˜”°º•Welcome back m8!. •º°”˜¨•º°”˜¨")
elseif user.iProfile == 1 then -- Operator
SendToAll(botname, "¨˜”°º•¨˜”°º•Operator "..user.sName.." arrived. Check your shared files before he/she do it.•º°”˜¨•º°”˜¨ ")
user:SendData("¨˜”°º•¨˜”°º•Don't forget to check users shared files. •º°”˜¨•º°”˜¨")
elseif user.iProfile == 4 then -- Moderator
SendToAll(botname, "¨˜”°º•¨˜”°º•Moderator "..user.sName.." arrived in his car. Welcome back•º°”˜¨•º°”˜¨ ")
user:SendData("¨˜”°º•¨˜”°º•Welcome back m8!. •º°”˜¨•º°”˜¨")
elseif user.iProfile == 2 then -- VIP
SendToAll(botname, "¨˜”°º•¨˜”°º•VIP "..user.sName.." is coming back for sharing new files!•º°”˜¨•º°”˜¨ ")
user:SendData("¨˜”°º•¨˜”°º•Hiya, Welcome back "..user.sName.." •º°”˜¨•º°”˜¨")
elseif user.iProfile == 3 then -- Reg
SendToAll(botname, "¨˜”°º•¨˜”°º•Regged Person "..user.sName.." arrived.•º°”˜¨•º°”˜¨")
user:SendData("¨˜”°º•¨˜”°º•Ask OP for VIP Status "..user.sName.." •º°”˜¨•º°”˜¨")
end
end
OpConnected = NewUserConnected
This is the right click command that I have try to use ...
SendCommands = function(user)
if user.bUserCommand then
user:SendData("$UserCommand 0 3 |")
user:SendData(botname,"Right click commands enabled for you. It is been sended to your client!")
user:SendData("$UserCommand 1 3 "..RC_Name.."\\• Hello "..user.sName.."$<%[mynick]>||")
user:SendData("$UserCommand 1 3 "..RC_Name.."\\• Here are the avaible commands for you$<%[mynick]> !help||")
user:SendData("$UserCommand 1 3 "..RC_Name.."\\• Register Message On$<%[mynick]> !registermsg ||")
user:SendData("$UserCommand 1 3 "..RC_Name.."\\• Register Message Off$<%[mynick]> !registermsg ||")
end
end
function OpConnected(user)
SendCommands(user)
end
Hi Mutor,
Thnx 4 your help the scripts works now with the right click command.
You have help me alot :-)