diff options
Diffstat (limited to 'ch_core/vezeni.lua')
| -rw-r--r-- | ch_core/vezeni.lua | 376 |
1 files changed, 376 insertions, 0 deletions
diff --git a/ch_core/vezeni.lua b/ch_core/vezeni.lua new file mode 100644 index 0000000..6a148d0 --- /dev/null +++ b/ch_core/vezeni.lua @@ -0,0 +1,376 @@ +ch_core.open_submod("vezeni", {chat = true, data = true, lib = true, privs = true, hud = true}) + +local trest_min = -100 +local trest_max = 1000000 + +local vezeni_data = { + min = assert(ch_core.positions.vezeni_min), + max = assert(ch_core.positions.vezeni_max), + stred = assert(ch_core.positions.vezeni_cil), + dvere = ch_core.positions.vezeni_dvere, +} +local send_to_prison_callbacks = {} + +local prohledavane_inventare = { + "main", + "craft", + "bag1", "bag2", "bag3", "bag4", "bag5", "bag6", "bag7", "bag8", +} + +local povolene_krumpace = {} + +for _, n in ipairs({"default:pick_steel", "default:pick_bronze", + "moreores:pick_silver", "moreores:pick_mithril", "default:pick_mese", "default:pick_diamond"}) do + povolene_krumpace[n] = ItemStack(n) +end + +--[[ +local function nacist_vezeni() + local offline_charinfo = ch_data.get_offline_charinfo("Administrace") + local s = offline_charinfo.data_vezeni + if s and s ~= "" then + ch_core.vezeni_data = minetest.deserialize(s, true) + vezeni_data = ch_core.vezeni_data + end + return offline_charinfo +end +nacist_vezeni() +]] + +function ch_core.je_ve_vezeni(pos) + return ch_core.pos_in_area(pos, vezeni_data.min, vezeni_data.max) +end + +function ch_core.vezeni_kontrola_krumpace(player) + if not player:is_player() then + return false + end + local inv = player:get_inventory() + if not inv then + return false + end + for _, listname in ipairs(prohledavane_inventare) do + for itemname, stack in pairs(povolene_krumpace) do + if inv:contains_item(listname, stack, false) then + minetest.log("action", "Player "..player:get_player_name().." already has a pickaxe "..itemname.." in the inventory list "..listname..".") + return true + end + end + end + player:set_wielded_item(povolene_krumpace["default:pick_steel"]) + minetest.log("action", "Player "..player:get_player_name().." was given a steel pickaxe at a prison check.") + return true +end + +-- PRISON STONE +local function on_construct(pos) + local meta = minetest.get_meta(pos) + if ch_core.je_ve_vezeni(pos) then + meta:set_string("infotext", "Vězeňský kámen. Těžte tento kámen železným nebo lepším krumpáčem pro odpykání si trestu.") + else + meta:set_string("infotext", "") + end +end +local box = { + type = "fixed", + fixed = {-0.4, -0.5, -0.4, 0.4, 0.4, 0.4} +} +local def = { + description = "vězeňský kámen", + drawtype = "nodebox", + node_box = box, + selection_box = box, + tiles = {"default_stone.png"}, + paramtype2 = "none", + groups = {cracky = 1}, + drop = "default:stone", + sounds = default.node_sound_stone_defaults(), + + can_dig = function(pos, player) + if not ch_core.je_ve_vezeni(pos) or minetest.check_player_privs(player, "server") then + return default.can_interact_with_node(player, pos) + end + local player_name = player:get_player_name() + local tool = player:get_wielded_item():get_name() or "" + + -- require a pickaxe + if not povolene_krumpace[tool] then + ch_core.systemovy_kanal(player_name, "Ke snížení trestu musíte tento kámen odtěžit železným nebo lepším krumpáčem!") + return false + end + + local offline_charinfo = ch_data.get_offline_charinfo(player_name) + local trest_old = offline_charinfo.player.trest + ch_core.trest("", player_name, -1) + local trest_new = offline_charinfo.player.trest + if trest_new ~= trest_old then + ch_core.systemovy_kanal(player_name, "Váš trest: "..trest_old.." >> "..trest_new) + end + return false + end, + on_construct = on_construct, +} +minetest.register_node("ch_core:prison_stone", def) + +def = { + label = "Update prison stone infotext", + name = "ch_core:prison_stone_infotext", + nodenames = {"ch_core:prison_stone"}, + run_at_every_load = true, + action = on_construct, +} +minetest.register_lbm(def) + +local prison_bar_icon = "default_snowball.png" +local prison_bar_bgicon = nil +local prison_bar_bar = "hudbars_bar_prison.png" + +local function update_hudbar(online_charinfo, trest) + local player = minetest.get_player_by_name(online_charinfo.player_name) + if not player then + return false + end + local hudbar_id = online_charinfo.prison_hudbar + if not hudbar_id then + return false + end + if trest < 0 then + trest = 0 + end + local old_max = online_charinfo.last_hudbar_trest_max + local new_max + if not old_max or trest > old_max then + new_max = trest + end + return hb.change_hudbar(player, hudbar_id, trest, new_max) +end + +-- přesune online postavu do vězení +local function do_vezeni(player_name, online_charinfo) + -- callbacks + local player = minetest.get_player_by_name(player_name) + if not player then + minetest.log("warning", "do_vezeni(): Player '"..player_name.."' not found!") + return false + end + for _, f in ipairs(send_to_prison_callbacks) do + f(player) + end + + -- announcement + local offline_charinfo = ch_data.offline_charinfo[player_name] or {} + ch_core.set_temporary_titul(player_name, "ve vězení", true) + ch_core.systemovy_kanal(player_name, "Jste ve výkonu trestu odnětí svobody. Těžte vězeňský kámen železným nebo lepším krumpáčem pro odpykání si trestu. Současná výše trestu: "..(offline_charinfo.player.trest or 0)) + + -- teleport + if not ch_core.je_ve_vezeni(player:get_pos()) then + player:set_pos(vezeni_data.stred) + end + + -- HUD + local hudbar_id = online_charinfo.prison_hudbar + if not hudbar_id then + hudbar_id = ch_core.try_alloc_hudbar(player) + if hudbar_id then + online_charinfo.prison_hudbar = hudbar_id + end + end + if hudbar_id then + online_charinfo.last_hudbar_trest_max = offline_charinfo.player.trest or 0 + hb.change_hudbar(player, hudbar_id, online_charinfo.last_hudbar_trest_max, online_charinfo.last_hudbar_trest_max, prison_bar_icon, prison_bar_bgicon, prison_bar_bar, "trest", 0xFFFFFF) + update_hudbar(online_charinfo, offline_charinfo.trest or 0) + hb.unhide_hudbar(player, hudbar_id) + end + + -- close the door + local door = vezeni_data.dvere and doors.get(vezeni_data.dvere) + if door then + minetest.after(0.5, function() + door:close(nil) + end) + end + + -- Check for a pickaxe + minetest.after(5, function(pname) + local player_2 = minetest.get_player_by_name(pname) + if player_2 then + ch_core.vezeni_kontrola_krumpace(player_2) + end + end, player_name) +end + +local function propustit_z_vezeni(player_name, online_charinfo) + ch_core.set_temporary_titul(player_name, "ve vězení", false) + ch_core.systemovy_kanal(player_name, "Byl/a jste propuštěn/a z vězení. Nyní se můžete volně pohybovat a používat teleportační příkazy.") + + local hudbar_id = online_charinfo.prison_hudbar + if hudbar_id then + local player = minetest.get_player_by_name(player_name) + if player then + ch_core.free_hudbar(player, hudbar_id) + end + online_charinfo.prison_hudbar = nil + end + + local door = vezeni_data.dvere and doors.get(vezeni_data.dvere) + if door then + door:open(nil) + end +end + +local function on_joinplayer(player, last_login) + local player_name = player:get_player_name() + local online_charinfo = ch_data.get_joining_online_charinfo(player) + local offline_charinfo = ch_data.get_offline_charinfo(player_name) + local trest = tonumber(offline_charinfo.player.trest or 0) + + if trest > 0 then + do_vezeni(player_name, online_charinfo) + end +end + +minetest.register_on_joinplayer(on_joinplayer) + +-- volajici = komu vypsat hlášení; "" = provést změnu potichu +function ch_core.trest(volajici, jmeno, vyse_trestu) + local message + local result = false + + if type(vyse_trestu) ~= "number" then + minetest.log("error", "Invalid call to ch_core.trest() with vyse_trestu of type "..type(vyse_trestu)) + return result + end + jmeno = ch_core.jmeno_na_prihlasovaci(jmeno) + if not minetest.player_exists(jmeno) then + message = "Postava "..jmeno.." neexistuje!" + else + local offline_charinfo = ch_data.get_offline_charinfo(jmeno) + local trest = offline_charinfo.player.trest + local nova_vyse = math.round(trest + vyse_trestu) + if nova_vyse < trest_min then + nova_vyse = trest_min + elseif nova_vyse > trest_max then + nova_vyse = trest_max + end + if trest == nova_vyse then + message = "Aktuální výše trestu postavy "..ch_core.prihlasovaci_na_zobrazovaci(jmeno)..": "..trest + else + message = "Výše trestu postavy "..ch_core.prihlasovaci_na_zobrazovaci(jmeno).." změněna: "..trest.." => "..nova_vyse + offline_charinfo.player.trest = nova_vyse + ch_data.save_offline_charinfo(jmeno, true) + minetest.log("action", message) + + local online_charinfo = ch_data.online_charinfo[jmeno] + if online_charinfo then + update_hudbar(online_charinfo, nova_vyse) + + if trest > 0 and nova_vyse <= 0 then + propustit_z_vezeni(jmeno, online_charinfo) + elseif trest <= 0 and nova_vyse > 0 then + do_vezeni(jmeno, online_charinfo) + end + end + end + result = true + end + + if message and volajici and volajici ~= "" then + ch_core.systemovy_kanal(volajici, message) + end + return result +end + +--[[ + Je-li postava ve výkonu trestu, vrací výši jejího trestu, + jinak vrátí nil. +]] +function ch_core.je_ve_vykonu_trestu(player_name) + local trest = ch_core.safe_get_4(ch_data.offline_charinfo, player_name, "player", "trest") + if trest ~= nil and trest > 0 then + return trest + else + return nil + end +end + +function ch_core.vykon_trestu(player, player_pos, us_time, online_charinfo) + if not ch_core.pos_in_area(player_pos, vezeni_data.min, vezeni_data.max) then + player:set_pos(vezeni_data.stred) + elseif us_time >= (online_charinfo.pristi_kontrola_krumpace or 0) then + online_charinfo.pristi_kontrola_krumpace = us_time + 900000000 + ch_core.vezeni_kontrola_krumpace(player) + end +end + +-- func(player) +function ch_core.register_before_send_to_prison(func) + if func then + table.insert(send_to_prison_callbacks, func) + return true + else + return false + end +end + +-- /trest +def = { + params = "<Jméno_Postavy> <výše_trestu>", + privs = {ban = true}, + description = "Uloží nebo promine postavě trest", + func = function(player_name, param) + local jmeno, vyse = param:match("^(%S+) ([-]?%d+)$") + if not jmeno then + return false, "Neplatný formát parametrů!" + end + vyse = tonumber(vyse) + return ch_core.trest(player_name, jmeno, vyse) + end, +} +minetest.register_chatcommand("trest", def) + +--[[ /umístit_vězení +def = { + params = "(<X1>, <Y1>, <Z1>) (<X2>, <Y2>, <Z2>)", + privs = {server = true}, + description = "Nastaví pozici vězení. Při nastavování musíte stát uvnitř nastavované oblasti.", + func = function(player_name, param) + local pos1, pos2 = minetest.string_to_area(param) + if not pos1 then + return false, "Neplatný formát parametrů!" + end + local player = minetest.get_player_by_name(player_name) + local stred = player:get_pos() + return ch_core.umistit_vezeni(player_name, pos1, pos2, stred) + end, +} +minetest.register_chatcommand("umístit_vězení", def) +minetest.register_chatcommand("umistit_vezeni", def)]] + +--[[ /dveře_vězení +def = { + params = "", + privs = {server = true}, + description = "Nastaví pozici vězeňských dveří", + func = function(player_name, param) + local player = minetest.get_player_by_name(player_name) + if not player then + return false, "postava nenalezena!" + end + local pos = player:get_pos() + if not pos then + return false, "pozice nenalezena!" + end + pos = vector.round(pos) + local door = doors.get(pos) + if not door then + return false, "CHYBA: na pozici "..minetest.pos_to_string(pos).." nejsou dveře!" + end + vezeni_data.dvere = pos + ulozit_vezeni() + return true, "Pozice dveří vězení nastavena na "..minetest.pos_to_string(pos) + end +} +minetest.register_chatcommand("dveře_vězení", def) +minetest.register_chatcommand("dvere_vezeni", def)]] + +ch_core.close_submod("vezeni") |