please please please convert lua 4 to 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

please please please convert lua 4 to 5

Started by gemini, 06 June, 2005, 13:06:58

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

gemini

please  please please convert lua 4 to 5
i have this in robocop 9.0 b

user:SendData("$UserCommand 1 3 ?=COUNTRY=?\\Rileva Nazione di Connessione Utente$<%[mynick]> +getcountry %[nick]||") --Mostra Nazione di Provenienza dell'Utente
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Mostra la Tua Statistica$<%[mynick]> !mystats||") --Mostra la tua statistica
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Mostra la Statistica di un Utente$<%[mynick]> !show %[nick]||") -- Mostra la statistica di un user
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 10 Utenti sempre connessi$<%[mynick]> !top10alltime||") -- top 10 alltime utenti online
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 50 Utenti sempre connessi$<%[mynick]> !top50alltime||") -- top 50 alltime utenti online
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 100 Utenti sempre connessi$<%[mynick]> !top100alltime||") -- top 100 alltime utenti online
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 10 Utenti connessi attualmente$<%[mynick]> !top10now||") -- top 10 degli utenti online attuale
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 50 Utenti connessi attualmente$<%[mynick]> !top50now||") -- top 50 degli utenti online attuale
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistica dei 100 Utenti connessi attualmente$<%[mynick]> !top100now||") -- top 100 degli utenti online attuale
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Mostra i Comandi$<%[mynick]> !help||") -- mostra i comandi
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Entra$<%[mynick]> !entra %[line:nome stanza]||") --Entra in una stanza, se non c'? una stanza con questo nome creala
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Esci$<%[mynick]> !esci||") --Esci dalla stanza dove sei
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Lista stanze$<%[mynick]> !lista||") --Visualizza la lista degli utenti e le stanze
end
 
please convert for robocop 10.01e and ptokax 17.08
with zright clicker with geo ip incluse for user and operator




I wait a yours answered greetings


gemini

please please please convert lua 4 to 5
i have this in robocop 9.0 b

user:SendData("$UserCommand 1 3 ?=COUNTRY=?\\It points out Nation of Connection $<%[mynick]> +getcountry %[nick]||") --Origin of Nation show of the user

user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Show your Statistics$<%[mynick]> !mystats||") --Show your Statistics

user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Show the statistics of an user$<%[mynick]> !show %[nick]||") -- Show the statistics of an user

user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistics of 10 Users always join$<%[mynick]> !top10alltime||") -- top 10 alltime utenti online
user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistics of 50 Users always join$<%[mynick]> !top50alltime||") -- top 50 alltime utenti online

user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Statistics of 100 Users always join$<%[mynick]> !top100alltime||") -- top 100 alltime utenti online

user:SendData("$UserCommand 1 3 ?=STATISTICHE=?\\Mostra i Comandi$<%[mynick]> !help||") -- mostra i comandi
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Entra$<%[mynick]> !entra %[line:nome stanza]||") --Entra in una stanza, se non c'? una stanza con questo nome creala
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Esci$<%[mynick]> !esci||") --Esci dalla stanza dove sei
user:SendData("$UserCommand 1 3 ?=CHAT ROOM PERSONALI=?\\Lista stanze$<%[mynick]> !lista||") --Visualizza la lista degli utenti e le stanze
end

please convert for robocop 10.01e and ptokax 17.08
with zright clicker with geo ip incluse for user and operator

damo

robo 10e has right click user custome commands so you can make your own add them there

Markitos

This is an example...
-- 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 = "RC"

SendTo = { --> 1=on/0=off
[0] = 1,   -- Masters
[1] = 1,   -- Operators
[2] = 1,   -- Vips
[3] = 0,   -- Regs
[4] = 1,   -- Moderator
[5] = 1,   -- NetFounder
[-1] = 0,  -- 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(" Enhanced Right Click Support for [RoboCop] is available!")
		end
	end
end

OpConnected=NewUserConnected

ScriptCmds = {
["deluser"]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Delete registerd user$<%[mynick]> !deluser %[nick]",
["upgrade"]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Upgrade/Downgrade registerd users$<%[mynick]> !upgrade %[nick] %[line:reg/vip/op/mod/master/founder]",
["getpass"]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Get password registerd user$<%[mynick]> !getpass %[nick]",
["resethstat"]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Reset hub counters/statics$<%[mynick]> !resethstat",
["clear"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Clear logs/bans user$<%[mynick]> !clear %[nick]",
["showiplog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Show the iplog$<%[mynick]> !showiplog",
["showkicklog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Show the kicklog$<%[mynick]> !showkicklog",
["showbanlog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Show the banlog$<%[mynick]> !showbanlog",
["showwarnlog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Show the warnlog$<%[mynick]> !showwarnlog",
["delkicklog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Delete the kicklog$<%[mynick]> !delkicklog",
["delbanlog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Delete the banlog$<%[mynick]> !delbanlog",
["delwarnlog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Delete the warnlog$<%[mynick]> !delwarnlog",
["showlog"]="$UserCommand 1 3 "..sMenu.."\\LOG\\Showlog user/ip$<%[mynick]> !showlog %[line:name/ip] ",
["follow"]="$UserCommand 1 3 "..sMenu.."\\OTHER\\Set kick/ban/etc messages [on/off]$<%[mynick]> !follow %[line:On/Off] ",
["rules"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show the hub rules$<%[mynick]> !rules",
["network"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show the network info$<%[mynick]> !network",
["faq"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show faq about DC++$<%[mynick]> !faq",
["myip"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show your currently IP$<%[mynick]> !myip",
["myinfo"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show all your available info$<%[mynick]> !myinfo",
["version"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show the script version$<%[mynick]> !version",
["regme"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Register me at this hub$<%[mynick]> !regme %[line:Password]",
["repass"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Change your own password$<%[mynick]> !repass %[line:New Pass]",
["showreg"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show all users by profile$<%[mynick]> !showreg %[line:reg/vip/op/mod/master/founder]",
["away"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Set my away message$<%[mynick]> !away %[line:Message]",
["back"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Restore my away message$<%[mynick]> !back",
["getaways"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show all current away messages$<%[mynick]> !getaways",
["report"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Report user to all OP's$<%[mynick]> !report %[nick] %[line:Message]",
["myhubtime"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show your total online time$<%[mynick]> !myhubtime",
["slots"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show users whit free slots$<%[mynick]> !slots",
["help"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show you this help$<%[mynick]> !help",
["inbuild"]="$UserCommand 1 3 "..sMenu.."\\NORMAL\\Show the inbuild commands$<%[mynick]> !inbuild",
["showreglog"]="$UserCommand 1 3 "..sMenu.."\\REGISTER\\Show the registerlog$<%[mynick]> !showreglog",
["gag"]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Gag user$<%[mynick]> !gag %[nick]",
["ungag"]="$UserCommand 1 3 "..sMenu.."\\KICK/BAN\\Ungag user$<%[mynick]> !ungag %[nick]",
["noclean"]="$UserCommand 1 3 "..sMenu.."\\USERCLEANER\\Add/Delete user from NoClean list $<%[mynick]> !noclean %[line:add/delete] %[line:nick]",
["shownoclean"]="$UserCommand 1 3 "..sMenu.."\\USERCLEANER\\Show users in NoClean list$<%[mynick]> !shownoclean",
}
InbuildCmds = {
["banip"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Banip user$<%[mynick]> !banip %[line:Ipnumber]",
["unban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Unban user$<%[mynick]> !unban %[nick] %[line:nick/ip]",
["nickban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Nickban user$<%[mynick]> !nickban %[nick] %[line:Reason]",
["getbanlist"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Getbanlist$<%[mynick]> !getbanlist",
["clrpermban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Clearpermban$<%[mynick]> !clrpermban",
["clrtempban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Cleartempban$<%[mynick]> !clrtempban",
["op"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Give user temperory op status$<%[mynick]> !op %[nick]",
["getinfo"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Basic info user$<%[mynick]> !getinfo %[nick]",
["ipinfo"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Show users with that ip$<%[mynick]> !getinfo %[line:Ipnumber]",
["iprangeinfo"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Show users within that iprange$<%[mynick]> !iprangeinfo %[line:Ipnumber]",
["topic"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Change the hub topic$<%[mynick]> !topic %[line:Topic]",
["restart"]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Restart hub$<%[mynick]> !restart",
["restartscripts"]="$UserCommand 1 3 "..sMenu.."\\SETTING\\Restart scripts$<%[mynick]> !restartscripts",
["gettempbanlist"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Gettempbanlist$<%[mynick]> !gettempbanlist",
["userinfo"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Info user$<%[mynick]> !userinfo %[nick]",
["reloadtxt"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Reload the hub textfiles$<%[mynick]> !reloadtxt",
["tempunban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Unban tempbanned user$<%[mynick]> !tempunban %[nick]",
["tempban"]="$UserCommand 1 3 "..sMenu.."\\INBUILD\\Tempban user for x minutes$<%[mynick]> !tempban %[nick]",
}

customCMDs = function(user) --// You can put your custome commands here (e.g by Markitos)
[COLOR=red]--user:SendData("$UserCommand 1 3 ?=COUNTRY=?\\It points out Nation of Connection $<%[mynick]> +getcountry %[nick]||") -- Origin of Nation show of the user [/COLOR] 
end

Don't copy this one, it's incomplete...(remember it's just an example)

Cheers...

SMF spam blocked by CleanTalk