nicholasXPG

Untitled

Oct 12th, 2016
252
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.29 KB | None | 0 0
  1. --The Nameless Soul
  2. --by EdwardDarksong
  3. --[[
  4. The Nameless Soul is a Soul that's forgotten it's name
  5. and so it hunts for another's name, and will take it by
  6. any means...
  7. --]]
  8.  
  9.  
  10. settings = {
  11. Particles = true
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18. }
  19. wait()
  20. plr = game:GetService("Players").LocalPlayer
  21. char = plr.Character
  22. mouse = plr:GetMouse()
  23. cam = game:GetService("Workspace").Camera
  24. db = game:GetService("Debris")
  25.  
  26. function find(target,class)
  27. for _,p in pairs(target:GetChildren()) do
  28. if p.ClassName == class then
  29. return p
  30. end
  31. end
  32. end
  33.  
  34. Banned = {
  35.  
  36.  
  37. }
  38.  
  39. function rev(number)
  40. local num = tostring(number)
  41. --print(num)
  42. if num:sub(1,1) == "-" then
  43. num = num:sub(2)
  44. else num = "-"..num
  45. end
  46. --print(tonumber(num))
  47. return tonumber(num)
  48. end
  49.  
  50. function set(number,goal)
  51. local num = tostring(number)
  52. if num:sub(1,1) == "-" then
  53. num = "-"..goal
  54. else num = goal
  55. end
  56. return tonumber(num)
  57. end
  58.  
  59. local h = find(char,"Humanoid")if h then h.Name = "Soul";h.MaxHealth = math.huge end
  60.  
  61. function t_damage(hit)
  62. local h = find(hit.Parent,"Humanoid")
  63. if h then
  64. h.Health = h.Health-15
  65. end
  66. end
  67.  
  68. function new_char(c)
  69. c.HumanoidRootPart:Remove()
  70. local h1 = find(c,"Humanoid")
  71. if h1 then h1:Remove() end
  72. wait();
  73. local rl = c["Right Leg"]
  74. local ll = c["Left Leg"]
  75. local ra = c["Right Arm"]
  76. local la = c["Left Arm"]
  77. rl.Touched:connect(t_damage)
  78. ll.Touched:connect(t_damage)
  79. ra.Touched:connect(t_damage)
  80. la.Touched:connect(t_damage)
  81. c.Torso.Touched:connect(t_damage)
  82. c.Head.Touched:connect(t_damage)
  83.  
  84. if c:FindFirstChild("Animate") then c.Animate:Remove() end
  85. local t = 0.75
  86. local color = BrickColor.new("Really black")
  87. local bc = c["Body Colors"]
  88. bc["HeadColor"] = color
  89. bc["LeftArmColor"] = color
  90. bc["RightArmColor"] = color
  91. bc["RightLegColor"] = color
  92. bc["LeftLegColor"] = color
  93. bc["TorsoColor"] = color
  94. rl.Transparency = t
  95. ra.Transparency = t
  96. la.Transparency = t
  97. ll.Transparency = t
  98. c.Head.Transparency = t
  99. c.Torso.Transparency = t
  100. rl.BrickColor = color
  101. ll.BrickColor = color
  102. la.BrickColor = color
  103. ra.BrickColor = color
  104. c.Head.BrickColor = color
  105. c.Torso.BrickColor = color
  106. if c.Head:FindFirstChild("face") then c.Head.face:Remove() end
  107. for _,p in pairs(c:GetChildren()) do if p.ClassName=="Hat" or p.ClassName=="Shirt" or p.ClassName=="Pants" or p.ClassName=="CharacterMesh" then p:Remove() end end
  108.  
  109. if settings.Particles then
  110. local p1 = Instance.new("ParticleEmitter",c.Torso)
  111. p1.Size = NumberSequence.new(0.2,0.35)
  112. p1.Texture = "http://www.roblox.com/asset/?id=242201991"
  113. p1.EmissionDirection = "Back"
  114. p1.Rate = 0
  115. --p1.LightEmission = 5
  116. p1.Lifetime = NumberRange.new(0.8,1.1)
  117. p1.Speed = NumberRange.new(0.1,0.1)
  118. p1.Color = ColorSequence.new(Color3.new(0,0,0),Color3.new(0,0,0))
  119. p1.Transparency = NumberSequence.new(0.3,0.5)
  120. p1.Enabled = true
  121. p1.Name = "p1"
  122.  
  123. p1:Clone().Parent = ll
  124. p1:Clone().Parent = rl
  125. p1:Clone().Parent = ra
  126. p1:Clone().Parent = la
  127. --p1:Clone().Parent = c.Head
  128. end
  129. local w = Instance.new("Weld",c);w.Name=""
  130. w.Part0 = c.Torso
  131. w.Part1 = ra
  132. w.C1 = CFrame.new(-1.5,0.1,-0.2) * CFrame.Angles(0.4,0,0)
  133. local w = Instance.new("Weld",c);w.Name=""
  134. w.Part0 = c.Torso
  135. w.Part1 = la
  136. w.C1 = CFrame.new(1.5,0.1,-0.2) * CFrame.Angles(0.4,0,0)
  137.  
  138. local w = Instance.new("Weld",c);w.Name=""
  139. w.Part0 = c.Torso
  140. w.Part1 = rl
  141. w.C1 = CFrame.new(-0.5,2,0) * CFrame.Angles(0.15,0,0)
  142. local w = Instance.new("Weld",c);w.Name=""
  143. w.Part0 = c.Torso
  144. w.Part1 = ll
  145. w.C1 = CFrame.new(0.5,2,0) * CFrame.Angles(0.15,0,0)
  146.  
  147. local m = Instance.new("Part",c)
  148. m.Size = Vector3.new(1,2,1)
  149. m.Position = Vector3.new(c.Torso.Position.X,c.Torso.Position.Y+3,c.Torso.Position.Z)
  150. m.CanCollide = false
  151. m.Transparency = 1
  152. m.Anchored = true
  153. m.Locked = true
  154. m.Name = "m"
  155.  
  156. local l = Instance.new("Part",c)
  157. l.Size = Vector3.new(1,2,1)
  158. l.Position = c.Torso.Position
  159. l.CanCollide = false
  160. l.Transparency = 1
  161. l.Anchored = true
  162. l.Locked = true
  163. l.Name = "l"
  164.  
  165. local camera = Instance.new("Part",c)
  166. camera.Size = Vector3.new(2,2,1)
  167. camera.Transparency = 1
  168. camera.CanCollide = false
  169.  
  170. local weld = Instance.new("Weld",camera)
  171. weld.Part0=c.Torso
  172. weld.Part1=camera
  173. weld.C1 = CFrame.new(0,0,0)
  174.  
  175.  
  176. cam.CameraSubject = camera
  177.  
  178. local p = Instance.new("BodyPosition",c.Torso)
  179. p.P = 11000
  180. p.D = 1000
  181. p.Name = "path"
  182. p.MaxForce = Vector3.new(20000,20000,20000)
  183. local p2 = Instance.new("BodyGyro",c.Torso)--c.HumanoidRootPart)
  184. p2.D = 1e3
  185. p2.P = 1e7
  186.  
  187. p2.MaxTorque = Vector3.new(0,1e7,0)
  188. p2.Name = "path2"
  189.  
  190. local W = false
  191. local S = false
  192. local A = false
  193. local D = false
  194. local Space = false
  195.  
  196. local m2 = m:Clone()
  197. m2.Parent = c
  198.  
  199. coroutine.resume(coroutine.create(function()
  200. game:GetService("RunService").Stepped:connect(function()
  201. for _,p in pairs(c:GetChildren())do if p.ClassName=="Part"then p.CanCollide = false p.Material = "Neon" end end
  202. local hum = find(c,"Humanoid")
  203.  
  204. for _,p in pairs(c:GetChildren()) do
  205. for _,p in pairs(p:GetChildren()) do
  206. if p.ClassName == "ParticleEmitter" then
  207. p:Emit(24)
  208. end
  209. end
  210. end
  211.  
  212. if hum then
  213. if hum:FindFirstChild("Animator") then hum.Animator:Remove() end
  214. for _,p in pairs(c:GetChildren()) do
  215. if p.ClassName == "Part" then
  216. p.CanCollide = false
  217. end
  218. end
  219. hum.WalkSpeed = 0
  220. hum.NameDisplayDistance = 0
  221. --hum.AutoRotate = false
  222. hum.Name = "Soul"
  223. hum.JumpPower = 0
  224. hum.PlatformStand = false
  225. end
  226. l.Position = c.Head.CFrame:toWorldSpace(CFrame.new(0,0,0)).p
  227. p2.CFrame = CFrame.new(Vector3.new(),(mouse.Hit.p - c.Torso.CFrame.p).unit * 100)
  228.  
  229. if W then
  230. local x = rev((cam.CFrame-c.Torso.CFrame.p).X)
  231. local z = rev((cam.CFrame-c.Torso.CFrame.p).Z)
  232.  
  233. m.CFrame = l.CFrame:toWorldSpace(CFrame.new(x,-3.15,z))
  234. local lm = l.CFrame:toWorldSpace(CFrame.new(x*1.5,-3.15,z*1.5))
  235. m2.CFrame = lm
  236. --p2.CFrame = CFrame.new(c.Torso.CFrame.p,m2.CFrame.p.unit*100)
  237. m2.CFrame = p2.CFrame
  238. end
  239.  
  240. if S then
  241. local x = 0
  242. local z = 0
  243.  
  244. m.CFrame = l.CFrame:toWorldSpace(CFrame.new(x,-6.5,z))
  245. local lm = l.CFrame:toWorldSpace(CFrame.new(x*1.5,-6.5,z*1.5))
  246. m2.CFrame = lm
  247. --p2.CFrame = CFrame.new(c.Torso.CFrame.p,m2.CFrame.p.unit*100)
  248. m2.CFrame = p2.CFrame
  249. end
  250.  
  251. if Space then
  252.  
  253. --local x = rev((cam.CFrame-c.Torso.CFrame.p).X)
  254. --local z = rev((cam.CFrame-c.Torso.CFrame.p).Z)
  255. local x = 0
  256. local z = 0
  257.  
  258. m.CFrame = l.CFrame:toWorldSpace(CFrame.new(x,3.5,z))
  259. local lm = l.CFrame:toWorldSpace(CFrame.new(x*1.5,3.5,z*1.5))
  260. m2.CFrame = lm
  261. --p2.CFrame = CFrame.new(c.Torso.CFrame.p,m2.CFrame.p.unit*100)
  262. m2.CFrame = p2.CFrame
  263.  
  264. end
  265.  
  266.  
  267. --if A then m.CFrame = c.Torso.CFrame:toWorldSpace(CFrame.new(-1.5,0,0)) end
  268. --if D then m.CFrame = c.Torso.CFrame:toWorldSpace(CFrame.new(1.5,0,0)) end
  269.  
  270. p.Position = m.Position
  271. --print(p.Position)
  272. --p2.CFrame = CFrame.new(Vector3.new(),m.CFrame.p.unit * 100)
  273. --p2.CFrame = m.CFrame
  274. end)
  275. end))
  276.  
  277. mouse.KeyDown:connect(function(key)
  278. key = key:lower()
  279. --[[if key == "p" then
  280. local i = Instance.new("Part",workspace)
  281. i.Anchored = true
  282. i.CanCollide = false
  283.  
  284. local x = rev((cam.CFrame-c.Torso.CFrame.p).X)
  285. local z = rev((cam.CFrame-c.Torso.CFrame.p).Z)
  286.  
  287. i.CFrame = c.Torso.CFrame:toWorldSpace(CFrame.new(x,0,z))
  288. end]]
  289. if key == "p" then
  290. for _,p in pairs(c:GetChildren()) do
  291. if p.ClassName=="Part"then print(p.Name.." -- "..tostring(p.CanCollide)) end
  292. end
  293. end
  294.  
  295. if key == "w" then
  296. W = true
  297. end
  298. if key == "s" then
  299. --local x = rev((cam.CFrame-c.Torso.CFrame.p).X)
  300. --local z = rev((cam.CFrame-c.Torso.CFrame.p).Z)
  301. S = true
  302. end
  303. if key:byte() == 32 then
  304. Space = true
  305. end
  306.  
  307. end)
  308. mouse.KeyUp:connect(function(key)
  309. key = key:lower()
  310. if key == "w" then
  311. W = false
  312. end
  313. if key == "s" then
  314. --local x = rev((cam.CFrame-c.Torso.CFrame.p).X)
  315. --local z = rev((cam.CFrame-c.Torso.CFrame.p).Z)
  316. S = false
  317. end
  318. if key:byte() == 32 then
  319. Space = false
  320. end
  321. end)
  322.  
  323. end
  324.  
  325. function intro()
  326.  
  327. local light = game:GetService("Lighting")
  328. light.Brightness = 0
  329. light.GlobalShadows = true
  330. light.Ambient = Color3.new(0.25,0.25,0)
  331. light.ColorShift_Top = Color3.new(0,0,0)
  332. light.ColorShift_Bottom = Color3.new(0,0,0)
  333. light.ShadowColor = Color3.new(1.7,0,0)
  334. light.TimeOfDay = "1:00:00"
  335. light.OutdoorAmbient = Color3.new(0,0,0)
  336.  
  337. char.Archivable = true
  338. rc = char:Clone()
  339. char.Archivable = false
  340. rc.Parent = char
  341. rc.Torso.CFrame = char.Torso.CFrame:toWorldSpace(CFrame.new(0,2.5,5))
  342. for _,p in pairs(rc:GetChildren()) do
  343. if p.ClassName == "Part" then
  344. p.CanCollide = false
  345. end
  346. end
  347. new_char(rc)
  348. char.Torso.CFrame = char.Torso.CFrame:toWorldSpace(CFrame.new(0,150,0))
  349. local song = workspace:FindFirstChild("Soul's Song") or Instance.new("Sound",workspace)
  350. song.MaxDistance = math.huge
  351. song.Name = "Soul's Song"
  352. song.Volume = 1
  353. song.Looped=true
  354. song.SoundId="rbxassetid://149119648"
  355. wait();
  356. song:Play()
  357. local h1 = find(char,"Humanoid")
  358. if h1 then h1:Remove() end
  359. for _,p in pairs(char:GetChildren()) do
  360. if p.ClassName == "Part" then
  361. p.Transparency = 1
  362. p.CanCollide = false
  363. p.Anchored = true
  364. if p:FindFirstChild("face") then p.face:Remove() end
  365. end
  366. if p.ClassName == "Hat" then p:Remove() end
  367. end
  368. --char.Parent = game:GetService("Lighting")
  369. end
  370.  
  371.  
  372.  
  373. wait(1)
  374. intro()
  375.  
  376.  
  377.  
  378.  
  379.  
  380.  
  381.  
  382. function say(text)
  383. local chat = game:GetService("Chat")
  384. chat:Chat(rc.Head,text,"Red")
  385. end
  386. plr.Chatted:connect(function(msg)
  387. say(msg)
  388. end)
  389.  
  390.  
  391. coroutine.resume(coroutine.create(function()
  392. game:GetService("RunService").Stepped:connect(function()
  393.  
  394. for _,p in pairs(game:GetService("Players"):GetPlayers()) do
  395. if Banned[p.Name] ~= nil then
  396. pcall(function() p:Remove() end)
  397. end
  398. end
  399.  
  400. end) end))
Add Comment
Please, Sign In to add comment