[Gesior acc. maker][TFS 0.3]Powergamers and online time stats

LordXavy · May 20, 2009

#1060 - Duplicate column name 'exphist_lastexp'

I have this error ;/ ^^^^^^^^^^

NilssoN · May 20, 2009

reuploaded

pro-stats.zip

LordXavy · May 20, 2009

Yea it working on tfs 0.2.1 ;]

Dzanar2 · May 21, 2009

Work on 0.3.4?

Khanio · May 22, 2009

Gesior.pl said:

If you use login.lua with my shop script..
In place of:

PHP:

	if(InitShopComunication == 0) then
		local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, {})
		InitShopComunication = eventServ
	end

Put:

PHP:

	if(InitShopComunication == 0) then
		local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, {})
		local historyPage = addEvent(historyPage, 60000, {})
		InitShopComunication = eventServ
	end

And before:

PHP:

function sql_communication(parameters)
	dofile("./config.lua")
...

Add:

PHP:

function historyPage(parameters)
    local historyPage = addEvent(historyPage, 60000, {})
    if (tonumber(os.date("%d")) ~= getGlobalStorageValue(23456)) then
        setGlobalStorageValue(23456, (tonumber(os.date("%d"))))
        db.executeQuery("UPDATE `players` SET `onlinetime7`=players.onlinetime6, `onlinetime6`=players.onlinetime5, `onlinetime5`=players.onlinetime4, `onlinetime4`=players.onlinetime3, `onlinetime3`=players.onlinetime2, `onlinetime2`=players.onlinetime1, `onlinetime1`=players.onlinetimetoday, `onlinetimetoday`=0;")
        db.executeQuery("UPDATE `players` SET `exphist7`=players.exphist6, `exphist6`=players.exphist5, `exphist5`=players.exphist4, `exphist4`=players.exphist3, `exphist3`=players.exphist2, `exphist2`=players.exphist1, `exphist1`=players.experience-players.exphist_lastexp, `exphist_lastexp`=players.experience;")
    end
    db.executeQuery("UPDATE `players` SET `onlinetimetoday`=players.onlinetimetoday+60, `onlinetimeall`=players.onlinetimeall+60 WHERE `online` = 1;")
end

@Yokozuna
You can't. You must actualize your server.

Thanks alot gesior

zer0 · Jun 23, 2009

D: don't work in 0.3.4

i need it for loleslav template :/
Fatal error: Call to a member function query() on a non-object in C:\xampp\htdocs\onlinetime.php on line 20
HELP!

Yony · Jun 24, 2009

Yony said:
There is a way to make the graphs in the char profile -> tables? if so, tell me how

guys?

Lejonkungen · Jun 25, 2009

Nice Gesior

!

Gonska · Jun 25, 2009

Very Nice Gesior Thanks i need this

Elox · Jun 25, 2009

Does anyone know how to make this work for TFS 0.3.4?

drax skylon · Jun 26, 2009

hey gesior!

can you post your login.lua with this script and with your Svarground Arena?

Thank you very much!

Cya

luki02006 · Jun 26, 2009

NICE! ,it works

wlj · Jun 26, 2009

Fatal error: Uncaught exception 'PDOException' with message 'SQLSTATE[3D000]: Invalid catalog name: 1046 No database selected' in C:\xampp\htdocs\pot\OTS_Account.php:229 Stack trace: #0 C:\xampp\htdocs\pot\OTS_Account.php(229): PDO->query('SELECT `id`, `n...') #1 C:\xampp\htdocs\index.php(27): OTS_Account->load(1) #2 {main} thrown in C:\xampp\htdocs\pot\OTS_Account.php on line 229

HELP!!!!!!!!!!!!!!!!!

furstwin · Jun 27, 2009

Broken download link ;_;

Agraeln · Jun 29, 2009

Lol, wtf read some posts on next pages, no only 1. There is new links and how to make this on tfs 0.3.4

obi · Jul 1, 2009

shop dont work on 0.2.3 with gesiors shop (error) please, fix that!

Wiw3K · Jul 5, 2009

Lua:

Fatal error: Call to a member function query() on a non-object in D:\xampp\htdocs\exphist.php on line 21

Lua:

Fatal error: Call to a member function query() on a non-object in D:\xampp\htdocs\onlinetime.php on line 20

Using Gesior ACC 0.3.4

Limannen · Jul 5, 2009

How should the login look like when I both use power gaming system AND shop...I know I've read it her somewhere.

So if anyone could post it.

Thanks
/Limannen

Limannen · Jul 5, 2009

Something like this ?

Code:

-- ### CONFIG ###
-- message send to player by script "type" (types you can check in "global.lua")
SHOP_MSG_TYPE = 19
-- time (in seconds) between connections to SQL database by shop script
SQL_interval = 30
-- ### END OF CONFIG ###
SQL_COMUNICATION_INTERVAL = SQL_interval * 1000
function onLogin(cid)
    if(InitHistory == 0) then
        local historyPage = addEvent(historyPage, 60000, {})
        InitHistory = historyPage
    end
    registerCreatureEvent(cid, "PlayerDeath")
    return TRUE
end

function historyPage(parameters)
    dofile("./config.lua")
    env = assert(luasql.mysql())
    con = assert(env:connect(mysqlDatabase, mysqlUser, mysqlPass, mysqlHost, mysqlPort))
    local historyPage = addEvent(historyPage, 60000, {})
    if (tonumber(os.date("%d")) ~= getGlobalStorageValue(23456)) then
        setGlobalStorageValue(23456, (tonumber(os.date("%d"))))
        assert(con:execute("UPDATE `players` SET `onlinetime7`=players.onlinetime6, `onlinetime6`=players.onlinetime5, `onlinetime5`=players.onlinetime4, `onlinetime4`=players.onlinetime3, `onlinetime3`=players.onlinetime2, `onlinetime2`=players.onlinetime1, `onlinetime1`=players.onlinetimetoday, `onlinetimetoday`=0;"))
        assert(con:execute("UPDATE `players` SET `exphist7`=players.exphist6, `exphist6`=players.exphist5, `exphist5`=players.exphist4, `exphist4`=players.exphist3, `exphist3`=players.exphist2, `exphist2`=players.exphist1, `exphist1`=players.experience-players.exphist_lastexp, `exphist_lastexp`=players.experience;"))
    end
    assert(con:execute("UPDATE `players` SET `onlinetimetoday`=players.onlinetimetoday+60, `onlinetimeall`=players.onlinetimeall+60 WHERE `online` = 1;"))
con:close()
env:close()
end
function onLogin(cid)
	if(InitShopComunication == 0) then
		local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, {})
		InitShopComunication = eventServ
	end
	registerCreatureEvent(cid, "PlayerDeath")
	return TRUE
end

function sql_communication(parameters)
	dofile("./config.lua")
	env = assert(luasql.mysql())
	con = assert(env:connect(mysqlDatabase, mysqlUser, mysqlPass, mysqlHost, mysqlPort))
	result_plr = assert(con:execute("SELECT * FROM z_ots_comunication WHERE `type` = 'login';"))
	todo = result_plr:fetch({}, "a")
	while todo do
		id = tonumber(todo.id)
		action = tostring(todo.action)
		delete = tonumber(todo.delete_it)
		cid = getPlayerByName(tostring(todo.name))
		if isPlayer(cid) == TRUE then
			local itemtogive_id = tonumber(todo.param1)
			local itemtogive_count = tonumber(todo.param2)
			local container_id = tonumber(todo.param3)
			local container_count = tonumber(todo.param4)
			local add_item_type = tostring(todo.param5)
			local add_item_name = tostring(todo.param6)
			local received_item = 0
			local full_weight = 0
			if add_item_type == 'container' then
				container_weight = getItemWeight(container_id, 1)
				if isItemRune(itemtogive_id) == TRUE then
					items_weight = container_count * getItemWeight(itemtogive_id, 1)
				else
					items_weight = container_count * getItemWeight(itemtogive_id, itemtogive_count)
				end
				full_weight = items_weight + container_weight
			else
				full_weight = getItemWeight(itemtogive_id, itemtogive_count)
				if isItemRune(itemtogive_id) == TRUE then
					full_weight = getItemWeight(itemtogive_id, 1)
				else
					full_weight = getItemWeight(itemtogive_id, itemtogive_count)
				end
			end
			local free_cap = getPlayerFreeCap(cid)
			if full_weight <= free_cap then
				if add_item_type == 'container' then
					local new_container = doCreateItemEx(container_id, 1)
					local iter = 0
					while iter ~= container_count do
						doAddContainerItem(new_container, itemtogive_id, itemtogive_count)
						iter = iter + 1
					end
					received_item = doPlayerAddItemEx(cid, new_container)
				else
					local new_item = doCreateItemEx(itemtogive_id, itemtogive_count)
					received_item = doPlayerAddItemEx(cid, new_item)
				end
				if received_item == RETURNVALUE_NOERROR then
					doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop.')
					delete = assert(con:execute("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";"))
					assert(con:execute("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";"))
				else
					doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please make place for this item in your backpack/hands and wait about '.. SQL_interval ..' seconds to get it.')
				end
			else
				doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. It weight is '.. full_weight ..' oz., you have only '.. free_cap ..' oz. free capacity. Put some items in depot and wait about '.. SQL_interval ..' seconds to get it.')
			end
		end
		todo = result_plr:fetch (todo, "a")
	end
	con:close()
	env:close()
	local eventServ = addEvent(sql_communication, SQL_COMUNICATION_INTERVAL, parameters)
end

jerryb1988 · Jul 6, 2009

Elox said:
Does anyone know how to make this work for TFS 0.3.4?

Create a new .lua file in \data\lib\ and name it whatever (i called mine newglobal.lua). Inside the file write InitHistory = 0.

Next, edit data.lua in the same folder and at the very end add:
dofile(getDataDir() .. "lib/newglobal.lua")

change newglobal.lua to whatever you named your file.

[Gesior acc. maker][TFS 0.3]Powergamers and online time stats

New Member

¯\(º o)/¯

New Member

New Member

New Member

Zer0!

New Member

New Member

New Member

http://elox.se/

o.O DrAx O.o

New Member

retierd

New Member

New Member

New Member

New Member

Member

Member

Member

Similar threads