Eai pessoal boa tarde, bom eu não sei se ja contem um tópico com este mesmo assunto sinceramente procurei e não encontrei mais vamos la vou lhes explicar oque eu quero.

Bom meu servidor tem um shop no site, que se compra os itens vip com Premium Points.

Minha intenção é fazer com que : Se o player tem 10 pontos no site e quer vender por um item dentro  do servidor ... como ele poderia passar estes 10 pontos para a conta de outra pessoa?

Bom, a intenção é a seguinte, criar um pergaminho ou qualquer outro item que ao der trade neste item ou pergaminho o cara que receber o pergaminho e tal, assim que ele receber, os 10 pontos forem retirados da conta que ja continha, e ser creditado 10 pontos na conta da pessoa que comprou entenderam?

Não sei se consegui ser muito claro no meu objetivo, mais se vocês souberem como fazer isso poderiam me ajudar por favor ?

@pyetrosj já contém, vários, precisaria fazer uma alteração na source, para quando o player realizar o comando, vamos supor que seja !tradepoints 10, o script irá executar a função criada diretamente na source, fazendo com que gere um pergaminho, papel ou sla, no trade do player target, com a quantidade de pontos que o player irá dizer.

 

Não diria que seja algo complexo, mais sim seria algo mediano, daria um pouco de dor de cabeça. hahaha! 

 

http://www.tibiaking.com/forum/forums/topic/77227-script-coin-dentro-do-jogo/

 

na lib adc 

 

function getPremiumPoints(cid)
	local query = db.getResult("SELECT `premium_points` FROM `accounts` WHERE `id` = "..getPlayerAccountId(cid))
	return query:getDataInt("premium_points") <= 0 and 0 or query:getDataInt("premium_points")
end
function setPremiumPoints(cid, amount)
	return db.executeQuery("UPDATE `accounts` SET `premium_points` = "..amount.." WHERE `id` = "..getPlayerAccountId(cid))
end

 

talk

 

 

sell_points.lua

 

function onSay(cid, words, param)
	local var,points = "[Sell Point System] Este documento vale %s points para você usar no site.",getPremiumPoints(cid)
	local min,max = 5, 100
	if param == "" or not tonumber(param) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, use somente numeros.") return true
	elseif tonumber(param) < min or tonumber(param) > max then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, Minimo "..min.." e Maximo "..max.." points.") return true
	elseif points < tonumber(param) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, mas você só possui "..points.." Premium Points.") return true
	end
	local item = doPlayerAddItem(cid, 7702,1) 
	doItemSetAttribute(item, "description", var:format(tonumber(param)))
	setPremiumPoints(cid, points-tonumber(param))
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"[Sell Point System] Você recebeu um paper com "..param.." Premium Points.")
	return true
end

 

tag

 

<talkaction words="!sellpoints;/sellpoints" event="script" value="sell_points.lua"/>

 

actions

 

paper_points.lua

 

function onUse(cid, item, frompos, item2, topos)
	local var = getItemAttribute(item.uid, "description")
	if var == nil then return true end
	local x = var:match("%b[]")
	if x == "[Sell Point System]" then
		local ret = var:match("%d+")
		doPlayerSendTextMessage(cid, 22,"você recebeu "..ret.." Premium Points.")
		setPremiumPoints(cid, getPremiumPoints(cid)+ret)
		doRemoveItem(item.uid) 
	end
	return true
end

 

tag

 

<action itemid="7702" script="paper_points.lua"/>

 

 

USO E RECOMENDO, MUITO BOM

Scritp 100% do @Vodkart, só estou repassando

 

 

24 minutos atrás, Zzyzx disse:

 

na lib adc 

 

function getPremiumPoints(cid)
	local query = db.getResult("SELECT `premium_points` FROM `accounts` WHERE `id` = "..getPlayerAccountId(cid))
	return query:getDataInt("premium_points") <= 0 and 0 or query:getDataInt("premium_points")
end
function setPremiumPoints(cid, amount)
	return db.executeQuery("UPDATE `accounts` SET `premium_points` = "..amount.." WHERE `id` = "..getPlayerAccountId(cid))
end

 

talk

 

 

sell_points.lua

 

function onSay(cid, words, param)
	local var,points = "[Sell Point System] Este documento vale %s points para você usar no site.",getPremiumPoints(cid)
	local min,max = 5, 100
	if param == "" or not tonumber(param) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, use somente numeros.") return true
	elseif tonumber(param) < min or tonumber(param) > max then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, Minimo "..min.." e Maximo "..max.." points.") return true
	elseif points < tonumber(param) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Desculpe, mas você só possui "..points.." Premium Points.") return true
	end
	local item = doPlayerAddItem(cid, 7702,1) 
	doItemSetAttribute(item, "description", var:format(tonumber(param)))
	setPremiumPoints(cid, points-tonumber(param))
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"[Sell Point System] Você recebeu um paper com "..param.." Premium Points.")
	return true
end

 

tag

 

<talkaction words="!sellpoints;/sellpoints" event="script" value="sell_points.lua"/>

 

actions

 

paper_points.lua

 

function onUse(cid, item, frompos, item2, topos)
	local var = getItemAttribute(item.uid, "description")
	if var == nil then return true end
	local x = var:match("%b[]")
	if x == "[Sell Point System]" then
		local ret = var:match("%d+")
		doPlayerSendTextMessage(cid, 22,"você recebeu "..ret.." Premium Points.")
		setPremiumPoints(cid, getPremiumPoints(cid)+ret)
		doRemoveItem(item.uid) 
	end
	return true
end

 

tag

 

<action itemid="7702" script="paper_points.lua"/>

 

 

USO E RECOMENDO, MUITO BOM

Scritp 100% do @Vodkart, só estou repassando

 

 

Legal cara , mais como eu faço para estipular a quantidade de points que o pergaminho vai conter ?