first commit

.luacheckrc

@@ -0,0 +1,19 @@
+unused_args = false
+allow_defined_top = true
+max_line_length = false
+
+globals = {
+    "minetest",
+}
+
+read_globals = {
+    string = {fields = {"split"}},
+    table = {fields = {"copy", "getn"}},
+
+    -- Builtin
+    "vector", "ItemStack",
+    "dump", "DIR_DELIM", "VoxelArea", "Settings",
+
+    -- MTG
+    "default", "sfinv", "creative",
+}

README.md

@@ -0,0 +1,60 @@
+# Electrum
+
+Electrum is a mod for Minetest of monetary economics.
+
+The official currency is the "Electrum", which is an alloy of gold, silver and copper in different proportions.
+
+## Commands
+
+### For administrators
+
+- /add_money <player_name> <amount>
+Amount: Can be positive or negative
+
+- /get_money <player_name>
+It retrieves info about the player's account.
+
+### For players
+
+- /money
+Gets the info about your account
+
+- /save_money
+Saves to your account all electrums in your inventory.
+
+- /give_money <player_name> <amount>
+Gives money to another player.
+
+## Easy management
+
+### Piggy bank
+
+Create this cute piggy bank to store your electrums without command.
+Right-click on it to save them.
+
+### ElectrumPay Card
+
+View your account status and make quick transfers to other players.
+
+Just use it. It has a technology that identifies you by your fingerprint. It doesn't matter if it gets stolen. Your bank account will be safe.
+
+## API
+
+- elez.get_money(player)
+- elez.add_money(player, amount)
+- elez.save_money(player)
+- elez.transfer_money(src_name, dst_name, amount)
+
+## License
+
+- Source code: GPLv3.
+- Textures: CC BY-SA 4.0
+
+## Dependencies
+
+- default, moreores, basic_materials
+
+## Download
+
+https://github.com/runsy/elez/archive/refs/heads/master.zip
+

init.lua

@@ -0,0 +1,271 @@
+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,
+})

locale/elez.es.tr

@@ -0,0 +1,33 @@
+# textdomain: elez
+Electrum=Electro
+ElectrumPay Card=Tarjeta de pago Electrum
+Piggy Bank=Hucha de cerdito
+Account Balance=Saldo de la cuenta
+Name=Nombre
+Amount=Cantidad
+Transfer=Transferir
+Close=Cerrar
+Add an amount of money (+ or -)=Añade una cantidad de dinero (+ o -)
+Error: You have to specify a player and an amount of money.=Error: Tienes que especificar un jugador y una cantidad de dinero
+Error: You have to specify an amount of money.=Error: Tienes que especificar una cantidad de dinero.
+Error: The amount has to be a number.=Error: La cantidad tiene que ser un número.
+Error: The player does not exist or not online.=El juegador no existe o no está en línea
+Transfer successfully completed.=Tranferencia realizada con éxito.
+You've added=Has añadido
+of money to=de dinero a
+Get the info about a player's money=Obtén info sobre el dinero de un jugador
+Error: You have to specify a player.=Error: Debes especificar un jugador
+has=tiene
+of money.=de dinero.
+Save your electrums from your inventory=Guarda los electros de tu inventario
+electrums saved=electrums guardados
+You have no electrums in your inventory.=No tienes ningún electro en tu inventario.
+Give of your money to a player=Da de tu dinero a otro jugador
+Error: You cannot send money to yourself.=Error: No puedes darte dinero a ti mismo.
+Error: You has not=Error: No tienes
+of money to give.=de dinero para dar.
+You've given=Has dado
+You've received=Has recibido
+of money from=de dinero de
+Get the info about your money=Obtén info de tu dinero
+You has=Tienes

mod.conf

@@ -0,0 +1,2 @@
+name = elez
+depends = default, moreores, basic_materials