Advertisement
iiFlamez

Untitled

Dec 12th, 2017
317
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 124.46 KB | None | 0 0
  1. -- params : ...
  2.  
  3. wait(1)
  4. local Player = game.Players.LocalPlayer
  5. local mouse = Player:GetMouse()
  6. local gui = script.Parent:WaitForChild("GameGui")
  7. local menugui = gui:WaitForChild("MenuGui")
  8. local gmgui = script.Parent:WaitForChild("GMConsole")
  9. local gsre = game.ReplicatedStorage:WaitForChild("GlobalSave")
  10. if not workspace.CurrentCamera:FindFirstChild("HBGuis") then
  11. local HBFolder = Instance.new("Folder", workspace.CurrentCamera)
  12. end
  13. HBFolder.Name = "HBGuis"
  14. for _,v in pairs(HBFolder:GetChildren()) do
  15. v:Destroy()
  16. end
  17. Player.CanLoadCharacterAppearance = false
  18. repeat
  19. wait()
  20. until Player.Character
  21. Player.Character:WaitForChild("Head")
  22. Player.Character:WaitForChild("Torso")
  23. assets = game.ReplicatedStorage:WaitForChild("BuildAssets"):InvokeServer()
  24. local PlayerStats = Player:WaitForChild("PlayerStats")
  25. local tweenAPI = require(game.ReplicatedStorage:WaitForChild("TweenCFrame"))
  26. local Module3D = require(game.ReplicatedStorage:WaitForChild("Module3D"))
  27. local dataoriginal = menugui.Menus.Data.Image
  28. local playeroriginal = menugui.Menus.Player.Image
  29. local playersoriginal = menugui.Menus.Players.Image
  30. local messageoriginal = menugui.Menus.Message.Image
  31. local settingsoriginal = menugui.Menus.Settings.Image
  32. local skillspos = gui.Skills.Position
  33. local playerpos = gui.Player.Position
  34. local invpos = gui.Inventory.Position
  35. local respos = gui.Resources.Position
  36. local settingspos = gui.Settings.Position
  37. local ForceModal = script.Parent.ForceModal.Frame.TextButton
  38. local gmOldCameraCF, gmOldCameraFocus, proxitem = nil, nil, nil
  39. print("Things set")
  40. local hbsize = gui.Health.AbsoluteSize
  41. gui.Health.Size = UDim2.new(0, hbsize.Y * 9.931, 0, hbsize.Y)
  42. local mgsize = menugui.AbsoluteSize
  43. menugui.Size = UDim2.new(0, mgsize.Y * 0.96969696969697, 0, mgsize.Y)
  44. local mgpos = menugui.AbsolutePosition
  45. menugui.Position = menugui.Position - UDim2.new(0, mgsize.Y * 0.96969696969697 / 2, 1, 0)
  46. print("Gui Sizes Set")
  47. local CanZSwitch = true
  48. stamina = gui:WaitForChild("Stamina")
  49. stamina.Value = PlayerStats:WaitForChild("MaxStamina").Value
  50. workspace.CurrentCamera.FieldOfView = 70
  51. local lastjump = 0
  52. local human = Player.Character:WaitForChild("Humanoid")
  53. human.WalkSpeed = 18
  54. local swimming = false
  55. human.Running:connect(function()
  56. swimming = false
  57. end)
  58. human.Swimming:connect(function()
  59. swimming = true
  60. end)
  61. human.Changed:connect(function(prop)
  62. if prop == "Jump" and not swimming then
  63. if math.abs(tick() - lastjump) < 1.5 or stamina.Value < 10 then
  64. human.Jump = false
  65. else
  66. lastjump = tick()
  67. stamina.Value = stamina.Value - 10
  68. end
  69. end
  70. end)
  71. neededExp = function(lvl)
  72. lvl = lvl - 1
  73. local total = 9
  74. for i = 1, lvl do
  75. total = total + 6 * (i + 1)
  76. end
  77. return total
  78. end
  79.  
  80. local menuopen = false
  81. local menumoving = false
  82. local menutoggledclose = false
  83. local menutoggledopen = false
  84. local consuming = false
  85. local sprinting = false
  86. local sprintdeb = false
  87. local sprintdeb2 = false
  88. local ordefault = Color3.new(0.29411764705882, 0.29411764705882, 0.29411764705882)
  89. local orhover = Color3.new(0.066666666666667, 0.56470588235294, 1)
  90. local infoimg = "rbxassetid://231761206"
  91. local guildinfo = {}
  92. local groupservice = game:GetService("GroupService")
  93. if PlayerStats.Guild.Value ~= 0 then
  94. guildinfo = groupservice:GetGroupInfoAsync(PlayerStats.Guild.Value)
  95. menugui.InfoImage.Image = guildinfo.EmblemUrl
  96. else
  97. menugui.InfoImage.Image = infoimg
  98. end
  99. print("Got past guild check")
  100. _G.Fishing = false
  101. if not _G.LastFishingTick then
  102. _G.LastFishingTick = 0
  103. end
  104. FishingCooldown = 300
  105. craftingnow = false
  106. _G.CraftingVictory = nil
  107. usingswordskill = false
  108. Notification = function(Header, Text, Image, Timed)
  109. Image = tostring(Image)
  110. local New = game.ReplicatedStorage:WaitForChild("Notification"):Clone()
  111. New.Frame.Header.Text = Header
  112. New.Frame:FindFirstChild("Text").Text = Text
  113. New.Frame.Image.Image = "rbxassetid://" .. (Image:find("invpics") == 1 and invpics[Image:sub(8)] or Image)
  114. if not Timed then
  115. local Debounce = false
  116. do
  117. New.Frame.Ok.MouseButton1Click:connect(function()
  118. if Debounce then
  119. return
  120. end
  121. Debounce = true
  122. gui.ClickSound:Play()
  123. New.Frame.Ok.Button:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  124. wait(0.2)
  125. New.Frame.Ok.Button:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  126. New.Frame:TweenPosition((UDim2.new(0.25, 0, -0.4, 0)), nil, nil, 0.25, true)
  127. wait(0.25)
  128. New:Destroy()
  129. end)
  130. end
  131. else
  132. do
  133. New.Frame.Ok.Visible = false
  134. New.Parent = Player.PlayerGui
  135. New.Frame:TweenPosition((UDim2.new(0.2, 0, 0.4, 0)), ni, nil, 0.25, true)
  136. delay(0.25, function()
  137. if Timed then
  138. wait(Timed)
  139. New.Frame:TweenPosition((UDim2.new(0.25, 0, -0.4, 0)), nil, nil, 0.25, true)
  140. wait(0.25)
  141. New:Destroy()
  142. end
  143. end)
  144. end
  145. end
  146. end
  147.  
  148. findDuelShow = function(player)
  149. for _,v in pairs(workspace:children()) do
  150. if v.Name == "DuelShow" and (v.Player1.Value == player or v.Player2.Value == player) then
  151. return v
  152. end
  153. end
  154. end
  155.  
  156. FixCamera = function()
  157. local cam = workspace.CurrentCamera
  158. cam.CameraType = "Custom"
  159. cam.CameraSubject = Player.Character.Humanoid
  160. end
  161.  
  162. clearFrames = function()
  163. for _,v in pairs(menugui.Frames:GetChildren()) do
  164. v.Visible = false
  165. end
  166. end
  167.  
  168. clearMidFrames = function()
  169. for _,v in pairs(menugui.MidFrames:GetChildren()) do
  170. v.Visible = false
  171. end
  172. end
  173.  
  174. Explode = function(Divider, Text)
  175. if Text == "" or type(Text) ~= "string" then
  176. return {""}
  177. end
  178. if Divider == "" or type(Divider) ~= "string" then
  179. return {Text}
  180. end
  181. local Position, Words = 0, {}
  182. for Start,Stop in function()
  183. return string.find(Text, Divider, Position, true)
  184. end
  185. do
  186. table.insert(Words, string.sub(Text, Position, Start - 1))
  187. Position = Stop + 1
  188. end
  189. table.insert(Words, string.sub(Text, Position))
  190. return Words
  191. end
  192.  
  193. RemoveItem = function(item, amount)
  194. game.ReplicatedStorage:WaitForChild("RemoveItem"):InvokeServer(item, amount)
  195. end
  196.  
  197. getTable = function()
  198. local divider = ","
  199. local text = PlayerStats.Inventory.Value
  200. local stuff = Explode(divider, text)
  201. return stuff
  202. end
  203.  
  204. getcount = function(tab, item)
  205. local number = 0
  206. for i,v in pairs(tab) do
  207. if v == item then
  208. number = number + 1
  209. end
  210. end
  211. return number
  212. end
  213.  
  214. weldit = function(what, where, colorit, colorref, attach)
  215. local hm = what:clone()
  216. hm.Parent = where.Parent
  217. local C = hm:GetChildren()
  218. for i = 1, #C do
  219. if C[i]:IsA("BasePart") then
  220. local W = Instance.new("Weld")
  221. W.Part0 = hm.Middle
  222. W.Part1 = C[i]
  223. local CJ = CFrame.new(hm.Middle.Position)
  224. local C0 = hm.Middle.CFrame:inverse() * CJ
  225. local C1 = C[i].CFrame:inverse() * CJ
  226. W.C0 = C0
  227. W.C1 = C1
  228. W.Parent = hm.Middle
  229. end
  230. do
  231. do
  232. local Y = Instance.new("Weld")
  233. Y.Part0 = where
  234. Y.Part1 = hm.Middle
  235. Y.C0 = CFrame.new(0, 0, 0)
  236. Y.Parent = Y.Part0
  237. -- DECOMPILER ERROR at PC59: LeaveBlock: unexpected jumping out DO_STMT
  238.  
  239. end
  240. end
  241. end
  242. local h = hm:GetChildren()
  243. for i = 1, #h do
  244. h[i].Anchored = false
  245. h[i].CanCollide = false
  246. if colorit == true and h[i].Name == "ColorPart" then
  247. h[i].BrickColor = BrickColor.new(colorref)
  248. end
  249. end
  250. end
  251.  
  252. createHB = function(Plr, IsPlayer, OptOverhead, IsBoss)
  253. local HB = nil
  254. if not IsBoss then
  255. HB = game.ReplicatedStorage:WaitForChild("HBModel"):clone()
  256. else
  257. HB = game.ReplicatedStorage:WaitForChild("HBModelBoss"):clone()
  258. end
  259. HB.Name = Plr
  260. local ActualPlr = nil
  261. if IsPlayer then
  262. ActualPlr = game.Players:FindFirstChild(Plr)
  263. if ActualPlr then
  264. if ActualPlr:GetRankInGroup(3534864) >= 252 then
  265. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Game-Master] " .. Plr
  266. else
  267. if ActualPlr:GetRankInGroup(3534864) == 120 then
  268. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Dev-Assistant] " .. Plr
  269. else
  270. if ActualPlr:GetRankInGroup(3534864) == 100 then
  271. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Developer] " .. Plr
  272. else
  273. if ActualPlr:GetRankInGroup(3534864) == 90 then
  274. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Head-Administrator] " .. Plr
  275. else
  276. if ActualPlr:GetRankInGroup(3534864) == 80 then
  277. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Administrator] " .. Plr
  278. else
  279. if ActualPlr:GetRankInGroup(3534864) == 70 then
  280. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Manager] " .. Plr
  281. else
  282. if ActualPlr:GetRankInGroup(3534864) == 60 then
  283. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Clothing-Designer] " .. Plr
  284. else
  285. if ActualPlr:GetRankInGroup(3534864) == 50 then
  286. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Moderator] " .. Plr
  287. else
  288. if ActualPlr:GetRankInGroup(3534864) == 40 then
  289. HB.GuiPart.SurfaceGui.TextLabel.Text = "[Contributor] " .. Plr
  290. else
  291. HB.GuiPart.SurfaceGui.TextLabel.Text = Plr
  292. end
  293. end
  294. end
  295. end
  296. end
  297. end
  298. end
  299. end
  300. end
  301. if ActualPlr:WaitForChild("PlayerStats").Guild.Value ~= 0 then
  302. HB.GuiPart.SurfaceGui.IL.Image = groupservice:GetGroupInfoAsync(ActualPlr.PlayerStats.Guild.Value).EmblemUrl
  303. end
  304. Instance.new("IntValue", HB).Name = "IsPlayer"
  305. end
  306. else
  307. HB.GuiPart.SurfaceGui.TextLabel.Text = OptOverhead and OptOverhead or Plr
  308. end
  309. local hm = HB
  310. local C = hm:GetChildren()
  311. for i = 1, #C do
  312. if C[i]:IsA("BasePart") then
  313. local W = Instance.new("Weld")
  314. W.Part0 = hm.GuiPart
  315. W.Part1 = C[i]
  316. local CJ = CFrame.new(hm.GuiPart.Position)
  317. local C0 = hm.GuiPart.CFrame:inverse() * CJ
  318. local C1 = C[i].CFrame:inverse() * CJ
  319. W.C0 = C0
  320. W.C1 = C1
  321. W.Parent = hm.GuiPart
  322. end
  323. end
  324. local h = hm:GetChildren()
  325. for i = 1, #h do
  326. if h[i]:IsA("BasePart") then
  327. h[i].Anchored = false
  328. h[i].CanCollide = false
  329. end
  330. end
  331. local HW = Instance.new("Weld")
  332. HW.Name = "HeadWeld"
  333. HW.Parent = HB.GuiPart
  334. HB.Parent = HBFolder
  335. print("Made HB for " .. Plr)
  336. return HB
  337. end
  338.  
  339. szfloors = {1, 10, 20, 30, 40, 50, 65, 76, 84, 95}
  340. checkSafeZone = function()
  341. for i,v in pairs(szfloors) do
  342. if workspace.GameLoader.Options.Floor.Value == v then
  343. return true
  344. end
  345. end
  346. return false
  347. end
  348.  
  349. _G.Zone = "Field"
  350. if checkSafeZone() == true then
  351. _G.Zone = "Town"
  352. else
  353. _G.Zone = "Field"
  354. end
  355. if workspace.GameLoader.Options:FindFirstChild("Amb") then
  356. gui.Amb.SoundId = game.ReplicatedStorage:WaitForChild("Soundtrack")[workspace.GameLoader.Options.Amb.Value].SoundId
  357. gui.Amb.Pitch = game.ReplicatedStorage.Soundtrack[workspace.GameLoader.Options.Amb.Value].Pitch
  358. gui.Amb:Play()
  359. end
  360. UpdateCharacter = function()
  361. game.ReplicatedStorage:WaitForChild("UpdateChar"):InvokeServer()
  362. end
  363.  
  364. swordequipped = false
  365. local idleanim = Player.Character.Humanoid:LoadAnimation(script.Idle)
  366. local skillanim = Player.Character.Humanoid:LoadAnimation(script.SkillReady)
  367. swordaction = false
  368. swordsounds = script.SwordSounds:GetChildren()
  369. candamage = false
  370. SwordConnect = function()
  371. local sword = Player.Character:WaitForChild("Sword")
  372. sword.Middle.Touched:connect(function(hit)
  373. if candamage and hit.Parent:FindFirstChild("Humanoid") then
  374. candamage = false
  375. local victim = game.Players:GetPlayerFromCharacter(hit.Parent)
  376. if victim then
  377. local myopponent = Player.Character:FindFirstChild("DuelOpponent")
  378. local hisopponent = victim.Character:FindFirstChild("DuelOpponent")
  379. local nodamage = victim.Character:FindFirstChild("NoDamage")
  380. if nodamage or ((myopponent and not hisopponent) or myopponent or hisopponent) then
  381. return
  382. end
  383. if myopponent and hisopponent and myopponent.Value == victim and hisopponent.Value == Player then
  384. game.ReplicatedStorage:WaitForChild("DamagePlayer"):FireServer(victim, usingswordskill)
  385. else
  386. if not hit.Parent:FindFirstChild("SZ") and victim.PlayerStats.Level.Value >= 10 and PlayerStats.Level.Value >= 10 then
  387. game.ReplicatedStorage:WaitForChild("DamagePlayer"):FireServer(victim, usingswordskill)
  388. end
  389. end
  390. else
  391. do
  392. game.ReplicatedStorage:WaitForChild("DamageMob"):FireServer(hit.Parent.Humanoid, usingswordskill)
  393. end
  394. end
  395. end
  396. end)
  397. end
  398.  
  399. SwordConnect()
  400. SwordSkill = function()
  401. if Player.Character.Sword and swordequipped and not swordaction then
  402. local asset = assets[Player.PlayerStats.Weapon.Value]
  403. if not asset then
  404. return
  405. end
  406. local module = script.SwordSkills[asset.Value]:FindFirstChild(Player.PlayerStats.CurrentSkill.Value)
  407. if not module then
  408. return
  409. end
  410. local data = require(module)
  411. local skillrequirement = data.RequiredSkillLevel
  412. local order = data.AnimationOrder
  413. local cost = data.RequiredAP
  414. if Player.PlayerStats[asset.Value .. "Skill"].Value < skillrequirement then
  415. return
  416. end
  417. if gui.AP.Value < cost then
  418. return
  419. end
  420. swordaction = true
  421. gui.AP.Value = gui.AP.Value - cost
  422. skillanim:Play()
  423. game.ReplicatedStorage:WaitForChild("SSEffect"):InvokeServer(module.Name)
  424. wait(1)
  425. swordaction = false
  426. end
  427. end
  428.  
  429. currentlyclashing = false
  430. clashfolder = nil
  431. game.ReplicatedStorage:WaitForChild("GlobalM").OnClientEvent:connect(function(Content)
  432. local msg = string.sub(Content[2], 11, string.len(Content[2]))
  433. local truemessage = Content[1] .. " : " .. msg
  434. local Gui = game.Lighting:WaitForChild("AnnouncementGui"):Clone()
  435. Gui.Parent = Player.PlayerGui
  436. Gui.Frame.Announcement.Text = truemessage
  437. Gui.Frame:TweenSizeAndPosition(UDim2.new(1, 0, 0.25, 0), UDim2.new(0, 0, 0.375, 0), "In", "Quad", 0.6)
  438. wait(5.6)
  439. Gui:remove()
  440. end)
  441. game.ReplicatedStorage:WaitForChild("InitClashing).OnClientEvent:connect(function(Folder)
  442. local myownvalue = Folder:WaitForChild(Player.Name)
  443. currentlyclashing = true
  444. swordaction = true
  445. clashfolder = Folder
  446. local gui = game.ReplicatedStorage:WaitForChild("Clash"):Clone()
  447. gui.Parent = Player.PlayerGui
  448. wait(3)
  449. gui:remove()
  450. local folder2 = nil
  451. for _,folder2value in pairs(Folder:GetChildren()) do
  452. if folder2value.Name ~= Player.Name then
  453. folder2 = folder2value
  454. end
  455. end
  456. if folder2.Value < Folder:WaitForChild(Player.Name).Value then
  457. game.ReplicatedStorage:WaitForChild("InitClashing"):FireServer(3, Folder, folder2.Name)
  458. end
  459. clashfolder = nil
  460. swordaction = false
  461. currentlyclashing = false
  462. end)
  463. game.ReplicatedStorage:WaitForChild("SSEffect).OnClientInvoke = function()
  464. skillanim:Stop()
  465. local WeldPing = game.ReplicatedStorage:WaitForChild("ChangeWeld")
  466. local asset = assets[Player.PlayerStats.Weapon.Value]
  467. local module = script.SwordSkills[asset.Value]:FindFirstChild(Player.PlayerStats.CurrentSkill.Value)
  468. local order = require(module).AnimationOrder
  469. candamage = true
  470. usingswordskill = true
  471. for _,v in pairs(order) do
  472. local name = v.Anim
  473. local waittime = v.Wait
  474. local speedmult = v.Speed
  475. local pick = math.random(1, #swordsounds)
  476. local newsound = script.SwordSounds[swordsounds[pick].Name]:clone()
  477. newsound.Parent = Player.Character.Sword.Middle
  478. newsound:Play()
  479. local baseanim = script.SwordSlashes[asset.Value][name]
  480. WeldPing:FireServer(baseanim.Grip.Value, "Right Arm")
  481. local newanim = Player.Character.Humanoid:LoadAnimation(baseanim)
  482. newanim:Play(nil, nil, speedmult)
  483. wait(waittime)
  484. newanim:Stop()
  485. newsound:remove()
  486. wait(0.1)
  487. end
  488. if assets[PlayerStats.Weapon.Value].Value == "One-Handed" then
  489. WeldPing:FireServer("One-Handed Held", "Right Arm")
  490. else
  491. if assets[PlayerStats.Weapon.Value].Value == "Rapier" then
  492. WeldPing:FireServer("One-Handed Held", "Right Arm")
  493. else
  494. if assets[PlayerStats.Weapon.Value].Value == "Dagger" then
  495. WeldPing:FireServer("Dagger Held", "Right Arm")
  496. else
  497. if assets[PlayerStats.Weapon.Value].Value == "Two-Handed" then
  498. WeldPing:FireServer("Two-Handed Held", "Right Arm")
  499. end
  500. end
  501. end
  502. end
  503. idleanim:Play()
  504. candamage = false
  505. usingswordskill = false
  506. end
  507.  
  508. InviteFrame = gui:WaitForChild("PartyInvite)
  509. Mates = gui:WaitForChild("Parties)
  510. Func = game.ReplicatedStorage:WaitForChild("PartyFunc)
  511. Party = Player:WaitForChild("Party)
  512. Decals = {236915531, 234370726, 236915425, 234370700}
  513. Near = {}
  514. Range = 50
  515. HealthConnections = {}
  516. UpdateNear = function()
  517. Near = {}
  518. for _,v in pairs(game.Players:GetPlayers()) do
  519. if v and v.Parent and v.Name ~= Player.Name and v.Character and v.Character:FindFirstChild("Humanoid") and v.Character.Humanoid.Health > 0 and v.Character:FindFirstChild("Torso") and v.Character.Torso.CFrame.p - Player.Character.Torso.CFrame.p.magnitude <= Range then
  520. table.insert(Near, v)
  521. end
  522. end
  523. end
  524.  
  525. listNear = function()
  526. UpdateNear()
  527. for _,v in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  528. do
  529. if v.Name ~= "Base" then
  530. do
  531. v:remove()
  532. -- DECOMPILER ERROR at PC16: LeaveBlock: unexpected jumping out IF_THEN_STMT
  533.  
  534. -- DECOMPILER ERROR at PC16: LeaveBlock: unexpected jumping out IF_STMT
  535.  
  536. end
  537. end
  538. end
  539. end
  540. local count = 0
  541. for i,v in pairs(Near) do
  542. local newb = menugui.Frames.Playerlist.List.Base:clone()
  543. newb.Parent = menugui.Frames.Playerlist.List
  544. newb.Name = v.Name
  545. newb.Text = v.Name
  546. newb.Position = UDim2.new(0, 0, newb.Size.Y.Scale * count, 0)
  547. newb.Visible = true
  548. count = count + 1
  549. end
  550. for _,v in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  551. v.MouseEnter:connect(function()
  552. gui.AltSound:Play()
  553. for _,b in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  554. if b ~= v then
  555. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  556. end
  557. end
  558. end)
  559. v.Buttons.MouseLeave:connect(function()
  560. v:TweenPosition(UDim2.new(0, 0, v.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  561. end)
  562. v.MouseButton1Down:connect(function()
  563. for _,b in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  564. if b ~= v then
  565. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  566. else
  567. b:TweenPosition(UDim2.new(-1, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  568. end
  569. end
  570. gui.ClickSound:Play()
  571. end)
  572. v.Buttons.Party.MouseButton1Down:connect(function()
  573. Func:InvokeServer("Invite", game.Players[v.Name])
  574. gui.ClickSound:Play()
  575. v:TweenPosition(UDim2.new(0, 0, v.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  576. end)
  577. v.Buttons.Msg.MouseButton1Down:connect(function()
  578. end)
  579. v.Buttons.Duel.MouseButton1Down:connect(function()
  580. game.ReplicatedStorage.DuelEvent:FireServer("InvitePlayer", game.Players[v.Name])
  581. gui.ClickSound:Play()
  582. v:TweenPosition(UDim2.new(0, 0, v.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  583. end)
  584. end
  585. end
  586.  
  587. SetupBar = function(Who)
  588. for i = 1, 3 do
  589. local Person = Mates:FindFirstChild(i)
  590. if Person.PlayerName.Text == "" and Who.Character and Who.Character:FindFirstChild("Humanoid") then
  591. Person.PlayerName.Text = Who.Name
  592. Person.Visible = true
  593. break
  594. end
  595. end
  596. end
  597.  
  598. UpdateMemberGui = function()
  599. for i = 1, 3 do
  600. local Person = Mates:WaitForChild(i)
  601. Person:WaitForChild("PlayerName").Text = ""
  602. Person.Visible = false
  603. end
  604. for _,v in pairs(game.Players:GetPlayers()) do
  605. if v.Name ~= Player.Name and v:FindFirstChild("Party") and v.Party.Value == Party.Value and Party.Value ~= "" then
  606. SetupBar(v)
  607. end
  608. end
  609. end
  610.  
  611. Party.Changed:connect(function(New)
  612. end)
  613. local YesButton = InviteFrame:WaitForChild("Options):WaitForChild("Yes)
  614. local NoButton = InviteFrame:WaitForChild("Options"):WaitForChild("No")
  615. YesButton.MouseEnter:connect(function()
  616. YesButton.Image = "rbxassetid://236915530"
  617. end)
  618. YesButton.MouseLeave:connect(function()
  619. YesButton.Image = "rbxassetid://234370725"
  620. end)
  621. NoButton.MouseEnter:connect(function()
  622. NoButton.Image = "rbxassetid://236915424"
  623. end)
  624. NoButton.MouseLeave:connect(function()
  625. NoButton.Image = "rbxassetid://234370699"
  626. end)
  627. menugui.Frames.Party.LeaveParty.MouseButton1Down:connect(function()
  628. gui.ClickSound:Play()
  629. Func:InvokeServer("LeaveParty")
  630. UpdateMemberGui()
  631. menugui.Frames.Party.Visible = false
  632. end)
  633. menugui.Frames.Map.Frame.FloorNumber.Text = "Floor " .. tostring(workspace.GameLoader.Options.Floor.Value) .. " | " .. workspace.GameLoader.Options.FloorName.Value
  634. if workspace.GameLoader.Options:FindFirstChild("Map) then
  635. menugui.Frames.Map.Frame.ImageLabel.Image = "rbxassetid://" .. workspace.GameLoader.Options.Map.Value
  636. end
  637. UpdateMemberGui()
  638. Func.OnClientInvoke = function(...)
  639. local Args = {...}
  640. if Args[1] == "UpdateMember" and type(Args[2]) == "userdata" and Args[2].ClassName == "Player" then
  641. local Who = Args[2]
  642. do
  643. for i = 1, 3 do
  644. local Person = Mates:FindFirstChild(i)
  645. if Person.PlayerName.Text == Who.Name then
  646. return
  647. end
  648. end
  649. UpdateMemberGui()
  650. end
  651. else
  652. do
  653. if Args[1] == "MemberLeft" and type(Args[2]) == "userdata" and Args[2].ClassName == "Player" then
  654. UpdateMemberGui()
  655. else
  656. if Args[1] == "InviteFrom" and type(Args[2]) == "userdata" and Args[2].ClassName == "Player" then
  657. if InviteFrame.Visible then
  658. return
  659. end
  660. local Inviter = Args[2]
  661. local Content = InviteFrame:WaitForChild("Content")
  662. Content.Text = Inviter.Name .. " has invited you to a party."
  663. InviteFrame.Visible = true
  664. local Options = InviteFrame:WaitForChild("Options")
  665. local Yes = Options:WaitForChild("Yes")
  666. local No = Options:WaitForChild("No")
  667. local Response = 0
  668. local Start = tick()
  669. local Conn1 = Yes.MouseButton1Click:connect(function()
  670. Response = true
  671. end)
  672. local Conn2 = No.MouseButton1Click:connect(function()
  673. Response = false
  674. end)
  675. repeat
  676. wait()
  677. until Response ~= 0 or tick() - Start >= 10
  678. Conn1:disconnect()
  679. Conn2:disconnect()
  680. InviteFrame.Visible = false
  681. return Response
  682. end
  683. end
  684. end
  685. end
  686. end
  687.  
  688. menugui.Frames.Trade.Frame.Confirm.MouseButton1Down:connect(function()
  689. local guy = menugui.Frames.Trade.Frame.ID.Text
  690. if game.Players:FindFirstChild(guy) and game.Players[guy].Trader.Value == "None" then
  691. local v = "Send"
  692. game.ReplicatedStorage.TradeInvite:FireServer(v, guy)
  693. end
  694. end)
  695. invpics = {["One-Handed"] = "207992005", Shield = "207991969", Outfit = "207991704", Material = "221160251", Consumable = "268373481", Dagger = "297542870", ["Two-Handed"] = "297542959", Rapier = "297542991", UpperHeadwear = "207991803", LowerHeadwear = "207991803"}
  696. local invfilter = "Equipment"
  697. local unknownicon = "rbxassetid://329366684"
  698. do
  699. local invindex = 1
  700. listInv = function(filter, keepscrollpos)
  701. if not keepscrollpos then
  702. invindex = 1
  703. end
  704. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  705. if v.Name ~= "Base" then
  706. v:remove()
  707. end
  708. end
  709. local count = 0
  710. do
  711. local list = getTable()
  712. menugui.Frames.Inventory.Count.Text = tostring(#list) .. "/200"
  713. for i,v in pairs(list) do
  714. if assets[v] then
  715. if assets[v].Value ~= "Material" and assets[v].Value ~= "Consumable" and filter == "Equipment" then
  716. local newb = menugui.Frames.Inventory.List.Base:clone()
  717. newb.Parent = menugui.Frames.Inventory.List
  718. newb.Name = v
  719. if not assets[v].LVL then
  720. local itemstat = assets[v].Skill
  721. end
  722. if assets[v].LVL then
  723. newb.TextLabel.Text = "[ LVL " .. itemstat.Value .. " ] " .. v
  724. else
  725. newb.TextLabel.Text = "[ SKILL " .. itemstat.Value .. " ] " .. v
  726. end
  727. newb.Icon.Image = "rbxassetid://" .. invpics[assets[v].Value]
  728. newb.Position = UDim2.new(0, 0, newb.Size.Y.Scale * count, 0)
  729. newb.Visible = true
  730. count = count + 1
  731. else
  732. do
  733. if filter == "Items" and (assets[v].Value == "Material" or assets[v].Value == "Consumable") then
  734. if not menugui.Frames.Inventory.List:FindFirstChild(v) then
  735. local newb = menugui.Frames.Inventory.List.Base:clone()
  736. newb.Parent = menugui.Frames.Inventory.List
  737. newb.Name = v
  738. newb.TextLabel.Text = v
  739. newb.Icon.Image = "rbxassetid://" .. invpics[assets[v].Value]
  740. newb.Position = UDim2.new(0, 0, newb.Size.Y.Scale * (count), 0)
  741. newb.Visible = true
  742. count = count + 1
  743. else
  744. do
  745. menugui.Frames.Inventory.List:FindFirstChild(v).TextLabel.Text = v .. " x" .. tostring(getcount(list, v))
  746. do
  747. local newb = menugui.Frames.Inventory.List.Base:clone()
  748. newb.Parent = menugui.Frames.Inventory.List
  749. newb.Name = v
  750. newb.TextLabel.Text = v
  751. newb.Icon.Image = unknownicon
  752. newb.Position = UDim2.new(0, 0, newb.Size.Y.Scale * (count), 0)
  753. newb.Visible = true
  754. count = count + 1
  755. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out DO_STMT
  756.  
  757. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  758.  
  759. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_STMT
  760.  
  761. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_THEN_STMT
  762.  
  763. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_STMT
  764.  
  765. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out DO_STMT
  766.  
  767. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  768.  
  769. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_STMT
  770.  
  771. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_THEN_STMT
  772.  
  773. -- DECOMPILER ERROR at PC226: LeaveBlock: unexpected jumping out IF_STMT
  774.  
  775. end
  776. end
  777. end
  778. end
  779. end
  780. end
  781. end
  782. end
  783. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  784. if v.Name == PlayerStats.Outfit.Value then
  785. v.BackgroundColor3 = orhover
  786. local newval = Instance.new("StringValue", v)
  787. newval.Name = "Equipped"
  788. break
  789. end
  790. end
  791. do
  792. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  793. if v.Name == PlayerStats.Weapon.Value then
  794. v.BackgroundColor3 = orhover
  795. local newval = Instance.new("StringValue", v)
  796. newval.Name = "Equipped"
  797. break
  798. end
  799. end
  800. do
  801. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  802. if v.Name == PlayerStats.UpperHeadwear.Value then
  803. v.BackgroundColor3 = orhover
  804. local newval = Instance.new("StringValue", v)
  805. newval.Name = "Equipped"
  806. break
  807. end
  808. end
  809. do
  810. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  811. if v.Name == PlayerStats.LowerHeadwear.Value then
  812. v.BackgroundColor3 = orhover
  813. local newval = Instance.new("StringValue", v)
  814. newval.Name = "Equipped"
  815. break
  816. end
  817. end
  818. do
  819. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  820. if v.Name == PlayerStats.Shield.Value then
  821. v.BackgroundColor3 = orhover
  822. local newval = Instance.new("StringValue", v)
  823. newval.Name = "Equipped"
  824. break
  825. end
  826. end
  827. do
  828. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  829. v.Position = v.Position - UDim2.new(0, 0, 0.125 * (invindex - 1), 0)
  830. v.MouseEnter:connect(function()
  831. gui.AltSound:Play()
  832. for _,b in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  833. if b ~= v then
  834. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  835. end
  836. end
  837. end)
  838. v.Buttons.MouseLeave:connect(function()
  839. v:TweenPosition(UDim2.new(0, 0, v.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  840. end)
  841. v.MouseButton1Down:connect(function()
  842. for _,b in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  843. if b ~= v then
  844. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  845. else
  846. b:TweenPosition(UDim2.new(-1, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  847. end
  848. end
  849. gui.ClickSound:Play()
  850. end)
  851. v.Buttons.E.MouseButton1Down:connect(function()
  852. local item = assets[v.Name]
  853. if item then
  854. EqItem(v.Name)
  855. else
  856. gui.Err:Play()
  857. end
  858. end)
  859. v.Buttons.Dr.MouseButton1Down:connect(function()
  860. DrItem(v.Name)
  861. end)
  862. v.Buttons.De.MouseButton1Down:connect(function()
  863. DItem(v.Name)
  864. end)
  865. v.Buttons.I.MouseButton1Down:connect(function()
  866. inspect(v.Name)
  867. end)
  868. end
  869. end
  870. end
  871. end
  872. end
  873. end
  874. end
  875. end
  876.  
  877. listSwordSkills = function()
  878. for _,v in pairs(menugui.Frames.Skills.List:GetChildren()) do
  879. if v.Name ~= "Base" then
  880. v:remove()
  881. end
  882. end
  883. local Unlocked = {}
  884. do
  885. for _,v in pairs(script.SwordSkills:children()) do
  886. for _,x in pairs(v:children()) do
  887. local data = require(x)
  888. if data.RequiredSkillLevel <= Player.PlayerStats[v.Name .. "Skill"].Value then
  889. table.insert(Unlocked, data)
  890. end
  891. end
  892. end
  893. local count = 0
  894. for i,v in pairs(Unlocked) do
  895. local newb = menugui.Frames.Skills.List.Base:clone()
  896. newb.Parent = menugui.Frames.Skills.List
  897. newb.Name = v.SkillName
  898. newb.Text = v.SkillName
  899. newb.Position = UDim2.new(0, 0, newb.Size.Y.Scale * count, 0)
  900. if v.SkillName == PlayerStats.CurrentSkill.Value then
  901. newb.BackgroundColor3 = orhover
  902. end
  903. newb.Icon.Image = "rbxassetid://" .. invpics[v.WeaponType]
  904. newb.Visible = true
  905. count = count + 1
  906. end
  907. for _,v in pairs(menugui.Frames.Skills.List:GetChildren()) do
  908. v.MouseEnter:connect(function()
  909. gui.AltSound:Play()
  910. for _,b in pairs(menugui.Frames.Skills.List:GetChildren()) do
  911. if b ~= v then
  912. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  913. end
  914. end
  915. end)
  916. v.Buttons.MouseLeave:connect(function()
  917. v:TweenPosition(UDim2.new(0, 0, v.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  918. end)
  919. v.MouseButton1Down:connect(function()
  920. for _,b in pairs(menugui.Frames.Skills.List:GetChildren()) do
  921. if b ~= v then
  922. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  923. else
  924. b:TweenPosition(UDim2.new(-1, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  925. end
  926. end
  927. gui.ClickSound:Play()
  928. end)
  929. v.Buttons.Set.MouseButton1Down:connect(function()
  930. game.ReplicatedStorage:WaitForChild("ChangeSS"):InvokeServer(v.Name)
  931. gui.ClickSound:Play()
  932. listSwordSkills()
  933. end)
  934. end
  935. end
  936. end
  937.  
  938. modapp = function(type, item)
  939. game.ReplicatedStorage:WaitForChild("ModApp"):InvokeServer(type, item)
  940. end
  941.  
  942. EqItem = function(item)
  943. if assets[item].Value == "Outfit" then
  944. if assets[item].LVL.Value <= PlayerStats.Level.Value then
  945. modapp("Outfit", item)
  946. UpdateCharacter()
  947. SwordConnect()
  948. listInv(invfilter, true)
  949. gui.Bag:Play()
  950. else
  951. gui.Err:Play()
  952. end
  953. else
  954. if assets[item].Value == "One-Handed" or assets[item].Value == "Rapier" or assets[item].Value == "Dagger" or assets[item].Value == "Two-Handed" then
  955. if assets[item].Skill.Value <= PlayerStats[assets[item].Value .. "Skill"].Value then
  956. modapp("Weapon", item)
  957. UpdateCharacter()
  958. SwordConnect()
  959. gui.Bag:Play()
  960. listInv(invfilter, true)
  961. else
  962. gui.Err:Play()
  963. end
  964. else
  965. if assets[item].Value == "UpperHeadwear" then
  966. if PlayerStats.UpperHeadwear.Value ~= item then
  967. if assets[item].LVL.Value <= PlayerStats.Level.Value then
  968. modapp("UpperHeadwear", item)
  969. UpdateCharacter()
  970. SwordConnect()
  971. listInv(invfilter, true)
  972. gui.Bag:Play()
  973. else
  974. gui.Err:Play()
  975. end
  976. else
  977. modapp("UpperHeadwear", "")
  978. UpdateCharacter()
  979. SwordConnect()
  980. listInv(invfilter, true)
  981. end
  982. else
  983. if assets[item].Value == "LowerHeadwear" then
  984. if PlayerStats.LowerHeadwear.Value ~= item then
  985. if assets[item].LVL.Value <= PlayerStats.Level.Value then
  986. modapp("LowerHeadwear", item)
  987. UpdateCharacter()
  988. SwordConnect()
  989. listInv(invfilter, true)
  990. gui.Bag:Play()
  991. else
  992. gui.Err:Play()
  993. end
  994. else
  995. modapp("LowerHeadwear", "")
  996. UpdateCharacter()
  997. SwordConnect()
  998. listInv(invfilter, true)
  999. end
  1000. else
  1001. if assets[item].Value == "Shield" then
  1002. if PlayerStats.Shield.Value ~= item then
  1003. if assets[item].LVL.Value <= PlayerStats.Level.Value then
  1004. modapp("Shield", item)
  1005. UpdateCharacter()
  1006. SwordConnect()
  1007. listInv(invfilter, true)
  1008. gui.Bag:Play()
  1009. else
  1010. gui.Err:Play()
  1011. end
  1012. else
  1013. modapp("Shield", "")
  1014. UpdateCharacter()
  1015. SwordConnect()
  1016. listInv(invfilter, true)
  1017. end
  1018. else
  1019. if assets[item].Value == "Consumable" and not consuming and not findDuelShow(Player) then
  1020. consuming = item
  1021. for _,b in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  1022. b:TweenPosition(UDim2.new(0, 0, b.Position.Y.Scale, 0), "Out", "Quad", 0.25, true)
  1023. end
  1024. local anim = Player.Character.Humanoid:LoadAnimation(script.EatDrink)
  1025. anim:Play()
  1026. game.ReplicatedStorage.UseConsumable:InvokeServer(item)
  1027. listInv(invfilter, true)
  1028. anim:Stop()
  1029. idleanim:Play()
  1030. consuming = false
  1031. end
  1032. end
  1033. end
  1034. end
  1035. end
  1036. end
  1037. end
  1038.  
  1039. DrItem = function(item)
  1040. if PlayerStats.DualWeapon.Value == item then
  1041. item = "None"
  1042. end
  1043. if item == "None" or assets[item].Value == "One-Handed" and Player.PlayerStats["One-HandedSkill"].Value >= 250 then
  1044. if item == "None" or assets[item].Skill.Value <= PlayerStats[assets[item].Value .. "Skill"].Value then
  1045. game.ReplicatedStorage:WaitForChild("UpdateDualWeapon"):FireServer(item)
  1046. UpdateCharacter()
  1047. SwordConnect()
  1048. gui.Bag:Play()
  1049. listInv(invfilter, true)
  1050. else
  1051. gui.Err:Play()
  1052. end
  1053. end
  1054. end
  1055.  
  1056. DItem = function(item)
  1057. if item == consuming then
  1058. return
  1059. end
  1060. if PlayerStats.Outfit.Value ~= item and PlayerStats.Weapon.Value ~= item and PlayerStats.UpperHeadwear.Value ~= item and PlayerStats.LowerHeadwear.Value ~= item and PlayerStats.Shield.Value ~= item and (not assets[item] or not assets[item].Bound) then
  1061. RemoveItem(item)
  1062. else
  1063. local stuff = getTable()
  1064. if getcount(stuff, item) >= 2 then
  1065. RemoveItem(item)
  1066. end
  1067. end
  1068. do
  1069. listInv(invfilter, true)
  1070. gui.Bag:Play()
  1071. end
  1072. end
  1073.  
  1074. inspect = function(item)
  1075. local it = assets[item]
  1076. if it then
  1077. gui.Inspect.TL.Text = item
  1078. gui.Inspect.Type.Text = it.Value
  1079. gui.Inspect.Worth.Text = "Worth: " .. it.Worth.Value .. " Col"
  1080. if it.LVL then
  1081. gui.Inspect.Level.Text = "Level: " .. tostring(it.LVL.Value)
  1082. else
  1083. if it.Skill then
  1084. gui.Inspect.Level.Text = "Skill: " .. tostring(it.Skill.Value)
  1085. else
  1086. gui.Inspect.Level.Text = ""
  1087. end
  1088. end
  1089. if it.DMG then
  1090. gui.Inspect.D.Text = "ATK: " .. tostring(it.DMG.Value)
  1091. else
  1092. if it.DEF then
  1093. gui.Inspect.D.Text = "DEF: " .. tostring(it.DEF.Value)
  1094. else
  1095. gui.Inspect.D.Text = ""
  1096. end
  1097. end
  1098. gui.Inspect.Icon.Image = "rbxassetid://" .. invpics[it.Value]
  1099. gui.Inspect.Visible = true
  1100. end
  1101. end
  1102.  
  1103. gui.Inspect.Done.MouseButton1Down:connect(function()
  1104. gui.ClickSound:Play()
  1105. gui.Inspect.Done.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1106. wait(0.2)
  1107. gui.Inspect.Done.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1108. gui.Inspect.Visible = false
  1109. end)
  1110. for _,v in pairs(menugui.Menus:GetChildren()) do
  1111. do
  1112. if v:IsA("ImageButton") then
  1113. do
  1114. v.MouseEnter:connect(function()
  1115. if menuopen then
  1116. gui.AltSound:Play()
  1117. v.Image = v.Value.Value
  1118. end
  1119. end)
  1120. v.MouseLeave:connect(function()
  1121. if v.Name == "Players" then
  1122. v.Image = playersoriginal
  1123. else
  1124. if v.Name == "Player" then
  1125. v.Image = playeroriginal
  1126. else
  1127. if v.Name == "Data" then
  1128. v.Image = dataoriginal
  1129. else
  1130. if v.Name == "Message" then
  1131. v.Image = messageoriginal
  1132. else
  1133. if v.Name == "Settings" then
  1134. v.Image = settingsoriginal
  1135. end
  1136. end
  1137. end
  1138. end
  1139. end
  1140. end)
  1141. v.MouseButton1Down:connect(function()
  1142. if menuopen == true and not menumoving then
  1143. clearFrames()
  1144. clearMidFrames()
  1145. gui.ClickSound:Play()
  1146. menugui.Menus:TweenPosition(UDim2.new(0, 0, 0.1, 0), "Out", "Quad", 0.2, true)
  1147. menugui.InfoImage:TweenPosition(UDim2.new(-0.35, 0, 0.15, 0), "Out", "Quad", 0.2, true)
  1148. menugui.MidFrames[v.Name].Visible = true
  1149. end
  1150. end)
  1151. -- DECOMPILER ERROR at PC642: LeaveBlock: unexpected jumping out IF_THEN_STMT
  1152.  
  1153. -- DECOMPILER ERROR at PC642: LeaveBlock: unexpected jumping out IF_STMT
  1154.  
  1155. end
  1156. end
  1157. end
  1158. end
  1159. for _,v in pairs(menugui.MidFrames:GetChildren()) do
  1160. do
  1161. for _,c in pairs(v:GetChildren()) do
  1162. if c:IsA("TextButton") then
  1163. c.MouseButton1Down:connect(function()
  1164. if menugui.Frames:FindFirstChild(c.Name) then
  1165. gui.ClickSound:Play()
  1166. clearFrames()
  1167. menugui.Frames[c.Name].Visible = true
  1168. if c.Name == "Playerlist" then
  1169. listNear()
  1170. else
  1171. if c.Name == "Skills" then
  1172. listSwordSkills()
  1173. end
  1174. end
  1175. else
  1176. gui.ClickSound:Play()
  1177. clearFrames()
  1178. if c.Name == "Items" then
  1179. listInv("Items")
  1180. invfilter = "Items"
  1181. menugui.Frames.Inventory.Visible = true
  1182. else
  1183. if c.Name == "Equipment" then
  1184. listInv("Equipment")
  1185. invfilter = "Equipment"
  1186. menugui.Frames.Inventory.Visible = true
  1187. end
  1188. end
  1189. end
  1190. end)
  1191. c.MouseEnter:connect(function()
  1192. c.BackgroundColor3 = orhover
  1193. gui.AltSound:Play()
  1194. end)
  1195. c.MouseLeave:connect(function()
  1196. c.BackgroundColor3 = ordefault
  1197. end)
  1198. end
  1199. end
  1200. end
  1201. end
  1202. menugui.Frames.Inventory.Up.MouseButton1Down:connect(function()
  1203. if invindex > 1 then
  1204. invindex = invindex - 1
  1205. else
  1206. return
  1207. end
  1208. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  1209. if v.Name ~= "Base" then
  1210. v.Position = v.Position + UDim2.new(0, 0, 0.125, 0)
  1211. end
  1212. end
  1213. gui.AltSound:Play()
  1214. end)
  1215. menugui.Frames.Inventory.Down.MouseButton1Down:connect(function()
  1216. invindex = invindex + 1
  1217. for _,v in pairs(menugui.Frames.Inventory.List:GetChildren()) do
  1218. if v.Name ~= "Base" then
  1219. v.Position = v.Position - UDim2.new(0, 0, 0.125, 0)
  1220. end
  1221. end
  1222. gui.AltSound:Play()
  1223. end)
  1224. menugui.Frames.Playerlist.Up.MouseButton1Down:connect(function()
  1225. for _,v in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  1226. if v.Name ~= "Base" then
  1227. v.Position = v.Position + UDim2.new(0, 0, 0.125, 0)
  1228. end
  1229. end
  1230. gui.AltSound:Play()
  1231. end)
  1232. menugui.Frames.Playerlist.Down.MouseButton1Down:connect(function()
  1233. for _,v in pairs(menugui.Frames.Playerlist.List:GetChildren()) do
  1234. if v.Name ~= "Base" then
  1235. v.Position = v.Position - UDim2.new(0, 0, 0.125, 0)
  1236. end
  1237. end
  1238. gui.AltSound:Play()
  1239. end)
  1240. menugui.Frames.Skills.Up.MouseButton1Down:connect(function()
  1241. for _,v in pairs(menugui.Frames.Skills.List:GetChildren()) do
  1242. if v.Name ~= "Base" then
  1243. v.Position = v.Position + UDim2.new(0, 0, 0.125, 0)
  1244. end
  1245. end
  1246. gui.AltSound:Play()
  1247. end)
  1248. menugui.Frames.Skills.Down.MouseButton1Down:connect(function()
  1249. for _,v in pairs(menugui.Frames.Skills.List:GetChildren()) do
  1250. if v.Name ~= "Base" then
  1251. v.Position = v.Position - UDim2.new(0, 0, 0.125, 0)
  1252. end
  1253. end
  1254. gui.AltSound:Play()
  1255. end)
  1256. guildgui = menugui.Frames.Guild.Frame
  1257. MPService = game:GetService("MarketplaceService)
  1258. guildgui.Confirm.MouseButton1Down:connect(function()
  1259. gui.ClickSound:Play()
  1260. guildgui.Confirm.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1261. wait(0.2)
  1262. guildgui.Confirm.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1263. if Player:IsInGroup(tonumber(guildgui.ID.Text)) then
  1264. MPService:PromptProductPurchase(Player, 107631719)
  1265. game.ReplicatedStorage.GuildUpdate:FireServer(tonumber(guildgui.ID.Text))
  1266. end
  1267. end)
  1268. local tradegui = menugui.Frames.Trade.Frame
  1269. tradegui.Confirm.MouseButton1Down:connect(function()
  1270. end)
  1271. repeat
  1272. wait()
  1273. until _G.CustomMouse
  1274. local customMouse = _G.CustomMouse
  1275. game.ReplicatedStorage:WaitForChild("NotificationEvent").OnClientEvent:connect(function(Header, Text, Image, Timed)
  1276. Notification(Header, Text, Image, Timed)
  1277. end)
  1278. local craftmode = gui:WaitForChild("CraftMode)
  1279. local crafting = gui:WaitForChild("Crafting")
  1280. local inputs = crafting:WaitForChild("Inputs")
  1281. local boxes = crafting:WaitForChild("Boxes)
  1282. local products = crafting:WaitForChild("Products")
  1283. local dropdown = crafting:WaitForChild("Dropdown")
  1284. do
  1285. local craftbutton = crafting:WaitForChild("Craft")
  1286. local close = crafting:WaitForChild("Close")
  1287. local inventory = (PlayerStats:WaitForChild("Inventory))
  1288. local selectedcraft = nil
  1289. local craftdebounce = false
  1290. getInventoryTable = function(noEquipped)
  1291. local full = Explode(",", inventory.Value)
  1292. local filtered = {}
  1293. if not noEquipped then
  1294. return full
  1295. else
  1296. for _,v in pairs(full) do
  1297. local origcount = getcount(full, v)
  1298. local newcount = getcount(filtered, v)
  1299. if (PlayerStats.Outfit.Value:lower() ~= v:lower() and PlayerStats.Weapon.Value:lower() ~= v:lower()) or origcount > 1 and newcount + 1 < origcount then
  1300. table.insert(filtered, v)
  1301. end
  1302. end
  1303. return filtered
  1304. end
  1305. end
  1306.  
  1307. tableToString = function(tab)
  1308. return table.concat(tab, ",")
  1309. end
  1310.  
  1311. findBox = function(item)
  1312. for _,v in pairs(boxes:children()) do
  1313. if v.Item.Value == item then
  1314. return v
  1315. end
  1316. end
  1317. return false
  1318. end
  1319.  
  1320. listInputs = function()
  1321. local tab = getInventoryTable(true)
  1322. for _,v in pairs(inputs:children()) do
  1323. if v.Name ~= "Base" then
  1324. v:Remove()
  1325. end
  1326. end
  1327. inputs.CanvasSize = UDim2.new(0, 0, 0, 50 * #tab)
  1328. local amounts = {}
  1329. do
  1330. local index = 1
  1331. for i,v in pairs(tab) do
  1332. if assets[v] then
  1333. if inputs:FindFirstChild(v) then
  1334. amounts[v] = amounts[v] + 1
  1335. inputs[v].Text = v .. " x" .. amounts[v]
  1336. else
  1337. if not findBox(v) then
  1338. local new = inputs.Base:Clone()
  1339. new.Visible = true
  1340. new.Name = v
  1341. new.Text = v
  1342. new.Position = UDim2.new(0, 0, 0, 50 * (index - 1))
  1343. new.Icon.Image = "rbxassetid://" .. invpics[assets[v].Value]
  1344. if inputs.AbsoluteWindowSize.Y < inputs.CanvasSize.Y.Offset then
  1345. new.Size = UDim2.new(1, -13, 0, 50)
  1346. else
  1347. new.Size = UDim2.new(1, 0, 0, 50)
  1348. end
  1349. new.MouseButton1Click:connect(function()
  1350. for i = 1, 4 do
  1351. local current = boxes["Box" .. i]
  1352. if current.Item.Value == "" then
  1353. current.Item.Value = v
  1354. selectedcraft = nil
  1355. craftbutton.BackgroundTransparency = 0.75
  1356. craftbutton.TextTransparency = 0.5
  1357. listInputs()
  1358. updateBoxes()
  1359. listProducts()
  1360. break
  1361. end
  1362. end
  1363. end)
  1364. new.Parent = inputs
  1365. amounts[v] = 1
  1366. index = index + 1
  1367. end
  1368. end
  1369. end
  1370. end
  1371. end
  1372. end
  1373.  
  1374. updateBoxes = function()
  1375. for i,v in pairs(boxes:children()) do
  1376. local val = v.Item.Value
  1377. if val ~= "" then
  1378. local tab = getInventoryTable(true)
  1379. local count = getcount(tab, val)
  1380. if count > 0 then
  1381. v.Text = val .. " x" .. count
  1382. else
  1383. v.Text = ""
  1384. v.Item.Value = ""
  1385. end
  1386. else
  1387. do
  1388. do
  1389. v.Text = ""
  1390. -- DECOMPILER ERROR at PC30: LeaveBlock: unexpected jumping out DO_STMT
  1391.  
  1392. -- DECOMPILER ERROR at PC30: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  1393.  
  1394. -- DECOMPILER ERROR at PC30: LeaveBlock: unexpected jumping out IF_STMT
  1395.  
  1396. end
  1397. end
  1398. end
  1399. end
  1400. for i = 1, 4 do
  1401. local current = boxes["Box" .. i]
  1402. if current.Item.Value == "" then
  1403. for x = i + 1, 4 do
  1404. local prev = boxes["Box" .. x - 1]
  1405. local this = boxes["Box" .. x]
  1406. prev.Text = this.Text
  1407. prev.Item.Value = this.Item.Value
  1408. end
  1409. end
  1410. end
  1411. end
  1412.  
  1413. listProducts = function()
  1414. local inv = getInventoryTable(true)
  1415. local tab = {}
  1416. for _,v in pairs(game.ReplicatedStorage.CraftingRecipes:children()) do
  1417. do
  1418. if v.CraftType.Value == craftmode.Value then
  1419. local okay = true
  1420. for _,needed in pairs(v:children()) do
  1421. if needed.Name ~= "CraftType" and needed.Name ~= "CraftingSkill" and (not findBox(needed.Name) or getcount(inv, needed.Name) < needed.Value) then
  1422. okay = false
  1423. break
  1424. end
  1425. end
  1426. do
  1427. if v.CraftType.Value ~= "Smeltering" and PlayerStats[v.CraftType.Value .. "Skill"].Value < v.CraftingSkill.Value then
  1428. okay = false
  1429. end
  1430. if okay then
  1431. do
  1432. table.insert(tab, {v, true})
  1433. -- DECOMPILER ERROR at PC72: LeaveBlock: unexpected jumping out IF_THEN_STMT
  1434.  
  1435. -- DECOMPILER ERROR at PC72: LeaveBlock: unexpected jumping out IF_STMT
  1436.  
  1437. end
  1438. end
  1439. end
  1440. end
  1441. -- DECOMPILER ERROR at PC72: LeaveBlock: unexpected jumping out DO_STMT
  1442.  
  1443. end
  1444. end
  1445. for _,v in pairs(game.ReplicatedStorage.CraftingRecipes:children()) do
  1446. if v.CraftType.Value == craftmode.Value then
  1447. local okay = true
  1448. for _,needed in pairs(v:children()) do
  1449. if needed.Name ~= "CraftType" and needed.Name ~= "CraftingSkill" and (not findBox(needed.Name) or getcount(inv, needed.Name) < needed.Value) then
  1450. okay = false
  1451. break
  1452. end
  1453. end
  1454. do
  1455. do
  1456. if v.CraftType.Value ~= "Smeltering" and PlayerStats[v.CraftType.Value .. "Skill"].Value < v.CraftingSkill.Value then
  1457. okay = false
  1458. end
  1459. if not okay then
  1460. table.insert(tab, {v, false})
  1461. end
  1462. -- DECOMPILER ERROR at PC142: LeaveBlock: unexpected jumping out DO_STMT
  1463.  
  1464. -- DECOMPILER ERROR at PC142: LeaveBlock: unexpected jumping out IF_THEN_STMT
  1465.  
  1466. -- DECOMPILER ERROR at PC142: LeaveBlock: unexpected jumping out IF_STMT
  1467.  
  1468. end
  1469. end
  1470. end
  1471. end
  1472. for _,v in pairs(products:children()) do
  1473. if v.Name ~= "Base" then
  1474. v:Remove()
  1475. end
  1476. end
  1477. products.CanvasSize = UDim2.new(0, 0, 0, 50 * #tab)
  1478. for i,v in pairs(tab) do
  1479. local new = products.Base:Clone()
  1480. new.Visible = true
  1481. new.Name = v[1].Name
  1482. new.Text = v[1].Name
  1483. new.Position = UDim2.new(0, 0, 0, 50 * (i - 1))
  1484. if products.AbsoluteWindowSize.Y < products.CanvasSize.Y.Offset then
  1485. new.Size = UDim2.new(1, -13, 0, 50)
  1486. else
  1487. new.Size = UDim2.new(1, 0, 0, 50)
  1488. end
  1489. new.MouseEnter:connect(function()
  1490. dropdown.Desc.Text = v[1].Value
  1491. dropdown.CraftingSkill.Text = v[1].CraftType.Value .. "Skill: " .. v[1].CraftingSkill.Value
  1492. local need = {}
  1493. for _,needed in pairs(v[1]:children()) do
  1494. if needed.Name ~= "CraftType" and needed.Name ~= "CraftingSkill" then
  1495. table.insert(need, needed.Value .. " " .. needed.Name)
  1496. end
  1497. end
  1498. dropdown.Required.Text = "Required: " .. table.concat(need, ", ")
  1499. end)
  1500. new.MouseMoved:connect(function(x, y)
  1501. dropdown.Position = UDim2.new(0, x - crafting.AbsolutePosition.X, 0, y - crafting.AbsolutePosition.Y)
  1502. dropdown.Visible = true
  1503. end)
  1504. new.MouseLeave:connect(function()
  1505. dropdown.Visible = false
  1506. end)
  1507. new.MouseButton1Click:connect(function()
  1508. if v[2] then
  1509. selectedcraft = v[1].Name
  1510. craftbutton.BackgroundTransparency = 0.5
  1511. craftbutton.TextTransparency = 0
  1512. listProducts()
  1513. end
  1514. end)
  1515. if not v[2] then
  1516. new.BackgroundTransparency = 0.75
  1517. new.TextStrokeTransparency = 1
  1518. new.TextTransparency = 0.7
  1519. new.Icon.ImageTransparency = 0.8
  1520. if selectedcraft == v[1].Name then
  1521. selectedcraft = nil
  1522. craftbutton.BackgroundTransparency = 0.75
  1523. craftbutton.TextTransparency = 0.5
  1524. end
  1525. end
  1526. if selectedcraft == v[1].Name then
  1527. new.BackgroundColor3 = orhover
  1528. end
  1529. new.Parent = products
  1530. end
  1531. end
  1532.  
  1533. for i,v in pairs(boxes:children()) do
  1534. v.MouseButton1Click:connect(function()
  1535. v.Item.Value = ""
  1536. updateBoxes()
  1537. listInputs()
  1538. listProducts()
  1539. end)
  1540. end
  1541. craftbutton.MouseButton1Click:connect(function()
  1542. if craftdebounce then
  1543. return
  1544. end
  1545. if not selectedcraft then
  1546. return
  1547. end
  1548. craftdebounce = true
  1549. local recipe = game.ReplicatedStorage.CraftingRecipes:FindFirstChild(selectedcraft)
  1550. if recipe.CraftType.Value ~= "Smeltering" then
  1551. game.ReplicatedStorage:WaitForChild("CraftingStart"):InvokeServer()
  1552. repeat
  1553. wait()
  1554. until _G.CraftingVictory ~= nil
  1555. else
  1556. _G.CraftingVictory = true
  1557. end
  1558. local SkillName = recipe.CraftType.Value .. "Skill"
  1559. game.ReplicatedStorage:WaitForChild("CraftingEnded"):InvokeServer(SkillName, recipe.Name, _G.CraftingVictory)
  1560. listInputs()
  1561. updateBoxes()
  1562. listProducts()
  1563. wait(1)
  1564. _G.CraftingVictory = nil
  1565. craftdebounce = false
  1566. end)
  1567. close.MouseButton1Click:connect(function()
  1568. crafting.Visible = false
  1569. craftingnow = false
  1570. Player.Character.Humanoid.WalkSpeed = 18
  1571. end)
  1572. crafting.Changed:connect(function(property)
  1573. if property == "Visible" then
  1574. listInputs()
  1575. listProducts()
  1576. end
  1577. end)
  1578. listInputs()
  1579. listProducts()
  1580. gui.Crafting.Changed:connect(function(property)
  1581. if property == "Visible" and gui.Crafting.Visible then
  1582. craftingnow = true
  1583. end
  1584. end)
  1585. inside = Player:WaitForChild("Inside)
  1586. ginterior = Player:WaitForChild("Interior)
  1587. local phomeinterior = ""
  1588. exitinterior = function()
  1589. workspace.CurrentCamera.CameraType = "Custom"
  1590. workspace.CurrentCamera.CameraSubject = game.Players.LocalPlayer.Character
  1591. if workspace:FindFirstChild(ginterior.Value) then
  1592. workspace:FindFirstChild(ginterior.Value):remove()
  1593. end
  1594. if workspace:FindFirstChild("Ext-" .. phomeinterior) then
  1595. for _,v in pairs(workspace:FindFirstChild("Ext-" .. phomeinterior):GetChildren()) do
  1596. v.Transparency = 0
  1597. end
  1598. end
  1599. do
  1600. phomeinterior = ""
  1601. inside.Value = false
  1602. ginterior.Value = ""
  1603. game.ReplicatedStorage.IntValuesChanged:FireServer(false, "")
  1604. Player.Character.Humanoid.WalkSpeed = 18
  1605. end
  1606. end
  1607.  
  1608. if ginterior.Value ~= "" then
  1609. exitinterior()
  1610. end
  1611. loadinterior = function(interiormodel, owner)
  1612. local model = game.ReplicatedStorage.Interiors:FindFirstChild(interiormodel):clone()
  1613. model.Parent = workspace
  1614. model.Name = interiormodel
  1615. local ownervalue = Instance.new("StringValue", model)
  1616. ownervalue.Name = "Owner"
  1617. ownervalue.Value = owner
  1618. phomeinterior = interiormodel
  1619. inside.Value = true
  1620. ginterior.Value = interiormodel
  1621. game.ReplicatedStorage.IntValuesChanged:FireServer(true, interiormodel)
  1622. workspace.CurrentCamera.CameraType = "Custom"
  1623. workspace.CurrentCamera.CameraSubject = game.Players.LocalPlayer.Character
  1624. if workspace:FindFirstChild("Ext-" .. ginterior.Value) then
  1625. for _,v in pairs(workspace:FindFirstChild("Ext-" .. ginterior.Value):GetChildren()) do
  1626. v.Transparency = 1
  1627. end
  1628. end
  1629. do
  1630. return model
  1631. end
  1632. end
  1633.  
  1634. local shopitem = ""
  1635. do
  1636. local shopping = false
  1637. local shopmode = true
  1638. makeBuyList = function()
  1639. for _,v in pairs(gui.Shop.List.F:GetChildren()) do
  1640. if v.Name ~= "Base" then
  1641. v:remove()
  1642. end
  1643. end
  1644. local count = 0
  1645. do
  1646. local list = game.ReplicatedStorage:WaitForChild("GetBuyList"):InvokeServer(proxitem.Id.Value)
  1647. gui.Shop.List.F.CanvasSize = UDim2.new(0, 0, 0, gui.Shop.List.F.Base.Size.Y.Offset * #list)
  1648. for _,v in pairs(list) do
  1649. if assets[v] then
  1650. local newb = gui.Shop.List.F.Base:clone()
  1651. newb.Parent = gui.Shop.List.F
  1652. newb.Name = v
  1653. newb.Text = v
  1654. newb.Icon.Image = "rbxassetid://" .. invpics[assets[v].Value]
  1655. newb.Position = UDim2.new(0, 0, 0, newb.Size.Y.Offset * count)
  1656. newb.Visible = true
  1657. count = count + 1
  1658. end
  1659. end
  1660. for _,v in pairs(gui.Shop.List.F:children()) do
  1661. if v.Name ~= "Base" then
  1662. v.MouseButton1Down:connect(function()
  1663. gui.ClickSound:Play()
  1664. shopitem = v.Name
  1665. shopmode = true
  1666. gui.Shop.Confirm.Visible = true
  1667. gui.Shop.Confirm.TextLabel.Text = "Confirm Purchase of " .. v.Name .. " for " .. tostring(assets[v.Name].Worth.Value) .. " Col:"
  1668. if assets[v.Name].Badge then
  1669. gui.Shop.Confirm.TextLabel.Text = gui.Shop.Confirm.TextLabel.Text .. " [BADGE]"
  1670. end
  1671. if assets[v.Name].Pass then
  1672. gui.Shop.Confirm.TextLabel.Text = gui.Shop.Confirm.TextLabel.Text .. " [PASS]"
  1673. end
  1674. if assets[v.Name].Group then
  1675. gui.Shop.Confirm.TextLabel.Text = gui.Shop.Confirm.TextLabel.Text .. " [GROUP]"
  1676. end
  1677. end)
  1678. end
  1679. end
  1680. end
  1681. end
  1682.  
  1683. makeSellList = function()
  1684. for _,v in pairs(gui.Shop.List.F:GetChildren()) do
  1685. if v.Name ~= "Base" then
  1686. v:remove()
  1687. end
  1688. end
  1689. local count = 0
  1690. do
  1691. local list = getTable()
  1692. gui.Shop.List.F.CanvasSize = UDim2.new(0, 0, 0, gui.Shop.List.F.Base.Size.Y.Offset * #list)
  1693. for i,v in pairs(list) do
  1694. if assets[v] and not assets[v].Bound then
  1695. local newb = gui.Shop.List.F.Base:clone()
  1696. newb.Parent = gui.Shop.List.F
  1697. newb.Name = v
  1698. newb.Text = v
  1699. newb.Icon.Image = "rbxassetid://" .. invpics[assets[v].Value]
  1700. newb.Position = UDim2.new(0, 0, 0, newb.Size.Y.Offset * count)
  1701. newb.Visible = true
  1702. count = count + 1
  1703. end
  1704. end
  1705. for _,v in pairs(gui.Shop.List.F:children()) do
  1706. if v.Name ~= "Base" then
  1707. v.MouseButton1Down:connect(function()
  1708. gui.ClickSound:Play()
  1709. shopitem = v.Name
  1710. shopmode = false
  1711. gui.Shop.Confirm.Visible = true
  1712. gui.Shop.Confirm.TextLabel.Text = "Confirm Sale of " .. v.Name .. " for " .. math.ceil(assets[v.Name].Worth.Value / 2) .. " Col:"
  1713. end)
  1714. end
  1715. end
  1716. end
  1717. end
  1718.  
  1719. gui.Shop.List.Buy.MouseButton1Down:connect(function()
  1720. gui.ClickSound:Play()
  1721. gui.Shop.List.Buy.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1722. wait(0.2)
  1723. gui.Shop.List.Buy.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1724. makeBuyList()
  1725. end)
  1726. gui.Shop.List.Sell.MouseButton1Down:connect(function()
  1727. gui.ClickSound:Play()
  1728. gui.Shop.List.Sell.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1729. wait(0.2)
  1730. gui.Shop.List.Sell.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1731. makeSellList()
  1732. end)
  1733. gui.Shop.Confirm.Cancel.MouseButton1Down:connect(function()
  1734. gui.ClickSound:Play()
  1735. gui.Shop.Confirm.Cancel.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1736. wait(0.2)
  1737. gui.Shop.Confirm.Cancel.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1738. gui.Shop.Confirm.Visible = false
  1739. end)
  1740. local shopselldeb = false
  1741. gui.Shop.Confirm.Ok.MouseButton1Down:connect(function()
  1742. if shopselldeb then
  1743. return
  1744. end
  1745. shopselldeb = true
  1746. if shopitem ~= "" then
  1747. if game.ReplicatedStorage:WaitForChild("ShopTransfer"):InvokeServer(shopmode, shopitem) == true then
  1748. gui.ClickSound:Play()
  1749. gui.Shop.Confirm.Ok.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1750. wait(0.2)
  1751. gui.Shop.Confirm.Ok.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1752. gui.Shop.Confirm.Visible = false
  1753. if shopmode == true then
  1754. makeBuyList()
  1755. else
  1756. makeSellList()
  1757. end
  1758. else
  1759. gui.Err:Play()
  1760. end
  1761. end
  1762. shopselldeb = false
  1763. end)
  1764. local entering = false
  1765. do
  1766. local dialogdeb = false
  1767. local WeldPing = game.ReplicatedStorage:WaitForChild("ChangeWeld")
  1768. local WeldPing2 = game.ReplicatedStorage:WaitForChild("ChangeWeld2")
  1769. local ad = game.ReplicatedStorage.GuiPart:clone()
  1770. local activeModel = Module3D:Attach3D(Player.PlayerGui:WaitForChild("MenuAdorn").BG, ad)
  1771. getOwnerList = function(interior)
  1772. for _,v in pairs(gui.Homes.F:GetChildren()) do
  1773. if v.Name ~= "Base" then
  1774. v:remove()
  1775. end
  1776. end
  1777. local count = 0
  1778. local list = game.Players:GetPlayers()
  1779. do
  1780. gui.Homes.F.CanvasSize = UDim2.new(0, 0, 0, gui.Homes.F.Base.Size.Y.Scale * #list)
  1781. for _,v in pairs(list) do
  1782. if v.PlayerStats.Home.Value == interior and v.Name ~= Player.Name then
  1783. local Privacy = v.PlayerStats.PlayerHomePrivacy
  1784. -- DECOMPILER ERROR at PC104: Unhandled construct in 'MakeBoolean' P3
  1785.  
  1786. if Privacy.Value == "Everyone" or ((Privacy.Value == "Friends" and Player:IsFriendsWith(v.userId)) or Privacy.Value ~= "Party" or Player.Party.Value ~= v.Party.Value or Privacy.Value ~= "Guild" or PlayerStats.Guild.Value ~= v.PlayerStats.Guild.Value or PlayerStats.Guild.Value ~= 0) then
  1787. local newb = gui.Homes.F.Base:clone()
  1788. newb.Parent = gui.Homes.F
  1789. newb.Name = v.Name
  1790. newb.Text = v.Name .. "\'s Home"
  1791. newb.Position = UDim2.new(0, 0, 0, newb.Size.Y.Offset * count)
  1792. newb.Visible = true
  1793. count = count + 1
  1794. end
  1795. end
  1796. end
  1797. local debounce = false
  1798. for _,v in pairs(gui.Homes.F:children()) do
  1799. if v.Name ~= "Base" and v.Name ~= Player.Name then
  1800. v.MouseButton1Down:connect(function()
  1801. if debounce then
  1802. return
  1803. end
  1804. debounce = true
  1805. entering = true
  1806. gui.ClickSound:Play()
  1807. local home = loadinterior(game.Players[v.Name].PlayerStats.Home.Value, Player.Name)
  1808. home.Name = v.Name .. "\'s Home"
  1809. print(home.Name)
  1810. inside.Value = true
  1811. ginterior.Value = home.Name
  1812. game.ReplicatedStorage.IntValuesChanged:FireServer(true, home.Name)
  1813. gui.Homes.Visible = false
  1814. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.5, true)
  1815. local inside = Instance.new("StringValue", Player.Character)
  1816. inside.Name = "Inside"
  1817. wait(1)
  1818. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  1819. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  1820. Player.Character.Humanoid.WalkSpeed = 18
  1821. wait(1)
  1822. entering = false
  1823. end)
  1824. end
  1825. end
  1826. end
  1827. end
  1828.  
  1829. gui.Homes.Cancel.MouseButton1Down:connect(function()
  1830. gui.ClickSound:Play()
  1831. local cam = workspace.CurrentCamera
  1832. cam.CameraType = "Custom"
  1833. cam.CameraSubject = game.Players.LocalPlayer.Character.Humanoid
  1834. gui.Homes.Visible = false
  1835. Player.Character.Humanoid.WalkSpeed = 18
  1836. end)
  1837. gui.Homes.Enter.MouseButton1Down:connect(function()
  1838. if gui.Homes.Enter.TextLabel.Text == "Buy" then
  1839. if game.ReplicatedStorage:WaitForChild("BuyPH"):InvokeServer(proxitem.Interior.Value) == true then
  1840. gui.ClickSound:Play()
  1841. gui.Homes.Enter.TextLabel.Text = "Enter"
  1842. else
  1843. gui.Err:Play()
  1844. end
  1845. else
  1846. entering = true
  1847. gui.Homes.Visible = false
  1848. local cam = workspace.CurrentCamera
  1849. cam.CameraType = "Custom"
  1850. cam.CameraSubject = game.Players.LocalPlayer.Character.Humanoid
  1851. gui.ClickSound:Play()
  1852. local home = loadinterior(proxitem.Interior.Value, Player.Name)
  1853. home.Name = Player.Name .. "\'s Home"
  1854. inside.Value = true
  1855. ginterior.Value = home.Name
  1856. game.ReplicatedStorage.IntValuesChanged:FireServer(true, home.Name)
  1857. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.5, true)
  1858. local inside = Instance.new("StringValue", Player.Character)
  1859. inside.Name = "Inside"
  1860. wait(1)
  1861. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  1862. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  1863. Player.Character.Humanoid.WalkSpeed = 18
  1864. wait(1)
  1865. entering = false
  1866. end
  1867. end)
  1868. Editor = gui.Barber
  1869. hairs = game.ReplicatedStorage:WaitForChild("Char).Hair:GetChildren()
  1870. eyecolors = game.ReplicatedStorage.Char.EyeColor:GetChildren()
  1871. haircolors = {"Bright blue", "Bright orange", "Bright red", "Cool yellow", "Cyan", "Dark orange", "Dark stone grey", "Earth green", "Light reddish violet", "Medium green", "Medium red", "Medium stone grey", "Nougat", "Pastel light blue", "Pastel violet", "Pink", "Really black", "Reddish brown", "Sand red", "White", "Brown", "Dirt brown", "Dark taupe", "Really black", "Black", "Dark stone grey", "Smoky grey", "Ghost grey", "Institutional white", "Sand red", "Bright red", "Crimson", "Carnation pink", "Salmon", "Pastel orange", "Mulberry", "Lilac", "Sunrise", "Pastel yellow", " Cool yellow", "Daisy orange", "Bright blue", "Steel blue", "Cyan", "Deep orange", "Br.yellowish orange", "Bright yellow", "Dark green", "Moss", "Hot pink", "Really red", "Lime green", "Really blue", "New Yeller"}
  1872. skincolors = {"Brown", "Light orange", "Nougat", "Pastel brown"}
  1873. hairindex = 1
  1874. eyeindex = 1
  1875. haircolorindex = 1
  1876. skinindex = 1
  1877. hairindex2 = 1
  1878. BarberDevProduct = 107631798
  1879. hairindex = tonumber(PlayerStats.HairStyle.Value:match("%d+"))
  1880. hairindex2 = tonumber(PlayerStats.HairStyle2.Value:match("%d+"))
  1881. for i,v in pairs(eyecolors) do
  1882. if v.Name == PlayerStats.EyeColor.Value then
  1883. eyeindex = i
  1884. break
  1885. end
  1886. end
  1887. do
  1888. for i,v in pairs(haircolors) do
  1889. if v == PlayerStats.HairColor.Value then
  1890. haircolorindex = i
  1891. break
  1892. end
  1893. end
  1894. do
  1895. for i,v in pairs(skincolors) do
  1896. if v == PlayerStats.Skin.Value then
  1897. skinindex = i
  1898. break
  1899. end
  1900. end
  1901. do
  1902. preview = function()
  1903. UpdateCharacter()
  1904. Editor.Hair.Text = PlayerStats.HairStyle.Value:upper()
  1905. Editor.Hair2.Text = PlayerStats.HairStyle2.Value:upper()
  1906. Editor.Eyes.Text = PlayerStats.EyeColor.Value:upper() .. " EYES"
  1907. Editor.HairColor.Text = "HAIR COLOR: " .. PlayerStats.HairColor.Value:upper()
  1908. Editor.SkinColor.Text = "SKIN COLOR: " .. PlayerStats.Skin.Value:upper()
  1909. end
  1910.  
  1911. for _,b in pairs(Editor:GetChildren()) do
  1912. if b:IsA("TextButton") then
  1913. b.MouseButton1Down:connect(function()
  1914. gui.ClickSound:Play()
  1915. b.TextLabel:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.2, true)
  1916. wait(0.2)
  1917. b.TextLabel:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.2, true)
  1918. end)
  1919. end
  1920. end
  1921. ChangeApp = function(stat, val)
  1922. game.ReplicatedStorage:WaitForChild("ChangeApp"):InvokeServer(stat, val)
  1923. end
  1924.  
  1925. Editor.HairUp.MouseButton1Down:connect(function()
  1926. if hairindex < #hairs then
  1927. hairindex = hairindex + 1
  1928. else
  1929. hairindex = 1
  1930. end
  1931. ChangeApp("HairStyle", "Hair " .. hairindex)
  1932. preview()
  1933. end)
  1934. Editor.HairDown.MouseButton1Down:connect(function()
  1935. if hairindex > 1 then
  1936. hairindex = hairindex - 1
  1937. else
  1938. hairindex = #hairs
  1939. end
  1940. ChangeApp("HairStyle", "Hair " .. hairindex)
  1941. preview()
  1942. end)
  1943. Editor.HairUp2.MouseButton1Down:connect(function()
  1944. if hairindex2 < #hairs then
  1945. hairindex2 = hairindex2 + 1
  1946. else
  1947. hairindex2 = 1
  1948. end
  1949. ChangeApp("HairStyle2", "Hair " .. hairindex2)
  1950. preview()
  1951. end)
  1952. Editor.HairDown2.MouseButton1Down:connect(function()
  1953. if hairindex2 > 1 then
  1954. hairindex2 = hairindex2 - 1
  1955. else
  1956. hairindex2 = #hairs
  1957. end
  1958. ChangeApp("HairStyle2", "Hair " .. hairindex2)
  1959. preview()
  1960. end)
  1961. Editor.EyeUp.MouseButton1Down:connect(function()
  1962. if eyeindex < #eyecolors then
  1963. eyeindex = eyeindex + 1
  1964. else
  1965. eyeindex = 1
  1966. end
  1967. ChangeApp("EyeColor", eyecolors[eyeindex].Name)
  1968. preview()
  1969. end)
  1970. Editor.EyeDown.MouseButton1Down:connect(function()
  1971. if eyeindex > 1 then
  1972. eyeindex = eyeindex - 1
  1973. else
  1974. eyeindex = #eyecolors
  1975. end
  1976. ChangeApp("EyeColor", eyecolors[eyeindex].Name)
  1977. preview()
  1978. end)
  1979. Editor.HairColorUp.MouseButton1Down:connect(function()
  1980. if haircolorindex < #haircolors then
  1981. haircolorindex = haircolorindex + 1
  1982. else
  1983. haircolorindex = 1
  1984. end
  1985. ChangeApp("HairColor", haircolors[haircolorindex])
  1986. preview()
  1987. end)
  1988. Editor.HairColorDown.MouseButton1Down:connect(function()
  1989. if haircolorindex > 1 then
  1990. haircolorindex = haircolorindex - 1
  1991. else
  1992. haircolorindex = #haircolors
  1993. end
  1994. ChangeApp("HairColor", haircolors[haircolorindex])
  1995. preview()
  1996. end)
  1997. Editor.SkinColorUp.MouseButton1Down:connect(function()
  1998. if skinindex < #skincolors then
  1999. skinindex = skinindex + 1
  2000. else
  2001. skinindex = 1
  2002. end
  2003. ChangeApp("Skin", skincolors[skinindex])
  2004. preview()
  2005. end)
  2006. Editor.SkinColorDown.MouseButton1Down:connect(function()
  2007. if skinindex > 1 then
  2008. skinindex = skinindex - 1
  2009. else
  2010. skinindex = #skincolors
  2011. end
  2012. ChangeApp("Skin", skincolors[skinindex])
  2013. preview()
  2014. end)
  2015. Editor.Done.MouseButton1Down:connect(function()
  2016. Player.Character.Humanoid.WalkSpeed = 18
  2017. Editor.Visible = false
  2018. ChangeApp("CharMade", true)
  2019. UpdateCharacter()
  2020. end)
  2021. if Player.Character:FindFirstChild("SZ) then
  2022. _G.Zone = "Town"
  2023. end
  2024. gmgui.Changed:connect(function(property)
  2025. end)
  2026. local ChatService = game:GetService("Chat)
  2027. local blockanim = (Player.Character.Humanoid:LoadAnimation(script.Block))
  2028. local usanim = nil
  2029. local idleanim2 = Player.Character.Humanoid:LoadAnimation(script.DualIdle)
  2030. onKeyDown = function(key)
  2031. key = key:lower()
  2032. if key == "q" and Player.Character.Sword then
  2033. if swordequipped == false and not swordaction and not menutoggledopen and not menuopen and not Player.Character.Humanoid.Sit then
  2034. swordaction = true
  2035. if assets[PlayerStats.Weapon.Value].Value == "One-Handed" or assets[PlayerStats.Weapon.Value].Value == "Rapier" then
  2036. WeldPing:FireServer("One-Handed Held", "Right Arm")
  2037. else
  2038. if assets[PlayerStats.Weapon.Value].Value == "Dagger" then
  2039. WeldPing:FireServer("Dagger Held", "Right Arm")
  2040. else
  2041. if assets[PlayerStats.Weapon.Value].Value == "Two-Handed" then
  2042. WeldPing:FireServer("Two-Handed Held", "Right Arm")
  2043. end
  2044. end
  2045. end
  2046. if PlayerStats.DualWeapon.Value ~= "None" and assets[PlayerStats.DualWeapon.Value].Value == "One-Handed" and assets[PlayerStats.Weapon.Value].Value == "One-Handed" and PlayerStats["One-HandedSkill"].Value >= 250 then
  2047. WeldPing2:FireServer("One-Handed Held", "Left Arm")
  2048. end
  2049. -- DECOMPILER ERROR at PC158: Unhandled construct in 'MakeBoolean' P3
  2050.  
  2051. if (assets[PlayerStats.Weapon.Value].Value == "One-Handed" and not game:GetService("MarketplaceService"):PlayerOwnsAsset(Player, 1127853488) and not Player.Character:FindFirstChild("Sword2")) or assets[PlayerStats.Weapon.Value].Value == "Dagger" then
  2052. usanim = Player.Character.Humanoid:LoadAnimation(script.Unsheath)
  2053. else
  2054. if assets[PlayerStats.Weapon.Value].Value == "Two-Handed" or game:GetService("MarketplaceService"):PlayerOwnsAsset(Player, 1127853488) and assets[PlayerStats.Weapon.Value].Value ~= "Rapier" and assets[PlayerStats.Weapon.Value].Value ~= "Dagger" and not Player.Character:FindFirstChild("Sword2") then
  2055. usanim = Player.Character.Humanoid:LoadAnimation(script.Unsheath2)
  2056. else
  2057. if PlayerStats.DualWeapon.Value ~= "None" and assets[PlayerStats.Weapon.Value].Value == "One-Handed" and assets[PlayerStats.DualWeapon.Value].Value == "One-Handed" and Player.Character:FindFirstChild("Sword2") then
  2058. usanim = Player.Character.Humanoid:LoadAnimation(script.DualUnsheath)
  2059. end
  2060. end
  2061. end
  2062. usanim:Play()
  2063. local usc = script.Parent.US:clone()
  2064. do
  2065. usc.Parent = Player.Character.Sword.Middle
  2066. usc:Play()
  2067. wait(0.5)
  2068. usanim:Stop()
  2069. usc:remove()
  2070. if assets[PlayerStats.Weapon.Value].Value == "One-Handed" and Player.Character:FindFirstChild("Sword2") and assets[PlayerStats.DualWeapon.Value].Value == "One-Handed" then
  2071. idleanim2:Play()
  2072. else
  2073. idleanim:Play()
  2074. end
  2075. swordequipped = true
  2076. swordaction = false
  2077. end
  2078. else
  2079. do
  2080. if swordequipped == true and not swordaction then
  2081. swordaction = true
  2082. local sc = script.Parent.S:clone()
  2083. sc.Parent = Player.Character.Sword.Middle
  2084. sc:Play()
  2085. if assets[PlayerStats.Weapon.Value].Value == "One-Handed" and Player.Character:FindFirstChild("Sword2") and assets[PlayerStats.DualWeapon.Value].Value == "One-Handed" then
  2086. idleanim2:Stop()
  2087. else
  2088. idleanim:Stop()
  2089. end
  2090. if (assets[PlayerStats.Weapon.Value].Value == "One-Handed" and not game:GetService("MarketplaceService"):PlayerOwnsAsset(Player, 1127853488)) or assets[PlayerStats.Weapon.Value].Value == "Rapier" then
  2091. WeldPing:FireServer("One-Handed Sheath", "Torso")
  2092. else
  2093. if assets[PlayerStats.Weapon.Value].Value == "Dagger" then
  2094. WeldPing:FireServer("Dagger Sheath", "Torso")
  2095. else
  2096. if assets[PlayerStats.Weapon.Value].Value == "Two-Handed" or ((game:GetService("MarketplaceService"):PlayerOwnsAsset(Player, 1127853488) and assets[PlayerStats.Weapon.Value].Value ~= "Rapier") or PlayerStats["One-HandedSkill"].Value >= 250) then
  2097. WeldPing:FireServer("Two-Handed Sheath", "Torso")
  2098. end
  2099. end
  2100. end
  2101. if assets[PlayerStats.Weapon.Value].Value == "One-Handed" and Player.Character:FindFirstChild("Sword2") and assets[PlayerStats.DualWeapon.Value].Value == "One-Handed" then
  2102. WeldPing2:FireServer("Two-Handed Sheath2", "Torso")
  2103. end
  2104. wait(0.2)
  2105. sc:remove()
  2106. swordequipped = false
  2107. idleanim:Stop()
  2108. swordaction = false
  2109. end
  2110. do
  2111. if key == "c" and currentlyclashing and clashfolder ~= nil then
  2112. game.ReplicatedStorage:WaitForChild("InitClashing"):FireServer(2, clashfolder[Player.Name])
  2113. end
  2114. if key == "e" then
  2115. if not swordaction and swordequipped then
  2116. swordaction = true
  2117. blockanim:Play()
  2118. game.ReplicatedStorage:WaitForChild("BlockValue"):FireServer(true)
  2119. else
  2120. if swordaction and swordequipped then
  2121. swordaction = false
  2122. blockanim:Stop()
  2123. game.ReplicatedStorage:WaitForChild("BlockValue"):FireServer(false)
  2124. end
  2125. end
  2126. else
  2127. if key == "f" then
  2128. SwordSkill()
  2129. else
  2130. -- DECOMPILER ERROR at PC557: Unhandled construct in 'MakeBoolean' P1
  2131.  
  2132. if key == "x" and proxitem ~= nil then
  2133. if proxitem.Name == "Sign" then
  2134. gui.ClickSound:Play()
  2135. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.25, true)
  2136. wait(0.25)
  2137. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2138. ChatService:Chat(proxitem.ProxBase, proxitem.Text.Value, "Blue")
  2139. else
  2140. if proxitem.Name == "Barber" then
  2141. gui.ClickSound:Play()
  2142. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.25, true)
  2143. wait(0.25)
  2144. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2145. Player.Character.Humanoid.WalkSpeed = 0
  2146. Editor.Visible = true
  2147. preview()
  2148. else
  2149. if proxitem.Name == "Fishing" and not _G.Fishing and FishingCooldown <= math.abs(tick() - _G.LastFishingTick) then
  2150. _G.Fishing = true
  2151. gui.ClickSound:Play()
  2152. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.25, true)
  2153. wait(0.25)
  2154. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2155. game.ReplicatedStorage.FishingGame:Clone().Parent = Player.PlayerGui
  2156. else
  2157. if proxitem.Name == "TeleportDoor" and not entering then
  2158. Player.Character.Humanoid.WalkSpeed = 0
  2159. gui.ClickSound:Play()
  2160. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", 0.25, true)
  2161. delay(0.25, function()
  2162. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2163. end)
  2164. if Player.Character:FindFirstChild("Inside) then
  2165. entering = true
  2166. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2167. wait(1)
  2168. gui.Music:Stop()
  2169. Player.Character.Torso.CFrame = proxitem.T1.CFrame + Vector3.new(0, 2, 0)
  2170. exitinterior()
  2171. Player.Character.Inside:remove()
  2172. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0, "Out", "Quad", 0.5, true)
  2173. entering = false
  2174. else
  2175. loadinterior(proxitem.Interior.Value, Player.Nam)
  2176. entering = true
  2177. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2178. wait(1)
  2179. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  2180. local inside = Instance.new("StringValue", Player.Characte)
  2181. inside.Name = "Inside"
  2182. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  2183. entering = false
  2184. end
  2185. do
  2186. Player.Character.Humanoid.WalkSpeed = 18
  2187. if proxitem.Name == "Merchant" and not menutoggledopen and not menuopen then
  2188. gui.Shop.Confirm.Visible = false
  2189. gui.ClickSound:Play()
  2190. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0, "Out", "Quad", 0.25, true)
  2191. delay(0.25, function()
  2192. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2193. end)
  2194. if not shopping then
  2195. makeBuyList()
  2196. gui.Shop.Visible = true
  2197. shopping = true
  2198. else
  2199. gui.Shop.Visible = false
  2200. shopping = false
  2201. end
  2202. else
  2203. if proxitem.Name == "PlayerHome" and not entering then
  2204. gui.ClickSound:Play()
  2205. Player.Character.Humanoid.WalkSpeed = 0
  2206. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0, "Out", "Quad", 0.25, true)
  2207. delay(0.25, function()
  2208. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2209. end)
  2210. if Player.Character:FindFirstChild("Inside) then
  2211. entering = true
  2212. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2213. wait(1)
  2214. Player.Character.Torso.CFrame = proxitem.T1.CFrame + Vector3.new(0, 2, 0)
  2215. exitinterior()
  2216. Player.Character.Inside:remove()
  2217. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0, "Out", "Quad", 0.5, true)
  2218. Player.Character.Humanoid.WalkSpeed = 18
  2219. wait(1)
  2220. entering = false
  2221. else
  2222. workspace.CurrentCamera.CameraType = "Scriptable"
  2223. workspace.CurrentCamera:Interpolate(proxitem.One.CFram, proxitem.Two.CFrame, 0.5)
  2224. gui.Homes.Visible = true
  2225. gui.Homes.TL.Text = proxitem.Interior.Value
  2226. if Player.PlayerStats.Home.Value == proxitem.Interior.Value then
  2227. gui.Homes.Enter.TextLabel.Text = "Enter"
  2228. else
  2229. gui.Homes.Enter.TextLabel.Text = "Buy"
  2230. end
  2231. gui.Homes.Preview.Image = proxitem.Preview.Value
  2232. gui.Homes.Col.Text = "Col: " .. tostring(proxitem.Col.Value)
  2233. getOwnerList(proxitem.Interior.Value)
  2234. end
  2235. else
  2236. if proxitem.Name == "Door" and not entering then
  2237. Player.Character.Humanoid.WalkSpeed = 0
  2238. gui.ClickSound:Play()
  2239. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0, "Out", "Quad", 0.25, true)
  2240. delay(0.25, function()
  2241. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2242. end)
  2243. if proxitem.Place.Value ~= "Dungeon" and proxitem.Place.Value ~= "Boss" then
  2244. if Player.Character:FindFirstChild("Inside) then
  2245. entering = true
  2246. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2247. wait(1)
  2248. gui.Music:Stop()
  2249. Player.Character.Torso.CFrame = proxitem.T1.CFrame + Vector3.new(0, 2, 0)
  2250. Player.Character.Inside:remove()
  2251. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0, "Out", "Quad", 0.5, true)
  2252. entering = false
  2253. else
  2254. entering = true
  2255. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2256. wait(1)
  2257. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  2258. local inside = Instance.new("StringValue", Player.Characte)
  2259. inside.Name = "Inside"
  2260. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  2261. entering = false
  2262. end
  2263. else
  2264. do
  2265. if proxitem.Place.Value == "Dungeon" then
  2266. if Player.Character:FindFirstChild("Dungeon) then
  2267. entering = true
  2268. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2269. wait(1)
  2270. gui.Music:Stop()
  2271. Player.Character.Torso.CFrame = proxitem.T1.CFrame + Vector3.new(0, 2, 0)
  2272. Player.Character.Dungeon:remove()
  2273. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0, "Out", "Quad", 0.5, true)
  2274. _G.Zone = "Field"
  2275. entering = false
  2276. else
  2277. entering = true
  2278. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2279. wait(1)
  2280. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  2281. local inside = Instance.new("StringValue", Player.Characte)
  2282. inside.Name = "Dungeon"
  2283. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  2284. _G.Zone = "Dungeon"
  2285. entering = false
  2286. end
  2287. else
  2288. do
  2289. if proxitem.Place.Value == "Boss" then
  2290. if Player.Character:FindFirstChild("Boss) then
  2291. entering = true
  2292. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2293. wait(1)
  2294. gui.Music:Stop()
  2295. Player.Character.Torso.CFrame = proxitem.T1.CFrame + Vector3.new(0, 2, 0)
  2296. Player.Character.Boss:remove()
  2297. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0, "Out", "Quad", 0.5, true)
  2298. _G.Zone = "Dungeon"
  2299. entering = false
  2300. else
  2301. entering = true
  2302. gui.Black:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.5, true)
  2303. wait(1)
  2304. Player.Character.Torso.CFrame = proxitem.T2.CFrame + Vector3.new(0, 2, 0)
  2305. local inside = Instance.new("StringValue", Player.Characte)
  2306. inside.Name = "Boss"
  2307. gui.Black:TweenPosition(UDim2.new(0, 0, -1.2, 0), "Out", "Quad", 0.5, true)
  2308. _G.Zone = "Boss"
  2309. entering = false
  2310. end
  2311. end
  2312. do
  2313. Player.Character.Humanoid.WalkSpeed = 18
  2314. if proxitem.Name == "Smithing" and not menutoggledopen and not menuopen and not Player.PlayerGui:FindFirstChild("CraftingGame) then
  2315. gui.ClickSound:Play()
  2316. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0, "Out", "Quad", 0.25, true)
  2317. delay(0.25, function()
  2318. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0), "Out", "Quad", 0.25, true)
  2319. end)
  2320. craftmode.Value = "Smithing"
  2321. gui.Crafting.Visible = true
  2322. Player.Character.Humanoid.WalkSpeed = 0
  2323. else
  2324. if proxitem.Name == "NPCDialog" and not dialogdeb and not gui.Dialog.Visible then
  2325. dialogdeb = true
  2326. gui.ClickSound:Play()
  2327. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, 0, 0, "Out", "Quad", 0.25, true)
  2328. wait(0.25)
  2329. Player.PlayerGui.InteractionGui.Base.Frame.Key:TweenPosition(UDim2.new(0, 0, -0.2, 0, "Out", "Quad", 0.25, true)
  2330. local cam = workspace.CurrentCamera
  2331. local dialog = proxitem:WaitForChild("Dialog")
  2332. local camPart2 = proxitem:WaitForChild("CameraLook")
  2333. local oldCF = cam.CoordinateFrame
  2334. local oldFocus = cam.Focus
  2335. Player.Character.Humanoid.WalkSpeed = 0
  2336. Instance.new("IntValue", Player.Character).Name = "NoLockOn"
  2337. repeat
  2338. wait()
  2339. until cam.CameraType ~= "Scriptable"
  2340. cam.CameraType = "Scriptable"
  2341. cam:Interpolate(CFrame.new((Player.Character.Head.Position + camPart2.Position) / 2), camPart2.CFrame, 1)
  2342. local holder = gui.Dialog
  2343. local scroll = holder.Options.Scroll
  2344. local base = scroll.Base
  2345. local endDialog = function()
  2346. holder.Visible = false
  2347. holder.Talk.Text = ""
  2348. for _,v in pairs(scroll:children()) do
  2349. if v.Name ~= "Base" then
  2350. v:Remove()
  2351. end
  2352. end
  2353. cam:Interpolate(oldCF, oldFocus, 1)
  2354. wait(1)
  2355. Player.Character.Humanoid.WalkSpeed = 18
  2356. if Player.Character:FindFirstChild("NoLockOn") then
  2357. Player.Character.NoLockOn:Remove()
  2358. end
  2359. cam.CameraType = "Custom"
  2360. cam.CameraSubject = Player.Character.Humanoid
  2361. end
  2362.  
  2363. local getChoices = function(obj)
  2364. for _,v in pairs(scroll:children()) do
  2365. if v.Name ~= "Base" then
  2366. v:Remove()
  2367. end
  2368. end
  2369. local tab = obj:children()
  2370. do
  2371. scroll.CanvasSize = UDim2.new(0, 0, 0, 20 * #tab)
  2372. local choicedebounce = false
  2373. for i,v in pairs(tab) do
  2374. local new = base:Clone()
  2375. new.Visible = true
  2376. new.Name = v.Name
  2377. new.Text = v.UserDialog
  2378. new.Position = UDim2.new(0, 0, 0, 20 * (i - 1))
  2379. new.MouseButton1Click:connect(function()
  2380. if choicedebounce then
  2381. return
  2382. end
  2383. choicedebounce = true
  2384. if v:FindFirstChild("QuestStart") then
  2385. endDialog()
  2386. else
  2387. getChoices(v)
  2388. end
  2389. end)
  2390. new.Parent = scroll
  2391. end
  2392. local goodbye = base:Clone()
  2393. goodbye.Visible = true
  2394. goodbye.Name = "DialogChoice"
  2395. goodbye.Text = obj.GoodbyeDialog
  2396. goodbye.Position = UDim2.new(0, 0, 0, 20 * #tab)
  2397. goodbye.MouseButton1Click:connect(function()
  2398. if choicedebounce then
  2399. return
  2400. end
  2401. choicedebounce = true
  2402. endDialog()
  2403. end)
  2404. goodbye.Parent = scroll
  2405. if obj.Name ~= "Dialog" or not obj.InitialPrompt then
  2406. local text = obj.ResponseDialog
  2407. end
  2408. for i = 1, #text, 2 do
  2409. if choicedebounce then
  2410. return
  2411. end
  2412. holder.Talk.Text = text:sub(1, i)
  2413. gui.TXTSound:Play()
  2414. wait()
  2415. end
  2416. holder.Talk.Text = text
  2417. end
  2418. end
  2419.  
  2420. holder.Visible = true
  2421. dialogdeb = false
  2422. getChoices(dialog)
  2423. else
  2424. do
  2425. do
  2426. if proxitem.Name == "GMConsole" then
  2427. local cam = workspace.CurrentCamera
  2428. if gmgui.Adornee then
  2429. gmgui.Adornee = nil
  2430. gmgui.Close:Play()
  2431. gmgui.Ambience:Stop()
  2432. Player.CameraMode = 0
  2433. ForceModal.Modal = false
  2434. Player.Character.Humanoid.WalkSpeed = 18
  2435. wait(0.)
  2436. cam:Interpolate(gmOldCameraCF, gmOldCameraFocus, 0.25)
  2437. wait(0.)
  2438. FixCamera()
  2439. else
  2440. gmgui.Adornee = proxitem.MainScreen
  2441. gmgui.Open:Play()
  2442. gmgui.Ambience:Play()
  2443. gmOldCameraCF = cam.CoordinateFrame
  2444. gmOldCameraFocus = cam.Focus
  2445. Player.CameraMode = 1
  2446. ForceModal.Modal = true
  2447. Player.Character.Humanoid.WalkSpeed = 0
  2448. cam.CameraType = "Scriptable"
  2449. cam:Interpolate(CFrame.new(proxitem.CameraStart.Position, proxitem.MainScreen.Position), CFrame.new(proxitem.MainScreen.Position), 0.25)
  2450. end
  2451. for _,v in pairs(proxitem:children() do
  2452. if v:FindFirstChild("Decal) and (not gmgui.Adornee or not 0.25) then
  2453. do
  2454. v.Decal.Transparency = v.Name ~= "Screen" or 1
  2455. -- DECOMPILER ERROR at PC1902: LeaveBlock: unexpected jumping out IF_THEN_STMT
  2456.  
  2457. -- DECOMPILER ERROR at PC1902: LeaveBlock: unexpected jumping out IF_STMT
  2458.  
  2459. end
  2460. end
  2461. end
  2462. end
  2463. if key:byte() == 9 and not swordaction and not shopping and not craftingnow then
  2464. if menutoggledopen then
  2465. menutoggledclose = true
  2466. menutoggledopen = false
  2467. menuopen = true
  2468. else
  2469. if menutoggledclose then
  2470. menutoggledopen = true
  2471. menutoggledclose = false
  2472. menuopen = false
  2473. end
  2474. end
  2475. if menuopen == false and not swordequipped and not swordaction and not shopping and not craftingnow then
  2476. menutoggledopen = true
  2477. menutoggledclose = false
  2478. activeModel:SetActive(tru)
  2479. gui.Up:Play()
  2480. clearFrames()
  2481. clearMidFrames()
  2482. menugui.InfoImage.Visible = true
  2483. menugui.Menus.Position = UDim2.new(0., 0, 0.1, 0)
  2484. menugui.InfoImage.Position = UDim2.new(0.0, 0, 0.15, 0)
  2485. menugui:TweenPosition(UDim2.new(menugui.Position.X.Scale, menugui.Position.X.Offset, 0.5, -(mgsize.Y / 2), "Out", "Quad", 0.075, true)
  2486. coroutine.resume(coroutine.create(function()
  2487. for i = 1, 35 do
  2488. if menutoggledclose or workspace.CurrentCamera.m.GuiPart.Transparency <= 0.65 then
  2489. workspace.CurrentCamera.m.GuiPart.Transparency = 0.65
  2490. return
  2491. end
  2492. workspace.CurrentCamera.m.GuiPart.Transparency = workspace.CurrentCamera.m.GuiPart.Transparency - 0.01
  2493. wait(0.01)
  2494. end
  2495. end))
  2496. gui.Switch.Modal = true
  2497. clearFrames()
  2498. menugui.InfoImage.PName.Text = Player.Name:upper()
  2499. menugui.InfoImage.Col.Text = "Col: " .. PlayerStats.Col.Value
  2500. if PlayerStats.Guild.Value ~= 0 then
  2501. guildinfo = groupservice:GetGroupInfoAsync(PlayerStats.Guild.Valu)
  2502. menugui.InfoImage.Image = guildinfo.EmblemUrl
  2503. else
  2504. menugui.InfoImage.Image = infoimg
  2505. end
  2506. menuopen = true
  2507. menutoggledopen = false
  2508. end
  2509. menutoggledclose = true
  2510. menutoggledopen = false
  2511. menuopen = false
  2512. clearFrames()
  2513. gui.Switch.Modal = false
  2514. gui.Down:Play()
  2515. menugui:TweenPosition(UDim2.new(menugui.Position.X.Scale, menugui.Position.X.Offset, -1, 0, "Out", "Quad", 1, true)
  2516. for i = 1, 35 do
  2517. if menutoggledopen or workspace.CurrentCamera.m.GuiPart.Transparency >= 1 then
  2518. workspace.CurrentCamera.m.GuiPart.Transparency = 1
  2519. return
  2520. end
  2521. workspace.CurrentCamera.m.GuiPart.Transparency = workspace.CurrentCamera.m.GuiPart.Transparency + 0.01
  2522. wait(0.01)
  2523. end
  2524. workspace.CurrentCamera.m.GuiPart.Transparency = 1
  2525. activeModel:SetActive(fals)
  2526. menuopen = false
  2527. menutoggledclose = false
  2528. else
  2529. if key:byte() == 48 and not sprinting and not sprintdeb and not Player.Character.Humanoid.Sit and Player.Character.Humanoid.WalkSpeed > 0 and stamina.Value >= 10 then
  2530. sprinting = true
  2531. sprintdeb = true
  2532. local SprintSpeed = 28
  2533. local SprintFOV = 85
  2534. for i = workspace.CurrentCamera.FieldOfView, SprintFOV, 2 do
  2535. if not sprinting then
  2536. return
  2537. end
  2538. workspace.CurrentCamera.FieldOfView = i
  2539. wait()
  2540. end
  2541. if not sprinting then
  2542. return
  2543. end
  2544. workspace.CurrentCamera.FieldOfView = SprintFOV
  2545. Player.Character.Humanoid.WalkSpeed = SprintSpeed
  2546. while sprinting and not Player.Character.Humanoid.Sit and Player.Character.Humanoid.WalkSpeed == SprintSpeed and stamina.Value > 0 do
  2547. wait(0.1)
  2548. if not sprinting or Player.Character.Humanoid.Sit or Player.Character.Humanoid.WalkSpeed ~= SprintSpeed or stamina.Value == 0 then
  2549. KeyUp(key)
  2550. return
  2551. end
  2552. stamina.Value = stamina.Value - 1
  2553. end
  2554. KeyUp(key)
  2555. else
  2556. do
  2557. if key == "z" and Player.Party.Value ~= "" and CanZSwitch then
  2558. CanZSwitch = false
  2559. local Head = Player.Character.Head
  2560. local Torso = Player.Character.Torso
  2561. game.ReplicatedStorage:WaitForChild("ZSwitching"):FireServer(true)
  2562. game:service("Chat"):Chat(Head, "Switch!", "Blue")
  2563. local Vel = Instance.new("BodyVelocity")
  2564. Vel.P = 1000
  2565. Vel.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
  2566. Vel.Velocity = Torso.CFrame.lookVector * -100
  2567. Vel.Parent = Torso
  2568. coroutine.resume(coroutine.create(function()
  2569. while Vel.Parent and wait() do
  2570. local Start = Torso.Position
  2571. local End = Start + Torso.CFrame.lookVector * -5
  2572. local Ray = Ray.new(Start, Start - End.unit * 5)
  2573. local Obj, Pos = workspace:FindPartOnRayWithIgnoreList(Ray, {Player.Character}, false, true)
  2574. if Obj then
  2575. Vel:Remove()
  2576. Torso.Velocity = Vector3.new()
  2577. Torso.RotVelocity = Vector3.new()
  2578. end
  2579. end
  2580. end))
  2581. delay(0.2, function()
  2582. Vel:Remove()
  2583. end)
  2584. game.ReplicatedStorage:WaitForChild("ZSwitching):FireServer(fals)
  2585. Mates.Switch.Bar:TweenSize((UDim2.new(0, 0, , ), nil, nil, 0., tru)
  2586. wait(0.2)
  2587. for i = 1, 30 do
  2588. wait()
  2589. Mates.Switch.Bar:TweenSize((UDim2.new(i / 30, 0, 1, 0), nil, nil, 0.2, true)
  2590. end
  2591. CanZSwitch = true
  2592. end
  2593. end
  2594. end
  2595. end
  2596. end
  2597. end
  2598. end
  2599. end
  2600. end
  2601. end
  2602. end
  2603. end
  2604. end
  2605. end
  2606. end
  2607. end
  2608. end
  2609. end
  2610. end
  2611. end
  2612. end
  2613. end
  2614. end
  2615. end
  2616. end
  2617. end
  2618. end
  2619. end
  2620. end
  2621.  
  2622. mouse.KeyDown:connect(onKeyDown)
  2623. KeyUp = function(key)
  2624. key = key:lower()
  2625. if key:byte() == 48 and sprinting and not sprintdeb2 then
  2626. sprinting = false
  2627. sprintdeb2 = true
  2628. if Player.Character.Humanoid.WalkSpeed > 0 then
  2629. Player.Character.Humanoid.WalkSpeed = 18
  2630. end
  2631. for i = workspace.CurrentCamera.FieldOfView, 70, -2 do
  2632. workspace.CurrentCamera.FieldOfView = i
  2633. wait()
  2634. end
  2635. workspace.CurrentCamera.FieldOfView = 70
  2636. sprintdeb = false
  2637. sprintdeb2 = false
  2638. end
  2639. end
  2640.  
  2641. mouse.KeyUp:connect(KeyUp)
  2642. slashing = false
  2643. slash = function()
  2644. if Player.Character:FindFirstChild("Sword") and not Player.Character:FindFirstChild("Sword2") and not swordaction then
  2645. swordaction = true
  2646. local pick = math.random(1, #swordsounds)
  2647. local pick2 = math.random(1, #script.SwordSlashes[assets[PlayerStats.Weapon.Value].Value]:GetChildren())
  2648. local newsound = script.SwordSounds[swordsounds[pick].Name]:clone()
  2649. newsound.Parent = Player.Character.Sword.Middle
  2650. newsound:Play()
  2651. local newanim = Player.Character.Humanoid:LoadAnimation(script.SwordSlashes[assets[PlayerStats.Weapon.Value].Value]:GetChildren()[pick2])
  2652. newanim:Play()
  2653. local gripparent = script.SwordSlashes[assets[PlayerStats.Weapon.Value].Value]:GetChildren()[pick2]
  2654. local swordtype = assets[PlayerStats.Weapon.Value].Value
  2655. WeldPing:FireServer(gripparent.Grip.Value, "Right Arm")
  2656. wait(0.6)
  2657. if swordtype ~= "Rapier" then
  2658. WeldPing:FireServer(swordtype .. " Held", "Right Arm")
  2659. else
  2660. WeldPing:FireServer("One-Handed Held", "Right Arm")
  2661. end
  2662. newanim:Stop()
  2663. newsound:remove()
  2664. swordaction = false
  2665. else
  2666. do
  2667. if Player.Character:FindFirstChild("Sword") and Player.Character:FindFirstChild("Sword2") and PlayerStats.DualWeapon.Value ~= "None" and PlayerStats["One-HandedSkill"].Value >= 250 and not swordaction then
  2668. swordaction = true
  2669. game.ReplicatedStorage:WaitForChild("InitClashing"):FireServer()
  2670. local pick = math.random(1, #swordsounds)
  2671. local pick2 = math.random(1, #script.SwordSlashes["Dual-Handed"]:GetChildren())
  2672. local newsound = script.SwordSounds[swordsounds[pick].Name]:clone()
  2673. newsound.Parent = Player.Character.Sword.Middle
  2674. newsound:Play()
  2675. local newanim = Player.Character.Humanoid:LoadAnimation(script.SwordSlashes["Dual-Handed"]:GetChildren()[pick2])
  2676. newanim:Play()
  2677. wait(0.6)
  2678. newanim:Stop()
  2679. newsound:remove()
  2680. swordaction = false
  2681. end
  2682. end
  2683. end
  2684. end
  2685.  
  2686. selecteditem = nil
  2687. selectedpickup = nil
  2688. mouse.Button1Down:connect(function()
  2689. if not candamage and not slashing and swordequipped then
  2690. slashing = true
  2691. candamage = true
  2692. slash()
  2693. slashing = false
  2694. candamage = false
  2695. end
  2696. local igpclone = game.ReplicatedStorage.ItemGuiPart:clone()
  2697. local hit, pos = customMouse.getTarget(32, {Player.Character}, false)
  2698. if not hit or not pos then
  2699. return
  2700. end
  2701. if (hit.Name == "Base" or hit.Name == "Middle") and hit.Parent.Name == "ItemPickup" then
  2702. if workspace.CurrentCamera:FindFirstChild("ItemGuiPart") then
  2703. Player.PlayerGui.ItemGui.Adornee = nil
  2704. workspace.CurrentCamera.ItemGuiPart:remove()
  2705. end
  2706. selecteditem = hit.Parent.Item.Value
  2707. selectedpickup = hit.Parent
  2708. igpclone.Parent = workspace
  2709. igpclone.CFrame = CFrame.new(hit.Position + Vector3.new(0, 3.5, 0), workspace.CurrentCamera.CoordinateFrame.p)
  2710. igpclone.Parent = workspace.CurrentCamera
  2711. if hit.Parent:FindFirstChild("Col") then
  2712. hit.Parent.Col.Value = assets[hit.Parent.Item.Value].Worth.Value
  2713. end
  2714. Player.PlayerGui.ItemGui.Adornee = igpclone
  2715. Player.PlayerGui.ItemGui.Back.NL.Text = hit.Parent.Item.Value
  2716. Player.PlayerGui.ItemGui.Back.Owner.Text = "Owner: Server"
  2717. if hit.Parent:FindFirstChild("Col") then
  2718. Player.PlayerGui.ItemGui.Back.TakeL.Text = "Buy For " .. tostring(hit.Parent.Col.Value) .. " Col"
  2719. Player.PlayerGui.ItemGui.Back.Take.Visible = false
  2720. Player.PlayerGui.ItemGui.Back.Buy.Visible = true
  2721. end
  2722. end
  2723. end)
  2724. ig = Player.PlayerGui.ItemGui
  2725. ig.Back.Buy.MouseButton1Down:connect(function()
  2726. if game.ReplicatedStorage:WaitForChild("ShopTransfer"):InvokeServer(true, selectedpickup.Item.Value) == true then
  2727. selectedpickup = nil
  2728. selecteditem = nil
  2729. if workspace.CurrentCamera:FindFirstChild("ItemGuiPart") then
  2730. workspace.CurrentCamera.ItemGuiPart:remove()
  2731. end
  2732. gui.Bag:Play()
  2733. else
  2734. gui.Err:Play()
  2735. selectedpickup = nil
  2736. if workspace.CurrentCamera:FindFirstChild("ItemGuiPart") then
  2737. workspace.CurrentCamera.ItemGuiPart:remove()
  2738. end
  2739. end
  2740. end)
  2741. ig.Back.Inspect.MouseButton1Down:connect(function()
  2742. if selectedpickup ~= nil then
  2743. inspect(selectedpickup.Item.Value)
  2744. end
  2745. end)
  2746. findThingWithinDistance = function(distance)
  2747. for _,v in pairs(workspace.Interactions:GetChildren()) do
  2748. if v:FindFirstChild("ProxBase") and not Player.Character:FindFirstChild("Inside") and Player.Character.Torso.CFrame.p - v.ProxBase.CFrame.p.magnitude <= distance then
  2749. proxitem = v
  2750. return v
  2751. end
  2752. if v:FindFirstChild("ProxBase") and Player.Character:FindFirstChild("Inside") and Player.Character.Torso.CFrame.p - v.ProxBase.CFrame.p.magnitude <= distance then
  2753. proxitem = v
  2754. return v
  2755. end
  2756. if v:FindFirstChild("ProxBase2") and Player.Character:FindFirstChild("Inside") and Player.Character.Torso.CFrame.p - v.ProxBase2.CFrame.p.magnitude <= distance then
  2757. proxitem = v
  2758. return v
  2759. end
  2760. if v:FindFirstChild("ProxBase2") and Player.Character:FindFirstChild("Dungeon") and _G.Zone == "Dungeon" and Player.Character.Torso.CFrame.p - v.ProxBase2.CFrame.p.magnitude <= distance then
  2761. proxitem = v
  2762. return v
  2763. end
  2764. if v:FindFirstChild("ProxBase2") and Player.Character:FindFirstChild("Boss") and _G.Zone == "Boss" and Player.Character.Torso.CFrame.p - v.ProxBase2.CFrame.p.magnitude <= distance then
  2765. proxitem = v
  2766. return v
  2767. end
  2768. end
  2769. return false
  2770. end
  2771.  
  2772. local level = PlayerStats.Level
  2773. local exp = PlayerStats.EXP
  2774. local StatsEvent = game.ReplicatedStorage:WaitForChild("StatsEvent")
  2775. local StatsCache = {}
  2776. ProtectStats = function(Plr, Folder)
  2777. if not StatsCache[Plr] then
  2778. StatsCache[Plr] = {}
  2779. end
  2780. for _,v in pairs(Folder:children()) do
  2781. do
  2782. StatsCache[Plr][v.Name] = v.Value
  2783. v.Changed:connect(function(value)
  2784. if value ~= StatsCache[Plr][v.Name] then
  2785. v.Value = StatsCache[Plr][v.Name]
  2786. end
  2787. end)
  2788. end
  2789. end
  2790. end
  2791.  
  2792. StatsEvent.OnClientEvent:connect(function(...)
  2793. local Args = {...}
  2794. if Args[1] == "UpdateStat" then
  2795. local Affected = Args[2]
  2796. local Name = Args[3]
  2797. local Value = Args[4]
  2798. if not StatsCache[Affected] then
  2799. StatsCache[Affected] = {}
  2800. end
  2801. StatsCache[Affected][Name] = Value
  2802. if Affected:FindFirstChild("PlayerStats") and Affected.PlayerStats:FindFirstChild(Name) then
  2803. Affected.PlayerStats[Name].Value = Value
  2804. end
  2805. if Affected == Player then
  2806. if Name == "Level" then
  2807. gui.LevelSound:Play()
  2808. else
  2809. if Name:find("Skill") then
  2810. listSwordSkills()
  2811. else
  2812. if Name == "Inventory" then
  2813. listInv(invfilter, true)
  2814. end
  2815. end
  2816. end
  2817. end
  2818. if Name == "PlayerHomePrivacy" and gui.Homes.Visible and proxitem and proxitem:FindFirstChild("Interior") then
  2819. getOwnerList(proxitem.Interior.Value)
  2820. end
  2821. end
  2822. end)
  2823. game.Players.ChildAdded:connect(function(child)
  2824. if child:IsA("Player") then
  2825. ProtectStats(child, child:WaitForChild("PlayerStats"))
  2826. end
  2827. end)
  2828. coroutine.resume(coroutine.create(function()
  2829. for _,v in pairs(game.Players:GetPlayers()) do
  2830. ProtectStats(v, v:WaitForChild("PlayerStats"))
  2831. end
  2832. end))
  2833. game.ReplicatedStorage:WaitForChild("PurchaseMade).OnClientEvent:connect(function(...)
  2834. local Args = {...}
  2835. if Args[1] == "Barber" then
  2836. Player.Character.Humanoid.WalkSpeed = 0
  2837. Editor.Visible = true
  2838. preview()
  2839. end
  2840. end)
  2841. game.ReplicatedStorage:WaitForChild("LootDrop).OnClientEvent:connect(function(...)
  2842. local Args = {...}
  2843. if Args[1] == "ShowLoot" then
  2844. local Exp = Args[2]
  2845. do
  2846. local Col = Args[3]
  2847. local Amount = Args[4]
  2848. local Part = game.ReplicatedStorage:WaitForChild("LootGuiPart"):Clone()
  2849. local Back = Part.SurfaceGui.Back
  2850. if MPService:PlayerOwnsAsset(Player, 1149834979) then
  2851. Exp = Exp * 2
  2852. end
  2853. Back.Exp.Text = Exp
  2854. Back.Col.Text = Col
  2855. Back.Items.Text = Amount
  2856. local Torso = Player.Character.Torso
  2857. local Pos = Torso.CFrame + Torso.CFrame.lookVector * 3.p
  2858. Part.CFrame = CFrame.new(Pos, workspace.CurrentCamera.CoordinateFrame.p)
  2859. Part.Parent = workspace
  2860. delay(4, function()
  2861. Part:Destroy()
  2862. end)
  2863. while Part and Part.Parent and wait() do
  2864. Part.CFrame = CFrame.new(Pos, workspace.CurrentCamera.CoordinateFrame.)
  2865. end
  2866. end
  2867. end
  2868. end)
  2869. game.ReplicatedStorage:WaitForChild("StopSound).OnClientEvent:connect(function(Sound)
  2870. if type(Sound) == "userdata" then
  2871. Sound:Stop()
  2872. else
  2873. if type(Sound) == "table" then
  2874. for _,v in pairs(Sound) do
  2875. v:Stop()
  2876. end
  2877. end
  2878. end
  2879. end)
  2880. game.ReplicatedStorage:WaitForChild("StaminaUpdate).OnClientEvent:connect(function(Arg)
  2881. if Arg == "SetToFull" then
  2882. stamina.Value = PlayerStats:WaitForChild("MaxStamina").Value
  2883. end
  2884. end)
  2885. local StatusEffectImages = {Paralysis = "rbxassetid://330727828", Poison = "rbxassetid://172815017", Bleeding = ""}
  2886. local ActiveEffects = {}
  2887. UpdateStatusEffects = function()
  2888. local Amount = #gui.Health.Effects:children()
  2889. for i = 1, Amount do
  2890. gui.Health.Effects[i].Image = ""
  2891. end
  2892. local Index = 1
  2893. for Type,Active in pairs(ActiveEffects) do
  2894. if Active then
  2895. gui.Health.Effects[Index].Image = StatusEffectImages[Type]
  2896. Index = Index + 1
  2897. end
  2898. end
  2899. end
  2900.  
  2901. game.ReplicatedStorage:WaitForChild("StatusEffect").OnClientEvent:connect(function(Mode, Type)
  2902. ActiveEffects[Type] = ((Mode ~= "Add" or Mode == "Remove") and false)
  2903. if Mode == "Add" then
  2904. if Type == "Poison" then
  2905. Player.Character.HealthRegen.Toggle:FireServer(false)
  2906. elseif Type == "Bleeding" then
  2907. Player.Character.HealthRegen.Toggle:FireServer(false)
  2908. end
  2909. elseif Mode == "Remove" then
  2910. if Type == "Paralysis" then
  2911. human.PlatformStand = false
  2912. elseif Type == "Poison" and not ActiveEffects.Bleeding then
  2913. Player.Character.HealthRegen.Toggle:FireServer(true)
  2914. elseif Type == "Bleeding" and not ActiveEffects.Poison then
  2915. Player.Character.HealthRegen.Toggle:FireServer(true)
  2916. end
  2917. end
  2918. UpdateStatusEffects()
  2919. -- DECOMPILER ERROR: 8 unprocessed JMP targets
  2920. end)
  2921. human.Changed:connect(function(prop)
  2922. if prop == "PlatformStand" and ActiveEffects.Paralysis then
  2923. human.PlatformStand = true
  2924. end
  2925. end)
  2926. local Mobs = workspace:WaitForChild("Mobs)
  2927. local SelectBar = function(Num, Player, Parts)
  2928. do
  2929. local Multiple = not Parts or Parts > 5
  2930. for _,v in pairs(HBFolder[Player]:children()) do
  2931. local Number = tonumber(v.Name)
  2932. if Number then
  2933. if Number == Num then
  2934. v.Transparency = 0
  2935. elseif not Multiple or (Number % 5 == 0 or not 0) then
  2936. do
  2937. v.Transparency = Number >= Num or 1
  2938. if Num < Number then
  2939. v.Transparency = 1
  2940. end
  2941. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_THEN_STMT
  2942.  
  2943. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_STMT
  2944.  
  2945. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  2946.  
  2947. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_STMT
  2948.  
  2949. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_THEN_STMT
  2950.  
  2951. -- DECOMPILER ERROR at PC39: LeaveBlock: unexpected jumping out IF_STMT
  2952.  
  2953. end
  2954. end
  2955. end
  2956. end
  2957. -- DECOMPILER ERROR: 8 unprocessed JMP targets
  2958. end
  2959. end
  2960.  
  2961. RepImages = {"rbxassetid://318393081", "rbxassetid://318393143", "rbxassetid://318393179"}
  2962. MatProg = gui.Collecting
  2963. Mat = workspace:WaitForChild("Materials")
  2964. OreInterval = 5
  2965. TreeInterval = 10
  2966. PlantInterval = 1
  2967. MatDebounce = false
  2968. for _,v in pairs(Mat:GetChildren()) do
  2969. if #Mat:GetChildren() ~= 0 then
  2970. v.C.D.MouseClick:connect(function()
  2971. if v.Owner.Value == "" and v.Core.Transparency == 0 and not MatDebounce then
  2972. MatDebounce = true
  2973. Player.Character.Humanoid.WalkSpeed = 0
  2974. game.ReplicatedStorage.ClaimMaterial:FireServer(v.Id.Value)
  2975. local interval = 0
  2976. local sound = nil
  2977. if v:FindFirstChild("Ore") then
  2978. interval = OreInterval
  2979. sound = gui.Mining
  2980. else
  2981. if v:FindFirstChild("Tree") then
  2982. interval = TreeInterval
  2983. sound = gui.Chopping
  2984. else
  2985. interval = PlantInterval
  2986. sound = gui.End
  2987. end
  2988. end
  2989. MatProg.Visible = true
  2990. MatProg.TextLabel.Text = "Obtaining " .. v.Name .. "..."
  2991. MatProg.Progress.Bar:TweenSize(UDim2.new(1, 0, 1, 0), "Out", "Quad", interval, true)
  2992. sound:Play()
  2993. wait(interval)
  2994. game.ReplicatedStorage.ToggleMaterial:FireServer(v.Id.Value)
  2995. sound:Stop()
  2996. gui.Bag:Play()
  2997. MatProg.Progress.Bar:TweenSize(UDim2.new(0, 0, 1, 0), "Out", "Quad", 0.5, true)
  2998. MatProg.TextLabel.Text = "Obtained " .. v.Name .. "!"
  2999. wait(0.5)
  3000. MatProg.Visible = false
  3001. Player.Character.Humanoid.WalkSpeed = 18
  3002. MatDebounce = false
  3003. end
  3004. end)
  3005. end
  3006. end
  3007. local OptionsDeb = {}
  3008. local PassiveModePass = 1114443847
  3009. local PartyInviteFilter = {"All", "Friends", "None"}
  3010. local PlayerHomePrivacy = {"Everyone", "Friends", "Party", "Guild", "Locked"}
  3011. for _,v in pairs(menugui.Frames.Options.Frame:children()) do
  3012. if v:IsA("TextButton") then
  3013. OptionsDeb[v] = false
  3014. v.MouseButton1Click:connect(function()
  3015. if OptionsDeb[v] then
  3016. return
  3017. end
  3018. OptionsDeb[v] = true
  3019. gui.ClickSound:Play()
  3020. if v.Name == "ToggleHair" then
  3021. game.ReplicatedStorage:WaitForChild("ChangeOption"):InvokeServer("HairStatus", not PlayerStats.HairStatus.Value)
  3022. UpdateCharacter()
  3023. else
  3024. if v.Name == "TogglePassive" then
  3025. if not MPService:PlayerOwnsAsset(Player, PassiveModePass) then
  3026. MPService:PromptPurchase(Player, PassiveModePass)
  3027. wait(0.5)
  3028. OptionsDeb[v] = false
  3029. return
  3030. end
  3031. if not checkSafeZone() or _G.Zone ~= "Town" then
  3032. Notification("Option Change Failed", "You must be in a safezone to change your passive mode.", "rbxassetid://268373553", nil)
  3033. wait(0.5)
  3034. OptionsDeb[v] = false
  3035. return
  3036. end
  3037. game.ReplicatedStorage:WaitForChild("ChangeOption"):InvokeServer("PassiveMode", not PlayerStats.PassiveMode.Value)
  3038. UpdateCharacter()
  3039. else
  3040. if v.Name == "PartyInviteFilter" then
  3041. local Current = PlayerStats.PartyInviteFilter.Value
  3042. for i,v in pairs(PartyInviteFilter) do
  3043. if Current:lower() == v:lower() then
  3044. if not PartyInviteFilter[i + 1] then
  3045. local New = PartyInviteFilter[1]
  3046. end
  3047. game.ReplicatedStorage:WaitForChild("ChangeOption"):InvokeServer("PartyInviteFilter", New)
  3048. break
  3049. end
  3050. end
  3051. else
  3052. do
  3053. if v.Name == "PlayerHomePrivacy" then
  3054. local Current = PlayerStats.PlayerHomePrivacy.Value
  3055. for i,v in pairs(PlayerHomePrivacy) do
  3056. if Current:lower() == v:lower() then
  3057. if not PlayerHomePrivacy[i + 1] then
  3058. local New = PlayerHomePrivacy[1]
  3059. end
  3060. game.ReplicatedStorage:WaitForChild("ChangeOption"):InvokeServer("PlayerHomePrivacy", New)
  3061. break
  3062. end
  3063. end
  3064. end
  3065. do
  3066. wait(0.5)
  3067. OptionsDeb[v] = false
  3068. end
  3069. end
  3070. end
  3071. end
  3072. end
  3073. end)
  3074. end
  3075. end
  3076. Player.Character.Humanoid.Died:connect(function()
  3077. if ginterior.Value ~= "" then
  3078. exitinterior()
  3079. end
  3080. inside.Value = false
  3081. ginterior.Value = ""
  3082. game.ReplicatedStorage.IntValuesChanged:FireServer(false, "")
  3083. if checkSafeZone() == true then
  3084. _G.Zone = "Town"
  3085. else
  3086. _G.Zone = "Field"
  3087. end
  3088. if workspace.CurrentCamera:FindFirstChild("m") then
  3089. workspace.CurrentCamera.m:Destroy()
  3090. end
  3091. end)
  3092. Player.PlayerGui.GameGui.TradeInvite.Options.No.MouseButton1Down:connect(function()
  3093. local v = "Reset"
  3094. game.ReplicatedStorage.TradeInvite:FireServer(v)
  3095. end)
  3096. while 1 do
  3097. wait(0.025)
  3098. if Player.Trader.Value ~= "None" then
  3099. local man = game.Players:GetPlayerByUserId(Player.Trader.Valu)
  3100. Player.PlayerGui.GameGui.TradeInvite.Content.Text = man.Name .. " has invited you trade."
  3101. Player.PlayerGui.GameGui.TradeInvite.Visible = true
  3102. else
  3103. do
  3104. Player.PlayerGui.GameGui.TradeInvite.Visible = false
  3105. gui.Health.Health.Ring.Rotation = gui.Health.Health.Ring.Rotation + 1
  3106. if findThingWithinDistance(8) then
  3107. local thing = proxitem
  3108. if thing.Name == "Sign" then
  3109. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3110. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Read Sign"
  3111. end
  3112. if thing.Name == "Merchant" then
  3113. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3114. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Speak to Merchant"
  3115. end
  3116. if thing.Name == "Barber" then
  3117. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3118. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Change Character"
  3119. end
  3120. if thing.Name == "Door" then
  3121. if Player.Character:FindFirstChild("Inside) then
  3122. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase2
  3123. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Place.Value
  3124. else
  3125. if Player.Character:FindFirstChild("Dungeon) and _G.Zone == "Dungeon" then
  3126. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase2
  3127. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Place.Value
  3128. else
  3129. if Player.Character:FindFirstChild("Boss) and _G.Zone == "Boss" then
  3130. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase2
  3131. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Place.Value
  3132. else
  3133. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3134. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Enter " .. thing.Place.Value
  3135. end
  3136. end
  3137. end
  3138. end
  3139. if thing.Name == "PlayerHome" then
  3140. if Player.Character:FindFirstChild("Inside) then
  3141. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase2
  3142. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Interior.Value
  3143. else
  3144. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3145. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Enter " .. thing.Interior.Value
  3146. end
  3147. end
  3148. if thing.Name == "GuildHome" and Player.PlayerStats.Guild.Value == thing.Guild.Value then
  3149. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3150. if Player.Character:FindFirstChild("Inside) then
  3151. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Interior.Value
  3152. else
  3153. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Enter " .. thing.Interior.Value
  3154. end
  3155. end
  3156. if thing.Name == "TeleportDoor" then
  3157. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3158. if Player.Character:FindFirstChild("Inside) then
  3159. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Exit " .. thing.Interior.Value
  3160. else
  3161. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Enter " .. thing.Interior.Value
  3162. end
  3163. end
  3164. if thing.Name == "Smithing" then
  3165. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3166. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = "Blacksmithing"
  3167. end
  3168. if thing.Name == "Fishing" and not _G.Fishing then
  3169. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3170. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = FishingCooldown <= math.abs(tick() - _G.LastFishingTic) and "Start Fishing" or "5 minute cooldown"
  3171. end
  3172. if thing.Name == "NPCDialog" then
  3173. if not gui.Dialog.Visible then
  3174. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3175. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = thing.InteractText.Value
  3176. else
  3177. Player.PlayerGui.InteractionGui.Adornee = nil
  3178. end
  3179. end
  3180. if thing.Name == "GMConsole" then
  3181. Player.PlayerGui.InteractionGui.Adornee = thing.ProxBase
  3182. Player.PlayerGui.InteractionGui.Base.TextLabel.Text = not gmgui.Adornee and "Open GM Console" or "Close GM Console"
  3183. end
  3184. else
  3185. do
  3186. Player.PlayerGui.InteractionGui.Adornee = nil
  3187. proxitem = nil
  3188. shopping = false
  3189. gui.Shop.Visible = false
  3190. do
  3191. if gui.Homes.Visible then
  3192. local cam = workspace.CurrentCamera
  3193. cam.CameraType = "Custom"
  3194. cam.CameraSubject = game.Players.LocalPlayer.Character.Humanoid
  3195. gui.Homes.Visible = false
  3196. Player.Character.Humanoid.WalkSpeed = 18
  3197. end
  3198. if workspace.CurrentCamera:FindFirstChild("ItemGuiPart) then
  3199. workspace.CurrentCamera.ItemGuiPart.CFrame = CFrame.new(workspace.CurrentCamera.ItemGuiPart.Positio, workspace.CurrentCamera.CoordinateFrame.p)
  3200. end
  3201. gui.Health.NameLabel.Text = string.upper(Player.Nam) .. " | HP:" .. math.floor(Player.Character.Humanoid.Health) .. "/" .. Player.Character.Humanoid.MaxHealth
  3202. menugui.InfoImage.Col.Text = "Col: " .. tostring(PlayerStats.Col.Valu)
  3203. menugui.InfoImage.Exp.Text = "EXP: " .. tostring(exp.Valu) .. "/" .. tostring(neededExp(level.Value))
  3204. menugui.InfoImage.Level.Text = "Level: " .. tostring(level.Valu)
  3205. gui.Health.AP.TextLabel.Text = "AP - " .. tostring(gui.AP.Valu) .. "/300"
  3206. gui.Health.AP.Bar.Size = UDim2.new(gui.AP.Value / 30, , 1, 0)
  3207. gui.Health.Stamina.TextLabel.Text = "Stamina - " .. gui.Stamina.Value .. "/" .. PlayerStats.MaxStamina.Value
  3208. gui.Health.Stamina.Bar.Size = UDim2.new(gui.Stamina.Value / PlayerStats.MaxStamina.Valu, , 1, 0)
  3209. if not RepImages[PlayerStats.Rep.Value + 1] then
  3210. gui.Health.Rep.Image = RepImages[1]
  3211. gui.Health.PassiveMode.Visible = PlayerStats.PassiveMode.Value
  3212. if Player.Character:FindFirstChild("BlockValue) and Player.Character.BlockValue.Value and (not swordequipped or not swordaction) then
  3213. game.ReplicatedStorage:WaitForChild("BlockValue):FireServer(fals)
  3214. end
  3215. for i = 1, 3 do
  3216. local Person = Mates:FindFirstChild(i)
  3217. if Person.PlayerName.Text ~= "" then
  3218. local Find = game.Players:FindFirstChild(Person.PlayerName.Tex)
  3219. if Find and Find.Character and Find.Character:FindFirstChild("Humanoid") then
  3220. local Human = Find.Character.Humanoid
  3221. Person.Health.Base:TweenPosition(UDim2.new(Human.Health / Human.MaxHealth - 1, 0, 0, 0), "Out", "Quad", 0.1, true, nil)
  3222. Person.Health.Base.Bar:TweenPosition(UDim2.new(1 - Human.Health / Human.MaxHealth, 0, 0, 0), "Out", "Quad", 0.1, true, nil)
  3223. if Human.Health <= Human.MaxHealth * 0.3 then
  3224. Person.Health.Base.Bar.ImageColor3 = Color3.new(1, 0, 0)
  3225. else
  3226. if Human.MaxHealth * 0.3 < Human.Health and Human.Health < Human.MaxHealth * 0.7 then
  3227. Person.Health.Base.Bar.ImageColor3 = Color3.new(1, 0.66666666666667, 0)
  3228. else
  3229. if Human.MaxHealth * 0.7 <= Human.Health then
  3230. Person.Health.Base.Bar.ImageColor3 = Color3.new(1, 1, 1)
  3231. end
  3232. end
  3233. end
  3234. end
  3235. end
  3236. end
  3237. if Party.Value ~= "" then
  3238. Mates.Switch.Visible = true
  3239. else
  3240. Mates.Switch.Visible = false
  3241. end
  3242. for _,v in pairs(game.Players:GetPlayers()) do
  3243. if v:FindFirstChild("PlayerStats) and v.Character and v.Character:FindFirstChild("Head) and v.Character:FindFirstChild("Humanoid) and 0 < v.Character.Humanoid.Health and v.Character.Parent ~= game.Lighting and (HBFolder:FindFirstChild(v.Nam)) == nil and v.Name ~= Player.Name then
  3244. local HB = createHB(v.Name, tru)
  3245. local HW = HB.GuiPart.HeadWeld
  3246. HW.Part0 = v.Character.Head
  3247. HW.Part1 = HB.GuiPart
  3248. end
  3249. end
  3250. for _,v in pairs(Mobs:GetChildren()) do
  3251. local IsBoss = (v:FindFirstChild("IsBoss) and false)
  3252. local HB = createHB(v.Nam, false, v.Mob.Value, IsBoss)
  3253. HB.Rep.BrickColor = BrickColor.new("Really red")
  3254. local HW = HB.GuiPart.HeadWeld
  3255. HW.Part0 = v.Head
  3256. HW.Part1 = HB.GuiPart
  3257. end
  3258. for _,h in pairs(HBFolder:GetChildren()) do
  3259. local plr = game.Players:FindFirstChild(h.Nam)
  3260. if h:FindFirstChild("GuiPart") and h.GuiPart:FindFirstChild("HeadWeld") then
  3261. if plr and h:FindFirstChild("IsPlayer") then
  3262. local stats = plr:FindFirstChild("PlayerStats")
  3263. if stats and plr.Character and plr.Character:FindFirstChild("Head") and plr.Character:FindFirstChild("Humanoid") and 0 < plr.Character.Humanoid.Health and plr.Character.Parent ~= game.Lighting then
  3264. local hpos = plr.Character.Head.Position
  3265. local CJ = CFrame.new(hpos)
  3266. local New = CFrame.new(hpos + Vector3.new(0.4, 2.4, 0), workspace.CurrentCamera.CoordinateFrame.p)
  3267. h.GuiPart.HeadWeld.C0 = plr.Character.Head.CFrame:inverse() * CJ
  3268. h.GuiPart.HeadWeld.C1 = New:inverse() * CJ
  3269. local hum = plr.Character.Humanoid
  3270. local hp = hum.Health
  3271. local max = hum.MaxHealth
  3272. local percent = hp / max * 100
  3273. if 0 <= percent and percent < 20 then
  3274. SelectBar(1, h.Name)
  3275. elseif 20 <= percent and percent < 40 then
  3276. SelectBar(2, h.Name)
  3277. elseif 40 <= percent and percent < 60 then
  3278. SelectBar(3, h.Name)
  3279. elseif 60 <= percent and percent < 80 then
  3280. SelectBar(4, h.Name)
  3281. elseif 80 <= percent then
  3282. SelectBar(5, h.Name)
  3283. end
  3284. if (stats.Rep.Value ~= 0 or not "Lime green") and (stats.Rep.Value ~= 1 or not "Deep orange") then
  3285. do
  3286. do
  3287. h.Rep.BrickColor = BrickColor.new(not stats:FindFirstChild("Rep") or "Really red")
  3288. if stats:FindFirstChild("PassiveMode") then
  3289. h.GuiPart2.PassiveMode.ImageLabel.Visible = stats.PassiveMode.Value
  3290. end
  3291. h:Destroy()
  3292. do
  3293. do
  3294. local mob = Mobs:FindFirstChild(h.Name)
  3295. if mob and mob:FindFirstChild("Head") and mob:FindFirstChild("Humanoid") and 0 < mob.Humanoid.Health then
  3296. local hpos = mob.Head.Position
  3297. local CJ = CFrame.new(hpos)
  3298. local New = CFrame.new(hpos + Vector3.new(0.4, 2.4, 0), workspace.CurrentCamera.CoordinateFrame.p)
  3299. h.GuiPart.HeadWeld.C0 = mob.Head.CFrame:inverse() * CJ
  3300. h.GuiPart.HeadWeld.C1 = New:inverse() * CJ
  3301. local hum = mob.Humanoid
  3302. local hp = hum.Health
  3303. local max = hum.MaxHealth
  3304. local percent = hp / max * 100
  3305. local bars = nil
  3306. if mob:FindFirstChild("IsBoss") then
  3307. bars = 3
  3308. else
  3309. bars = 1
  3310. end
  3311. local parts = 100 / (5 * bars)
  3312. local nextpercent = 0
  3313. for i = 1, 5 * bars do
  3314. nextpercent = nextpercent + parts
  3315. local current = nextpercent - parts
  3316. if 100 - parts <= percent then
  3317. SelectBar(5 * bars, h.Name, 5 * bars)
  3318. break
  3319. elseif current <= percent and percent < nextpercent then
  3320. SelectBar(i, h.Name, 5 * bars)
  3321. end
  3322. end
  3323. else
  3324. h:Destroy()
  3325. end
  3326. h:Destroy()
  3327. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out DO_STMT
  3328.  
  3329. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out DO_STMT
  3330.  
  3331. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out DO_STMT
  3332.  
  3333. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_THEN_STMT
  3334.  
  3335. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_STMT
  3336.  
  3337. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_THEN_STMT
  3338.  
  3339. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_STMT
  3340.  
  3341. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_THEN_STMT
  3342.  
  3343. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_STMT
  3344.  
  3345. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_THEN_STMT
  3346.  
  3347. -- DECOMPILER ERROR at PC2990: LeaveBlock: unexpected jumping out IF_STMT
  3348.  
  3349. end
  3350. end
  3351. end
  3352. end
  3353. end
  3354. end
  3355. end
  3356. end
  3357. end
  3358. for _,v in pairs(menugui.Frames.Stats.Frame:children()) do
  3359. if v:IsA("TextLabel) and PlayerStats:FindFirstChild(v.Nam) then
  3360. local Stat = PlayerStats[v.Name]
  3361. v.Text = v.Name .. " | " .. Stat.Value .. (v.Name:find("Skill") and "/500" or "")
  3362. end
  3363. end
  3364. for _,c in pairs(game.Players:GetChildren()) do
  3365. -- DECOMPILER ERROR at PC3095: Unhandled construct in 'MakeBoolean' P1
  3366.  
  3367. if c ~= game.Players.LocalPlayer and c:FindFirstChild("Inside) and c.Inside.Value == true and c:WaitForChild("Interior).Value ~= ginterior.Value and c.Character and c.Character.Parent ~= game.Lighting then
  3368. c.Character.Torso.CFrame = CFrame.new(math.random(100, 50000), math.random(10000, 50000), math.random(100, 50000))
  3369. c.Character.Parent = game.Lighting
  3370. end
  3371. if c.Character and c.Character.Parent ~= workspace then
  3372. c.Character.Parent = workspace
  3373. c.Character:MakeJoints()
  3374. end
  3375. if c.Character and c.Character.Parent ~= workspace then
  3376. c.Character.Parent = workspace
  3377. c.Character:MakeJoints()
  3378. end
  3379. end
  3380. menugui.Frames.Options.Frame.ToggleHair.TextLabel.Text = "Hair [" .. (PlayerStats.HairStatus.Value and "ON" or "OFF") .. "]"
  3381. menugui.Frames.Options.Frame.TogglePassive.TextLabel.Text = "Passive Mode [" .. (PlayerStats.PassiveMode.Value and "ON" or "OFF") .. "]"
  3382. menugui.Frames.Options.Frame.PartyInviteFilter.TextLabel.Text = "Party Invite Filter [" .. PlayerStats.PartyInviteFilter.Value:upper() .. "]"
  3383. menugui.Frames.Options.Frame.PlayerHomePrivacy.TextLabel.Text = "Player Home Privacy [" .. PlayerStats.PlayerHomePrivacy.Value:upper() .. "]"
  3384. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_THEN_STMT
  3385.  
  3386. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_STMT
  3387.  
  3388. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out DO_STMT
  3389.  
  3390. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out DO_STMT
  3391.  
  3392. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  3393.  
  3394. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_STMT
  3395.  
  3396. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out DO_STMT
  3397.  
  3398. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_ELSE_STMT
  3399.  
  3400. -- DECOMPILER ERROR at PC3209: LeaveBlock: unexpected jumping out IF_STMT
  3401.  
  3402. end
  3403. end
  3404. end
  3405. end
  3406. end
  3407. end
  3408. end
  3409. end
  3410. -- DECOMPILER ERROR: 31 unprocessed JMP targets
  3411. end
  3412. end
  3413. end
  3414. end
  3415. end
  3416. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement