DEXLTH

Dank memes

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