SpawnerControl v.2

m = peripheral.wrap("right")
rednet.open("back")
w = m.write
backC = colors.gray
textC = colors.white
bla = false
gha = false
cra = false
eld = false
cri = false
wra = false
sli = false
bas = false

local function offButton()
    rednet.broadcast("off")

    --Row 1
        -- red colors
        m.setCursorPos(4,2)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(4,5)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(4,8)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(4,11)
        m.setBackgroundColor(colors.red)
        w("Off")

    --Row 2
        m.setCursorPos(13,2)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(13,5)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(13,8)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(13,11)
        m.setBackgroundColor(colors.red)
        w("Off")

    --Row 3
        m.setCursorPos(23,2)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(23,5)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(23,8)
        m.setBackgroundColor(colors.red)
        w("Off")
        m.setCursorPos(23,11)
        m.setBackgroundColor(colors.red)
        w("Off")
    -- backC colors row 1
        m.setCursorPos(1,2)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(1,5)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(1,8)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(1,11)
        m.setBackgroundColor(backC)
        w("On")
    -- row 2
        m.setCursorPos(10,2)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(10,5)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(10,8)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(10,11)
        m.setBackgroundColor(backC)
        w("On")
    --  row 3
        m.setCursorPos(20,2)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(20,5)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(20,8)
        m.setBackgroundColor(backC)
        w("On")
        m.setCursorPos(20,11)
        m.setBackgroundColor(backC)
        w("On")

end

local function onButton()
    rednet.broadcast("on")

    --Row 1
        m.setCursorPos(1,2)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(1,5)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(1,8)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(1,11)
        m.setBackgroundColor(colors.lime)
        w("On")

    --Row 2
        m.setCursorPos(10,2)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(10,5)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(10,8)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(10,11)
        m.setBackgroundColor(colors.lime)
        w("On")

    --Row 3
        m.setCursorPos(20,2)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(20,5)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(20,8)
        m.setBackgroundColor(colors.lime)
        w("On")
        m.setCursorPos(20,11)
        m.setBackgroundColor(colors.lime)
        w("On")

        -- blackC part
        m.setCursorPos(4,2)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(4,5)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(4,8)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(4,11)
        m.setBackgroundColor(backC)
        w("Off")
        --row 2
        m.setCursorPos(13,2)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(13,5)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(13,8)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(13,11)
        m.setBackgroundColor(backC)
        w("Off")

        --row 3
        m.setCursorPos(23,2)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(23,5)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(23,8)
        m.setBackgroundColor(backC)
        w("Off")
        m.setCursorPos(23,11)
        m.setBackgroundColor(backC)
        w("Off")
end

local function nLine()
  local _, cY = m.getCursorPos()
  m.setCursorPos(1,cY+1)
end

-- Set background --
m.setBackgroundColor(backC)
m.clear()
m.setTextColor(textC)

local function Text()
    -- Blaze --
        m.setBackgroundColor(backC)
        m.setCursorPos(1,1)
        w("Blaze")
        nLine()
        w("On/Off")
    -- ghast --
        m.setCursorPos(10,1)
        w("Ghast")
        m.setCursorPos(10,2)
        w("On/Off")
    -- magma --
        m.setCursorPos(20,1)
        w("Magma")
        m.setCursorPos(20,2)
        w("On/Off")
     -- eldritch --
        m.setCursorPos(1,4)
        w("Eldritch")
        m.setCursorPos(1,5)
        w("On/Off")
    -- Crimson --
        m.setCursorPos(10,4)
        w("Crimson")
        m.setCursorPos(10,5)
        w("On/Off")
    -- Eldritch Crab --
        m.setCursorPos(20,4)
        w("Eld. Crab")
        m.setCursorPos(20,5)
        w("On/Off")
        m.setCursorPos(1,7)
    -- Wraiths
        w("Wraiths")
        m.setCursorPos(1,8)
        w("On/Off")
    -- pink slimes --
        m.setCursorPos(10,7)
        w("P. Slime")
        m.setCursorPos(10,8)
        w("On/Off")
    --wither
        m.setCursorPos(20,7)
        w("W. Skele.")
        m.setCursorPos(20,8)
        w("On/Off")
    -- bazals
        m.setCursorPos(1,10)
        w("Bazals")
        nLine()
        w("On/Off")
    -- wither
        m.setCursorPos(10,10)
        w("Wither")
        m.setCursorPos(10,11)
        w("On/Off")
    -- animals
        m.setCursorPos(20,10)
        w("Animals")
        m.setCursorPos(20,11)
        w("On/Off")
    --all
        m.setCursorPos(39,5)
        w("All spawners")
        m.setCursorPos(39,6)
        w("On/Disabled")
end
local function all()
     if x >= 39 and x<47 and y == 6 then
        print("Registed at: ".. x..",".. y)
        print("all")
        if all == true then
            all = false
            print("false")
            rednet.broadcast("off")
            offButton()
            m.setBackgroundColor(colors.red)
            m.setCursorPos(42,6)
            w("Disabled")
            m.setBackgroundColor(backC)
            m.setCursorPos(39,6)
            w("On")
        else
            all = true
            print("true")
            rednet.broadcast("on")
            onButton()
            m.setBackgroundColor(colors.lime)
            m.setCursorPos(39,6)
            m.write("On")
            m.setBackgroundColor(backC)
            m.setCursorPos(42,6)
            w("Disabled")
        end
    end
end

local function blaze()
     if x >= 1 and x<6 and y == 2 then
        print("Registed at: ".. x..",".. y)
        print("Blaze")
        if bla == true then
            bla = false
            print("false")
            rednet.send(1725 , "off")
            m.setBackgroundColor(colors.red)
            m.setCursorPos(4,2)
            w("Off")
            m.setBackgroundColor(backC)
            m.setCursorPos(1,2)
            w("On")
        else
            bla = true
            print("true")
            rednet.send(1725,"on")
            m.setBackgroundColor(colors.lime)
            m.setCursorPos(1,2)
            m.write("On")
            m.setBackgroundColor(backC)
            m.setCursorPos(4,2)
            w("Off")
        end
    end
end

local function ghast()
    if x >= 10 and x<15 and y == 2 then
        print(x ..",".. y)
        print("Ghast")
        print(gha)
        if gha == true then
            gha = false
            print("False")
            rednet.send(1727, "off")
            rednet.send(1734, "off")
            m.setCursorPos(13,2)
            m.setBackgroundColor(colors.red)
            m.write("Off")
            m.setBackgroundColor(backC)
            m.setCursorPos(10,2)
            w("On")
        else
            gha = true
            print("True")
            rednet.send(1727, "on")
            rednet.send(1734, "on")
            m.setCursorPos(10,2)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(13,2)
            m.setBackgroundColor(backC)
            w("Off")
        end
    end
end

local function magma()
    if x>=20 and x<26 and y ==2 then
        print(x ..",".. y)
        print("Magma")
        if mag == true then
            mag = false
            rednet.send(1726, "off")
            m.setCursorPos(23,2)
            m.setBackgroundColor(colors.red)
            w("Off")
            m.setCursorPos(20,2)
            m.setBackgroundColor(backC)
            w("On")
        else
            mag = true
            rednet.send(1726, "on")
            m.setCursorPos(20,2)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(23,2)
            m.setBackgroundColor(backC)
            w("Off")
        end
    end
end

local function eldritch()
    if x>= 1 and x <= 7 and y == 5 then
        print(x..",".. y)
        print("eldritch")
        if eld == false then
            eld = true
            rednet.send(1729, "on")
            m.setBackgroundColor(colors.lime)
            m.setCursorPos(1,5)
            w("On")
            m.setCursorPos(4,5)
            m.setBackgroundColor(backC)
            w("Off")
        else
            eld = false
            rednet.send(1729, "off")
            m.setCursorPos(1,5)
            m.setBackgroundColor(backC)
            w("On")
            m.setCursorPos(4,5)
            m.setBackgroundColor(colors.red)
            w("Off")
        end
    end
end

local function crimson()
    if x>=10 and x<=19 and y == 5 then
        print(x ..", ".. y)
        print("Crimson")
        if cri == false then
            cri = true
            rednet.send(1728, "on")
            m.setCursorPos(10,5)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(13,5)
            m.setBackgroundColor(backC)
            w("Off")
        else
            cri = false
            rednet.send(1728, "off")
            m.setCursorPos(10,5)
            m.setBackgroundColor(backC)
            w("On")
            m.setCursorPos(13,5)
            m.setBackgroundColor(colors.red)
            w("Off")
        end
    end
end

local function crab()
    if x>= 20 and x<= 30 and y == 5 then
        print(x .." ".. y)
        print("Crab")
        if cra == false then
           cra = true
           rednet.send(1730, "on")
           rednet.send(1731, "on")
           m.setCursorPos(20,5)
           m.setBackgroundColor(colors.lime)
           w("On")
           m.setCursorPos(23,5)
           m.setBackgroundColor(backC)
           w("Off")
         else
           cra = false
           rednet.send(1730, "off")
           rednet.send(1731, "off")
           m.setCursorPos(20,5)
           m.setBackgroundColor(backC)
           w("On")
           m.setCursorPos(23,5)
           m.setBackgroundColor(colors.red)
           w("Off")
        end
    end
end

local function wraith()
    if x>= 1 and x<= 10 and y == 8 then
       print(x .." ".. y)
       print("Wraith")
        if wra == false then
            wra = true
            rednet.send(1732, "on")
            rednet.send(1733, "on")
            m.setCursorPos(1,8)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(4,8)
            m.setBackgroundColor(backC)
            w("Off")
        else
            wra = false
            rednet.send(1732, "off")
            rednet.send(1733, "off")
            m.setCursorPos(1,8)
            m.setBackgroundColor(backC)
            w("On")
            m.setCursorPos(4,8)
            m.setBackgroundColor(colors.red)
            w("Off")
         end
    end
end

local function slime()
    if x >= 10 and x<15 and y == 8 then
        print(x ..",".. y)
        print("Pink ")
        if sli == true then
            sli = false
            print("False")
            rednet.send(1733, "off")
            m.setCursorPos(13,8)
            m.setBackgroundColor(colors.red)
            m.write("Off")
            m.setBackgroundColor(backC)
            m.setCursorPos(10,8)
            w("On")
        else
            sli = true
            print("True")
            rednet.send(1733, "on")
            m.setCursorPos(10,8)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(13,8)
            m.setBackgroundColor(backC)
            w("Off")
        end
    end
end

local function skele()
    if x>= 20 and x<= 30 and y == 8 then
        print(x .." ".. y)
        print("W. Skele")
        if wit == false then
            wit = true
            rednet.send(1738, "on")
            m.setCursorPos(20,8)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(23,8)
            m.setBackgroundColor(backC)
            w("Off")
        else
            wit = false
            rednet.send(1730, "off")
            rednet.send(1731, "off")
            m.setCursorPos(20,8)
            m.setBackgroundColor(backC)
            w("On")
            m.setCursorPos(23,8)
            m.setBackgroundColor(colors.red)
            w("Off")
        end
    end
end

local function bazals()
    if x >= 1 and x<7 and y == 11 then
        print(x ..",".. y)
        print("Bazals")
        print(bas)
        if bas == true then
            bas = false
            print("False")
            rednet.send(1764, "off")
            m.setCursorPos(4,11)
            m.setBackgroundColor(colors.red)
            m.write("Off")
            m.setBackgroundColor(backC)
            m.setCursorPos(1,11)
            w("On")
        else
            bas = true
            print("True")
            rednet.send(1764, "on")
            m.setCursorPos(1,11)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(4,11)
            m.setBackgroundColor(backC)
            w("Off")
        end
    end
end

local function wither()
    if x >= 10 and x<15 and y == 11 then
        print(x ..",".. y)
        print("Wither ")
        if wih == true then
            wih = false
            print("False")
            rednet.send(1765, "off")
            m.setCursorPos(13,11)
            m.setBackgroundColor(colors.red)
            m.write("Off")
            m.setBackgroundColor(backC)
            m.setCursorPos(10,11)
            w("On")
        else
            wih = true
            print("True")
            rednet.send(1765, "on")
            m.setCursorPos(10,11)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(13,11)
            m.setBackgroundColor(backC)
            w("Off")
        end
    end
end

local function ani()
    event, side, x, y = os.pullEvent("monitor_touch")
    if x>= 20 and x<= 30 and y == 11 then
        print(x .." ".. y)
        print("Animals")
        if ani == false then
            ani = true
            rednet.send(1738, "on")
            m.setCursorPos(20,11)
            m.setBackgroundColor(colors.lime)
            w("On")
            m.setCursorPos(23,11)
            m.setBackgroundColor(backC)
            w("Off")
        else
            ani = false
            rednet.send(1766, "off")
            m.setCursorPos(20,11)
            m.setBackgroundColor(backC)
            w("On")
            m.setCursorPos(23,11)
            m.setBackgroundColor(colors.red)
            w("Off")
        end
    end
end

--- BUTTONS ---
Text()
offButton()

--- MAIN LOOP ---
while true do
-- all
    all()
-- Control blaze
    blaze()
-- ghast
    ghast()
-- magma
    magma()
-- eldritch Control
    eldritch()
-- Crimson
    crimson()
-- Crabs
    crabs()
-- Wraith
    wraith()
-- pink slime --
    slime()
-- wither skeletons
    skele()
-- Bazals
    bazsals()
-- wither
    wither()
-- Animals
    ani()
-- end
sleep(.5)
end