SHARE
TWEET

Untitled

a guest Aug 17th, 2019 65 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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
RAW Paste Data
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
 
Top