Another script for description tag !!!
 

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

Another script for description tag !!!

Started by juda, 06 October, 2004, 15:51:28

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

juda

I be very happy for your help & time....
Using Xsthetic bot script and RoboCop 8.0b script
I already use description tag in "Xsthetic game server" for:
- master - [[[OWNER]]]
- operator - [[[OP]]]
- vip - [[[VIP]]]
 - reg - [[[REG]]]
This is already in script....
I like to register and create more profiles for my hub...like:

 - cooluserTagInDescription = "[[[COOL USER]]]"
 - RecruitTagInDescription = "[[[RECRUIT]]]"        
 - MemberTagInDescription = "[[[MEMBER]]]"
 - CoolmemberTagInDescription = "[[[COOL MEMBER]]]"
 - CorporalTagInDescription = "[[[CORPORAL]]]"  
 - RoutinierTagInDescription = "[[[ROUTINIER]]]"    
 - SupervisorTagInDescription = "[[[SUPERVISOR]]]"  
I already try using this script ,made from HAWK......
I change script for myself & geting this Syntax error:
 attempt to index a nil value
stack traceback:
 1:  function `Minshare' at line 169 [file `Robocop\DataArrival.lua']
 2:  function `DataArrival' at line 482 [file `Robocop\RoboCopv8.0b.lua']
---------------------------------------------------------------------------------------------------
--===Sets the tag to be shown in reg's descriptions=================

cooluserTagInDescription = "[[[COOL USER]]]"      --\\ Tag

--==================================================================
--===Sets the tag to be shown in Vip's descriptions=================

MemberTagInDescription = "[[[MEMBER]]]"       --\\ Tag

--==================================================================
--===Sets the tag to be shown in op's descriptions==================

CoolmemberTagInDescription = "[[[COOL MEMBER]]]"         --\\ Tag

--==================================================================
--===Sets the tag to be shown in masters's descriptions=============

RoutinierTagInDescription = "[[[ROUTINIER]]]"      --\\ Tag

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

Mins =  1

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



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

function OnTimer()
   TagInDescription()
end

function TagInDescription()
   local aux,usr
   for aux, usr in GetUsersByProfile("member") do
      if (GetItemByName(usr) ~= nil) then
         local userToShow = GetItemByName(usr)
         if (userToShow.sMyInfoString ~= nil) then
            local s,e,name,desc,speed,email,share = strfind(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
            SendToAll( "$MyINFO $ALL "..name.." "..MemberTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
         end
      end
   end
   for aux, usr in GetUsersByProfile("coolmember") do
      if (GetItemByName(usr) ~= nil) then
         local userToShow = GetItemByName(usr)
         if (userToShow.sMyInfoString ~= nil) then
            local s,e,name,desc,speed,email,share = strfind(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
            SendToAll( "$MyINFO $ALL "..name.." "..CoolmemberTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
         end
      end
   end
   for aux, usr in GetUsersByProfile("routinier") do
      if (GetItemByName(usr) ~= nil) then
         local userToShow = GetItemByName(usr)
         if (userToShow.sMyInfoString ~= nil) then
            local s,e,name,desc,speed,email,share = strfind(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
            SendToAll( "$MyINFO $ALL "..name.." "..RoutinierTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
         end
      end
   end
   for aux, usr in GetUsersByProfile("cooluser") do
      if (GetItemByName(usr) ~= nil) then
         local userToShow = GetItemByName(usr)
         if (userToShow.sMyInfoString ~= nil) then
            local s,e,name,desc,speed,email,share = strfind(userToShow.sMyInfoString, "$MyINFO $ALL (%S+)%s+([^$]*)$ $([^$]*)$([^$]*)$([^$]+)")
            SendToAll( "$MyINFO $ALL "..name.." "..cooluserTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
         end
      end
   end
end
-------------------------------------------------------------------------------------------
If I remove RoboCop, geting error for Xsthetic bot.....Thanks for help !!!    
 ---Some good idea for profile name is welcome......     see ya
juda

bastya_elvtars

as i already said: run in order

so rc is upper in the scripts window of ptoax than esthetic

like


robocop.lua
zesthetic.lua

then zesthetic will execute l8r, and wont disturb rc
Everything could have been anything else and it would have just as much meaning.

juda

Can`t get it work.....
Change all posible solution and get the same error every time...
juda

??????Hawk??????

hi  juda m8  ...

I am working on new profile support for Xsthetic at the moment..

i Am using the same profiles as  Robocop so both script will Again run in Tandem..


The errors you are getting from Xsthetic is because of the  RoboCop Profile.dat  file  your using.

my script supports the standard profiles only and errors on anything different.


??????Hawk??????

bastya_elvtars

omg forgot about that rc uses non standard profiles i hate this

why not write a profiles.dat reading part hawk? ;)
Everything could have been anything else and it would have just as much meaning.

??????Hawk??????

:)  :)

nice idea m8  ...  

will stop work on robo  compatibility and and try for full comptibility  ....

but later  need time to think it through with a beer or 2  at hand.

 :P  :P  :P  :P  :P  :P  :P  :P  :P  :P

juda

will wait for your update.........
maybe you know for any other scripte to do this thing ???
or can I change something by my self....???

  Thanks again...!!!
juda

juda

I using and testing script that I posted afternoon,and geting the same error:
attempt to index a nil value
stack traceback:
1: function `Minshare' at line 169 [file `Robocop\DataArrival.lua']
2: function `DataArrival' at line 482 [file `Robocop\RoboCopv8.0b.lua']

can I ignore this error or it will do some problems.......
 thanks for reply.......see ya
juda

SMF spam blocked by CleanTalk