Script to show Reg and Unregs main window

[whitpa]

hello
is there a script that adds the word Reg or Unreg
next to users name in main
thanks 8)  8)  8)

[bastya_elvtars]

Originally posted by whitpa
hello
is there a script that adds the word Reg or Unreg
next to users name in main
thanks 8)  8)  8)

description tag by hawk

[GeceBekcisi]

As far as I remember, "description tag by hawk" was in LUA4 and also it cause MyInfoSpam.. Really isn't there no other options for this except this?

[whitpa]

yes that did not work at all..
Let me explain what help I need again in detail

My hub is PtokaX 0.3.3.0 build 16.09 [debug]
with RoboCop v10.01c

I need a scricpt lua5

which will show if a user is registered or unregistered or OP ,Vip,Master

Some examples are like this

NICK                 shared              Description

Wonder                   300  GIG    ( Reg)
Helpme                   1       GIG    (UnReg)
don't get it              99     GiG    (OP)
LUA5 Scripts            674   GiG    (MASTER)
Tried Description tag    1  GiG    (Unreg)
By Hawk                  800   GiG    (Reg)
Did not show           700   GiG    (Reg)
A Thing                     1       GiG   (UnReg)
Thank you                 2      GiG    ( Reg)


Thank you for reviewing my request
I Love this Board

[Tw?sT?d-d?v]

try this

--Description Tag by ??????Hawk?????? 05-07-2004
--Converted To lua 5 By (uk)jay 18/4/2005
--===Sets the tag to be shown in reg's descriptions=================

regTagInDescription = "{Reg} "   	--\\ Tag

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

VipTagInDescription = "{Vip} "   	--\\ Tag

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

OpsTagInDescription = "{Op} "   		--\\ Tag

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

MastersTagInDescription = "{Master} "   	--\\ Tag

--==================================================================
--===Sets the tag to be shown in Net Founder descriptions===========

netTagInDescription = "{Net-Founder} "   	--\\ Tag

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

modTagInDescription = "{Moderator} "   	--\\ Tag

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

Mins =  1

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



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

function OnTimer()
	TagInDescription()
end

function TagInDescription()
	local aux,usr
	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
	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.." "..OpsTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
			end
		end
	end
	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.." "..MastersTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
			end
		end
	end
	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
	for aux, usr in GetUsersByProfile("Moderator") 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.." "..modTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
			end
		end
	end
	for aux, usr in GetUsersByProfile("NetFounder") 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.." "..netTagInDescription.." "..desc.."$ $"..speed.."$"..email.."$"..share.."$")
			end
		end
	end
end

[whitpa]

Hi
I am a very newbe type
How do I import and use this script
I tried notepad and wordpad
gave it a name and extention of .lua
but does not load

Yes as you see  I don't get it
Please help with some instructions

Once again thank you for taking sometime from
your busy day to help me

Sincerely
Whitpa

[Herodes]

1. Copy the script code from the web page.
2. Go into '(PtokaX_Folder)/scripts'
3. Right-Click, Create New > Text File.
4. rename the file from to 'whatever_you_want.lua'.
5. open the file and paste.
6. after shooting up/restarting Scripts in Ptokax it is bound to come up ...

[bastya_elvtars]

Originally posted by whitpa
wordpad

Never!

[whitpa]

First off , I send a Big Thank you to all whom have helped.

I and now very happy to say ,I have completed and
installed the above script without any problems.

Now I see titles to all whom enter the hub  from
Ops /Master/Reg user

Sincerely
Whitpa :P  :P  :P  :P  :P  :P  ;)  ;)  ;)  ;)  ;)  ;)  ;)  ;)  ;)  ;)  ;)  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D  :D :tongue: