Radio

local modem = peripheral.wrap("back")
modem.open(14112)
local r = true
while r do
    local event, modemSide, senderChannel, replyChannel, message , senderDistance = os.pullEvent("modem_message")
    term.clear()
    term.setCursorPos(1, 1)
    volume = message
        if volume=="e" then
            r= false
        else
            volume = tonumber(volume)
            redstone.setAnalogOutput("right", volume)
            sleep(1)
        end
end