local ReplicatedStorage = game:GetService("ReplicatedStorage")
local InsertService = game:GetService("InsertService")
local MarketplaceService = game:GetService("MarketplaceService")
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")

local LocalPlayer = Players.LocalPlayer
local Leaderstats = LocalPlayer.leaderstats
local Backpack = LocalPlayer.Backpack
local PlayerGui = LocalPlayer.PlayerGui

local ShecklesCount = Leaderstats.Sheckles
local GameInfo = MarketplaceService:GetProductInfo(game.PlaceId)

local OrionLib = loadstring(game:HttpGet(('https://raw.githubusercontent.com/jensonhirst/Orion/main/source')))()
local GameEvents = ReplicatedStorage.GameEvents
local Farms = workspace.Farm

players = {}

for i,v in pairs(game:GetService("Players"):GetChildren()) do
   table.insert(players,v.Name)
end

local SelectedSeed
local AutoPlantRandom
local AutoPlant
local AutoHarvest
local AutoBuy
local SellThreshold
local NoClip
local AutoWalkAllowRandom
local delay

local Window = OrionLib:MakeWindow({Name = "Kuncicoco hub | [🌙] Grow a Garden 🍄", HidePremium = false, SaveConfig = true, ConfigFolder = "OrionTest"})

local Tab = Window:MakeTab({
	Name = "Home",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})

local Tab1 = Window:MakeTab({
	Name = "Auto Farm",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})

local Tab2 = Window:MakeTab({
	Name = "Fruits",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})

local Tab3 = Window:MakeTab({
	Name = "Sell [Shop]",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})

local Tab4 = Window:MakeTab({
	Name = "Players",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})


local Tab5 = Window:MakeTab({
	Name = "Settings",
	Icon = "rbxassetid://4483345998",
	PremiumOnly = false
})

Tab:AddParagraph("Nothing :/","i not gonna tell you")

local function Plant(Position: Vector3, Seed: string)
	GameEvents.Plant_RE:FireServer(Position, Seed)
	wait(.3)
end

local function GetFarms()
	return Farms:GetChildren()
end

local function GetFarmOwner(Farm: Folder): string
	local Important = Farm.Important
	local Data = Important.Data
	local Owner = Data.Owner

	return Owner.Value
end

local function GetFarm(PlayerName: string): Folder?
	local Farms = GetFarms()
	for _, Farm in next, Farms do
		local Owner = GetFarmOwner(Farm)
		if Owner == PlayerName then
			return Farm
		end
	end
    return
end

local IsSelling = false
local function SellInventory()
	local Character = LocalPlayer.Character
	local Previous = Character:GetPivot()
	local PreviousSheckles = ShecklesCount.Value

	--// Prevent conflict
	if IsSelling then return end
	IsSelling = true

	Character:PivotTo(CFrame.new(62, 4, -26))
	while wait() do
		if ShecklesCount.Value ~= PreviousSheckles then break end
		GameEvents.Sell_Inventory:FireServer()
	end
	Character:PivotTo(Previous)

	wait(0.2)
	IsSelling = false
end

local function BuySeed(Seed: string)
	GameEvents.BuySeedStock:FireServer(Seed)
end

local function BuyAllSelectedSeeds()
    local Seed = SelectedSeedStock.Selected
    local Stock = SeedStock[Seed]

	if not Stock or Stock <= 0 then return end

    for i = 1, Stock do
        BuySeed(Seed)
    end
end

local function GetSeedInfo(Seed: Tool): number?
	local PlantName = Seed:FindFirstChild("Plant_Name")
	local Count = Seed:FindFirstChild("Numbers")
	if not PlantName then return end

	return PlantName.Value, Count.Value
end

local function CollectSeedsFromParent(Parent, Seeds: table)
	for _, Tool in next, Parent:GetChildren() do
		local Name, Count = GetSeedInfo(Tool)
		if not Name then continue end

		Seeds[Name] = {
            Count = Count,
            Tool = Tool
        }
	end
end

local function CollectCropsFromParent(Parent, Crops: table)
	for _, Tool in next, Parent:GetChildren() do
		local Name = Tool:FindFirstChild("Item_String")
		if not Name then continue end

		table.insert(Crops, Tool)
	end
end

local function GetOwnedSeeds(): table
	local Character = LocalPlayer.Character

	CollectSeedsFromParent(Backpack, OwnedSeeds)
	CollectSeedsFromParent(Character, OwnedSeeds)

	return OwnedSeeds
end

local function GetInvCrops(): table
	local Character = LocalPlayer.Character

	local Crops = {}
	CollectCropsFromParent(Backpack, Crops)
	CollectCropsFromParent(Character, Crops)

	return Crops
end

local function GetArea(Base: BasePart)
	local Center = Base:GetPivot()
	local Size = Base.Size

	--// Bottom left
	local X1 = math.ceil(Center.X - (Size.X/2))
	local Z1 = math.ceil(Center.Z - (Size.Z/2))

	--// Top right
	local X2 = math.floor(Center.X + (Size.X/2))
	local Z2 = math.floor(Center.Z + (Size.Z/2))

	return X1, Z1, X2, Z2
end

local function EquipCheck(Tool)
    local Character = LocalPlayer.Character
    local Humanoid = Character.Humanoid

    if Tool.Parent ~= Backpack then return end
    Humanoid:EquipTool(Tool)
end

--// Auto farm functions
local MyFarm = GetFarm(LocalPlayer.Name)
local MyImportant = MyFarm.Important
local PlantLocations = MyImportant.Plant_Locations
local PlantsPhysical = MyImportant.Plants_Physical

local Dirt = PlantLocations:FindFirstChildOfClass("Part")
local X1, Z1, X2, Z2 = GetArea(Dirt)

local function GetRandomFarmPoint(): Vector3
    local FarmLands = PlantLocations:GetChildren()
    local FarmLand = FarmLands[math.random(1, #FarmLands)]

    local X1, Z1, X2, Z2 = GetArea(FarmLand)
    local X = math.random(X1, X2)
    local Z = math.random(Z1, Z2)

    return Vector3.new(X, 4, Z)
end

local function AutoPlantLoop()
	local Seed = SelectedSeed.Selected

	local SeedData = OwnedSeeds[Seed]
	if not SeedData then return end

    local Count = SeedData.Count
    local Tool = SeedData.Tool

	--// Check for stock
	if Count <= 0 then return end

    local Planted = 0
	local Step = 1

	--// Check if the client needs to equip the tool
    EquipCheck(Tool)

	--// Plant at random points
	if AutoPlantRandom.Value then
		for i = 1, Count do
			local Point = GetRandomFarmPoint()
			Plant(Point, Seed)
		end
	end

	--// Plant on the farmland area
	for X = X1, X2, Step do
		for Z = Z1, Z2, Step do
			if Planted > Count then break end
			local Point = Vector3.new(X, 0.13, Z)

			Planted += 1
			Plant(Point, Seed)
		end
	end
end

local function HarvestPlant(Plant: Model)
	local Prompt = Plant:FindFirstChild("ProximityPrompt", true)

	--// Check if it can be harvested
	if not Prompt then return end
	fireproximityprompt(Prompt)
end

local function GetSeedStock(IgnoreNoStock: boolean?): table
	local SeedShop = PlayerGui.Seed_Shop
	local Items = SeedShop:FindFirstChild("Item_Size", true).Parent

	local NewList = {}

	for _, Item in next, Items:GetChildren() do
		local MainFrame = Item:FindFirstChild("Main_Frame")
		if not MainFrame then continue end

		local StockText = MainFrame.Stock_Text.Text
		local StockCount = tonumber(StockText:match("%d+"))

		--// Seperate list
		if IgnoreNoStock then
			if StockCount <= 0 then continue end
			NewList[Item.Name] = StockCount
			continue
		end

		SeedStock[Item.Name] = StockCount
	end

	return IgnoreNoStock and NewList or SeedStock
end

local function CanHarvest(Plant): boolean?
    local Prompt = Plant:FindFirstChild("ProximityPrompt", true)
	if not Prompt then return end
    if not Prompt.Enabled then return end

    return true
end

local function CollectHarvestable(Parent, Plants, IgnoreDistance: boolean?)
	local Character = LocalPlayer.Character
	local PlayerPosition = Character:GetPivot().Position

    for _, Plant in next, Parent:GetChildren() do
        --// Fruits
		local Fruits = Plant:FindFirstChild("Fruits")
		if Fruits then
			CollectHarvestable(Fruits, Plants, IgnoreDistance)
		end

		--// Distance check
		local PlantPosition = Plant:GetPivot().Position
		local Distance = (PlayerPosition-PlantPosition).Magnitude
		if not IgnoreDistance and Distance > 15 then continue end

		--// Ignore check
		local Variant = Plant:FindFirstChild("Variant")
		if HarvestIgnores[Variant.Value] then return end

        --// Collect
        if CanHarvest(Plant) then
            table.insert(Plants, Plant)
        end
	end
    return Plants
end

local function GetHarvestablePlants(IgnoreDistance: boolean?)
    local Plants = {}
    CollectHarvestable(PlantsPhysical, Plants, IgnoreDistance)
    return Plants
end

local function HarvestPlants(Parent: Model)
	local Plants = GetHarvestablePlants()
    for _, Plant in next, Plants do
        HarvestPlant(Plant)
    end
end

local function AutoSellCheck()
    local CropCount = #GetInvCrops()

    if not AutoSell.Value then return end
    if CropCount < SellThreshold.Value then return end

    SellInventory()
end

local function AutoWalkLoop()
	if IsSelling then return end

    local Character = LocalPlayer.Character
    local Humanoid = Character.Humanoid

    local Plants = GetHarvestablePlants(true)
	local RandomAllowed = AutoWalkAllowRandom.Value
	local DoRandom = #Plants == 0 or math.random(1, 3) == 2

    --// Random point
    if RandomAllowed and DoRandom then
        local Position = GetRandomFarmPoint()
        Humanoid:MoveTo(Position)
		AutoWalkStatus.Text = "Random point"
        return
    end

    --// Move to each plant
    for _, Plant in next, Plants do
        local Position = Plant:GetPivot().Position
        Humanoid:MoveTo(Position)
		AutoWalkStatus.Text = Plant.Name
    end
end

local function NoclipLoop()
    local Character = LocalPlayer.Character
    if not NoClip.Value then return end
    if not Character then return end

    for _, Part in Character:GetDescendants() do
        if Part:IsA("BasePart") then
            Part.CanCollide = false
        end
    end
end

local function MakeLoop(Toggle, Func)
	coroutine.wrap(function()
		while wait(.01) do
			if not Toggle.Value then continue end
			Func()
		end
	end)()
end

local function StartServices()
	--// Auto-Walk
	MakeLoop(AutoWalk, function()
		local MaxWait = AutoWalkMaxWait.Value
		AutoWalkLoop()
		wait(math.random(1, MaxWait))
	end)

	--// Auto-Harvest
	MakeLoop(AutoHarvest, function()
		HarvestPlants(PlantsPhysical)
	end)

	--// Auto-Buy
	MakeLoop(AutoBuy, BuyAllSelectedSeeds)

	--// Auto-Plant
	MakeLoop(AutoPlant, AutoPlantLoop)

	--// Get stocks
	while wait(.1) do
		GetSeedStock()
		GetOwnedSeeds()
	end
end

local function farm(Value)
return Farms:GetChildren()
end

local function delayfarm(Value)
delay = Value
end

local function delayfarm1(Value)
shared.Farms = Value
end

local function delayfarm2(Value)
shared.Farms2 = Value
end

local function delayfarm3(Value)
shared.autsuper = Value
end

local function sell(Value)
local Seed = SelectedSeedStock.Selected
    local Stock = SeedStock[Seed]

	if not Stock or Stock <= 0 then return end

    for i = 1, Stock do
        BuySeed(Seed)
    end
end

Tab1:AddToggle({
	Name = "Auto Farm",
	Default = false,
	Callback = function(Value)
		farm(Value)
	end
})

Tab1:AddToggle({
	Name = "Auto Farm v2",
	Default = false,
	Callback = function(Value)
		farm(Value)
	end
})

Tab1:AddLabel()

Tab1:AddButton({
	Name = "[Super] Auto Farm",
	Callback = function(Value)
      		delayfarm3(Value)
  	end
})

Tab1:AddSlider({
	Name = "Auto Farm [DELAY]",
	Min = 0,
	Max = 100,
	Default = 5,
	Color = Color3.fromRGB(0,255,255),
	Increment = 1,
	ValueName = "auto farm :)",
	Callback = function(Value)
		delayfarm(Value)
	end
})

Tab1:AddButton({
	Name = "[Mini] Auto Farm",
	Callback = function(Value)
      		delayfarm3(Value)
  	end
})

Tab1:AddSlider({
	Name = "Auto Farm v2 [DELAY]",
	Min = 0,
	Max = 100,
	Default = 5,
	Color = Color3.fromRGB(0,255,255),
	Increment = 1,
	ValueName = "auto farm :)",
	Callback = function(Value)
		delayfarm1(Value)
	end
})

Tab2:AddDropdown({
	Name = "Secret Stole Fruits",
	Default = "1",
	Options = {"Carrot", "Bamboo", "stawberry", "blueberry", "tomato seed", "orange tuilp", "corn seed", "daffodil", "walermelon", "pumpkin", "apple", "coconut", "cactus", "dragon fruits", "mango", "grape", "mushroon", "pepper", "cacao"},
	Callback = function(Value)
		print(Value)
	end
})

Tab2:AddDropdown({
	Name = "Stole Fruits Players",
	Default = players,
	Options = players,
	Callback = function(Value)
		print(Value)
	end
})

Tab2:AddButton({
	Name = "Auto Stole Fruits",
	Callback = function(Value)
      		if Value then
OrionLib:MakeNotification({
	Name = "Wrong Charater",
	Content = "oops. you are not a premium!",
	Image = "rbxassetid://4483345998",
	Time = 5
})
              end
  	end
})

Tab3:AddDropdown({
	Name = "sell Dropdown",
	Default = "1",
	Options = {"Carrot", "Bamboo", "stawberry", "blueberry", "tomato seed", "orange tuilp", "corn seed", "daffodil", "walermelon", "pumpkin", "apple", "coconut", "cactus", "dragon fruits", "mango", "grape", "mushroon", "pepper", "cacao"},
	Callback = function(Value)
		sell(Value)
	end
})

Tab3:AddButton({
	Name = "Auto Sell",
	Callback = function(Value)
      		sell(Value)
  	end
})

Tab3:AddButton({
	Name = "Auto Sell all",
	Callback = function(Value)
      		sell(Value)
  	end
})

Tab3:AddLabel()

Tab3:AddDropdown({
	Name = "seed Dropdown",
	Default = "1",
	Options = {"Carrot", "Bamboo", "stawberry", "blueberry", "tomato seed", "orange tuilp", "corn seed", "daffodil", "walermelon", "pumpkin", "apple", "coconut", "cactus", "dragon fruits", "mango", "grape", "mushroon", "pepper", "cacao"},
	Callback = function(Value)
		sell(Value)
	end
})

Tab3:AddButton({
	Name = "Auto seeds",
	Callback = function(Value)
      		sell(Value)
  	end
})

Tab3:AddButton({
	Name = "Auto seeds all",
	Callback = function(Value)
      		sell(Value)
  	end
})

Tab3:AddLabel()

Tab3:AddToggle({
	Name = "Buy One Seeds",
	Default = false,
	Callback = function(Value)
		print(Value)
	end
})

Tab3:AddToggle({
	Name = "Buy One Sell",
	Default = false,
	Callback = function(Value)
		print(Value)
	end
})

Tab4:AddSlider({
	Name = "walkspeed",
	Min = 0,
	Max = 500,
	Default = 16,
	Color = Color3.fromRGB(0,255,255),
	Increment = 1,
	ValueName = "walkspeed",
	Callback = function(Value)
		game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = Value
	end
})

Tab4:AddSlider({
	Name = "jumppower",
	Min = 0,
	Max = 500,
	Default = 16,
	Color = Color3.fromRGB(0,255,255),
	Increment = 1,
	ValueName = "jumppower",
	Callback = function(Value)
		local plr = game.Players.LocalPlayer
local char = plr.Character

char.Humanoid.JumpPower = Value
	end
})

Tab5:AddToggle({
	Name = "Leave",
	Default = false,
	Callback = function(Value)
    if Value then
        OrionLib:Destroy()
    end
	end
})