-- RightClicker v3.0
--
-- RoboCop 7.X Version <-> Made by Optimus & TiMeTrAVelleR& Edited by welard
-- Script only works togheter with RC7.X or Higher
--
-- USE SCRIPT AT YOUR OWN RISK, IT MAY NOT BE COMPATIBLE WITH ALL CLIENTS

-- Editable Settings --

-- 1=on / 0=off
SendTo = {
[0] = 1,   -- Masters
[1] = 1,   -- Operators
[2] = 1,   -- Vips
[3] = 1,   -- Regs
[-1] = 1,  -- Users
}

sMenu = "RC"

-- End Editable Settings --

assert(dofile("tbl/checklevel.tbl"),"tbl/checklevel.tbl not found")

function OpConnected(user)
		customCMDs(user)
	if (SendTo[user.iProfile]==1) then
		GetRightClickComs(user)
		user:SendData("<Info> Enhanced Right Click Support for [RoboCop] is available!")
	end
end

function NewUserConnected(user)
		customCMDs(user)
	if (SendTo[user.iProfile]==1) then
		GetRightClickComs(user)
		user:SendData("<Info> Enhanced Right Click Support for [RoboCop] is available!")
	end
end

function GetRightClickComs(user) 
	TCopy={}
	for cmd,_ in LevelCheck do
	if LevelCheck[cmd][user.iProfile] == 1 then
	for value,command in RightClick do
	if cmd == value then
	tinsert(TCopy,{value,command})
	end end end end

	sort(TCopy,function(a,b) return (a[1] < b[1]) end)
	for t = 1, getn(TCopy) do
	if TCopy[t] then user:SendData(TCopy[t][2])
	end end TCopy={} collectgarbage() flush()
end

function customCMDs(user)    
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\punch$<%[mynick]> !punch %[nick]&#124;|")	--	punch  
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\slapper$<%[mynick]> !slap %[nick]&#124;|")	--	slap 
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\Aliens$<%[mynick]> !Alien %[nick]&#124;|")	--	Alien 
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\farting$<%[mynick]> !fart %[nick]&#124;|")	--	fart
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\cunt munching$<%[mynick]> !cunt %[nick]&#124;|")	--	cunt
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\dick$<%[mynick]> !dick %[nick]&#124;|")	--	dick
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\kiss$<%[mynick]> !kiss %[nick]&#124;|")	--	kiss
user:SendData("$UserCommand 1 3 "..sMenu.."\\play a round\\love$<%[mynick]> !love %[nick]&#124;|")	--	love

end

RightClick = {
[10]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Kick User$<%[mynick]> !kick %[nick] %[line:Reason]&#124;|",	-- kick
[20]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Ban User$<%[mynick]> !ban %[nick] %[line:Reason]&#124;|",	-- ban
[30]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Nameban User$<%[mynick]> !nameban %[nick] %[line:Reason]&#124;|",	-- nameban
[40]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Timeban User$<%[mynick]> !timeban %[nick] %[line:hr:mn] %[line:Reason]&#124;|",	-- timeban
[50]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Kill User <nameban/ipban>$<%[mynick]> !kill %[nick] %[file] %[line:Reason]&#124;|",	-- kill
[60]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Warn User$<%[mynick]> !warn %[nick] %[line:Reason]&#124;|",	-- warn
[70]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Flood User$<%[mynick]> !flood %[nick] %[line:Reason]&#124;|",	-- flood
[80]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Drop User$<%[mynick]> !drop %[nick]&#124;|",	-- drop
[90]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Gag User$<%[mynick]> !gag %[nick]&#124;|",	-- gag
[100]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\UnGag User$<%[mynick]> !ungag %[nick]&#124;|",	-- ungag
[110]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\BanIp User$<%[mynick]> !banip %[line:Ipnumber]&#124;|",	-- banip
[120]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Unban User$<%[mynick]> !unban %[nick] %[line:nick/ip]&#124;|",	-- unban
[130]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Nickban User$<%[mynick]> !nickban %[nick] %[line:Reason]&#124;|",	-- nickban
[140]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\GetBanlist$<%[mynick]> !getbanlist&#124;|",	-- getbanlist
[150]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Clear Permban$<%[mynick]> !clrpermban&#124;|",	-- clrpermban
[160]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Clear Tempban$<%[mynick]> !clrtempban&#124;|",	-- clrtempban
[170]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Temp Op$<%[mynick]> !op %[nick]&#124;|", 	-- op
[180]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Basic Info User$<%[mynick]> !getinfo %[nick]&#124;|",	-- getinfo
[190]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Show all users with that ip$<%[mynick]> !getinfo %[line:Ipnumber]&#124;|",	-- ipinfo
[200]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Show all users within that iprange$<%[mynick]> !iprangeinfo %[line:Ipnumber]&#124;|",	-- iprangeinfo
[210]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Info User Buildin$<%[mynick]> !userinfo %[nick]&#124;|",	-- userinfo
[220]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Restart Hub$<%[mynick]> !restart&#124;|",	-- restart
[230]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Restart Scripts$<%[mynick]> !restartscripts&#124;|",	-- restartscripts
[240]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Hub Config$<%[mynick]> !hconfig&#124;|",	-- hconfig
[250]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Hub Stats$<%[mynick]> !hstat&#124;|",	-- hstat
[260]="$UserCommand 1 3 "..sMenu.."\\INFO\\User Info$<%[mynick]> !info %[nick]&#124;|",	-- info
[270]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Mass Message$<%[mynick]> !mass %[line:Message]&#124;|",	-- mass
[280]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Banner$<%[mynick]> !banner %[line:Advert]&#124;|",	-- banner
[290]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Hub Ad$<%[mynick]> !sendhubad&#124;|",	-- sendhubad
[300]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Talk Whitout Nick$<%[mynick]> !talk %[line:Message]&#124;|",	-- talk
[310]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Online Check On User$<%[mynick]> !online %[nick]&#124;|",	-- online
[320]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Offline Message To User$<%[mynick]> !offline %[line:Nick] %[line:Message]&#124;|",	-- offline
[340]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Watch A User$<%[mynick]> !watch %[nick]&#124;|",	-- watch
[350]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Watch Off$<%[mynick]> !watchoff&#124;|",	-- watchoff
[360]="$UserCommand 1 3 "..sMenu.."\\OTHER\\See Watchers$<%[mynick]> !getwatch&#124;|",	-- getwatch
[370]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Set CommandSpy on/off$<%[mynick]> !cmdspy %[line:on/off]&#124;|",	-- cmdspy
[380]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Topkickers$<%[mynick]> !topkickers&#124;|",	-- topkickers
[390]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\TopHubbers Online Time$<%[mynick]> !tophubbers&#124;|",	-- tophubbers
[400]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Minslots$<%[mynick]> !sminslots %[line:user/reg/vip/op/master] %[line:slots]&#124;|",	-- sminslots
[410]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Maxslots$<%[mynick]> !smaxslots %[line:user/reg/vip/op/master] %[line:slots]&#124;|",	-- smaxslots
[420]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Max Hubs$<%[mynick]> !smaxhubs %[line:user/reg/vip/op/master] %[line:hubs]&#124;|",	-- smaxshubs
[430]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Min Slots/Hubs$<%[mynick]> !sratio  %[line:user/reg/vip/op/master] %[line:slots]&#124;|",	-- sratio
[440]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set MinShare by Profille$<%[mynick]> !sminshare %[line:user/reg/vip/op/master] %[line:share] %[line:mb/gb]&#124;|",	-- sminshare
[460]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Maxshare$<%[mynick]> !smaxshare %[line:user/reg/vip/op/master] %[line:share] %[line:mb/gb]&#124;|",	-- smaxshare
[470]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Minshare$<%[mynick]> !hminshare %[line:Number] %[line:b/kb/mb/gb]&#124;|",	-- hminshare
[480]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Max Users$<%[mynick]> !hmaxusr %[line:Number]&#124;|",	-- hmaxusr
[490]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Hub Description$<%[mynick]> !hdesc %[line:Hub_Description]&#124;|",	-- hdesc
[500]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set HubName$<%[mynick]> !chhubname %[line:New Hubname]&#124;|",	-- chhubname
[510]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set RegServer$<%[mynick]> !regserver %[line:New_Reg_Address]&#124;|",	-- regserver
[520]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Redirect Adress$<%[mynick]> !redirect %[line:Host /Ip]&#124;|",	-- redirect
[530]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Redirect Full on/off$<%[mynick]> !redirectfull %[line:on/off]&#124;|",	-- redirectfull
[540]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Auto Redirect on/off$<%[mynick]> !autoredirect %[line:on/off]&#124;|",	-- autoredirect
[550]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Set Hub Protect on/off$<%[mynick]> !hubprotect %[line:on/off]&#124;|",	-- hubprotect
[560]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Show Blocked Users$<%[mynick]> !getblocked&#124;|",	-- getblocked
[564]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Mass Message Blocked Users$<%[mynick]> !massblocked %[line:Message]&#124;|",	-- massblocked
[570]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Reg User$<%[mynick]> !regreg %[nick] %[line:Password]&#124;|",	-- regreg
[580]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Reg Vip$<%[mynick]> !regvip %[nick] %[line:Password]&#124;|",	-- regvip
[590]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Reg Op$<%[mynick]> !regop %[nick] %[line:Password]&#124;|",	-- regop
[600]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Reg Master$<%[mynick]> !regmaster %[nick] %[line:Password]&#124;|",	-- regmaster
[610]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Del Reg User$<%[mynick]> !delreg %[nick]&#124;|",	-- deluser
[620]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Upgrade User$<%[mynick]> !upgrade %[nick] %[line:reg/vip/op/master]&#124;|",	-- upgrade
[630]="$UserCommand 1 3 "..sMenu.."\\LOG\\Get Kicks from users$<%[mynick]> !getkicks&#124;|",	-- getkicks
[640]="$UserCommand 1 3 "..sMenu.."\\LOG\\Get Warns  from Users$<%[mynick]> !getwarns&#124;|",	-- getwarns
[650]="$UserCommand 1 3 "..sMenu.."\\LOG\\ResetCounters$<%[mynick]> !resetcounters&#124;|",	-- resetcounters
[654]="$UserCommand 1 3 "..sMenu.."\\LOG\\Clear Nick$<%[mynick]> !clear %[nick]&#124;|",	-- clear
[660]="$UserCommand 1 3 "..sMenu.."\\LOG\\ShowIplog$<%[mynick]> !showiplog&#124;|",	-- showiplog
[670]="$UserCommand 1 3 "..sMenu.."\\LOG\\ShowKicklog$<%[mynick]> !showkicklog&#124;|",	-- showkicklog
[680]="$UserCommand 1 3 "..sMenu.."\\LOG\\ShowBanlog$<%[mynick]> !showbanlog&#124;|",	-- showbanlog
[690]="$UserCommand 1 3 "..sMenu.."\\LOG\\ShowTimebanlog$<%[mynick]> !showtimebanlog&#124;|",	-- showtimebanlog
[694]="$UserCommand 1 3 "..sMenu.."\\LOG\\ShowWarnlog$<%[mynick]> !showwarnlog&#124;|",	-- showwarnlog
[700]="$UserCommand 1 3 "..sMenu.."\\LOG\\Del Iplog$<%[mynick]> !deliplog&#124;|",	-- deliplog
[710]="$UserCommand 1 3 "..sMenu.."\\LOG\\Del Kicklog$<%[mynick]> !delkicklog&#124;|",	-- delkicklog
[720]="$UserCommand 1 3 "..sMenu.."\\LOG\\Del Banlog$<%[mynick]> !delbanlog&#124;|",	-- delbanlog
[730]="$UserCommand 1 3 "..sMenu.."\\LOG\\Del Timebanlog$<%[mynick]> !deltimebanlog&#124;|",	-- deltimebanlog
[732]="$UserCommand 1 3 "..sMenu.."\\LOG\\Del Warnlog$<%[mynick]> !delwarnlog&#124;|",	-- delwarnlog
[734]="$UserCommand 1 3 "..sMenu.."\\LOG\\Showlog all Ore Nick$<%[mynick]> !showlog&#124;|", 	-- showlog
[740]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Rules$<%[mynick]> !rules&#124;|",	-- rules
[750]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show hubs on the network$<%[mynick]> !network&#124;|",	-- network
[760]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show faq about DC++$<%[mynick]> !faq&#124;|",	-- faq
[770]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show your currently IP number$<%[mynick]> !myip&#124;|",	-- myip
[780]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show all aviable Info from your self$<%[mynick]> !myinfo&#124;|",	-- myinfo
[790]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show script version$<%[mynick]> !version&#124;|",	-- version
[800]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Self Register$<%[mynick]> !regme %[line:Password]&#124;|",	-- regme
[810]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Change your own password$<%[mynick]> !repass %[line:New Pass]&#124;|",	-- repass
[820]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show the users from the selected profile$<%[mynick]> !showreg %[line:reg/vip/op/master]&#124;|",	-- showreg
[830]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Put the away message$<%[mynick]> !away %[line:Message]&#124;|",	-- away
[840]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Back after an away$<%[mynick]> !back&#124;|",	-- back
[850]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show all away messages$<%[mynick]> !getaways&#124;|",	-- getaways
[860]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Report User to all OP's in PM$<%[mynick]> !report %[nick] %[line:Message]&#124;|",	-- report
[870]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Shows Youre Online Time in Hub$<%[mynick]> !myhubtime&#124;| ",	-- myhubtime
[880]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Shows users whit free slots$<%[mynick]> !slots&#124;|",	-- slots
[890]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Shows available redirect addresses$<%[mynick]> !jump&#124;|",	-- jump
[900]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Help Commands$<%[mynick]> !help&#124;|",	-- help
[910]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show Inbuild Commands$<%[mynick]> !inbuild %&#124;|",	-- inbuild
}