Server script activity very high when using spell move?

Hello, I am developing a element type game with my friends and I played around with loops and I suddenly realized that the loop is causing intense server lag if many people use the move, which is a problem because it's meant for many people to be in a server and i don't want it to lag and the players having a bad experience. When one person uses it the activity goes up to something like 6% which is not ideal with many players. The lag is coming from line 92, and seems to increase the more i do the move Here is the script :

local Debris = game:GetService("Debris")
local TweenService = game:GetService("TweenService")
local RunService = game:GetService("RunService")

local Connection4
local Connection5
local Connection6
game.ReplicatedStorage.Fire.Events.Move2.OnServerEvent:Connect(function(Player)
    local function GetMouse()
        local MS
        local Num = math.random(1,10)..math.random(1,10)..math.random(1,10)..math.random(1,10)
        game.ReplicatedStorage.GetMouse:FireClient(Player,Num)
        game.ReplicatedStorage.GetMouse.OnServerEvent:Connect(function(Player,M,N)
            if N == Num then
                MS = M
            end
        end)
        repeat wait() until MS
        return MS
    end 
    local AlreadyHit = {}
    local Burning = {}
    local FlamePart = Instance.new("Part")
    local Duration = true
    local Anim = Instance.new("Animation",Player.Character)
    Anim.AnimationId = "rbxassetid://10545496514"
    Anim = Player.Character.Humanoid.Animator:LoadAnimation(Anim)
    Anim:Play()

    FlamePart.Parent = workspace.Debris
    FlamePart:SetNetworkOwner(Player)
    FlamePart.Size = Vector3.new(1,1,1)
    FlamePart.Anchored = true
    FlamePart.CanCollide = false
    FlamePart.Transparency = 1
    local HitPart =  Instance.new("Part")
    HitPart.Parent = workspace.Debris
    HitPart.Anchored = true
    HitPart.Transparency = 1
    HitPart.CanCollide = false
    HitPart.Size = Vector3.new(4.5,4.5,40)
    HitPart.CFrame = CFrame.new((Player.Character.HumanoidRootPart.CFrame * CFrame.new(0,0,-2)).Position,GetMouse()) * CFrame.new(0,0,-(HitPart.Size.Z/2 + 2))
    local Sound = game.ReplicatedStorage.Fire.SoundEffects.Flamethrower:Clone()
    Sound.Parent = Player.Character.HumanoidRootPart
    Sound:Play()
    HitPart.Touched:Connect(function(t)
        if t.Parent:FindFirstChild("Humanoid") then
            if table.find(AlreadyHit,t.Parent) == nil and not t:IsDescendantOf(Player.Character) then
                table.insert(AlreadyHit,t.Parent)
                table.insert(Burning,t.Parent)
                for i, v in pairs(t.Parent:GetChildren()) do
                    if v:IsA("Part") or v:IsA("MeshPart") then
                        coroutine.wrap(function()
                            for l,k in pairs(game.ReplicatedStorage.Fire.ParticleEmitters.BurningEffect:GetChildren()) do
                                k = k:Clone()
                                k.Parent = v
                                k.Enabled = true
                                coroutine.wrap(function()
                                    wait(3)
                                    for i, v in pairs(Burning) do
                                        if v == t.Parent then
                                            table.remove(Burning,i)
                                        end
                                    end
                                    for i, v in pairs(AlreadyHit) do
                                        if v == t.Parent then
                                            table.remove(AlreadyHit,i)
                                        end
                                    end
                                    k.Enabled = false
                                    Debris:AddItem(k,1)
                                end)()
                            end
                        end)()
                    end
                end
                coroutine.wrap(function()
                     while true do
                        wait(.5)
                        if table.find(Burning,t.Parent) ~= nil then
                            t.Parent:FindFirstChild("Humanoid"):TakeDamage(4.5783)
                        end
                        if Duration == false or table.find(Burning,t.Parent) == nil then
                            break
                        end
                    end
                end)()
            end
        end
    end)
    coroutine.wrap(function()
     Connection4 = RunService.Stepped:Connect(function()
            if HitPart ~= nil then
            HitPart.CFrame = CFrame.new((Player.Character.HumanoidRootPart.CFrame * CFrame.new(0,0,-2)).Position,GetMouse()) * CFrame.new(0,0,-(HitPart.Size.Z/2 + 2))
            else
                Connection4:Disconnect()
            end
            end)
    end)()
    for i, v in pairs(game.ReplicatedStorage.Fire.ParticleEmitters.Flamethrower:GetChildren()) do
        v = v:Clone()
        v.Parent = FlamePart
        v.Enabled = true
        spawn(function()
            wait(5)
            v.Enabled = false
        end)
    end
    coroutine.wrap(function()
    Connection5 = RunService.Heartbeat:Connect(function()
     if Duration == true then
        FlamePart.CFrame = CFrame.new((Player.Character.HumanoidRootPart.CFrame * CFrame.new(0,0,-2)).Position,GetMouse())
    end
    end)
    end)()
    spawn(function()
    wait(5)
    Connection4:Disconnect()
    Connection5:Disconnect()
    Anim = nil
    Debris:AddItem(FlamePart,1)
    HitPart:Destroy()
    HitPart = nil
    Duration = false
    end)    
end)