MADE BY KylnDantas
FEATURE:
OPEN SOURCE HUB
GAME LINK:
GRAND PIECE ONLINE
SCRIPT:
repeat wait() until game.Players.LocalPlayer
if not getgenv().tvk then getgenv().tvk={} end
for k,v in pairs(getgenv().tvk) do v.On=false end
local plr = game.Players.LocalPlayer
local queue_on_teleport = queue_on_teleport
if syn then queue_on_teleport = syn.queue_on_teleport end
queue_on_teleport([[
loadstring(game:HttpGet("https://raw.githubusercontent.com/CFA-HUB/CFAHub-Free/main/cfahubfree.lua"))()
]])
local NguyHiem=false
local Settings = {
AutoStat = {
Strength = false,
Stamina = false,
Defense = false,
GunMastery = false,
SwordMastery = false
}
}
local Temp = {
Nodrown = {},
Noclip = {},
DashNoStam = {},
NoFallDame = {},
Drown={}
}
function TableToSave(tb)
local cac = {}
for k,v in pairs(tb) do
if type(v)=="vector" then
cac[k]={v.X,v.Y,v.Z,"Vector3"}
else
cac[k]=v
end
end
return cac
end
function SaveToTable(tb)
local cac = {}
for k,v in pairs(tb) do
if type(v)=="table" and #v==4 and v[4]=="Vector3" then
cac[k]=Vector3.new(v[1],v[2],v[3])
else
cac[k]=v
end
end
return cac
end
local SaveFileName = plr.Name.."_GPO.json"
function SaveSettings()
local HttpService = game:GetService("HttpService")
if not isfolder("CFA HUB") then
makefolder("CFA HUB")
end
writefile("CFA HUB/" .. SaveFileName, HttpService:JSONEncode(TableToSave(Settings)))
end
function ReadSetting()
local s,e = pcall(function()
local HttpService = game:GetService("HttpService")
if not isfolder("CFA HUB") then
makefolder("CFA HUB")
end
return HttpService:JSONDecode(readfile("CFA HUB/" .. SaveFileName))
end)
if s then return e
else
SaveSettings()
return ReadSetting()
end
end
local tvkdumb = {On=true}
function tvkdumb:cac(self)
spawn(function()
while wait(1) and self.On do SaveSettings() end
print("Stoped")
end)
end
tvkdumb:cac(tvkdumb)
table.insert(getgenv().tvk,tvkdumb)
Settings = SaveToTable(ReadSetting())
repeat wait() until game:IsLoaded()
repeat wait(.25)
until plr:FindFirstChild("Loaded")
and plr.Loaded.Value == true
and plr.Character
and plr:FindFirstChild("Backpack")
and plr.Character:FindFirstChild("Humanoid")
and plr:FindFirstChild("PlayerGui")
and plr.PlayerGui:FindFirstChild("Notifications")
and #plr.Backpack:GetChildren() ~= 0 and pcall(function()
return game.Players.LocalPlayer.Idled
end)
local function FireButton(x)
for i, v in pairs(getconnections(x.MouseButton1Click)) do
v:Function()
end
end
if game.PlaceId==1730877806 then
repeat wait() until game:GetService("ReplicatedStorage").Events:FindFirstChild("reserved")
if Settings.PSCode and Settings.PSCode~="" then
local clicked = false
while wait(2) do
game:GetService("ReplicatedStorage").Events.reserved:InvokeServer(Settings.PSCode)
pcall(function()
FireButton(game:GetService("Players").LocalPlayer.PlayerGui.chooseType.Frame.regular)
clicked=true
end)
end
else
while wait(2) do
game:GetService("ReplicatedStorage").Events.playgame:FireServer()
end
end
return
end
local plr = game.Players.LocalPlayer
local rnd = tostring(math.random(1,100000))
local request=request
if syn then request=syn.request end
local StoringDF = false
for i, v in next, getconnections(game.Players.LocalPlayer.Idled) do
v:Disable()
end
local vu = game:GetService("VirtualUser")
game:GetService("Players").LocalPlayer.Idled:connect(
function()
vu:Button2Down(Vector2.new(0, 0), workspace.CurrentCamera.CFrame)
wait(1)
vu:Button2Up(Vector2.new(0, 0), workspace.CurrentCamera.CFrame)
end
)
local SwordPos = CFrame.new(5410.0478515625, 155.58578491210938, -5168.189453125)
function BuyKatana()
fireclickdetector(game:GetService("Workspace").BuyableItems.Katana.ShopPart.ClickDetector)
end
local FindNearest
for k, v in pairs(getgc()) do
if debug.getinfo(v).name == "FindNearest" and tostring(getfenv(v).script) == "Hitbox" then
FindNearest = v
break
end
end
if not FindNearest then
game.Players.LocalPlayer:Kick("Script error when loading, rejoin and try again")
end
MucTieu = {}
MucTieu.old =
hookfunction(
FindNearest,
function(a, b)
if MucTieu.MucTieu then
return MucTieu.MucTieu
end
return MucTieu.old(a, b)
end
)
local secure_call = (syn and syn.secure_call) or function(f)
setthreadcontext(2)
f()
setthreadcontext(7)
end
local old = getrenv()._G.hitbox.start
getrenv()._G.hitbox.start = function(...)
local arg = {...}
arg[3] = Vector3.new(30, 30, 30)
return old(unpack(arg))
end
local data = game.ReplicatedStorage["Stats" .. game.Players.LocalPlayer.Name]
print(data.Stats.SpawnPoint.Value)
local FarmPath = {
Buso = {
[1] = {
Mob = "Yeti",
RiflePos = CFrame.new(-6770.1044921875, 96.480255126953, 2113.1389160156),
Mobpos = CFrame.new(-6684.44, 10, 1828.623),
Questpos = CFrame.new(-6566.0034179688, 169.4822845459, 1995.3051757813),
Quest = "Road to Armament",
Spawn = CFrame.new(-1314.5081787109, 10.434856414795, 1113.4360351563),
Island = "Sandora",
LevelReq = 80,
CooldownY = 52.4,
SwordY = 68,
LevelRequest = 80,
RapidY = 70
}
},
Melee = {
Normal = {
[1] = {
Mob = "Fishman Karate User",
Mobpos = CFrame.new(7670.65137, -2189.93994, -17322.8379, 1, 0, 0, 0, 1, 0, 0, 0, 1),
Questpos = CFrame.new(
7730.92773,
-2175.83203,
-17222.5781,
0.0217917003,
-7.93145247e-08,
0.999762535,
-3.60022554e-08,
1,
8.01180988e-08,
-0.999762535,
-3.77396141e-08,
0.0217917003
),
Quest = "Help becky",
Spawn = CFrame.new(
7976.84131,
-2152.8313,
-17073.9063,
0.647454381,
1.1295689e-07,
0.762104213,
-4.50578455e-08,
1,
-1.09937709e-07,
-0.762104213,
3.68408735e-08,
0.647454381
),
Island = "Fishman Island",
LevelReq = 190,
SwordY = -2182.94,
BlackLegY = -2182.94,
CooldownY=-2189.94,
RapidY=-2182.94
}
},
Advance = {
[160] = {
Mob = "Gravito's Undermen",
Mobpos = CFrame.new(2718.87573, 60.1180725, -15689.9375, -0.965884089, -1.76300429e-19, 0.25897485, -1.13688492e-19, 1, 2.56745101e-19, -0.25897485, 2.18543522e-19, -0.965884089),
Questpos = CFrame.new(2510.30103, 41.4681244, -15541.5859, 0.996558726, -4.13273469e-08, 0.0828894675, 3.50337892e-08, 1, 7.73815572e-08, -0.0828894675, -7.42113357e-08, 0.996558726),
Quest = "Help Miska",
Spawn = CFrame.new(2585.16138, 7.64981413, -15364.9072, 0.999508381, 4.34313142e-06, 0.0313485563, -5.47222771e-06, 0.99999994, 3.59315163e-05, -0.0313485563, -3.60853955e-05, 0.999508381),
Island = "Gravito's Fort",
LevelReq = 160,
SwordY = 31.861898422241,
BlackLegY = 34.6,
CooldownY=7.6498141288757,
RapidY=35.39432144165,
BlackLegPos = CFrame.new(2604.27148, 37.3680725, -15549.2383, 0.999779046, -3.19521938e-08, -0.0210261438, 3.2335997e-08, 1, 1.79135871e-08, 0.0210261438, -1.85895299e-08, 0.999779046)
},
}
},
Rifle = {
Normal = {
[1] = {
Mob = "Fishman Karate User",
Mobpos = CFrame.new(
7824.5166,
-2138.18994,
-17138.4766,
0.916648865,
0,
0.399693429,
0,
1,
0,
-0.399693429,
0,
0.916648865
),
Questpos = CFrame.new(
7730.92773,
-2175.83203,
-17222.5781,
0.0217917003,
-7.93145247e-08,
0.999762535,
-3.60022554e-08,
1,
8.01180988e-08,
-0.999762535,
-3.77396141e-08,
0.0217917003
),
Quest = "Help becky",
LevelRequest = 190,
Spawn = CFrame.new(
7976.84131,
-2152.8313,
-17073.9063,
0.647454381,
1.1295689e-07,
0.762104213,
-4.50578455e-08,
1,
-1.09937709e-07,
-0.762104213,
3.68408735e-08,
0.647454381
),
Island = "Fishman Island"
}
},
Advance = {
[160] = {
Mob = "Gravito's Undermen",
Mobpos = CFrame.new(2718.87573, 60.1180725, -15689.9375, -0.965884089, -1.76300429e-19, 0.25897485, -1.13688492e-19, 1, 2.56745101e-19, -0.25897485, 2.18543522e-19, -0.965884089),
Questpos = CFrame.new(2510.30103, 41.4681244, -15541.5859, 0.996558726, -4.13273469e-08, 0.0828894675, 3.50337892e-08, 1, 7.73815572e-08, -0.0828894675, -7.42113357e-08, 0.996558726),
Quest = "Help Miska",
LevelRequest = 160,
Spawn = CFrame.new(2585.16138, 7.64981413, -15364.9072, 0.999508381, 4.34313142e-06, 0.0313485563, -5.47222771e-06, 0.99999994, 3.59315163e-05, -0.0313485563, -3.60853955e-05, 0.999508381),
Island = "Gravito's Fort"
}
}
}
}
FarmPath.Rifle.Advance[1]=FarmPath.Rifle.Normal[1]
FarmPath.Melee.Advance[1]=FarmPath.Melee.Normal[1]
local lvadd=190
FarmPath.Rifle.Advance[lvadd]=FarmPath.Rifle.Advance[1]
FarmPath.Melee.Advance[lvadd]=FarmPath.Melee.Advance[1]
function CheckQuest(a, b, d)
if d == "Buso" then
return FarmPath.Buso[1]
end
local index = math.huge
local questchecker
local level = data.Stats.Level.Value
local path = FarmPath.Melee
if a == "Rifle" then
path = FarmPath.Rifle
end
if b then
path=path.Advance
else
path=path.Normal
end
for i, v in pairs(path) do
if (level - i) >= 0 then
if (level - i) < math.abs(level - index) then
index = i
end
end
end
return path[index]
end
function CheckEN(str)
local cac = Temp[str]
for k, v in pairs(cac) do
if v then
return true
end
end
return false
end
function SetEN(str, cac, rac)
Temp[str][cac] = rac
end
function IsFishMan(pos)
return pos.Y < -2000
end
local thieunang =
CFrame.new(
-1287.51025,
62.1618462,
248.200958,
0.160935402,
-3.94616087e-31,
0.98696506,
-1.16209818e-31,
1,
4.18777198e-31,
-0.98696506,
-1.8209114e-31,
0.160935402
)
if setfflag then
setfflag("HumanoidParallelRemoveNoPhysics", "False")
setfflag("HumanoidParallelRemoveNoPhysicsNoSimulate2", "False")
end
local banvaudau = 0
function SetVaoDau(i)
banvaudau=i
end
function GetVauDau()
return banvaudau
end
local DisableNoDrown = false
local old
old = hookfunction(Instance.new("RemoteEvent").FireServer, function(...)
local Self = ...
if CheckEN("Nodrown")
and tostring(Self) == "swim" then
return nil
end
return old(...)
end)
local old
old = hookmetamethod(game, "__namecall", function(...)
local Self = ...
if CheckEN("NoFallDame")
and tostring(Self) == "FallDmg" then
return nil
end
if CheckEN("DashNoStam")
and tostring(Self) == "takestam" then
return nil
end
if CheckEN("Nodrown")
and tostring(Self) == "swim" then
return nil
end
local args = {...}
if getnamecallmethod()=="InvokeServer" and tostring(Self)=="Skill" and args[2]=="Blocking " then
return
end
if tostring(Self)=="CIcklcon" then
SetVaoDau(GetVauDau()+1)
if Settings.RifleKick then
if GetVaoDau()>480 then
plr:Kick("\n[CFA Hub]\nKicked 499th rifle shoot (Rifle Kick)")
end
end
end
return old(...)
end)
local tvktrumskid = tostring(math.random(0, 100000))
local TweenFloatVelocity = Vector3.new(0,0,0)
function CreateTweenFloat()
local BV = plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid) or Instance.new("BodyVelocity")
BV.Parent = plr.Character.HumanoidRootPart
BV.Name = tvktrumskid
BV.MaxForce = Vector3.new(100000, 100000, 100000)
BV.Velocity = TweenFloatVelocity
end
function TweenFloat(tvk)
if tvk and not plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid..tvktrumskid) then
local BV = Instance.new("BodyVelocity")
BV.Parent = plr.Character.HumanoidRootPart
BV.Name = tvktrumskid..tvktrumskid
BV.MaxForce = Vector3.new(100000, 100000, 100000)
BV.Velocity = Vector3.new(0, 0, 0)
else
if not tvk and plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid..tvktrumskid) then
plr.Character.HumanoidRootPart[tvktrumskid..tvktrumskid]:Destroy()
end
end
end
function QuayNgang(pos)
local bulon = CFrame.new(pos.X,pos.Y,pos.Z,-0.008880537, 0.999960601, -6.28793302e-08, -5.37608429e-08, -5.96046448e-08, -0.99999994, -0.999960601, -0.008880537, 6.35593764e-08)
return bulon
end
function GetAllState()
local cac = {}
for k,v in pairs(Enum.HumanoidStateType:GetEnumItems()) do
if plr.Character:FindFirstChild("Humanoid") then
cac[v]=plr.Character.Humanoid:GetStateEnabled(v)
end
end
return cac
end
function SetAllState(rac)
local cac = {}
for k,v in pairs(Enum.HumanoidStateType:GetEnumItems()) do
if plr.Character:FindFirstChild("Humanoid") then
plr.Character.Humanoid:SetStateEnabled(v,rac)
end
end
return cac
end
local speaker = game.Players.LocalPlayer
local StopFloat=false
game:GetService("RunService").Stepped:Connect(
function()
if StopFloat then
if plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid) then
plr.Character.HumanoidRootPart[tvktrumskid]:Destroy()
end
end
if game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid").Health > 0 and
game.Players.LocalPlayer.Character.Parent == game.Workspace.PlayerCharacters and
not plr.PlayerGui:FindFirstChild("DEATHGUI") then
if CheckEN("Noclip") then
if (not setfflag or (identifyexecutor and identifyexecutor():upper() == "KRNL")) then
if
speaker.Character ~= nil and CheckEN("Noclip") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid").Health > 0 and
game.Players.LocalPlayer.Character.Parent == game.Workspace.PlayerCharacters and
not plr.PlayerGui:FindFirstChild("DEATHGUI")
then
if not StopFloat then
CreateTweenFloat()
end
for _, child in pairs(speaker.Character:GetDescendants()) do
if child:IsA("BasePart") and child.CanCollide == true then
child.CanCollide = false
end
end
else
if plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid) then
plr.Character.HumanoidRootPart[tvktrumskid]:Destroy()
end
end
else
if CheckEN("Noclip") then
if not StopFloat then
plr.Character.Humanoid:ChangeState(11)
end
for _, child in pairs(plr.Character:GetDescendants()) do
if child:IsA("BasePart") and child.CanCollide == true then
child.CanCollide = false
end
end
end
end
else
if plr.Character.HumanoidRootPart:FindFirstChild(tvktrumskid) then
plr.Character.HumanoidRootPart[tvktrumskid]:Destroy()
end
end
end
pcall(
function()
-- if CheckEN("Nodrown") then
-- plr.Character.HumanoidRootPart.SwimPosition.Position = Vector3.new(0, -2.71834, 0)
-- end
if CheckEN("Nodrown") and not DisableNoDrown then
plr.Character.HumanoidRootPart.SwimPosition.Position = Vector3.new(0, -2.71834, 0)
end
if CheckEN("Drown") then
plr.Character.HumanoidRootPart.SwimPosition:Destroy()
end
end
)
end
)
--local vt = 100
if not Settings.vt then Settings.vt=80 end
function RayCast2(a, b, c)
local ignored = {game.Players.LocalPlayer.Character, game:GetService("Workspace").Effects, part0}
local raycastParameters = RaycastParams.new()
raycastParameters.FilterDescendantsInstances = ignored
raycastParameters.FilterType = Enum.RaycastFilterType.Blacklist
raycastParameters.IgnoreWater = false
local rels = workspace:Raycast(a, b, raycastParameters)
return rels
end
function IsSea()
local t = RayCast2(game.Players.LocalPlayer.Character.HumanoidRootPart.Position, Vector3.new(0, -500, 0))
--print(t.Instance)
if t == nil or t.Instance.Name == "InvisSandd" then
return true
end
return false
end
local tvk = function(f) f() end
local plr = game:service "Players".LocalPlayer
local tween_s = game:service "TweenService"
function Tween2(t, cb)
local plr = game:service "Players".LocalPlayer
local tween_s = game:service "TweenService"
local info =
TweenInfo.new(
(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position - t.p).magnitude / Settings.vt,
Enum.EasingStyle.Linear
)
local tic_k = tick()
local cframe = t
local tween, err =
tvk(
function()
local tween = tween_s:Create(plr.Character:WaitForChild("HumanoidRootPart"), info, {CFrame = cframe})
local done = false
tween.Completed:Connect(
function()
done = true
end
)
cb(
function()
done = true
tween:Cancel()
end
)
noclip = true
tween:Play()
while (done == false) do
SetEN("Noclip", "Tween", true)
if not( game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid").Health > 0 and
game.Players.LocalPlayer.Character.Parent == game.Workspace.PlayerCharacters and
not plr.PlayerGui:FindFirstChild("DEATHGUI")) then done = true
tween:Cancel() return end
if (plr.Character.HumanoidRootPart.Position-t.Position).magnitude <40 then
plr.Character.HumanoidRootPart.CFrame=t
tween:Cancel()
return
end
wait()
end
noclip = false
end
)
end
spawn(function()
while wait() do
if plr.Character:FindFirstChild("Humanoid") then
if plr.Character.Humanoid.Sit then
StopFloat=true
wait(.1)
plr.Character.Humanoid.Sit=false
StopFloat=false
end
end
end
end)
function y0(vc)
return Vector3.new(vc.X,0,vc.Z)
end
local DisableSafeMode = false
local Last
local FishUp = CFrame.new(8585.81641, -2136.12305, -17087.8145, 1, 0, 0, 0, 1, 0, 0, 0, 1)
function FireTouch(part)
if plr.Character:FindFirstChild("HumanoidRootPart") then
firetouchinterest(plr.Character:WaitForChild("HumanoidRootPart"), part, 0)
firetouchinterest(plr.Character:WaitForChild("HumanoidRootPart"), part, 1)
end
end
function tpT(Pos,k,Origin,dieukien,DisableBypass,Float)
if Last then
Last()
Last = nil
end
if not plr.Character:FindFirstChild("HumanoidRootPart") then return end
if (plr.Character.HumanoidRootPart.Position-Pos.Position).magnitude <40 then
plr.Character.HumanoidRootPart.CFrame=Pos
--tween:Cancel()
return
end
if not Float then
StopFloat=true
else
StopFloat=false
end
local tvk = function()
if not IsFishMan(Pos) and IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
tpT(FishUp,nil,nil,dieukien,DisableBypass,Float)
DisableSafeMode=true
FireTouch(game:GetService("Workspace").Fishman.Part2)
wait(1)
if not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
DisableSafeMode=false
return tpT(Pos,nil,nil,dieukien,DisableBypass,Float)
end
end
if IsFishMan(Pos) and not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
tpT(CFrame.new(5682.19, 5, -16458.479),dieukien,DisableBypass,Float)
SetEN("Drown","Tween",true)
tpT(CFrame.new(5639.86865, -92.762001, -16611.4688, -1, 0, 0, 0, 1, 0, 0, 0, -1),nil,nil,dieukien,DisableBypass,Float)
DisableSafeMode=true
FireTouch(game:GetService("Workspace").Fishman.Part)
wait(1)
SetEN("Drown","Tween",true)
if IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
DisableSafeMode=false
return tpT(Pos,nil,nil,dieukien,DisableBypass,Float)
end
-- TpTween(pos,sp,part)
end
if (IsFishMan(Pos) and IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position)) or (not IsFishMan(Pos) and not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position)) then
if not Origin then
Origin = Pos
end
local info = TweenInfo.new((plr.Character.HumanoidRootPart.Position - Pos.p).magnitude / Settings.vt, Enum.EasingStyle.Linear)
if k == nil then
k = 1
end
local tween_s = game:service "TweenService"
local tween = game:service "TweenService":Create(plr.Character:WaitForChild("HumanoidRootPart"), info, {CFrame = Pos})
local done = false
tween.Completed:Connect(
function()
done = true
end
)
tween:Play()
local Stop = function()
tween:Cancel()
done = true
SetEN("Noclip", "Tween", false)
end
Last = Stop
while (done == false) do
if dieukien and not dieukien() then Stop() return end
SetEN("Noclip", "Tween", true)
if not( game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid").Health > 0 and
game.Players.LocalPlayer.Character.Parent == game.Workspace.PlayerCharacters and
not plr.PlayerGui:FindFirstChild("DEATHGUI")) then Stop() return end
if not plr.Character:FindFirstChild("Humanoid") then Stop() return end
if math.abs(Pos.Position.Y-plr.Character.HumanoidRootPart.Position.Y)>50 then
StopFloat=false
else
if not Float then
StopFloat=true
else
StopFloat=false
end
end
wait(.1)
if sp and not part.Parent then
return
end
if done then return end
if (plr.Character.HumanoidRootPart.Position-Pos.Position).magnitude <40 then
plr.Character.HumanoidRootPart.CFrame=Pos
tween:Cancel()
return
end
do
local hp = game.Players.LocalPlayer.Character.HumanoidRootPart.Position
local p1 = Vector3.new(Origin.X, 0, Origin.Z)
local p2 = Vector3.new(hp.X, 0, hp.Z)
if (p1 - p2).magnitude < 200 then
tween:Cancel()
return tpT(Origin,nil,Origin,dieukien,true,true)
end
end
if not DisableBypass then
local pos = -2.7848949432373
if
not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) and IsSea() and
math.abs(plr.Character.HumanoidRootPart.Position.Y - pos) > .1
then
tween:Cancel()
local cf = plr.Character.HumanoidRootPart.CFrame
return tpT(
CFrame.new(Pos.X, cf.Y, Pos.Z),
k,
Origin,
dieukien,DisableBypass,Float
)
end
if not IsSea() and (game.Players.LocalPlayer.Character.Humanoid.FloorMaterial == Enum.Material.Air) then
--print("bu cu")
local tss = RayCast2(game.Players.LocalPlayer.Character.HumanoidRootPart.Position+Vector3.new(0,3,0), Vector3.new(0, -500, 0))
local tvk = RayCast2(game.Players.LocalPlayer.Character.HumanoidRootPart.Position+Vector3.new(0,3,0), Vector3.new(0, -7, 0))
if not tvk then
if tss and tss.Instance then
tween:Cancel()
local cf = plr.Character.HumanoidRootPart.CFrame
return tpT(CFrame.new(Pos.X, cf.Y, Pos.Z), k, Origin,dieukien,DisableBypass,Float)
end
end
end
end
if not done then
return tpT(CFrame.new(Pos.X, Pos.Y, Pos.Z), k, Origin,dieukien,DisableBypass,Float)
end
end
end
end
tvk()
StopFloat=false
end
function TpTween(cf,checkfunc)
SetEN("Nodrown", "Tween", true)
SetEN("Noclip", "Tween", true)
tpT(cf,nil,cf,checkfunc)
SetEN("Noclip", "Tween", false)
SetEN("Nodrown", "Tween", false)
end
function Tp(pos, checkfunc)
if Last then
Last()
Last = nil
end
TpTween(pos,checkfunc)
-- if plr.Character:FindFirstChild("HumanoidRootPart") then
-- if (plr.Character.HumanoidRootPart.Position - pos.p).magnitude < 25 then
-- plr.Character.HumanoidRootPart.CFrame = pos
-- return
-- end
-- end
-- if IsFishMan(pos) and IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
-- TpTween(pos,checkfunc)
-- end
-- if not IsFishMan(pos) and IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
-- TpTween(FishUp, checkfunc)
-- DisableSafeMode=true
-- FireTouch(game:GetService("Workspace").Fishman.Part2)
-- wait(1)
-- if not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
-- DisableSafeMode=false
-- TpTween(pos, checkfunc)
-- end
-- end
-- if IsFishMan(pos) and not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
-- TpTween(CFrame.new(5639.86865, -92.762001, -16611.4688, -1, 0, 0, 0, 1, 0, 0, 0, -1), checkfunc)
-- DisableSafeMode=true
-- FireTouch(game:GetService("Workspace").Fishman.Part)
-- wait(1)
-- if IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position) then
-- DisableSafeMode=false
-- TpTween(pos, checkfunc)
-- end
-- -- TpTween(pos,sp,part)
-- end
-- if
-- not IsFishMan(pos) and
-- not IsFishMan(game.Players.LocalPlayer.Character:WaitForChild("HumanoidRootPart").Position)
-- then
-- TpTween(pos,checkfunc)
-- end
end
local CFAHub =
loadstring(game:HttpGet("https://raw.githubusercontent.com/CFA-HUB/cac/main/buoi.lua"))()
local Window = CFAHub:CreateWindow("<font color=\"#4FC3F7\">CFA Hub</font>", "Grand Piece Online", true)
--CFAHub:AddNoti("CFA Hub Premium", "UI Loaded!", 6)
function GetSword()
for k, v in pairs(plr.Character:GetChildren()) do
if v:FindFirstChild("SwordEquip") then
return v, true
end
end
for k, v in pairs(plr.Backpack:GetChildren()) do
if v:FindFirstChild("SwordEquip") then
return v, false
end
end
end
function CheckInven(item)
local cac = game:GetService("HttpService"):JSONDecode(data.Inventory.Inventory.Value)
for k,v in pairs(cac) do
if k==item then
return k
end
end
end
function GetRifle()
return game:GetService("Players").LocalPlayer.Backpack:FindFirstChild("Rifle") or game:GetService("Players").LocalPlayer.Character:FindFirstChild("Rifle")
end
local function GetNearestChest()
local Chest
for i, v in ipairs(game.workspace.Env:GetChildren()) do
if plr.Character:FindFirstChild("HumanoidRootPart") and v.Name == "Chest" and v:IsA("Model") and v:FindFirstChild("MeshPart") then
if not Chest then
Chest=v
end
if (v.MeshPart.Position - plr.Character.HumanoidRootPart.Position).magnitude<(Chest.MeshPart.Position - plr.Character.HumanoidRootPart.Position).magnitude then
Chest=v
end
end
end
return Chest
end
function IsChestAlive(chest)
if chest.Parent and chest:FindFirstChild("MeshPart") then
return true
end
return false
end
function CollectChest(chest)
Tp(chest.MeshPart.CFrame * CFrame.new(0, 5, 0),function()
if not IsChestAlive(chest) then
return false
end
if GetNearestChest()~=chest then
return false
end
return true
end)
if IsChestAlive(chest) then
wait(1)
for i, v in ipairs(game.workspace.Env:GetChildren()) do
if v:FindFirstChild("ClickDetector") then
if (v.Position - plr.Character.HumanoidRootPart.Position).magnitude <10 then
fireclickdetector(v.ClickDetector, 2)
end
end
end
end
end
function GetCurrentQuest()
local rac
rac=data
return tostring(rac.Quest.CurrentQuest.Value)
end
function GetQuest(quest, rac)
local t = tick()
repeat
wait()
game:GetService("VirtualInputManager"):SendKeyEvent(true, Enum.KeyCode.T, false, game)
until game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT") or tick() - t > 3
if game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT") and plr.Character:FindFirstChild("HumanoidRootPart") then
local cur = plr.Character.HumanoidRootPart.CFrame
repeat
wait()
if plr.Character:FindFirstChild("HumanoidRootPart") and rac then
plr.Character.HumanoidRootPart.CFrame = cur + Vector3.new(0, -11, 0)
end
pcall(
function()
for k, v in pairs(
getconnections(
game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT").Frame.go.MouseButton1Click
)
) do
v:Fire()
end
end
)
until not game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT")
end
-- game:GetService("ReplicatedStorage").Events.Quest:InvokeServer({"takequest",quest})
end
local function GetNeak()
if game.workspace.Effects:FindFirstChild("Folder") then
for i, v in ipairs(game.workspace.Effects.Folder:GetDescendants()) do
if v.Name == "Part" and v.Parent.Name == "Folder" and v:FindFirstChild("Mesh") and v.Mesh.TextureId == "http://www.roblox.com/asset/?id=28461501" and v:FindFirstChild("ClickDetector") then
return v
end
end
end
end
function GetSword()
for k, v in pairs(plr.Character:GetChildren()) do
if v:FindFirstChild("SwordEquip") then
return v, true
end
end
for k, v in pairs(plr.Backpack:GetChildren()) do
if v:FindFirstChild("SwordEquip") then
return v, false
end
end
end
spawn(function()
while wait() do
if Settings.Chest then
local chest = GetNearestChest()
if chest then
CollectChest(chest)
else
if not game.Players.LocalPlayer.QuestCD.Value then
local cac = CFrame.new(1009.720458984375, 8.999988555908203, 1179.4952392578125)
local old = plr.CameraMinZoomDistance
local old2 = plr.CameraMaxZoomDistance
if GetCurrentQuest()~="Find Sarah's necklace" then
if GetCurrentQuest()~="None" then
game:GetService("ReplicatedStorage").Events.Quest:InvokeServer({"quit"})
end
Tp(cac)
GetQuest("Sarah", true)
end
plr.CameraMinZoomDistance = 128
game.Players.LocalPlayer.CameraMaxZoomDistance = 256
game.Players.LocalPlayer.CameraMinZoomDistance = 256
Tp(CFrame.new(982.9542846679688, 41.349090576171875, 1264.251708984375))
local t = tick()
repeat wait()
local cac = GetNeak()
if cac then
local rac = cac.CFrame+Vector3.new(0,5,0)
Tp(CFrame.new(rac.X,rac.Y,rac.Z))
wait(1)
if cac:FindFirstChild("ClickDetector") then
fireclickdetector(cac.ClickDetector,2)
end
else
Tp(CFrame.new(982.9542846679688, 41.349090576171875, 1264.251708984375))
end
until GetCurrentQuest()=="None" or tick()-t>20 or data.Quest.QuestProgress.Value==1 or not Settings.Chest
game.Players.LocalPlayer.CameraMaxZoomDistance = old2
game.Players.LocalPlayer.CameraMinZoomDistance = old
Tp(cac)
GetQuest("Sarah", true)
else
end
end
end
end
end)
local Tab2 = Window:CreatePage("Farm")
local Section2 = Tab2:CreateSection("Main Farm")
local executor = identifyexecutor()
if (executor == "Synapse X" or executor == "Krnl") and secure_call then
else
CFAHub:AddNoti("Warning", "Your Exploit Is Not Supported, Our Script's might not working perfectly (Supported Exploit: KRNL,Synapse X)", 1)
end
local lf = Section2:CreateToggle("Level Farm", {Toggled=Settings.Farm,Description = "Will farm at Fishman Island (best way)"}, function(state)
Settings.Farm = state
SetEN("Noclip", "Farm", state)
SetEN("NoFallDame","Farm",state)
end)
-- local lf = Section2:CreateToggle("Legit Farm", {Toggled=Settings.Legit,Description = "Legit Farm"}, function(state)
-- Settings.Legit = state
-- end)
local olf = Section2:CreateToggle("1 Click Level Farm", {Toggled=Settings.OneClick,Description = "Will auto farm beli -> Buy weapons then start level farm"}, function(state)
SetEN("Noclip", "OneClick", state)
SetEN("NoFallDame","OneClick",state)
Settings.OneClick = state
end)
Section2:CreateToggle("Auto Buso Quest", {Toggled=Settings.AutoBusoQuest,Description = "Must enable with level farm"}, function(state)
Settings.AutoBusoQuest=state
end)
Section2:CreateDropdown("Level Farm Method", {
List = {"Rifle","Sword","Black Leg"},
Default = Settings.FarmMode
}, function(item)
Settings.FarmMode = item
end)
function IsAdvanceMode(k)
if k=="1-500 at Fishman" then return false else return true end
end
Section2:CreateDropdown("Level Farm Path", {
List = {"1-500 at Fishman","1-160 at Fishman, 160-190 at gravito fort, 190-500 at Fishman"},
Default = Settings.FarmPath or "1-500 at Fishman"
}, function(item)
Settings.FarmPath = item
end)
local Section2 = Tab2:CreateSection("Misc Farm")
local AFB= Section2:CreateToggle("Auto Farm Beli (For Begginer Only)", {Toggled=Settings.Chest,Description = "Auto Farm Chest then do Sarah quest"}, function(state)
Settings.Chest = state
SetEN("Noclip", "Chest", state)
SetEN("NoFallDame","Chest",state)
end)
spawn(function()
while wait() do
local mode
local price
local GetItem
local BuyItem
local Pos
if Settings.FarmMode=="Sword" then
mode="Katana"
price=1000
GetItem = GetSword
BuyItem=BuyKatana
Pos = SwordPos
end
if Settings.FarmMode=="Rifle" then
mode="Rifle"
price=300
GetItem=GetRifle
BuyItem=function()
fireclickdetector(game:GetService("Workspace").BuyableItems.Rifle.ShopPart.ClickDetector)
end
Pos = CFrame.new(999.6433715820312, 9.092554092407227, 1133.33740234375)
end
if Settings.OneClick and mode then
lf.SetValue(false)
if not GetItem() and not CheckInven(mode) then
if data.Stats.Peli.Value < price then
AFB.SetValue(true)
else
AFB.SetValue(false)
Tp(Pos)
wait(5)
local t = tick()
repeat
wait(1)
pcall(BuyItem)
until game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT") or tick() - t > 3
repeat wait()
pcall(function()
for k, v in pairs(getconnections(game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT").Frame.go.MouseButton1Click)) do
v:Fire()
end
end)
until not game.Players.LocalPlayer.PlayerGui:FindFirstChild("NPCCHAT")
end
else
if CheckInven(mode) then
game:GetService("ReplicatedStorage").Events.Tools:InvokeServer("equip", mode)
end
AFB.SetValue(false)
lf.SetValue(true)
olf.SetValue(false)
end
end
end
end)
local DoneSeq="0 1 1 1 0 1 1 1 1 0 "
function IsSkillUnlocked(skill)
if plr.PlayerGui:FindFirstChild("Keys") then
if plr.PlayerGui.Keys:FindFirstChild("Frame") then
if plr.PlayerGui.Keys.Frame:FindFirstChild(skill) then
if plr.PlayerGui.Keys.Frame[skill].TextLabel.TextLabel.Text ~= "???" then
return true
end
end
end
end
return false
end
function IsSkillReady(skill)
if plr.PlayerGui:FindFirstChild("Keys") then
if plr.PlayerGui.Keys:FindFirstChild("Frame") then
if plr.PlayerGui.Keys.Frame:FindFirstChild(skill) then
if pcall(function() return plr.PlayerGui.Keys.Frame[skill].TextLabel.Frame.UIGradient.Color end) then
if tostring(plr.PlayerGui.Keys.Frame[skill].TextLabel.Frame.UIGradient.Color)==DoneSeq then
return true
end
end
end
end
end
return false
end
local Section2 = Tab2:CreateSection("Ship Farm")
Section2:CreateToggle("Ship Farm", {Toggled=Settings.ShipFarm,Description = false}, function(state)
Settings.ShipFarm = state
SetEN("Noclip", "ShipFarm", state)
SetEN("NoFallDame","ShipFarm",state)
end)
Section2:CreateDropdown("Ship Farm Method", {
List = {"Sword","Black Leg"},
Default = Settings.ShipFarmMode
}, function(item)
Settings.ShipFarmMode = item
end)
Section2:CreateToggle("Kill Cannoners", {Toggled=Settings.KillCannon,Description = false}, function(state)
Settings.KillCannon = state
end)
-- Section2:CreateToggle("Ignore Galleons", {Description = false}, function(state)
-- Settings.IgnoreGalleon = state
-- end)
Section2:CreateButton("Set Ship Spawn Location", function(args)
Settings.ShipPos=game.Players.LocalPlayer.Character.HumanoidRootPart.Position--Vector3.new(6013.2841796875, -3.5988941192626953, -18909.974609375)--
CFAHub:AddNoti("Notification", "Set Ship Farm Position Complete", 5)
end)
function TpE(e,f)
if e:FindFirstChild("HumanoidRootPart") then
repeat wait()
spawn(function()
if e:FindFirstChild("HumanoidRootPart") then
Tp(e.HumanoidRootPart.CFrame*CFrame.new(0, -0.75, 3))
end
end)
until not e:FindFirstChild("HumanoidRootPart") or not pcall(function() return game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame end) or (game.Players.LocalPlayer.Character.HumanoidRootPart.Position-e.HumanoidRootPart.Position).magnitude<5 or not e.Parent or not f()
end
end
local function KillCaMap()
for i, v in ipairs(game.workspace.NPCs:GetChildren()) do
if plr.Character:FindFirstChild("HumanoidRootPart") and v.Name == "Shark" and v:FindFirstChild("HumanoidRootPart") and v:FindFirstChild("Humanoid") and v.Humanoid.Health ~= 0 then
local magnitude = (v.HumanoidRootPart.Position - plr.Character.HumanoidRootPart.Position).magnitude
if magnitude < 10 then
Click()
end
end
end
end
function EquipWpShip()
if StoringDF then return end
if Settings.ShipFarmMode == "Black Leg" then
if
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
plr.Backpack:FindFirstChild("BlackLeg")
then
plr.Character.Humanoid:EquipTool(plr.Backpack.BlackLeg)
end
else
local sword, equip = GetSword()
if sword and not equip then
if game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") then
game.Players.LocalPlayer.Character.Humanoid:EquipTool(sword)
end
end
end
end
function GetAllMobInShip(ship)
local Mobs = {}
for k,v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if v:FindFirstChild("assignedShip") and v:FindFirstChild("Humanoid") and v.Humanoid.Health>0 then
if v:FindFirstChild("HumanoidRootPart") then
if v.assignedShip.Value==ship then
table.insert(Mobs,v)
end
end
end
end
return Mobs
end
function Kill(v,f)
local tween=true
repeat
wait()
EquipWpShip()
if v:FindFirstChild("HumanoidRootPart") and game.Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart") then
TpE(v,function()
return tween
end)
if v:FindFirstChild("HumanoidRootPart") and game.Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart") and (game.Players.LocalPlayer.Character.HumanoidRootPart.Position-v.HumanoidRootPart.Position).magnitude<5 then
--game:GetService("VirtualInputManager"):SendKeyEvent(true, Enum.KeyCode.X, false,game)
MucTieu.MucTieu = v.HumanoidRootPart
Click()
if Settings.ShipFarmMode=="Black Leg" then
if IsSkillUnlocked("Party Table Kick Course") then
if data.Stamina.Value>40 then
game:GetService("ReplicatedStorage").Events.Skill:InvokeServer("Party Table Kick Course")
end
end
end
if Settings.ShipFarmMode=="Sword" then
if IsSkillUnlocked("Rapid Slashes") then
if data.Stamina.Value>20 then
game:GetService("ReplicatedStorage").Events.Skill:InvokeServer("Rapid Slashes")
end
end
end
end
end
until f(v)
MucTieu.MucTieu =nil
tween=false
end
plr.Backpack.ChildAdded:Connect(function(fruit)
if fruit:FindFirstChild("FruitModel") then
spawn(function()
if Settings.AutoStoreDF then
local s, DFBackpackOwn = pcall(game:GetService("MarketplaceService").UserOwnsGamePassAsync, game:GetService("MarketplaceService"), plr.UserId, 12776768)
if (s and DFBackpackOwn)
or string.find(data.Inventory.Inventory.Value, "Fruit Bag") then
local v = fruit
StoringDF=true
local t = tick()
repeat wait(1)
plr.Character.Humanoid:EquipTool(v)
wait(.5)
if pcall(function() return plr.PlayerGui.storefruit.TextButton end) and plr.PlayerGui.storefruit.TextButton.Visible == true then
FireButton(plr.PlayerGui.storefruit.TextButton)
end
until not v
or not v.Parent
or not Settings.AutoStoreDF or tick()-t>5
StoringDF=false
end
end
end)
if Settings.DFWebHook then
if Settings.WebHookUrl then
local msg = {
["content"] = (Settings.MentionEveryone and "@everyone") or "",
["embeds"] = {{
["title"] = "Grand Piece Online",
["description"] = "Fruit Gotten",
["type"] = "rich",
["color"] = tonumber(47103),
["fields"] = {
{
["name"] = "Name",
["value"] = "||" .. plr.Name .. "||",
["inline"] = false
},
{
["name"] = "Item",
["value"] = fruit.Name,
["inline"] = false
}
},
["footer"] = {
["icon_url"] = "https://cdn.discordapp.com/attachments/880433061307772958/994650337485000804/dc6e727bd4a71a981a037834b8c8fe38.png",
["text"] = "CFA Hub (" .. os.date("%X") .. ")"
}
}}
}
local function SendWebHook()
request({
Url =Settings.WebHookUrl,
Method = "POST",
Headers = {
["Content-Type"] = "application/json"
},
Body = game:GetService("HttpService"):JSONEncode(msg)
})
end
SendWebHook()
end
end
end
end)
function GetMob(name,stud)
for k,v in pairs(game.Workspace.NPCs:GetChildren()) do
if v.Name==name and v:FindFirstChild("HumanoidRootPart") then
if plr.Character:FindFirstChild("HumanoidRootPart") and (game.Players.LocalPlayer.Character.HumanoidRootPart.Position-v.HumanoidRootPart.Position).magnitude<stud then
return v
end
end
end
end
function ShipGetNearestMobSM(mob)
local nr = nil
for k, v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if string.match(v.Name,mob) and v:FindFirstChild("assignedShip") then
if
plr.Character:FindFirstChild("HumanoidRootPart") and v:FindFirstChild("HumanoidRootPart") and
v:FindFirstChild("Humanoid") and
v.Humanoid.Health > 0
then
if not nr then
nr = v
end
if
nr and nr:FindFirstChild("HumanoidRootPart") and
(plr.Character.HumanoidRootPart.Position - v.HumanoidRootPart.Position).magnitude <
(plr.Character.HumanoidRootPart.Position - nr.HumanoidRootPart.Position).magnitude
then
nr = v
end
end
end
end
if nr then
if
plr.Character:FindFirstChild("HumanoidRootPart") and nr:FindFirstChild("HumanoidRootPart") and
nr:FindFirstChild("Humanoid") and
nr.Humanoid.Health > 0 then
if (plr.Character.HumanoidRootPart.Position - nr.HumanoidRootPart.Position).magnitude <1000 then
return nr
end
end
end
--return nr
end
spawn(function()
while wait(.5) do
if Settings.ShipFarm then
if Settings.ShipPos and Settings.ShipPos~=Vector3.new(0,0,0) and not ShipGetNearestMobSM("Captain") then
if Settings.KillCannon then
if not ShipGetNearestMobSM("Cannoneer") then
Tp(CFrame.new(Settings.ShipPos))
end
else
Tp(CFrame.new(Settings.ShipPos))
end
end
if not game.Workspace.Ships:FindFirstChild(plr.Name.."Ship") then
game:GetService("ReplicatedStorage").Events.ShipEvents.Spawn:InvokeServer("true")
end
EquipWpShip()
KillCaMap()
local v = ShipGetNearestMobSM("Captain")
if v then
if v:FindFirstChild("HumanoidRootPart") and plr.Character:FindFirstChild("HumanoidRootPart") and (game.Players.LocalPlayer.Character.HumanoidRootPart.Position-v.HumanoidRootPart.Position).magnitude<1000 then
if v.Name=="Marine Captain" or v.Name=="Pirate Captain" and Settings.ShipFarm and v:FindFirstChild("assignedShip") then
local ship = v.assignedShip.Value
if ship then
local function dk(v)
return not v.Parent or not v:FindFirstChild("HumanoidRootPart") or not v:FindFirstChild("Humanoid") or v.Humanoid.Health==0 or not Settings.ShipFarm
end
Kill(v,dk)
end
end
end
else
if Settings.KillCannon then
if Settings.ShipFarm then
local v=ShipGetNearestMobSM("Cannoneer")
if v and v:FindFirstChild("HumanoidRootPart") then
local function dk(v)
return not v.Parent or not v:FindFirstChild("HumanoidRootPart") or not v:FindFirstChild("Humanoid") or v.Humanoid.Health==0 or not Settings.ShipFarm
end
Kill(v,dk)
end
end
end
end
end
if not Settings.ShipFarm then
AutoClick=false
end
end
end)
local Tab2 = Window:CreatePage("Auto Stats")
local Section2 = Tab2:CreateSection("Main")
for k, v in pairs(Settings.AutoStat) do
Section2:CreateToggle(k, {Description = false,Toggled=v}, function(state)
Settings.AutoStat[k] = state
end)
end
spawn(
function()
while wait(.5) do
if Settings.AutoStat then
for k, v in pairs(Settings.AutoStat) do
if v and data.Stats.SkillPoints.Value > 0 then
game.ReplicatedStorage.Events.stats:FireServer(k, nil, 1)
end
end
end
end
end
)
LocationsCoord = {
["Town of Beginnings"] = CFrame.new(965.146, 10, 1195.127),
["Marine Fort F-1"] = CFrame.new(2904.113, 25, -994.2),
["Sandora"] = CFrame.new(-1316.089, 15, 1129.95),
["Shell's Town"] = CFrame.new(-605.248, 15, -4430.41),
["Zou"] = CFrame.new(-4458.681, 10, -2502.741),
["Restaurant Baratie"] = CFrame.new(-3909.713, 55, -5569.912),
["Orange Town"] = CFrame.new(-6999.987, 10, -5345.705),
["Mysterious Cliff"] = CFrame.new(2180.005, 415, -8628.285),
["Roca Island"] = CFrame.new(5426.218, 20, -4918.854),
["Colosseum"] = CFrame.new(-2019.975, 10, -7661.091),
["Sphinx Island"] = CFrame.new(-6327.812, 45, -10129.278),
["Kori Island"] = CFrame.new(-6684.44, 10, 1828.623),
["Arlong Park"] = CFrame.new(652.855, 15, -13122.346),
["Land of the Sky"] = CFrame.new(9016.793, 1440, -10542.829),
["Knock-Up Stream Rock"] = CFrame.new(8116, 10, -9819),
["Gravito's Fort"] = CFrame.new(2611.159, 15, -15359.032),
["Fishman Cave"] = CFrame.new(5682.19, 5, -16458.479),
["Fishman Island"] = CFrame.new(8003.553, -2150, -17056.971),
["Marine Base G-1"] = CFrame.new(-9955.175, 70, -14910.613),
["Coco Island"] = CFrame.new(-4262.249, 10, -15531.864),
["Reverse Mountain"] = CFrame.new(-14338, 20, -9446),
["Shrine"] = CFrame.new(-12184.12890625, 3.2737002372742, -18545.69921875)
}
function WTS(part, toggle)
local screen = workspace.CurrentCamera:WorldToViewportPoint(part)
return Vector2.new(screen.x, screen.y)
end
local esplist = {}
game:GetService("RunService").Stepped:connect(
function()
for k, v in pairs(esplist) do
v()
end
end
)
function ESP(part, text, color, toggle)
local name = Drawing.new("Text")
name.Text = text
name.Color = color
name.Position = WTS(part)
name.Size = 20.0
name.Outline = true
name.Center = true
name.Visible = true
table.insert(
esplist,
function()
pcall(
function()
if part ~= nil then
name.Position = WTS(part)
end
local _, screen = workspace.CurrentCamera:WorldToViewportPoint(part)
if screen and Settings[toggle] then
name.Visible = true
else
name.Visible = false
end
end
)
end
)
end
for k, v in pairs(LocationsCoord) do
ESP(Vector3.new(v.X, v.Y, v.Z), k, Color3.fromRGB(255, 255, 255), "IslandE")
end
local rac = {}
for k, v in pairs(LocationsCoord) do
table.insert(rac, k)
end
local Tab2 = Window:CreatePage("Misc")
local Section2 = Tab2:CreateSection("Teleport")
Section2:CreateDropdown("Teleport", {
List = rac,
Default = ""
}, function(item)
if item and item~="" then
local s,e = xpcall(function()Tp(LocationsCoord[item]) end,function(e)
print(e)
print(debug.traceback())
end)
-- print(s,e)
end
end)
local Section2 = Tab2:CreateSection("Stuff")
Section2:CreateToggle("Auto Store DF", {Toggled=Settings.AutoStoreDF,Description = false}, function(state)
Settings.AutoStoreDF = state
end)
Section2:CreateToggle("Auto Buso Haki", {Toggled=Settings.AutoBuso,Description = false}, function(state)
Settings.AutoBuso = state
end)
Section2:CreateDropdown("Auto Buso Method", {
List = {"Always Enable","Enable When Stand Near Mob"},
Default = Settings.BusoMethod or "Enable When Stand Near Mob"
}, function(item)
Settings.BusoMethod=item
end)
game.CoreGui.DescendantAdded:Connect(function()
wait(2)
pcall(function()
if game.CoreGui.RobloxPromptGui.promptOverlay:FindFirstChild("ErrorPrompt")
and Settings.AutoRejoin then
while wait() do
game:GetService("TeleportService"):Teleport(1730877806, plr)
wait(5)
end
end
end)
end)
local current = tick()
local last = current
-- local humadd = function(v)
-- if v.Name=="Humanoid" then
-- v:GetPropertyChangedSignal("FloorMaterial"):Connect(function()
-- if plr.Character.Humanoid.FloorMaterial == Enum.Material.Air
-- then
-- last=tick() --tren troi
-- else
-- current=tick() --duoi dat
-- end
-- end)
-- end
-- end
-- if plr.Character:FindFirstChild("Humanoid") then
-- humadd(plr.Character.Humanoid)
-- end
function RCDetect()
if plr.Character:FindFirstChild("HumanoidRootPart") and plr.Character:FindFirstChild("Humanoid") and plr.Character.Humanoid.Health>0 then
local plrPos = plr.Character.HumanoidRootPart.Position
local Distance
if plr.Character.HumanoidRootPart.Position.Y <= 20 then
Distance = -5
else
Distance = -5
end
local rcu = RayCast2(Vector3.new(plrPos.X, plrPos.Y, plrPos.Z),Vector3.new(0, Distance, 0))
if plr.Character.Humanoid.FloorMaterial ~= Enum.Material.Air
or game.workspace.Ragdolls:FindFirstChild(plr.Name)
or plr.Character.HumanoidRootPart:FindFirstChild("geppo")
or plr.Character.HumanoidRootPart:FindFirstChild("SwimPosition")
or plr.Character:FindFirstChild("ToriFullForm")
or plr.Character:FindFirstChild("AirBypass")
or rcu or IsSea() then
--print("duoi dat")
current=tick()-- duoi dat
else
last=tick() --tren troi
end
else
current=tick() -- duoi dat
end
end
function Detect()
if game.workspace.PlayerCharacters:FindFirstChild(plr.Name)
and not game.workspace.Ragdolls:FindFirstChild(plr.Name)
and not plr.PlayerGui:FindFirstChild("DEATHGUI")
and not plr.PlayerGui:FindFirstChild("Blackout")
and plr.Character:FindFirstChild("HumanoidRootPart") then
return true
end
return false
end
function SafeModeKick()
plr:Kick("\n[CFA Hub]\nKicked for suspicious movements (Safe Mode)")
end
plr.Character.ChildAdded:Connect(humadd)
spawn(function()
while wait() do
if Detect() then
local old = plr.Character.HumanoidRootPart.Position
wait(1)
local new = plr.Character.HumanoidRootPart.Position
local speed = (old - new).magnitude
if Detect() and speed >= 300 and not DisableSafeMode then
if Settings.SafeMode then
SafeModeKick()
else
if Last then Last() end
end
end
end
end
end)
local LastNguyHiem = tick()
spawn(function()
while wait() do
RCDetect()
if last-current >8 then
NguyHiem=true
wait(1)
else
NguyHiem=false
end
--print(last-current)
if Settings.SafeMode and Detect() then
if plr.Character.HumanoidRootPart.Velocity.Y > 700
or plr.Character.HumanoidRootPart.Velocity.Y < -700 then
SafeModeKick()
end
if last-current >13 then
SafeModeKick()
end
if game.workspace.Ragdolls:FindFirstChild(plr.Name) then
if Last then Last() end
if game.workspace.Ragdolls[plr.Name].HumanoidRootPart.Position.Y < -100
and (Vector3.new(8073.316, -2016.831, -17376.289) - game.workspace.Ragdolls[plr.Name].HumanoidRootPart.Position).magnitude >= 3000 then
SafeModeKick()
end
end
end
end
end)
local Section2 = Tab2:CreateSection("Security")
Section2:CreateToggle("Safe Mode", {Toggled=Settings.SafeMode,Description = "Will kick you if your character having suspicious movements"}, function(state)
Settings.SafeMode = state
end)
Section2:CreateToggle("Auto Kick at 499 rifle shoot", {Toggled=Settings.RifleKick,Description = "Will kick you if you shooted more than 499 shoot"}, function(state)
Settings.RifleKick = state
end)
Section2:CreateToggle("Auto Kick", {Toggled=Settings.AutoKick,Description = "Auto kick you from the game after selected minute"}, function(state)
Settings.AutoKick = state
spawn(function()
while Settings.AutoKick and wait() do
if Settings.AutoKickTimer then
pcall(function()
local CurrentTick = tick()
repeat wait(1)
until tick() - CurrentTick >= Settings.AutoKickTimer * 60
or not Settings.AutoKick
if Settings.AutoKick then
plr:Kick("\n[CFA Hub]\n".. Settings.AutoKickTimer .." minute reached (Auto Kick)")
end
end)
end
end
end)
end)
Section2:CreateSlider("Auto Kick Timer (minute)", {Min = 1, Max = 120, DefaultValue = Settings.AutoKickTimer or 15}, function(value)
Settings.AutoKickTimer=value
end)
Section2:CreateToggle("Auto Rejoin", {Toggled=Settings.AutoRejoin,Description = false}, function(state)
Settings.AutoRejoin = state
end)
Section2:CreateTextbox("PS Code", "(Leave if you want rejoin to normal server)", function(args)
Settings.PSCode=args
end,Settings.PSCode)
local Section2 = Tab2:CreateSection("Local Player")
Section2:CreateToggle("No Drown", {Toggled=Settings.Nodrown,Description = "Make you cant drown in water"}, function(state)
Settings.Nodrown = state
SetEN("Nodrown", "Setting", state)
end)
Section2:CreateToggle("No Fall Damage", {Toggled=Settings.NoFallDame,Description = "Make you get no damage when fall"}, function(state)
Settings.NoFallDame = state
SetEN("NoFallDame", "Setting", state)
end)
Section2:CreateToggle("Dash No Stamina", {Toggled=Settings.DashNoStam,Description = "Dashing wont take stamina"}, function(state)
Settings.DashNoStam = state
SetEN("DashNoStam", "Setting", state)
end)
-- Section2:CreateToggle("No Clip", {Description = "Make you get no damage when fall"}, function(state)
-- Settings.Noclip = state
-- SetEN("Noclip", "Setting", state)
-- end)
local ws = 16
Section2:CreateSlider("WalkSpeed Changer", {Min = 16, Max = 100, DefaultValue = 16}, function(value)
ws=value
end)
spawn(function()
while wait(1) do
pcall(function()
game.Players.LocalPlayer.Character.Humanoid.WalkSpeed=ws
end)
end
end)
local Section2 = Tab2:CreateSection("ESP")
Section2:CreateToggle("Island ESP", {Toggled=Settings.IslandE,Description = false}, function(state)
Settings.IslandE=state
end)
local Tab2 = Window:CreatePage("Web Hook")
local Section2 = Tab2:CreateSection("Main")
Section2:CreateTextbox("Web Hook Url", "Enter here!", function(args)
Settings.WebHookUrl=args
end,Settings.WebHookUrl)
Section2:CreateToggle("Mention Everyone", {Toggled=Settings.MentionEveryone,Description = false}, function(state)
Settings.MentionEveryone=state
end)
local Section2 = Tab2:CreateSection("DF")
Section2:CreateToggle("DF Webhook", {Toggled=Settings.DFWebHook,Description = "Will notify when you have DF"}, function(state)
Settings.DFWebHook=state
end)
local Tab2 = Window:CreatePage("Settings")
local Section2 = Tab2:CreateSection("Main")
Section2:CreateSlider("Tween Speed", {Min = 50, Max = 120, DefaultValue = Settings.vt}, function(value)
Settings.vt=value
end)
function IsBusoActivated()
if not plr.Character then
return false
end
for k, v in pairs(plr.Character:GetChildren()) do
if string.match(v.Name, "Buso") then
return true
end
end
return false
end
spawn(
function()
while wait(1) do
if Settings.AutoBuso and data.Stats.BusoMastery.Value > 0 then
local a = true
if Settings.BusoMethod == "Enable When Stand Near Mob" then
local function GetAllNearMob()
for k, v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if
v:FindFirstChild("Humanoid") and v.Humanoid:IsA("Humanoid") and
v:FindFirstChild("HumanoidRootPart") and
plr.Character:FindFirstChild("HumanoidRootPart")
then
if
(v.HumanoidRootPart.Position - plr.Character.HumanoidRootPart.Position).magnitude <
50
then
return true
end
end
end
return false
end
if GetAllNearMob() then
a = true
else
if IsBusoActivated() then
game:GetService("ReplicatedStorage").Events.Haki:FireServer("Buso")
end
a = false
end
end
if a and not IsBusoActivated() then
game:GetService("ReplicatedStorage").Events.Haki:FireServer("Buso")
end
end
end
end
)
local g = {
KeyCode = Enum.KeyCode.Unknown,
UserInputState = Enum.UserInputState.Begin,
UserInputType = Enum.UserInputType.MouseButton1
}
local shooting = false
local shootpos = CFrame.new(0, 0, 0)
local cf = getrenv()._G.MouseCF
getrenv()._G.MouseCF = nil
setmetatable(
getrenv()._G,
{
__index = function(a, b)
if b == "MouseCF" then
if shooting then
return shootpos
else
return cf
end
end
return rawget(a, b)
end,
__newindex = function(a, b, c)
if b == "MouseCF" then
cf = c
return
end
return rawset(a, b, c)
end
}
)
local funcr
function GetReload()
for k, v in pairs(getgc()) do
if tostring(getfenv(v).script) == "GunMain" and (getfenv(v).script.Parent) ~= nil then
if tostring(debug.getconstant(v, 1)) == "Reloaded" then
-- v(g,false)
-- print(getfenv(v).script:GetFullName())
return v
end
end
end
end
local func
function GetClick(x, m)
for i, v in ipairs(getgc()) do
if pcall(function() return tostring(getfenv(v).script) end) and tostring(getfenv(v).script) == x and (getfenv(v).script.Parent) ~= nil then
if
pcall(
function()
getconstant(v, m)
end
) == true
then
return v
end
end
end
end
func = GetClick("MeleeScript", 85)
function AttackInCooldown()
if NguyHiem then return false end
if not func or getfenv(func).script.Parent == nil then
func = GetClick("MeleeScript", 85)
end
if func then
return debug.getupvalue(func, 11) >=4
else
return false
end
end
local collector = Instance.new("ScreenGui")
collector.Parent=game.CoreGui
local c= false
local g = {
KeyCode = Enum.KeyCode.Unknown,
UserInputState = Enum.UserInputState.Begin,
UserInputType = Enum.UserInputType.MouseButton1
}
local func
function GetClick(x, m)
for i, v in ipairs(getgc()) do
if pcall(function() return tostring(getfenv(v).script) end) and tostring(getfenv(v).script) == x and (getfenv(v).script.Parent) ~= nil then
if pcall(function() getconstant(v, m) end ) == true then
return v
end
end
end
end
function Clickc()
spawn(function()
if pcall(function() return tostring(getfenv(func).script) end) and not func or getfenv(func).script.Parent == nil then
func = GetClick("MeleeScript", 85)
end
if func then
func(g,false)
end
end)
end
function GetClickGun()
for k, v in pairs(getgc()) do
if tostring(getfenv(v).script) == "GunMain" and (getfenv(v).script.Parent) ~= nil then
if tostring(debug.getconstant(v, 1)) == "script" then
return v
end
end
end
end
local gunfunc
function ClickcGun()
spawn(function()
if pcall(function() return tostring(getfenv(gunfunc).script) end) and not gunfunc or getfenv(gunfunc).script.Parent == nil then
gunfunc = GetClickGun()
end
if gunfunc then
gunfunc(g,false)
end
end)
end
local noprint
local old
old=hookfunction(getrenv().warn,function(...)
local self =...
if self=="peli change" then
if c then
if not AttackInCooldown() then
Clickc()
end
return
end
if cGun then
ClickcGun()
return
end
if noprint then return end
end
return old(...)
end)
local data = game.ReplicatedStorage["Stats"..game.Players.LocalPlayer.Name]
getgenv().ClickMelee = function()
c=true
data.Stats.Peli.Value=data.Stats.Peli.Value+1
c=false
noprint=true
data.Stats.Peli.Value=data.Stats.Peli.Value-1
noprint=false
end
getgenv().ClickGun = function()
cGun=true
data.Stats.Peli.Value=data.Stats.Peli.Value+1
cGun=false
noprint=true
data.Stats.Peli.Value=data.Stats.Peli.Value-1
noprint=false
end
function Click(type)
getgenv().ClickMelee()
end
function GetClickGun()
for k, v in pairs(getgc()) do
if tostring(getfenv(v).script) == "GunMain" and (getfenv(v).script.Parent) ~= nil then
if tostring(debug.getconstant(v, 1)) == "script" then
return v
end
end
end
end
local reloadfunc
function Reload()
if not reloadfunc or getfenv(reloadfunc).script.Parent == nil then
reloadfunc = GetReload()
end
spawn(
function()
reloadfunc()
end
)
end
function ShootSuke(pos)
end
function Shoot(pos)
shooting = true
shootpos = pos
getgenv().ClickGun()
Reload()
-- --pcall(Reload)
-- game:GetService("VirtualInputManager"):SendKeyEvent(true, "R", false, game)
-- game:GetService("VirtualInputManager"):SendKeyEvent(false, "R", false, game)
wait(.3)
shooting = false
end
function GetNearestMob(mob)
local nr = nil
for k, v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if v.Name == mob and not v:FindFirstChild("Rac") then
if
plr.Character:FindFirstChild("HumanoidRootPart") and v:FindFirstChild("HumanoidRootPart") and
v:FindFirstChild("Humanoid") and
v.Humanoid.Health > 0 and
v:FindFirstChild("Info") and
v.Info:FindFirstChild("Target")
then
local kiet = true
if mob == "Yeti" then
local yetiY = 79
if math.abs(v.HumanoidRootPart.Position.Y - yetiY) > 5 then
kiet = false
end
end
if v.Info.Target.Value == game.Players.LocalPlayer.Character.HumanoidRootPart and kiet then
return v
end
if not nr and kiet then
nr = v
end
if
nr and nr:FindFirstChild("HumanoidRootPart") and
(plr.Character.HumanoidRootPart.Position - v.HumanoidRootPart.Position).magnitude <
(plr.Character.HumanoidRootPart.Position - nr.HumanoidRootPart.Position).magnitude and
kiet
then
nr = v
end
end
end
end
return nr
end
function CountNear(mob, mag, kk)
local kk = function() return true end
local c = 0
for k, v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if v.Name == mob then
if plr.Character:FindFirstChild("HumanoidRootPart") and v:FindFirstChild("HumanoidRootPart") then
-- local c = false
-- if not k then
-- c=true
-- else
-- if v:FindFirstChild("Info") and v.Info.Target==plr.Character.HumanoidRootPart then
-- c=true
-- end
-- end
if (plr.Character.HumanoidRootPart.Position - v.HumanoidRootPart.Position).magnitude < mag and kk(v) then
c = c + 1
end
end
end
end
return c
end
function CheckReq()
if Settings.FarmMode=="Sword" then
if IsSkillUnlocked("Rapid Slashes") then
return true
end
end
if Settings.FarmMode=="Black Leg" then
if IsSkillUnlocked("Party Table Kick Course") then
return true
end
end
return false
end
function RapidHold()
if not game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") then return end
local cac = game.Players.LocalPlayer.Character.Humanoid
local rac = cac:GetPlayingAnimationTracks()
for k,v in pairs(rac) do
if tostring(v)=="rapidHold" then return true end
end
end
function EquipTool()
if StoringDF then return end
if Settings.FarmMode == "Black Leg" then
if
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
plr.Backpack:FindFirstChild("BlackLeg")
then
plr.Character.Humanoid:EquipTool(plr.Backpack.BlackLeg)
end
elseif Settings.FarmMode=="Sword" then
local sword, equip = GetSword()
if sword and not equip then
if game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") then
game.Players.LocalPlayer.Character.Humanoid:EquipTool(sword)
end
end
end
end
function CanFarm(v)
return game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid").Health > 0 and
game.Players.LocalPlayer.Character.Parent == game.Workspace.PlayerCharacters and
not plr.PlayerGui:FindFirstChild("DEATHGUI") and
v:FindFirstChild("HumanoidRootPart")
end
function InstantTp(pos)
if plr.Character:FindFirstChild("HumanoidRootPart") then
plr.Character.HumanoidRootPart.CFrame=pos
end
end
local TpPoss
do
local cc = false
game:GetService("RunService").Stepped:connect(function()
if not cc and TpPoss then
cc=true
pcall(function()
Tp(TpPoss)
end)
cc=false
else
end
end)
end
function SendKey(Key,a)
game:GetService("VirtualInputManager"):SendKeyEvent(
a,
Enum.KeyCode[Key],
false,
game
)
end
spawn(function()
while wait() do
if Settings.Legit then
if AttackInCooldown() then
SendKey("F",true)
else
SendKey("F",false)
Click()
end
end
end
end)
local mob = "Bandit"
local olddd
local pos =
CFrame.new(
1054.63916,
8.99998665,
1298.18445,
0.69716531,
-9.41179668e-09,
0.716910422,
-2.24304877e-08,
1,
3.49409817e-08,
-0.716910422,
-4.04402911e-08,
0.69716531
)
local lastclick = tick()
local lastup = tick()
while wait() do
if Settings.Farm then
if Settings.FarmMode == "Sword" or Settings.FarmMode == "Black Leg" then
if not StoringDF then
EquipTool()
end
local Dt = CheckQuest(nil,IsAdvanceMode(Settings.FarmPath))
if Settings.AutoBusoQuest and data.Stats.BusoMastery.Value == 0 and data.Stats.Level.Value > 80 and Settings.FarmMode == "Sword" then
if GetCurrentQuest() == "Road to Armament" then
Dt = CheckQuest(nil, nil, "Buso")
else
if data.Stats.Peli.Value > 25000 then
Dt = CheckQuest(nil, nil, "Buso")
end
end
end
local mob = Dt.Mob
local Quest = Dt.Questpos
if data.Stats.SpawnPoint.Value ~= Dt.Island then
Tp(Dt.Spawn)
wait(1)
GetQuest()
end
if not game.Workspace.NPCs:FindFirstChild(mob) and not plr.PlayerGui:FindFirstChild("DEATHGUI") then
Tp(Dt.Mobpos)
end
if game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == true then
if GetCurrentQuest()~=Dt.Quest then
game:GetService("ReplicatedStorage").Events.Quest:InvokeServer({"quit"})
end
end
if not syn then Dt.LevelReq=math.huge end
if
true and game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == false and
not game.Players.LocalPlayer.QuestCD.Value and
data.Stats.Level.Value >= Dt.LevelReq
then
Tp(Dt.Questpos)
wait(1)
GetQuest(Dt.Quest, true)
end
olddd = Dt
local v = GetNearestMob(mob)
if v then
if
v.Name == mob and Settings.Farm and not plr.PlayerGui:FindFirstChild("DEATHGUI") and
not v:FindFirstChild("Rac")
then
if
(game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == true or
game.Players.LocalPlayer.QuestCD.Value or
((Dt.LevelReq and data.Stats.Level.Value <= Dt.LevelReq) or not Dt.LevelReq)) and
v:FindFirstChild("Humanoid") and
v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0
then
MucTieu.MucTieu = v.HumanoidRootPart
AutoClick = true
local orgin = v.HumanoidRootPart.Position.Y
local tk = tick()
local curstate = 1 -- 1: UP 0: DOWN
local curr = v.HumanoidRootPart.CFrame
local function Ff(v)
if Dt.Mob~="Yeti" then return true end
local yetiY = 79
if math.abs(v.HumanoidRootPart.Position.Y - yetiY) < 5 then
return true
end
end
repeat
MucTieu.MucTieu = v.HumanoidRootPart
if
CheckReq() and
CountNear(mob, 15,Ff) < CountNear(mob, 1000, Ff) and Dt.Mob~="Yeti"
then
for k, v in pairs(game.Workspace.NPCs:GetChildren()) do
if v.Name == mob then
if
(game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible ==
true or
game.Players.LocalPlayer.QuestCD.Value or
((Dt.LevelReq and data.Stats.Level.Value <= Dt.LevelReq) or
not Dt.LevelReq)) and
v:FindFirstChild("Humanoid") and
v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0 and
v:FindFirstChild("Info") and
v.Info:FindFirstChild("Target") and
v.Info.Target.Value == nil and
Settings.Farm and Ff(v)
then
local t = tick()
repeat
wait()
EquipTool()
local curr = v.HumanoidRootPart.CFrame
MucTieu.MucTieu = v.HumanoidRootPart
local posf = (Settings.FarmMode=="Sword" and Dt.SwordY) or (Settings.FarmMode=="Black Leg" and Dt.BlackLegY)
if AttackInCooldown() then
posf=Dt.CooldownY
end
local cf = CFrame.new(curr.X, posf, curr.Z)
Tp(cf)
Click()
until not v.Parent or
not (v:FindFirstChild("Humanoid") and
v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0) or
not Settings.Farm or
not (v:FindFirstChild("Humanoid") and
v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0) or
v.Info.Target.Value ~= nil
or tick() - t > 6
end
end
end
end
if v:FindFirstChild("HumanoidRootPart") then
if (v.HumanoidRootPart.Position-curr.p).magnitude>20 then
curr = v.HumanoidRootPart.CFrame
end
MucTieu.MucTieu = v.HumanoidRootPart
end
wait()
EquipTool()
if CanFarm(v) then
if
v:FindFirstChild("Info") and v.Info:FindFirstChild("Target") and
v.Info.Target.Value ~= plr.Character.HumanoidRootPart
then
curr = v.HumanoidRootPart.CFrame
end
local cf
if Settings.FarmMode == "Black Leg" then
cf = CFrame.new(curr.X, Dt.BlackLegY, curr.Z)
else
if Dt.SwordY then
cf = CFrame.new(curr.X, Dt.SwordY, curr.Z)
else
cf = curr + Vector3.new(0, -11, 0)
end
end
local dist = -1
if Settings.FarmMode == "Black Leg" then
dist = 14
else
dist = 20
end
if CountNear(mob, dist) > 0 then
if CheckReq() then
local function Farmable()
if Dt.Mob=="Yeti" then return false end
return CountNear(mob, 23,Ff) == CountNear(mob, 1000, Ff) and CountNear(mob, 23,Ff)>0
end
if Farmable() then
if Settings.FarmMode=="Black Leg" and data.Stamina.Value>50 then
game:GetService("VirtualInputManager"):SendKeyEvent(
true,
Enum.KeyCode.X,
false,
game
)
elseif Settings.FarmMode =="Sword" then
if IsSkillReady("Rapid Slashes") and data.Stamina.Value>25 then
if CountNear(mob,23,Ff)>0 then
game:GetService("VirtualInputManager"):SendKeyEvent(
true,
Enum.KeyCode.R,
false,
game
)
else
game:GetService("VirtualInputManager"):SendKeyEvent(
false,
Enum.KeyCode.R,
false,
game
)
end
end
end
end
end
if not AttackInCooldown() and curstate == 1 and tick() - lastup > 0.4 then
Click()
lastclick = tick()
end
end
local oldstate = curstate
if true or Settings.FarmMode ~= "Black Leg" then
if (AttackInCooldown() and tick() - lastclick > 0.6) then
if Dt.CooldownY then
cf = CFrame.new(cf.X, Dt.CooldownY, cf.Z)
curstate = 0
end
else
curstate = 1
if Dt.Mob == "Yeti" then
cf = cf + Vector3.new(0, -1, 0)
end
if v:FindFirstChild("Humanoid") and v.Humanoid.Jump or v:FindFirstChild("Tvk") then
if Dt.Mob == "Yeti" then
cf = cf + Vector3.new(0, 3, 0)
if not v:FindFirstChild("Tvk") then
local t = Instance.new("BoolValue", v)
t.Name = "Tvk"
game.Debris:AddItem(t, 4)
end
else
-- cf = cf + Vector3.new(0, 6, 0)
end
else
end
end
end
if Dt.Mob~="Yeti" and RapidHold() then
local Y = Dt.RapidY
if plr.Character:FindFirstChild("HumanoidRootPart") then
if syn then
local rac = curr
cf = QuayNgang(CFrame.new(rac.X,Y,rac.Z))
else
if RapidHold() then
local v = GetNearestMob(mob)
if v and v:FindFirstChild("HumanoidRootPart") then
local rac = v.HumanoidRootPart.CFrame
-- local bm = plr.Character.UpperTorso:FindFirstChild(rnd) or Instance.new("BodyGyro",game.Players.LocalPlayer.Character.UpperTorso)
-- bm.Name=rnd
-- bm.CFrame = QuayNgang(CFrame.new(rac.X,Dt.RapidY,rac.Z))
-- bm.MaxTorque = Vector3.new(0, math.huge, 0)
-- bm.D = tonumber(shared.D or 0)
-- bm.P = tonumber(shared.P or 5000)
cf = (rac*CFrame.new(0,0,10))
---TpPoss=rac*CFrame.new(0,0,7)
end
end--plr.Character.Humanoid.PlatformStand=true
end
end
end
-- if Dt.BlackLegPos then
-- cf=Dt.BlackLegPos
-- end
-- print(curstate,oldstate)
if oldstate == 0 and curstate == 1 then
lastup = tick()
print("Changed")
end
local pos = cf
if (pos.p - plr.Character.HumanoidRootPart.Position).magnitude > 25 then
Tp(pos)
else
plr.Character.HumanoidRootPart.CFrame = pos
end
end
until not v.Parent or
not (v:FindFirstChild("Humanoid") and v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0) or
not Settings.Farm or
not (v:FindFirstChild("Humanoid") and v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0) or
tick() - tk > 60 * 5
AutoClick = false
end
end
end
MucTieu.MucTieu = nil
elseif Settings.FarmMode == "Rifle" or Settings.FarmMode == "Suke" then
local questdata = CheckQuest("Rifle",IsAdvanceMode())
if Settings.AutoBusoQuest and data.Stats.BusoMastery.Value == 0 and data.Stats.Level.Value > 80 then
if GetCurrentQuest() == "Road to Armament" then
questdata = CheckQuest(nil, nil, "Buso")
else
if data.Stats.Peli.Value > 25000 then
questdata = CheckQuest(nil, nil, "Buso")
end
end
end
if data.Stats.SpawnPoint.Value ~= questdata.Island then
Tp(questdata.Spawn)
GetQuest(questdata.Quest)
end
if game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == true then
if GetCurrentQuest()~=questdata.Quest then
game:GetService("ReplicatedStorage").Events.Quest:InvokeServer({"quit"})
end
end
if not syn then questdata.LevelRequest=math.huge end
if
game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == false and
not game.Players.LocalPlayer.QuestCD.Value and
(questdata.LevelRequest and data.Stats.Level.Value >= questdata.LevelRequest)
then
Tp(questdata.Questpos)
wait(1)
GetQuest(questdata.Quest, true)
end
olddd = questdata
local pos = questdata.RiflePos or questdata.Mobpos
Tp(pos)
for k, v in pairs(game:GetService("Workspace").NPCs:GetChildren()) do
if
(game:GetService("Players").LocalPlayer.PlayerGui.Quest.Quest.Visible == true or
game.Players.LocalPlayer.QuestCD.Value or
((questdata.LevelRequest and data.Stats.Level.Value <= questdata.LevelRequest) or
not questdata.LevelRequest)) and
v.Name == questdata.Mob and
Settings.Farm and
v:FindFirstChild("HumanoidRootPart") and
v:FindFirstChild("Humanoid") and
v:FindFirstChild("Head") and
v.Humanoid.Health > 0
then
Tp(pos)
local tkk = tick()
repeat
wait()
Tp(pos)
if
Settings.FarmMode == "Rifle" and
game:GetService("Players").LocalPlayer.Backpack:FindFirstChild("Rifle") and
game.Players.LocalPlayer.Character:FindFirstChild("Humanoid")
then
game.Players.LocalPlayer.Character.Humanoid:EquipTool(
game:GetService("Players").LocalPlayer.Backpack:FindFirstChild("Rifle")
)
end
if v:FindFirstChild("Head") and v:FindFirstChild("HumanoidRootPart") then
if banvaudau%4==0 then
if Settings.FarmMode == "Rifle" then
--print("head")
Shoot(v.Head.CFrame)
else
ShootSuke(v.Head.CFrame)
end
else
if Settings.FarmMode == "Rifle" then
--print("humroot")
Shoot(v.HumanoidRootPart.CFrame)
else
ShootSuke(v.HumanoidRootPart.CFrame)
end
end
end
until -- local ohString1 = "fire"
not Settings.Farm or
not (v:FindFirstChild("Humanoid") and v:FindFirstChild("Head") and
v:FindFirstChild("HumanoidRootPart") and
v.Humanoid.Health > 0) or
tick() - tkk > 60 * 5
if tick() - tkk > 60 * 5 then
if v and not v:FindFirstChild("Rac") then
local t = Instance.new("BoolValue", v)
t.Name = "Rac"
end
end
end
end
end
end
end
