API tools faq
paste
Advertisement
Upscalefanatic3

CB:RO Some type of script not tested, but surely works

Upscalefanatic3
May 16th, 2019
438
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 17.48 KB | None | 0 0
raw download clone embed print report diff
  1.  
  2.  
  3. --SynapseX Decompiler
  4.  
  5. local _Run = game:GetService("RunService")
  6. local ANNOYANCE = true
  7. local Player = game.Players.LocalPlayer
  8. Player:GetMouse().KeyDown:connect(function(f)
  9. if f:lower() == "l" then
  10. ANNOYANCE = not ANNOYANCE
  11. end
  12. end)
  13. local myModule = require(game.ReplicatedStorage.GetIcon)
  14. local Camera = game.Workspace.CurrentCamera
  15. local last_va = 0
  16. local last_va2 = 0
  17. local Radar = Player:WaitForChild("PlayerGui"):WaitForChild("GUI"):WaitForChild("Circle").Circle
  18. local Position = Vector3.new(0, 0, 0)
  19. local Positionx = Position.x
  20. local Positiony = Position.y
  21. local maxradius = 100
  22. local radarsize = 400
  23. function justdoit()
  24. Positionx = math.clamp(Positionx, 0.23, 0.67)
  25. Positiony = math.clamp(Positiony, 0.23, 0.67)
  26. end
  27. local boop = script.Parent.Objective
  28. local TweenService = game:GetService("TweenService")
  29. spawn(function()
  30. while wait(1) do
  31. local garb = script.Parent.Objective:GetChildren()
  32. for i = 1, 4 do
  33. if garb[i]:IsA("ImageLabel") and garb[i].Visible == true then
  34. local color = garb[i].ImageColor3
  35. TweenService:Create(garb[i], TweenInfo.new(0.75, Enum.EasingStyle.Quad, Enum.EasingDirection.In), {
  36. ImageColor3 = Color3.new(0.7, 0.7, 0.7)
  37. }):Play()
  38. wait(0.75)
  39. TweenService:Create(garb[i], TweenInfo.new(1, Enum.EasingStyle.Quad, Enum.EasingDirection.In), {ImageColor3 = color}):Play()
  40. end
  41. end
  42. end
  43. end)
  44. while wait() do
  45. script.Parent.Objective.Enabled = false
  46. script.Parent.Objective.pickup.Visible = false
  47. script.Parent.Objective.defuse.Visible = false
  48. script.Parent.Objective.plant.Visible = false
  49. script.Parent.Objective.protect.Visible = false
  50. if ANNOYANCE == true and game.Workspace:FindFirstChild("Map") and game.Workspace.Map:FindFirstChild("Gamemode") and game.Workspace.Map.Gamemode.Value == "defusal" then
  51. if game.Workspace.Debris:FindFirstChild("C4") then
  52. local csn = game.Workspace.Debris.C4
  53. script.Parent.Objective.Adornee = csn
  54. if game.Players.LocalPlayer.Status.Team.Value == "CT" then
  55. script.Parent.Objective.protect.Visible = true
  56. elseif game.Players.LocalPlayer.Status.Team.Value == "T" then
  57. script.Parent.Objective.pickup.Visible = true
  58. end
  59. script.Parent.Objective.Enabled = true
  60. elseif game.Workspace:FindFirstChild("C4") then
  61. local csn = game.Workspace.C4
  62. local df = false
  63. if game.Players.LocalPlayer.Status.Team.Value == "CT" then
  64. if game.Workspace.Map:FindFirstChild("SpawnPoints") and game.Workspace.Map.SpawnPoints:FindFirstChild("C4Plant") and game.Workspace.Map.SpawnPoints.C4Plant.Planted.Value == true then
  65. csn = game.Workspace.Map.SpawnPoints.C4Plant
  66. df = true
  67. end
  68. if df == false and game.Workspace.Map:FindFirstChild("SpawnPoints") and game.Workspace.Map.SpawnPoints:FindFirstChild("C4Plant2") and game.Workspace.Map.SpawnPoints.C4Plant2.Planted.Value == true then
  69. csn = game.Workspace.Map.SpawnPoints.C4Plant2
  70. end
  71. script.Parent.Objective.defuse.Visible = true
  72. elseif game.Players.LocalPlayer.Status.Team.Value == "T" then
  73. script.Parent.Objective.protect.Visible = true
  74. end
  75. script.Parent.Objective.Adornee = csn
  76. script.Parent.Objective.Enabled = true
  77. elseif game.Players.LocalPlayer.Status.Team.Value == "T" then
  78. local df = false
  79. if game.Workspace.Map:FindFirstChild("SpawnPoints") and game.Workspace.Map.SpawnPoints:FindFirstChild("C4Plant") then
  80. local ep = game.Workspace.Map.SpawnPoints.C4Plant.Position
  81. if (Camera.CoordinateFrame.p - ep).magnitude <= 50 then
  82. df = true
  83. local csn = game.Workspace.Map.SpawnPoints.C4Plant
  84. script.Parent.Objective.Adornee = csn
  85. script.Parent.Objective.plant.Visible = true
  86. script.Parent.Objective.Enabled = true
  87. end
  88. end
  89. if df == false and game.Workspace.Map:FindFirstChild("SpawnPoints") and game.Workspace.Map.SpawnPoints:FindFirstChild("C4Plant2") then
  90. local ep = game.Workspace.Map.SpawnPoints.C4Plant2.Position
  91. if (Camera.CoordinateFrame.p - ep).magnitude <= 50 then
  92. local csn = game.Workspace.Map.SpawnPoints.C4Plant2
  93. script.Parent.Objective.Adornee = csn
  94. script.Parent.Objective.plant.Visible = true
  95. script.Parent.Objective.Enabled = true
  96. end
  97. end
  98. end
  99. end
  100. local froobarb = script.Parent.Nametags:GetChildren()
  101. if #froobarb > 0 then
  102. for i = 1, #froobarb do
  103. froobarb[i].Enabled = false
  104. end
  105. end
  106. if game.ReplicatedStorage.gametype.Value == "TTT" or game.ReplicatedStorage.gametype.Value == "deathmatch" then
  107. return
  108. end
  109. if script.Parent:FindFirstChild("GUI") then
  110. maxradius = 100 * (200 / script.Parent.GUI.Circle.Circle.AbsoluteSize.X)
  111. end
  112. if Radar.Visible == true and game.Players.LocalPlayer and script.Parent:FindFirstChild("GUI") and script.Parent.GUI.MapVote.Visible == false then
  113. if Player then
  114. local p_distance = (Camera.CoordinateFrame.p - Player:GetMouse().Hit.p).magnitude
  115. if p_distance == 0 then
  116. p_distance = 1.0E-4
  117. end
  118. local p_height = Player:GetMouse().Hit.p.y - Camera.CoordinateFrame.p.y
  119. local view_angle
  120. if p_height ~= 0 then
  121. view_angle = math.deg(math.asin(math.abs(p_height) / p_distance)) * (math.abs(p_height) / p_height)
  122. else
  123. view_angle = 0
  124. end
  125. local cam_cf = Camera.CoordinateFrame
  126. local looking_at = cam_cf * CFrame.new(0, 0, -100)
  127. local view_angle2 = math.deg(math.atan2(cam_cf.p.x - looking_at.p.x, cam_cf.p.z - looking_at.p.z)) + 180
  128. local v_delta2
  129. local dir2 = 0
  130. local va_check = {
  131. math.abs(view_angle2 - last_va2),
  132. 360 - math.abs(view_angle2 - last_va2)
  133. }
  134. if view_angle2 == last_va2 then
  135. dir2 = 0
  136. v_delta2 = 0
  137. elseif va_check[1] < va_check[2] then
  138. v_delta2 = va_check[1]
  139. dir2 = (view_angle2 - last_va2) / va_check[1]
  140. else
  141. v_delta2 = va_check[2]
  142. if last_va2 > view_angle2 then
  143. dir2 = 1
  144. else
  145. dir2 = -1
  146. end
  147. end
  148. last_va2 = view_angle2
  149. Radar.Player.Position = UDim2.new(0.5, -Radar.Player.AbsoluteSize.X / 2, 0.5, -Radar.Player.AbsoluteSize.Y / 2)
  150. Radar.Player.Rotation = 180 - view_angle2
  151. Radar.Player.Visible = true
  152. else
  153. Radar.Player.Visible = false
  154. end
  155. _Run.Heartbeat:wait()
  156. if game.Workspace:FindFirstChild("Map") and game.Workspace.Map:FindFirstChild("Gamemode") and game.Workspace.Map.Gamemode.Value == "defusal" then
  157. if Player.Status.Team.Value == "T" or Player.Status.Team.Value == "CT" then
  158. if workspace.Status.HasBomb.Value == "" and game.Workspace:FindFirstChild("Debris") and game.Workspace.Debris:FindFirstChild("C4") then
  159. local Distance = (Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace.Debris.C4.CFrame.x, workspace.Debris.C4.CFrame.z)).magnitude
  160. if Distance <= 1000 and Player.Status.Team.Value == "T" or Distance <= 40 then
  161. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace.Debris.C4.CFrame.x, workspace.Debris.C4.CFrame.z))
  162. Position = Vector2.new(Position.x, Position.y)
  163. Positionx = 0.5 + Position.X / radarsize - Radar.Bomb.Size.X.Scale / 2
  164. Positiony = 0.5 + Position.Y / radarsize - Radar.Bomb.Size.Y.Scale / 2
  165. justdoit()
  166. Radar:WaitForChild("Bomb").Position = UDim2.new(Positionx, 0, Positiony, 0)
  167. Radar:WaitForChild("Bomb").Visible = true
  168. else
  169. Radar:WaitForChild("Bomb").Visible = false
  170. end
  171. elseif Player.Status.Team.Value == "T" and game.Players:FindFirstChild(workspace.Status.HasBomb.Value) and game.Players[workspace.Status.HasBomb.Value].Character and game.Players[workspace.Status.HasBomb.Value].Character:FindFirstChild("HumanoidRootPart") then
  172. local Distance = (Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(game.Players[workspace.Status.HasBomb.Value].Character:WaitForChild("HumanoidRootPart").CFrame.x, game.Players[workspace.Status.HasBomb.Value].Character:WaitForChild("HumanoidRootPart").CFrame.z)).magnitude
  173. if Distance <= 1000 then
  174. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(game.Players[workspace.Status.HasBomb.Value].Character:WaitForChild("HumanoidRootPart").CFrame.x, game.Players[workspace.Status.HasBomb.Value].Character:WaitForChild("HumanoidRootPart").CFrame.z))
  175. Position = Vector2.new(Position.x, Position.y)
  176. Positionx = 0.5 + Position.X / radarsize - Radar.Bomb.Size.X.Scale / 2
  177. Positiony = 0.5 + Position.Y / radarsize - Radar.Bomb.Size.Y.Scale / 2
  178. justdoit()
  179. Radar:WaitForChild("Bomb").Position = UDim2.new(Positionx, 0, Positiony, 0)
  180. Radar:WaitForChild("Bomb").Visible = true
  181. else
  182. Radar:WaitForChild("Bomb").Visible = false
  183. end
  184. else
  185. Radar:WaitForChild("Bomb").Visible = false
  186. end
  187. else
  188. Radar:WaitForChild("Bomb").Visible = false
  189. end
  190. if workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2"):WaitForChild("Planted").Value or workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant"):WaitForChild("Planted").Value then
  191. Radar:WaitForChild("Bomb").Visible = false
  192. end
  193. local Distance = (Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant").CFrame.x, workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant").CFrame.z)).magnitude
  194. if Distance <= 1000 then
  195. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant").CFrame.x, workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant").CFrame.z))
  196. Position = Vector2.new(Position.x, Position.y)
  197. Positionx = 0.5 + Position.X / radarsize - Radar.B.Size.X.Scale / 2
  198. Positiony = 0.5 + Position.Y / radarsize - Radar.B.Size.Y.Scale / 2
  199. justdoit()
  200. Radar:WaitForChild("B").Position = UDim2.new(Positionx, 0, Positiony, 0)
  201. else
  202. Radar:WaitForChild("B").Visible = false
  203. end
  204. local Distance = (Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2").CFrame.x, workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2").CFrame.z)).magnitude
  205. if Distance <= 1000 then
  206. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2").CFrame.x, workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2").CFrame.z))
  207. Position = Vector2.new(Position.x, Position.y)
  208. Position = Vector2.new(Position.x, Position.y)
  209. Positionx = 0.5 + Position.X / radarsize - Radar.A.Size.X.Scale / 2
  210. Positiony = 0.5 + Position.Y / radarsize - Radar.A.Size.Y.Scale / 2
  211. justdoit()
  212. Radar:WaitForChild("A").Position = UDim2.new(Positionx, 0, Positiony, 0)
  213. else
  214. Radar:WaitForChild("A").Visible = false
  215. end
  216. if workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant"):WaitForChild("Planted").Value then
  217. Radar:WaitForChild("A").TextColor = BrickColor.new("Bright yellow")
  218. if Player.Status.Team.Value == "T" then
  219. Radar:WaitForChild("B").TextColor = BrickColor.new("Bright red")
  220. Radar:WaitForChild("B").Text = "B"
  221. else
  222. Radar:WaitForChild("B").TextColor = BrickColor.new("Bright yellow")
  223. Radar:WaitForChild("B").Text = "B"
  224. end
  225. elseif workspace:WaitForChild("Map"):WaitForChild("SpawnPoints"):WaitForChild("C4Plant2"):WaitForChild("Planted").Value then
  226. Radar:WaitForChild("B").TextColor = BrickColor.new("Bright yellow")
  227. if Player.Status.Team.Value == "T" then
  228. Radar:WaitForChild("A").TextColor = BrickColor.new("Bright red")
  229. Radar:WaitForChild("A").Text = "A"
  230. else
  231. Radar:WaitForChild("A").TextColor = BrickColor.new("Bright yellow")
  232. Radar:WaitForChild("A").Text = "A"
  233. end
  234. else
  235. if Player.Status.Team.Value == "T" then
  236. Radar:WaitForChild("A").TextColor = BrickColor.new("Bright yellow")
  237. Radar:WaitForChild("B").TextColor = BrickColor.new("Bright yellow")
  238. Radar:WaitForChild("A").Text = "A"
  239. Radar:WaitForChild("B").Text = "B"
  240. else
  241. Radar:WaitForChild("A").TextColor = BrickColor.new("Bright yellow")
  242. Radar:WaitForChild("B").TextColor = BrickColor.new("Bright yellow")
  243. Radar:WaitForChild("A").Text = "A"
  244. Radar:WaitForChild("B").Text = "B"
  245. end
  246. Radar:WaitForChild("A").Visible = true
  247. Radar:WaitForChild("B").Visible = true
  248. end
  249. if not game.Workspace:FindFirstChild("Map") then
  250. Radar:WaitForChild("A").Visible = false
  251. Radar:WaitForChild("B").Visible = false
  252. Radar:WaitForChild("Bomb").Visible = false
  253. end
  254. else
  255. Radar.A.Visible = false
  256. Radar.B.Visible = false
  257. Radar.Bomb.Visible = false
  258. end
  259. Radar:WaitForChild("Players"):ClearAllChildren()
  260. for Index, Noob in pairs(game.Players:GetChildren()) do
  261. local bepis
  262. if script.Parent.Nametags:FindFirstChild(Noob.Name) == nil then
  263. bepis = script.NameTag:clone()
  264. bepis.Parent = script.Parent.Nametags
  265. bepis.Name = Noob.Name
  266. bepis.PersonName.Text = bepis.Name
  267. else
  268. bepis = script.Parent.Nametags[Noob.Name]
  269. end
  270. bepis.Enabled = false
  271. if Noob.Character and Noob.Character:FindFirstChild("HumanoidRootPart") and Noob.Character:FindFirstChild("Humanoid") and 0 < Noob.Character.Humanoid.Health and Noob ~= Player and ((Noob:FindFirstChild("LastSeen") or Noob:FindFirstChild("Spotted")) and Noob.TeamColor ~= Player.TeamColor or Noob.TeamColor == Player.TeamColor or Player.Status.Team.Value == "Spectator") then
  272. local sps = Noob.Character:WaitForChild("HumanoidRootPart").CFrame
  273. local hidden = false
  274. if Player.Status.Team.Value == "Spectator" then
  275. elseif Noob.TeamColor ~= Player.TeamColor and Noob:FindFirstChild("LastSeen") then
  276. hidden = true
  277. sps = CFrame.new(Noob.LastSeen.Value)
  278. end
  279. local Distance = (Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(sps.x, sps.z)).magnitude
  280. if Distance <= 3000 then
  281. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(sps.x, sps.z))
  282. Position = Vector2.new(Position.x, Position.y)
  283. local Label = Radar:WaitForChild("Player"):Clone()
  284. Label:WaitForChild("ImageLabel"):Destroy()
  285. Label.Rotation = 0
  286. Label.Visible = true
  287. Label.Name = Noob.Name
  288. Label.Parent = Radar:WaitForChild("Players")
  289. if Noob.TeamColor == Player.TeamColor or Player.Status.Team.Value == "Spectator" then
  290. Label.ImageColor3 = BrickColor.new("Bright green").Color
  291. if bepis then
  292. bepis.Adornee = Noob.Character.Head
  293. bepis.Enabled = true
  294. bepis.Health.TextColor3 = Noob.TeamColor.Color
  295. bepis.PersonName.TextColor3 = Noob.TeamColor.Color
  296. bepis.Pointer.ImageColor3 = Noob.TeamColor.Color
  297. bepis.AlwaysOnTop = true
  298. if game.Workspace.Status.Preparation.Value == true or Noob:FindFirstChild("LockedIn") then
  299. bepis.Health.Visible = true
  300. bepis.PersonName.Visible = true
  301. if game.Workspace.Status.Preparation.Value == true then
  302. bepis.Pic.Visible = true
  303. bepis.Pic.Image = myModule.getWeaponOfKiller(Noob.Character.EquippedTool.Value)
  304. else
  305. bepis.Pic.Visible = false
  306. end
  307. else
  308. bepis.Pic.Visible = false
  309. bepis.Health.Visible = false
  310. bepis.PersonName.Visible = false
  311. end
  312. if bepis.Health.Visible == true then
  313. bepis.Health.Text = math.floor(Noob.Character.Humanoid.Health / Noob.Character.Humanoid.MaxHealth * 100) .. "%"
  314. end
  315. end
  316. else
  317. Label.ImageColor3 = BrickColor.new("Really red").Color
  318. Label.Hidden.ImageColor3 = BrickColor.new("Really red").Color
  319. Label.Hidden.Visible = hidden
  320. Label.ImageTransparency = hidden and 1 or 0
  321. end
  322. if Player.Status.Team.Value == "Spectator" then
  323. Label.ImageColor3 = Noob.TeamColor.Color
  324. end
  325. Positionx = 0.5 + Position.X / radarsize - Label.Size.X.Scale / 2
  326. Positiony = 0.5 + Position.Y / radarsize - Label.Size.Y.Scale / 2
  327. justdoit()
  328. Label.Position = UDim2.new(Positionx, 0, Positiony, 0)
  329. end
  330. end
  331. end
  332. if game.Workspace:FindFirstChild("Map") and game.Workspace.Map:FindFirstChild("Radar") then
  333. local rada = game.Workspace.Map.Radar
  334. if game.Workspace.Map:FindFirstChild("Origin") and game.Workspace.Map:FindFirstChild(game.Workspace.Map.Origin.Value) and game.Workspace.Map:FindFirstChild(game.Workspace.Map.Origin.Value).Clips.Locations:FindFirstChild(Player.Location.Value) and game.Workspace.Map:FindFirstChild(game.Workspace.Map.Origin.Value).Clips.Locations:FindFirstChild(Player.Location.Value):FindFirstChild("Radar2") then
  335. rada = game.Workspace.Map.Radar2
  336. end
  337. if rada:FindFirstChild("Decal") then
  338. Radar.Map.Image = rada.Decal.Texture
  339. end
  340. Radar.Map.Size = UDim2.new(rada.Size.X / radarsize, 0, rada.Size.Z / radarsize, 0)
  341. Position = -(Vector2.new(Camera.CoordinateFrame.x, Camera.CoordinateFrame.z) - Vector2.new(rada.CFrame.x, rada.CFrame.z))
  342. local mapsize = math.max(rada.Size.X, rada.Size.Z)
  343. maxradius = mapsize
  344. Position = Vector2.new(Position.x / maxradius * mapsize, Position.y / maxradius * mapsize)
  345. Radar.Map.Position = UDim2.new(0.5 + (Position.X - mapsize / 2) / radarsize, 0, 0.5 + (Position.Y - mapsize / 2) / radarsize, 0)
  346. end
  347. elseif 0 < #script.Parent.Nametags:GetChildren() then
  348. script.Parent.Nametags:ClearAllChildren()
  349. end
  350. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!