Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.34 KB | None | 0 0
  1. function sunrise_load_hud()
  2.     if sunrise_hud then
  3.         sunrise_clear_hud()
  4.     end
  5.     sunrise_hud = {}
  6.    
  7.     local Wide = ScrW() / 3
  8.     local Tall = ScrH() / 5
  9.  
  10.     local X = ScrW() - Wide
  11.     local Y = ScrH() - Tall
  12.    
  13.     local frame = vgui.Create"DFrame"
  14.         sunrise_hud.frame = frame
  15.         frame:SetTitle"Sunrise Hud"
  16.         frame:SetSize(Wide, Tall+22)
  17.         frame:SetPos(X, Y-22)
  18.        
  19.     local panel = vgui.Create("DColouredBox", frame)
  20.         sunrise_hud.panel = panel
  21.         panel:SetColor(Color(100, 100, 100, 200))
  22.         panel:SetPos(0, 22)
  23.         panel:SetSize(Wide, Tall)
  24.    
  25.     local overlay = vgui.Create("DImage", panel)
  26.         sunrise_hud.overlay = overlay
  27.         overlay:SetImage"gui/center_gradient"
  28.         overlay:SetImageColor(Color(150, 150, 150, 75))
  29.         overlay:SetPos(0, 0)
  30.         overlay:SetSize(Wide, Tall)
  31.    
  32.     sunrise_hud.buttons = {}
  33.     for i=1, 3 do
  34.         local button = vgui.Create("DButton", overlay)
  35.         sunrise_hud.buttons[i] = button
  36.         button:SetPos((i-1)*Wide/3, 0)
  37.         button:SetSize(Wide/3, Tall)
  38.         button:SetText("Button "..i)
  39.         function button:DoClick()
  40.             Msg(("Button %d (%s) was pressed\n"):format(i, tostring(self)))
  41.         end
  42.     end
  43.    
  44. end
  45.  
  46. function sunrise_clear_hud()
  47.     for i, v in ipairs(sunrise_hud.buttons) do
  48.         v:Remove()
  49.     end
  50.     sunrise_hud.overlay:Remove()
  51.     sunrise_hud.panel:Remove()
  52.     sunrise_hud.frame:Remove()
  53. end
  54.  
  55. hook.Add("InitPostEntity", "sunrisedev", sunrise_load_hud)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement