OpenPeripherals - Mobfarms

local glasses = peripheral.wrap("back")
rednet.open("top")

-- Computer ids
ender = 186
blaze = 187
witherboss = 188
cowfarm = 191
villager = 197
sheep = 198
pigmen = 201
igne = 202
glac = 207
witherskeleton = 203
ldoor = 194
rdoor = 193
sdoor = 215
witch = 231

-- Values for status check
local bl = false
local en = false
local wb = false
local cw = false
local vi = false
local sh = false
local pg = false
local ig = false
local ws = false
local gl = false
local wi = false

-- Window value
local window = false

-- Create icons
function icons()
    glasses.clear()
    glasses.addBox(0,0,14,13,0x9452EB,1)
    glasses.addText(4,3,"M",0x000000)
    glasses.addBox(14,0,14,13,0x808080,1)
    glasses.addText(18,3,"M",0x000000)
    glasses.sync()
end

-- Create mobfarms-box
function createMobBox()
    glasses.clear()
    glasses.addBox(5,20,58,138,0x000000,0.2)
    glasses.addText(10,25,"Mobfarms",0x9452EB)
    glasses.addText(10,35,"EN:",0x9C3838)
    glasses.addText(10,45,"BL:",0x9C3838)
    glasses.addText(10,55,"WB:",0x9C3838)
    glasses.addText(10,65,"CW:",0x9C3838)
    glasses.addText(10,75,"VI:",0x9C3838)
    glasses.addText(10,85,"SH:",0x9C3838)
    glasses.addText(10,95,"PG:",0x9C3838)
    glasses.addText(10,105,"WS:",0x9C3838)
    glasses.addText(10,115,"WI:",0x9C3838)
    glasses.addText(10,125,"XX:",0x9C3838)
    glasses.addText(10,135,"XX:",0x9C3838)
    glasses.addText(10,145,"XX:",0x9C3838)
    glasses.sync()
end

-- Create machine-box
function createMachineBox()
    glasses.addBox(5,170,58,40,0x000000,0.2)
    glasses.addText(10,175,"Machines",0x9452EB)
    glasses.addText(10,185,"IG:",0x9C3838)
    glasses.addText(10,195,"GL:",0x9C3838)
    glasses.sync()
end

-- Startup
function startup()
    -- Mobfarms
    rednet.send(ender,"off")
    rednet.send(blaze,"bloff")
    rednet.send(witherboss,"wboff")
    rednet.send(cowfarm,"cwoff")
    rednet.send(villager,"vioff")
    rednet.send(sheep,"shoff")
    rednet.send(pigmen,"off")
    rednet.send(witherskeleton,"off")
    rednet.send(witch,"off")

    -- Machines
    rednet.send(igne,"off")
    rednet.send(glac,"off")

    glasses.sync()
end

-- Check status
function status()
    -- Mobfarms
    if wi == true then
        glasses.addText(26,115,"Online",0x389C51)
    elseif wi == false then
        glasses.addText(26,115,"Offline",0x9C3838)
    end

    if en == true then
        glasses.addText(26,35,"Online",0x389C51)
    elseif en == false then
        glasses.addText(26,35,"Offline",0x9C3838)
    end

    if bl == true then
        glasses.addText(26,45,"Online",0x389C51)
    elseif bl == false then
        glasses.addText(26,45,"Offline",0x9C3838)
    end

    if wb == true then
        glasses.addText(26,55,"Online",0x389C51)
    elseif wb == false then
        glasses.addText(26,55,"Offline",0x9C3838)
    end

    if cw == true then
        glasses.addText(26,65,"Online",0x389C51)
    elseif cw == false then
        glasses.addText(26,65,"Offline",0x9C3838)
    end

    if vi == true then
        glasses.addText(26,75,"Online",0x389C51)
    elseif vi == false then
        glasses.addText(26,75,"Offline",0x9C3838)
    end

    if sh == true then
        glasses.addText(26,85,"Online",0x389C51)
    elseif sh == false then
        glasses.addText(26,85,"Offline",0x9C3838)
    end

    if pg == true then
        glasses.addText(26,95,"Online",0x389C51)
    elseif pg == false then
        glasses.addText(26,95,"Offline",0x9C3838)
    end

    if ws == true then
        glasses.addText(26,105,"Online",0x389C51)
    elseif ws == false then
        glasses.addText(26,105,"Offline",0x9C3838)
    end

    -- Machines
    if ig == true then
        glasses.addText(26,185,"Online",0x389C51)
    elseif ig == false then
        glasses.addText(26,185,"Offline",0x9C3838)
    end

    if gl == true then
        glasses.addText(26,195,"Online",0x389C51)
    elseif gl == false then
        glasses.addText(26,195,"Offline",0x9C3838)
    end
end

-- Update window if it's open
function updateWindow()
    if window == true then
        createMobBox()
        createMachineBox()
        status()
        glasses.sync()
    else
        -- Don't do anything..
    end
end

startup()
icons()

-- Commands
while true do
    local event = { os.pullEvent() }
    if event[1] == "glasses_chat_command" then
    -- Special
        if event[5] == "show" then
            window = true
            createMobBox()
            createMachineBox()
            status()
            glasses.sync()
        elseif event[5] == "hide" then
            window = false
            glasses.clear()
            icons()
            glasses.sync()
    -- Mobfarms
        elseif event[5] == "enon" then
            rednet.send(ender,"on")
            en = true
            updateWindow()
        elseif event[5] == "enoff" then
            rednet.send(ender,"off")
            en = false
            updateWindow()
        elseif event[5] == "wion" then
            rednet.send(witch,"on")
            wi = true
            updateWindow()
        elseif event[5] == "wioff" then
            rednet.send(witch,"off")
            wi = false
            updateWindow()
        elseif event[5] == "blon" then
            rednet.send(blaze,"blon")
            bl = true
            updateWindow()
        elseif event[5] == "bloff" then
            rednet.send(blaze,"bloff")
            bl = false
            updateWindow()
        elseif event[5] == "wbon" then
            rednet.send(witherboss,"wbon")
            wb = true
            updateWindow()
        elseif event[5] == "wboff" then
            rednet.send(witherboss,"wboff")
            wb = false
            updateWindow()
        elseif event[5] == "cwon" then
            rednet.send(cowfarm,"cwon")
            cw = true
            updateWindow()
        elseif event[5] == "cwoff" then
            rednet.send(cowfarm,"cwoff")
            cw = false
            updateWindow()
        elseif event[5] == "vion" then
            rednet.send(villager,"vion")
            vi = true
            updateWindow()
        elseif event[5] == "vioff" then
            rednet.send(villager,"vioff")
            vi = false
            updateWindow()
        elseif event[5] == "shon" then
            rednet.send(sheep,"shon")
            sh = true
            updateWindow()
        elseif event[5] == "shoff" then
            rednet.send(sheep,"shoff")
            sh = false
            updateWindow()
        elseif event[5] == "pgon" then
            rednet.send(pigmen,"on")
            pg = true
            updateWindow()
        elseif event[5] == "pgoff" then
            rednet.send(pigmen,"off")
            pg = false
            updateWindow()
        elseif event[5] == "wson" then
            rednet.send(witherskeleton,"on")
            ws = true
            updateWindow()
        elseif event[5] == "wsoff" then
            rednet.send(witherskeleton,"off")
            ws = false
            updateWindow()

        -- Other
        elseif event[5] == "ldooro" then
            rednet.send(ldoor,"open")
        elseif event[5] == "ldoorc" then
            rednet.send(ldoor,"close")
        elseif event[5] == "rdooro" then
            rednet.send(rdoor,"open")
        elseif event[5] == "rdoorc" then
            rednet.send(rdoor,"close")
        elseif event[5] == "sdooro" then
            rednet.send(sdoor,"open")
        elseif event[5] == "sdoorc" then
            rednet.send(sdoor,"close")

        -- Machines
        elseif event[5] == "igon" then
            rednet.send(igne,"on")
            ig = true
            updateWindow()
        elseif event[5] == "igoff" then
            rednet.send(igne,"off")
            ig = false
            updateWindow()
        elseif event[5] == "glon" then
            rednet.send(glac,"on")
            gl = true
            updateWindow()
        elseif event[5] == "gloff" then
            rednet.send(glac,"off")
            gl = false
            updateWindow()
        sleep(0.75)
        end
    end
end