Text only | Text with Images

PtokaX forum

Archive => Archived 5.0 boards => Request for scripts => Topic started by: whitpa on 16 April, 2005, 03:34:45

Title: Script to show Reg and Unregs main window
Post by: whitpa on 16 April, 2005, 03:34:45
hello
is there a script that adds the word Reg or Unreg
next to users name in main
thanks 8)  8)  8)
Title:
Post by: bastya_elvtars on 21 April, 2005, 02:13:34
QuoteOriginally 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
Title:
Post by: GeceBekcisi on 21 April, 2005, 10:37:17
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?
Title: thanks for the advice
Post by: whitpa on 21 April, 2005, 20:57:33
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
Title:
Post by: Tw?sT?d-d?v on 21 April, 2005, 21:05:28
try this

Code Select
--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
Title: Thanks for the script
Post by: whitpa on 22 April, 2005, 00:14:43
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
Title: How do I import and use this script?
Post by: Herodes on 22 April, 2005, 01:25:45
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 ...
Title:
Post by: bastya_elvtars on 22 April, 2005, 03:05:06
QuoteOriginally posted by whitpa
wordpad

Never!
Title: IT WORKS
Post by: whitpa on 22 April, 2005, 03:12:47
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:
Text only | Text with Images