pedido Sistema de leilão

[SkyLigh 453]

Alguém sabe se existi algum comando de leilão? O player meio que vai leiolar um item que ele tem e anuncia um broadcast no ot?

Editado Agosto 23, 2015 por Kissy

[christopher17288 13]

Não sei se ajuda, mas eu uso esse daq.. ó

 

imagens:

 

  Mostrar conteúdo oculto

http://i.imgur.com/1S1cU.png

 

isso quando o GOD executa o comando: /leilao 2494,1,30000

que no caso, "comando + id item + num de itens + quantidade de dinheiro em gps."

 

 

  Mostrar conteúdo oculto

http://i.imgur.com/40yLm.png

 

Isso quando o jogador dá um lance.. No caso, usando o comando "!lance"

 

 

  Mostrar conteúdo oculto

http://i.imgur.com/wonLc.png

 

Isso quando o jogador usa o comando "!lance lista"

 

 

  Mostrar conteúdo oculto

http://i.imgur.com/JoCnK.png

 

Dependendo do tempo, quem der o maior lance, leva o item..

 

 

  Mostrar conteúdo oculto

http://i.imgur.com/rQDjX.png

 

E a descrição fica no item...

 

Talkactions.lua

 

  Mostrar conteúdo oculto

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

 

  Mostrar conteúdo oculto

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

 

 

Como disse, o comando não foi eu quem criei, só uso.. rs'

Então...

 

Créditos:

Vodkart
Skyforever

Editado Agosto 23, 2015 por christopher17288

[Lumus 254]

@edit

 

Tu editou o post. Não é mais sobre o creaturescript.

Editado Agosto 23, 2015 por Lumus

[SkyLigh 453]

Já serve como base vlw, estou sem reputação mesmo assim vlw

 

Movido para resolvidos

[christopher17288 13]

[Mudrock 326]

  Em 23/08/2015 em 17:25, christopher17288 disse:

:D

 

 

Evite flood no fórum, comentários assim são considerados Flood!,

esse é apenas uma alerta verbal!.