Advertisement
TheClassicMeme

idk aGAIN

May 23rd, 2017
136
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.61 KB | None | 0 0
  1. game.Lighting.TimeOfDay = 0
  2. local colors = "Lime green"
  3.  
  4. -- Add Colors to the above line from
  5. -- http://wiki.roblox.com/index.php?title=BrickColor_codes
  6.  
  7.  
  8. local tran = 0.5 -- Transparency
  9. local material = "Plastic" -- Material
  10.  
  11. function col(brick)
  12. brick.BrickColor = BrickColor.new(colors)
  13. brick.Transparency = tran
  14. if brick.Material ~= material then
  15. brick.Material = material
  16. end
  17. for _,v in pairs(brick:GetChildren()) do
  18. if v:IsA("SpecialMesh") or v:IsA("FileMesh") then
  19. if v.Parent.Name ~= "Head" then
  20. v.TextureId = "Clear"
  21. end
  22. end
  23. end
  24. brick.Changed:connect(function(prop)
  25. brick.BrickColor = BrickColor.new(colors)
  26. brick.Transparency = tran
  27. brick.Material = material
  28. wait(1)
  29. brick.BrickColor = BrickColor.new(colors)
  30. brick.Transparency = tran
  31. brick.Material = material
  32. wait(1)
  33. brick.BrickColor = BrickColor.new(colors)
  34. brick.Transparency = tran
  35. brick.Material = material
  36. end)
  37. end
  38.  
  39. function goin(where)
  40. if where:IsA("BasePart") then
  41. coroutine.resume(coroutine.create(function()
  42. col(where)
  43. end))
  44. end
  45. where.ChildAdded:connect(function(object)
  46. goin(object)
  47. end)
  48. for _,v in pairs(where:GetChildren()) do
  49. goin(v)
  50. v.ChildAdded:connect(function(object)
  51. goin(object)
  52. end)
  53. if v:IsA("BasePart") then
  54. coroutine.resume(coroutine.create(function()
  55. col(v)
  56. end))
  57. end
  58. end
  59. end
  60.  
  61. for _,v in pairs(workspace:GetChildren()) do
  62. goin(v)
  63. end
  64.  
  65. workspace.ChildAdded:connect(function(obj)
  66. goin(obj)
  67. end)
  68.  
  69. game.Lighting.Changed:connect(function(prop)
  70. if prop == "TimeOfDay" then
  71. game.Lighting.TimeOfDay = 0
  72. end
  73. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement