Description Bot for LUA5.1.1 on PtokaX 3.5.2
 

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

Description Bot for LUA5.1.1 on PtokaX 3.5.2

Started by baba.runner, 06 November, 2006, 21:22:05

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

baba.runner

 Hi
I got to use a descritpiton bot in my previous version of Ptokax (3.5.1 LUA 5.02) and I tried to use it with PtokaX 3.5.2 LUA 5.1.1, but unsuccessfully. I searched within the existing threads but with no result. Is here anybody who may help me.
Thanks in advnce for the assistance.

Here comes the script:
--------------------------------------------------
--Description Tag by ??????Hawk?????? 05-07-2004 -
--------------------------------------------------



MasterTagInDescription = "[Admin] "

MOperatorTagInDescription = "[Master-Operator] "

OperatorTagInDescription = "[Operator] "

VIPTagInDescription = "[VIP] "

RegTagInDescription = "[REG] "

--==================================================================

Mins =  0.1	--===Sets the time for the tags to be updated

--==================================================================



timer = 60000 * Mins
function Main() 
SetTimer(timer)
StartTimer() 
end 

function OnTimer()
TagInDescription()
end

function TagInDescription()
local aux,usr

---------------------------------------------------------------------------- Profil 1

for aux, usr in GetUsersByProfile("Master") do
if (GetItemByName(usr) ~= nil) then
local userToShow = GetItemByName(usr)
if (userToShow.sMyInfoString ~= nil) then
local s,e,name,desc,speed,email,share = string.find(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
SendToAll( "$MyINFO $ALL "..name.." "..MasterTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
end
end
end

---------------------------------------------------------------------------- Profil 2

for aux, usr in GetUsersByProfile("Operator") do
if (GetItemByName(usr) ~= nil) then
local userToShow = GetItemByName(usr)
if (userToShow.sMyInfoString ~= nil) then
local s,e,name,desc,speed,email,share = string.find(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
SendToAll( "$MyINFO $ALL "..name.." "..OperatorTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
end
end
end

---------------------------------------------------------------------------- Profil 3

for aux, usr in GetUsersByProfile("VIP") do
if (GetItemByName(usr) ~= nil) then
local userToShow = GetItemByName(usr)
if (userToShow.sMyInfoString ~= nil) then
local s,e,name,desc,speed,email,share = string.find(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
SendToAll( "$MyINFO $ALL "..name.." "..VIPTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
end
end
end

---------------------------------------------------------------------------- Profil 4

for aux, usr in GetUsersByProfile("Reg") do
if (GetItemByName(usr) ~= nil) then
local userToShow = GetItemByName(usr)
if (userToShow.sMyInfoString ~= nil) then
local s,e,name,desc,speed,email,share = string.find(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
SendToAll( "$MyINFO $ALL "..name.." "..RegTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
end
end
end


end


I get always this error
Syntax ...PTOKAX 0.3.5.2.lua5.1.1\scripts\Description vlua5.lua:40: attempt to call a table value

baba.runner

#1
Thx Mutor

I thought this script was already LUA 5.1.1 compatible as it was only mentioned LUA5 in the script-name.
I will try one of the converters then. Thx again ;)

SMF spam blocked by CleanTalk