5 --[[ table containing the groups (experimental) ]]
6 playereffects
.groups
= {}
8 --[[ table containing all the effect types ]]
9 playereffects
.effect_types
= {}
11 --[[ table containing all the active effects ]]
12 playereffects
.effects
= {}
14 --[[ table containing all the inactive effects.
15 Effects become inactive if a player leaves an become active again if they join again. ]]
16 playereffects
.inactive_effects
= {}
18 -- Variable for counting the effect_id
19 playereffects
.last_effect_id
= 0
21 --[=[ Include settings ]=]
22 dofile(minetest
.get_modpath("playereffects").."/settings.lua")
24 --[=[ Load inactive_effects and last_effect_id from playereffects.mt, if this file exists ]=]
26 local filepath
= minetest
.get_worldpath().."/playereffects.mt"
27 local file
= io
.open(filepath
, "r")
30 minetest
.log("action", "[playereffects] playereffects.mt opened.")
31 local string = file
:read()
33 if(string ~= nil) then
34 savetable
= minetest
.deserialize(string)
35 playereffects
.inactive_effects
= savetable
.inactive_effects
36 minetest
.debug("[playereffects] playereffects.mt successfully read.")
37 minetest
.debug("[playereffects] inactive_effects = "..dump(playereffects
.inactive_effects
))
38 playereffects
.last_effect_id
= savetable
.last_effect_id
39 minetest
.debug("[playereffects] last_effect_id = "..dump(playereffects
.last_effect_id
))
45 function playereffects
.next_effect_id()
46 playereffects
.last_effect_id
= playereffects
.last_effect_id
+ 1
47 return playereffects
.last_effect_id
50 --[=[ API functions ]=]
51 function playereffects
.register_effect_type(name
, description
, icon
, groups
, apply
, cancel
, hidden
)
53 effect_type
.description
= description
54 effect_type
.apply
= apply
55 effect_type
.groups
= groups
56 effect_type
.icon
= icon
58 effect_type
.cancel
= cancel
60 effect_type
.cancel
= function() end
63 effect_type
.hidden
= hidden
65 effect_type
.hidden
= false
67 playereffects
.effect_types
[name
] = effect_type
68 minetest
.log("action", "[playereffects] Effect type "..name
.." registered!")
71 function playereffects
.apply_effect_type(effect_type_id
, duration
, player
)
72 local start_time
= os
.time()
73 local playername
= player
:get_player_name()
74 local groups
= playereffects
.effect_types
[effect_type_id
].groups
75 for k
,v
in pairs(groups
) do
76 playereffects
.cancel_effect_group(v
, playername
)
78 local effect_id
= playereffects
.next_effect_id()
79 local effects
= playereffects
.get_player_effects(playername
)
81 local biggest_hudpos
= -1
84 local hudpos
= effects
[e
].hudpos
85 if(hudpos
> biggest_hudpos
) then
86 biggest_hudpos
= hudpos
88 if(smallest_hudpos
== nil) then
89 smallest_hudpos
= hudpos
90 elseif(hudpos
< smallest_hudpos
) then
91 smallest_hudpos
= hudpos
94 if(smallest_hudpos
== nil) then
96 elseif(smallest_hudpos
>= 0) then
97 free_hudpos
= smallest_hudpos
- 1
99 free_hudpos
= biggest_hudpos
+ 1
102 --[[ show no more than 20 effects on the screen, so that hud_update does not need to be called so often ]]
103 if(free_hudpos
<= 20) then
104 hudids
= playereffects
.hud_effect(effect_type_id
, player
, free_hudpos
, duration
)
106 hudids
= {text_id
=nil, icon_id
=nil}
110 playername
= playername
,
111 effect_id
= effect_id
,
112 effect_type_id
= effect_type_id
,
113 start_time
= start_time
,
114 time_left
= duration
,
116 hudpos
= free_hudpos
,
119 playereffects
.effects
[effect_id
] = effect
121 playereffects
.effect_types
[effect_type_id
].apply(player
)
122 minetest
.log("action", "[playereffects] Effect type "..effect_type_id
.." applied to player "..playername
.."!")
123 minetest
.after(duration
, function(effect_id
) playereffects
.cancel_effect(effect_id
) end, effect_id
)
126 function playereffects
.cancel_effect_type(effect_type_id
, cancel_all
, playername
)
127 local effects
= playereffects
.get_player_effects(playername
)
128 if(cancel_all
==nil) then all
= false end
130 if(effects
[e
].effect_type_id
== effect_type_id
) then
131 playereffects
.cancel_effect(effects
[e
].effect_id
)
132 if(cancel_all
==false) then
139 function playereffects
.cancel_effect_group(groupname
, playername
)
140 local effects
= playereffects
.get_player_effects(playername
)
142 local effect
= effects
[e
]
143 local thesegroups
= playereffects
.effect_types
[effect
.effect_type_id
].groups
145 for g
=1,#thesegroups
do
146 if(thesegroups
[g
] == groupname
) then
147 playereffects
.cancel_effect(effect
.effect_id
)
154 function playereffects
.cancel_effect(effect_id
)
155 local effect
= playereffects
.effects
[effect_id
]
156 if(effect
~= nil) then
157 local player
= minetest
.get_player_by_name(effect
.playername
)
158 if(effect
.hudids
.text_id
~=nil) then
159 player
:hud_remove(effect
.hudids
.text_id
)
161 if(effect
.hudids
.icon_id
~=nil) then
162 player
:hud_remove(effect
.hudids
.icon_id
)
164 playereffects
.effect_types
[effect
.effect_type_id
].cancel(effect
)
165 playereffects
.effects
[effect_id
] = nil
166 minetest
.log("action", "[playereffects] Effect type "..effect
.effect_type_id
.." cancelled from player "..effect
.playername
.."!")
170 function playereffects
.get_player_effects(playername
)
171 if(minetest
.get_player_by_name(playername
) ~= nil) then
173 for k
,v
in pairs(playereffects
.effects
) do
174 if(v
.playername
== playername
) then
175 table.insert(effects
, v
)
185 --[[ Cancel all effects on player death ]]
186 minetest
.register_on_dieplayer(function(player
)
187 local effects
= playereffects
.get_player_effects(player
:get_player_name())
189 playereffects
.cancel_effect(effects
[e
].effect_id
)
194 minetest
.register_on_leaveplayer(function(player
)
195 local leave_time
= os
.time()
196 local playername
= player
:get_player_name()
197 local effects
= playereffects
.get_player_effects(playername
)
199 playereffects
.hud_clear(player
)
201 if(playereffects
.inactive_effects
[playername
] == nil) then
202 playereffects
.inactive_effects
[playername
] = {}
205 local new_duration
= effects
[e
].time_left
- os
.difftime(leave_time
, effects
[e
].start_time
)
206 local new_effect
= effects
[e
]
207 new_effect
.time_left
= new_duration
208 table.insert(playereffects
.inactive_effects
[playername
], new_effect
)
209 playereffects
.cancel_effect(effects
[e
].effect_id
)
213 minetest
.register_on_shutdown(function()
214 minetest
.log("action", "[playereffects] Server shuts down. Rescuing data into playereffects.mt")
215 local shutdown_time
= os
.time()
217 local effects
= playereffects
.effects
218 local inactive_effects
= playereffects
.inactive_effects
219 for id
,effect
in pairs(effects
) do
220 local new_duration
= effect
.time_left
- os
.difftime(shutdown_time
, effect
.start_time
)
221 local new_effect
= effect
222 new_effect
.time_left
= new_duration
223 if(inactive_effects
[effect
.playername
] == nil) then
224 inactive_effects
[effect
.playername
] = {}
226 table.insert(inactive_effects
[effect
.playername
], new_effect
)
227 playereffects
.cancel_effect(effect
.effect_id
)
230 savetable
.inactive_effects
= inactive_effects
231 savetable
.last_effect_id
= playereffects
.last_effect_id
233 savestring
= minetest
.serialize(savetable
)
235 local filepath
= minetest
.get_worldpath().."/playereffects.mt"
236 local file
= io
.open(filepath
, "w")
238 file
:write(savestring
)
240 minetest
.log("action", "[playereffects] Wrote playereffects data into "..filepath
..".")
242 minetest
.log("error", "[playereffects] Failed to write playereffects data into "..filepath
..".")
247 minetest
.register_on_joinplayer(function(player
)
248 local playername
= player
:get_player_name()
250 -- load all the effects again (if any)
251 if(playereffects
.inactive_effects
[playername
] ~= nil) then
252 for i
=1,#playereffects
.inactive_effects
[playername
] do
253 local effect
= playereffects
.inactive_effects
[playername
][i
]
254 playereffects
.apply_effect_type(effect
.effect_type_id
, effect
.time_left
, player
)
256 playereffects
.inactive_effects
[playername
] = nil
260 playereffects
.globalstep_timer
= 0
261 minetest
.register_globalstep(function(dtime
)
262 playereffects
.globalstep_timer
= playereffects
.globalstep_timer
+ dtime
263 if(playereffects
.globalstep_timer
< 1) then
266 playereffects
.globalstep_timer
= 0
268 local players
= minetest
.get_connected_players()
270 playereffects
.hud_update(players
[p
])
278 function playereffects
.hud_update(player
)
279 if(playereffects
.use_hud
== true) then
280 local now
= os
.time()
281 local effects
= playereffects
.get_player_effects(player
:get_player_name())
283 local effect
= effects
[e
]
284 if(effect
.hudids
.text_id
~= nil) then
285 local description
= playereffects
.effect_types
[effect
.effect_type_id
].description
286 local time_left
= os
.difftime(effect
.start_time
+ effect
.time_left
, now
)
287 player
:hud_change(effect
.hudids
.text_id
, "text", description
.. " ("..tostring(time_left
).." s)")
293 function playereffects
.hud_clear(player
)
294 if(playereffects
.use_hud
== true) then
295 local playername
= player
:get_player_name()
296 local effects
= playereffects
.get_player_effects(playername
)
297 if(effects
~= nil) then
299 if(effects
[e
].hudids
.text_id
~= nil) then
300 player
:hud_remove(effects
[e
].hudids
.text_id
)
302 if(effects
[e
].hudids
.icon_id
~= nil) then
303 player
:hud_remove(effects
[e
].hudids
.icon_id
)
310 function playereffects
.hud_effect(effect_type_id
, player
, pos
, time_left
)
311 local text_id
, icon_id
312 local effect_type
= playereffects
.effect_types
[effect_type_id
]
313 if(playereffects
.use_hud
== true and effect_type
.hidden
== false) then
314 text_id
= player
:hud_add({
315 hud_elem_type
= "text",
316 position
= { x
= 1, y
= 0.3 },
317 name
= "effect_"..effect_type_id
,
318 text
= playereffects
.effect_types
[effect_type_id
].description
.. " ("..tostring(time_left
).." s)",
319 scale
= { x
= 170, y
= 20},
320 alignment
= { x
= -1, y
= 0 },
323 offset
= { x
= -5, y
= pos
*20 }
325 if(playereffects
.effect_types
[effect_type_id
].icon
~= nil) then
326 icon_id
= player
:hud_add({
327 hud_elem_type
= "image",
328 scale
= { x
= 1, y
= 1 },
329 position
= { x
= 1, y
= 0.3 },
330 name
= "effect_icon_"..effect_type_id
,
331 text
= playereffects
.effect_types
[effect_type_id
].icon
,
332 alignment
= { x
= -1, y
=0 },
334 offset
= { x
= -186, y
= pos
*20 },
341 return { text_id
= text_id
, icon_id
= icon_id
}
346 dofile(minetest
.get_modpath(minetest
.get_current_modname()).."/examples.lua")