Guest User

Untitled

a guest
Jan 23rd, 2018
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.32 KB | None | 0 0
  1. Log = {}
  2. LogFile = os.date("%d.%m.%y")..".txt"
  3. if !file.Exists("Logs/"..LogFile.."") then
  4. file.Write("Logs/"..LogFile.."", "")
  5. end
  6. function Log.Add(data)
  7. file.Read("Logs/"..LogFile.."", os.date("%d/%m/%y %H:%M:%S :").." "..data)
  8. end
  9.  
  10. hook.Add("ScalePlayerDamage", "LogDamage", function(ply, hitgroup, dmginfo)
  11. attacker = dmginfo:GetAttacker()
  12. inflictor = dmginfo:GetInflictor()
  13. if ply and ValidEntity(ply) and ply:IsPlayer() then
  14. local logstring = ent:Nick().." took "..amt.." damage. "
  15. if dmginfo:IsFallDamage() then
  16. logstring = logstring.."It was fall damage. "
  17. elseif ply == attacker then
  18. logstring = logstring.."It was suicide. "
  19. elseif dmginfo:IsBulletDamage()
  20. local extra = ""
  21. if attacker:IsPlayer() then
  22. extra = ", "..attacker:Nick().." using a "..inflictor:GetClass().." "
  23. end
  24. logstring = logstring.."It was bullet damage from a "..attacker:GetClass()..""..extra..". "
  25. elseif dmginfo:IsExplosionDamage()
  26. logstring = logstring.."It was explosive damage from a "..inflictor:GetClass()..". "
  27. else
  28. logstring = logstring.."It was damage from an unknown source. "..inflictor:GetClass().."|"..attacker:GetClass().."."
  29. end
  30.  
  31. if hitgroup == HITGROUP_GENERIC then
  32. logstring = logstring.."It wasn't taken in a specific area. "
  33. elseif hitgroup == HITGROUP_HEAD then
  34. logstring = logstring.."It was taken in the head. "
  35. elseif hitgroup == HITGROUP_CHEST then
  36. logstring = logstring.."It was taken in the chest. "
  37. elseif hitgroup == HITGROUP_STOMACH then
  38. logstring = logstring.."It was taken in the stomach. "
  39. elseif hitgroup == HITGROUP_LEFTARM then
  40. logstring = logstring.."It was taken in the left arm. "
  41. elseif hitgroup == HITGROUP_RIGHTARM then
  42. logstring = logstring.."It was taken in the right arm. "
  43. elseif hitgroup == HITGROUP_LEFTLEG then
  44. logstring = logstring.."It was taken in the left leg. "
  45. elseif hitgroup == HITGROUP_RIGHTLEG then
  46. logstring = logstring.."It was taken in the right leg. "
  47. end
  48. local fatal = false
  49. if dmginfo:GetDamage() > ply:Health() then
  50. logstring = logstring.."It was fatal. "
  51. fatal = true
  52. else
  53. logstring = logstring.."It was NOT fatal. "
  54. end
  55.  
  56. Log.Add(logstring)
  57. if fatal == true then
  58. local logstring2 = ply:Nick().." was killed."
  59. Log.Add(logstring2)
  60. end
  61. end
  62. end)
Add Comment
Please, Sign In to add comment