Advertisement
Chxp

Untitled

Jul 30th, 2015
281
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.13 KB | None | 0 0
  1. --[[Made by valentino08]] --[[ ]] Figure = {}; PGui = {}
  2. Anim = script.Animator
  3. function Figure:insert(fig)
  4. if fig:FindFirstChild("Animate") then fig.Animate:Remove() end
  5. if not fig:FindFirstChild("Animator") then
  6. a = Anim:Clone()
  7. a.Disabled = false
  8. a.Parent = fig
  9. end
  10. for i, v in pairs(fig:GetChildren()) do
  11. if v:IsA("CharacterMesh") then v:Remove() end
  12. end
  13. local Cm1 = Instance.new("CharacterMesh")
  14. Cm1.Name = "Torso"
  15. Cm1.MeshId = "27111894"
  16. Cm1.BodyPart = "Torso"
  17. Cm1.Parent = fig
  18. local Cm2 = Instance.new("CharacterMesh")
  19. Cm2.Name = "Right Arm"
  20. Cm2.MeshId = "27111864"
  21. Cm2.BodyPart = "RightArm"
  22. Cm2.Parent = fig
  23. local Cm3 = Instance.new("CharacterMesh")
  24. Cm3.Name = "Left Arm"
  25. Cm3.MeshId = "27111419"
  26. Cm3.BodyPart = "LeftArm"
  27. Cm3.Parent = fig
  28. local Cm4 = Instance.new("CharacterMesh")
  29. Cm4.Name = "Left Leg"
  30. Cm4.MeshId = "27111857"
  31. Cm4.BodyPart = "LeftLeg"
  32. Cm4.Parent = fig
  33. local Cm5 = Instance.new("CharacterMesh")
  34. Cm5.Name = "Right Leg"
  35. Cm5.MeshId = "27111882"
  36. Cm5.BodyPart = "RightLeg"
  37. Cm5.Parent = fig
  38. end
  39. function PGui:insert(pgui)
  40. if not pgui:FindFirstChild("CRight") then
  41. local Gui = Instance.new("ScreenGui")
  42. Gui.Name = "CRight"
  43. Gui.Parent = pgui
  44. local Label = Instance.new("TextLabel")
  45. Label.Name = "Text"
  46. Label.BackgroundColor = BrickColor.new("Really black")
  47. Label.TextColor = BrickColor.new("Institutional white")
  48. Label.BorderColor = BrickColor.new("Really red")
  49. Label.Size = UDim2.new(0, 426, 0, 15)
  50. Label.Position = UDim2.new(0, 0, 1, -15)
  51. Label.Text = " Valentino08' s C h a r a c t e r A n i m a t i o n s a r e u s e d i n t h i s g a m e"
  52. Label.TextXAlignment = "Left"
  53. Label.Parent = Gui
  54. local Bold = Label:Clone()
  55. Bold.Name = "Bold"
  56. Bold.BackgroundTransparency = 1
  57. Bold.Parent = Gui
  58. end
  59. end
  60. while true do wait()
  61. for i, v in pairs(game.Players:GetChildren()) do
  62. if v.Character then
  63. Figure:insert(v.Character)
  64. if game:FindFirstChild("NetworkServer") then
  65. PGui:insert(v.PlayerGui)
  66. end
  67. end
  68. end
  69. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement