BRNSystems/emeraldbank
1
0
Fork 0
forked from Mirrorlandia_minetest/emeraldbank
Code Pull Requests Activity

se puede elegir la cantidad de objetos a vender

Browse Source
This commit is contained in:
GNU Hacker 2021-12-16 18:21:56 +01:00
parent bfe60227d4
commit 3f23448468
1 changed files with 28 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
shop.lua
View File

@ -21,6 +21,8 @@
local S = core.get_translator(core.get_current_modname()) local S = core.get_translator(core.get_current_modname())
local shopcraft = core.settings:get_bool("emeraldbank.shop_craft") or true
local stock_h = 3 local stock_h = 3
local stock_w = 5 local stock_w = 5
@ -36,6 +38,7 @@ emeraldbank.player_inv =
function emeraldbank.get_shop_fs(pos, clicker) function emeraldbank.get_shop_fs(pos, clicker)
local meta = core.get_meta(pos) local meta = core.get_meta(pos)
local count = meta:get_int("count")
local price = meta:get_int("price") local price = meta:get_int("price")
local shop_item = meta:get_string("shop_item") local shop_item = meta:get_string("shop_item")
local list_name = "nodemeta:"..pos.x..','..pos.y..','..pos.z local list_name = "nodemeta:"..pos.x..','..pos.y..','..pos.z
@ -48,6 +51,7 @@ function emeraldbank.get_shop_fs(pos, clicker)
"label[0,0;"..S("Your stock:").."]".. "label[0,0;"..S("Your stock:").."]"..
"list["..list_name..";stock;0,0.5;"..stock_w..","..stock_h..";]".. "list["..list_name..";stock;0,0.5;"..stock_w..","..stock_h..";]"..
mcl_formspec.get_itemslot_bg(0,0.5,stock_w,stock_h).. mcl_formspec.get_itemslot_bg(0,0.5,stock_w,stock_h)..
"field[6.5,2;2,1;count;"..S("Count")..";"..count.."]"..
"field[6.5,3;2,1;price;"..S("Price")..";"..price.."]".. "field[6.5,3;2,1;price;"..S("Price")..";"..price.."]"..
"label[6,0;"..S("In exchange, you give:").."]".. "label[6,0;"..S("In exchange, you give:").."]"..
"item_image[6.5,0.5;1,1;"..shop_item.."]".. "item_image[6.5,0.5;1,1;"..shop_item.."]"..
@ -59,6 +63,7 @@ function emeraldbank.get_shop_fs(pos, clicker)
"label[3.7,0;"..S("Owner gives:").."]".. "label[3.7,0;"..S("Owner gives:").."]"..
"item_image[4,1;1,1;"..shop_item.."]".. "item_image[4,1;1,1;"..shop_item.."]"..
mcl_formspec.get_itemslot_bg(4,1,1,1).. mcl_formspec.get_itemslot_bg(4,1,1,1)..
"label[5,1.5;"..S("x @1", count).."]"..
"label[4,2;"..S("Price: @1", price).."]".. "label[4,2;"..S("Price: @1", price).."]"..
"button[3.5,3;2,1;exchange;"..S("Exchange").."]".. "button[3.5,3;2,1;exchange;"..S("Exchange").."]"..
emeraldbank.player_inv emeraldbank.player_inv
@ -160,6 +165,8 @@ core.register_on_player_receive_fields(function(sender, formname, fields)
local name = sender:get_player_name() local name = sender:get_player_name()
local playermeta = sender:get_meta() local playermeta = sender:get_meta()
local player_pos = sender:get_pos() local player_pos = sender:get_pos()
local old_count = meta:get_int("count")
local new_count = tonumber(fields.count)
local old_price = meta:get_int("price") local old_price = meta:get_int("price")
local new_price = tonumber(fields.price) local new_price = tonumber(fields.price)
local shop_item = meta:get_string("shop_item") local shop_item = meta:get_string("shop_item")
@ -167,6 +174,12 @@ core.register_on_player_receive_fields(function(sender, formname, fields)
local pinv = sender:get_inventory() local pinv = sender:get_inventory()
local bankemeralds = playermeta:get_int("emeraldbank:emerald") local bankemeralds = playermeta:get_int("emeraldbank:emerald")
if fields.count and string.find(fields.count, "^[0-9]+$") then
if new_count >= 1 and new_count <= 64 and new_count ~= meta:get_int("count") then
meta:set_int("count", new_count)
end
end
if fields.price and string.find(fields.price, "^[0-9]+$") then if fields.price and string.find(fields.price, "^[0-9]+$") then
if new_price >= 1 and new_price <= 10000 and new_price ~= meta:get_int("price") then if new_price >= 1 and new_price <= 10000 and new_price ~= meta:get_int("price") then
meta:set_int("price", new_price) meta:set_int("price", new_price)
@ -181,7 +194,6 @@ core.register_on_player_receive_fields(function(sender, formname, fields)
else else
local stocklist = minv:get_list("stock")
local can_exchange = true local can_exchange = true
if bankemeralds < old_price then if bankemeralds < old_price then
@ -189,14 +201,14 @@ core.register_on_player_receive_fields(function(sender, formname, fields)
core.chat_send_player(name, S("Not enough Emeralds in your account") ) core.chat_send_player(name, S("Not enough Emeralds in your account") )
end end
if not minv:contains_item("stock", shop_item) then if not minv:contains_item("stock", shop_item.." "..old_count, true) then
can_exchange = false can_exchange = false
core.chat_send_player(name, S("Out of Stock!") ) core.chat_send_player(name, S("Out of Stock!") )
end end
if can_exchange then if can_exchange then
minv:remove_item("stock", shop_item) minv:remove_item("stock", shop_item.." "..old_count)
core.add_item(player_pos, shop_item) core.add_item(player_pos, shop_item.." "..old_count)
emeraldbank.add_emeralds(sender, -old_price) emeraldbank.add_emeralds(sender, -old_price)
meta:set_int("stonks", meta:get_int("stonks")+old_price) meta:set_int("stonks", meta:get_int("stonks")+old_price)
core.chat_send_player(name, S("Exchanged!")) core.chat_send_player(name, S("Exchanged!"))
@ -209,3 +221,15 @@ core.register_on_player_receive_fields(function(sender, formname, fields)
end end
end) end)
if shopcraft then
core.register_craft({
output = "emeraldbank:shop 3",
recipe = {
{"mcl_core:emerald", "mcl_core:emerald", "mcl_core:emerald"},
{"mcl_core:emerald", "mcl_core:tree", "mcl_core:emerald"},
{"mcl_core:emerald", "mcl_core:emerald", "mcl_core:emerald"},
}
})
end