Advertisement
TheMadWally

gamer

Apr 9th, 2020
414
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.21 KB | None | 0 0
  1. -- made by detourious xddddddd
  2. -- fixed by wally
  3.  
  4. local PFS = Instance.new("ScreenGui") do
  5. local Frame = Instance.new("Frame")
  6. local Experience = Instance.new("TextLabel")
  7. local Rank = Instance.new("TextLabel")
  8. local Kills = Instance.new("TextLabel")
  9. local Progress = Instance.new("TextLabel")
  10. local Money = Instance.new("TextLabel")
  11. local Details = Instance.new("TextLabel")
  12. local Bar = Instance.new("Frame")
  13. local Filler = Instance.new("Frame")
  14.  
  15. PFS.Name = "PFS"
  16. PFS.Parent = game:GetService'CoreGui';
  17. PFS.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  18. PFS.ResetOnSpawn = false
  19.  
  20. Frame.Parent = PFS
  21. Frame.AnchorPoint = Vector2.new(1, 0.5)
  22. Frame.BackgroundColor3 = Color3.new(1, 1, 1)
  23. Frame.BackgroundTransparency = 1
  24. Frame.Position = UDim2.new(1, -5, 0.5, 0)
  25. Frame.Size = UDim2.new(0, 200, 0, 100)
  26.  
  27. Experience.Name = "Experience"
  28. Experience.Parent = Frame
  29. Experience.BackgroundColor3 = Color3.new(1, 1, 1)
  30. Experience.BackgroundTransparency = 1
  31. Experience.Position = UDim2.new(0, 0, 0, 15)
  32. Experience.Size = UDim2.new(0, 200, 0, 15)
  33. Experience.Font = Enum.Font.Code
  34. Experience.Text = "Experience: 3503283"
  35. Experience.TextColor3 = Color3.new(1, 1, 1)
  36. Experience.TextSize = 14
  37. Experience.TextStrokeTransparency = 0.69999998807907
  38. Experience.TextXAlignment = Enum.TextXAlignment.Right
  39.  
  40. Rank.Name = "Rank"
  41. Rank.Parent = Frame
  42. Rank.BackgroundColor3 = Color3.new(1, 1, 1)
  43. Rank.BackgroundTransparency = 1
  44. Rank.Size = UDim2.new(0, 200, 0, 15)
  45. Rank.Font = Enum.Font.Code
  46. Rank.Text = "Rank: 84"
  47. Rank.TextColor3 = Color3.new(1, 1, 1)
  48. Rank.TextSize = 14
  49. Rank.TextStrokeTransparency = 0.69999998807907
  50. Rank.TextXAlignment = Enum.TextXAlignment.Right
  51.  
  52. Kills.Name = "Kills"
  53. Kills.Parent = Frame
  54. Kills.BackgroundColor3 = Color3.new(1, 1, 1)
  55. Kills.BackgroundTransparency = 1
  56. Kills.Position = UDim2.new(0, 0, 0, 30)
  57. Kills.Size = UDim2.new(0, 200, 0, 15)
  58. Kills.Font = Enum.Font.Code
  59. Kills.Text = "Kills: 20012"
  60. Kills.TextColor3 = Color3.new(1, 1, 1)
  61. Kills.TextSize = 14
  62. Kills.TextStrokeTransparency = 0.69999998807907
  63. Kills.TextXAlignment = Enum.TextXAlignment.Right
  64.  
  65. Progress.Name = "Progress"
  66. Progress.Parent = Frame
  67. Progress.BackgroundColor3 = Color3.new(1, 1, 1)
  68. Progress.BackgroundTransparency = 1
  69. Progress.Position = UDim2.new(0, 0, 0, 75)
  70. Progress.Size = UDim2.new(0, 200, 0, 15)
  71. Progress.Font = Enum.Font.Code
  72. Progress.Text = "Progress"
  73. Progress.TextColor3 = Color3.new(1, 1, 1)
  74. Progress.TextSize = 14
  75. Progress.TextStrokeTransparency = 0.69999998807907
  76. Progress.TextXAlignment = Enum.TextXAlignment.Right
  77.  
  78. Money.Name = "Money"
  79. Money.Parent = Frame
  80. Money.BackgroundColor3 = Color3.new(1, 1, 1)
  81. Money.BackgroundTransparency = 1
  82. Money.Position = UDim2.new(0, 0, 0, 45)
  83. Money.Size = UDim2.new(0, 200, 0, 15)
  84. Money.Font = Enum.Font.Code
  85. Money.Text = "Credits: 3503283"
  86. Money.TextColor3 = Color3.new(1, 1, 1)
  87. Money.TextSize = 14
  88. Money.TextStrokeTransparency = 0.69999998807907
  89. Money.TextXAlignment = Enum.TextXAlignment.Right
  90.  
  91. Details.Name = "Details"
  92. Details.Parent = Frame
  93. Details.BackgroundColor3 = Color3.new(1, 1, 1)
  94. Details.BackgroundTransparency = 1
  95. Details.Position = UDim2.new(0, 0, 0, 90)
  96. Details.Size = UDim2.new(0, 200, 0, 15)
  97. Details.Font = Enum.Font.Code
  98. Details.Text = "24385/85000 XP"
  99. Details.TextColor3 = Color3.new(1, 1, 1)
  100. Details.TextSize = 14
  101. Details.TextStrokeTransparency = 0.69999998807907
  102. Details.TextXAlignment = Enum.TextXAlignment.Right
  103.  
  104. Bar.Name = "Bar"
  105. Bar.Parent = Frame
  106. Bar.BackgroundColor3 = Color3.new(0.266667, 0.266667, 0.266667)
  107. Bar.BorderSizePixel = 0
  108. Bar.Position = UDim2.new(0, 0, 0, 63)
  109. Bar.Size = UDim2.new(1, 0, 0, 10)
  110.  
  111. Filler.Name = "Filler"
  112. Filler.Parent = Bar
  113. Filler.AnchorPoint = Vector2.new(1, 0)
  114. Filler.BackgroundColor3 = Color3.new(1, 1, 1)
  115. Filler.BorderSizePixel = 0
  116. Filler.Position = UDim2.new(1, 0, 0, 0)
  117. Filler.Size = UDim2.new(0, 0, 0, 10)
  118. end
  119.  
  120. local localPlayer = game:GetService("Players").LocalPlayer
  121.  
  122. local function calculateRank(points)
  123. points=points or 0
  124. return math.floor((1/4+points/500)^0.5-1/2)
  125. end
  126.  
  127. local function calculateExp(rank)
  128. rank=rank or 0
  129. return math.floor(500*((rank+1/2)^2-1/4))
  130. end
  131.  
  132. local ui = PFS.Frame
  133. local ts = game:GetService("TweenService")
  134.  
  135. local stats = nil;
  136. for i, v in next, getgc(true) do
  137. if type(v) == 'table' then
  138. if rawget(v, 'settings') and rawget(v, 'unlocks') then
  139. stats = v.stats;
  140. break;
  141. end
  142. end
  143. end
  144.  
  145. if stats then
  146. while game:GetService('RunService').Heartbeat:wait() do
  147. local exp = stats.experience;
  148. local kills = stats.totalkills
  149. local money = stats.money
  150.  
  151. local expHave = exp - calculateExp(calculateRank(exp))
  152. local expNeed = calculateExp(calculateRank(exp) + 1) - calculateExp(calculateRank(exp))
  153.  
  154. ui.Experience.Text = "Experience: " .. exp
  155. ui.Rank.Text = "Rank: ".. calculateRank(exp)
  156. ui.Kills.Text = "Kills: ".. kills
  157. ui.Money.Text = "Credits: ".. money
  158. ui.Details.Text = expHave .. " / " .. expNeed .. " EXP"
  159.  
  160. ui.Bar.Filler.Size = ui.Bar.Filler.Size:lerp(UDim2.new(expHave / expNeed, 0, 0, 10), 0.02)
  161. ui.Bar.Filler.BackgroundColor3 = ui.Bar.Filler.BackgroundColor3:lerp(Color3.fromHSV(expHave / expNeed * 0.4, 0.75, 1), 0.02)
  162. end
  163. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement