Melhorias
parent
462dfb2381
commit
a0febf9684
4
init.lua
4
init.lua
|
@ -27,12 +27,16 @@ notificar("Carregando scripts...")
|
|||
-- Criação do banco de dados
|
||||
xpro.bd = dofile(modpath.."/lib/memor.lua")
|
||||
|
||||
-- Plucar itens "PLUS"
|
||||
xpro.tror = dofile(modpath.."/lib/tror.lua")
|
||||
|
||||
-- Variaveis personalizaveis
|
||||
xpro.var = {}
|
||||
|
||||
-- API
|
||||
dofile(modpath.."/api.lua")
|
||||
dofile(modpath.."/ligas.lua")
|
||||
dofile(modpath.."/shop.lua")
|
||||
dofile(modpath.."/sfinv.lua")
|
||||
dofile(modpath.."/progresso.lua")
|
||||
dofile(modpath.."/ranking.lua")
|
||||
|
|
|
@ -0,0 +1,150 @@
|
|||
--[[
|
||||
Lib Tror para Minetest
|
||||
Copyright (C) 2017 BrunoMine (https://github.com/BrunoMine)
|
||||
|
||||
Recebeste uma cópia da GNU Lesser General
|
||||
Public License junto com esse software,
|
||||
se não, veja em <http://www.gnu.org/licenses/>.
|
||||
|
||||
Operações de troca de itens
|
||||
]]
|
||||
|
||||
local tror = {}
|
||||
|
||||
-- Verificar viabilidade de uma troca
|
||||
tror.verificar = function(player, item_rem, item_add)
|
||||
|
||||
if not player or not item_add or not item_rem then
|
||||
minetest.log("error", "[Tror] Faltou dados em (em tror.verificar)")
|
||||
return false
|
||||
end
|
||||
|
||||
local inv = player:get_inventory()
|
||||
|
||||
-- Verificar jogador
|
||||
if not inv:contains_item("main", item_rem) then
|
||||
return 1 -- Jogador nao pode pagar
|
||||
elseif not inv:room_for_item("main", item_add) then
|
||||
return 2 -- Jogador com inventario lotado
|
||||
end
|
||||
|
||||
return true
|
||||
end
|
||||
|
||||
-- Realizar uma troca entre com um jogador
|
||||
tror.trocar = function(player, item_rem, item_add, msg)
|
||||
|
||||
if not player or not item_add or not item_rem then
|
||||
minetest.log("error", "[Tror] Faltou dados em (em tror.trocar)")
|
||||
return false
|
||||
end
|
||||
|
||||
|
||||
local v = tror.verificar(player, item_rem, item_add)
|
||||
if v ~= true then
|
||||
if v == 1 then
|
||||
if msg and msg.ins then
|
||||
minetest.chat_send_player(player:get_player_name(), msg.ins)
|
||||
end
|
||||
return 1
|
||||
elseif v == 2 then
|
||||
if msg and msg.lot then
|
||||
minetest.chat_send_player(player:get_player_name(), msg.lot)
|
||||
end
|
||||
return 2
|
||||
else
|
||||
minetest.log("error", "[Tror] Resultado inesperado em tror.trocar (v = "..dump(v)..")")
|
||||
return false
|
||||
end
|
||||
end
|
||||
|
||||
local inv = player:get_inventory()
|
||||
|
||||
-- Retirar itens do inventario
|
||||
local i = string.split(item_rem, " ")
|
||||
local n = i[2] or 1
|
||||
i = i[1]
|
||||
for r=1, tonumber(n) do -- 1 eh o tanto que quero tirar
|
||||
inv:remove_item("main", i) -- tira 1 por vez
|
||||
end
|
||||
|
||||
inv:add_item("main", item_add)
|
||||
|
||||
|
||||
if msg and msg.ok then
|
||||
minetest.chat_send_player(player:get_player_name(), msg.ok)
|
||||
end
|
||||
return true
|
||||
|
||||
end
|
||||
|
||||
-- Realizar uma troca com um jogador
|
||||
--[[
|
||||
Retorna false caso o jogador nao tenha os itens requisitados
|
||||
e dropa no local todos os itens que não couberem no inventario
|
||||
]]
|
||||
tror.trocar_plus = function(player, item_rem, item_add)
|
||||
|
||||
if not player then
|
||||
minetest.log("error", "[Tror] Faltou player (em tror.trocar_plus)")
|
||||
return false
|
||||
end
|
||||
|
||||
if item_rem and not item_rem[1] then
|
||||
minetest.log("error", "[Tror] argumento item_rem invalido (em tror.trocar_plus)")
|
||||
return false
|
||||
end
|
||||
|
||||
if item_add and not item_add[1] then
|
||||
minetest.log("error", "[Tror] argumento item_add invalido (em tror.trocar_plus)")
|
||||
return false
|
||||
end
|
||||
|
||||
local pos = player:getpos()
|
||||
|
||||
local inv = player:get_inventory()
|
||||
|
||||
-- Verificar se o jogador possui os itens requisitados
|
||||
local possui = true
|
||||
if item_rem ~= nil then
|
||||
for _,item in ipairs(item_rem) do
|
||||
if not inv:contains_item("main", item) then
|
||||
possui = false
|
||||
break
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- Retorna false por jogador não ter os itens requisitados
|
||||
if possui == false then
|
||||
return false
|
||||
end
|
||||
|
||||
-- Retira itens do jogador
|
||||
if item_rem ~= nil then
|
||||
for _,item in ipairs(item_rem) do
|
||||
local i = string.split(item, " ")
|
||||
local n = i[2] or 1
|
||||
i = i[1]
|
||||
for r=1, tonumber(n) do -- 1 eh o tanto que quero tirar
|
||||
inv:remove_item("main", i) -- tira 1 por vez
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
-- Transfere todos os itens ao jogador (e dropa os que nao couberem no inventario)
|
||||
local dropou = false
|
||||
for _,item in ipairs(item_add) do
|
||||
if inv:room_for_item("main", item) then
|
||||
inv:add_item("main", item)
|
||||
else
|
||||
dropou = true
|
||||
minetest.env:add_item({x = pos.x + math.random() * 2 - 1, y = pos.y+1, z = pos.z + math.random() * 2 - 1}, item)
|
||||
end
|
||||
end
|
||||
|
||||
return true
|
||||
|
||||
end
|
||||
|
||||
return tror
|
|
@ -22,6 +22,8 @@ sfinv.register_page("xpro:info", {
|
|||
|
||||
local my_xp = xpro.get_player_xp(name)
|
||||
local my_lvl = xpro.get_player_lvl(name)
|
||||
local xp_gasto = player:get_attribute("xpro_xp_gasto")
|
||||
local xp_disp = my_xp-xp_gasto
|
||||
|
||||
-- Calcula progresso da barra
|
||||
local progresso = 1
|
||||
|
@ -33,6 +35,8 @@ sfinv.register_page("xpro:info", {
|
|||
|
||||
local formspec = "label[0,0;Nivel "..my_lvl.."]"
|
||||
.."label[0,0.5;Pontos: "..my_xp.."]"
|
||||
.."label[0,1;Cash XP: "..xp_disp.."]"
|
||||
.."button[0,1.5;3,1;shop;Loja de Premios]"
|
||||
.."button[0,2.5;3,1;ranking;Ranking Global]"
|
||||
|
||||
-- Liga
|
||||
|
@ -49,6 +53,8 @@ sfinv.register_page("xpro:info", {
|
|||
on_player_receive_fields = function(self, player, context, fields)
|
||||
if fields.ranking then
|
||||
minetest.show_formspec(player:get_player_name(), "xpro:ranking", xpro.ranking_formspec)
|
||||
elseif fields.shop then
|
||||
xpro.acessar_shop(player:get_player_name())
|
||||
end
|
||||
end,
|
||||
|
||||
|
|
101
shop.lua
101
shop.lua
|
@ -11,10 +11,111 @@
|
|||
|
||||
local S = xpro.S
|
||||
|
||||
-- Assegurar dados
|
||||
minetest.register_on_joinplayer(function(player)
|
||||
if not player:get_attribute("xpro_xp_gasto") then
|
||||
player:set_attribute("xpro_xp_gasto", 0)
|
||||
end
|
||||
end)
|
||||
|
||||
|
||||
-- Controle de acessos
|
||||
local acessos = {}
|
||||
minetest.register_on_joinplayer(function(player)
|
||||
acessos[player:get_player_name()] = {}
|
||||
end)
|
||||
minetest.register_on_leaveplayer(function(player)
|
||||
acessos[player:get_player_name()] = nil
|
||||
end)
|
||||
|
||||
|
||||
-- Itens a venda
|
||||
xpro.premios = {
|
||||
{name="Terra", item="default:dirt", qtd=20, custo=5000},
|
||||
{name="Pedregulho", item="default:cobble", qtd=25, custo=50},
|
||||
}
|
||||
|
||||
|
||||
-- Lista de itens do menu do shop em formato de string
|
||||
local string_menu_shop = ""
|
||||
local atualizar_string_menu_shop = function()
|
||||
for _,d in pairs(xpro.premios) do
|
||||
if string_menu_shop ~= "" then string_menu_shop = string_menu_shop .. "," end
|
||||
string_menu_shop = string_menu_shop .. d.name
|
||||
end
|
||||
end
|
||||
atualizar_string_menu_shop()
|
||||
|
||||
-- Acessar shop
|
||||
xpro.acessar_shop = function(name, aviso)
|
||||
|
||||
local player = minetest.get_player_by_name(name)
|
||||
local acesso = acessos[name]
|
||||
local xp_gasto = player:get_attribute("xpro_xp_gasto")
|
||||
local my_xp = xpro.get_player_xp(name)
|
||||
local xp_disp = my_xp-xp_gasto
|
||||
|
||||
|
||||
local formspec = "size[8,5]"
|
||||
..default.gui_bg
|
||||
..default.gui_bg_img
|
||||
.."label[0,0;Loja de Itens por XP]"
|
||||
.."label[0,0.5;Cash XP: "..xp_disp.."]"
|
||||
.."textlist[3.2,0;4.5,5;menu;"..string_menu_shop.."]"
|
||||
|
||||
if aviso then
|
||||
formspec = formspec .. "textarea[0.36,1.1;3.2,1;;"..aviso..";]"
|
||||
end
|
||||
|
||||
-- Nenhum item escolhido
|
||||
if acesso.escolha == nil then
|
||||
formspec = formspec .. "label[0,2;Escolha um Item]"
|
||||
|
||||
-- Exibir item escolhido
|
||||
else
|
||||
local escolha = xpro.premios[acesso.escolha]
|
||||
formspec = formspec .. "label[0,2;Custo: "..escolha.custo.."XP]"
|
||||
.."label[0,2.5;Unidades: "..escolha.qtd.."]"
|
||||
.."item_image_button[0,3;2.1,2.1;"..escolha.item..";comprar;Comprar]"
|
||||
end
|
||||
|
||||
minetest.show_formspec(name, "xpro:shop", formspec)
|
||||
end
|
||||
|
||||
-- Receber Botoes
|
||||
minetest.register_on_player_receive_fields(function(player, formname, fields)
|
||||
if formname == "xpro:shop" then
|
||||
|
||||
-- Escolher um item
|
||||
if fields.menu then
|
||||
local name = player:get_player_name()
|
||||
local n = string.split(fields.menu, ":")
|
||||
acessos[name].escolha = tonumber(n[2]) or 1
|
||||
|
||||
xpro.acessar_shop(name)
|
||||
|
||||
-- Comprar
|
||||
elseif fields.comprar then
|
||||
local name = player:get_player_name()
|
||||
local acesso = acessos[name]
|
||||
local escolha = xpro.premios[acesso.escolha]
|
||||
local my_xp = xpro.get_player_xp(name)
|
||||
local xp_gasto = player:get_attribute("xpro_xp_gasto")
|
||||
local xp_disp = my_xp-xp_gasto
|
||||
|
||||
-- Tenta trocar
|
||||
if xp_disp < escolha.custo then
|
||||
xpro.acessar_shop(name, "Cash XP insuficiente")
|
||||
else
|
||||
if xpro.tror.trocar_plus(player, nil, {escolha.item.." "..escolha.qtd}) == false then
|
||||
xpro.acessar_shop(name, "Inventario lotado")
|
||||
else
|
||||
player:set_attribute("xpro_xp_gasto", (xp_gasto+escolha.custo))
|
||||
xpro.acessar_shop(name, "Adiquirido")
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end)
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue