Controller(EP.11)

local Players = game:GetService("Players")
local physicsservice = game:GetService("PhysicsService")
local replicatedstorage = game:GetService("ReplicatedStorage")
local runservice = game:GetService("RunService")
local userinputservice = game:GetService("UserInputService")

local modules = replicatedstorage:WaitForChild("Module")
local health = require(modules:WaitForChild("HealthScript"))

local gold = Players.LocalPlayer:WaitForChild("Gold")
local functions = replicatedstorage:WaitForChild("Functions")
local requestTowerFuntion = functions:WaitForChild("RequestTower")
local tower = replicatedstorage:WaitForChild("Towers")
local spawntowerFuntion = functions:WaitForChild("SpawnTower")
local camera = workspace.CurrentCamera
local gui = script.Parent
local map = workspace:WaitForChild("Grassland")
local base = map:WaitForChild("Base")
local info = workspace:WaitForChild("Info")

local hoveredInstance = nil
local selectedTower = nil
local towertospawn = nil
local canplace = false
local rotation = 0
local platedTower = 0
local maxTowers = 10

local function SetupGui()
    health.Setup(base,gui.Info.Health)

    workspace.Grassland.Mob.ChildAdded:Connect(function(mob)
        health.Setup(mob)
    end)

    info.Message.Changed:Connect(function(change)
        gui.Info.Message.Text = change
        if change == "" then
            gui.Info.Message.Visible = false
        else
            gui.Info.Message.Visible = true
        end
    end)

    info.Wave.Changed:Connect(function(change)
        gui.Info.Stat.Wave.Text = "Wave:"..change
    end)

    gold.Changed:Connect(function(change)
        gui.Info.Stat.Gold.Text = "$"..gold.Value
    end)
    gui.Info.Stat.Gold.Text = "$"..gold.Value
end

SetupGui()

local function MouseRaycast(blacklist)
    local mouseposition = userinputservice:GetMouseLocation()
    local mouseray = camera:ViewportPointToRay(mouseposition.X,mouseposition.Y)
    local raycastparams = RaycastParams.new()

    raycastparams.FilterType = Enum.RaycastFilterType.Blacklist
    raycastparams.FilterDescendantsInstances = blacklist

    local raycastresult = workspace:Raycast(mouseray.Origin,mouseray.Direction*1000, raycastparams)

    return raycastresult
end

local function CreateRangeCircle(tower, placeholder)
    local range = tower.Config.Range.Value
    local height = (tower.PrimaryPart.Size.Y / 2) + tower.Humanoid.HipHeight
    local offset = CFrame.new(0, -height,0)

    local p = Instance.new("Part")
    p.Name = "Range"
    p.Shape = Enum.PartType.Cylinder
    p.Material = Enum.Material.SmoothPlastic
    p.Color = Color3.new(1, 1, 1)
    p.Transparency = 0.8
    p.Size = Vector3.new(2 ,range *2, range*2)
    p.TopSurface = Enum.SurfaceType.Smooth
    p.BottomSurface = Enum.SurfaceType.Smooth
    p.CFrame = tower.PrimaryPart.CFrame * offset * CFrame.Angles(0,0, math.rad(90))
    p.CanCollide = false

    if placeholder then
        p.Anchored = false
        local weld = Instance.new("WeldConstraint")
        weld.Part0 = p
        weld.Part1 = tower.PrimaryPart
        weld.Parent = p
        p.Parent = tower
    else
        p.Anchored = true
        p.Parent = workspace.Camera
    end

end

local function RemovePlaceholderTower()
    if towertospawn then
        towertospawn:Destroy()
        towertospawn = nil
        rotation = 0
    end
end

local function AddPlaceholderTower(name)
    local towerExists = tower:FindFirstChild(name)
    if towerExists then
        RemovePlaceholderTower()
        towertospawn = towerExists:Clone()
        towertospawn.Parent = workspace.Grassland

        CreateRangeCircle(towertospawn, true)

        for i, object in ipairs(towertospawn:GetDescendants()) do
            if object:IsA("BasePart") then
                physicsservice:SetPartCollisionGroup(object, "Tower")
                if object.Name ~= "Range"  then
                    object.Material = Enum.Material.ForceField
                    object.Transparency = 0.3
                end
            end
        end
    end
end

local function ColorPlanceholderTower(color)
    for i, object in ipairs(towertospawn:GetDescendants()) do
        if object:IsA("BasePart") then
            object.Color = color
        end
    end
end

gui.Tower.Title.Text = "Towers"..platedTower.."/"..maxTowers
for i , tower in pairs(tower:GetChildren()) do
    if tower:IsA("Model") then
        local button = gui.Tower.Template:Clone()
        local config = tower:WaitForChild("Config")
        button.Name = tower.Name
        button.Image = config.Image.Texture
        button.Visible = true

        button.LayoutOrder = config.Price.Value
        button.Price.Text = config.Price.Value

        button.Parent = gui.Tower

        button.Activated:Connect(function()
            local allowedToSpawn = requestTowerFuntion:InvokeServer(tower.Name)
            if allowedToSpawn then
                AddPlaceholderTower(tower.Name)
            end
        end)
    end
end

local function toggleTowerInfo()
    workspace.Camera:ClearAllChildren()
    if selectedTower then
        CreateRangeCircle(selectedTower)
        gui.Selection.Visible = true
        local config = selectedTower.Config
        gui.Selection.Stat.Damage.Value.Text = config.Damage.Value
        gui.Selection.Stat.Range.Value.Text = config.Range.Value
        gui.Selection.Stat.Cooldown.Value.Text = config.Cooldown.Value
        gui.Selection.Title.ImageLabel.Image = config.Image.Texture
        gui.Selection.Title.TowerName.Text = selectedTower.Name

        local upgradeTower = config:FindFirstChild("Upgrade")
        if upgradeTower then
            gui.Selection.Action.Upgrade.Visible = true
            gui.Selection.Action.Upgrade.Text = " Upgrade (" ..upgradeTower.Value.Config.Price.Value.. ") "
        else
            gui.Selection.Action.Upgrade.Visible = false
        end
    else
        gui.Selection.Visible = false
    end
end

gui.Selection.Action.Upgrade.Activated:Connect(function()
    if selectedTower then
        local upgradeTower = selectedTower.Config.Upgrade.Value
        local allowedToUpgrade = requestTowerFuntion:InvokeServer(upgradeTower.Name)

        if allowedToUpgrade then
            selectedTower = spawntowerFuntion:InvokeServer(upgradeTower.Name, selectedTower.PrimaryPart.CFrame, selectedTower)
            toggleTowerInfo()
        end
    end
end)

userinputservice.InputBegan:Connect(function(input, processed)
    if processed then
        return
    end

    if towertospawn then
        if input.UserInputType == Enum.UserInputType.MouseButton1 then
            if canplace then
                local placedtower = spawntowerFuntion:InvokeServer(towertospawn.Name, towertospawn.PrimaryPart.CFrame)
                if platedTower then
                    platedTower += 1
                    gui.Tower.Title.Text = "Towers"..platedTower.."/"..maxTowers
                    RemovePlaceholderTower()
                    toggleTowerInfo()
                end
            end
        elseif input.KeyCode == Enum.KeyCode.R then
            rotation += 90
        end
    elseif hoveredInstance and input.UserInputType == Enum.UserInputType.MouseButton1 then
        local model = hoveredInstance:FindFirstAncestorOfClass("Model")

        if model and model.Parent == workspace.Grassland.Tower then
            selectedTower = model
        else
            selectedTower = nil
        end
        toggleTowerInfo()
        print(selectedTower)
    end
end)

runservice.RenderStepped:Connect(function()
    local result = MouseRaycast({towertospawn})
    if result and result.Instance then
        if towertospawn then
            hoveredInstance = nil
            if result.Instance.Parent.Name == "TowerArea" then
                canplace = true
                ColorPlanceholderTower(Color3.new(0,1,0))
            else
                canplace = false
                ColorPlanceholderTower(Color3.new(1,0,0))
            end
            local x = result.Position.X
            local y = result.Position.Y + towertospawn.Humanoid.HipHeight + 4
            local z = result.Position.Z

            local cframe = CFrame.new(x,y,z) *CFrame.Angles(0,math.rad(rotation),0)
            towertospawn:SetPrimaryPartCFrame(cframe)
        else
            hoveredInstance = result.Instance
        end
    else
        hoveredInstance = nil
    end
    --print(hoveredInstance)
end)