talkaction Leilão System

[Skymagnum 234]

Olá, galerinha vim trazer o sistema de leilão

 

 

primeiramente vá em

 

/data/talkactions/scripts crie um arquivo chamado leilao.lua e adicione isso dentro

 

 

function onSay(cid, words, param)
config = {
acess = 4,
time = 5,
storage = {25601,25602,650213}
}
function getWinnerLeilao()
local w = tostring(getGlobalStorageValue(config.storage[1])):gsub(':', ''):explode(',')
if not getPlayerByNameWildcard(w[4]) then
local item = doCreateItemEx(w[1]-1, w[2])
local x = doItemSetAttribute(item, "description", "Item comprado em leilão por "..w[3].." gps.")
doPlayerSendMailByName(w[4], item)
else
local x = doPlayerAddItem(getPlayerByNameWildcard(w[4]), w[1], w[2])
doItemSetAttribute(x, "description", "Item comprado em leilão por "..w[3].." gps.")
end
doBroadcastMessage("O item ["..getItemNameById(w[1]).." : "..w[2].."] Foi vendido para o jogador "..w[4].." por "..w[3].." gps!")
setGlobalStorageValue(config.storage[1],-1)
setGlobalStorageValue(config.storage[2],-1)
for _, pid in pairs(getPlayersOnline()) do
setPlayerStorageValue(pid, config.storage[3], -1)
end
return db.executeQuery("DELETE FROM `player_storage` WHERE `key` = "..config.storage[3])
end
if words == "/leilao" then
if getPlayerAccess(cid) < config.acess then
doPlayerSendTextMessage(cid, 28, "Você não pode executar essa ação.") return true
end
local t = string.explode(param, ",")
if not tonumber(getGlobalStorageValue(config.storage[1])) then
doPlayerSendTextMessage(cid, 27, "Já há um leilão ativo no momento.") return true
elseif not tonumber(t[1]) or not tonumber(t[2]) or not tonumber(t[3]) then
doPlayerSendTextMessage(cid, 28, "Faltou parametro.")return true
elseif not isItemMovable(t[1]) then
doPlayerSendTextMessage(cid, 28, "Você não pode adicionar esse item no leilão.")return true
end
setGlobalStorageValue(config.storage[1], ":"..t[1]..",:"..(isItemStackable(t[1]) and t[2] or 1)..",:"..t[3]..",:"..getCreatureName(cid))
setGlobalStorageValue(config.storage[2], os.time()+ config.time*60)
doBroadcastMessage("[Leilão] O item ["..getItemNameById(t[1]).." : "..(isItemStackable(t[1]) and t[2] or 1).."] Está em leilão até "..os.date("%X ", getGlobalStorageValue(config.storage[2])).."\nLance Minimo: "..t[3].." gps.")
addEvent(getWinnerLeilao, config.time*1000*60)
elseif words == "!lance" then
if tonumber(getGlobalStorageValue(config.storage[1])) then
doPlayerSendTextMessage(cid, 27, "Não tem nenhum leilão ativo no momento.") return true
end
local s = tostring(getGlobalStorageValue(config.storage[1])):gsub(':', ''):explode(',')
if param == "lista" then
doShowTextDialog(cid,s[1], "Item: "..getItemNameById(s[1]).."\n\nQuantidade: "..s[2].."\n\nMaior lance atual: "..s[3].."\n\nJogador: "..s[4].."\n\nPrazo Final: "..os.date("%X ", getGlobalStorageValue(config.storage[2]))) return true
elseif not tonumber(param) or tonumber(param) <= 0 or tonumber(param) > 9999999 then
doPlayerSendTextMessage(cid, 28, "digite um número válido.") return true
end
local li = getPlayerStorageValue(cid, config.storage[3]) < 0 and 0 or getPlayerStorageValue(cid, config.storage[3])
local conta = (li + tonumber(param))
if conta <= tonumber(s[3]) then
doPlayerSendTextMessage(cid, 28, "você tem que dar um lance maior que "..s[3].." gps") return true
elseif not doPlayerRemoveMoney(cid, tonumber(param)) then
doPlayerSendTextMessage(cid, 28, "você não tem gps suficientes para dar um lance") return true
end
setPlayerStorageValue(cid, config.storage[3], conta)
setGlobalStorageValue(config.storage[1], ":"..s[1]..",:"..s[2]..",:"..conta..",:"..getCreatureName(cid))
doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Parabéns, agora você deu o maior lance de "..conta.." gps no item [Nome: "..getItemNameById(s[1]).."] [Count: "..s[2].."]")
end
return true
end

 

 

talkactions.xml

<talkaction words="/leilao;!lance" script="leilao.lua"/>

 

Como usar

 

GOD fala

 

/leilao item, quantidade, lançe minimo

 

player fala

!lance lançe

 

player fala

!lance lista

 

 

para ver as info do leilão

 

Créditos

Eu

Vodkart

 

 

Imagens

 

 

God usou o comando /leilao 2494,1,30000

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

O jogador Devil deu um lance 400000 gps, no caso maior lance

-----------

Comando !lance lista

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

Depois de "X" minutos quem der o maior lance leva o item.

----------

Item com sua descrição

 

 

Editado Agosto 31, 2012 por Skymagnum

[Vodkart 1515]

Para primeira versão até que ficou boa xD

 

REP +

 

espero update, próxima versão é para players

[SkyLigh 453]

Ficou ótimo skymagnum parabéns

Editado Agosto 31, 2012 por SkyLigh

[Delaks 83]

Muito bom!! Acho q vou colocar no meu SV.

 

Boas.

Editado Agosto 31, 2012 por Delaks

[RHCP 24]

Ótimo, irei colocar em meu global quando fizer o update (Faltou indentar apenas...).

Editado Agosto 31, 2012 por RHCP

[Vodkart 1515]

Ótimo, irei colocar em meu global quando fizer o update (Faltou indentar apenas...).

o xtibia quebra a indentação

[brenerlm 42]

Muito show mesmo velho REP+

[RHCP 24]

Ótimo, irei colocar em meu global quando fizer o update (Faltou indentar apenas...).

o xtibia quebra a indentação

 

Não sabia... sacanagem isso HSUAHUSHA

Srry.

[SamueLGuedes 333]

sistema legal em parabens continue assim que voçe vai longe ;]

[jhonatanp 26]

Consegue colocar para protocolo 8.0 ?

[RHCP 24]

Seria legal implementação com site.

Tipo, o site informasse o andamento do leilão...

[Skymagnum 234]

Desculpe, mais não sei mecher com gesior essas coisas etc... .

[matheusfera 2]

AI GALERA COLOQUEI NO MEU OT E FUNFO CERTINHO MAIS TIPO NAO INTENDI MT BEM A PARTE DO TEMPO DE LEILAO

 

TERIA COMO VCS COLOKAREM PRA MIN UM COM 5 MINUTOS DE DURAÇAO E 1 COM 1 DIA DE DURAÇAO ?

 

VLW

 

SHADOWNZINHO

 

EDIT ~~~~~~~~~~~~~~~~~~~

LOL EXECULTEI O COMANDO DE LEILAO E FALO QUE ERA ATE X HORAS DAVA 5 MIN PASSO 1-2-3 HORAS E NADA DE FINALIZAR O LEILAO

 

EXISTE ALGUM COMANDO PRA FINALIZA LEILAO ?

Editado Outubro 18, 2012 por ADMTeuzinho

[Rasinsk 2]

Legal, adorei, parabéns pelo seu trabalho

[Lendreo 28]

Legal, adorei, parabéns pelo seu trabalho

 

Seu comentário é considerado como flood, reportado.