SHARE
TWEET

Untitled

a guest Apr 19th, 2018 107 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. function Menu()
  2.  
  3.     local ply = LocalPlayer()
  4.  
  5.     local BackGround = vgui.Create(" DFrame ")
  6.     BackGround:SetSize( 200, 70 )
  7.     BackGround:SetPos( (ScrW()/2)-BackGround:GetWide(),(ScrH()/2)-BackGround:GetTall() )
  8.     BackGround:SetTitle( "AViD's Menu" )
  9.     BackGround:SetVisible( true )
  10.     BackGround:SetDraggable( true )
  11.     BackGround:ShowCloseButton( true )
  12.     BackGround:MakePopup()
  13.     BackGround.Paint = function()
  14.         draw.RoundedBox(4, 0, 0, Background:GetWide(), BackGround:GetTall(), Color(200,0,0,200))
  15.         draw.RoundedBox(2, 2, 2, Background:GetWide()-4, 21, Color(50,50,50,200))
  16.     end
  17.  
  18.     local TextEntry = vgui.Create( "DTextEntry", BackGround )
  19.     TextEntry:SetPos( 20,30 )
  20.     TextEntry:SetTall( 20 )
  21.     TextEntry:SetWide( 160 )
  22.     TextEntry:SetEnterAllowed( true )
  23.     TextEntry.OnEnter = function()
  24.         Ply:ConCommand("say "..TextEntry:GetValue())
  25.     end BackGround:SetVisible( false )
  26.  
  27.    
  28. end
  29. concommand.Add( "avid_menu", Menu )
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