API tools faq
paste
Anthr4x292

MindBlast Server Client Code: Inventory (Well, fun maybe)

Anthr4x292
Feb 11th, 2012
163
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 8.74 KB | None | 0 0
raw download clone embed print report
  1. -- TODO: Clean up file.
  2.  
  3. GM.Options_GUIAlpha = CreateClientConVar("perp2_gui_alpha", "150", true, false)
  4. GM.Options_HUDAlpha = CreateClientConVar("perp2_hud_alpha", "150", true, false)
  5. GM.Options_HUDColorR = CreateClientConVar("perp2_hud_colorr", "255", true, false)
  6. GM.Options_HUDColorG = CreateClientConVar("perp2_hud_colorg", "255", true, false)
  7. GM.Options_HUDColorB = CreateClientConVar("perp2_hud_colorb", "255", true, false)
  8. GM.Options_InventoryShouldUseGUIAlpha = CreateClientConVar("perp2_gui_inv_alpha", "0", true, false)
  9. GM.Options_ShowOOC = CreateClientConVar("perp2_show_ooc", "1", true, false)
  10. GM.Options_ShowChatBubble = CreateClientConVar("perp2_show_chat_bubble", "1", true, false)
  11. GM.Options_SaveBuddies = CreateClientConVar("perp2_save_buddies", "0", true, false)
  12. GM.Options_ShowUnownableDoors = CreateClientConVar("perp2_show_unownable_doors", "1", true, false)
  13. GM.Options_ShowNames = CreateClientConVar("perp2_show_names", "1", true, false)
  14. GM.Options_EuroStuff = CreateClientConVar("perp2_euro", "0", true, false)
  15. GM.Options_ShowPaydayInfo = CreateClientConVar("perp2_payday_info", "1", true, false)
  16. GM.Options_NumRadioStreams = CreateClientConVar("perp2_radio_streams", "1", true, false)
  17. GM.Options_RadioVolume = CreateClientConVar("perp2_radio_volume", "100", true, false)
  18. GM.Options_DisableFireSmoke = CreateClientConVar("perp2_firesmoke_disable", "0", true, false)
  19. GM.Options_MuteLocalBreath = CreateClientConVar("perp2_mute_local_breath", "0", true, false)
  20. GM.Options_AZERTY = CreateClientConVar("perp2_azerty", "0", true, false)
  21. GM.Options_EnableTVs = CreateClientConVar("perp2_enable_tv", "1", true, false)
  22.  
  23. function GM.GetPhoneKey ( )
  24.     if (GAMEMODE.Options_AZERTY:GetBool()) then
  25.         return KEY_L
  26.     else
  27.         return KEY_Z
  28.     end
  29. end
  30.  
  31. function GM.GetGUIAlpha ( )
  32.     return math.Clamp(GAMEMODE.Options_GUIAlpha:GetInt(), 150, 255)
  33. end
  34.  
  35. function GM.GetHUDAlpha ( )
  36.     return math.Clamp(GAMEMODE.Options_HUDAlpha:GetInt(), 0, 255)
  37. end
  38.  
  39. function GM.GetHUDColorR ( )
  40.     return math.Clamp(GAMEMODE.Options_HUDColorR:GetInt(), 0, 255)
  41. end
  42.  
  43. function GM.GetHUDColorG ( )
  44.     return math.Clamp(GAMEMODE.Options_HUDColorG:GetInt(), 0, 255)
  45. end
  46.  
  47. function GM.GetHUDColorB ( )
  48.     return math.Clamp(GAMEMODE.Options_HUDColorB:GetInt(), 0, 255)
  49. end
  50.  
  51. function GM.GetInventoryAlpha ( )
  52.     if (GAMEMODE.Options_InventoryShouldUseGUIAlpha:GetBool()) then
  53.         return GAMEMODE.GetGUIAlpha()
  54.     else
  55.         return 255
  56.     end
  57. end
  58.  
  59. local LastGUIAlpha = 0
  60. local LastHUDAlpha = 0
  61. local LastInventoryAlpha = 0
  62. local LastHUDColors = 0
  63. local function MonitorOptions ( )
  64.     if (LastGUIAlpha ~= GAMEMODE.GetGUIAlpha()) then
  65.         LastGUIAlpha = GAMEMODE.GetGUIAlpha()
  66.        
  67.         if (GAMEMODE.DialogPanel) then
  68.             GAMEMODE.DialogPanel:SetAlpha(LastGUIAlpha)
  69.         end
  70.        
  71.         if (GAMEMODE.HelpPanel) then
  72.             GAMEMODE.HelpPanel:SetAlpha(LastGUIAlpha)
  73.         end
  74.     end
  75.    
  76.     local CurrentInventoryAlpha = GAMEMODE.GetInventoryAlpha()
  77.     if (CurrentInventoryAlpha ~= LastInventoryAlpha) then
  78.         LastInventoryAlpha = CurrentInventoryAlpha
  79.        
  80.         if (GAMEMODE.InventoryPanel) then
  81.             GAMEMODE.InventoryPanel:SetAlpha(CurrentInventoryAlpha)
  82.         end
  83.     end
  84.    
  85.     if (LastHUDAlpha ~= GAMEMODE.GetHUDAlpha()) then
  86.         LastHUDAlpha = GAMEMODE.GetHUDAlpha()
  87.        
  88.         if (GAMEMODE.HUD) then
  89.             GAMEMODE.HUD:SetAlpha(LastHUDAlpha)
  90.         end
  91.     end
  92. end
  93. hook.Add("Think", "MonitorOptions", MonitorOptions)
  94.  
  95. function GM.LoadOptionsList ( panelList )
  96.     local guiAlpha = vgui.Create("DNumSlider", panelList)
  97.     guiAlpha:SetText("GUI Alpha")
  98.     guiAlpha:SetMin(150)
  99.     guiAlpha:SetMax(255)
  100.     guiAlpha:SetConVar("perp2_gui_alpha")
  101.     guiAlpha:SetValue(GAMEMODE.GetGUIAlpha())
  102.     panelList:AddItem(guiAlpha)
  103.    
  104.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  105.     inventoryUseAlpha:SetText("Inventory should use GUI alpha? (Optional because it doesn't look as good as full alpha.)")
  106.     inventoryUseAlpha:SetValue(GAMEMODE.Options_InventoryShouldUseGUIAlpha:GetInt())
  107.     inventoryUseAlpha:SetConVar("perp2_gui_inv_alpha")
  108.     panelList:AddItem(inventoryUseAlpha)
  109.    
  110.     local hudAlpha = vgui.Create("DNumSlider", panelList)
  111.     hudAlpha:SetText("HUD Alpha")
  112.     hudAlpha:SetMin(0)
  113.     hudAlpha:SetMax(255)
  114.     hudAlpha:SetConVar("perp2_hud_alpha")
  115.     hudAlpha:SetValue(GAMEMODE.GetHUDAlpha())
  116.     panelList:AddItem(hudAlpha)
  117.    
  118.     local hudColorR = vgui.Create("DNumSlider", panelList)
  119.     hudColorR:SetText("HUD Color: Red")
  120.     hudColorR:SetMin(0)
  121.     hudColorR:SetMax(255)
  122.     hudColorR:SetConVar("perp2_hud_colorr")
  123.     hudColorR:SetValue(GAMEMODE.GetHUDColorR())
  124.     panelList:AddItem(hudColorR)
  125.    
  126.     local hudColorG = vgui.Create("DNumSlider", panelList)
  127.     hudColorG:SetText("HUD Color: Green")
  128.     hudColorG:SetMin(0)
  129.     hudColorG:SetMax(255)
  130.     hudColorG:SetConVar("perp2_hud_colorg")
  131.     hudColorG:SetValue(GAMEMODE.GetHUDColorG())
  132.     panelList:AddItem(hudColorG)
  133.    
  134.     local hudColorB = vgui.Create("DNumSlider", panelList)
  135.     hudColorB:SetText("HUD Color: Blue")
  136.     hudColorB:SetMin(0)
  137.     hudColorB:SetMax(255)
  138.     hudColorB:SetConVar("perp2_hud_colorb")
  139.     hudColorB:SetValue(GAMEMODE.GetHUDColorB())
  140.     panelList:AddItem(hudColorB)
  141.    
  142.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  143.     inventoryUseAlpha:SetText("Show OOC chat in chat box?")
  144.     inventoryUseAlpha:SetValue(GAMEMODE.Options_ShowOOC:GetInt())
  145.     inventoryUseAlpha:SetConVar("perp2_show_ooc")
  146.     panelList:AddItem(inventoryUseAlpha)
  147.    
  148.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  149.     inventoryUseAlpha:SetText("Show indicator above your head while you type?")
  150.     inventoryUseAlpha:SetValue(GAMEMODE.Options_ShowChatBubble:GetInt())
  151.     inventoryUseAlpha:SetConVar("perp2_show_chat_bubble")
  152.     panelList:AddItem(inventoryUseAlpha)
  153.    
  154.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  155.     inventoryUseAlpha:SetText("Show names above people, vehicles, and doors?")
  156.     inventoryUseAlpha:SetValue(GAMEMODE.Options_ShowNames:GetInt())
  157.     inventoryUseAlpha:SetConVar("perp2_show_names")
  158.     panelList:AddItem(inventoryUseAlpha)
  159.    
  160.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  161.     inventoryUseAlpha:SetText("Indicate unownable doors? (Requires above if not checked unownable doors will have no text.)")
  162.     inventoryUseAlpha:SetValue(GAMEMODE.Options_ShowUnownableDoors:GetInt())
  163.     inventoryUseAlpha:SetConVar("perp2_show_unownable_doors")
  164.     panelList:AddItem(inventoryUseAlpha)
  165.    
  166.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  167.     inventoryUseAlpha:SetText("Use metric system? (KPH and Celsius)")
  168.     inventoryUseAlpha:SetValue(1)
  169.     inventoryUseAlpha:SetConVar("perp2_euro")
  170.     panelList:AddItem(inventoryUseAlpha)
  171.    
  172.     local numStreams = vgui.Create("DNumSlider", panelList)
  173.     numStreams:SetText("Number of radio streams? (0 disables)")
  174.     numStreams:SetMin(0)
  175.     numStreams:SetMax(10)
  176.     numStreams:SetConVar("perp2_radio_streams")
  177.     numStreams:SetDecimals(0)
  178.     numStreams:SetValue(GAMEMODE.Options_NumRadioStreams:GetInt())
  179.     panelList:AddItem(numStreams)
  180.    
  181.     local numStreams = vgui.Create("DNumSlider", panelList)
  182.     numStreams:SetText("Maximum volume of radio?")
  183.     numStreams:SetMin(0)
  184.     numStreams:SetMax(100)
  185.     numStreams:SetConVar("perp2_radio_volume")
  186.     numStreams:SetDecimals(0)
  187.     numStreams:SetValue(GAMEMODE.Options_RadioVolume:GetInt())
  188.     panelList:AddItem(numStreams)
  189.    
  190.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  191.     inventoryUseAlpha:SetText("Use sun beams? (Recommended)")
  192.     inventoryUseAlpha:SetConVar("pp_sunbeams")
  193.     panelList:AddItem(inventoryUseAlpha)
  194.    
  195.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  196.     inventoryUseAlpha:SetText("Remove smoke from fires?")
  197.     inventoryUseAlpha:SetConVar("perp2_firesmoke_disable")
  198.     inventoryUseAlpha:SetValue(GAMEMODE.Options_DisableFireSmoke:GetInt())
  199.     panelList:AddItem(inventoryUseAlpha)
  200.    
  201.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  202.     inventoryUseAlpha:SetText("Show payday notices?")
  203.     inventoryUseAlpha:SetConVar("perp2_payday_info")
  204.     inventoryUseAlpha:SetValue(GAMEMODE.Options_ShowPaydayInfo:GetInt())
  205.     panelList:AddItem(inventoryUseAlpha)
  206.    
  207.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  208.     inventoryUseAlpha:SetText("Mute heavy breathing?")
  209.     inventoryUseAlpha:SetConVar("perp2_mute_local_breath")
  210.     inventoryUseAlpha:SetValue(GAMEMODE.Options_MuteLocalBreath:GetInt())
  211.     panelList:AddItem(inventoryUseAlpha)
  212.    
  213.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  214.     inventoryUseAlpha:SetText("AZERT Keyboard? (Changes the phone key from Z to L)")
  215.     inventoryUseAlpha:SetConVar("perp2_azerty")
  216.     inventoryUseAlpha:SetValue(GAMEMODE.Options_AZERTY:GetInt())
  217.     panelList:AddItem(inventoryUseAlpha)
  218.    
  219.     local inventoryUseAlpha = vgui.Create("DCheckBoxLabel", panelList)
  220.     inventoryUseAlpha:SetText("Enable TVs?")
  221.     inventoryUseAlpha:SetConVar("perp2_enable_tv")
  222.     inventoryUseAlpha:SetValue(GAMEMODE.Options_EnableTVs:GetInt())
  223.     panelList:AddItem(inventoryUseAlpha)
  224. end
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!