spawnpoints fixed

if CLIENT then return end

SPAWNPOINTS_TWS = {}

if not file.Exists("spawnpoints_tws", "DATA") then
    file.CreateDir("spawnpoints_tws")
end

if not file.Exists("spawnpoints_tws/" .. game.GetMap(), "DATA") then
    file.CreateDir("spawnpoints_tws/" .. game.GetMap())
else
    local sp = file.Find("spawnpoints_tws/"  .. game.GetMap() .. "/" .. "*.txt", "DATA")

    for i = 1, #sp do
        table.insert(SPAWNPOINTS_TWS, sp[i])
    end
end


hook.Add("PlayerSay", "custom_spawnp_tws", function(ply, text, team)
    if not ply:IsAdmin() then return end

    local str = string.Explode(" ", text)

    if str[1] == "/delspawnpoint" then
        if file.Exists("spawnpoints_tws/" .. game.GetMap() .. "/" .. str[2] .. ".txt", "DATA") then
            file.Delete("spawnpoints_tws/" .. game.GetMap() .. "/" .. str[2] .. ".txt")

            table.RemoveByValue(SPAWNPOINTS_TWS, str[2] .. ".txt")

            ply:ChatPrint(str[2] .. " spawnpoints was deleted!")
        end
    end

    if str[1] == "/addspawnpoint" then
        if file.Exists("spawnpoints_tws/" .. game.GetMap() .. "/" .. str[2] .. ".txt", "DATA") then ply:ChatPrint("This spawnpoint is already existst!") return end

        file.Write("spawnpoints_tws/" .. game.GetMap() .. "/" .. str[2] .. ".txt", tostring(ply:GetEyeTrace().HitPos))

        table.insert(SPAWNPOINTS_TWS, str[2] .. ".txt")

        ply:ChatPrint(str[2] .. " spawnpoint is done!")
    end

    if str[1] == "/printallsp" then
        for k, v in pairs(SPAWNPOINTS_TWS) do
            ply:ChatPrint(v .. " " .. file.Read("spawnpoints_tws/" .. game.GetMap() .. "/" .. v, "DATA"))
        end
    end
end)

hook.Add("PlayerSpawn", "ply_spawn_tws", function(ply)
    local tbl = table.Random(SPAWNPOINTS_TWS)

    if not tbl then return end
    if not file.Exists("spawnpoints_tws/" .. game.GetMap() .. "/" .. tbl, "DATA") then return end

    local pos = file.Read("spawnpoints_tws/" .. game.GetMap() .. "/" .. tbl, "DATA")
    pos = string.Explode(" ", pos)

    local num = {}
    for i = 1, 3 do num[i] = pos[i] end

    ply:SetPos(Vector(num[1], num[2], num[3]))
end)