mods/PLAYER/mcl_sprint/init.lua

   1 --[[
   2 Sprint mod for Minetest by GunshipPenguin
   3
   4 To the extent possible under law, the author(s)
   5 have dedicated all copyright and related and neighboring rights
   6 to this software to the public domain worldwide. This software is
   7 distributed without any warranty.
   8 ]]
   9
  10 --Configuration variables, these are all explained in README.md
  11 mcl_sprint = {}
  12
  13 mcl_sprint.SPEED = 1.3
  14
  15 local players = {}
  16
  17 -- Returns true if the player with the given name is sprinting, false if not.
  18 -- Returns nil if player does not exist.
  19 mcl_sprint.is_sprinting = function(playername)
  20         if players[playername] then
  21                 return players[playername].sprinting
  22         else
  23                 return nil
  24         end
  25 end
  26
  27 minetest.register_on_joinplayer(function(player)
  28         local playerName = player:get_player_name()
  29
  30         players[playerName] = {
  31                 sprinting = false,
  32                 timeOut = 0,
  33                 shouldSprint = false,
  34                 lastPos = player:get_pos(),
  35                 sprintDistance = 0,
  36         }
  37 end)
  38 minetest.register_on_leaveplayer(function(player)
  39         local playerName = player:get_player_name()
  40         players[playerName] = nil
  41 end)
  42
  43 local function setSprinting(playerName, sprinting) --Sets the state of a player (0=stopped/moving, 1=sprinting)
  44         local player = minetest.get_player_by_name(playerName)
  45         if players[playerName] then
  46                 players[playerName]["sprinting"] = sprinting
  47                 if sprinting == true then
  48                         playerphysics.add_physics_factor(player, "speed", "mcl_sprint:sprint", mcl_sprint.SPEED)
  49                 elseif sprinting == false then
  50                         playerphysics.remove_physics_factor(player, "speed", "mcl_sprint:sprint")
  51                 end
  52                 return true
  53         end
  54         return false
  55 end
  56 minetest.register_globalstep(function(dtime)
  57         --Get the gametime
  58         local gameTime = minetest.get_gametime()
  59
  60         --Loop through all connected players
  61         for playerName,playerInfo in pairs(players) do
  62                 local player = minetest.get_player_by_name(playerName)
  63                 if player ~= nil then
  64                         local ctrl = player:get_player_control()
  65                         --Check if the player should be sprinting
  66                         if ctrl.aux1 and ctrl.up and not ctrl.sneak then
  67                                 players[playerName]["shouldSprint"] = true
  68                         else
  69                                 players[playerName]["shouldSprint"] = false
  70                         end
  71
  72                         local playerPos = player:get_pos()
  73                         --If the player is sprinting, create particles behind and cause exhaustion
  74                         if playerInfo["sprinting"] == true and gameTime % 0.1 == 0 then
  75
  76                                 -- Exhaust player for sprinting
  77                                 local lastPos = players[playerName].lastPos
  78                                 local dist = vector.distance({x=lastPos.x, y=0, z=lastPos.z}, {x=playerPos.x, y=0, z=playerPos.z})
  79                                 players[playerName].sprintDistance = players[playerName].sprintDistance + dist
  80                                 if players[playerName].sprintDistance >= 1 then
  81                                         local superficial = math.floor(players[playerName].sprintDistance)
  82                                         mcl_hunger.exhaust(playerName, mcl_hunger.EXHAUST_SPRINT * superficial)
  83                                         players[playerName].sprintDistance = players[playerName].sprintDistance - superficial
  84                                 end
  85
  86                                 -- Sprint dirt particles
  87                                 local numParticles = math.random(1, 2)
  88                                 local playerNode = minetest.get_node({x=playerPos["x"], y=playerPos["y"]-1, z=playerPos["z"]})
  89                                 if playerNode["name"] ~= "air" then
  90                                         for i=1, numParticles, 1 do
  91                                                 minetest.add_particle({
  92                                                         pos = {x=playerPos["x"]+math.random(-1,1)*math.random()/2,y=playerPos["y"]+0.1,z=playerPos["z"]+math.random(-1,1)*math.random()/2},
  93                                                         velocity = {x=0, y=5, z=0},
  94                                                         acceleration = {x=0, y=-13, z=0},
  95                                                         expirationtime = math.random(),
  96                                                         size = math.random()+0.5,
  97                                                         collisiondetection = true,
  98                                                         vertical = false,
  99                                                         texture = "default_dirt.png",
 100                                                 })
 101                                         end
 102                                 end
 103                         end
 104
 105                         --Adjust player states
 106                         players[playerName].lastPos = playerPos
 107                         if players[playerName]["shouldSprint"] == true then --Stopped
 108                                 local sprinting
 109                                 -- Prevent sprinting if hungry or sleeping
 110                                 if (mcl_hunger.active and mcl_hunger.get_hunger(player) <= 6) or (player:get_attribute("mcl_beds:sleeping") == "true")then
 111                                         sprinting = false
 112                                 else
 113                                         sprinting = true
 114                                 end
 115                                 setSprinting(playerName, sprinting)
 116                         elseif players[playerName]["shouldSprint"] == false then
 117                                 setSprinting(playerName, false)
 118                         end
 119
 120                 end
 121         end
 122 end)