Laith8888

Roblox Dank Meme GUI script

Jan 19th, 2018
149
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.59 KB | None | 0 0
  1. -- Made by CiniMadness
  2. iPlayer = game.Players.LocalPlayer.Name
  3. local Gui = Instance.new('ScreenGui', game.Players[iPlayer].PlayerGui)
  4. Gui.Name = 'DankMemes'
  5. local Pull = Instance.new('Frame', Gui)
  6. Pull.Name = 'Grab'
  7. Pull.Active = true
  8. Pull.BackgroundColor3 = Color3.new(97/255,97/255,97/255)
  9. Pull.BackgroundTransparency = 0
  10. Pull.BorderSizePixel = 0
  11. Pull.Position = UDim2.new(0.5,-318,0.5,-92)
  12. Pull.Size = UDim2.new(0,447,0,50)
  13. Pull.Draggable = true
  14. -- =====================================================================
  15. local Close = Instance.new('TextButton', Pull)
  16. Close.Name = 'Close'
  17. Close.BackgroundTransparency = 1
  18. Close.Position = UDim2.new(1,-23,0,1)
  19. Close.Size = UDim2.new(0,22,0,22)
  20. Close.Font = 'SourceSans'
  21. Close.FontSize = 'Size24'
  22. Close.TextColor3 = Color3.new(255,255,255)
  23. Close.Text = 'X'
  24. Close.TextStrokeTransparency = 0.8
  25. -- =====================================================================
  26. local Body = Instance.new('Frame', Pull)
  27. Body.Name = 'Body'
  28. Body.BackgroundColor3 = Color3.new(60/255,60/255,60/255)
  29. Body.BackgroundTransparency = 0
  30. Body.BorderSizePixel = 0
  31. Body.Position = UDim2.new(0,0,0,52)
  32. Body.Size = UDim2.new(0,447,0,212)
  33. -- =====================================================================
  34. local Title = Instance.new('TextLabel', Pull)
  35. Title.Name = 'Title'
  36. Title.BackgroundTransparency = 1
  37. Title.Position = UDim2.new(0,20,0,0)
  38. Title.Size = UDim2.new(0,200,1,0)
  39. Title.Font = 'SourceSansLight'
  40. Title.FontSize = 'Size48'
  41. Title.Text = "DankMemesv2"
  42. Title.TextColor3 = Color3.new(255,255,255)
  43. Title.TextStrokeColor3 = Color3.new(74/255,74/255,74/255)
  44. Title.TextStrokeTransparency = 0
  45. -- =====================================================================
  46. local PlayerName = Instance.new('TextBox', Body)
  47. PlayerName.Name = 'PlayerName'
  48. PlayerName.BorderSizePixel = 0
  49. PlayerName.Position = UDim2.new(0,245,0,-40)
  50. PlayerName.Size = UDim2.new(0,180,0,30)
  51. PlayerName.Font = 'SourceSans'
  52. PlayerName.FontSize = 'Size18'
  53. PlayerName.Text = 'PLAYERNAME'
  54. PlayerName.BackgroundColor3 = Color3.new(255,255,255)
  55. PlayerName.TextColor3 = Color3.new(0,0,0)
  56. PlayerName.TextWrapped = true
  57. -- =====================================================================
  58. local Credits = Instance.new('TextLabel', Body)
  59. Credits.BackgroundTransparency = 1
  60. Credits.Text = 'Made by CiniMadness'
  61. Credits.Position = UDim2.new(0,0,0,15)
  62. Credits.Size = UDim2.new(1,0,0,20)
  63. Credits.TextColor3 = Color3.new(255,255,255)
  64. Credits.FontSize = 'Size24'
  65. Credits.Font = 'Arial'
  66. -- =====================================================================
  67. local God = Instance.new('TextButton', Body)
  68. God.Name = 'God'
  69. God.BackgroundColor3 = Color3.new(21/255,142/255,255)
  70. God.BackgroundTransparency = 0
  71. God.BorderSizePixel = 2
  72. God.Position = UDim2.new(0,10,0,50)
  73. God.Size = UDim2.new(0,135,0,30)
  74. God.Font = 'SourceSansBold'
  75. God.FontSize = 'Size28'
  76. God.Text = 'GOD'
  77. God.TextColor3 = Color3.new(255,255,255)
  78. God.TextWrapped = true
  79. God.BorderColor3 = Color3.new(97/255,97/255,97/255)
  80. God.TextStrokeTransparency = 1
  81. -- =====================================================================
  82. local KillAll = God:Clone()
  83. KillAll.Name = 'KillAll'
  84. KillAll.Parent = Body
  85. KillAll.Position = UDim2.new(0,10,0,90)
  86. KillAll.Text = 'KILL ALL'
  87. -- =====================================================================
  88. local KillPlr = God:Clone()
  89. KillPlr.Name = 'KillPlr'
  90. KillPlr.Parent = Body
  91. KillPlr.Position = UDim2.new(0,155,0,50)
  92. KillPlr.Text = 'KILL'
  93. -- =====================================================================
  94. local TpMe = God:Clone()
  95. TpMe.Name = 'TpMe'
  96. TpMe.Parent = Body
  97. TpMe.Position = UDim2.new(0,10,0,130)
  98. TpMe.Text = 'PLR > ME'
  99. -- =====================================================================
  100. local TpTo = God:Clone()
  101. TpTo.Name = 'TpTo'
  102. TpTo.Parent = Body
  103. TpTo.Position = UDim2.new(0,155,0,130)
  104. TpTo.Text = 'ME > PLR'
  105. -- =====================================================================
  106. local TpAllMe = God:Clone()
  107. TpAllMe.Name = 'TpAllMe'
  108. TpAllMe.Parent = Body
  109. TpAllMe.Position = UDim2.new(0,155,0,90)
  110. TpAllMe.Text = 'TPALL > ME'
  111. -- =====================================================================
  112. local GiveBadges = God:Clone()
  113. GiveBadges.Name = 'GiveBadges'
  114. GiveBadges.Parent = Body
  115. GiveBadges.Position = UDim2.new(0,300,0,50)
  116. GiveBadges.Text = 'GiveBadges'
  117. -- =====================================================================
  118. local FALKIT = God:Clone()
  119. FALKIT.Name = 'SpawnFal'
  120. FALKIT.Parent = Body
  121. FALKIT.Position = UDim2.new(0,300,0,90)
  122. FALKIT.Text = 'Fal Kit'
  123. -- =====================================================================
  124. local G36K = God:Clone()
  125. G36K.Name = 'SpawnG36k'
  126. G36K.Parent = Body
  127. G36K.Position = UDim2.new(0,300,0,130)
  128. G36K.Text = 'G36k Kit'
  129.  
  130. local HungerThirst = God:Clone()
  131. HungerThirst.Name = 'HT'
  132. HungerThirst.Parent = Body
  133. HungerThirst.Position = UDim2.new(0,300,0,170)
  134. HungerThirst.Text = 'HungerThirst'
  135.  
  136. local CarGod = God:Clone()
  137. CarGod.Name = 'CarGod'
  138. CarGod.Parent = Body
  139. CarGod.Position = UDim2.new(0,10,0,170)
  140. CarGod.Text = 'Car God'
  141.  
  142. local CarSpeed = God:Clone()
  143. CarSpeed.Name = 'CarSpeed'
  144. CarSpeed.Parent = Body
  145. CarSpeed.Position = UDim2.new(0,155,0,170)
  146. CarSpeed.Text = 'Car Speed'
  147. -- *********************************************************************
  148. God.MouseButton1Down:connect(function()
  149. Player = game.Workspace:FindFirstChild(PlayerName.Text)
  150. while wait() do
  151. game.Lighting.Remote.AddHealth:FireServer(Player.Humanoid, 420699001)
  152. end
  153. end)
  154. -- =====================================================================
  155. KillAll.MouseButton1Down:connect(function()
  156. for i,v in pairs(game.Players:GetPlayers()) do
  157. if v.Name == game.Players.LocalPlayer.Name then
  158. print('nope')
  159. else
  160. getPlayer = game.Workspace:FindFirstChild(v.Name)
  161. wait(.01)
  162. game.Lighting.Remote.AddHealth:FireServer(getPlayer.Humanoid, -420699001)
  163. end
  164. end
  165. end)
  166. -- =====================================================================
  167. KillPlr.MouseButton1Down:connect(function()
  168. gitPlayer = game.Workspace:FindFirstChild(PlayerName.Text)
  169. game.Lighting.Remote.AddHealth:FireServer(gitPlayer.Humanoid, -420699001)
  170. end)
  171. -- =====================================================================
  172. TpMe.MouseButton1Down:connect(function()
  173. gitPlayer = PlayerName.Text
  174. game.Lighting.Remote:WaitForChild("TeleportRequest"):InvokeServer("To Me", math.floor(tick() % 1 * 100000), gitPlayer)
  175. end)
  176. -- =====================================================================
  177. TpTo.MouseButton1Down:connect(function()
  178. gitPlayer = PlayerName.Text
  179. game.Lighting.Remote:WaitForChild("TeleportRequest"):InvokeServer("Me To", math.floor(tick() % 1 * 100000), gitPlayer)
  180. end)
  181. -- =====================================================================
  182. TpAllMe.MouseButton1Down:connect(function()
  183. for i,v in pairs(game.Players:GetPlayers()) do
  184. if v.Name ~= game.Players.LocalPlayer.Name then
  185. wait(.01)
  186. game.Lighting.Remote:WaitForChild("TeleportRequest"):InvokeServer("To Me", math.floor(tick() % 1 * 100000), v.Name)
  187. else
  188. print('there are no players in the server!')
  189. end
  190. end
  191. end)
  192. -- =====================================================================
  193. GiveBadges.MouseButton1Down:connect(function()
  194. game.Players.LocalPlayer.playerstats.PlayerKill.Defensive.Value = 75
  195. game.Players.LocalPlayer.playerstats.ZombieKill.Military.Value = 751
  196. game.Players.LocalPlayer.playerstats.Days.Value = 30
  197. end)
  198. -- =====================================================================
  199. FALKIT.MouseButton1Down:connect(function()
  200. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slotbackpack, 4016)
  201. wait(.1)
  202. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slotprimary, 1029)
  203. wait(.1)
  204. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot1, 9013)
  205. wait(.1)
  206. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot2, 9010)
  207. wait(.1)
  208. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot3, 9005)
  209. wait(.1)
  210. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot4, 64)
  211. wait(.1)
  212. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot5, 64)
  213. wait(.1)
  214. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot6, 64)
  215. wait(.1)
  216. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot7, 64)
  217. wait(.1)
  218. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot8, 64)
  219. wait(.1)
  220. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot9, 64)
  221. wait(.1)
  222. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot10, 64)
  223. wait(.1)
  224. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot11, 64)
  225. wait(.1)
  226. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot12, 11)
  227. wait(.1)
  228. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot13, 11)
  229. wait(.1)
  230. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot14, 11)
  231. wait(.1)
  232. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot15, 11)
  233. wait(.1)
  234. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot16, 11)
  235. wait(.1)
  236. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot17, 11)
  237. wait(.1)
  238. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot18, 11)
  239. wait(.1)
  240. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot19, 11)
  241. wait(.1)
  242. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot20, 11)
  243. wait(.1)
  244. print("stuff spawned")
  245. end)
  246. -- =====================================================================
  247. G36K.MouseButton1Down:connect(function()
  248. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slotbackpack, 4016)
  249. wait(.1)
  250. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slotprimary, 1023)
  251. wait(.1)
  252. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot1, 9013)
  253. wait(.1)
  254. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot2, 9009)
  255. wait(.1)
  256. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot3, 9005)
  257. wait(.1)
  258. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot4, 53)
  259. wait(.1)
  260. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot5, 53)
  261. wait(.1)
  262. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot6, 53)
  263. wait(.1)
  264. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot7, 53)
  265. wait(.1)
  266. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot8, 53)
  267. wait(.1)
  268. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot9, 53)
  269. wait(.1)
  270. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot10, 53)
  271. wait(.1)
  272. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot11, 53)
  273. wait(.1)
  274. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot12, 11)
  275. wait(.1)
  276. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot13, 11)
  277. wait(.1)
  278. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot14, 11)
  279. wait(.1)
  280. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot15, 11)
  281. wait(.1)
  282. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot16, 11)
  283. wait(.1)
  284. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot17, 11)
  285. wait(.1)
  286. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot18, 11)
  287. wait(.1)
  288. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot19, 11)
  289. wait(.1)
  290. game.Lighting.Remote.AddObject:FireServer(game.Players[PlayerName.Text].playerstats.slots.slot20, 11)
  291. wait(.1)
  292. print("stuff spawned")
  293. end)
  294.  
  295. HungerThirst.MouseButton1Down:connect(function()
  296. game.Players.LocalPlayer.playerstats.Hunger.Value = 1000
  297. wait(1)
  298. game.Players.LocalPlayer.playerstats.Thirst.Value = 1000
  299. end)
  300.  
  301. CarGod.MouseButton1Down:connect(function()
  302. for i,v in pairs(game.Workspace.Vehicles:GetChildren()) do
  303. if v.Name ~= "Holder" or v.Name ~= "VehicleWreck" then
  304. if v:findFirstChild("Stats") then
  305. v.Stats.Engine.Value = 420699001
  306. v.Stats.Tank.Value = 420699001
  307. v.Stats.Hull.Value = 420699001
  308. v.Stats.Armor.Value = 420699001
  309. v.Stats.Fuel.Value = 420
  310. end
  311. end
  312. end
  313. end)
  314.  
  315. CarSpeed.MouseButton1Down:connect(function()
  316. local MaxSpeed = 200
  317. for i,v in pairs(workspace.Vehicles:GetChildren()) do
  318. if v.Name ~= 'VehicleWreck' then
  319. v.Stats.MaxSpeed.Value = MaxSpeed
  320. v.Stats.MaxSpeed.Offroad.Value = MaxSpeed
  321. end
  322. end
  323. end)
  324.  
  325. Close.MouseButton1Down:connect(function()
  326. if Body.Visible == true then
  327. Body.Visible = false
  328. Close.Text = '+'
  329. Title.FontSize = 'Size24'
  330. Pull.Size = UDim2(0,125,0,12.5)
  331. elseif Body.Visible == false then
  332. Body.Visible = true
  333. Close.Text = 'X'
  334. Title.FontSize = 'Size48'
  335. Graf_f.Size = UDim2(0,500,0,50)
  336. end
  337. end)
Add Comment
Please, Sign In to add comment