MyZentrale

-- Version vom 19.03.2015 - reiner.neef@icloud.com
-- übergibt Parameter an den jeweiligen TorPC

function Tor()
    for i=1, Anzahl do
        rednet.send (PCid, Schaltung )
        sleep(2) -- unter 2 Sek. geht gar nichts
    end
end

shell.run ("clear")
print("**************************************************")
print("*************** Monitoring (Tore) ****************")
print("**************************************************")
print("")
print("* Nord-Tor   *** automatisch open / close     : 11 *")
print("")
--print("* Hubtor            *** close : 20 *** open : 21 *")
--print("")
--print("* Nord-Tor *** automatisch open / close     : 31 *")
--print("")
--print("* Sued-Tor *** automatisch open / close     : 41 *")

term.setCursorPos(1, 13) -- setzt position auf eingabe  - (Spalte, Zeile)
inputstring = read()
if (tonumber(inputstring) ~= nil) then -- prueft ob eine Zahl eingegeben wurde
    Eingabe = tonumber(inputstring) --macht aus dem textstring ein zahl
end

if Eingabe == 11 then
-- Nord-Tor der 'Burg'
    PCid = 3 -- 3 = id des PC im Rolltor Werkstatt
    Anzahl = 6 -- Rolltor wird 6 Bloecke gehoben/gesenkt
    Schaltung = "open"
    Tor()
    sleep(2)
    Schaltung = "close"
    Tor()
elseif Eingabe == 20 or Eingabe == 21 then
-- Hubtor Buero
    PCid = 7 -- 7 = id des PC im Hubtor Werkstatt
    Anzahl = 9 -- Hubtor wird 9 Bloecke gehoben/gesenkt
    if Eingabe == 20 then
        Schaltung = "close"
    elseif Eingabe == 21 then
        Schaltung = "open"
    end
    Tor()
elseif Eingabe == 31 then
-- Nord-Tor
    PCid = 10 -- 10 = id des PC im Nord-Tor
    Anzahl = 1 -- Nord-Tor 2 Block nach innen
    Schaltung = "open"
    Tor()
    Anzahl = 3 -- Nord-Tor 3 Block links
    Schaltung = "left"
    Tor()
    sleep(3) -- Zeit um das offene Tor zu benutzen
    Anzahl = 3 -- Nord-Tor 3 Block rechts
    Schaltung = "right"
    Tor()
    Anzahl = 1 -- Nord-Tor 2 Block nach aussen
    Schaltung = "close"
    Tor()
elseif Eingabe == 41 then
-- Sued-Tor
    PCid = 14 -- 14 = id des PC im Nord-Tor
    Anzahl = 3 -- Sued-Tor 3 Block links
    Schaltung = "right" -- oeffnen
    Tor()
    sleep(3) -- Zeit um das offene Tor zu benutzen
    Anzahl = 3 -- Sued-Tor 3 Block rechts
    Schaltung = "left" -- schliessen
    Tor()
else
    print("Die Eingabe von '", Eingabe, "' ist ohne Funktion!")
end
os.reboot()