function luke_auf()
   redstone.setOutput("bottom",false)
end

function luke_zu()
   redstone.setOutput("bottom",true)
end

function weizen_ernten()
    shell.run("clear")
    print("        Weizen ernten - v0.1")
    print("")
    write("Modem aktivieren - ")
    rednet.open("left")
    print("OK")
    write("Luke oeffnen - ")
    luke_auf()
    print("OK")
    write("Turtle erntet- ")
    rednet.broadcast("weizen_ernten")
    warte = 0
    while warte==0 do
        turtleId, message1 = rednet.receive()
        if message1=="weizen_fertig" then
            warte=1
            print("OK")
            rednet.send(turtleId,"weizen_abschalten")
        end
    end
    write("Luke schliessen - ")
    luke_zu()
    print("OK")
    write("Modem deaktivieren - ")
    rednet.close("left")
    print("OK")
    print("")
    print("Erntevorgang abgeschlossen - Taste druecken")
end

function kaktus_ernten()
    shell.run("clear")
    print("")
    print("Kaktus geerntet")
    print("")
    print("Taste druecken")
    io.read()
end

function startmenu()
    shell.run("clear")
    print("")
    print("        Menue")
    print("        =====")
    print("")
    print("Auswahl:   a - Weizen ernten")
    print("")
    print("           b - Kaktus ernten")
    print("")
    print("           q - Beenden")
end

function auswahl()
    auswahl = io.read()
    return auswahl
end

function beenden()
    shell.run("clear")
    print("")
    print("")
    print("     System shutdown")
    print("")
    sleep(0.5)
    write("  Benutzer abmelden - ")
    sleep(0.5)
    print("OK")
    print("")
    write("  Kernel runterfahren - ")
    sleep(0.5)
    print("Beendet")
    print("")
    print("  Have a nice Day")
end

function start()
    stop=0
    while stop=0 do
        shell.run("clear")
        startMenu()
        auswahl = auswahl()
        if auswahl=="weizen_ernten" then
            weizen_ernten()
        else if auswahl=="kaktus_ernten" then
            kaktur_ernten()
        end
        else
            beenden()
            stop=1
        end
    end
end