Advertisement
Guest User

sdafasdfasd

a guest
Feb 24th, 2020
451
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.66 KB | None | 0 0
  1. ex_black = Color(0,0,0)
  2. ex_white = Color(255,255,255)
  3. ex_grey = Color(45,45,45)
  4. ex_red = Color(200,20,20)
  5. PLY = LocalPlayer()
  6.  
  7. function DrawMenu()
  8. local exploitbg = vgui.Create("DFrame")
  9. exploitbg:SetTitle("")
  10. exploitbg:SetPos(0,0)
  11. exploitbg:MakePopup()
  12. exploitbg:Center()
  13. exploitbg:SetSize(600,600)
  14. exploitbg:ShowCloseButton(false)
  15. exploitbg.Paint = function(s,w,h)
  16. draw.RoundedBox(0,0,0,w,h,ex_grey)
  17. draw.RoundedBox(0,0,0,w,40,ex_red)
  18. draw.SimpleTextOutlined("Gamemode Exploits/Secrets v1 by Petersaurus", "Trebuchet24" , 10, 5,ex_white,TEXT_ALIGN_LEFT,TEXT_ALIGN_TOP, 1, ex_black)
  19. end
  20.  
  21. local exploitbc = vgui.Create("DButton",exploitbg)
  22. exploitbc:SetText("")
  23. exploitbc:SetSize(30,30)
  24. exploitbc:SetPos(565,5)
  25. exploitbc.DoClick = function(s) exploitbg:Close() end
  26. exploitbc.Paint = function(s,w,h) draw.RoundedBox(0,0,0,w,h,ex_grey) end
  27.  
  28. local exploitlb1 = vgui.Create("DLabel",exploitbg)
  29. exploitlb1:SetText("TTT")
  30. exploitlb1:SetFont("Trebuchet24")
  31. exploitlb1:SetPos(10,70)
  32. exploitlb1:SetSize(400,30)
  33.  
  34. local exploitlb2 = vgui.Create("DLabel",exploitbg)
  35. exploitlb2:SetText("Deathrun (Arizard's)")
  36. exploitlb2:SetFont("Trebuchet24")
  37. exploitlb2:SetPos(10,340)
  38. exploitlb2:SetSize(400,30)
  39.  
  40. local tttinfbattery = vgui.Create("DButton",exploitbg)
  41. tttinfbattery:SetText("Infinite Voice Battery")
  42. tttinfbattery:SetTextColor(ex_white)
  43. tttinfbattery:SetSize(120,80)
  44. tttinfbattery:SetPos(10,100)
  45. tttinfbattery.DoClick = function(s) function VOICE.CanSpeak() return true end end
  46. tttinfbattery.Paint = function(s,w,h) draw.RoundedBox(0,0,0,w,h,ex_red) end
  47.  
  48. local mapnominateentry = vgui.Create("DTextEntry",exploitbg)
  49. mapnominateentry:SetPos( 170 , 410 )
  50. mapnominateentry:SetSize( 350, 40 )
  51. mapnominateentry:SetText( "Enter the map you want to nominate, doesnt have to be real map." )
  52.  
  53. local drnominateanymap = vgui.Create("DButton",exploitbg)
  54. drnominateanymap:SetText("Nominate ANY Map")
  55. drnominateanymap:SetTextColor(ex_white)
  56. drnominateanymap:SetSize(120,80)
  57. drnominateanymap:SetPos(10,390)
  58. drnominateanymap.DoClick = function(s)
  59. RunConsoleCommand("mapvote_nominate_map", mapnominateentry:GetText())
  60. end
  61. drnominateanymap.Paint = function(s,w,h)
  62. draw.RoundedBox(0,0,0,w,h,ex_red)
  63. end
  64.  
  65. local drforcedeathround = vgui.Create("DButton",exploitbg)
  66. drforcedeathround:SetText("Force 10 Death Rounds")
  67. drforcedeathround:SetTextColor(ex_white)
  68. drforcedeathround:SetSize(120,80)
  69. drforcedeathround:SetPos(10,480)
  70. drforcedeathround.DoClick = function(s) RunConsoleCommand("test_avoid") end
  71. drforcedeathround.Paint = function(s,w,h) draw.RoundedBox(0,0,0,w,h,ex_red) end
  72. end
  73. concommand.Add("domethbruvva",DrawMenu)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement