Skip to content

Commit

Permalink
T
Browse files Browse the repository at this point in the history
  • Loading branch information
hirwko authored Aug 29, 2024
1 parent ecfdbdd commit 41d6e02
Show file tree
Hide file tree
Showing 2 changed files with 6,467 additions and 0 deletions.
213 changes: 213 additions & 0 deletions Rajveerchestfarm.txt
Original file line number Diff line number Diff line change
@@ -0,0 +1,213 @@



local OrionLib = loadstring(game:HttpGet(('https://raw.githubusercontent.com/shlexware/Orion/main/source')))()

local Window = OrionLib:MakeWindow({Name = "hirako Hub | Blox fruit", HidePremium = false, SaveConfig = true, ConfigFolder = "OrionTest"})
local Tab = Window:MakeTab({
Name = "Main",
Icon = "rbxassetid://15338990777",
PremiumOnly = false
})
Tab:AddButton({
Name = "Farm chest tắt bật",
Callback = function()
loadstring(game:HttpGet("https://raw.githubusercontent.com/tbao143/thai-bao/main/BloxfruitTbaohub.md"))()
end
})
Tab:AddButton({
Name = "Farm chest ko tắt bật",
Callback = function()
print("button pressed")
highChestOnly = true
godsChalicSniper = false
repeat task.wait(4) until game:IsLoaded()
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
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 Teleport()
while wait() do
pcall(function()
TPReturner()
if foundAnything ~= "" then
TPReturner()
end
end)
end
end
local veryImportantWaitTime = 0.5
task.spawn(function()
while task.wait(veryImportantWaitTime) do
pcall(function()
for i,v in pairs(game.CoreGui:GetDescendants()) do
pcall(function()
if string.find(v.Name,"ErrorMessage") then
if string.find(v.Text,"Security kick") then
veryImportantWaitTime = 1e9
Teleport()
end
end
end)
end
end)
end
end)

local AllowRunService = true
local AllowRunServiceBind = Instance.new("BindableFunction")
function AllowRunServiceBind.OnInvoke(args)
if args == "Enable" then
AllowRunService = true
elseif args == "Disable" then
AllowRunService = false
end
local CoreGui = game:GetService("StarterGui")
CoreGui:SetCore("SendNotification", {
Title = "ChestFarm",
Text = "By Hirako/rajveer",
Icon = "rbxthumb://type=Asset&id=15338990738&w=150&h=150",
Duration = math.huge,
Callback = AllowRunServiceBind,
Button1 = "",
Button2 = "",
})
end


task.spawn(function()
while task.wait() do
task.spawn(function()
if godsChalicSniper == true then
if stuff then
AllowRunService = false
end
end
end)
end
end)

local CoreGui = game:GetService("StarterGui")
CoreGui:SetCore("SendNotification", {
Title = "ChestFarm",
Text = "By Hirako/rajveer",
Icon = "rbxthumb://type=Asset&id=15338990738&w=150&h=150",
Duration = math.huge,
Callback = AllowRunServiceBind,
Button1 = "",
Button2 = "",
})
task.spawn(function()
while true and task.wait(.5) do
if AllowRunService == true then
local ohString1 = "SetTeam"
local ohString2 = "Marines"

game:GetService("ReplicatedStorage").Remotes.CommF_:InvokeServer(ohString1, ohString2)
end
end
end)

task.spawn(function()
while true and task.wait() do
if AllowRunService == true then
if highChestOnly == false then
local hasChar = game.Players.LocalPlayer:FindFirstChild("Character")
if not game.Players.LocalPlayer.Character then

else
local hasCrewTag = game.Players.LocalPlayer.Character:FindFirstChild("CrewBBG",true)
if hasCrewTag then hasCrewTag:Destroy() end
local hasHumanoid = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid")
if hasHumanoid then
local Chest = game.Workspace:FindFirstChild("Chest4") or game.Workspace:FindFirstChild("Chest3") or game.Workspace:FindFirstChild("Chest2") or game.Workspace:FindFirstChild("Chest1") or game.Workspace:FindFirstChild("Chest")

if Chest then
game.Players.LocalPlayer.Character:PivotTo(Chest:GetPivot())
firesignal(Chest.Touched,game.Players.LocalPlayer.Character.HumanoidRootPart)
else
Teleport()
break
end
end
end
elseif highChestOnly == true then
local hasChar = game.Players.LocalPlayer:FindFirstChild("Character")
if not game.Players.LocalPlayer.Character then

else
local hasCrewTag = game.Players.LocalPlayer.Character:FindFirstChild("CrewBBG",true)
if hasCrewTag then hasCrewTag:Destroy() end
local hasHumanoid = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid")
if hasHumanoid then
local Chest = game.Workspace:FindFirstChild("Chest4") or game.Workspace:FindFirstChild("Chest3") or game.Workspace:FindFirstChild("Chest2")

if Chest then
game.Players.LocalPlayer.Character:PivotTo(Chest:GetPivot())
firesignal(Chest.Touched,game.Players.LocalPlayer.Character.HumanoidRootPart)
else
Teleport()
break
end
end
end
end
end
end
end)
end
})
Loading

0 comments on commit 41d6e02

Please sign in to comment.