Advertisement
Guest User

Untitled

a guest
Aug 17th, 2019
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.57 KB | None | 0 0
  1. if SERVER then
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9. local ply = FindMetaTable("Player")
  10.  
  11.  
  12.  
  13.  
  14. local function hellotest(PLY)
  15. PLY:SetNWBool("is_ascended", true)
  16. end
  17.  
  18.  
  19. concommand.Add("ascend", hellotest)
  20.  
  21.  
  22. end
  23.  
  24.  
  25.  
  26.  
  27.  
  28. if CLIENT then
  29.  
  30. as_invis=CreateClientConVar( "Invisibility_enabled", "1", false, false )
  31. CreateClientConVar( "Gds_enabled", "1", false, false )
  32.  
  33. concommand.Add("ascend_menu", testingascend)
  34.  
  35. local isascended = false
  36.  
  37. function testingascend(PLY)
  38.  
  39.  
  40. if (PLY:GetNWBool("is_ascended")==true)
  41.  
  42. then
  43. local frame = vgui.Create( "DFrame" )
  44. frame:SetSize( 500, 300 )
  45. frame:Center()
  46. frame:SetTitle( "Ascension" )
  47. frame:ShowCloseButton(true)
  48. frame:MakePopup()
  49. local sheet = vgui.Create( "DPropertySheet", frame )
  50. sheet:Dock( FILL )
  51.  
  52. local panel1 = vgui.Create( "DPanel", sheet )
  53. panel1.Paint = function( self, w, h ) draw.RoundedBox( 4, 0, 0, w, h, Color( 80, 80, 80, self:GetAlpha() ) ) end
  54. sheet:AddSheet( "States", panel1, "icon16/eye.png" )
  55.  
  56. --Checkboxes----------------------------------------------------
  57. local checkbox_invi = vgui.Create( "DCheckBoxLabel", panel1 )
  58. checkbox_invi:SetChecked( false )
  59. checkbox_invi:SetConVar( "Invisibility_enabled" )
  60. checkbox_invi:SetText( "Hide from normal eyes" )
  61. checkbox_invi:SetPos( 5, 5 )
  62. checkbox_invi:SizeToContents()
  63.  
  64. local checkbox_whiteplasma = vgui.Create( "DCheckBoxLabel", panel1 )
  65. checkbox_whiteplasma:SetConVar( "Gds_enabled" )
  66. checkbox_whiteplasma:SetText( "Assume GDS" )
  67. checkbox_whiteplasma:SetPos( 5, 25 )
  68. checkbox_whiteplasma:SizeToContents()
  69.  
  70.  
  71. --Colorpicker----------------------------------------------------
  72.  
  73. local ChosenColor = nil
  74.  
  75. local ColorPicker = vgui.Create( "DColorMixer", panel1 )
  76. ColorPicker:SetSize( 180, 180 )
  77. ColorPicker:SetPos( 280, 10 )
  78. ColorPicker:SetPalette( true )
  79. ColorPicker:SetAlphaBar( true )
  80. ColorPicker:SetWangs( true )
  81. ColorPicker:SetColor( Color( 255, 255, 255 ) )
  82.  
  83. local ConfirmColor = vgui.Create( "DButton", panel1 )
  84. ConfirmColor:SetText( "Color GDS " )
  85. ConfirmColor:SetSize( 90, 30 )
  86. ConfirmColor:SetPos( 320, panel1:GetTall() + 170 )
  87. ConfirmColor.DoClick = function()
  88. ChosenColor = ColorPicker:GetColor()
  89. end
  90.  
  91.  
  92.  
  93.  
  94. local panel2 = vgui.Create( "DPanel", sheet )
  95. panel2.Paint = function( self, w, h ) draw.RoundedBox( 4, 0, 0, w, h, Color( 80, 80, 80, self:GetAlpha() ) ) end
  96. sheet:AddSheet( "Powers", panel2, "icon16/text_letter_omega.png" )
  97. else
  98. end
  99. end
  100.  
  101.  
  102. if as_invis:GetBool()==true
  103. then
  104. localplayer:ChatPrint("Invis!")
  105. else
  106.  
  107. end
  108.  
  109.  
  110.  
  111.  
  112. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement