Postfach

local Tcol1 = colors.white
local Tcol2 = colors.cyan
local Name = "12032000"


shell.run("clear")

os.loadAPI("ocs/apis/sensor")
sen = sensor.wrap("back")


function screen()
term.setTextColor(Tcol1)
term.setCursorPos(1,2)
term.write("Dies ist das Postfach von ")
term.setTextColor(Tcol2)
term.write(Name)
term.setTextColor(Tcol1)
--term.setBackgroundColor(colors.gray)
term.setCursorPos(1,1)
term.write("                                     ")
term.setCursorPos(1,1)
term.write("Willkommen "..Besucher)
--term.setBackgroundColor(colors.black)
term.setTextColor(Tcol1)
term.setCursorPos(1,4)
term.write("Post in Form von Items einfach in den")
term.setCursorPos(1,5)
term.setTextColor(colors.red)
term.write("Item Collector ")
term.setTextColor(Tcol1)
term.write("werfen")
end

function Anzeige()
term.setTextColor(Tcol1)
term.setCursorPos(2,7)
term.write("[Nachricht schreiben]")
term.setCursorPos(2,8)
term.write("[Skulptur bestellen]")
term.setCursorPos(2,9)
term.write("[Klingel]")
term.setCursorPos(2,10)
term.write("[Refresh/reboot]")
end

function suche()
while true do
shell.run("clear")
    zieleinv = sen.getTargets()
        for k,v in pairs(zieleinv) do
             if v.Name == "Player" then
                    Besucher = k
             end
        end
    screen()

i=1
    while true do
        Anzeige()

        --Markierung
        term.setTextColor(colors.red)
        if i == 1 then
        term.setCursorPos(2,7)
        term.write("[Nachricht schreiben]")
        end

        if i == 2 then
        term.setCursorPos(2,8)
        term.write("[Skulptur bestellen]")
        end

        if i == 3 then
        term.setCursorPos(2,9)
        term.write("[Klingel]")
        end

        if i == 4 then
        term.setCursorPos(2,10)
        term.write("[Refresh/reboot]")
        end

        --
        os.startTimer(20)
        local event, key = os.pullEvent()
        if event == "timer" then
        os.reboot()
        end


        if key == 200 or key == 17 then
        i = i-1
        end

        if key == 208 or key == 31 then
        i = i+1
        end

        if i == 5 then
        i = 1
        end


        if i == 0 then
        i = 4
        end

        if key == 28 and i == 4 then
        os.reboot()
        end

        if key == 28 and i == 3 then
        for i = 1,5 do
        rs.setOutput("bottom", true)
        sleep(0.5)
        rs.setOutput("bottom",false)
        sleep(0.5)
        end
        end

        if key == 28 and i == 2 then
            shell.run("clear")
            term.setTextColor(Tcol1)
            term.setCursorPos(1,1)
            term.write("Bitte gebe die Himmelsrichtung an,")
            term.setCursorPos(1,2)
            term.write("in welche die Skulptur schauen soll.")
    i=1


                while true do
        term.setTextColor(Tcol1)
        term.setCursorPos(2,7)
        term.write("[Norden]")
        term.setCursorPos(2,8)
        term.write("[Osten]")
        term.setCursorPos(2,9)
        term.write("[Sueden]")
        term.setCursorPos(2,10)
        term.write("[Westen]")

        --Markierung
        term.setTextColor(colors.red)
        if i == 1 then
        term.setCursorPos(2,7)
        term.write("[Norden]")
        end

        if i == 2 then
        term.setCursorPos(2,8)
        term.write("[Osten]")
        end

        if i == 3 then
        term.setCursorPos(2,9)
        term.write("[Sueden]")
        end

        if i == 4 then
        term.setCursorPos(2,10)
        term.write("[Westen]")
        end

        --

        local event, key = os.pullEvent()



        if key == 200 or key == 17 then
        i = i-1
        end

        if key == 208 or key == 31 then
        i = i+1
        end

        if i == 5 then
        i = 1
        end


        if i == 0 then
        i = 4
        end

        if key == 28 and i == 1 then
        Richtung = "Norden"
        end
        if key == 28 and i == 2 then
        Richtung = "Osten"
        end
        if key == 28 and i == 3 then
        Richtung = "Sueden"
        end
        if key == 28 and i == 4 then
        Richtung = "Westen"
        end
        if key == 28 then

        shell.run("clear")
        term.setTextColor(Tcol1)
        term.setCursorPos(1,1)
        term.write("Absender: "..Besucher)
        term.setCursorPos(1,2)
        term.write("Betreff: Skulptur")
        term.setCursorPos(1,3)
        term.write("Himmelsrichtung: "..Richtung)
        term.setCursorPos(1,4)
        term.write("Beschreibung: ")
        text = io.read()


        file = fs.open("Nachrichten", "a")
        file.writeLine(Besucher.." [Skulptur]")
        file.writeLine("Richtung: "..Richtung.." Nachricht: "..text)
        file.close()
        print("Nachricht wurde gespeichert")
        sleep(2)
        os.reboot()
        break

        end

    end
end



        if key == 28 and i == 1 then
        --break
        shell.run("clear")
        term.setTextColor(Tcol1)
        term.setCursorPos(1,1)
        term.write("Gebe deine Nachricht an 12032000 ein: ")
        --term.setCursorPos(1,2)
        --term.write("Duch das schreiben einer 2. Nachricht wird")
        --term.setCursorPos(1,3)
        --term.write("die erste gelöscht")
        term.setCursorPos(1,4)
        text = io.read()

        file = fs.open("Nachrichten", "a")
        file.writeLine(Besucher)
        file.writeLine(text)
        file.close()
        print("Nachricht wurde gespeichert")
        sleep(2)
        os.reboot()
        break
        end


     end


sleep(3)

    end
end

suche()