init.lua

   1 --[=[ Main tables ]=]
   2
   3 playereffects = {}
   4
   5 --[[ table containing the groups (experimental) ]]
   6 playereffects.groups = {}
   7
   8 --[[ table containing all the effect types ]]
   9 playereffects.effect_types = {}
  10
  11 --[[ table containing all the active effects ]]
  12 playereffects.effects = {}
  13
  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 = {}
  17
  18 --[[ table (indexed by player names) containing tables containing the active HUD IDs for players
  19         Example: { ["Player 1"] = {1,2,3}, ["Player 2"] = {2}, ["Player 3"] = {} }
  20 ]]
  21 playereffects.hudids = {}
  22
  23 -- Variable for counting the effect_id
  24 playereffects.last_effect_id = 0
  25
  26 function playereffects.next_effect_id()
  27         playereffects.last_effect_id = playereffects.last_effect_id + 1
  28         return playereffects.last_effect_id
  29 end
  30
  31 --[=[ API functions ]=]
  32 function playereffects.register_effect_type(name, description, groups, apply, cancel)
  33         effect_type = {}
  34         effect_type.description = description
  35         effect_type.apply = apply
  36         effect_type.groups = groups
  37         if cancel ~= nil then
  38                 effect_type.cancel = cancel
  39         else
  40                 effect_type.cancel = function() end
  41         end
  42         playereffects.effect_types[name] = effect_type
  43         minetest.log("action", "Effect type "..name.." registered!")
  44 end
  45
  46 function playereffects.apply_effect_type(effect_type_id, duration, player)
  47         local start_time = os.time()
  48         local playername = player:get_player_name()
  49         local groups = playereffects.effect_types[effect_type_id].groups
  50         for k,v in pairs(groups) do
  51                 playereffects.cancel_effect_group(v, playername)
  52         end
  53         local effect_id = playereffects.next_effect_id()
  54 --      local hudpos = #playereffects.get_player_effects(playername)
  55         local effects = playereffects.get_player_effects(playername)
  56         local smallest_hudpos
  57         local biggest_hudpos = -1
  58         local free_hudpos
  59         for e=1,#effects do
  60                 local hudpos = effects[e].hudpos
  61                 if(hudpos > biggest_hudpos) then
  62                         biggest_hudpos = hudpos
  63                 end
  64                 if(smallest_hudpos == nil) then
  65                         smallest_hudpos = hudpos
  66                 elseif(hudpos < smallest_hudpos) then
  67                         smallest_hudpos = hudpos
  68                 end
  69         end
  70         if(smallest_hudpos == nil) then
  71                 free_hudpos = 0
  72         elseif(smallest_hudpos >= 0) then
  73                 free_hudpos = smallest_hudpos - 1
  74         else
  75                 free_hudpos = biggest_hudpos + 1
  76         end
  77         local hudid = playereffects.hud_effect(effect_type_id, player, free_hudpos)
  78
  79         local effect = {
  80                         playername = playername,
  81                         effect_id = effect_id,
  82                         effect_type_id = effect_type_id,
  83                         start_time = start_time,
  84                         time_left = duration,
  85                         hudid = hudid,
  86                         hudpos = free_hudpos,
  87                         }
  88
  89         playereffects.effects[effect_id] = effect
  90
  91         playereffects.effect_types[effect_type_id].apply(player)
  92         minetest.log("action", "Effect type "..effect_type_id.." applied to player "..playername.."!")
  93         minetest.after(duration, function(effect_id) playereffects.cancel_effect(effect_id) end, effect_id)
  94 end
  95
  96 -- TODO
  97 function playereffects.cancel_effect_type(effect_type_id, playername)
  98 end
  99
 100 function playereffects.cancel_effect_group(groupname, playername)
 101         local effects = playereffects.get_player_effects(playername)
 102         for e=1,#effects do
 103                 local effect = effects[e]
 104                 local thesegroups = playereffects.effect_types[effect.effect_type_id].groups
 105                 minetest.log("action", "thesegroups = "..dump(thesegroups))
 106                 minetest.log("action", "groupname = "..dump(groupname))
 107                 local delete = false
 108                 for g=1,#thesegroups do
 109                         if(thesegroups[g] == groupname) then
 110                                 playereffects.cancel_effect(effect.effect_id)
 111                                 break
 112                         end
 113                 end
 114         end
 115 end
 116
 117 function playereffects.cancel_effect(effect_id)
 118         local effect = playereffects.effects[effect_id]
 119         if(effect ~= nil) then
 120                 local player = minetest.get_player_by_name(effect.playername)
 121                 player:hud_remove(effect.hudid)
 122                 playereffects.effect_types[effect.effect_type_id].cancel(effect)
 123                 playereffects.effects[effect_id] = nil
 124                 minetest.log("action", "Effect type "..effect.effect_type_id.." cancelled from player "..effect.playername.."!")
 125         end
 126 end
 127
 128 function playereffects.get_player_effects(playername)
 129         if(minetest.get_player_by_name(playername) ~= nil) then
 130                 local effects = {}
 131                 for k,v in pairs(playereffects.effects) do
 132                         if(v.playername == playername) then
 133                                 table.insert(effects, v)
 134                         end
 135                 end
 136                 return effects
 137         else
 138                 return {}
 139         end
 140 end
 141
 142 --[=[ Callbacks ]=]
 143 --[[ Cancel all effects on player death ]]
 144 minetest.register_on_dieplayer(function(player)
 145         local effects = playereffects.get_player_effects(player:get_player_name())
 146         for e=1,#effects do
 147                 playereffects.cancel_effect(effects[e].effect_id)
 148         end
 149 end)
 150
 151
 152 minetest.register_on_leaveplayer(function(player)
 153         local leave_time = os.time()
 154         local playername = player:get_player_name()
 155         local effects = playereffects.get_player_effects(playername)
 156
 157         playereffects.hud_clear(player)
 158         playereffects.hudids[playername] = nil
 159
 160         if(playereffects.inactive_effects[playername] == nil) then
 161                 playereffects.inactive_effects[playername] = {}
 162         end
 163         for e=1,#effects do
 164                 local start_time = effects[e].start_time
 165                 local new_duration = os.difftime(leave_time, start_time)
 166                 local new_effect = effects[e]
 167                 new_effect.time_left = new_duration
 168                 table.insert(playereffects.inactive_effects[playername], new_effect)
 169                 playereffects.cancel_effect(effects[e].effect_id)
 170         end
 171 end)
 172
 173
 174 minetest.register_on_joinplayer(function(player)
 175         minetest.after(0, playereffects.join0, player)
 176 end)
 177
 178 function playereffects.join0(player)
 179         local playername = player:get_player_name()
 180
 181         -- load all the effects again (if any)
 182         if(playereffects.inactive_effects[playername] ~= nil) then
 183                 for i=1,#playereffects.inactive_effects[playername] do
 184                         local effect = playereffects.inactive_effects[playername][i]
 185                         playereffects.apply_effect_type(effect.effect_type_id, effect.time_left, player)
 186                 end
 187                 playereffects.inactive_effects[playername] = nil
 188         end
 189
 190 end
 191
 192 minetest.register_globalstep(function()
 193         local players = minetest.get_connected_players()
 194         for p=1,#players do
 195                 playereffects.hud_update(players[p])
 196         end
 197 end)
 198
 199 --[[
 200 minetest.register_on_shutdown(function()
 201
 202 end)
 203 ]]
 204
 205 --[=[ HUD ]=]
 206 function playereffects.hud_update(player)
 207 --[[
 208         playereffects.hud_clear(player)
 209         local effects = playereffects.get_player_effects(player:get_player_name())
 210         for e=1,#effects do
 211                 playereffects.hud_effect(effects[e].effect_type_id, player, effects[e].hudpos)
 212         end
 213 ]]
 214         local now = os.time()
 215         local effects = playereffects.get_player_effects(player:get_player_name())
 216         for e=1,#effects do
 217                 local effect = effects[e]
 218                 local description = playereffects.effect_types[effect.effect_type_id].description
 219                 local time_left = os.difftime(effect.start_time + effect.time_left, now)
 220                 player:hud_change(effect.hudid, "text", description .. " ("..tostring(time_left).." s)")
 221         end
 222 end
 223
 224 function playereffects.hud_clear(player)
 225         local playername = player:get_player_name()
 226         local effects = playereffects.get_player_effects(playername)
 227         if(effects ~= nil) then
 228                 for e=1,#effects do
 229                         player:hud_remove(effects[e].hudid)
 230                 end
 231         end
 232 end
 233
 234 function playereffects.hud_effect(effect_type_id, player, pos)
 235         local id
 236         id = player:hud_add({
 237                 hud_elem_type = "text",
 238                 position = { x = 1, y = 0.3 },
 239                 name = "effect_"..effect_type_id,
 240                 text = playereffects.effect_types[effect_type_id].description,
 241                 scale = { x = 120, y = 20},
 242                 alignment = 1,
 243                 direction = 1,
 244                 number = 0xFFFFFF,
 245                 offset = { x = -120, y = pos*20 }
 246         })
 247         local playername = player:get_player_name()
 248         return id
 249 end
 250
 251
 252 -- EXAMPLES
 253 -- uncomment the line below if you want to try out the examples
 254 -- dofile(minetest.get_modpath(minetest.get_current_modname()).."/examples.lua")