Advertisement
Guest User

Untitled

a guest
Dec 17th, 2014
151
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.24 KB | None | 0 0
  1. function PANEL:Init()
  2.     self:DockMargin(0, 0, 0, 0)
  3.     self:DockPadding(0, 0, 0, 0)
  4.  
  5.     self.HealthModel = vgui.Create("Panel", self)--self.HealthModel = vgui.Create("ZSHealthModelPanel", self)--self.HealthModel = vgui.Create("Panel", self)
  6.     self.HealthModel:Dock(LEFT)
  7.  
  8.     local contents = vgui.Create("Panel", self)
  9.     contents:Dock(FILL)
  10.     contents.Paint = ContentsPaint
  11.  
  12.     local poisonstatus = vgui.Create("ZSHealthStatus", contents)
  13.     poisonstatus:SetTall(20)
  14.     poisonstatus:SetAlpha(200)
  15.     poisonstatus:SetColor(Color(255,255,255,255))
  16.     poisonstatus:SetMemberName(translate.Get("poison"))
  17.     poisonstatus.GetMemberValue = function(me)
  18.         local lp = LocalPlayer()
  19.         if lp:IsValid() then
  20.             return lp:GetPoisonDamage()
  21.         end
  22.     end
  23.     poisonstatus.MemberMaxValue = 50
  24.     poisonstatus:Dock(TOP)
  25.  
  26.     local bleedstatus = vgui.Create("ZSHealthStatus", contents)
  27.     bleedstatus:SetTall(20)
  28.     bleedstatus:SetAlpha(200)
  29.     bleedstatus:SetColor(Color(255,255,255,255))
  30.     bleedstatus:SetMemberName(translate.Get("bleed"))
  31.     bleedstatus.GetMemberValue = function(me)
  32.         local lp = LocalPlayer()
  33.         if lp:IsValid() then
  34.             return lp:GetBleedDamage()
  35.         end
  36.     end
  37.     bleedstatus.MemberMaxValue = 20
  38.     bleedstatus:Dock(TOP)
  39.  
  40.     self:ParentToHUD()
  41.     self:InvalidateLayout()
  42. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement