272 lines
8.0 KiB
Lua
272 lines
8.0 KiB
Lua
elez = {}
|
|
local coin_name = "elez:electrum"
|
|
local ingots_to_coins = 99
|
|
local modname = minetest.get_current_modname()
|
|
local S = minetest.get_translator(modname)
|
|
|
|
--Electrum
|
|
minetest.register_craftitem(coin_name, {
|
|
description = S("Electrum"),
|
|
inventory_image = "elez_electrum.png",
|
|
wield_image = "elez_electrum.png",
|
|
stack_max = 99,
|
|
})
|
|
|
|
minetest.register_craft({
|
|
type = "shaped",
|
|
output = coin_name.." "..tostring(ingots_to_coins),
|
|
recipe = {
|
|
{"", "moreores:silver_ingot", ""},
|
|
{"moreores:silver_ingot", "default:gold_ingot", "moreores:silver_ingot"},
|
|
{"", "default:copper_ingot", ""},
|
|
}
|
|
})
|
|
|
|
--Credit Card
|
|
minetest.register_craftitem("elez:credit_card", {
|
|
description = S("ElectrumPay Card"),
|
|
inventory_image = "elez_credit_card.png",
|
|
wield_image = "elez_credit_card.png",
|
|
stack_max = 1,
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
elez.electrumpay(user, "", nil)
|
|
return nil
|
|
end,
|
|
})
|
|
|
|
minetest.register_craft({
|
|
type = "shaped",
|
|
output = "elez:credit_card",
|
|
recipe = {
|
|
{"", "", ""},
|
|
{"", "", ""},
|
|
{"basic_materials:ic", "basic_materials:plastic_sheet", "elez:electrum"},
|
|
}
|
|
})
|
|
|
|
--Piggy Bank
|
|
minetest.register_node("elez:piggy_bank", {
|
|
description = S("Piggy Bank"),
|
|
drawtype = "nodebox",
|
|
tiles = {
|
|
"elez_piggy_bank_top.png",
|
|
"elez_piggy_bank_bottom.png",
|
|
"elez_piggy_bank_right.png",
|
|
"elez_piggy_bank_left.png",
|
|
"elez_piggy_bank_back.png",
|
|
"elez_piggy_bank_front.png"
|
|
},
|
|
paramtype = "light",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-0.25, -0.375, -0.25, 0.25, -0.0625, 0.25}, -- NodeBox1
|
|
{-0.1875, -0.5, -0.1875, -0.125, -0.375, -0.125}, -- NodeBox2
|
|
{0.125, -0.5, -0.1875, 0.1875, -0.375, -0.125}, -- NodeBox3
|
|
{0.125, -0.5, 0.125, 0.1875, -0.375, 0.1875}, -- NodeBox4
|
|
{-0.1875, -0.5, 0.125, -0.125, -0.375, 0.1875}, -- NodeBox5
|
|
{-0.125, -0.3125, -0.3125, 0.125, -0.1875, -0.25}, -- NodeBox6
|
|
}
|
|
},
|
|
groups = {crumbly=2},
|
|
on_rightclick = function(pos, node, player, itemstack, pointed_thing)
|
|
elez.save_money(player)
|
|
end,
|
|
})
|
|
|
|
--Helper Functions
|
|
local function is_numeric(x)
|
|
if tonumber(x) ~= nil then
|
|
return true
|
|
end
|
|
return false
|
|
end
|
|
|
|
--Basic Money functions
|
|
|
|
function elez.add_money(player, amount)
|
|
if amount < -32768 then
|
|
amount = -32768
|
|
elseif amount > 32767 then
|
|
amount = 32767
|
|
end
|
|
player:get_meta():set_int("elez:money", (player:get_meta():get_int("elez:money") + amount))
|
|
end
|
|
|
|
function elez.get_money(player)
|
|
return player:get_meta():get_int("elez:money")
|
|
end
|
|
|
|
function elez.save_money(player)
|
|
local inv = player:get_inventory()
|
|
local inv_list = inv:get_list("main")
|
|
local player_name = player:get_player_name()
|
|
if not inv:contains_item("main", coin_name) then
|
|
minetest.chat_send_player(player_name, S("You have no electrums in your inventory."))
|
|
return false
|
|
end
|
|
local amount = 0
|
|
for i = 1, #inv_list do
|
|
local item_stack = inv_list[i]
|
|
if item_stack:get_name() == coin_name then
|
|
amount = amount + item_stack:get_count()
|
|
inv:set_stack("main", i, ItemStack(nil))
|
|
end
|
|
end
|
|
elez.add_money(player, amount)
|
|
minetest.chat_send_player(player_name, tostring(amount).." "..S("electrums saved"))
|
|
return true
|
|
end
|
|
|
|
function elez.transfer_money(src_name,dst_name,amount)
|
|
if not amount then
|
|
return false, S("Error: You have to specify an amount of money.")
|
|
end
|
|
if not is_numeric(amount) then
|
|
return false, S("Error: The amount has to be a number.")
|
|
end
|
|
amount = math.abs(amount)
|
|
if amount > 32767 then
|
|
amount = 32767
|
|
end
|
|
local src = minetest.get_player_by_name(src_name)
|
|
local dst = minetest.get_player_by_name(dst_name)
|
|
if not dst then
|
|
return false, S("Error: The player does not exist or not online.")
|
|
end
|
|
if src_name == dst_name then
|
|
return false, S("Error: You cannot send money to yourself.")
|
|
end
|
|
if (elez.get_money(src) < amount) then
|
|
return false, S("Error: You has not").." "..tostring(amount).." "..S("of money to give.")
|
|
end
|
|
elez.add_money(dst, amount)
|
|
elez.add_money(src, -amount)
|
|
minetest.chat_send_player(src_name, S("You've given").." "..tostring(amount).." "
|
|
..S("of money to").." "..dst_name)
|
|
minetest.chat_send_player(dst_name, S("You've received").." "..tostring(amount).." "
|
|
..S("of money from").." "..src_name)
|
|
return true, S("Transfer successfully completed.")
|
|
end
|
|
|
|
--ElectrumPay
|
|
|
|
local function compose_formspec(user, msg, default_fields)
|
|
local formspec = [[
|
|
formspec_version[4]
|
|
size[5,5]
|
|
label[1.25,0.25;]]..S("ElectrumPay Card")..[[]
|
|
label[0.25,0.75;]]..S("Account Balance")..": "..
|
|
tostring(elez.get_money(user)).." ê"..[[]
|
|
field[0.25,1.25;2,1;fld_name;]]..S("Name")..[[:;]]..default_fields["name"]..[[]
|
|
field_close_on_enter[fld_name;false]
|
|
field[2.25,1.25;2,1;fld_amount;]]..S("Amount")..[[:;]]..default_fields["amount"]..[[]
|
|
field_close_on_enter[fld_amount;false]
|
|
button_exit[2,2.25;1,1;btn_transfer;]]..S("Transfer")..[[]
|
|
label[0.25,3.5;]]..msg..[[]
|
|
button_exit[2,3.75;1,1;btn_close;]]..S("Close")..[[]
|
|
]]
|
|
return formspec
|
|
end
|
|
|
|
function elez.electrumpay(user, msg, default_fields)
|
|
if not default_fields then
|
|
default_fields = {name="",amount=""}
|
|
end
|
|
minetest.show_formspec(user:get_player_name(), "elez.electrumpay", compose_formspec(user, msg, default_fields))
|
|
end
|
|
|
|
minetest.register_on_player_receive_fields(function(player, formname, fields)
|
|
if formname ~= "elez.electrumpay" then
|
|
return
|
|
end
|
|
if fields.btn_transfer then
|
|
local transfer, msg = elez.transfer_money(player:get_player_name(),fields.fld_name,fields.fld_amount)
|
|
local default_fields
|
|
if transfer then
|
|
default_fields = {name="",amount=""}
|
|
else
|
|
default_fields = {name=fields.fld_name,amount=fields.fld_amount}
|
|
end
|
|
elez.electrumpay(player, msg, default_fields)
|
|
end
|
|
end)
|
|
|
|
--COMMANDS
|
|
|
|
minetest.register_chatcommand("add_money", {
|
|
privs = {
|
|
server = true,
|
|
},
|
|
description = S("Add an amount of money (+ or -)"),
|
|
func = function(name, param)
|
|
if param == "" then
|
|
return true, S("Error: You have to specify a player and an amount of money.")
|
|
end
|
|
local player_name, amount = string.match(param, "([%a%d_-]+) ([%a%d_-]+)")
|
|
if not amount then
|
|
return true, S("Error: You have to specify an amount of money.")
|
|
end
|
|
if not is_numeric(amount) then
|
|
return true, S("Error: The amount has to be a number.")
|
|
end
|
|
local player = minetest.get_player_by_name(player_name)
|
|
if not player then
|
|
return true, S("Error: The player does not exist or not online.")
|
|
end
|
|
elez.add_money(player, amount)
|
|
minetest.chat_send_player(name, S("You've added").." "..tostring(amount).." "
|
|
..S("of money to").." "..player_name)
|
|
end,
|
|
})
|
|
|
|
minetest.register_chatcommand("money", {
|
|
description = S("Get the info about your money"),
|
|
func = function(name, param)
|
|
local you = minetest.get_player_by_name(name)
|
|
minetest.chat_send_player(name, S("You has").." "
|
|
..tostring(elez.get_money(you)).." "..S("of money."))
|
|
end,
|
|
})
|
|
|
|
minetest.register_chatcommand("get_money", {
|
|
privs = {
|
|
server = true,
|
|
},
|
|
description = S("Get the info about a player's money"),
|
|
func = function(name, param)
|
|
if param == "" then
|
|
return true, S("Error: You have to specify a player.")
|
|
end
|
|
local player_name = string.match(param, "([%a%d_-]+)")
|
|
local player = minetest.get_player_by_name(player_name)
|
|
if not player then
|
|
return true, S("Error: The player does not exist or not online.")
|
|
end
|
|
minetest.chat_send_player(name, player_name.." "..S("has").." "
|
|
..tostring(elez.get_money(player)).." "..S("of money."))
|
|
end,
|
|
})
|
|
|
|
minetest.register_chatcommand("save_money", {
|
|
description = S("Save your electrums from your inventory"),
|
|
func = function(name, param)
|
|
local player = minetest.get_player_by_name(name)
|
|
if not player then
|
|
return true, S("Error: The player does not exist or not online.")
|
|
end
|
|
elez.save_money(player)
|
|
end,
|
|
})
|
|
|
|
minetest.register_chatcommand("give_money", {
|
|
description = S("Give of your money to a player"),
|
|
func = function(name, param)
|
|
if param == "" then
|
|
return true, S("Error: You have to specify a player and an amount of money.")
|
|
end
|
|
local player_name, amount = string.match(param, "([%a%d_-]+) ([%a%d_-]+)")
|
|
elez.transfer_money(name, player_name, amount)
|
|
end,
|
|
})
|