Upscalefanatic3

Apocalypse Rising GUI (Randomly Found *NOT TESTED*)

Jan 11th, 2018
289
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 23.13 KB | None | 0 0
  1. if _G.DisableApocRapingGUI then
  2. _G.DisableApocRapingGUI()
  3. end
  4. local g = game:GetObjects("rbxassetid://724775050")[1]
  5. g.Name = "ApocRapingGUI"
  6. g.Parent = game.CoreGui
  7. local Disabled = false
  8. function _G.DisableApocRapingGUI()
  9. Disabled=true
  10. g:destroy()
  11. end
  12. -- Credit to whoever found this
  13. local agaghe = function(str)
  14. local out = {}
  15. local z = ""
  16. for word in string.gmatch(str, "%w%w%w%w") do
  17. for i,c in pairs({string.byte(word, 1, 4)}) do
  18. c = c - 48
  19. for place = 1, 6 do
  20. out[(i - 1) * 6 + place] = (out[(i - 1) * 6 + place] or 0) + (c) % 2
  21. c = math.floor((c) / 2)
  22. end
  23. end
  24. end
  25. for i = 2, #out, 2 do
  26. z = string.reverse(z) .. string.char(97 + out[i] + out[i - 1] * 2)
  27. end
  28. local stack = #str
  29. local out = ""
  30. for word in string.gmatch(str, "%w%w%w%w") do
  31. out = out .. string.char(48 + tonumber(table.concat({string.byte(word, 1, 4)})) % 74)
  32. end
  33. return out
  34. end
  35. local getkey = function()
  36. return agaghe(game:GetService("Geometry"):FindFirstChild("nonononononono").Value)
  37. end
  38. local head = g:WaitForChild"Header"
  39. local main = head:WaitForChild"Main"
  40. local tabs = main:WaitForChild"Tabs"
  41. local maindisp = main:WaitForChild"MainDisplay"
  42.  
  43. table.foreach(tabs:children(),function(i,v)
  44. if v:IsA"TextButton" then
  45. v.MouseButton1Down:connect(function()
  46. if maindisp:FindFirstChild(v.Name) then
  47. for _,md in next, maindisp:children() do md.Visible = false end
  48. maindisp[v.Name].Visible = true
  49. for _,md in next, tabs:children() do md.BackgroundColor3 = Color3.new(255/255,0/255,0/255) md.BorderColor3 = Color3.new(136/255,0/255,0/255) end
  50. v.BackgroundColor3 = Color3.new(0/255,255/255,0/255)
  51. v.BorderColor3 = Color3.new(0/255,136/255,0/255)
  52. end
  53. end)
  54. end
  55. end)
  56. local Apoc
  57. Apoc = setmetatable({},{__index = function(s,i)
  58. if i == "Kill" then
  59. return function(plr)
  60. if plr and plr.Character then
  61. for _,v in next, plr.Character:children() do
  62. if v:IsA"Humanoid" then
  63. game.Lighting.Remote.AddHealth:FireServer(getkey(),v,-v.MaxHealth)
  64. end
  65. end
  66. end
  67. end
  68. elseif i == "Heal" then
  69. return function(plr)
  70. if plr and plr.Character then
  71. for _,v in next, plr.Character:children() do
  72. if v:IsA"Humanoid" then
  73. game.Lighting.Remote.AddHealth:FireServer(getkey(),v,v.MaxHealth)
  74. end
  75. end
  76. end
  77. end
  78. elseif i == "ChangeParent" then
  79. return function(obj,new_parent)
  80. game.Lighting.Remote.ChangeParent:FireServer(getkey(),obj,new_parent)
  81. end
  82. elseif i == "HealthSet" then
  83. return function(prop,new_val)
  84. game.Lighting.Remote.HealthSet:FireServer(getkey(),prop,new_val)
  85. end
  86. elseif i == "ChangeValue" then
  87. return function(obj,prop,new_val)
  88. game.Lighting.Remote.ChangeValue:FireServer(getkey(),obj,prop,new_val)
  89. end
  90. elseif i == "God" then
  91. return function(plr)
  92. if plr and plr.Character then
  93. for _,v in next, plr.Character:children() do
  94. if v:IsA"Humanoid" then
  95. if v.MaxHealth ~= math.huge then
  96. local abc = game.Players.LocalPlayer.Character.Humanoid
  97. Apoc.ChangeParent(abc, plr.Character)
  98. Apoc.ChangeParent(v, game.Players.LocalPlayer.Character)
  99. wait()
  100. Apoc.HealthSet("MaxHealth",math.huge)
  101. Apoc.HealthSet("Health",math.huge)
  102. wait()
  103. Apoc.ChangeParent(abc, game.Players.LocalPlayer.Character)
  104. Apoc.ChangeParent(v, plr.Character)
  105. wait()
  106. Apoc.ChangeValue(plr.playerstats.Hunger, 10000)
  107. Apoc.ChangeValue(plr.playerstats.Thirst, 10000)
  108. end
  109. end
  110. end
  111. end
  112. end
  113. elseif i == "ResetHP" then
  114. return function(plr)
  115. if plr and plr.Character then
  116. for _,v in next, plr.Character:children() do
  117. if v:IsA"Humanoid" then
  118. local abc = game.Players.LocalPlayer.Character.Humanoid
  119. Apoc.ChangeParent(abc, plr.Character)
  120. Apoc.ChangeParent(v, game.Players.LocalPlayer.Character)
  121. wait()
  122. Apoc.HealthSet("MaxHealth",100)
  123. Apoc.HealthSet("Health",100)
  124. wait()
  125. Apoc.ChangeParent(abc, game.Players.LocalPlayer.Character)
  126. Apoc.ChangeParent(v, plr.Character)
  127. wait()
  128. Apoc.ChangeValue(plr.playerstats.Hunger, 100)
  129. Apoc.ChangeValue(plr.playerstats.Thirst, 100)
  130. end
  131. end
  132. end
  133. end
  134. elseif i == "Message" then
  135. return function(plr,clr,msg)
  136. game.Lighting.Remote.SendMessage:FireServer(plr, clr, msg)
  137. end
  138. end
  139. end})
  140. local Real = setmetatable({},{__index = function(s,i) return getfenv()[i] end})
  141. -- PLAYER COMMANDS
  142. local SelectedPlayers = {
  143. PLAYER = {},
  144. SKIN = {},
  145. SPAWNING = {}
  146. }
  147. local SelectedColor = "Red"
  148. table.foreach(maindisp.PLAYER.COLOR:children(),function(i,v)
  149. if v:IsA"TextButton" then
  150. v.MouseButton1Down:connect(function()
  151. for _,md in next, maindisp.PLAYER.COLOR:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  152. v.BackgroundColor3 = Color3.new(0,1,0)
  153. SelectedColor = v.Text
  154. end)
  155. end
  156. end)
  157.  
  158. function UPDATEPLRLIST(p,tab)
  159. local last = 0
  160. local t = p.Template
  161. for i,v in next, p:children() do
  162. if v.Name ~= "Template" then v:destroy() end
  163. end
  164. for i,v in next, game.Players:players() do
  165. local obj = v
  166. local b = t:Clone()
  167. b.Parent = p
  168. b.Position = UDim2.new(0,0,0,last)
  169. last=last+25
  170. p.CanvasSize = UDim2.new(0,0,0,last)
  171. b.Text = v.Name
  172. b.Visible = true
  173. b.Name = v.Name
  174. if tab[v] then
  175. b.BackgroundColor3 = Color3.new(0,1,0)
  176. else
  177. b.BackgroundColor3 = Color3.new(1,0,0)
  178. end
  179. b.MouseButton1Down:connect(function()
  180. if tab[v] then
  181. tab[v]=nil
  182. else
  183. tab[v]=true
  184. end
  185. end)
  186. end
  187. end
  188.  
  189. maindisp.PLAYER.SELECTALL.MouseButton1Down:connect(function()
  190. for i,v in next, game.Players:players() do
  191. SelectedPlayers.PLAYER[v]=true
  192. end
  193. end)
  194.  
  195. maindisp.PLAYER.DESELECTALL.MouseButton1Down:connect(function()
  196. SelectedPlayers.PLAYER={}
  197. end)
  198.  
  199. maindisp.PLAYER.SELECTOTHER.MouseButton1Down:connect(function()
  200. SelectedPlayers.PLAYER={}
  201. for i,v in next, game.Players:players() do
  202. if v ~= game.Players.LocalPlayer then SelectedPlayers.PLAYER[v]=true end
  203. end
  204. end)
  205.  
  206. maindisp.PLAYER.SELECTLP.MouseButton1Down:connect(function()
  207. SelectedPlayers.PLAYER[game.Players.LocalPlayer]=true
  208. end)
  209.  
  210. maindisp.PLAYER.SELECTGRP.MouseButton1Down:connect(function()
  211. maindisp.PLAYER.SELECTGRP.Text = "Not finished yet!"
  212. wait(4)
  213. maindisp.PLAYER.SELECTGRP.Text = "SELECT GROUP"
  214. end)
  215.  
  216. maindisp.PLAYER.KILL.MouseButton1Down:connect(function()
  217. for v,i in next, SelectedPlayers.PLAYER do
  218. if v ~= nil and v.Parent ~= nil then
  219. Apoc.Kill(v)
  220. end
  221. end
  222. end)
  223.  
  224. maindisp.PLAYER.HEAL.MouseButton1Down:connect(function()
  225. for v,i in next, SelectedPlayers.PLAYER do
  226. if v ~= nil and v.Parent ~= nil then
  227. Apoc.Heal(v)
  228. end
  229. end
  230. end)
  231.  
  232. maindisp.PLAYER.GOD.MouseButton1Down:connect(function()
  233. for v,i in next, SelectedPlayers.PLAYER do
  234. if v ~= nil and v.Parent ~= nil then
  235. Apoc.God(v)
  236. wait(.2)
  237. end
  238. end
  239. end)
  240.  
  241. maindisp.PLAYER.UNGOD.MouseButton1Down:connect(function()
  242. for v,i in next, SelectedPlayers.PLAYER do
  243. if v ~= nil and v.Parent ~= nil then
  244. Apoc.ResetHP(v)
  245. wait(.2)
  246. end
  247. end
  248. end)
  249.  
  250. maindisp.PLAYER.KICK.MouseButton1Down:connect(function()
  251. for v,i in next, SelectedPlayers.PLAYER do
  252. if v ~= nil and v.Parent ~= nil and v ~= game.Players.LocalPlayer then
  253. Real._G.Destruct(v)
  254. end
  255. end
  256. end)
  257.  
  258. maindisp.PLAYER.GOTO.MouseButton1Down:connect(function()
  259. for v,i in next, SelectedPlayers.PLAYER do
  260. if v ~= nil and v.Parent ~= nil then
  261. game.Lighting.Remote:WaitForChild("TeleportRequest"):InvokeServer("Me To", math.floor(tick() % 1 * 100000), v.Name)
  262. end
  263. end
  264. end)
  265.  
  266. maindisp.PLAYER.BRING.MouseButton1Down:connect(function()
  267. for v,i in next, SelectedPlayers.PLAYER do
  268. if v ~= nil and v.Parent ~= nil then
  269. game.Lighting.Remote:WaitForChild("TeleportRequest"):InvokeServer("To Me", math.floor(tick() % 1 * 100000), v.Name)
  270. end
  271. end
  272. end)
  273.  
  274. maindisp.PLAYER.MESSAGE.MouseButton1Down:connect(function()
  275. for v,i in next, SelectedPlayers.PLAYER do
  276. if v ~= nil and v.Parent ~= nil then
  277. local msg = maindisp.PLAYER.MSGTEXT.Text
  278. local clr = SelectedColor
  279. Apoc.Message(v,clr,msg)
  280. end
  281. end
  282. end)
  283.  
  284. -- VEHICLE COMMANDS
  285. local SelectedVeh = ""
  286. local GoddedVeh = {}
  287. function UPDATEVEHLIST()
  288. local p = maindisp:WaitForChild"VEHICLE".VEHICLES
  289. local last = 0
  290. local t = p.Template
  291. for i,v in next, p:children() do
  292. if v.Name ~= "Template" then v:destroy() end
  293. end
  294. for i,v in next, workspace.Vehicles:children() do
  295. if v.Name ~= "Dead" and v.Name ~= "VehicleWreck" and v:FindFirstChild"Stats" then
  296. local obj = v
  297. local b = t:Clone()
  298. b.Parent = p
  299. b.Position = UDim2.new(0,0,0,last)
  300. last=last+25
  301. p.CanvasSize = UDim2.new(0,0,0,last)
  302. b.Text = v.Name
  303. b.Visible = true
  304. b.Name = v.Name
  305. if SelectedVeh == v then
  306. b.BackgroundColor3 = Color3.new(0,1,0)
  307. else
  308. b.BackgroundColor3 = Color3.new(1,0,0)
  309. end
  310. b.MouseButton1Down:connect(function()
  311. SelectedVeh = v
  312. end)
  313. end
  314. end
  315. end
  316. maindisp.VEHICLE.GOD.MouseButton1Down:connect(function()
  317. for i,v in next, workspace.Vehicles:children() do
  318. if v:FindFirstChild"Stats" and v.Name ~= "Dead" and v.Name ~= "VehicleWreck" and v == SelectedVeh then
  319. GoddedVeh[v.Name]=true
  320. end
  321. end
  322. end)
  323.  
  324. maindisp.VEHICLE.UNGOD.MouseButton1Down:connect(function()
  325. if GoddedVeh[SelectedVeh] then
  326. GoddedVeh[SelectedVeh]=nil
  327. end
  328. end)
  329.  
  330. maindisp.VEHICLE.KILL.MouseButton1Down:connect(function()
  331. if GoddedVeh[SelectedVeh] then
  332. GoddedVeh[SelectedVeh]=nil
  333. end
  334. for i,v in next, workspace.Vehicles:children() do
  335. if v:FindFirstChild"Stats" and v.Name ~= "Dead" and v.Name ~= "VehicleWreck" and v == SelectedVeh then
  336. Apoc.ChangeValue(v.Stats.Engine, 0)
  337. Apoc.ChangeValue(v.Stats.Hull, 0)
  338. Apoc.ChangeValue(v.Stats.Tank, 0)
  339. Apoc.ChangeValue(v.Stats.Armor, 0)
  340. Apoc.ChangeValue(v.Stats.Fuel, 0)
  341. end
  342. end
  343. end)
  344.  
  345. maindisp.VEHICLE.SPEED.MouseButton1Down:connect(function()
  346. for i,v in next, workspace.Vehicles:children() do
  347. if v:FindFirstChild"Stats" and v.Name ~= "Dead" and v.Name ~= "VehicleWreck" and v == SelectedVeh then
  348. if v.Stats:FindFirstChild"MaxSpeed" then
  349. Apoc.ChangeValue(v.Stats.MaxSpeed.Offroad, 200)
  350. Apoc.ChangeValue(v.Stats.MaxSpeed, 200)
  351. end
  352. end
  353. end
  354. end)
  355.  
  356. maindisp.VEHICLE.TELEPORT.MouseButton1Down:connect(function()
  357. for i,v in next, workspace.Vehicles:children() do
  358. if v == SelectedVeh then
  359. game.Lighting.Remote.SetCFrame:FireServer(v, game.Players.LocalPlayer.Character.Torso.CFrame * CFrame.new(-20, 0, 0))
  360. end
  361. end
  362. end)
  363.  
  364. -- SPAWNING COMMANDS
  365. ItemCodes = {
  366. ["AK104"] = 1037, ["WindscreenGlass"] = 184, ["WaterBottle"] = 209, ["Watch"] = 3001, ["VehicleJack"] = 3016,
  367. ["Vegetables"] = 214, ["VS50"] = 256, ["Uzi"] = 2015, ["Ushanka"] = 7014, ["USP45Ammo"] = 26, ["USP45"] = 2007,
  368. ["Twinkies"] = 212, ["Tuna"] = 4, ["TrinityBeret"] = 7015, ["TomatoSoup"] = 215, ["TM46"] = 257,
  369. ["TEC9Ammo32"] = 57, ["TEC9Ammo20"] = 56, ["TEC9Ammo"] = 20, ["TEC-9"] = 2005, ["SurvivalPackTan"] = 4009,
  370. ["SurvivalPackGrey"] = 4010, ["SurvivalPackGreen"] = 4011, ["SurvivalPackBrown"] = 4012, ["G18Suppressor"] = 9007,
  371. ["M14Suppressor"] = 9010, ["M4A1Suppressor"] = 9009, ["AKSuppressor"] = 9011, ["M1911Suppressor"] = 9008,
  372. ["Spam"] = 6, ["SodaSprite"] = 205, ["SodaRoot"] = 207, ["SodaPepsi"] = 7, ["SodaPepper"] = 9,
  373. ["SodaMoxie"] = 208, ["SodaDew"] = 202, ["SodaCrush"] = 201, ["SodaCoke"] = 8, ["ShotgunAmmo"] = 18,
  374. ["Shotgun"] = 1002, ["ShadesGrey"] = 8005, ["ShadesBlack"] = 8001, ["ScrapMetal"] = 183, ["Sabre"] = 3014,
  375. ["SUSAT"] = 9014, ["STANAGAmmo50"] = 52, ["STANAGAmmo30"] = 51, ["STANAGAmmo100"] = 53, ["SKSAmmo"] = 45,
  376. ["SKS"] = 1018, ["SCAR-L"] = 1022, ["RoadFlare"] = 251, ["RevolverAmmo"] = 25, ["Revolver"] = 2006,
  377. ["ReinforcedWheel"] = 189, ["Reflex"] = 9003, ["RedChemlight"] = 3020, ["RedBeret"] = 7013, ["RawMeat"] = 220,
  378. ["Ranger"] = 7003, ["RamboClothingTop"] = 5003, ["RamboClothingBottom"] = 6003, ["Radio"] = 3018,
  379. ["RPK"] = 1034, ["Pringles"] = 204, ["SSBeret"] = 7020, ["PilotGreen"] = 7010, ["PilotBlack"] = 7009, ["Pasta"] = 5,
  380. ["Painkillers"] = 12, ["PaddedClothingTop"] = 5002, ["PaddedClothingBottom"] = 6002, ["PPSHAmmo"] = 46,
  381. ["PPSH"] = 1019, ["PP19Ammo64"] = 58, ["SmallCrate"] = 38, ["OmniLight"] = 3015, ["OTs-14"] = 1036,
  382. ["NagantAmmo"] = 17, ["Mosin-Nagant"] = 1001, ["Model459Ammo14"] = 59, ["Model 459"] = 2013, ["Mk48Ammo"] = 23,
  383. ["Mk 48"] = 1005, ["Mk23"] = 2018, ["Mk17"] = 1031, ["MilitaryPackGrime"] = 4013, ["MilitaryPackGrey"] = 4015,
  384. ["MilitaryPackGreen"] = 4014, ["MilitaryPackBlack"] = 4016, ["MaverickAmmo"] = 27, ["Maverick"] = 1010,
  385. ["Material6"] = 36, ["Material5"] = 35, ["Material4"] = 34, ["Material3"] = 33, ["Material2"] = 32,
  386. ["Material1"] = 31, ["Matches"] = 3005, ["MaskSpecOps"] = 8009, ["MaskPhantom"] = 8013, ["MaskMime"] = 8008,
  387. ["MaskMercenary"] = 8007, ["MaskHockey"] = 8012, ["Map"] = 3003, ["MakarovAmmo"] = 16, ["Makarov"] = 2003,
  388. ["MRE"] = 10, ["MP5Ammo"] = 29, ["MP5"] = 1012, ["M9Ammo32"] = 55, ["M9Ammo17"] = 54, ["M9Ammo"] = 19,
  389. ["M93R"] = 2016, ["M9"] = 2004, ["M870Ammo"] = 28, ["M870"] = 1011, ["M4A1"] = 1004, -- ["M4A1Ammo"] = 22,
  390. ["M3Ammo30"] = 60, ["M3"] = 1028, ["M249Ammo100"] = 61, ["M249"] = 1024, ["M1911Ammo"] = 15, ["M1911"] = 2002,
  391. ["M14"] = 1016, ["M1014"] = 1027, ["M14Ammo50"] = 64, ["M14Ammo30"] = 63, ["M14Ammo20"] = 62,
  392. ["M1 Garand"] = 1006, ["Lemonade"] = 206, ["Laser"] = 9006, ["Kobra"] = 9004, ["Knife"] = 3013,
  393. ["KethArmorTop"] = 5011, ["KethArmorBottom"] = 6011, ["JerryCanEmpty"] = 186, ["JerryCan"] = 185,
  394. ["HornRimmed"] = 8006, ["Holo"] = 9002, ["HikingPackWhite"] = 4006, ["HikingPackOrange"] = 4005,
  395. ["HikingPackBrown"] = 4008, ["HikingPackBlue"] = 4007, ["Hatchet"] = 3011, ["HK417"] = 1033, ["HK21"] = 1032,
  396. ["GusArmorTop"] = 5010, ["GusArmorBottom"] = 6010, ["Grip"] = 9005, ["GreenChemlight"] = 3021,
  397. ["GarandAmmo"] = 24, ["GPS"] = 3006, ["G37"] = 2017, ["G36K"] = 1023, ["G3"] = 1030, -- ["G18Ammo"] = 41,
  398. ["G18"] = 2011, ["FuelTank"] = 182, ["Floodlight"] = 37, ["FlashlightSurvival"] = 3009,
  399. ["FlashlightOld"] = 3008, ["FlashlightMilitary"] = 3010, ["FlashlightAttachment"] = 9012, ["Firewood"] = 250,
  400. ["Firefighter"] = 8004, ["FedorovAmmo"] = 44, ["Fedorov"] = 1017, ["Fedora"] = 7004, ["FannyPackWhite"] = 4002,
  401. ["FannyPackTan"] = 4001, ["FannyPackPurple"] = 4004, ["FannyPackBlue"] = 4003, ["TheFal"] = 1029,
  402. ["Eyepatch"] = 8003, ["Entrencher"] = 3004, ["EngineParts"] = 181, ["EnfieldAmmo"] = 42, ["Enfield"] = 1015,
  403. ["Detonator"] = 3017, ["Crowbar"] = 3012, ["CowlGreen"] = 7002, ["CowlBlack"] = 7001, ["Cowboy"] = 7012,
  404. ["CookedMeat"] = 221, ["Compass"] = 3002, ["ClothingTopFalse"] = 5000, ["ClothingBottomFalse"] = 6000,
  405. ["CivilianClothingTop"] = 5001, ["CivilianClothingBottom"] = 6001, ["ChocolateBar"] = 211, ["ChipsAhoy"] = 213,
  406. ["ChickenSoup"] = 216, ["CheezIts"] = 203, ["CarWheel"] = 180, ["CamoWoodlandsTop"] = 5007,
  407. ["CamoWoodlandsBottom"] = 6007, ["CamoUrbanTop"] = 5005, ["CamoUrbanBottom"] = 6005, ["CamoSpecialTop"] = 5009,
  408. ["CamoSpecialBottom"] = 6009, ["CamoSnowTop"] = 5008, ["CamoSnowBottom"] = 6008, ["CamoJungleTop"] = 5006,
  409. ["CamoJungleBottom"] = 6006, ["CamoDesertTop"] = 5004, ["CamoDesertBottom"] = 6004, ["CZ75Ammo"] = 40,
  410. ["CZ75"] = 2010, ["CCO"] = 9001, ["CBJ-MS"] = 2014, ["C4"] = 255, ["BrimmedBrown"] = 7007,
  411. ["BrimmedBlack"] = 7008, ["Bowler"] = 7005, ["BlueChemlight"] = 3022, ["BloodBag"] = 11, ["Binoculars"] = 3007,
  412. ["Biker"] = 7006, ["BeefStew"] = 217, ["BeefJerky"] = 210, ["Beans"] = 3, ["Beanie"] = 7011,
  413. ["BandanaSkull"] = 8014, ["BandanaRenegade"] = 8011, ["BandanaRed"] = 8010, ["BandanaBlack"] = 8002,
  414. ["BallisticUrban"] = 7018, ["BallisticSpecOps"] = 7019, ["BallisticJungle"] = 7017, ["BallisticGlass"] = 187,
  415. ["BallisticDesert"] = 7016, ["Auto-5"] = 1025, ["ArmorPlates"] = 188, ["AN-94"] = 1040, ["AKS74U"] = 1041,
  416. ["AKM"] = 1038, ["AKAmmo75"] = 67, ["AKAmmo45"] = 66, ["AKAmmo30"] = 65, ["AK47Ammo75"] = 50,
  417. ["AK47Ammo40"] = 49, ["AK47Ammo30"] = 48, ["AK74"] = 1039, ["AK-47"] = 1003, ["AK12"] = 1035,
  418. ["ACOG"] = 9013, ["LargeCrate"] = 39, ["PP19"] = 1026, ["Patriot"] = 1021
  419. }
  420.  
  421. maindisp.SPAWNING.SELECTALL.MouseButton1Down:connect(function()
  422. for i,v in next, game.Players:players() do
  423. SelectedPlayers.SPAWNING[v]=true
  424. end
  425. end)
  426.  
  427. maindisp.SPAWNING.DESELECTALL.MouseButton1Down:connect(function()
  428. SelectedPlayers.SPAWNING={}
  429. end)
  430.  
  431. maindisp.SPAWNING.SELECTOTHER.MouseButton1Down:connect(function()
  432. SelectedPlayers.SPAWNING={}
  433. for i,v in next, game.Players:players() do
  434. if v ~= game.Players.LocalPlayer then SelectedPlayers.SPAWNING[v]=true end
  435. end
  436. end)
  437.  
  438. maindisp.SPAWNING.SELECTLP.MouseButton1Down:connect(function()
  439. SelectedPlayers.SPAWNING[game.Players.LocalPlayer]=true
  440. end)
  441.  
  442. maindisp.SPAWNING.SELECTGRP.MouseButton1Down:connect(function()
  443. maindisp.SPAWNING.SELECTGRP.Text = "Not finished yet!"
  444. wait(4)
  445. maindisp.SPAWNING.SELECTGRP.Text = "SELECT GROUP"
  446. end)
  447.  
  448. local SelectedSlot = "slot1"
  449. table.foreach(maindisp.SPAWNING.SLOTS:children(),function(i,v)
  450. if v:IsA"TextButton" then
  451. v.MouseButton1Down:connect(function()
  452. for _,md in next, maindisp.SPAWNING.SLOTS:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  453. v.BackgroundColor3 = Color3.new(0,1,0)
  454. SelectedSlot = v.Text:lower()
  455. end)
  456. end
  457. end)
  458.  
  459. maindisp.SPAWNING.LOCALSPAWN.MouseButton1Down:connect(function()
  460. if game.Lighting.LootDrops:FindFirstChild(maindisp.SPAWNING.ITEM.Text) then
  461. local new = game.Lighting.LootDrops[maindisp.SPAWNING.ITEM.Text]:Clone()
  462. new.Parent = workspace
  463. new:MoveTo(game.Players.LocalPlayer.Character.Torso.Position + Vector3.new(math.random(-10,10),0,math.random(-10,10)))
  464. end
  465. end)
  466.  
  467. maindisp.SPAWNING.SERVERSPAWN.MouseButton1Down:connect(function()
  468. function GetItem(Name)
  469. for lootName, lootid in pairs(ItemCodes) do
  470. if string.lower(lootName) == string.lower(Name) then
  471. local RealName = lootName
  472. local RealId = lootid
  473. return(RealId)
  474. end
  475. end
  476. return tonumber(Name)
  477. end
  478. for v,i in next, SelectedPlayers.SPAWNING do
  479. if v ~= nil and v.Parent ~= nil and v:FindFirstChild"playerstats" and v.playerstats:FindFirstChild"slots" then
  480. game.Lighting.Remote.AddObject:FireServer(v.playerstats.slots[SelectedSlot:lower()],tonumber(GetItem(maindisp.SPAWNING.ITEM.Text)))
  481. end
  482. end
  483. end)
  484.  
  485. -- SKIN CREATOR
  486. maindisp.SKINCREATOR.DESELECTALL.MouseButton1Down:connect(function()
  487. SelectedPlayers.SKIN={}
  488. end)
  489.  
  490.  
  491. maindisp.SKINCREATOR.SELECTLP.MouseButton1Down:connect(function()
  492. SelectedPlayers.SKIN[game.Players.LocalPlayer]=true
  493. end)
  494.  
  495. local SelectedSkin = {1,1,1,1}
  496. maindisp:WaitForChild"SKINCREATOR"
  497.  
  498. table.foreach(maindisp.SKINCREATOR.COLORONE:children(), function(i,v)
  499. if v:IsA"TextButton" then
  500. v.MouseButton1Down:connect(function()
  501. for _,md in next, maindisp.SKINCREATOR.COLORONE:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  502. v.BackgroundColor3 = Color3.new(0,1,0)
  503. SelectedSkin[1] = v.Id.Value
  504. end)
  505. end
  506. end)
  507.  
  508.  
  509. table.foreach(maindisp.SKINCREATOR.COLORTWO:children(), function(i,v)
  510. if v:IsA"TextButton" then
  511. v.MouseButton1Down:connect(function()
  512. for _,md in next, maindisp.SKINCREATOR.COLORTWO:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  513. v.BackgroundColor3 = Color3.new(0,1,0)
  514. SelectedSkin[2] = v.Id.Value
  515. end)
  516. end
  517. end)
  518.  
  519. table.foreach(maindisp.SKINCREATOR.COLORONE:children(), function(i,v)
  520. for _, z in next, v:children() do
  521. if z.Name:lower() == "id" and z.Name ~= "Red" and z.Value == 1 then
  522. z:destroy()
  523. end
  524. end
  525. end)
  526.  
  527.  
  528. table.foreach(maindisp.SKINCREATOR.COLORTWO:children(), function(i,v)
  529. for _, z in next, v:children() do
  530. if z.Name:lower() == "id" and z.Name ~= "Red" and z.Value == 1 then
  531. z:destroy()
  532. end
  533. end
  534. end)
  535.  
  536.  
  537. table.foreach(maindisp.SKINCREATOR.MATERIALONE:children(), function(i,v)
  538. if v:IsA"TextButton" then
  539. v.MouseButton1Down:connect(function()
  540. for _,md in next, maindisp.SKINCREATOR.MATERIALONE:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  541. v.BackgroundColor3 = Color3.new(0,1,0)
  542. SelectedSkin[3] = v.Id.Value
  543. end)
  544. end
  545. end)
  546.  
  547. table.foreach(maindisp.SKINCREATOR.MATERIALTWO:children(), function(i,v)
  548. if v:IsA"TextButton" then
  549. v.MouseButton1Down:connect(function()
  550. for _,md in next, maindisp.SKINCREATOR.MATERIALTWO:children() do md.BackgroundColor3 = Color3.new(1,0,0) end
  551. v.BackgroundColor3 = Color3.new(0,1,0)
  552. SelectedSkin[4] = v.Id.Value
  553. end)
  554. end
  555. end)
  556.  
  557. maindisp.SKINCREATOR.GIVESKIN.MouseButton1Down:connect(function()
  558. for v,i in next, SelectedPlayers.SKIN do
  559. local function GetNextOpenSkinSlot()
  560. for i = 1, #v.playerstats.skins:GetChildren() do
  561. print(i)
  562. local s = v.playerstats.skins:FindFirstChild("skin"..i)
  563. print(s)
  564. if s.Value == 0 then
  565. return s
  566. end
  567. end
  568. end
  569. local slot = tostring(GetNextOpenSkinSlot())
  570. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.playerstats.skins[slot], SelectedSkin[1])
  571. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.playerstats.skins[slot].material, SelectedSkin[3])
  572. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.playerstats.skins[slot].secondary, SelectedSkin[2])
  573. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.playerstats.skins[slot].secondary.material, SelectedSkin[4])
  574. end
  575. end)
  576.  
  577. maindisp.SKINCREATOR.SAVESKINS.MouseButton1Down:connect(function()
  578. local tab = {}
  579. for i,v in next, game.Players.LocalPlayer.playerstats.skins:children() do
  580. if v.Value ~= 0 then
  581. table.insert(tab,{v.Value,v.material.Value,v.secondary.Value,v.secondary.material.Value})
  582. end
  583. end
  584. local json = game:service'HttpService':JSONEncode(tab)
  585. game:service'CookiesService':SetCookieValue("RapingSkins",json)
  586. end)
  587.  
  588. -- MINIMIZE
  589. head.Minimize.Draggable = false
  590. head.Minimize.MouseButton1Down:connect(function()
  591. maindisp.Visible = not maindisp.Visible
  592. tabs.Visible = not tabs.Visible
  593. end)
  594.  
  595. -- LOAD SAVED SKINS
  596. local err,suc = pcall(function()
  597. if game:service'CookiesService':GetCookieValue("RapingSkins") ~= nil then
  598. local json = game:service'HttpService':JSONDecode(game:service'CookiesService':GetCookieValue("RapingSkins"))
  599. for i,v in next, game.Players.LocalPlayer.playerstats.skins:children() do -- Clear Skins
  600. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v, 0)
  601. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.material, 0)
  602. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.secondary, 0)
  603. game.Lighting.Remote.ChangeValue:FireServer(getkey(),v.secondary.material, 0)
  604. end
  605. for i,v in next, json do
  606. local function GetNextOpenSkinSlot()
  607. return "skin"..i
  608. end
  609. local slot = tostring(GetNextOpenSkinSlot())
  610. game.Lighting.Remote.ChangeValue:FireServer(getkey(),game.Players.LocalPlayer.playerstats.skins[slot], v[1])
  611. game.Lighting.Remote.ChangeValue:FireServer(getkey(),game.Players.LocalPlayer.playerstats.skins[slot].material, v[2])
  612. game.Lighting.Remote.ChangeValue:FireServer(getkey(),game.Players.LocalPlayer.playerstats.skins[slot].secondary, v[3])
  613. game.Lighting.Remote.ChangeValue:FireServer(getkey(),game.Players.LocalPlayer.playerstats.skins[slot].secondary.material, v[4])
  614. end
  615. end
  616. end) if not suc then game:service'CookiesService':SetCookieValue("RapingSkins",game:service'HttpService':JSONEncode({})) end
  617. -- RENDERSTEPPED
  618. game:service'RunService'.RenderStepped:connect(function()
  619. UPDATEVEHLIST()
  620. UPDATEPLRLIST(maindisp:WaitForChild"PLAYER".PLAYERS,SelectedPlayers.PLAYER)
  621. UPDATEPLRLIST(maindisp:WaitForChild"SKINCREATOR".PLAYERS,SelectedPlayers.SKIN)
  622. UPDATEPLRLIST(maindisp:WaitForChild"SPAWNING".PLAYERS,SelectedPlayers.SPAWNING)
  623. for i,v in next, workspace.Vehicles:children() do
  624. if GoddedVeh[v.Name] and v:FindFirstChild"Stats" then
  625. Apoc.ChangeValue(v.Stats.Engine, 10000)
  626. Apoc.ChangeValue(v.Stats.Hull, 10000)
  627. Apoc.ChangeValue(v.Stats.Tank, 10000)
  628. Apoc.ChangeValue(v.Stats.Armor, 10000)
  629. Apoc.ChangeValue(v.Stats.Fuel, 543)
  630. end
  631. end
  632. end)
Add Comment
Please, Sign In to add comment