Request tO convert RightClick lUa 4 To LUA 5
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

Request tO convert RightClick lUa 4 To LUA 5

Started by M00Z, 28 May, 2005, 13:22:56

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

M00Z

hello..
Plz could soomeone convert me this script of lua 4 to lua 5
--------------------------------------------------------------------
---Desenhado E Scriptado Por Java Exclusivamente Para IsCteM OrGaNiZatiOn?!!!
-- # RightClicker for RoboCopv9.0c
-- # Made by Optimus & TiMeTrAVelleR
-- # USE SCRIPT AT YOUR OWN RISK, IT MAY NOT BE COMPATIBLE WITH ALL CLIENTS

assert(dofile("tbl/scriptlevel.tbl"),"tbl/scriptlevel.tbl not found")
assert(dofile("tbl/inbuildlevel.tbl"),"tbl/inbuildlevel.tbl not found")

sMenu = "Comandos da IsCteM OrGaNiZatiOn?"

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

-- End Editable Settings --

function NewUserConnected(user)
   if (SendTo[user.iProfile]==1) then
      user:SendData("$UserCommand 255 7 |") user:SendData("$UserCommand 0 3 |")
      GetRightClick(user, ScriptLevel, ScriptCmds) GetRightClick(user, InbuildLevel, InbuildCmds) customCMDs(user)
      user:SendData(" Os Comandos do IsCteM OrGaNiZatiOn? Ja estao disponiveis atraves do rightclik!")
   end
end

OpConnected=NewUserConnected

function GetRightClick(user, table1, table2)
   for cmd,_ in table1 do
      if table1[cmd][user.iProfile] == 1 then
         for value,command in table2 do
            if cmd == value then user:SendData(command) end
         end
      end
   end
end

function customCMDs(user) --// You can put your custome commands here
   user:SendData("$UserCommand 1 3 "..sMenu.."\\Comandos Extras\\Ver Eventos$<%[mynick]> !eventos||")
   user:SendData("$UserCommand 1 3 "..sMenu.."\\Comandos Extras\\Ver Publicidades$<%[mynick]> !publicidade||")
   user:SendData("$UserCommand 1 3 "..sMenu.."\\Comandos Extras\\Ver Fotologs e Fotoblogs$<%[mynick]> !fotos||")
   
end


gemini

page1- this for robocop 10.01e and ptokax 17.08 debug              

copy to all

-- RightClicker for RoboCopv10.01d
-- Made by Optimus & TiMeTrAVelleR
-- Optimized and fixed some stuff
-- Best is not to use it for normal users takes to much bandwidth

sMenu = "Comandos da IsCteM OrGaNiZatiOn?"

SendTo = { --> 1=on/0=off
[0] = 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)
user:SendData(" Os Comandos do IsCteM OrGaNiZatiOn? Ja estao disponiveis atraves do rightclik!")
end
end
end

gemini

end
ScriptCmds = {
["kick"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Kikar User$<%[mynick]> !kick %[nick] %[line:Reason]||", -- kick
["ban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Banir User$<%[mynick]> !ban %[nick] %[line:Reason]||", -- ban
["nameban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Nameban User$<%[mynick]> !nameban %[nick] %[line:Reason]||", -- nameban
["timeban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Timeban User$<%[mynick]> !timeban %[nick] %[line:hr:mn] %[line:Reason]||", -- timeban
["kill"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Matar User $<%[mynick]> !kill %[nick] %[line:Reason]||", -- kill
["warn"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Avisar User$<%[mynick]> !warn %[nick] %[line:Reason]||", -- warn
["flood"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Flood User$<%[mynick]> !flood %[nick] %[line:Nr] %[line:Reason]||", -- flood
["hconfig"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Configuracao do Hub$<%[mynick]> !hconfig||", -- hconfig
["hstat"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Estatisticas do Hub$<%[mynick]> !hstat||", -- hstat
["info"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Informacao de User$<%[mynick]> !info %[nick]||", -- info
["mass"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Mass Message$<%[mynick]> !mass %[line:Message]||", -- mass
["banner"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Enviar Banner$<%[mynick]> !banner %[line:Advert]||", -- banner
["sendhubad"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Enviar Anuncio$<%[mynick]> !sendhubad %[line:main/pm]||", -- sendhubad
["talk"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Falar Sem Nick$<%[mynick]> !talk %[line:Message]||", -- talk
["online"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Online Check User/Ip$<%[mynick]> !online %[line:nick/ip]||", -- online
["offline"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Enviar uma Msg Offline$<%[mynick]> !offline %[nick] %[line:Message]||", -- offline
["watch"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Assistir User$<%[mynick]> !watch %[nick]||", -- watch
["watchoff"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Desligar assistir user$<%[mynick]> !watchoff||", -- watchoff
["getwatch"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Mostrar Assistidos$<%[mynick]> !getwatch||", -- getwatch
["cmdspy"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Ligar/Desligar CommandSpy$<%[mynick]> !cmdspy %[line:on/off]||", -- cmdspy
["topkickers"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar Topkickers$<%[mynick]> !topkickers||", -- topkickers
["tophubbers"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar TopHubbers$<%[mynick]> !tophubbers||", -- tophubbers
["sminslots"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Minslots$<%[mynick]> !sminslots %[line:user/reg/vip/op/mod/master/founder] %[line:slots]||", -- sminslots
["smaxslots"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Maxslots$<%[mynick]> !smaxslots %[line:user/reg/vip/op/mod/master/founder] %[line:slots]||", -- smaxslots
["smaxhubs"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Max Hubs$<%[mynick]> !smaxhubs %[line:user/reg/vip/op/mod/master/founder] %[line:hubs]||", -- smaxshubs
["sratio"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Slots/Hubs Ratio$<%[mynick]> !sratio %[line:user/reg/vip/op/mod/master/founder] %[line:slots]||", -- sratio
["slimiter"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Bandwidth Limiter$<%[mynick]> !slimiter %[line:user/reg/vip/op/mod/master/founder] %[line:limiter]||", -- slimiter
["sminshare"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir MinShare$<%[mynick]> !sminshare %[line:user/reg/vip/op/mod/master/founder] %[line:share] %[line:mb/gb]||", -- sminshare
["smaxshare"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Maxshare$<%[mynick]> !smaxshare %[line:user/reg/vip/op/mod/master/founder] %[line:share] %[line:mb/gb]||", -- smaxshare
["hminshare"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Hub Minshare$<%[mynick]> !hminshare %[line:Number] %[line:b/kb/mb/gb]||", -- hminshare
["hmaxusr"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Max Users$<%[mynick]> !hmaxusr %[line:Number]||", -- hmaxusr
["hdesc"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Descricao do hub$<%[mynick]> !hdesc %[line:Hub_Description]||", -- hdesc
["chhubname"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir nome do Hub$<%[mynick]> !chhubname %[line:New Hubname]||", -- chhubname
["regserver"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir RegServer$<%[mynick]> !regserver %[line:New_Reg_Address]||", -- regserver
["redirect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Definir Endereco de redirect$<%[mynick]> !redirect %[line:Host /Ip]||", -- redirect
["redirectfull"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Ligar/Desligar Redirect quando cheio$<%[mynick]> !redirectfull %[line:on/off]||", -- redirectfull
["autoredirect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Ligar/Desligar Auto Redirect$<%[mynick]> !autoredirect %[line:on/off]||", -- autoredirect
["addredirect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Adicionar novo url para lista de redirect$<%[mynick]> !addredirect %[line:Url/Ip]||",
["delredirect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Remover url da loista de redirect$<%[mynick]> !delredirect %[line:Url/Ip]||",
["showredirect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Mostrar enderemath.cos de redirect$<%[mynick]> !showredirect||",
["unbot"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Remover bots antigos da userlist$<%[mynick]> !unbot %[nick]||", -- unbot
["hubprotect"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Ligar/Desligar proteccao do hub$<%[mynick]> !hubprotect %[line:on/off]||", -- hubprotect
["getblocked"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Users bloqueados$<%[mynick]> !getblocked||", -- getblocked
["massblocked"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mass Message para Users bloqueados$<%[mynick]> !massblocked %[line:Message]||", -- massblocked
["kickblocked"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Kikar user bloqueado$<%[mynick]> !kickblocked ||", -- kickblocked
["regreg"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar User$<%[mynick]> !regreg %[nick] %[line:Password]||", -- regreg
["regvip"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar Vip$<%[mynick]> !regvip %[nick] %[line:Password]||", -- regvip
["regop"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar Op$<%[mynick]> !regop %[nick] %[line:Password]||", -- regop
["regmop"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar Moderador$<%[mynick]> !regmath.mod %[nick] %[line:Password]||", -- regmop
["regmaster"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar Master$<%[mynick]> !regmaster %[nick] %[line:Password]||", -- regmaster
["regfounder"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Registar Fundador$<%[mynick]> !regfounder %[nick] %[line:Password]||", -- regfounder
["deluser"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Apagar registo de user$<%[mynick]> !deluser %[nick]||", -- deluser
["upgrade"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Actualizar registo de user$<%[mynick]> !upgrade %[nick] %[line:reg/vip/op/mod/master/founder]||", -- upgrade
["getpass"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Ver password de User$<%[mynick]> !getpass %[nick]||", -- getpass
["resethstat"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Recomecar Contadores$<%[mynick]> !resethstat||", -- resethstat
["clear"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Limpar Nick$<%[mynick]> !clear %[nick]||", -- clear
["showiplog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Iplog$<%[mynick]> !showiplog||", -- showipmath.log
["showkicklog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Kicklog$<%[mynick]> !showkicklog||", -- showkickmath.log
["showbanlog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Banlog$<%[mynick]> !showbanlog||", -- showbanmath.log
["showwarnlog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Warnlog$<%[mynick]> !showwarnlog||", -- showwarnmath.log
["delkicklog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Apagar Kicklog$<%[mynick]> !delkicklog||", -- delkickmath.log
["delbanlog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Apagar Banlog$<%[mynick]> !delbanlog||", -- delbanmath.log
["delwarnlog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Apagar Warnlog$<%[mynick]> !delwarnlog||", -- delwarnmath.log
["showlog"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar math.log name/ip$<%[mynick]> !showmath.log %[line:Name/Ip] ||", -- showmath.log
["follow"]="$UserCommand 1 3 "..sMenu.."\\Comandos de VIP\\Ligar/Desl Follow Mensagens de Kick/Ban$<%[mynick]> !follow %[line:On/Off] ||", -- follow
["rules"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Regras$<%[mynick]> !rules||", -- rules

gemini

["network"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar Hubs na rede$<%[mynick]> !network||", -- network
["faq"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar Guia sobre DC++$<%[mynick]> !faq||", -- faq
["myip"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar seu IP corrente$<%[mynick]> !myip||", -- myip
["myinfo"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar sua imformacao$<%[mynick]> !myinfo||", -- myinfo
["version"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar Versao do Script$<%[mynick]> !version||", -- version
["regme"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Registar-se$<%[mynick]> !regme %[line:Password]||", -- regme
["repass"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mudar sua Password$<%[mynick]> !repass %[line:New Pass]||", -- repass
["showreg"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar users do profile$<%[mynick]> !showreg %[line:reg/vip/op/mod/master/founder]||", -- showreg
["away"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Ausentar-se (away)$<%[mynick]> !away %[line:Message]||", -- away
["back"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Regressar do Away$<%[mynick]> !back||", -- back
["getaways"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostrar todas Msgs Away$<%[mynick]> !getaways||", -- getaways
["report"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Denunciar Um user$<%[mynick]> !report %[nick] %[line:Message]||", -- report
["myhubtime"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostra o seu tempo no hub$<%[mynick]> !myhubtime||", -- myhubtime
["slots"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostra users com slots livres$<%[mynick]> !slots||", -- slots
["jump"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Mostra enderemath.cos de redirect$<%[mynick]> !jump||", -- jump
["help"]="$UserCommand 1 3 "..sMenu.."\\Comandos Gerais\\Ajuda$<%[mynick]> !help||", -- help
}
InbuildCmds = {
["drop"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Drop User$<%[mynick]> !drop %[nick]||", -- drop
["gag"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Impedir User de falar no main$<%[mynick]> !gag %[nick]||", -- gag
["ungag"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Autorizar user a falar no main$<%[mynick]> !ungag %[nick]||", -- ungag
["banip"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Banir IP$<%[mynick]> !banip %[line:Ipnumber]||", -- banip
["unban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Remover ban$<%[mynick]> !unban %[nick] %[line:nick/ip]||", -- unban
["nickban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Nickban User$<%[mynick]> !nickban %[nick] %[line:Reason]||", -- nickban
["getbanlist"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostra Lista de Banidos$<%[mynick]> !getbanlist||", -- getbanlist
["clrpermban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Limpar Permban$<%[mynick]> !clrpermban||", -- clrpermban
["clrtempban"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Limpar Tempban$<%[mynick]> !clrtempban||", -- clrtempban
["op"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\OP temporario$<%[mynick]> !op %[nick]||", -- op
["getinfo"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Informacao basica de User$<%[mynick]> !getinfo %[nick]||", -- getinfo
["ipinfo"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostrar Users com esse IP$<%[mynick]> !getinfo %[line:Ipnumber]||", -- ipinfo
["iprangeinfo"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Operadores\\Mostra User com essa IPrange$<%[mynick]> !iprangeinfo %[line:Ipnumber]||", -- iprangeinfo
["topic"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Mudar topico do hub$<%[mynick]> !topic %[line:Topic]||", -- topic
["restart"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Reiniciar Hub$<%[mynick]> !restart||", -- restart
["restartscripts"]="$UserCommand 1 3 "..sMenu.."\\Comandos de Master\\Reiniciar Scripts$<%[mynick]> !restartscripts||", -- restartscripts
}

that's all bye

TTB

If I'm not mistaken, there is already a RC script by the new RC. If you want to have this converted, just look to the structure. You don't need to know that much about LUA to change this by yourself, it only takes some time...

Ow, btw, there are also some other rightclicker scripts on this forum, so use the search button to find them!
TTB

(? ?.??.-> Admin @ Surfnet hubs <-.??.???)

SMF spam blocked by CleanTalk