Advertisement
therobIoxadmin

Untitled

May 6th, 2015
276
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.94 KB | None | 0 0
  1. wait(2)
  2. local p = game.Players.LocalPlayer
  3. local c = p.Character
  4. local mouse = p:GetMouse()
  5.  
  6. local ProbeSpeed = .5
  7.  
  8. local CloneTransparency = 0
  9.  
  10. local TrailColor = "Really red"
  11.  
  12. local Colors = {"Red","Blue","Green"}
  13.  
  14. function MakeProbe()
  15.  
  16. ProbeModel = Instance.new("Model",game.Workspace)
  17. ProbeModel.Name = p.Name
  18.  
  19. Probe = Instance.new("Part",ProbeModel)
  20. Probe.Shape = "Ball"
  21. Probe.BottomSurface = "Smooth"
  22. Probe.TopSurface = "Smooth"
  23. Probe.Anchored = true
  24. Probe.Locked = true
  25. Probe.Size = Vector3.new(2,2,2)
  26. Probe.Name = "Head"
  27. Probe.BrickColor = BrickColor.new("Institutional white")
  28.  
  29. Probe2 = Probe:Clone()
  30. Probe2.Parent = ProbeModel
  31. Probe2.Name = "Torso"
  32. Probe2.Transparency = 0.5
  33. Probe2.Shape = "Block"
  34. Probe2.CFrame = Probe.CFrame
  35.  
  36. local Humanoid = Instance.new("Humanoid",ProbeModel)
  37. Humanoid.Health = 0
  38. Humanoid.MaxHealth = 0
  39. Humanoid.WalkSpeed = 0
  40.  
  41. game.Workspace.CurrentCamera.CameraSubject = Humanoid
  42.  
  43. c:Destroy()
  44. c = ProbeModel
  45. p.Parent = nil
  46.  
  47. p.Chatted:connect(function(msg)
  48. game:GetService("Chat"):Chat(Probe,msg,Colors[math.random(1,3)])
  49. if msg:sub(1,11):lower() == "trailcolor/" then
  50. TrailColor = msg:sub(12)
  51. elseif msg:sub(1,11):lower() == "probecolor/" then
  52. Probe.BrickColor = BrickColor.new(msg:sub(12))
  53. Probe2.BrickColor = BrickColor.new(msg:sub(12))
  54. elseif msg:sub(1,11):lower() == "probespeed/" then
  55. ProbeSpeed = msg:sub(12)
  56. elseif msg:sub(1,8):lower() == "reprobe/" then
  57. ProbeModel:remove()
  58. MakeProbe()
  59. elseif msg:sub(1,13):lower() == "stealthprobe/" then
  60. Probe.Transparency = 1
  61. Probe2.Transparency = 1
  62. CloneTransparency = 1
  63. elseif msg:sub(1,12):lower() == "normalprobe/" then
  64. Probe.Transparency = 0
  65. Probe2.Transparency = 0
  66. CloneTransparency = 0
  67. elseif msg:sub(1,18):lower() == "clonetransparency/" then
  68. CloneTransparency = msg:sub(19)
  69. end
  70. end)
  71.  
  72.  
  73.  
  74. spawn(function()
  75. while wait() do
  76. Probe.CFrame = CFrame.new(Probe.Position,game.Workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-500).p)
  77. Probe2.CFrame = CFrame.new(Probe2.Position,game.Workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-500).p)
  78. end
  79. end)
  80.  
  81. mouse.Button1Down:connect(function()
  82. move = true
  83. end)
  84.  
  85. mouse.Button1Up:connect(function()
  86. move = false
  87. end)
  88.  
  89. spawn(function()
  90. while wait() do
  91. if move == true then
  92. Probe.CFrame = Probe.CFrame*CFrame.new(0,0,-ProbeSpeed)
  93. Probe2.CFrame = Probe2.CFrame*CFrame.new(0,0,-ProbeSpeed)
  94. end
  95. end
  96. end)
  97.  
  98. spawn(function()
  99. while wait(.05) do
  100. local ProbeClone = Probe:Clone()
  101. ProbeClone.Parent = game.Workspace
  102. ProbeClone.CanCollide = true
  103. ProbeClone.Transparency = CloneTransparency
  104. ProbeClone.BrickColor = BrickColor.new(TrailColor)
  105. ProbeClone.CanCollide = false
  106. ProbeClone.Size = Vector3.new(1,1,1)
  107. game.Debris:AddItem(ProbeClone,.21)
  108. end
  109. end)
  110.  
  111. end
  112.  
  113. MakeProbe()
  114.  
  115. game.Workspace.ChildRemoved:connect(function(Child)
  116. if Child.Name == ProbeModel.Name then
  117. MakeProbe()
  118. end
  119. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement