move

local programPath="frameengine/move"
local args={...}
local runningProgram=shell.getRunningProgram()
local transmitter
local trasmitterSide
local intervalBetweenPulses=1.5

local frequencies={
  north=3401,
  east=3402,
  south=3403,
  west=3404,
  up=3405,
  down=3406
}

-- initialize the wireless transmitter
for i, side in pairs(redstone.getSides()) do
  if peripheral.getType(side)=="wireless-transmitter" then
    transmitter=peripheral.wrap(side)
    trasmitterSide=side
  end
end

if transmitter==nil then
  print("No wireless transmitter found!")
  return
end

function pulse(frequency)
  transmitter.setFreq(frequency)
  redstone.setOutput(trasmitterSide, true)
  sleep(0.1)
  redstone.setOutput(trasmitterSide, false)
end

function move(direction, count)
  for i=1, count*2 do
    pulse(frequencies[direction])
    sleep(intervalBetweenPulses)
  end
end

function runMoveCommand()
  if #args==2 then
    move(args[1], tonumber(args[2]))
  else
    print("move [north/south/west/east/up/down] [number of blocks]")
  end
end

if runningProgram==programPath then
  runMoveCommand()
end