Pet Ranch Simulator

game:GetService("StarterGui"):SetCore("SendNotification", {Title = "ItzHxS#1280", Text = "Pet Ranch Simulator | GUI "})


-- Credits:
-- ItzHxS ( for the gui )
-- NAME4YOU#1192 ( for making gamepass script )
-- reavreav ( for any script )

-- Fungsi:
Tepeh = false
Open = false
tlol = false
eeq = false
eeh = false
swr = false
ewe = false
fck = false
puki = false
bch = false
guh = false
eak = false
ce = false
kntl = false

-- Variable:
local plr = game.Players.LocalPlayer.Name
local statdisplay = game.ReplicatedStorage[plr.."StatDisplay"]


-- Instances:
local PetKrunch = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local judul = Instance.new("TextLabel")
local OG = Instance.new("TextButton")
local TP = Instance.new("TextButton")
local AF = Instance.new("TextButton")
local GMPS = Instance.new("TextButton")
local ARUn = Instance.new("TextButton")
local AEP = Instance.new("TextButton")
local CT = Instance.new("TextButton")
local AR = Instance.new("TextButton")
local cred = Instance.new("TextLabel")
local Elist = Instance.new("ScrollingFrame")
local T1 = Instance.new("TextButton")
local T2 = Instance.new("TextButton")
local T3 = Instance.new("TextButton")
local T4 = Instance.new("TextButton")
local T5 = Instance.new("TextButton")
local RG = Instance.new("TextButton")
--Properties:
PetKrunch.Name = "PetKrunch"
PetKrunch.Parent = game.CoreGui

Frame.Parent = PetKrunch
Frame.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
Frame.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
Frame.BorderSizePixel = 3
Frame.Active = true
Frame.Position = UDim2.new(0.311926603, 0, 0.197674394, 0)
Frame.Size = UDim2.new(0, 451, 0, 382)
Frame.Draggable = true

judul.Name = "judul"
judul.Parent = Frame
judul.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
judul.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
judul.BorderSizePixel = 4
judul.Position = UDim2.new(0, 0, -0.00230575493, 0)
judul.Size = UDim2.new(0, 451, 0, 50)
judul.Font = Enum.Font.Cartoon
judul.Text = "Pet Ranch Simulator"
judul.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
judul.TextSize = 41

OG.Name = "OG"
OG.Parent = Frame
OG.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
OG.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
OG.BorderSizePixel = 4
OG.Position = UDim2.new(0.0199556537, 0, 0.193717286, 0)
OG.Size = UDim2.new(0, 143, 0, 43)
OG.Font = Enum.Font.Cartoon
OG.Text = "OpenEgg"
OG.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
OG.TextSize = 31
OG.MouseButton1Down:connect(function()

if Open == true then
Open = false
OG.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
Elist.Visible = false
else
Open = true
OG.BackgroundColor3 = Color3.new(40, 127, 71)
Elist.Visible = true
end
end)

TP.Name = "TP"
TP.Parent = Frame
TP.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
TP.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
TP.BorderSizePixel = 4
TP.Position = UDim2.new(0.0199556537, 0, 0.366492152, 0)
TP.Size = UDim2.new(0, 143, 0, 43)
TP.Font = Enum.Font.Cartoon
TP.Text = "TPPetsToU"
TP.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
TP.TextSize = 31
TP.MouseButton1Down:connect(function()

if Tepeh == true then
Tepeh = false
TP.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
Tepeh = true
TP.BackgroundColor3 = Color3.new(40, 127, 71)
while Tepeh do
	wait()
   for _,v in pairs(game.Workspace:GetChildren()) do
   if v.ClassName == "MeshPart" then
       v.Anchored = true
       v.CFrame = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame + game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame.LookVector * 3
   end
end
end
end
end)

AF.Name = "AF"
AF.Parent = Frame
AF.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
AF.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
AF.BorderSizePixel = 4
AF.Position = UDim2.new(0.0199556537, 0, 0.539267004, 0)
AF.Size = UDim2.new(0, 143, 0, 43)
AF.Font = Enum.Font.Cartoon
AF.Text = "AntiAFK"
AF.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
AF.TextSize = 31
AF.MouseButton1Down:connect(function()

if eeq == true then
eeq = false
AF.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
eeq = true
AF.BackgroundColor3 = Color3.new(40, 127, 71)
local VirtualUser=game:service'VirtualUser'
game:service'Players'.LocalPlayer.Idled:connect(function()
VirtualUser:CaptureController()
VirtualUser:ClickButton2(Vector2.new())
end)
end
end)

GMPS.Name = "GMPS"
GMPS.Parent = Frame
GMPS.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
GMPS.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
GMPS.BorderSizePixel = 4
GMPS.Position = UDim2.new(0.662971139, 0, 0.193717271, 0)
GMPS.Size = UDim2.new(0, 143, 0, 43)
GMPS.Font = Enum.Font.Cartoon
GMPS.Text = "Gamepass"
GMPS.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
GMPS.TextSize = 31
GMPS.MouseButton1Down:connect(function()

if tlol == true then
tlol = false
GMPS.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
statdisplay["Gamepass_2xCoins"].Value = false
statdisplay["Rebirth Token"].Value = false
statdisplay["Gamepass_Lucky"].Value = false
else
tlol = true
GMPS.BackgroundColor3 = Color3.new(40, 127, 71)
statdisplay["Gamepass_2xCoins"].Value = true
statdisplay["Rebirth Token"].Value = true
statdisplay["Gamepass_Lucky"].Value = true
end
end)

ARUn.Name = "ARUn"
ARUn.Parent = Frame
ARUn.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
ARUn.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
ARUn.BorderSizePixel = 4
ARUn.Position = UDim2.new(0.662971139, 0, 0.366492152, 0)
ARUn.Size = UDim2.new(0, 143, 0, 43)
ARUn.Font = Enum.Font.Cartoon
ARUn.Text = "AutoCollectPet"
ARUn.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
ARUn.TextScaled = true
ARUn.TextSize = 31
ARUn.TextWrapped = true
ARUn.MouseButton1Down:connect(function()

if swr == true then
swr = false
ARUn.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
swr = true
ARUn.BackgroundColor3 = Color3.new(40, 127, 71)
while swr do
   for _,v in pairs(game.Players.LocalPlayer.PlayerGui.MainGui.CenterUIFrame.PetInventory.PetInventoryInnerFrame.PetInventoryScrollingFrame:GetChildren()) do
      game:GetService("ReplicatedStorage").RemoteEvents.MainRemoteEvent:InvokeServer("CollectFriendship", v.Name)
      wait(1)
   end
end
end
end)

AEP.Name = "AEP"
AEP.Parent = Frame
AEP.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
AEP.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
AEP.BorderSizePixel = 4
AEP.Position = UDim2.new(0.662971139, 0, 0.539267004, 0)
AEP.Size = UDim2.new(0, 143, 0, 43)
AEP.Font = Enum.Font.Cartoon
AEP.Text = "AutoEquipPet"
AEP.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
AEP.TextScaled = true
AEP.TextSize = 31
AEP.TextWrapped = true
AEP.MouseButton1Down:connect(function()

if eeh == true then
eeh = false
AEP.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
eeh = true
AEP.BackgroundColor3 = Color3.new(40, 127, 71)
while eeh do
   for _,v in pairs(game.Players.LocalPlayer.PlayerGui.MainGui.CenterUIFrame.PetInventory.PetInventoryInnerFrame.PetInventoryScrollingFrame:GetChildren()) do
      game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer("CreatePet", v.Name)
      wait(1)
   end
end
end
end)

CT.Name = "CT"
CT.Parent = Frame
CT.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
CT.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
CT.BorderSizePixel = 4
CT.Position = UDim2.new(0.0199556053, 0, 0.70157069, 0)
CT.Size = UDim2.new(0, 143, 0, 43)
CT.Font = Enum.Font.Cartoon
CT.Text = "CollectTreasure"
CT.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
CT.TextSize = 21
CT.TextWrapped = true
CT.MouseButton1Down:connect(function()

if ewe == true then
ewe = false
CT.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
ewe = true
CT.BackgroundColor3 = Color3.new(40, 127, 71)
while ewe do
   local A_1 = "CollectTreasure"
   local A_2 = "TreasureChest"
   local Event = game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction
   Event:FireServer(A_1, A_2)
   wait()
end
end
end)

AR.Name = "AR"
AR.Parent = Frame
AR.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
AR.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
AR.BorderSizePixel = 4
AR.Position = UDim2.new(0.662971139, 0, 0.70157069, 0)
AR.Size = UDim2.new(0, 143, 0, 43)
AR.Font = Enum.Font.Cartoon
AR.Text = "AutoRebirth"
AR.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
AR.TextSize = 21
AR.TextWrapped = true
AR.MouseButton1Down:connect(function()

if fck == true then
fck = false
AR.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
else
fck = true
AR.BackgroundColor3 = Color3.new(40, 127, 71)
while fck do
   local A_1 = "RebirthPlayer"
   local Event = game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction
   Event:FireServer(A_1, 1)
   wait(10)
end
end
end)

cred.Name = "cred"
cred.Parent = Frame
cred.BackgroundColor3 = Color3.new(1, 1, 1)
cred.BackgroundTransparency = 1
cred.Position = UDim2.new(0, 0, 0.869109929, 0)
cred.Size = UDim2.new(0, 451, 0, 50)
cred.Font = Enum.Font.Cartoon
cred.Text = "Credits: ItzHxS(v3rm), and who made the script"
cred.TextColor3 = Color3.new(0, 0, 0)
cred.TextSize = 21

Elist.Name = "Elist"
Elist.Parent = Frame
Elist.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
Elist.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
Elist.BorderSizePixel = 4
Elist.Position = UDim2.new(-0.379157424, 0, -0.0157068055, 0)
Elist.Size = UDim2.new(0, 157, 0, 388)
Elist.Visible = false

T1.Name = "T1"
T1.Parent = Elist
T1.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
T1.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
T1.BorderSizePixel = 4
T1.Position = UDim2.new(0.0581721403, 0, 0.00688929483, 0)
T1.Size = UDim2.new(0, 125, 0, 43)
T1.Font = Enum.Font.Cartoon
T1.Text = "Tier1"
T1.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
T1.TextSize = 21
T1.TextWrapped = true
T1.MouseButton1Down:connect(function()

if puki == true then
puki = false
T1.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
puki = true
T1.BackgroundColor3 = Color3.new(40, 127, 71)
while puki do
    wait()
local tbl_main =
{
      "BuyEgg",
      "Tier1Egg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)

T2.Name = "T2"
T2.Parent = Elist
T2.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
T2.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
T2.BorderSizePixel = 4
T2.Position = UDim2.new(0.0581721403, 0, 0.0841144323, 0)
T2.Size = UDim2.new(0, 125, 0, 43)
T2.Font = Enum.Font.Cartoon
T2.Text = "Tier2"
T2.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
T2.TextSize = 21
T2.TextWrapped = true
T2.MouseButton1Down:connect(function()

if bch == true then
bch = false
T2.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
bch = true
T2.BackgroundColor3 = Color3.new(40, 127, 71)
while bch do
    wait()
local tbl_main =
{
      "BuyEgg",
      "Tier2Egg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)

T3.Name = "T3"
T3.Parent = Elist
T3.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
T3.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
T3.BorderSizePixel = 4
T3.Position = UDim2.new(0.0581721403, 0, 0.161339566, 0)
T3.Size = UDim2.new(0, 125, 0, 43)
T3.Font = Enum.Font.Cartoon
T3.Text = "Tier3"
T3.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
T3.TextSize = 21
T3.TextWrapped = true
T3.MouseButton1Down:connect(function()

if guh == true then
guh = false
T3.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
guh = true
T3.BackgroundColor3 = Color3.new(40, 127, 71)
while guh do
    wait()
local tbl_main =
{
      "BuyEgg",
      "Tier3Egg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)

T4.Name = "T4"
T4.Parent = Elist
T4.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
T4.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
T4.BorderSizePixel = 4
T4.Position = UDim2.new(0.0581721403, 0, 0.2385647, 0)
T4.Size = UDim2.new(0, 125, 0, 43)
T4.Font = Enum.Font.Cartoon
T4.Text = "Tier4"
T4.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
T4.TextSize = 21
T4.TextWrapped = true
T4.MouseButton1Down:connect(function()

if eak == true then
eak = false
T4.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
eak = true
T4.BackgroundColor3 = Color3.new(40, 127, 71)
while eak do
    wait()
local tbl_main =
{
      "BuyEgg",
      "Tier4Egg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)

T5.Name = "T5"
T5.Parent = Elist
T5.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
T5.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
T5.BorderSizePixel = 4
T5.Position = UDim2.new(0.0581721403, 0, 0.317098737, 0)
T5.Size = UDim2.new(0, 125, 0, 43)
T5.Font = Enum.Font.Cartoon
T5.Text = "Tier5"
T5.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
T5.TextSize = 21
T5.TextWrapped = true
T5.MouseButton1Down:connect(function()

if ce == true then
ce = false
T5.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
ce = true
T5.BackgroundColor3 = Color3.new(40, 127, 71)
while ce do
    wait()
local tbl_main =
{
      "BuyEgg",
      "Tier5Egg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)

RG.Name = "RG"
RG.Parent = Elist
RG.BackgroundColor3 = Color3.new(0.203922, 0.596078, 0.858824)
RG.BorderColor3 = Color3.new(0.160784, 0.501961, 0.72549)
RG.BorderSizePixel = 4
RG.Position = UDim2.new(0.0581721403, 0, 0.396941662, 0)
RG.Size = UDim2.new(0, 125, 0, 43)
RG.Font = Enum.Font.Cartoon
RG.Text = "RebirthEgg"
RG.TextColor3 = Color3.new(0.172549, 0.243137, 0.313726)
RG.TextSize = 21
RG.TextWrapped = true
RG.MouseButton1Down:connect(function()

if kntl == true then
kntl = false
RG.BackgroundColor3 = Color3.new(0.607843, 0.34902, 0.713726)
else
kntl = true
RG.BackgroundColor3 = Color3.new(40, 127, 71)
while kntl do
    wait()
local tbl_main =
{
      "BuyEgg",
      "RebirthEgg"
}
game:GetService("ReplicatedStorage").RemoteFunctions.MainRemoteFunction:InvokeServer(unpack(tbl_main))
end
end
end)
-- Scripts: