mqtt2.lua

local srv = "http://91.226.122.210:15781"

local signal = 0

local ch = {1, 4, 128, 256, 1024}
local pld = 0


local mon = peripheral.wrap("front")
mon.setTextScale(0.5)
term.redirect(mon)
term.setCursorPos(1,1)
term.clear()

local mag = peripheral.wrap("top")

print("Access card required")
local msevt, token = os.pullEvent("mag_swipe")

term.clear()

local interval = 5


local MAXATTEMPTS = 5
local attempt = 0



while not http.checkURL(srv) do
    print("Server unavailable. Retrying...")
    attempt = attempt + 1
    if attempt > MAXATTEMPTS then
        print("Connection failed")
        os.exit()
    end
    sleep(10)
end

-- print("Server alive")
while true do
    rsevt = os.pullEvent("redstone")
    --signal = redstone.getBundledInput("left")
    --print(signal)
    term.clear()
    term.setCursorPos(1,1)
    for i=0, 4 do
        if redstone.testBundledInput("left", ch[i+1]) then
            print("CH" .. i .." ON")
            pld = 1
        else
            print("CH" .. i .." OFF")
            pld = 0
        end
        http.get(srv .. "/pub/wrkshp/room/ch" .. i .. "?token=" .. token .. "&payload=" .. pld)
    end
    sleep(1)
--    term.clear()
--    term.setCursorPos(1,1)

end