PtokaX forum

Hi
This is a normal zright clicker but i modified somethings like:
Removed the capslock menu
Renamed some stuff
And if u have jumble or trivia it has the right click for it
Its all.... ;)

-- RightClicker for RoboCopv10.01
-- Made by Optimus & TiMeTrAVelleR
-- Optimized and fixed some stuff by [']['?N]Azim
-- Best is not to use it for normal users takes to much bandwidth

aMenu = "Quick Commands"
cMenu = "Hub Control"
eMenu = "Logs"
gMenu = "Misc"
sMenu = "']['h? ?impl? N?']['w?rK"
iMenu = "Hub Security"
kMenu = "Regs"
xMenu = "Games"
yMenu = "']['h? ?impl? N?']['w?rK"



SendTo = { --> 1=on/0=off

• = 1, -- Masters
[1] = 1, -- Operators
[2] = 1, -- Vips
[3] = 1, -- Regs
[4] = 1, -- Moderator
[5] = 1, -- NetFounder
[-1] = 1, -- Users
}

dofile("tbl/scriptlevel.tbl")
dofile("tbl/inbuildlevel.tbl")

-- End Editable Settings --

GetRightClick = function(user, table1, table2)
for cmd,level in table1 do
if table1[cmd][user.iProfile] == 1 then
if table2[cmd] then
user:SendData(table2[cmd].."||")
end
end
end
end

NewUserConnected = function(user)
if SendTo[user.iProfile] == 1 then
if user.bUserCommand then
user:SendData("$UserCommand 0 3 |")
GetRightClick(user, ScriptLevel, ScriptCmds) GetRightClick(user, InbuildLevel, InbuildCmds) customCMDs(user)
end
end
end

OpConnected=NewUserConnected

ScriptCmds = {

["info"]="$UserCommand 1 3 Show user info$<%[mynick]> !info %[nick]",

-- aMenu = "QUICK COMMANDS"
["rules"]="$UserCommand 1 3 "..aMenu.."\\Show the hub rules$<%[mynick]> !rules",
["help"]="$UserCommand 1 3 "..aMenu.."\\Commands$<%[mynick]> !help",
["inbuild"]="$UserCommand 1 3 "..aMenu.."\\Show the inbuild commands$<%[mynick]> !inbuild",
["report"]="$UserCommand 1 3 "..aMenu.."\\Report user to all OP's$<%[mynick]> !report %[nick] %[line:Message]",
["kick"]="$UserCommand 1 3 "..aMenu.."\\Kick\\Kick user$<%[mynick]> !kick %[nick] %[line:Reason]",
["warn"]="$UserCommand 1 3 "..aMenu.."\\Kick\\Warn user$<%[mynick]> !warn %[nick] %[line:Reason]",
["drop"]="$UserCommand 1 3 "..aMenu.."\\Kick\\Drop user$<%[mynick]> !drop %[nick]",
["kill"]="$UserCommand 1 3 "..aMenu.."\\Ban\\Kill user [nameban+ipban]$<%[mynick]> !kill %[nick] %[line:Reason]",
["ban"]="$UserCommand 1 3 "..aMenu.."\\Ban\\Ban user$<%[mynick]> !ban %[nick] %[line:Reason]",
["nameban"]="$UserCommand 1 3 "..aMenu.."\\Ban\\Nameban user$<%[mynick]> !nameban %[nick] %[line:Reason]",
["timeban"]="$UserCommand 1 3 "..aMenu.."\\Ban\\Timeban User$<%[mynick]> !timeban %[nick] %[line:hr:mn] %[line:Reason]",
["mass"]="$UserCommand 1 3 "..aMenu.."\\Messages\\Send mass message$<%[mynick]> !mass %[line:Message]",
["banner"]="$UserCommand 1 3 "..aMenu.."\\Messages\\Send hub banner message$<%[mynick]> !banner %[line:Text]",
["sendhubad"]="$UserCommand 1 3 "..aMenu.."\\Messages\\Send hub advertise add [main/pm]$<%[mynick]> !sendhubad %[line:main/pm]",
["talk"]="$UserCommand 1 3 "..aMenu.."\\Messages\\Talk whitout nick$<%[mynick]> !talk %[line:Message]",

--cMenu = "HUB CONTROL"
["hconfig"]="$UserCommand 1 3 "..cMenu.."\\Config/Stats\\Show hub config$<%[mynick]> !hconfig",
["hstat"]="$UserCommand 1 3 "..cMenu.."\\Config/Stats\\Show hub statics$<%[mynick]> !hstat",
["resethstat"]="$UserCommand 1 3 "..cMenu.."\\Config/Stats\\Reset hub counters/statics$<%[mynick]> !resethstat",
["hdesc"]="$UserCommand 1 3 "..cMenu.."\\Config/Stats\\Set hub description$<%[mynick]> !hdesc %[line:Hub_Description]",
["watch"]="$UserCommand 1 3 "..cMenu.."\\CmD-Spy\\Watch a user$<%[mynick]> !watch %[nick]",
["watchoff"]="$UserCommand 1 3 "..cMenu.."\\CmD-Spy\\set watcher off$<%[mynick]> !watchoff",
["getwatch"]="$UserCommand 1 3 "..cMenu.."\\CmD-Spy\\Show all watchers$<%[mynick]> !getwatch",
["cmdspy"]="$UserCommand 1 3 "..cMenu.."\\CmD-Spy\\Set commandspy

[on/off]$<%[mynick]> !cmdspy %[line:on/off]",
["sminslots"]="$UserCommand 1 3 "..cMenu.."\\Config\\Slots/Hubs\\Set script minslots$<%[mynick]> !sminslots %[line:user/reg/vip/op/mod/master/founder] %[line:slots]",
["smaxslots"]="$UserCommand 1 3 "..cMenu.."\\Config\\Slots/Hubs\\Set script maxslots$<%[mynick]> !smaxslots %[line:user/reg/vip/op/mod/master/founder] %[line:slots]",
["smaxhubs"]="$UserCommand 1 3 "..cMenu.."\\Config\\Slots/Hubs\\Set script max hubs$<%[mynick]> !smaxhubs %[line:user/reg/vip/op/mod/master/founder] %[line:hubs]",
["sratio"]="$UserCommand 1 3 "..cMenu.."\\Config\\Slots/Hubs\\Set script slots/hubs ratio$<%[mynick]> !sratio %[line:user/reg/vip/op/mod/master/founder] %[line:slots]",
["sminshare"]="$UserCommand 1 3 "..cMenu.."\\Config\\Sharing/Users\\Set script minshare$<%[mynick]> !sminshare %[line:user/reg/vip/op/mod/master/founder] %[line:share] %[line:mb/gb]",
["smaxshare"]="$UserCommand 1 3 "..cMenu.."\\Config\\Sharing/Users\\Set script maxshare$<%[mynick]> !smaxshare %[line:user/reg/vip/op/mod/master/founder] %[line:share] %[line:mb/gb]",
["hmaxusr"]="$UserCommand 1 3 "..cMenu.."\\Config\\Sharing/Users\\Set max users$<%[mynick]> !hmaxusr %[line:Number]",
["chhubname"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set hubname$<%[mynick]> !chhubname %[line:New Hubname]",
["chopchat"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set Op-Chat name$<%[mynick]> !chopchat",
["regserver"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set regserver address$<%[mynick]> !regserver %[line:New_Reg_Address]",
["autoregister"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set autoregister [on/off]$<%[mynick]> !autoregister %[line:on/off]",
["hubprotect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set hub protection [on/off]$<%[mynick]> !hubprotect %[line:on/off]",
["slimiter"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set script bandwidth limiter$<%[mynick]> !slimiter %[line:user/reg/vip/op/mod/master/founder] %[line:limiter]",
["follow"]="$UserCommand 1 3 "..cMenu.."\\Config\\Other\\Set kick/ban/etc messages [on/off]$<%[mynick]> !follow %[line:On/Off] ",
["redirect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Set hub redirect address$<%[mynick]> !redirect %[line:Host /Ip]",
["redirectfull"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Set hub redirect full [on/off]$<%[mynick]> !redirectfull %[line:on/off]",
["addredirect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Add new address to redirect list$<%[mynick]> !addredirect %[line:Url/Ip]",
["delredirect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Remove address from redirect list$<%[mynick]> !delredirect %[line:Url/Ip]",
["showredirect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Show all listed redirect addresses$<%[mynick]> !showredirect",
["autoredirect"]="$UserCommand 1 3 "..cMenu.."\\Config\\Redirecting\\Set hub auto redirect users [on/off]$<%[mynick]> !autoredirect %[line:on/off]",

--eMenu = "LOG MENU"
["showbanlog"]="$UserCommand 1 3 "..eMenu.."\\Bans\\Show the banlog$<%[mynick]> !showbanlog",
["delbanlog"]="$UserCommand 1 3 "..eMenu.."\\Bans\\Delete the banlog$<%[mynick]> !delbanlog",
["delkicklog"]="$UserCommand 1 3 "..eMenu.."\\Kicks\\Delete the kicklog$<%[mynick]> !delkicklog",
["showkicklog"]="$UserCommand 1 3 "..eMenu.."\\Kicks\\Show the kicklog$<%[mynick]> !showkicklog",
["delwarnlog"]="$UserCommand 1 3 "..eMenu.."\\Warns\\Delete the warnlog$<%[mynick]> !delwarnlog",
["showwarnlog"]="$UserCommand 1 3 "..eMenu.."\\Warns\\Show the warnlog$<%[mynick]> !showwarnlog",
["showlog"]="$UserCommand 1 3 "..eMenu.."\\Other\\Showlog user/ip$<%[mynick]> !showlog %[line:name/ip] ",
["clear"]="$UserCommand 1 3 "..eMenu.."\\Other\\Clear logs/bans user$<%[mynick]> !clear %[nick]",
["showiplog"]="$UserCommand 1 3 "..eMenu.."\\Other\\Show the iplog$<%[mynick]> !showiplog",

--gMenu = "MISC"
["slots"]="$UserCommand 1 3 "..gMenu.."\\Info\\Show users whit free slots$<%[mynick]> !slots",
["version"]="$UserCommand 1 3 "..gMenu.."\\Info\\Show the script version$<%[mynick]> !version",
["network"]="$UserCommand 1 3 "..gMenu.."\\Info\\Show the network info$<%[mynick]> !network",
["myip"]="$UserCommand 1 3 "..gMenu.."\\Info\\Show your currently IP$<%[mynick]> !myip",
["myinfo"]="$UserCommand 1 3 "..gMenu.."\\Info\\Show all your available info$<%[mynick]> !myinfo",
["getblocked"]="$UserCommand 1 3 "..gMenu.."\\Blocked\\Show current blocked users$<%[mynick]> !getblocked",
["massblocked"]="$UserCommand 1 3 "..gMenu.."\\Blocked\\Send mass message to blocked users$<%[mynick]> !massblocked %[line:Message]",
["kickblocked"]="$UserCommand 1 3 "..gMenu.."\\Blocked\\Kick current blocked users$<%[mynick]> !kickblocked ",
["myhubtime"]="$UserCommand 1 3 "..gMenu.."\\Stats\\Show your total online time$<%[mynick]> !myhubtime",
["topkickers"]="$UserCommand 1 3 "..gMenu.."\\Stats\\Show current topkickers$<%[mynick]> !topkickers",
["tophubbers"]="$UserCommand 1 3 "..gMenu.."\\Stats\\Show current tophubbers$<%[mynick]> !tophubbers",
["away"]="$UserCommand 1 3 "..gMenu.."\\Away\\Set my away message$<%[mynick]> !away %[line:Message]",
["back"]="$UserCommand 1 3 "..gMenu.."\\Away\\Restore my away message$<%[mynick]> !back",
["getaways"]="$UserCommand 1 3 "..gMenu.."\\Away\\Show all current away messages$<%[mynick]> !getaways",
["flood"]="$UserCommand 1 3 "..gMenu.."\\Other\\Flood user$<%[mynick]> !flood %[nick] %[line:Nr] %[line:Reason]",
["online"]="$UserCommand 1 3 "..gMenu.."\\Other\\Set online check [user/ip]$<%[mynick]> !online %[line:nick/ip]",
["offline"]="$UserCommand 1 3 "..gMenu.."\\Other\\Set offline message to user$<%[mynick]> !offline %[nick] %[line:Message]",
["faq"]="$UserCommand 1 3 "..gMenu.."\\Other\\Show faq about DC++$<%[mynick]> !faq",

--kMenu = "REG MENU"
["regreg"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as REG$<%[mynick]> !regreg %[nick] %[line:Password]",
["regvip"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as VIP$<%[mynick]> !regvip %[nick] %[line:Password]",
["regop"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as OP$<%[mynick]> !regop %[nick] %[line:Password]",
["regmod"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as MOD$<%[mynick]> !regmod %[nick] %[line:Password]",
["regmaster"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as MASTER$<%[mynick]> !regmaster %[nick] %[line:Password]",
["regfounder"]="$UserCommand 1 3 "..kMenu.."\\Register\\Register user as FOUNDER$<%[mynick]> !regfounder %[nick] %[line:Password]",
["deluser"]="$UserCommand 1 3 "..kMenu.."\\Change Reg\\Delete registerd user$<%[mynick]> !deluser %[nick]",
["upgrade"]="$UserCommand 1 3 "..kMenu.."\\Change Reg\\Upgrade/Downgrade registerd users$<%[mynick]> !upgrade %[nick] %[line:reg/vip/op/mod/master/founder]",
["repass"]="$UserCommand 1 3 "..kMenu.."\\Change Reg\\Change your own password$<%[mynick]> !repass %[line:New Pass]",
["getpass"]="$UserCommand 1 3 "..kMenu.."\\Other\\Get password registerd user$<%[mynick]> !getpass %[nick]",
["showreglog"]="$UserCommand 1 3 "..kMenu.."\\Other\\Show the registerlog$<%[mynick]> !showreglog",
["regme"]="$UserCommand 1 3 "..kMenu.."\\Other\\Register me at this hub$<%[mynick]> !regme %[line:Password]",
["showreg"]="$UserCommand 1 3 "..kMenu.."\\Other\\Show all users by profile$<%[mynick]> !showreg %[line:reg/vip/op/mod/master/founder]",
["unbot"]="$UserCommand 1 3 "..kMenu.."\\Other\\Remove old botnames from userlist$<%[mynick]> !unbot %[nick]",

}

InbuildCmds = {
["banip"]="$UserCommand 1 3 "..aMenu.."\\Ban\\Banip user$<%[mynick]> !banip %[line:Ipnumber]",
["unban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Unban user$<%[mynick]> !unban %[nick] %[line:nick/ip]",
["nickban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Nickban user$<%[mynick]> !nickban %[nick] %[line:Reason]",
["getbanlist"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Getbanlist$<%[mynick]> !getbanlist",
["clrpermban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Clearpermban$<%[mynick]> !clrpermban",
["clrtempban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Cleartempban$<%[mynick]> !clrtempban",
["gettempbanlist"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Gettempbanlist$<%[mynick]> !gettempbanlist",
["tempunban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Unban tempbanned user$<%[mynick]> !tempunban %[nick]",
["tempban"]="$UserCommand 1 3 "..iMenu.."\\Ban Controls\\Tempban user for x minutes$<%[mynick]> !tempban %[nick]",
["getinfo"]="$UserCommand 1 3 "..iMenu.."\\Info\\Basic info user$<%[mynick]> !getinfo %[nick]",
["ipinfo"]="$UserCommand 1 3 "..iMenu.."\\Info\\Show users with that ip$<%[mynick]> !getinfo %[line:Ipnumber]",
["userinfo"]="$UserCommand 1 3 "..iMenu.."\\Info\\Info user$<%[mynick]> !userinfo %[nick]",
["iprangeinfo"]="$UserCommand 1 3 "..iMenu.."\\Info\\Show users within that iprange$<%[mynick]> !iprangeinfo %[line:Ipnumber]",
["restart"]="$UserCommand 1 3 "..iMenu.."\\Hub Controls\\Restart hub$<%[mynick]> !restart",
["restartscripts"]="$UserCommand 1 3 "..iMenu.."\\Hub Controls\\Restart scripts$<%[mynick]> !restartscripts",
["reloadtxt"]="$UserCommand 1 3 "..iMenu.."\\Hub Controls\\Reload the hub textfiles$<%[mynick]> !reloadtxt",
["topic"]="$UserCommand 1 3 "..iMenu.."\\Other\\Change the hub topic$<%[mynick]> !topic %[line:Topic]",
["gag"]="$UserCommand 1 3 "..iMenu.."\\Other\\Gag user$<%[mynick]> !gag %[nick]",
["ungag"]="$UserCommand 1 3 "..iMenu.."\\Other\\Ungag user$<%[mynick]> !ungag %[nick]",
["op"]="$UserCommand 1 3 "..iMenu.."\\Other\\Give user temperory op status$<%[mynick]> !op %[nick]",
}

customCMDs = function(user) --// You can put your custome commands here
-- remove the (--) if using the jumble program
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Start Trivia$<%[mynick]> tbstart||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Stop Trivia$<%[mynick]> tbstop||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Join Trivia$<%[mynick]> tbjoin||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Hint$<%[mynick]> tbhintme||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Save Scores$<%[mynick]> tbhelp||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Load Scores$<%[mynick]> tbhelp||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Trivia Scores$<%[mynick]> tbscores||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Trivia\\Trivia Help$<%[mynick]> tbhelp||")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Start Jumble$<%[mynick]> a.start|")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Stop Jumble$<%[mynick]> a.stop|")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Display a Phrase$<%[mynick]> a.phrase|")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Join Jumble$<%[mynick]> a.join|")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Jumble Scores$<%[mynick]> a.scores|")
user:SendData("$UserCommand 1 3 "..xMenu.."\\Jumble\\Jumble Help$<%[mynick]> a.help|")
user:SendData("$UserCommand 1 4 zCUSTOMBadFile $$To: %[nick] From: %[mynick] $<%[mynick]> The follwing file is not allowed in here %[file]||")
end

THATS ALL :D