Advertisement
FurkyYT

ddd

Oct 14th, 2019
968
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.37 KB | None | 0 0
  1. local RunService = game:GetService("RunService")
  2.  
  3. local ChamsFolder = Instance.new("Folder", game.CoreGui)
  4.  
  5. function transformToColor3(col) --Function to convert, just cuz c;
  6. local r = col.r --Red value
  7. local g = col.g --Green value
  8. local b = col.b --Blue value
  9. return Color3.new(r,g,b); --Color3 datatype, made of the RGB inputs
  10. end
  11.  
  12. RunService.RenderStepped:Connect(function()
  13. ChamsFolder:ClearAllChildren()
  14. for _, player in pairs(game.Players:GetPlayers()) do
  15. local character = player.Character or player.CharacterAdded:Wait()
  16. if not character then
  17. return
  18. end
  19. for _, part in pairs(character:GetChildren()) do
  20. if not character:FindFirstChildOfClass("Shirt") then
  21. return
  22. end
  23. if part:IsA("BasePart") then
  24. if character:FindFirstChildOfClass("Shirt").ShirtTemplate ~= game.Players.LocalPlayer.Character:FindFirstChildOfClass("Shirt").ShirtTemplate then
  25. local Box = Instance.new("BoxHandleAdornment")
  26. Box.Size = part.Size
  27. Box.Name = "Cham"
  28. Box.Adornee = part
  29. Box.AlwaysOnTop = true
  30. Box.ZIndex = 5
  31. Box.Transparency = 0.5
  32. Box.Color3 = transformToColor3(BrickColor.new("Bright red"))
  33. Box.Parent = ChamsFolder
  34. end
  35. end
  36. end
  37. end
  38. end)
  39.  
  40. local function getMap()
  41. local map
  42.  
  43. for i, v in pairs(game:GetService("Workspace"):GetChildren()) do
  44. if v:IsA("Folder") and v.Name ~= "PlayerData" and v.Name ~= "Lobbies" then
  45. map = v
  46. end
  47. end
  48.  
  49. return map
  50. end
  51.  
  52. local mt = getrawmetatable(game)
  53. local oldNamecall = mt.__namecall
  54. if setreadonly then setreadonly(mt, false) else make_writeable(mt, true) end
  55. local namecallMethod = getnamecallmethod or get_namecall_method
  56. local newClose = newcclosure or function(f) return f end
  57.  
  58. mt.__namecall = newClose(function(...)
  59. local method = namecallMethod()
  60. local args = {...}
  61.  
  62. if tostring(method) == "FindPartOnRayWithIgnoreList" then
  63. table.insert(args[3], getMap())
  64. return oldNamecall(unpack(args))
  65. end
  66.  
  67. return oldNamecall(...)
  68. end)
  69.  
  70. if setreadonly then setreadonly(mt, true) else make_writeable(mt, false) end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement