monitorbackend

function getmsg()
    while true do
      d = {}
      event, side, frequency, replyFrequency, message, distance = os.pullEvent("modem_message")
      d["e"] = event
      d["s"] = side
      d["f"] = frequency
      d["rf"] = replyFrequency
      d["m"] = message
      d["d"] = distance
      return d
    end
end

function farmona()
    local h = fs.open("running.txt", "r")
    local a = tonumber(h.readLine())
    --print("value in fle is: " .. tostring(a))
    h.close()

    return a
end

function togglea(newnumber)

    local h = fs.open("running.txt", "w")
    h.write(newnumber)
    h.close()

end

modem = peripheral.wrap("right")
modem.open(31302)

while farmona() == 1 do
    print("starting")
    modem.transmit(31350,31302,{["order"] = "go"})
    while true do
        print("getting msg")
        messa = getmsg()
        print("got msg")
        if messa["m"] == "done" then
            break
        end
    end
    print("done")
end

togglea(0)