Advertisement
Askeo

ddddd

Jan 22nd, 2019
144
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.91 KB | None | 0 0
  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
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement