total info script :D

[NL]trucker · 26 February, 2004, 10:32:42

hya all you fine scripters

i wonder if there is someone who could make this for me and other hubowners.

i need a script what looks like this:

12:09:50] ?==============???? [NL] ????? ]-[?? [NL]=================
[12:09:50] ?
[12:09:50] ::HubOwner:[NL]trucker ---> [settings from pkotax]
[12:09:50] ::Hub Masters: TeQuilla-hollandse.ko --->[settings from pkotax]
[12:09:50] ::Hub Address: funnyhub.no-ip.info --->[settings from pkotax]
[12:09:50] ::HubNetwork: = ?????? Magmar ?????? Network Dutch Division !!
[12:09:50] ::Dutch Located : Dus NLers Welkom !! ----> [settings from pkotax]
[12:09:50] ::WebSite=www.magmar.tk
[12:09:50] ::Hub-eMail:magmarnetworks@tiscali.nl
[12:09:50] ::Max Users=200 ----> settings from pkotax
[12:09:50] ::Min Share=1GB --->settings from pkotax

==================================???? [NL] ????? ]-[?? [NL]================
[12:09:50] ::=[Min Share]------->[settings from pkotax]
[12:09:50] ::=[Max share]------->[settings from pkotax]
[12:09:50] ::=[Max Hubs allowed]------->[settings from pkotax]
[12:09:50] ::=[Min slots] ------->[settings from pkotax]
[12:09:50] ::=[Highest hubshare ever]
[12:09:50] ::=[Total hub share now]
[12:09:50] ::=[Max Hub Share]
[12:09:50] ::=[Total vips online]
[12:09:50] ::=[Total regusers online]
[12:09:50] ::=[Total Op,s online]
[12:09:50] ::=[Highest Usercount ever]
==============================================================================
[12:09:50] ::[ToTal logins][since hubstart]
[12:09:50] ::[Total Bans]
[12:09:50] ::[Total Kicks]
[12:09:50] ::[Total Warns]
[12:09:50] ::
[12:09:50] ::
[12:09:50] ::
[12:09:50] ::

[12:09:50] ::=[Total hub running time from start]
[12:09:50] ::Uptime = 0 days, 23 hrs. 30 min. and 3 sec. = ?
[12:09:50] ?======47 of 200 Users Connected======
==================================???? [NL] ????? ]-[?? [NL]================

and as an extra with seperate login messages pro setting for Master/Op/Vip so that i can send a diffrent message to diffrent people.

meaning ::

vip1 hello nice to see you xxxxxxxxx
vip2 hay there i ,m always glad to see you back
vip 3 hey there is my favorite lady :p

and the same for OP/Master and Owner. so each person has his own login [perhaps even can create his own login?] [heard this was going to be added in robocop7]

is this all possiblle ? and will someone be so nice to look into this i would be very very greatfull.

[NL]Pur · 26 February, 2004, 14:27:06

it's a start :)

-- NL PUR for trucker ^.^ 26feb04
-- Tx to :)
-- function GetFromIni(var) by Gadget


function Main() 
	bot = "test"

	--- Script vars
	hubemail = ""
	website = ""
	hubnetwork = ""
	

end

function DataArrival(user, data)

	data=strsub(data,1,strlen(data)-1) 	
	_,_,cmd = strfind(data,"%b<>%s+(%S+)") 
	
	if (cmd=="!test") then
		
		
		user:SendPM(bot,"HubOwner:"..getfromini("Admin"))	-- HubOwner 		(PtokaX.ini)
		-- hubmasters						-- HubMasters		(API)
		user:SendPM(bot,"HubAdress:"..getfromini("HubAddress"))	-- HubAdress		(PtokaX.ini)
		user:SendPM(bot,"HubNetwork:"..hubnetwork);		-- HubNetwork		(Script)
		user:SendPM(bot, ""..frmHub:GetHubDescr());		-- HubDescription	(API)
		user:SendPM(bot,"Website:"..website);			-- Website		(Script)
		user:SendPM(bot,"Hub-eMail:"..hubemail);		-- HubEmail		(Script)
		user:SendPM(bot,"Max Users:"..getfromini("MaxClients"))	-- MaxUsers		(PtokaX.ini)
		user:SendPM(bot,"Min Share:"..frmHub:GetMinShare())	-- MinShare		(API)
	end
end

function getfromini(var) 
	local result="" 
	readfrom("../PtokaX.ini") 
	while 1 do 
		local line=read() 
		if line==nil then 
			break 
		else 
			if strsub(line,1,strlen(var)+1)==var.."=" then 
				result=strsub(line,strlen(var)+2,strlen(line)) 
				break 
			end 
		end 
	end 
	readfrom() 
	return result 
end

[NL]trucker · 26 February, 2004, 15:10:50

[Nl]Pur

loOol

No syntax errors in script file test.lua

but doesnt show in userlist en nothing happens when i type !test .

and if i,m right this scripts sends a pm to user but it should be shown in main either on login or on timer sorry not to have mentioned it.

running with robo6.0d and pkotax 15.25.

[NL]Pur · 26 February, 2004, 15:17:36

add this

frmHub:RegBot(bot)

TiMeTrAVelleR · 26 February, 2004, 15:32:46

Maby this is somthing you like

------------------------------------------------------------------------------------------------------------------------------
---// EntryBot 0.1 By Cyberbob //---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

BotName = "?RoboCop?" --// Set here your bot name
rules = "!rules" --// Set here command for rules
netw = "!network" --// Set here command for network list

------------------------------------------------------------------------------------------------------------------------------
--// This function is fired when an operator/master enters the hub //---------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

--frmHub:RegBot(BotName)

ops = 0
vips = 0
users = 0
USER = {}
VIPS = {}
OPS = {}

function NewUserConnected(user)
if user.iProfile == 2 then
CountVips(user)
if user.iProfile == -1 then
CountUser(user)
end
Message(user)
end
end

function OpConnected(user)
CountOps(user)
Message(user)
end

function DataArrival(user, data)
if user.bOperator then
CountOps(user)
elseif user.iProfile == 2 then
CountVips(user)
elseif user.iProfile == -1 then
CountUser(user)
end
end

function CountOps(user)
if OPS[user.sName] == nil then
OPS[user.sName]=1
ops = ops + 1
end
end

function CountVips(user)
if VIPS[user.sName] == nil then
VIPS[user.sName]=1
vips = vips + 1
end
end

function CountUser(user)
if USER[user.sName] == nil then
USER[user.sName]=1
users = users + 1
end
end

function UserDisconnected(user)
if user.iProfile == 2 then
if VIPS[user.sName] then
VIPS[user.sName]=nil
vips = vips - 1
elseif user.iProfile == -1 then
if USER[user.sName] then
USER[user.sName]=nil
users = users - 1
end
end
end

function OpDisconnected(user)
if OPS[user.sName] then
OPS[user.sName]=nil
ops = ops - 1
end
end

function Message(user)
local s,e,share = strfind(user.sMyInfoString, "$(%d+)%$")
share = format("%0.2f", ( share / (1024*1024*1024)))
local hubshare = format("%0.2f", ( frmHub:GetCurrentShareAmount() / (1024*1024*1024)))
user:SendData(BotName,"")
user:SendData("?=======================================================================?")
user:SendData("   ?Welcome "..user.sName.." to "..frmHub:GetHubName().."")
user:SendData("   ?Your IP:            "..user.sIP)
user:SendData("   ?Your Status in this Hub:      "..(GetProfileName(user.iProfile) or "Not registerd"))
user:SendData("   ?Actual Share in the Hub:      "..hubshare.." GB")
user:SendData("   ?There are: "..ops.." OPs . "..vips.." VIPs . "..users.." Unregged Users online")
user:SendData("   ?Here is now         "..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users connected")
user:SendData("   ?Hubs description is set to:      "..frmHub:GetHubDescr().."")
user:SendData("   ?Redirect address is set to:      "..frmHub:GetRedirectAddress().."")
user:SendData("   ?Hub register address is set to:   "..frmHub:GetRegServer().."")
user:SendData("   ?Hubs minshare is set to:      "..frmHub:GetMinShare()/(1024).." GB")
user:SendData("?=======================================================================?")
user:SendData(BotName,"")
end
end
-------------------------------------------------------------------------------------------------------------------------------
--// This function is fired when an user enters the hub //---------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------------
function NewUserConnected(curUser)
local hubshare = format("%0.2f", ( frmHub:GetCurrentShareAmount() / (1024*1024*1024)))
   curUser:SendData(BotName,"")
   curUser:SendData("?=======================================================================?")
   curUser:SendData("   ?Welcome "..curUser.sName.." to "..frmHub:GetHubName().."")
   curUser:SendData("   ?Your IP is:      "..curUser.sIP.."")
   curUser:SendData("   ?Here is now      "..ops.." Operator's connected to help you")
   curUser:SendData("   ?Here is now      "..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users connected")
   curUser:SendData("   ?Hubs current share is    "..hubshare.." GB")
   curUser:SendData("   ?Remember to read hub rules by typing "..rules.." in main chat")
   curUser:SendData("   ?And other network hubs you can find by typing "..netw.." in main chat")
   curUser:SendData("?=======================================================================?")
   curUser:SendData(BotName,"")
end
-------------------------------------------------------------------------------------------------------------------------------

[NL]trucker · 26 February, 2004, 16:11:20

TimeTraveller

thnx i like it sofar but it isnt complete yet.

Syntax error: expected;
last token read: `&' at line 93 in file `D:\==PTOTAX==\robo\scripts\entrybot.lua'

lol found the error and fixed it
and got an other one

Syntax error: attempt to call global `Message' (a nil value)
stack traceback:
1: function `OpConnected' at line 34 [file `D:\==PTOTAX==\robo\scripts\entrybot.lua']

[NL]trucker · 26 February, 2004, 16:19:43

timetraveller

how is this possible?

[16:12:37] ?There are: 1 OPs . 0 VIPs . 252 Unregged Users online
[16:12:37] ?Here is now 92 of 200 users connected

252 unregged users online?
while
there are only 92 of 200 users are connected?

this is total what i see in main
begin
------------------------------------------------------------------------

[16:12:37]
[16:12:37] & quote;?=======================================================================?
[16:12:37] ?Welcome pappa to ???? [NL] ????? ]-[?? [NL]
[16:12:37] ?Your IP: 217.121.195.6
[16:12:37] ?Your Status in this Hub: Master
[16:12:37] ?Actual Share in the Hub: 2756.81 GB
[16:12:37] ?There are: 1 OPs . 0 VIPs . 252 Unregged Users online
[16:12:37] ?Here is now 92 of 200 users connected
[16:12:37] ?Hubs description is set to: ?????? Magmar ?????? Network Dutch Division A Funny Hub To Be !! Dutch Located :) Dus NLers Welkom !!
[16:12:37] ?Redirect address is set to: dennis666.no-ip.com:9009
[16:12:37] ?Hub register address is set to: dreamland.gotdns.org;vandel405.dynip.com;dcreg.mine.nu;warez.1stleg.com:
[16:12:37] ?Hubs minshare is set to: 5 GB
[16:12:37] & quote;?=======================================================================?
[16:12:37]

---------------------------------------------------------------------end

[NL]trucker · 26 February, 2004, 16:44:21

lol
i tried to adjust the script a bit and now i get this :

Syntax error: cannot access a variable in outer scope;
last token read: `days' at line 116 in file `D:\==PTOTAX==\robo\scripts\entrybot.lua'

here is the scrpt.

what did i do wrong?

========================================

------------------------------------------------------------------------------------------------------------------------------
---// EntryBot 0.1 By Cyberbob //---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

BotName = "?RoboCop?" --// Set here your bot name
rules = "!rules" --// Set here command for rules
netw = "!network" --// Set here command for network list

------------------------------------------------------------------------------------------------------------------------------
--// This function is fired when an operator/master enters the hub //---------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

--frmHub:RegBot(BotName)

local sec = clock()
local days = floor(sec/86400)
local hrs = floor((sec-(days*86400))/3600)
local min = floor((sec-(days*86400)-(hrs*3600))/60)
sec = floor(sec-(days*86400)-(hrs*3600)-(min*60))


ops = 0
vips = 0
users = 0
USER = {}
VIPS = {}
OPS = {}

function NewUserConnected(user)
if user.iProfile == 2 then
CountVips(user)
if user.iProfile == -1 then
CountUser(user)
end
Message(user)
end
end

function OpConnected(user)
CountOps(user)
Message(user)
end

function DataArrival(user, data)
if user.bOperator then
CountOps(user)
elseif user.iProfile == 2 then
CountVips(user)
elseif user.iProfile == -1 then
CountUser(user)
end
end

function CountOps(user)
if OPS[user.sName] == nil then
OPS[user.sName]=1
ops = ops + 1
end
end

function CountVips(user)
if VIPS[user.sName] == nil then
VIPS[user.sName]=1
vips = vips + 1
end
end

function CountUser(user)
if USER[user.sName] == nil then
USER[user.sName]=1
users = users + 1
end
end

function UserDisconnected(user)
if user.iProfile == 2 then
if VIPS[user.sName] then
VIPS[user.sName]=nil
vips = vips - 1
elseif user.iProfile == -1 then
if USER[user.sName] then
USER[user.sName]=nil
users = users - 1
end
end
end

function OpDisconnected(user)
if OPS[user.sName] then
OPS[user.sName]=nil
ops = ops - 1
end
end

function Message(user)
local s,e,share = strfind(user.sMyInfoString, "$(%d+)%$")
share = format("%0.2f", ( share / (1024*1024*1024)))
local hubshare = format("%0.2f", ( frmHub:GetCurrentShareAmount() / (1024*1024*1024)))
user:SendData(BotName,"")
user:SendData("?=======================================================================?")
user:SendData(" ?Welcome "..user.sName.." to "..frmHub:GetHubName().."")
user:SendData(" ?Your IP: "..user.sIP)
user:SendData(" ?Your Status in this Hub: "..(GetProfileName(user.iProfile) or "Not registerd"))
user:SendData(" ?Actual Share in the Hub: "..hubshare.." GB")
user:SendData(" ?There are: "..ops.." OPs . "..vips.." VIPs . "..users.." Unregged Users online")
user:SendData(" ?Here is now "..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users connected")
user:SendData(" ?Hubs description is set to: "..frmHub:GetHubDescr().."")
user:SendData(" ?Redirect address is set to: "..frmHub:GetRedirectAddress().."")
user:SendData(" ?Hub register address is set to: "..frmHub:GetRegServer().."")
user:SendData(" ?Hubs minshare is set to: "..frmHub:GetMinShare()/(1024).." GB")
user:SendData("?=======================================================================?")
user:SendData(BotName,"::Uptime = "..days.." days, "..hrs.." hrs. "..min.." min. and "..sec.." sec. = ?")
    (BotName,"?======"..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." Users Connected======")
   return 1
   end
user:SendData(BotName,"")
end
end
-------------------------------------------------------------------------------------------------------------------------------
--// This function is fired when an user enters the hub //---------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------------
function NewUserConnected(curUser)
local hubshare = format("%0.2f", ( frmHub:GetCurrentShareAmount() / (1024*1024*1024)))
curUser:SendData(BotName,"")
curUser:SendData("?=======================================================================?")
curUser:SendData(" ?Welcome "..curUser.sName.." to "..frmHub:GetHubName().."")
curUser:SendData(" ?Your IP is: "..curUser.sIP.."")
curUser:SendData(" ?Here is now "..ops.." Operator's connected to help you")
curUser:SendData(" ?Here is now "..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users connected")
curUser:SendData(" ?Hubs current share is "..hubshare.." GB")
curUser:SendData(" ?Remember to read hub rules by typing "..rules.." in main chat")
curUser:SendData(" ?And other network hubs you can find by typing "..netw.." in main chat")
curUser:SendData("?=======================================================================?")
curuser:SendData(BotName,"::Uptime = "..days.." days, "..hrs.." hrs. "..min.." min. and "..sec.." sec. = ?")
      BotName,"?======"..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." Users Connected======")
   return 1
   end
curUser:SendData(BotName,"")
end

-----------------------------------------------------------------------

lynyrd · 26 February, 2004, 16:52:13

exscuse a noob but shouldnt it be "days." instead of "days," ?

user:SendData(BotName,"::Uptime = "..days.." days. "..hrs.." hrs. "..min.." min. and "..sec.." sec. = ?")

as said im a noob don't hit me if im wrong ;)

[NL]trucker · 26 February, 2004, 17:15:06

lynyrd

nope this works fine with another script.

TiMeTrAVelleR · 26 February, 2004, 17:19:28

will ask cyber he is the one who made it you know him also he is master in my hub

TiMe

nEgativE · 03 March, 2004, 03:27:59

Hi there, what could B wrong with that uptime ?

(Syntax error: cannot access a variable in outer scope;
last token read: `days' at line 116 in file)

nErBoS · 03 March, 2004, 03:36:04

Hi,

in this..

local sec = clock() 
local days = floor(sec/86400) 
local hrs = floor((sec-(days*86400))/3600) 
local min = floor((sec-(days*86400)-(hrs*3600))/60)

remove the local...

sec = clock() 
days = floor(sec/86400) 
hrs = floor((sec-(days*86400))/3600) 
min = floor((sec-(days*86400)-(hrs*3600))/60)

I think that should do the trick.

Best regards, nErBoS

[NL]trucker · 03 March, 2004, 12:11:05

thnx Nerbos

but it seems that i cannot run a hubinfo script; if i have cleared one error i get another one (:-

for now i,m leaving this till i have enough courage to get on with it again.

acethecase · 03 March, 2004, 13:07:47

hey m8ts--
Its a great intro/info script, and u all are great scripters..
Im sure u can make it work properly werry soon,
I would like to use this one

Keep up the good work!!

nErBoS · 03 March, 2004, 14:39:56

Hi,

What are the other errors ?? Maybe i can help.

Best regards, nErBoS

Optimus · 03 March, 2004, 16:02:10

I have -Updated- this 1 a little bit for Cyber... You can all start working from there!

Here Ya go ... :D

-----------------------------------------------------------------------------------------------------------------------------
---// EntryBot 0.3 By Cyberbob //---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

BotName = "????????M?C???????" --// Set here your bot name

kb = 1024
mb = kb*kb
gb = kb*kb*kb

function NewUserConnected(user)
	Message(user)
end

function OpConnected(user)
	Message(user)
end

function UserDisconnected(user)
end

function OpDisconnected(user)
end

--// Profile Counter
function ProfileCounter(profile)
	local table, count = GetUsersByProfile(profile), 0
	for i, User in table do 
		if GetItemByName(User) then
			count = count + 1
		end
	end
	return count
end


function Message(user)
	local disp = ""
	doGetProfile =  GetProfileName(user.iProfile) or "Not registerd"
	local s,e,share = strfind(user.sMyInfoString, "$(%d+)%$") 
	if share == nil then
	return 1
	end
	minshare = format("%0.2f", tonumber(share)/gb)
	hubshare = format("%0.2f", frmHub:GetCurrentShareAmount()/(1024)/(1024)/(1024))
	border1 = "<>=========================H=U=B==I=N=F=O==============================="
	border2 = "<>======================================================================"
	disp = "\r\n\r\n"..border1.."\r\n"
	disp = disp.."	?Welcome:		"..user.sName.."\r\n"
	disp = disp.."	?To this fine place Called:	"..frmHub:GetHubName().."\r\n"
	disp = disp.."	?Your IP:			"..user.sIP.."\r\n"
	disp = disp.."	?Your Share:		"..minshare.." GB\r\n"
	disp = disp.."	?Your Status in this Hub:	"..doGetProfile.."\r\n"
	disp = disp.."	?Actual Share in the Hub:	"..hubshare.." GB\r\n"
	disp = disp.."	?There are: 		"..ProfileCounter("Master").." [MASTER] - "..ProfileCounter("Operator").." [OPERATOR] - "..ProfileCounter("Vip").." [VIP] online\r\n"
	disp = disp.."	?There are now:		"..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users Online\r\n"
	disp = disp.."	?Hub description is:		"..frmHub:GetHubDescr().."\r\n"
	disp = disp.."	?Hub register address is:	"..frmHub:GetRegServer().."\r\n"
	disp = disp.."	?Hub minshare is:		"..frmHub:GetMinShare()/(1024).." GB\r\n"
	disp = disp.."	?Redirect address is:	"..frmHub:GetRedirectAddress().."\r\n"..border2.."\r\n"

	user:SendData(BotName, disp)
end

[NL]trucker · 03 March, 2004, 16:14:21

Optimus

i have troublles getting the minshare to work as i use robocop 6.0d

is there a way that the script take settings from your bot?

this is what i get in main now
- - - - - - - - - - - - - - - - - -

[16:08:53]

- <>=========================H=U=B==I=N=F=O===============================
   ?Welcome:      pappa
   ?To this fine place Called:   ???? [NL] ????? ]-[?? [NL]
   ?Your IP:         xxx.xxx.xxx.xxx
   ?Your Share:      56.50 GB
   ?Your Status in this Hub:   Master
   ?Actual Share in the Hub:   2016.35 GB
   ?There are:       3 [MASTER] - 3 [OPERATOR] - 11 [VIP] online
   ?There are now:      61 of 200 users connected
   ?Hub description is:      ?????? Magmar ?????? Network Dutch Division A Funny Hub To Be !! Dutch Located :) Dus NLers Welkom !!
   ?Hub register address is:   dreamland.gotdns.org;vandel405.dynip.com;dcreg.mine.nu;warez.1stleg.com:
   ?Hub minshare is:      0 GB
   ?Redirect address is:   wizzcat.no-ip.com
- <>======================================================================

*??G??* · 03 March, 2004, 19:45:43

hmmm....tried it and I too get the Hub minshare is 0 GB....could it be because my minshare is set to 500 MB

Optimus · 03 March, 2004, 21:26:30

-----------------------------------------------------------------------------------------------------------------------------
---// EntryBot 0.3 By Cyberbob //---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

BotName = "????????M?C???????" --// Set here your bot name

kb = 1024
mb = kb*kb
gb = kb*kb*kb

function NewUserConnected(user)
	Message(user)
end

function OpConnected(user)
	Message(user)
end

function UserDisconnected(user)
end

function OpDisconnected(user)
end

--// Profile Counter
function ProfileCounter(profile)
	local table, count = GetUsersByProfile(profile), 0
	for i, User in table do 
		if GetItemByName(User) then
			count = count + 1
		end
	end
	return count
end


function Message(user)
	local disp = ""
	doGetProfile =  GetProfileName(user.iProfile) or "Not registerd"
	local s,e,share = strfind(user.sMyInfoString, "$(%d+)%$") 
	if share == nil then
	return 1
	end
	minshare = format("%0.2f", tonumber(share)/gb)
	hubshare = format("%0.2f", frmHub:GetCurrentShareAmount()/(1024)/(1024)/(1024))
	border1 = "<>=========================H=U=B==I=N=F=O==============================="
	border2 = "<>======================================================================"
	disp = "\r\n\r\n"..border1.."\r\n"
	disp = disp.."	?Welcome:		"..user.sName.."\r\n"
	disp = disp.."	?To this fine place Called:	"..frmHub:GetHubName().."\r\n"
	disp = disp.."	?Your IP:			"..user.sIP.."\r\n"
	disp = disp.."	?Your Share:		"..minshare.." GB\r\n"
	disp = disp.."	?Your Status in this Hub:	"..doGetProfile.."\r\n"
	disp = disp.."	?Actual Share in the Hub:	"..hubshare.." GB\r\n"
	disp = disp.."	?There are: 		"..ProfileCounter("Master").." [MASTER] - "..ProfileCounter("Operator").." [OPERATOR] - "..ProfileCounter("Vip").." [VIP] online\r\n"
	disp = disp.."	?There are now:		"..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users Online\r\n"
	disp = disp.."	?Hub description is:		"..frmHub:GetHubDescr().."\r\n"
	disp = disp.."	?Hub register address is:	"..frmHub:GetRegServer().."\r\n"
	disp = disp.."	?Hub minshare is:		"..frmHub:GetMinShare()/(1024).." GB\r\n"
	disp = disp.."	?Redirect address is:	"..frmHub:GetRedirectAddress().."\r\n"..border2.."\r\n"

	user:SendData(BotName, disp)
end

*??G??* · 03 March, 2004, 22:03:35

ah.....i figured out my prob.....i had the minshare set in robocop but not ptokax....i set it in ptokax and it works great now.....thnx Optimus

[NL]trucker · 03 March, 2004, 23:30:22

Optimus

this is your infobot in main
---------------------------------------------------------------
[23:25:59]

- <>=========================H=U=B==I=N=F=O===============================
   ?Welcome:      pappa
   ?To this fine place Called:   ???? [NL] ????? ]-[?? [NL]
   ?Your IP:         217.121.195.6
   ?Your Share:      56.50 GB
   ?Your Status in this Hub:   Master
   ?Actual Share in the Hub:   1326.55 GB
   ?There are:       4 [MASTER] - 3 [OPERATOR] - 9 [VIP] online
   ?There are now:      50 of 200 users Online
   ?Hub description is:      ?????? Magmar ?????? Network Dutch Division A Funny Hub To Be !! Dutch Located :) Dus NLers Welkom !!
   ?Hub register address is:   dreamland.gotdns.org;vandel405.dynip.com;dcreg.mine.nu;warez.1stleg.com:
   ?Hub minshare is:      0 GB
   ?Redirect address is:   wizzcat.no-ip.com
- <>======================================================================

still no go at the min share.

but could you make it like this?

----------------------------------------------------------------------

[23:05:16]

Welcome pappa To ???? [NL] ????? ]-[?? [NL]
?-=-=-=-=-=-=-=-=-? I N F O R M A T I O N ?-=-=-=-=-=-=-=-=-?

Information about you :
Your IP ? xxx.xxx.xxx.
Your Client ? DC++
Version ? 0.261
Mode ? Active
Your share ? 56.50

You are in 0 Hubs as a normal user
You are in 13 ubs as a regged user =12 hubs
You are in 17 Hubs as an OP user = 13 hubs

Hub Settings :
Minimum share ? 0 <- still no go
Minimum slots ? 2
Maximum slots ? 20
Maximum hubs ? 20
Maximum users ? 200

Hub Statistic :
Uptime ? 0 Days 4 Hours and 44 Minutes
Amount of users now ? 51
Total share amount ? 1.50 TB
Online OP's ? 1 = 4
Online VIP's ? 0 = tomuch ..lol
Online Reg's ? 0 = tomuch

?-=-=-=-=-=-=-=-=-? I N F O R M A T I O N ?-=-=-=-=-=-=-=-=-?
[23:05:16] Welcome back pappa

this is made by kepp in this thread
http://board.univ-angers.fr/thread.php?threadid=1435&boardid=13&styleid=1&sid=579bd8b13817711a69f077accfb1883c&page=4#70

perhaps a co operative joint venture??

we still have a few errors to solve in that one as you can see.

kepp · 03 March, 2004, 23:45:09

The minshare is related to PtokaX, not the script itself...
if you have 0 gb in PtokaX settings and if it's disabled, then the result of that will be 0...
so, if you are letting another script taking care of the minshare then don't forget to change the number to your hub minimum share in ptokax and keep it disabled.

[NL]trucker · 03 March, 2004, 23:54:58

OPtimus

stack traceback:
1: function `strfind' [C]
2: function `Message' at line 40 [file `D:\==PTOTAX==\trucker\scripts\optimus.lua']
3: function `NewUserConnected' at line 12 [file `D:\==PTOTAX==\trucker\scripts\optimus.lua']

and it resulted in a flood of donkeys whn i removed the script and forgot to do a restartscripts in pkotax

kepp · 04 March, 2004, 00:17:25

-----------------------------------------------------------------------------------------------------------------------------
---// EntryBot 0.3 By Cyberbob //---------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------------------------------------------

BotName = "????????M?C???????" --// Set here your bot name

kb = 1024
mb = kb*kb
gb = kb*kb*kb

function NewUserConnected(user)
	Message(user)
end

function OpConnected(user)
	Message(user)
end

function UserDisconnected(user)
end

function OpDisconnected(user)
end

--// Profile Counter
function ProfileCounter(profile)
	local table, count = GetUsersByProfile(profile), 0
	for i, User in table do 
		if GetItemByName(User) then
			count = count + 1
		end
	end
	return count
end


function Message(user)
	local disp = ""
	doGetProfile =  GetProfileName(user.iProfile) or "Not registerd"
	local s,e,share = strfind(user.sMyInfoString, "%$%s*(%d+)%$") 
	if share == nil then
	return 1
	end
	minshare = format("%0.2f", tonumber(share)/gb)
	hubshare = format("%0.2f", frmHub:GetCurrentShareAmount()/(1024)/(1024)/(1024))
	border1 = "<>=========================H=U=B==I=N=F=O==============================="
	border2 = "<>======================================================================"
	disp = "\r\n\r\n"..border1.."\r\n"
	disp = disp.."	?Welcome:		"..user.sName.."\r\n"
	disp = disp.."	?To this fine place Called:	"..frmHub:GetHubName().."\r\n"
	disp = disp.."	?Your IP:			"..user.sIP.."\r\n"
	disp = disp.."	?Your Share:		"..minshare.." GB\r\n"
	disp = disp.."	?Your Status in this Hub:	"..doGetProfile.."\r\n"
	disp = disp.."	?Actual Share in the Hub:	"..hubshare.." GB\r\n"
	disp = disp.."	?There are: 		"..ProfileCounter("Master").." [MASTER] - "..ProfileCounter("Operator").." [OPERATOR] - "..ProfileCounter("Vip").." [VIP] online\r\n"
	disp = disp.."	?There are now:		"..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users Online\r\n"
	disp = disp.."	?Hub description is:		"..frmHub:GetHubDescr().."\r\n"
	disp = disp.."	?Hub register address is:	"..frmHub:GetRegServer().."\r\n"
	disp = disp.."	?Hub minshare is:		"..frmHub:GetMinShare()/(1024).." GB\r\n"
	disp = disp.."	?Redirect address is:	"..frmHub:GetRedirectAddress().."\r\n"..border2.."\r\n"

	user:SendData(BotName, disp)
end

PtokaX forum

News:

total info script :D

[NL]trucker

[NL]Pur

[NL]trucker

[NL]Pur

TiMeTrAVelleR

[NL]trucker

[NL]trucker

[NL]trucker

lynyrd

[NL]trucker

TiMeTrAVelleR

nEgativE

nErBoS

[NL]trucker

acethecase

nErBoS

Optimus

[NL]trucker

??G??

Optimus

??G??

[NL]trucker

kepp

[NL]trucker

kepp