awards/src/gui.lua

270 lines
7.1 KiB
Lua
Raw Normal View History

2018-04-04 23:57:27 +02:00
-- Copyright (c) 2013-18 rubenwardy. MIT.
2018-04-04 18:37:43 +02:00
local S = awards.gettext
2018-04-04 18:42:12 +02:00
local function order_awards(name)
2018-04-05 17:44:22 +02:00
local hash_is_unlocked = {}
2018-04-04 18:42:12 +02:00
local retval = {}
2018-04-05 17:44:22 +02:00
local data = awards.player(name)
if data and data.unlocked then
for awardname, _ in pairs(data.unlocked) do
local def = awards.registered_awards[awardname]
if def then
hash_is_unlocked[awardname] = true
local score = -100000
2018-04-17 23:25:53 +02:00
local difficulty = def.difficulty or 1
2018-04-05 17:44:22 +02:00
if def.trigger and def.trigger.target then
2018-04-17 23:25:53 +02:00
difficulty = difficulty * def.trigger.target
2018-04-05 17:44:22 +02:00
end
2018-04-17 23:25:53 +02:00
score = score + difficulty
2018-04-05 17:44:22 +02:00
retval[#retval + 1] = {
name = awardname,
def = def,
unlocked = true,
started = true,
score = score,
}
2018-04-04 18:42:12 +02:00
end
end
end
2018-04-05 17:44:22 +02:00
for _, def in pairs(awards.registered_awards) do
if not hash_is_unlocked[def.name] and def:can_unlock(data) then
2018-04-05 17:44:22 +02:00
local started = false
local score = def.difficulty or 1
2018-04-05 17:44:22 +02:00
if def.secret then
score = 1000000
elseif def.trigger and def.trigger.target and def.getProgress then
local progress = def:getProgress(data).perc
score = score * (1 - progress) * def.trigger.target
2018-04-05 17:44:22 +02:00
if progress < 0.001 then
score = score + 100
else
started = true
end
else
score = 100
end
retval[#retval + 1] = {
name = def.name,
def = def,
unlocked = false,
started = started,
score = score,
}
2018-04-04 18:42:12 +02:00
end
end
2018-04-05 17:44:22 +02:00
table.sort(retval, function(a, b)
return a.score < b.score
end)
2018-04-04 18:42:12 +02:00
return retval
end
2018-04-04 18:37:43 +02:00
function awards.get_formspec(name, to, sid)
local formspec = ""
2018-04-05 17:44:22 +02:00
local awards_list = order_awards(name)
local data = awards.player(name)
2018-04-04 18:37:43 +02:00
2018-04-05 17:44:22 +02:00
if #awards_list == 0 then
formspec = formspec .. "label[3.9,1.5;"..minetest.formspec_escape(S("Error: No achivements available.")).."]"
2018-04-04 18:37:43 +02:00
formspec = formspec .. "button_exit[4.2,2.3;3,1;close;"..minetest.formspec_escape(S("OK")).."]"
return formspec
end
sid = awards_list[sid] and sid or 1
2018-04-04 18:37:43 +02:00
-- Sidebar
local sitem = awards_list[sid]
local sdef = sitem.def
if sdef and sdef.secret and not sitem.unlocked then
formspec = formspec .. "label[1,2.75;"..
minetest.formspec_escape(S("(Secret Award)")).."]"..
"image[1,0;3,3;awards_unknown.png]"
if sdef and sdef.description then
formspec = formspec .. "textarea[0.25,3.25;4.8,1.7;;"..
minetest.formspec_escape(
S("Unlock this award to find out what it is."))..";]"
end
else
local title = sitem.name
if sdef and sdef.title then
title = sdef.title
end
local status = "%s"
if sitem.unlocked then
status = S("%s (unlocked)")
end
2018-04-04 18:37:43 +02:00
formspec = formspec .. "textarea[0.5,3.1;4.8,1.45;;" ..
string.format(status, minetest.formspec_escape(title)) ..
";]"
2018-04-04 18:37:43 +02:00
if sdef and sdef.icon then
formspec = formspec .. "image[0.6,0;3,3;" .. sdef.icon .. "]"
end
local barwidth = 3.95
local perc = nil
local label = nil
if sdef.getProgress and data then
local res = sdef:getProgress(data)
perc = res.perc
label = res.label
end
if perc then
if perc > 1 then
perc = 1
2018-04-04 18:37:43 +02:00
end
formspec = formspec .. "background[0,8.24;" .. barwidth ..",0.4;awards_progress_gray.png;false]"
formspec = formspec .. "background[0,8.24;" .. (barwidth * perc) ..",0.4;awards_progress_green.png;false]"
if label then
formspec = formspec .. "label[1.6,8.15;" .. minetest.formspec_escape(label) .. "]"
2018-04-04 18:37:43 +02:00
end
end
if sdef and sdef.description then
formspec = formspec .. "box[-0.05,3.75;3.9,4.2;#000]"
formspec = formspec .. "textarea[0.25,3.75;3.9,4.2;;" ..
minetest.formspec_escape(sdef.description) .. ";]"
end
2018-04-04 18:37:43 +02:00
end
-- Create list box
formspec = formspec .. "textlist[4,0;3.8,8.6;awards;"
2018-04-04 18:37:43 +02:00
local first = true
2018-04-05 17:44:22 +02:00
for _, award in pairs(awards_list) do
local def = award.def
2018-04-04 18:37:43 +02:00
if def then
if not first then
formspec = formspec .. ","
end
first = false
2018-04-05 17:44:22 +02:00
if def.secret and not award.unlocked then
formspec = formspec .. "#707070"..minetest.formspec_escape(S("(Secret Award)"))
2018-04-04 18:37:43 +02:00
else
local title = award.name
if def and def.title then
title = def.title
end
2018-04-05 17:44:22 +02:00
-- title = title .. " [" .. award.score .. "]"
if award.unlocked then
2018-04-04 18:37:43 +02:00
formspec = formspec .. minetest.formspec_escape(title)
2018-04-05 17:48:33 +02:00
elseif award.started then
formspec = formspec .. "#c0c0c0".. minetest.formspec_escape(title)
2018-04-04 18:37:43 +02:00
else
2018-04-05 17:48:33 +02:00
formspec = formspec .. "#a0a0a0".. minetest.formspec_escape(title)
2018-04-04 18:37:43 +02:00
end
end
end
end
return formspec .. ";"..sid.."]"
end
function awards.show_to(name, to, sid, text)
if name == "" or name == nil then
name = to
end
local data = awards.player(to)
if name == to and data.disabled then
minetest.chat_send_player(name, S("You've disabled awards. Type /awards enable to reenable."))
2018-04-04 18:37:43 +02:00
return
end
if text then
2018-04-05 17:44:22 +02:00
local awards_list = order_awards(name)
if #awards_list == 0 then
minetest.chat_send_player(to, S("Error: No award available."))
2018-04-04 18:37:43 +02:00
return
elseif not data or not data.unlocked then
minetest.chat_send_player(to, S("You have not unlocked any awards."))
2018-04-04 18:37:43 +02:00
return
end
minetest.chat_send_player(to, string.format(S("%ss awards:"), name))
2018-04-04 18:37:43 +02:00
2018-04-05 17:44:22 +02:00
for str, _ in pairs(data.unlocked) do
local def = awards.registered_awards[str]
2018-04-04 18:37:43 +02:00
if def then
if def.title then
if def.description then
minetest.chat_send_player(to, string.format(S("%s: %s"), def.title, def.description))
else
minetest.chat_send_player(to, def.title)
end
else
minetest.chat_send_player(to, str)
end
end
end
else
local deco = ""
if minetest.global_exists("default") then
deco = default.gui_bg .. default.gui_bg_img
end
-- Show formspec to user
minetest.show_formspec(to,"awards:awards",
"size[8,8.6]" .. deco ..
2018-04-04 18:37:43 +02:00
awards.get_formspec(name, to, sid))
end
end
minetest.register_on_player_receive_fields(function(player, formname, fields)
if formname ~= "awards:awards" then
return false
end
if fields.quit then
return true
end
local name = player:get_player_name()
if fields.awards then
local event = minetest.explode_textlist_event(fields.awards)
if event.type == "CHG" then
awards.show_to(name, name, event.index, false)
end
end
return true
end)
2018-04-04 18:37:43 +02:00
if minetest.get_modpath("sfinv") then
sfinv.register_page("awards:awards", {
title = S("Awards"),
2018-04-04 18:37:43 +02:00
on_enter = function(self, player, context)
context.awards_idx = 1
end,
2018-04-05 18:24:42 +02:00
is_in_nav = function(self, player, context)
local data = awards.player(player:get_player_name())
return not data.disabled
end,
2018-04-04 18:37:43 +02:00
get = function(self, player, context)
local name = player:get_player_name()
return sfinv.make_formspec(player, context,
awards.get_formspec(name, name, context.awards_idx),
false)
2018-04-04 18:37:43 +02:00
end,
on_player_receive_fields = function(self, player, context, fields)
if fields.awards then
local event = minetest.explode_textlist_event(fields.awards)
if event.type == "CHG" then
context.awards_idx = event.index
sfinv.set_player_inventory_formspec(player, context)
end
end
end
})
end
if minetest.get_modpath("unified_inventory") ~= nil then
unified_inventory.register_button("awards", {
type = "image",
image = "awards_ui_icon.png",
tooltip = S("Awards"),
2018-04-04 18:37:43 +02:00
action = function(player)
local name = player:get_player_name()
awards.show_to(name, name, nil, false)
end,
})
end