SHARE
TWEET

pftest

LEETcyanide Sep 22nd, 2019 (edited) 72 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --atlas for pf
  2.  
  3. local Tween = game:GetService("TweenService")
  4. local Players = game:GetService("Players")
  5. local ReplicatedStorage = game:GetService("ReplicatedStorage")
  6. local UserInputService = game:GetService("UserInputService")
  7.  
  8. local AtlasData = {} -- Array to store local client data
  9.  
  10. AtlasData.Functions = {}
  11. AtlasData.Cheats = {}
  12. AtlasData.Menu = {}
  13. AtlasData.Cheats.Categories = {}
  14. AtlasData.Client = {}
  15. AtlasData.Other = {}
  16.  
  17. Atlas = AtlasData
  18. AtlasF = AtlasData.Functions
  19. AtlasC = AtlasData.Cheats
  20.  
  21. Atlas.LocalPlayer = Players.LocalPlayer
  22. Atlas.Other.Version = "0.1.3"
  23. Atlas.Other.WindowToggled = false
  24.  
  25. AtlasF.CreateElement = function(Type, Properties) -- Creates screen elements easily
  26.     local ElementType
  27.     local ElementProperties
  28.     local Element
  29.  
  30.     local IsSuccess = pcall(function()
  31.         if type(Type) == "string" then
  32.             ElementType = Type
  33.         end
  34.  
  35.         if type(Properties) == "table" then
  36.             ElementProperties = Properties
  37.         end
  38.     end)
  39.  
  40.     if ElementType and ElementProperties then
  41.         pcall(function()
  42.             Element = Instance.new(ElementType)
  43.  
  44.             for Property, Value in pairs(ElementProperties) do
  45.                 pcall(function()
  46.                     Element[Property] = Value
  47.                 end)
  48.             end
  49.         end)
  50.     end
  51.  
  52.     return Element
  53. end
  54.  
  55. function AtlasF:GetElement(CustomType)
  56.   if CustomType == "Cheat" then
  57.     local Cheat = AtlasF.CreateElement("Frame", {Name = "Cheat", BackgroundColor3 = Color3.new(1, 1, 1), BackgroundTransparency = 1, Size = UDim2.new(0, 200, 0, 20)})
  58.     local Title = AtlasF.CreateElement("TextLabel", {Name = "Title", Parent = Cheat, BackgroundColor3 = Color3.new(1, 1, 1), BackgroundTransparency = 1, Size = UDim2.new(0, 140, 1, 0), Font = Enum.Font.SourceSansLight, Text = "No Reload", TextColor3 = Color3.new(1, 1, 1), TextSize = 15, TextStrokeTransparency = 0.80000001192093})
  59.     local Options = AtlasF.CreateElement("Frame", {Name = "Options", Parent = Cheat, AnchorPoint = Vector2.new(1, 0), BackgroundColor3 = Color3.new(1, 1, 1), BackgroundTransparency = 1, Position = UDim2.new(1, 0, 0, 0), Size = UDim2.new(0, 65, 0, 20)})
  60.     local Toggle = AtlasF.CreateElement("TextButton", {Name = "Toggle", Parent = Options, BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059), BorderSizePixel = 0, Size = UDim2.new(1, 0, 1, 0), Font = Enum.Font.SourceSans, Text = "false", TextColor3 = Color3.new(1, 0.262745, 0.262745), TextSize = 15, TextStrokeTransparency = 0.80000001192093})
  61.  
  62.     return Cheat
  63.   elseif CustomType == "Frame" then
  64.     local Frame = AtlasF.CreateElement("Frame", {ClipsDescendants = true, BackgroundColor3 = Color3.new(1, 1, 1), BackgroundTransparency = 1, Size = UDim2.new(1, 0, 1, 0)})
  65.     AtlasF.CreateElement("UIListLayout", {Parent = Frame, SortOrder = Enum.SortOrder.LayoutOrder})
  66.  
  67.     return Frame
  68.   elseif CustomType == "Button" then
  69.     local Button = AtlasF.CreateElement("TextButton", {Name = "Button", BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059), BorderSizePixel = 0, Size = UDim2.new(0, 90, 0, 20), Font = Enum.Font.SourceSansLight, Text = "Misc", TextColor3 = Color3.new(1, 1, 1), TextSize = 15, TextStrokeTransparency = 0.80000001192093})
  70.  
  71.     return Button
  72.   end
  73. end
  74.  
  75. function AtlasF:SendChat(Username, Text)
  76.   local ChatMessage = ReplicatedStorage.Misc.Msger:Clone()
  77.  
  78.   ChatMessage.Parent = Atlas.LocalPlayer.PlayerGui.ChatGame.GlobalChat
  79.   ChatMessage.Text = Username.." :  "
  80.   ChatMessage.Msg.Text = Text
  81.   ChatMessage.Msg.Position = UDim2.new(0, ChatMessage.TextBounds.X, 0, 0)
  82.   ChatMessage.Visible = true
  83.   ChatMessage.Msg.Visible = true
  84.   ChatMessage.TextColor3 = Color3.new(0.5, 0, 1)
  85.  
  86.   local Switch = true
  87.   spawn(function()
  88.     while ChatMessage.Parent == Atlas.LocalPlayer.PlayerGui.ChatGame.GlobalChat do
  89.       if Switch then
  90.         Tween:Create(ChatMessage, TweenInfo.new(3), {TextColor3 = Color3.new(0.5, 0, 1)}):Play()
  91.         Switch = false
  92.         wait(3)
  93.       else
  94.         Tween:Create(ChatMessage, TweenInfo.new(3), {TextColor3 = Color3.new(1, 0, 1)}):Play()
  95.         Switch = true
  96.         wait(3)
  97.       end
  98.     end
  99.   end)
  100. end
  101.  
  102. function AtlasF:ToggleMenu(Forced)
  103.   if not Forced then
  104.     if Atlas.Other.WindowToggled then
  105.       Atlas.Other.WindowToggled = false
  106.  
  107.       Atlas.Menu.Main.Title:TweenSize(UDim2.new(1,0,0,0), "Out", "Sine", 0.2, true)
  108.       Atlas.Menu.Main.Categories:TweenSize(UDim2.new(0,0,1,-55), "Out", "Sine", 0.2, true)
  109.       Atlas.Menu.Main.Frames:TweenSize(UDim2.new(0,0,1,-55), "Out", "Sine", 0.2, true)
  110.     elseif not Atlas.Other.WindowToggled then
  111.       Atlas.Other.WindowToggled = true
  112.  
  113.       Atlas.Menu.Main.Title:TweenSize(UDim2.new(1,0,0,50), "Out", "Sine", 0.2, true)
  114.       Atlas.Menu.Main.Categories:TweenSize(UDim2.new(0,100,1,-55), "Out", "Sine", 0.2, true)
  115.       Atlas.Menu.Main.Frames:TweenSize(UDim2.new(1,-95,1,-55), "Out", "Sine", 0.2, true)
  116.     end
  117.   else
  118.     Atlas.Other.WindowToggled = true
  119.  
  120.     Atlas.Menu.Main.Title:TweenSize(UDim2.new(1,0,0,50), "Out", "Sine", 0.2, true)
  121.     Atlas.Menu.Main.Categories:TweenSize(UDim2.new(0,100,1,-55), "Out", "Sine", 0.2, true)
  122.     Atlas.Menu.Main.Frames:TweenSize(UDim2.new(1,-95,1,-55), "Out", "Sine", 0.2, true)
  123.   end
  124. end
  125.  
  126. function AtlasF:HoverDecorations(Object)
  127.   if Object:IsA("TextButton") then
  128.     local Duplicate = Object.BackgroundColor3
  129.     local Tweens = {
  130.       Tween:Create(Object, TweenInfo.new(0.1), {BackgroundColor3 = Color3.new(Duplicate.R - 10/255, Duplicate.G - 10/255, Duplicate.B - 10/255)}),
  131.       Tween:Create(Object, TweenInfo.new(0.1), {BackgroundColor3 = Color3.new(Duplicate.R + 10/255, Duplicate.G + 10/255, Duplicate.B + 10/255)}),
  132.       Tween:Create(Object, TweenInfo.new(0.1), {BackgroundColor3 = Color3.new(Duplicate.R, Duplicate.G, Duplicate.B)}),
  133.     }
  134.  
  135.     Object.MouseEnter:Connect(function()
  136.       Tweens[1]:Play()
  137.     end)
  138.     Object.MouseLeave:Connect(function()
  139.       Tweens[3]:Play()
  140.     end)
  141.     Object.MouseButton1Up:Connect(function()
  142.       Tweens[3]:Play()
  143.     end)
  144.     Object.MouseButton1Down:Connect(function()
  145.       Tweens[2]:Play()
  146.     end)
  147.   end
  148. end
  149.  
  150. function AtlasF:NewCategory(Name) -- Creates categories
  151.     if AtlasC.Categories[Name] then error("Category '"..Name.."' already exists.") return end
  152.  
  153.     AtlasC.Categories[Name] = {}
  154.  
  155.     local Button = AtlasF:GetElement("Button")
  156.     Button.Text = Name
  157.   Button.AutoButtonColor = false
  158.   Button.Parent = Atlas.Menu.Main.Categories
  159.  
  160.   AtlasF:HoverDecorations(Button)
  161.  
  162.     local CategoryFrame = AtlasF:GetElement("Frame")
  163.     CategoryFrame.Name = Name
  164.   CategoryFrame.Visible = false
  165.     CategoryFrame.Parent = Atlas.Menu.Main.Frames
  166.  
  167.     Button.MouseButton1Click:Connect(function()
  168.     for _, Frame in next, Atlas.Menu.Main.Frames:GetChildren() do
  169.       Frame.Visible = false
  170.     end
  171.  
  172.     CategoryFrame.Visible = true
  173.     end)
  174. end
  175.  
  176. function AtlasF:NewCheat(Category, Name, Type, Callback)
  177.     if not AtlasC.Categories[Category] then error("Category '"..Category.."' doesn't exist.") return end
  178.  
  179.   local CategoryData = AtlasC.Categories[Category]
  180.   local CheatData = {
  181.     Enabled = false,
  182.         Callback = Callback
  183.   }
  184.  
  185.   if Name and Type and Callback then
  186.         CategoryData[Name] = CheatData
  187.  
  188.     if Type == "Toggle" then
  189.       local Cheat = AtlasF:GetElement("Cheat")
  190.  
  191.       Cheat.Title.Text = Name
  192.         Cheat.Options.Toggle.AutoButtonColor = false
  193.       Cheat.Parent = Atlas.Menu.Main.Frames[Category]
  194.  
  195.             AtlasF:HoverDecorations(Cheat.Options.Toggle)
  196.  
  197.             Cheat.Options.Toggle.MouseButton1Click:Connect(function()
  198.                 CheatData.Enabled = not CheatData.Enabled
  199.                 CheatData.Callback(CheatData)
  200.  
  201.                 if CheatData.Enabled then
  202.                     Tween:Create(Cheat.Options.Toggle, TweenInfo.new(0.2), {TextColor3 = Color3.fromRGB(67, 255, 64)}):Play()
  203.                     Cheat.Options.Toggle.Text = "true"
  204.                 else
  205.                     Tween:Create(Cheat.Options.Toggle, TweenInfo.new(0.2), {TextColor3 = Color3.fromRGB(255, 67, 67)}):Play()
  206.                     Cheat.Options.Toggle.Text = "false"
  207.                 end
  208.             end)
  209.     elseif Type == "One-Time" then
  210.       local Cheat = AtlasF:GetElement("Cheat")
  211.  
  212.       Cheat.Title.Text = Name
  213.         Cheat.Options.Toggle.AutoButtonColor = false
  214.       Cheat.Parent = Atlas.Menu.Main.Frames[Category]
  215.  
  216.       Cheat.Options.Toggle.TextColor3 = Color3.fromRGB(255, 255, 255)
  217.       Cheat.Options.Toggle.Text = "run"
  218.  
  219.             AtlasF:HoverDecorations(Cheat.Options.Toggle)
  220.  
  221.             Cheat.Options.Toggle.MouseButton1Click:Connect(function()
  222.         Cheat:Destroy()
  223.  
  224.                 CheatData.Enabled = not CheatData.Enabled
  225.                 CheatData.Callback(CheatData)
  226.             end)
  227.     end
  228.   end
  229. end
  230.  
  231. function AtlasF:GetStatus(Name)
  232.   for _, Category in next, AtlasC.Categories do
  233.     for CheatName, CheatData in next, Category do
  234.       if CheatName == Name then
  235.         if CheatData.Enabled then
  236.           return true
  237.         end
  238.       end
  239.     end
  240.   end
  241.  
  242.   return false
  243. end
  244.  
  245. function AtlasF:Initialize()
  246.   local StartTick = tick()
  247.  
  248.   -- Creates Everything
  249.   local Screen = AtlasF.CreateElement("ScreenGui", {Name = "ATLAS", Parent = game:GetService("CoreGui")})
  250.   Atlas.Menu.Main = AtlasF.CreateElement("Frame", {Draggable = true, Name = "Main", Parent = Screen, AnchorPoint = Vector2.new(0.5, 0.5), BackgroundColor3 = Color3.new(0.121569, 0.0627451, 0.172549), BackgroundTransparency = 1, BorderColor3 = Color3.new(0.945098, 0, 0), BorderSizePixel = 0, Position = UDim2.new(0.5, 0, 0.5, 0), Size = UDim2.new(0, 300, 0, 300)})
  251.   AtlasF.CreateElement("TextLabel", {Name = "Title", Parent = Atlas.Menu.Main, ClipsDescendants = true, BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059), BorderSizePixel = 0, Size = UDim2.new(1,0,0,0), Font = Enum.Font.SourceSansLight, Text = "A T L A S", TextColor3 = Color3.new(1, 1, 1), TextSize = 28, TextStrokeTransparency = 0.69999998807907})
  252.   AtlasF.CreateElement("Frame",{Name = "Categories", Parent = Atlas.Menu.Main, ClipsDescendants = true, BackgroundColor3 = Color3.new(1, 1, 1), BackgroundTransparency = 1, Position = UDim2.new(0, 0, 0, 55), Size = UDim2.new(0,0,1,-55)})
  253.   AtlasF.CreateElement("UIListLayout",{Parent = Atlas.Menu.Main.Categories, SortOrder = Enum.SortOrder.LayoutOrder})
  254.   AtlasF.CreateElement("Frame", {Name = "Frames", Parent = Atlas.Menu.Main, ClipsDescendants = true, AnchorPoint = Vector2.new(1, 1), BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059), BorderSizePixel = 0, Position = UDim2.new(1, 0, 1, 0), Size = UDim2.new(0,0,1,-55)})
  255.  
  256.   UserInputService.InputBegan:Connect(function(Input)
  257.     if Input.KeyCode == Enum.KeyCode.Minus then
  258.         AtlasF:ToggleMenu()
  259.       end
  260.   end)
  261.  
  262.   -- Gets functions & upvalues
  263.   Atlas.Client = {}
  264.  
  265.   local getup, setup = debug.getupvalues, debug.setupvalues
  266.  
  267.   for Index, Value in next, getgc() do
  268.     for _, Upvalue in next, getup(Value) do
  269.       if type(Upvalue) == "table" then
  270.         for Name, Function in next, Upvalue do
  271.           if Name == "loadgrenade" and "loadgun" then
  272.             Atlas.Client.char = Upvalue
  273.           elseif Name == "add" then
  274.             Atlas.Client.network = Upvalue
  275.           elseif Name == "breakwindows" then
  276.             Atlas.Client.effects = Upvalue
  277.           elseif Name == "exp" then
  278.             Atlas.Client.exp = Upvalue
  279.           end
  280.         end
  281.       end
  282.     end
  283.   end
  284.  
  285.   if Atlas.Client then
  286.     local Char = Atlas.Client.char
  287.     local Network = Atlas.Client.network
  288.     local Effects = Atlas.Client.effects
  289.  
  290.     -- Functions
  291.     local send = Network.send
  292.     local loadgun = Char.loadgun
  293.     local loadgrenade = Char.loadgrenade
  294.  
  295.     Network.send = function(self, ...)
  296.       local arguments = {...}
  297.       local name = arguments[1]
  298.  
  299.       return send(self, ...)
  300.     end
  301.  
  302.     Char.loadgun = function(...)
  303.       local arguments = {...}
  304.  
  305.       if AtlasF:GetStatus("Movement Speed") then
  306.         arguments[2].walkspeed = 20
  307.         arguments[2].sprintspeed = 30
  308.       end
  309.  
  310.       if AtlasF:GetStatus("No Reload") then
  311.         arguments[2].magsize = arguments[2].magsize + (arguments[2].sparerounds - 10)
  312.           arguments[2].sparerounds = 10
  313.       end
  314.  
  315.       if AtlasF:GetStatus("Fixed Firerate") then
  316.         arguments[2].variablefirerate = false
  317.         arguments[2].firerate = 1000
  318.       end
  319.  
  320.       if AtlasF:GetStatus("Force Auto") then
  321.         arguments[2].firemodes = {true, 4, 1}
  322.         arguments[2].requirechamber = false -- snipers
  323.       end
  324.  
  325.       if AtlasF:GetStatus("Lighter Guns") then
  326.         arguments[2].aimspeed = 25
  327.         arguments[2].equip = 20
  328.       end
  329.  
  330.       if AtlasF:GetStatus("No Spread") then
  331.         arguments[2].crosssize = 4
  332.         arguments[2].crossexpansion = 8
  333.       end
  334.  
  335.       VectorMin = Vector3.new(-0.2, -0.2, -0.2)
  336.       VectorMax = Vector3.new(0.2, 0.2, 0.2)
  337.  
  338.       if AtlasF:GetStatus("No Recoil") then
  339.         arguments[2].aimcamkickmin = VectorMin
  340.         arguments[2].aimcamkickmax = VectorMax
  341.         arguments[2].aimrotkickmin = VectorMin
  342.         arguments[2].aimrotkickmax = VectorMax
  343.         arguments[2].aimtranskickmin = VectorMin
  344.         arguments[2].aimtranskickmax = VectorMax
  345.         arguments[2].camkickmin = VectorMin
  346.         arguments[2].camkickmax = VectorMax
  347.         arguments[2].rotkickmin = VectorMin
  348.         arguments[2].rotkickmax = VectorMax
  349.         arguments[2].transkickmin = VectorMin
  350.         arguments[2].transkickmax = VectorMax
  351.       end
  352.  
  353.       if AtlasF:GetStatus("Faster Reload") then
  354.         for i, v in next, arguments[2].animations do
  355.           if i == "reload" or i == "tacticalreload" or i == "onfire" or i == "inspect" or i == "spot" or i == "parkour" then
  356.             v.timescale = 0.1
  357.           elseif i == "pullbolt" then
  358.             v.timescale = 0.075
  359.           end
  360.         end
  361.       end
  362.  
  363.       return loadgun(unpack(arguments))
  364.     end
  365.   end
  366.  
  367.   AtlasF:SendChat("ATLAS", "Cheat loaded. Press '-' to toggle menu.")
  368.   AtlasF:SendChat("ATLAS", "Load time: ".. math.floor((tick() - StartTick)*100)/100 .."s")
  369.   AtlasF:SendChat("ATLAS", "You are using version "..Atlas.Other.Version..".")
  370. end
  371.  
  372. AtlasF:Initialize()
  373.  
  374. AtlasF:NewCategory("Guns")
  375. AtlasF:NewCheat("Guns", "No Reload", "Toggle", function()end)
  376. AtlasF:NewCheat("Guns", "No Spread", "Toggle", function()end)
  377. AtlasF:NewCheat("Guns", "No Recoil", "Toggle", function()end)
  378. AtlasF:NewCheat("Guns", "Lighter Guns", "Toggle", function()end)
  379. AtlasF:NewCheat("Guns", "Force Auto", "Toggle", function()end)
  380. AtlasF:NewCheat("Guns", "Fixed Firerate", "Toggle", function()end)
  381. AtlasF:NewCheat("Guns", "Faster Reload", "Toggle", function()end)
  382.  
  383. AtlasF:NewCategory("LocalPlayer")
  384. AtlasF:NewCheat("LocalPlayer", "Movement Speed", "Toggle", function()end)
  385.  
  386. AtlasF:NewCategory("Other")
  387. AtlasF:NewCheat("Other", "GameSense", "One-Time", function()
  388.   loadstring(game:HttpGet("https://pastebin.com/raw/NQk6TR9C", true))()
  389. end)
  390. AtlasF:NewCheat("Other", "Scoreboard", "One-Time", function()
  391.   loadstring(game:HttpGet("https://pastebin.com/raw/eY8DB1ZT", true))()
  392. end)
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