PtokaX forum

Archive => Archived 5.1 boards => Request for scripts => Topic started by: baba.runner on 06 November, 2006, 21:22:05

Title: Description Bot for LUA5.1.1 on PtokaX 3.5.2
Post by: baba.runner on 06 November, 2006, 21:22:05
 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
Title: Re: Description Bot for LUA5.1.1 on PtokaX 3.5.2
Post by: baba.runner on 07 November, 2006, 00:42:02
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 ;)