mods/default/player.lua

   1 -- Minetest 0.4 mod: player
   2 -- See README.txt for licensing and other information.
   3
   4 --[[
   5
   6 API
   7 ---
   8
   9 default.player_register_model(name, def)
  10 ^ Register a new model to be used by players.
  11 ^ <name> is the model filename such as "character.x", "foo.b3d", etc.
  12 ^ See Model Definition below for format of <def>.
  13
  14 default.registered_player_models[name]
  15 ^ See Model Definition below for format.
  16
  17 default.player_set_model(player, model_name)
  18 ^ <player> is a PlayerRef.
  19 ^ <model_name> is a model registered with player_register_model.
  20
  21 default.player_set_animation(player, anim_name [, speed])
  22 ^ <player> is a PlayerRef.
  23 ^ <anim_name> is the name of the animation.
  24 ^ <speed> is in frames per second. If nil, default from the model is used
  25
  26 default.player_set_textures(player, textures)
  27 ^ <player> is a PlayerRef.
  28 ^ <textures> is an array of textures
  29 ^ If <textures> is nil, the default textures from the model def are used
  30
  31 default.player_get_animation(player)
  32 ^ <player> is a PlayerRef.
  33 ^ Returns a table containing fields "model", "textures" and "animation".
  34 ^ Any of the fields of the returned table may be nil.
  35
  36 Model Definition
  37 ----------------
  38
  39 model_def = {
  40         animation_speed = 30, -- Default animation speed, in FPS.
  41         textures = {"character.png", }, -- Default array of textures.
  42         visual_size = {x=1, y=1,}, -- Used to scale the model.
  43         animations = {
  44                 -- <anim_name> = { x=<start_frame>, y=<end_frame>, },
  45                 foo = { x= 0, y=19, },
  46                 bar = { x=20, y=39, },
  47                 -- ...
  48         },
  49 }
  50
  51 ]]
  52
  53 -- Player animation blending
  54 -- Note: This is currently broken due to a bug in Irrlicht, leave at 0
  55 local animation_blend = 0
  56
  57 default.registered_player_models = { }
  58
  59 -- Local for speed.
  60 local models = default.registered_player_models
  61
  62 function default.player_register_model(name, def)
  63         models[name] = def
  64 end
  65
  66 -- Default player appearance
  67 default.player_register_model("character.x", {
  68         animation_speed = 30,
  69         textures = {"character.png", },
  70         animations = {
  71                 -- Standard animations.
  72                 stand     = { x=  0, y= 79, },
  73                 lay       = { x=162, y=166, },
  74                 walk      = { x=168, y=187, },
  75                 mine      = { x=189, y=198, },
  76                 walk_mine = { x=200, y=219, },
  77                 -- Extra animations (not currently used by the game).
  78                 sit       = { x= 81, y=160, },
  79         },
  80 })
  81
  82 -- Player stats and animations
  83 local player_model = {}
  84 local player_textures = {}
  85 local player_anim = {}
  86 local player_sneak = {}
  87
  88 function default.player_get_animation(player)
  89         local name = player:get_player_name()
  90         return {
  91                 model = player_model[name],
  92                 textures = player_textures[name],
  93                 animation = player_anim[name],
  94         }
  95 end
  96
  97 -- Called when a player's appearance needs to be updated
  98 function default.player_set_model(player, model_name)
  99         local name = player:get_player_name()
 100         local model = models[model_name]
 101         if model then
 102                 if player_model[name] == model_name then
 103                         return
 104                 end
 105                 player:set_properties({
 106                         mesh = model_name,
 107                         textures = player_textures[name] or model.textures,
 108                         visual = "mesh",
 109                         visual_size = model.visual_size or {x=1, y=1},
 110                 })
 111                 default.player_set_animation(player, "stand")
 112         else
 113                 player:set_properties({
 114                         textures = { "player.png", "player_back.png", },
 115                         visual = "upright_sprite",
 116                 })
 117         end
 118         player_model[name] = model_name
 119 end
 120
 121 function default.player_set_textures(player, textures)
 122         local name = player:get_player_name()
 123         player_textures[name] = textures
 124         player:set_properties({textures = textures,})
 125 end
 126
 127 function default.player_set_animation(player, anim_name, speed)
 128         local name = player:get_player_name()
 129         if player_anim[name] == anim_name then
 130                 return
 131         end
 132         local model = player_model[name] and models[player_model[name]]
 133         if not (model and model.animations[anim_name]) then
 134                 return
 135         end
 136         local anim = model.animations[anim_name]
 137         player_anim[name] = anim_name
 138         player:set_animation(anim, speed or model.animation_speed, animation_blend)
 139 end
 140
 141 -- Update appearance when the player joins
 142 minetest.register_on_joinplayer(function(player)
 143         default.player_set_model(player, "character.x")
 144         player:set_local_animation({x=0, y=79}, {x=168, y=187}, {x=189, y=198}, {x=200, y=219}, 30)
 145 end)
 146
 147 minetest.register_on_leaveplayer(function(player)
 148         local name = player:get_player_name()
 149         player_model[name] = nil
 150         player_anim[name] = nil
 151         player_textures[name] = nil
 152 end)
 153
 154 -- Localize for better performance.
 155 local player_set_animation = default.player_set_animation
 156
 157 -- Check each player and apply animations
 158 minetest.register_globalstep(function(dtime)
 159         for _, player in pairs(minetest.get_connected_players()) do
 160                 local name = player:get_player_name()
 161                 local model_name = player_model[name]
 162                 local model = model_name and models[model_name]
 163                 if model then
 164                         local controls = player:get_player_control()
 165                         local walking = false
 166                         local animation_speed_mod = model.animation_speed or 30
 167
 168                         -- Determine if the player is walking
 169                         if controls.up or controls.down or controls.left or controls.right then
 170                                 walking = true
 171                         end
 172
 173                         -- Determine if the player is sneaking, and reduce animation speed if so
 174                         if controls.sneak then
 175                                 animation_speed_mod = animation_speed_mod / 2
 176                         end
 177
 178                         -- Apply animations based on what the player is doing
 179                         if player:get_hp() == 0 then
 180                                 player_set_animation(player, "lay")
 181                         elseif walking then
 182                                 if player_sneak[name] ~= controls.sneak then
 183                                         player_anim[name] = nil
 184                                         player_sneak[name] = controls.sneak
 185                                 end
 186                                 if controls.LMB then
 187                                         player_set_animation(player, "walk_mine", animation_speed_mod)
 188                                 else
 189                                         player_set_animation(player, "walk", animation_speed_mod)
 190                                 end
 191                         elseif controls.LMB then
 192                                 player_set_animation(player, "mine")
 193                         else
 194                                 player_set_animation(player, "stand", animation_speed_mod)
 195                         end
 196                 end
 197         end
 198 end)