SHARE
TWEET

ddddd

Askeo Jan 22nd, 2019 81 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --SynapseX Decompiler
  2.  
  3. local Players = game:GetService("Players")
  4. local Player = Players.LocalPlayer
  5. local Character = Player.Character or Player.CharacterAdded:wait()
  6. local Animations = Character:WaitForChild("Animations")
  7. local Stats = Character:WaitForChild("Stats")
  8. local Humanoid = Character:FindFirstChildOfClass("Humanoid")
  9. local PrimaryPart = Character.PrimaryPart or Character.HumanoidRootPart
  10. local Events = game:GetService("ReplicatedStorage"):WaitForChild("Events")
  11. local UIS = game:GetService("UserInputService")
  12. local Mouse = Player:GetMouse()
  13. local CAS = game:GetService("ContextActionService")
  14. local RunService = game:GetService("RunService")
  15. local Cam = workspace.CurrentCamera
  16. local ServerPlayer = script.Parent.ServerPlayer
  17. local PlayerGui = Player:WaitForChild("PlayerGui")
  18. local HipHeight = Humanoid.HipHeight
  19. local ID = game:GetService("LocalizationService")
  20. local MouseText = PlayerGui:WaitForChild("InGameGui"):WaitForChild("MouseText")
  21. local HealthUI = MouseText:WaitForChild("HealthUI")
  22. local BoolValues = Stats.BoolValues
  23. local StringValues = Stats.StringValues
  24. local DamagePart = Stats.DamagePart.Value
  25. local Diet = Stats.Diet.Value
  26. local Actions = Animations.Actions
  27. local Main = Animations.Main
  28. local MaxSpeed = 40
  29. local MinSpeed = 40
  30. local speed = 100
  31. local IsRunning = false
  32. local IsWalking = false
  33. local IsIdling = false
  34. local IsResting = false
  35. local IsRoaring1 = false
  36. local IsRoaring2 = false
  37. local IsRoaring3 = false
  38. local WDown = false
  39. local SDown = false
  40. local Attacking = false
  41. local CanRoar1 = BoolValues.CanRoar1.Value
  42. local CanRoar2 = BoolValues.CanRoar2.Value
  43. local CanRoar3 = BoolValues.CanRoar3.Value
  44. local CanSprint = BoolValues.CanSprint.Value
  45. local CanFly = BoolValues.CanFly.Value
  46. local CanAttack = BoolValues.CanAttack.Value
  47. local CanRest = BoolValues.CanRest.Value
  48. local CanNightVision = BoolValues.CanNightVision.Value
  49. local IsFlying = Stats.IsFlying
  50. local AttackDamage = StringValues.AttackDamage.Value
  51. local FlySpeed = StringValues.FlySpeed.Value
  52. local SprintSpeed = StringValues.SprintSpeed.Value
  53. local VitalityGain = StringValues.VitalityGain.Value
  54. local WalkSpeed = StringValues.WalkSpeed.Value
  55. local Thirst = StringValues.Thirst
  56. local Hunger = StringValues.Hunger
  57. local Attack = Actions.Attack
  58. local Rest = Actions.Rest
  59. local Roar1 = Actions.Roar1
  60. local Roar2 = Actions.Roar2
  61. local Roar3 = Actions.Roar3
  62. local Drink = Actions.Drink
  63. local Eat = Actions.Eat
  64. local Idle = Main.Idle
  65. local Sprint = Main.Sprint
  66. local Walk = Main.Walk
  67. if ID.RobloxLocaleId == "pt-br" then
  68.     Text = "UwU olhar \195\169 um selvagem "
  69. elseif ID.RobloxLocaleId == "es-es" then
  70.     Text = "UwU mira es un salvaje "
  71. elseif ID.RobloxLocaleId == "de-de" then
  72.     Text = "UwU-Look ist wild "
  73. elseif ID.RobloxLocaleId == "ko-kr" then
  74.     Text = "UwU \235\138\148 \236\149\188\236\131\157\236\156\188\235\161\156 \235\179\180\236\158\133\235\139\136\235\139\164. "
  75. elseif ID.RobloxLocaleId == "zh-cn" then
  76.     Text = "UwU \231\156\139\232\181\183\230\157\165\229\190\136\231\139\130\233\135\142 "
  77. elseif ID.RobloxLocaleId == "fr-fr" then
  78.     Text = "UwU regarde c est un sauvage "
  79. else
  80.     Text = "UwU look its a wild "
  81. end
  82. if CanAttack then
  83.     AttackAnim = Humanoid:LoadAnimation(Attack)
  84.     AttackAnim.Priority = Enum.AnimationPriority.Action
  85. end
  86. if CanRest then
  87.     RestAnim = Humanoid:LoadAnimation(Rest)
  88.     RestAnim.Priority = Enum.AnimationPriority.Action
  89. end
  90. if CanRoar1 then
  91.     Roar1Anim = Humanoid:LoadAnimation(Roar1)
  92.     Roar1Anim.Priority = Enum.AnimationPriority.Action
  93. end
  94. if CanRoar2 then
  95.     Roar2Anim = Humanoid:LoadAnimation(Roar2)
  96.     Roar2Anim.Priority = Enum.AnimationPriority.Action
  97. end
  98. if CanRoar3 then
  99.     Roar3Anim = Humanoid:LoadAnimation(Roar3)
  100.     Roar3Anim.Priority = Enum.AnimationPriority.Action
  101. end
  102. if CanSprint then
  103.     SprintAnim = Humanoid:LoadAnimation(Sprint)
  104.     SprintAnim.Priority = Enum.AnimationPriority.Movement
  105. end
  106. DrinkAnim = Humanoid:LoadAnimation(Drink)
  107. DrinkAnim.Priority = Enum.AnimationPriority.Action
  108. DrinkAnim.Looped = false
  109. EatAnim = Humanoid:LoadAnimation(Eat)
  110. EatAnim.Priority = Enum.AnimationPriority.Action
  111. EatAnim.Looped = false
  112. IdleAnim = Humanoid:LoadAnimation(Idle)
  113. IdleAnim.Priority = Enum.AnimationPriority.Idle
  114. WalkAnim = Humanoid:LoadAnimation(Walk)
  115. WalkAnim.Priority = Enum.AnimationPriority.Movement
  116. Mouse.Icon = "rbxassetid://2710045807"
  117. Humanoid.WalkSpeed = WalkSpeed
  118. local function StopAll()
  119.     local PlayingAnims = Humanoid:GetPlayingAnimationTracks()
  120.     for _, a in pairs(PlayingAnims) do
  121.         a:Stop()
  122.     end
  123. end
  124. local function Attack()
  125.     if not Attacking and Mouse.Target.Name ~= "Water" and Mouse.Target.Parent.Name ~= "Bushes" and Mouse.Target.Parent.Name ~= "Leaves" and Mouse.Target.Parent.Name ~= "Corpse" then
  126.         Attacking = true
  127.         DamagePart.Touched:Connect(function(Hit)
  128.             if Hit.Parent:FindFirstChildOfClass("Humanoid") and Attacking then
  129.                 ServerPlayer.Attack:InvokeServer()
  130.                 wait(1)
  131.             end
  132.         end)
  133.         AttackAnim:Play()
  134.         PrimaryPart.AttackSound:Play()
  135.         wait(2)
  136.         Attacking = false
  137.     end
  138. end
  139. local function Rest()
  140.     if CanRest and not IsResting then
  141.         StopAll()
  142.         RestAnim:Play()
  143.         IsResting = true
  144.         Humanoid.WalkSpeed = 0
  145.         Humanoid.JumpPower = 0
  146.     elseif CanRest and IsResting then
  147.         RestAnim:Stop()
  148.         IsResting = false
  149.         IdleAnim:Play()
  150.         Humanoid.WalkSpeed = WalkSpeed
  151.         Humanoid.JumpPower = 50
  152.     end
  153. end
  154. Humanoid.Running:Connect(function(Speed)
  155.     if Speed > 0.1 and not WalkAnim.IsPlaying and not IsRunning and not IsResting and not IsFlying.Value then
  156.         IsIdling = false
  157.         IdleAnim:Stop()
  158.         WalkAnim:Play()
  159.         IsWalking = true
  160.     end
  161.     if Speed < 0.1 and not IsRunning and not IdleAnim.IsPlaying and not SprintAnim.IsPlaying and not IsResting and not IsFlying.Value then
  162.         IsWalking = false
  163.         WalkAnim:Stop()
  164.         IdleAnim:Play()
  165.         IsIdling = true
  166.     end
  167.     if Speed >= WalkSpeed and IsRunning and not SprintAnim.IsPlaying and not IsResting and not IsFlying.Value then
  168.         SprintAnim:Play()
  169.         Humanoid.WalkSpeed = SprintSpeed
  170.     elseif Speed >= WalkSpeed and not IsRunning and SprintAnim.IsPlaying then
  171.         SprintAnim:Stop()
  172.         Humanoid.WalkSpeed = WalkSpeed
  173.     elseif Speed < WalkSpeed and SprintAnim.IsPlaying then
  174.         SprintAnim:Stop()
  175.         Humanoid.WalkSpeed = WalkSpeed
  176.     end
  177. end)
  178. local function Handler(BindName, InputState)
  179.     if InputState == Enum.UserInputState.Begin and BindName == "RunBind" and CanSprint and not IsResting and not IsFlying.Value and not IsIdling and not IsRunning then
  180.         StopAll()
  181.         IsRunning = true
  182.         Humanoid.WalkSpeed = SprintSpeed
  183.     elseif InputState == Enum.UserInputState.End and BindName == "RunBind" and CanSprint and not IsResting and not IsFlying.Value and not IsIdling and IsRunning then
  184.         IsRunning = false
  185.         SprintAnim:Stop()
  186.         Humanoid.WalkSpeed = WalkSpeed
  187.     end
  188. end
  189. CAS:BindAction("RunBind", Handler, true, Enum.KeyCode.LeftShift, Enum.KeyCode.ButtonL3)
  190. CAS:SetPosition("RunBind", UDim2.new(0.72, -75, 0.3, -10))
  191. CAS:SetTitle("RunBind", "Run")
  192. Humanoid.Changed:Connect(function()
  193.     if Humanoid.JumpPower ~= 50 and Humanoid.JumpPower ~= 0 then
  194.         Events.AntiExploit:FireServer("Jumppower..")
  195.     end
  196.     Humanoid.HipHeight = HipHeight
  197. end)
  198. Character.DescendantAdded:Connect(function(Obj)
  199.     if CanFly and Obj.Parent.Name == Character.Torso.Name or CanFly and Obj.Parent.Name == Character.HumanoidRootPart.Name or Obj.Name == "TouchInterest" then
  200.     else
  201.         Events.AntiExploit:FireServer("New Objects " .. Obj.Name)
  202.     end
  203. end)
  204. Humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, false)
  205. Humanoid:SetStateEnabled(Enum.HumanoidStateType.Swimming, false)
  206. Humanoid:SetStateEnabled(Enum.HumanoidStateType.RunningNoPhysics, false)
  207. Humanoid:SetStateEnabled(Enum.HumanoidStateType.StrafingNoPhysics, false)
  208. UIS.InputBegan:Connect(function(Input, gpe)
  209.     if not gpe and UIS.KeyboardEnabled or not gpe and UIS.TouchEnabled then
  210.         if Input.KeyCode == Enum.KeyCode.R and not IsFlying.Value then
  211.             Rest()
  212.         elseif Input.KeyCode == Enum.KeyCode.One and CanRoar1 and not Roar1Anim.IsPlaying and not PrimaryPart.Roar1.Playing then
  213.             Roar1Anim:Play()
  214.             PrimaryPart.Roar1:Play()
  215.         elseif Input.KeyCode == Enum.KeyCode.Two and CanRoar2 and not Roar2Anim.IsPlaying and not PrimaryPart.Roar2.Playing then
  216.             Roar2Anim:Play()
  217.             PrimaryPart.Roar2:Play()
  218.         elseif Input.KeyCode == Enum.KeyCode.Three and CanRoar3 and not Roar3Anim.IsPlaying and not PrimaryPart.Roar3.Playing then
  219.             Roar3Anim:Play()
  220.             PrimaryPart.Roar3:Play()
  221.         elseif Input.KeyCode == Enum.KeyCode.N and CanNightVision and game:GetService("Lighting"):FindFirstChild("NightVision") ~= nil then
  222.             game:GetService("Lighting").NightVision:Destroy()
  223.         elseif Input.KeyCode == Enum.KeyCode.N and CanNightVision then
  224.             local NightVision = Instance.new("ColorCorrectionEffect", game:GetService("Lighting"))
  225.             NightVision.Brightness = 0.6
  226.             NightVision.Contrast = 1
  227.             NightVision.Saturation = -1
  228.             NightVision.Name = "NightVision"
  229.         elseif Input.UserInputType == Enum.UserInputType.MouseButton1 then
  230.             Attack()
  231.         elseif Input.KeyCode == Enum.KeyCode.Q and not IsFlying.Value and CanFly and not IsResting then
  232.             speed = FlySpeed
  233.             StopAll()
  234.             Events:WaitForChild("BeginFlying"):FireServer(Mouse.Hit.p)
  235.         elseif Input.KeyCode == Enum.KeyCode.Q and IsFlying.Value and CanFly and not IsResting then
  236.             speed = 0
  237.             Events:WaitForChild("BeginFlying"):FireServer(Mouse.Hit.p)
  238.         elseif Input.KeyCode == Enum.KeyCode.E and Character:FindFirstChild("IsInvisible") ~= nil then
  239.             Events.Invisible:FireServer()
  240.         end
  241.     elseif UIS.GamepadEnabled and not gpe then
  242.         if Input.KeyCode == Enum.KeyCode.ButtonB then
  243.             Attack()
  244.         elseif Input.KeyCode == Enum.KeyCode.ButtonX and not IsFlying.Value then
  245.             StopAll()
  246.             Rest()
  247.         elseif Input.KeyCode == Enum.KeyCode.DPadDown and CanRoar1 and not Roar1Anim.IsPlaying then
  248.             Roar1Anim:Play()
  249.             PrimaryPart.Roar1:Play()
  250.         elseif Input.KeyCode == Enum.KeyCode.DPadUp and CanRoar2 and not Roar2Anim.IsPlaying then
  251.             Roar2Anim:Play()
  252.             PrimaryPart.Roar2:Play()
  253.         elseif Input.KeyCode == Enum.KeyCode.DPadLeft and CanRoar3 and not Roar3Anim.IsPlaying then
  254.             Roar3Anim:Play()
  255.             PrimaryPart.Roar3:Play()
  256.         elseif Input.KeyCode == Enum.KeyCode.DPadRight and Character:FindFirstChild("IsInvisible") ~= nil then
  257.             Events.Invisible:FireServer()
  258.         elseif Input.KeyCode == Enum.KeyCode.ButtonY and not IsFlying.Value and not IsResting and CanFly then
  259.             speed = FlySpeed
  260.             StopAll()
  261.             Events:WaitForChild("BeginFlying"):FireServer(Mouse.Hit.p)
  262.         elseif Input.KeyCode == Enum.KeyCode.ButtonY and IsFlying.Value and CanFly then
  263.             speed = 0
  264.             Events:WaitForChild("BeginFlying"):FireServer(Mouse.Hit.p)
  265.         end
  266.     end
  267. end)
  268. spawn(function()
  269.     while Humanoid.Health > 0 do
  270.         if IsFlying.Value then
  271.             local r = 1 + speed / 500
  272.             Character:SetPrimaryPartCFrame(CFrame.new(PrimaryPart.Position, Mouse.Hit.p) * CFrame.Angles(math.pi / r, math.pi, math.pi))
  273.             PrimaryPart:WaitForChild("FlyingVelocity").Velocity = (Mouse.Hit.p - PrimaryPart.Position).unit * speed
  274.             if WDown then
  275.                 speed = speed + 50
  276.                 if speed > MaxSpeed then
  277.                     speed = MaxSpeed
  278.                 end
  279.             elseif SDown then
  280.                 speed = speed - 50
  281.                 if speed < MinSpeed then
  282.                     speed = MinSpeed
  283.                 end
  284.             end
  285.         end
  286.         RunService.RenderStepped:wait()
  287.     end
  288. end)
  289. for _, Statuses in pairs(Stats:GetChildren()) do
  290.     if Statuses:IsA("Folder") then
  291.         for _, v in pairs(Statuses:GetChildren()) do
  292.             if (v:IsA("BoolValue") or v:IsA("StringValue") or v:IsA("NumberValue")) and v.Name ~= "Thirst" and v.Name ~= "Hunger" then
  293.                 v.Changed:Connect(function()
  294.                     Events.AntiExploit:FireServer("Value changing..")
  295.                 end)
  296.             end
  297.         end
  298.     elseif Statuses:IsA("ObjectValue") or Statuses:IsA("StringValue") then
  299.         Statuses.Changed:Connect(function()
  300.             Events.AntiExploit:FireServer("Value Changing..")
  301.         end)
  302.     end
  303. end
  304. Humanoid.StateChanged:Connect(function(oldState, newState)
  305.     if newState == Enum.HumanoidStateType.Jumping then
  306.         Humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, false)
  307.     elseif newState == Enum.HumanoidStateType.Landed then
  308.         wait(1)
  309.         Humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, true)
  310.     end
  311. end)
  312. Mouse.Button1Down:Connect(function()
  313.     if Mouse.Target then
  314.         local Position1 = Mouse.Hit.p
  315.         local Position2 = PrimaryPart.Position
  316.         local Magnitude = (Position1 - Position2).Magnitude
  317.         if Mouse.Target.Name == "Water" and Magnitude <= 50 and Thirst.Value < 100 then
  318.             if AttackAnim.IsPlaying then
  319.                 AttackAnim:Stop()
  320.             end
  321.             ServerPlayer.Drink:InvokeServer(Position1)
  322.             if not DrinkAnim.IsPlaying then
  323.                 DrinkAnim:Play()
  324.                 PrimaryPart.DrinkSound:Play()
  325.             end
  326.         elseif (Mouse.Target.Parent.Name == "Bushes" and Diet == "Omnivore" or Mouse.Target.Parent.Name == "Bushes" and Diet == "Herbivore" or Mouse.Target.Parent.Name == "Leaves" and Diet == "Omnivore" or Mouse.Target.Parent.Name == "Leaves" and Diet == "Herbivore" or Diet == "Carnivore" and Mouse.Target.Parent.Name == "Corpse" or Diet == "Omnivore" and Mouse.Target.Parent.Name == "Corpse") and Hunger.Value < 100 and Magnitude <= 50 then
  327.             if AttackAnim.IsPlaying then
  328.                 AttackAnim:Stop()
  329.             end
  330.             ServerPlayer.Eat:InvokeServer(Mouse.Target)
  331.             if not EatAnim.IsPlaying then
  332.                 EatAnim:Play()
  333.             end
  334.         end
  335.     end
  336. end)
  337. while true do
  338.     wait()
  339.     if IsRunning and not IsResting and not IsFlying.Value then
  340.         Humanoid.WalkSpeed = SprintSpeed
  341.     elseif IsWalking and not IsResting and not IsFlying.Value then
  342.         Humanoid.WalkSpeed = WalkSpeed
  343.     elseif IsResting and not IsFlying.Value then
  344.         Humanoid.WalkSpeed = 0
  345.         Humanoid.JumpPower = 0
  346.     elseif IsFlying.Value then
  347.         Humanoid.WalkSpeed = FlySpeed
  348.     end
  349.     if IsRunning and Cam.FieldOfView <= 80 then
  350.         Cam.FieldOfView = Cam.FieldOfView + 0.3
  351.     elseif Cam.FieldOfView >= 70 and not IsRunning and Cam.FieldOfView >= 70 then
  352.         Cam.FieldOfView = Cam.FieldOfView - 0.3
  353.     end
  354.     if IsRunning and not SprintAnim.IsPlaying and not IdleAnim.IsPlaying then
  355.         IdleAnim:Play()
  356.     elseif IsRunning and SprintAnim.IsPlaying and IdleAnim.IsPlaying then
  357.         IdleAnim:Stop()
  358.     end
  359.     if Mouse.Target then
  360.         local Position1 = Mouse.Hit.p
  361.         local Position2 = PrimaryPart.Position
  362.         local Magnitude = (Position1 - Position2).Magnitude
  363.         if Mouse.Target.Transparency <= 0.98 and Magnitude <= 150 and Mouse.Target.Parent:FindFirstChild("Stats") ~= nil then
  364.             do
  365.                 local HMN = Mouse.Target.Parent.Humanoid
  366.                 MouseText.Visible = true
  367.                 MouseText.Position = UDim2.new(0, Mouse.X - MouseText.AbsoluteSize.X, 0, Mouse.Y - MouseText.AbsoluteSize.Y)
  368.                 MouseText.Size = UDim2.new(0, MouseText.TextBounds.X, 0, 20)
  369.                 MouseText.Text = Text .. Mouse.Target.Parent.Stats.Genus.Value
  370.                 HealthUI.Visible = true
  371.                 HealthUI.HealthTitle.Text = HMN.Health .. "/" .. HMN.MaxHealth
  372.                 HealthUI.HealthBar:TweenSize(UDim2.new(HMN.Health / HMN.MaxHealth * 0.97, 0, 0.645, 0), "In", "Quad", 0.1, true)
  373.                 HMN.HealthChanged:Connect(function()
  374.                     HealthUI.HealthTitle.Text = HMN.Health .. "/" .. HMN.MaxHealth
  375.                     HealthUI.HealthBar:TweenSize(UDim2.new(HMN.Health / HMN.MaxHealth * 0.97, 0, 0.645, 0), "In", "Quad", 0.1, true)
  376.                 end)
  377.             end
  378.         elseif Mouse.Target.Name == "Water" and Magnitude <= 50 then
  379.             MouseText.Visible = true
  380.             MouseText.Position = UDim2.new(0, Mouse.X - MouseText.AbsoluteSize.X, 0, Mouse.Y - MouseText.AbsoluteSize.Y)
  381.             MouseText.Size = UDim2.new(0, MouseText.TextBounds.X, 0, 20)
  382.             HealthUI.Visible = false
  383.             MouseText.Text = "Click to Drink!"
  384.         elseif Mouse.Target.Parent.Name == "Bushes" and Diet == "Herbivore" or Mouse.Target.Parent.Name == "Bushes" and Diet == "Omnivore" or Mouse.Target.Parent.Name == "Leaves" and Diet == "Herbivore" or Mouse.Target.Parent.Name == "Leaves" and Diet == "Omnivore" or Mouse.Target.Parent.Name == "Corpse" and Diet == "Omnivore" or Mouse.Target.Parent.Name == "Corpse" and Diet == "Carnivore" then
  385.             if Magnitude <= 50 then
  386.                 MouseText.Visible = true
  387.                 MouseText.Position = UDim2.new(0, Mouse.X - MouseText.AbsoluteSize.X, 0, Mouse.Y - MouseText.AbsoluteSize.Y)
  388.                 MouseText.Size = UDim2.new(0, MouseText.TextBounds.X, 0, 20)
  389.                 MouseText.Text = "Click to Eat!"
  390.                 HealthUI.Visible = false
  391.             end
  392.         else
  393.             MouseText.Visible = false
  394.         end
  395.     end
  396. end
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!
 
Top