[ad_1]
Created by purple#0666
Features:
- AUTO FARM GUI
- LOTS OF FEATURES
- 1 MILLION CASH EVEERY 30 MINUTES
local library = loadstring(game:HttpGet(('https://raw.githubusercontent.com/AikaV3rm/UiLib/master/Lib.lua')))()
local RunService = game:GetService("RunService")
local player = game.Players.LocalPlayer
local hum = player.Character.HumanoidRootPart
local mouse = player:GetMouse()
local tpservice= game:GetService("TeleportService")
local ToolsCache = game:GetService("ReplicatedStorage").ToolsCache[player.UserId]
local plrTools
local bLocation
local fuckMonster
local fuckMobby
local autoSell
local autoChest
local autoCaught
-- Credits To Charwar for Server Hop
local PlaceID = game.PlaceId
local AllIDs = {}
local foundAnything = ""
local actualHour = os.date("!*t").hour
local Deleted = false
local File = pcall(function()
AllIDs = game:GetService('HttpService'):JSONDecode(readfile("NotSameServers.json"))
end)
if not File then
table.insert(AllIDs, actualHour)
writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
end
-- Server Hop
function TPReturner()
local Site;
if foundAnything == "" then
Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100'))
else
Site = game.HttpService:JSONDecode(game:HttpGet('https://games.roblox.com/v1/games/' .. PlaceID .. '/servers/Public?sortOrder=Asc&limit=100&cursor=' .. foundAnything))
end
local ID = ""
if Site.nextPageCursor and Site.nextPageCursor ~= "null" and Site.nextPageCursor ~= nil then
foundAnything = Site.nextPageCursor
end
local num = 0;
for i,v in pairs(Site.data) do
local Possible = true
ID = tostring(v.id)
if tonumber(v.maxPlayers) > tonumber(v.playing) then
for _,Existing in pairs(AllIDs) do
if num ~= 0 then
if ID == tostring(Existing) then
Possible = false
end
else
if tonumber(actualHour) ~= tonumber(Existing) then
local delFile = pcall(function()
delfile("NotSameServers.json")
AllIDs = {}
table.insert(AllIDs, actualHour)
end)
end
end
num = num + 1
end
if Possible == true then
table.insert(AllIDs, ID)
wait()
pcall(function()
writefile("NotSameServers.json", game:GetService('HttpService'):JSONEncode(AllIDs))
wait()
game:GetService("TeleportService"):TeleportToPlaceInstance(PlaceID, ID, game.Players.LocalPlayer)
end)
wait(4)
end
end
end
end
function switchServer()
while wait() do
pcall(function()
TPReturner()
if foundAnything ~= "" then
TPReturner()
end
end)
end
end
-- Teleportion system by [...] Open source script from RobloxScripts.com
function teleport(loc)
bLocation = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
if game.Players.LocalPlayer.Character.Humanoid.Sit then
game.Players.LocalPlayer.Character.Humanoid.Sit = false
end
wait()
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = loc
end
-- Get Tools Name (Just hidden the tool in replicatedstorage, savageeeee but characte win)
for i, getTools in pairs(player.Character:GetChildren()) do
if getTools:IsA("Tool") and getTools:FindFirstChild("GripC1") then
plrTools = getTools.Name
end
end
print(plrTools)
local function fireproximityprompt(Obj, Amount, Skip)
if Obj.ClassName == "ProximityPrompt" then
Amount = Amount or 1
local PromptTime = Obj.HoldDuration
if Skip then
Obj.HoldDuration = 0
end
for i = 1, Amount do
Obj:InputHoldBegin()
if not Skip then
wait(Obj.HoldDuration)
end
Obj:InputHoldEnd()
end
Obj.HoldDuration = PromptTime
else
error("userdata<ProximityPrompt> expected")
end
end
_G.MainColor = Color3.fromRGB(255,255,255);
_G.MainTextColor = Color3.fromRGB(69,69,69);
_G.SecondaryColor = Color3.fromRGB(255,255,255);
_G.ButtonColor = Color3.fromRGB(255,255,255);
_G.ToggleColor = Color3.fromRGB(255,255,255);
_G.SliderColor = Color3.fromRGB(255,255,255);
_G.TertiaryColor = Color3.fromRGB(34, 34, 34);
_G.DraggerCircleColor = Color3.fromRGB(255,255,255);
_G.PointerColor = Color3.fromRGB(34, 34, 34);
local w = library:CreateWindow("Utilities") -- Creates the window
local b = w:CreateFolder("°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°")
b:Button("Caught",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.FishCaught:FireServer()
end)
b:Button("Sell",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.processGameItemSold:InvokeServer("SellEverything")
end)
b:Button("Remove Fog",function()
game.Lighting.FogEnd = 1000000
game.Lighting.GlobalLighting:Destroy()
game.Lighting.Atmosphere:Destroy()
end)
local hh = library:CreateWindow("Teleport") -- Creates the window
local h = hh:CreateFolder("•••••••••••Store•••••••••••••")
local i = hh:CreateFolder("•••••••••••Island•••••••••••••")
local enterBoat = true
h:Button("Boat Store",function()
if enterBoat == true then
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("BoatShopInterior", "Inside")
enterBoat = false
else
enterBoat = true
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("BoatShopInterior","MainEntrance")
end
end)
local enterTavern = true
h:Button("Raygan's Tavern",function()
if enterTavern == true then
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("TavernInterior", "Inside")
enterTavern = false
else
enterTavern = true
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("TavernInterior","MainEntrance")
end
end)
local enterSupplies = true
h:Button("Supplies Store",function()
if enterSupplies == true then
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("SuppliesStoreInterior", "Inside")
enterSupplies = false
else
enterSupplies = true
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("SuppliesStoreInterior","MainEntrance")
end
end)
local enterPets = true
h:Button("Pets Store",function()
if enterPets == true then
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("PetShop", "MainEntrance")
enterPets = false
else
enterPets = true
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.EnterDoor:InvokeServer("PetShop","MainExit")
end
end)
h:Button("Suken Ship",function()
for i, v in pairs(game.Workspace:GetChildren()) do
if string.find(v.Name, "ShipModel") then
teleport(v.HitBox.CFrame)
break
end
end
end)
i:Button("Port Jackson",function()
teleport(CFrame.new(1.8703980445862, 53.57190322876, -188.37982177734))
end)
i:Button("Ancient Shores",function()
teleport(CFrame.new(-2436.431640625, 43.564971923828, -1683.4526367188))
end)
i:Button("Shadow Isles",function()
teleport(CFrame.new(2196.9926757812, 43.491630554199, -2216.4543457031))
end)
i:Button("Pharaoh's Dunes",function()
teleport(CFrame.new(-4142.74609375, 46.71378326416, 262.05679321289))
end)
i:Button("Eruption Island",function()
teleport(CFrame.new(3022.9311523438, 52.347640991211, 1323.74609375))
end)
i:Button("Monster's Borough",function()
teleport(CFrame.new(-3211.9047851562, 41.850345611572, 2735.306640625))
end)
local Window2 = library:CreateWindow("Farm")
local c = Window2:CreateFolder("°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°")
c:Toggle("Kill Monster",function(bool)
shared.toggle = bool
if shared.toggle == true then
fuckMonster = RunService.Stepped:Connect(function()
for i, v in pairs(game.Workspace:GetChildren()) do
if v:FindFirstChild("Health") and v:FindFirstChild("IsSeaMonster") and v.Name == "GreatWhiteShark" or v.Name == "BigGreatWhiteShark" or v.Name == "KillerWhale" or v.Name == "NeonGreatWhiteShark" then
if game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool") then
for i, getTools in pairs(player.Character:GetChildren()) do
if getTools:IsA("Tool") and getTools:FindFirstChild("GripC1") then
plrTools = getTools.Name
end
end
teleport(v.HumanoidRootPart.CFrame + Vector3.new(0, 30, 0))
wait(0.25)
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.MonsterHit:FireServer(workspace[v.Name], tostring(plrTools), true)
break
elseif not game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool") then
break
end
end
end
end)
else
fuckMonster:Disconnect()
teleport(CFrame.new(1.8703980445862, 53.57190322876, -188.37982177734))
end
end)
c:Toggle("Kill Mobby",function(bool)
shared.toggle = bool
if shared.toggle == true then
fuckMobby = RunService.Stepped:Connect(function()
for i, v in pairs(game.Workspace:GetChildren()) do
if v:FindFirstChild("Health") and v:FindFirstChild("IsSeaMonster") and v.Name == "MobyWood" then
if game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool") then
for i, getTools in pairs(player.Character:GetChildren()) do
if getTools:IsA("Tool") and getTools:FindFirstChild("GripC1") then
plrTools = getTools.Name
end
end
teleport(v.HumanoidRootPart.CFrame + Vector3.new(0, 10, 0))
wait(0.25)
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.MonsterHit:FireServer(workspace[v.Name], tostring(plrTools), true)
break
elseif not game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool") then
break
end
end
end
end)
else
fuckMobby:Disconnect()
teleport(CFrame.new(1.8703980445862, 53.57190322876, -188.37982177734))
end
end)
c:Toggle("Auto Caught",function(bool)
shared.toggle = bool
if shared.toggle == true then
autoCaught = coroutine.wrap(function()
while true and shared.toggle == true do
wait(2.6)
warn("Caught")
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.FishCaught:FireServer()
end
end)()
else
autoCaught:Disconnect()
teleport(CFrame.new(1.8703980445862, 53.57190322876, -188.37982177734))
end
end)
c:Toggle("Auto Sell",function(bool)
shared.toggle = bool
if shared.toggle == true then
autoSell = RunService.Stepped:Connect(function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.processGameItemSold:InvokeServer("SellEverything")
end)
else
autoSell:Disconnect()
end
end)
c:Toggle("Auto Map Chest",function(bool)
shared.toggle = bool
if shared.toggle == true then
autoChest = RunService.Stepped:Connect(function()
for i, v in pairs(game.Workspace.RandomChests:GetChildren()) do
if v:IsA("Model") then
teleport(v.HumanoidRootPart.CFrame + Vector3.new(0, 0, 0))
wait(0.25)
fireproximityprompt(v.HumanoidRootPart.ProximityPrompt)
end
end
end)
else
autoChest:Disconnect()
teleport(CFrame.new(1.8703980445862, 53.57190322876, -188.37982177734))
end
end)
local Window3 = library:CreateWindow("Boat");
local d = Window3:CreateFolder("°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°")
d:Slider("Speed",{
min = 10; -- min value of the slider
max = 400; -- max value of the slider
precise = true; -- max 2 decimals
},function(value)
for i, v in pairs(game.Workspace:GetChildren()) do
if v.Name == (game.Players.LocalPlayer.Name .. "'s Boat") then
v.Controller.VehicleSeat.MaxSpeed = tonumber(value)
v.TakeDamage:Destroy()
end
end
end)
d:Button("Remove Borders",function()
for i, v in pairs(game.Workspace.IgnoredByMouse.BoatBorders:GetChildren()) do
v:Destroy()
end
end)
d:Button("Tp to Boat",function()
for i, v in pairs(game.Workspace:GetChildren()) do
if v.Name == (game.Players.LocalPlayer.Name .. "'s Boat") then
teleport(v.Controller.VehicleSeat.CFrame + Vector3.new(0, 3, 0))
end
end
end)
local Window4 = library:CreateWindow("Unboxing");
local e = Window4:CreateFolder("°°°°°°°°°°°Eggs°°°°°°°°°°°°°°°°°°°°°°")
local f = Window4:CreateFolder("°°°°°°°°°°°Roads°°°°°°°°°°°°°°°")
e:Button("Royal",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("royalegg")
end)
e:Button("Normal",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("normalegg")
end)
e:Button("Ruby",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("rubyegg")
end)
e:Button("Void",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("voidegg")
end)
f:Button("Silver",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("silverchest")
end)
f:Button("Stone",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("stonechest")
end)
f:Button("Gold",function()
game:GetService("ReplicatedStorage").CloudFrameShared.DataStreams.OpenLootboxFunction:InvokeServer("goldchest")
end)
local Window666 = library:CreateWindow("Misc");
local g = Window666:CreateFolder("°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°")
local toggleTp = false
g:Button("Click Teleport (E)",function()
if toggleTp == false then
toggleTp = true
else
toggleTp = false
end
mouse.KeyDown:connect(function(key)
if key == "e" then
if mouse.Target then
if toggleTp == true then
hum.CFrame = CFrame.new(mouse.Hit.x, mouse.Hit.y + 5, mouse.Hit.z)
end
end
end
end)
end)
g:Button("Rejoins",function()
tpservice:Teleport(game.PlaceId, plr)
end)
g:Button("Server Hop",function()
switchServer()
end)
g:Button("Discord",function()
setclipboard("HUnTFaE4H6")
end)
g:DestroyGui()
ENJOY!
Warning: DO NOT DOWNLOAD anything from this page, you’re only here to copy the script!
[ad_2]