Wuffgate1

--WuffGate V1.01
--written in 09/2025 by Kay Michaelsen
--
--vardef
--
monitor = {}
monitor[1] = peripheral.wrap("monitor_20")
monitor[2] = peripheral.wrap("monitor_22")

aMoni = #monitor

gate = peripheral.wrap("advanced_crystal_interface_2")

--

dPage = 1
dMax = 0

gName = {}
gAddress = {}
gWorld = {}

toDial = {}

aGates = 0


function gatesDefault(fLesen)

    gName[1] = "Wuffgate Center""
    gAddress[1] = "-21-1-6-15-34-9-27-5-"
    gWorld[1] = "Overworld"

    gName[2] = "Lost Cities"
    gAddress[2] = "-15-29-27-5-16-24-"
    gWorld[2] = "Overworld"

    gName[3] = "Nether"
    gAddress[3] = "-27-23-4-34-12-28-"
    gWorld[3] = "Nether"

    gName[4] = "Abydos"
    gAddress[4] = "-26-6-14-31-11-29-"
    gWorld[4] = "Pegasus"

    gName[5] = "Cavum"
    gAddress[5] = "-18-7-3-36-25-15-"
    gWorld[5] = "Pegasus"

    gName[6] = "Lantea"
    gAddress[6] = "-29-5-17-34-6-12-"
    gWorld[6] = "Pegasus"

    gName[7] = "Chulak"
    gAddress[7] = "-8-1-22-14-36-19-"
    gWorld[7] = "Milchstrasse"

    aGates = #gName

    gatesSchreiben(true)

    end


function gatesLesen(fLesen)

    local fName = "gatedef.dat"

    local vars = {}
    local line = ""

    datei = fs.open(fName, "r")

    if not (datei == nil) then

        local tableString = datei.read()
        while not(line == nil) do
            line = datei.read()
            if line == nil then
                break
            end
            tableString = tableString..line
        end
        datei.close()

        vars = textutils.unserialise(tableString)

        aGates = vars.aGates
        gName = vars.gName
        gAddress = vars.gAddress
        gWorld = vars.gWorld

    else
        print("Fehler: Datei nicht lesbar")
    end
end

function gatesSchreiben(fLesen)

    local fName="gatedef.dat"

    local vars = {}

    vars.aGates = aGates
    vars.gName = gName
    vars.gAddress = gAddress
    vars.gWorld = gWorld

    local tableString = textutils.serialise(vars)
    datei = fs.open(fName, "w")
    datei.write(tableString)
    datei.close()

end

gatesLesen(true)

if aGates < 1 then gatesDefault(true)

aGates = #gName

dMax = math.floor(aGates / 8) +1

print(aGates, dMax)