Control

local component = require "component"
local modem = component.modem
local probe = component.ElnProbe
local event = require "event"
modem.open(1)

local function split(inputstr, sep)
  if sep == nil then
    sep = "%s"
  end
  local t={}
  for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
    table.insert(t, str)
  end
  return t
end

while true do
  local _, _, _, _, _, message = event.pull("modem_message"); print(message)

  if message:match("TWMS ") then
    local commands = split(message)

    probe.wirelessSet(message, 1)
    os.sleep(0.2)
    probe.wirelessSet(message, 0)
  end
end