Helmsman.lua

local component = require("component")
local event = require("event")
local m = component.modem
local sides = require("sides")
local colors = require("colors")
local c = component.computer
local rs = component.redstone

local bStar = 0
local bPort = 0

local pStar = 935
local pPort = 539

local rStar
local rPort

while (true)
do

  event.pull("redstone_changed")

  rPort = rs.getInput(sides.south)
  rStar = rs.getInput(sides.north)

  if (rPort > 0)
  then
    if (bPort == 0)
    then
      m.broadcast(pPort, "do")
      bPort = 1
      c.beep(261,1)
    end
  else
    bPort = 0
  end

  if (rStar > 0)
  then
    if (bStar == 0)
    then
      m.broadcast(pStar, "do")
      bStar = 1
      c.beep(261,1)
    end
  else
    bStar = 0
  end

end