1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
|
-- global values
hud.registered_items = {}
hud.damage_events = {}
hud.breath_events = {}
-- keep id handling internal
local hud_id = {} -- hud item ids
local sb_bg = {} -- statbar background ids
-- localize often used table
local items = hud.registered_items
local function throw_error(msg)
minetest.log("error", "Better HUD[error]: " .. msg)
end
--
-- API
--
function hud.register(name, def)
if not name or not def then
throw_error("not enough parameters given")
return false
end
--TODO: allow other elements
if def.hud_elem_type ~= "statbar" then
throw_error("The given HUD element is no statbar")
return false
end
if items[name] ~= nil then
throw_error("A statbar with that name already exists")
return false
end
-- actually register
-- add background first since draworder is based on id :\
if def.hud_elem_type == "statbar" and def.background ~= nil then
sb_bg[name] = table.copy(def)
sb_bg[name].text = def.background
if not def.autohide_bg and def.max then
sb_bg[name].number = def.max
end
end
-- add item itself
items[name] = def
-- register events
if def.events then
for _,v in pairs(def.events) do
if v and v.type and v.func then
if v.type == "damage" then
table.insert(hud.damage_events, v)
end
if v.type == "breath" then
table.insert(hud.breath_events, v)
end
end
end
end
-- no error so far, return sucess
return true
end
function hud.change_item(player, name, def)
if not player or not player:is_player() or not name or not def then
throw_error("Not enough parameters given to change HUD item")
return false
end
local i_name = player:get_player_name().."_"..name
local elem = hud_id[i_name]
if not elem then
throw_error("Given HUD element " .. dump(name) .. " does not exist".." hääää")
return false
end
-- Only update if values supported and value actually changed
-- update supported values (currently number and text only)
if def.number and elem.number then
if def.number ~= elem.number then
if elem.max and def.number > elem.max and not def.max then
def.number = elem.max
end
if def.max then
elem.max = def.max
end
player:hud_change(elem.id, "number", def.number)
elem.number = def.number
-- hide background when set
local bg = hud_id[i_name.."_bg"]
if elem.autohide_bg then
if def.number < 1 then
player:hud_change(bg.id, "number", 0)
else
local num = bg.number
if bg.max then
num = bg.max
end
player:hud_change(bg.id, "number", num)
end
else
if bg and bg.max and bg.max < 1 and def.max and def.max > bg.max then
player:hud_change(bg.id, "number", def.max)
bg.max = def.max
end
end
end
end
if def.text and elem.text then
if def.text ~= elem.text then
player:hud_change(elem.id, "text", def.text)
elem.text = def.text
end
end
if def.offset and elem.offset then
if def.item_name and def.offset == "item" then
local i_name2 = player:get_player_name().."_"..def.item_name
local elem2 = hud_id[i_name2]
if elem2 then
local p2 = elem2.offset
local p1 = elem.offset
player:hud_change(elem2.id, "offset", p1)
player:hud_change(elem.id, "offset", p2)
elem2.offset = p1
elem.offset = p2
if elem.background then
local elem3 = hud_id[i_name.."_bg"]
if elem3 and elem3.offset then
player:hud_change(elem3.id, "offset", p2)
elem3.offset = p2
local elem4 = hud_id[i_name2.."_bg"]
if elem4 and elem4.offset then
player:hud_change(elem4.id, "offset", p1)
elem4.offset = p1
end
end
end
end
else
player:hud_change(elem.id, "offset", def.offset)
elem.offset = def.offset
end
end
return true
end
function hud.remove_item(player, name)
if not player or not name then
throw_error("Not enough parameters given")
return false
end
local i_name = player:get_player_name().."_"..name
if hud_id[i_name] == nil then
throw_error("Given HUD element " .. dump(name) .. " does not exist")
return false
end
player:hud_remove(hud_id[i_name].id)
hud_id[i_name] = nil
return true
end
--
-- Add registered HUD items to joining players
--
-- Following code is placed here to keep HUD ids internal
local function add_hud_item(player, name, def)
if not player or not name or not def then
throw_error("not enough parameters given")
return false
end
local i_name = player:get_player_name().."_"..name
hud_id[i_name] = def
hud_id[i_name].id = player:hud_add(def)
end
minetest.register_on_joinplayer(function(player)
-- first: hide the default statbars
local hud_flags = player:hud_get_flags()
hud_flags.healthbar = false
hud_flags.breathbar = false
player:hud_set_flags(hud_flags)
-- now add the backgrounds (e.g. for statbars)
for _,item in pairs(sb_bg) do
add_hud_item(player, _.."_bg", item)
end
-- and finally the actual HUD items
for _,item in pairs(items) do
add_hud_item(player, _, item)
end
-- fancy hotbar (only when no crafting mod present)
if minetest.get_modpath("crafting") == nil then
minetest.after(0.5, function()
player:hud_set_hotbar_image("hud_hotbar.png")
player:hud_set_hotbar_selected_image("hud_hotbar_selected.png")
end)
end
end)
|
