Code seems inefficient, can someone help catch rookie mistakes?

I've been working on a game similar to The Conquerors 3. It's a strategy-game where units attack on their own and move when instructed to.

local tagging = game:GetService("CollectionService")
local target = script.Parent.Target
local soldier = script.Parent.Troop
tagging:AddTag(soldier,"unit")
while true do
    wait(0.1)
    if soldier.health > 0 and target.Value == nil then
        for index, unidad in pairs(_G.units) do
        if unidad.name == "Troop" and unidad.Health > 0 and
            unidad.Parent.TeamValue.Value ~= script.Parent.TeamValue.Value then
                local targetpos = unidad.Parent.Torso.Position
                if (targetpos - script.Parent.Torso.Position).magnitude <= 10 then
                    target.Value = unidad
                end
            end
        end
    end
end

The one above here is for searching through a list of soldiers tagged "unit". It then checks the team and distance. If it all checks out, the IntValue named "Target" inside the soldier object becomes "unidad". _G.units is a table full of soldiers tagged "unit" that is constantly updated by a script in ServerScriptStorage.

local target = script.Parent.Target
local soldier = script.Parent.Troop
target:GetPropertyChangedSignal("Value"):Connect(function()
    wait(0.3)
    while target.Value ~= nil and script.Parent.Ammo.Value > 0 do
        if target.Value.Health > 0 and (target.Value.Parent.Torso.Position - soldier.Parent.Torso.Position).magnitude <= 10 then
            soldier.AutoRotate = false
            soldier.Parent.Torso.CFrame =
            CFrame.new(soldier.Parent.Torso.Position,target.Value.Parent.Torso.Position)
            script.Parent.Ammo.Value = script.Parent.Ammo.Value - 1
            local random = math.random(1,1000)
            print(script.Parent.Ammo.Value)
            if random >= 300 then
                target.Value.Health = target.Value.Health - (15 - target.Value.Parent.Armor.Value)
            else
                target.Value.Health = target.Value.Health - 0
            end
        else
            target.Value = nil
            soldier.AutoRotate = true
        end
    wait(1)
end
    target.Value = nil
    soldier.AutoRotate = true
end)

This is the firing script. The ammo thing is for the soldier's ammo supply. The random.math is a hit or miss chance thing. The target.Health thing is to damage the enemy. The CFrame is to rotate and face the enemy.

P.S. I am trying to run 24 frames a second with 500 of these little soldiers on-screen. My PC has about 4 GB of RAM with 2 core things. Any optimization help would be appreciated!

Thanks for any help you can give!