Monitor,Mall

mon = peripheral.wrap("back")
mon.setBackgroundColor(32768)
mon.setTextScale(1.5)
mon.clear()


function calc_color(color)
    return math.pow(2, color - 1)
end

function msg(gap, line, color, groundb, text)
    mon.setBackgroundColor(calc_color(groundb))
    mon.setCursorPos(gap,line)
    mon.setTextColor(calc_color(color))
    text = mon.write(text)
end

function deutsch()
    mon.setBackgroundColor(32768)
    mon.clear()
    msg(10,01,04,16,"Tausch Station")
    msg(01,13,16,01," zurück ")
                 --
    msg(02,03,10,16,"In den Input können Items")
    msg(02,04,10,16,"eingeworfen werden, die dann")
    msg(02,05,10,16,"automatisch getauscht werden.")

    msg(02,07,02,16,"Item und Umtauschliste:")
    msg(02,08,16,01,"  Klick Hier           ")

    msg(13,10,02,16,"Du willst deine")
    msg(13,11,02,16,"übrigen Items zurück")
    msg(13,12,16,01,"  Klick Hier        ")

    local event, side, X, Y = os.pullEvent("monitor_touch")
    if X >= 01 and X <= 08 and Y >= 13 and Y <= 13 and side == "back" then
        mainscreen()
    elseif X >= 01 and X <= 24 and Y >= 7 and Y <= 8 and side == "back" then
        liste()
    elseif X >= 13 and X <= 32 and Y >= 10 and Y <= 12 and side == "back" then
        rs.setOutput("left",true)
        sleep(1)
        rs.setOutput("left",false)
        mainscreen()
    elseif X >= 01 and X <= 33 and Y >= 01 and Y <= 06 and side == "back" then
        deutsch()
    elseif X >= 13 and X <= 33 and Y >= 7 and Y <= 8 and side == "back" then
        deutsch()
    elseif X >= 01 and X <= 33 and Y >= 9 and Y <= 9 and side == "back" then
        deutsch()
    elseif X >= 01 and X <= 12 and Y >= 10 and Y <= 12 and side == "back" then
        deutsch()
    elseif X >= 09 and X <= 33 and Y >= 13 and Y <= 13 and side == "back" then
        deutsch()
    end
end

function english()
    mon.setBackgroundColor(32768)
    mon.clear()
    msg(10,01,04,16,"Trading Station")
    msg(01,13,16,01,"  back  ")
    msg(02,03,10,16,"work in progress")





    local event, side, X, Y = os.pullEvent("monitor_touch")
    if X >= 01 and X <= 33 and Y >= 1 and Y <= 13 and side == "back" then
        mainscreen()
    end
end



function liste()
    mon.setBackgroundColor(32768)
    mon.clear()
    msg(10,01,04,16,"Tausch Station")
    msg(01,13,16,01," zurück ")
    msg(02,04,05,16,"12 UU-Matter   -> 1 Solar Panel")
    msg(02,06,05,16,"3 Minium Shard -> 4 Solar Panel")
    msg(02,08,05,16,"1 Ghast Tear   -> 8 Solar Panel")


    local event, side, X, Y = os.pullEvent("monitor_touch")
    if X >= 01 and X <= 33 and Y >= 1 and Y <= 13 and side == "back" then
        deutsch()
    end
end


function mainscreen()
    mon.setBackgroundColor(32768)
    mon.clear()
    msg(10,03,04,16,"Trading Station")
    msg(03,05,06,06,"             ") msg(19,05,06,06,"             ")
    msg(03,06,06,06,"             ") msg(19,06,06,06,"             ")
    msg(03,07,06,06,"             ") msg(19,07,06,06,"             ")
    msg(03,08,06,06,"             ") msg(19,08,06,06,"             ")
    msg(03,09,06,06,"             ") msg(19,09,06,06,"             ")
    msg(06,07,01,06,"Deutsch")       msg(22,07,01,06,"English")


    local event, side, X, Y = os.pullEvent("monitor_touch")
    if X >= 1 and X <= 15 and Y >= 5 and Y <= 9 and side == "back" then
        deutsch()
    elseif X >= 19 and X <= 33 and Y >= 5 and Y <= 9 and side == "back" then
        english()

    elseif X >= 01 and X <= 33 and Y >= 1 and Y <= 4 and side == "back" then
        mainscreen()
    elseif X >= 01 and X <= 33 and Y >= 10 and Y <= 14 and side == "back" then
        mainscreen()
    elseif X >= 16 and X <= 18 and Y >= 5 and Y <= 9 and side == "back" then
        mainscreen()
    end
end

mainscreen()