ComputerCraft Tutorial: msg_sender_test3

-- ##############################
-- msg_sender test3a
-- http://hevohevo.hatenablog.com/

rednet.open("right")

local args = {...}
assert(args and #args>0, "msg_sender <receiver_id>")
local receiver_id = tonumber(args[1])

local trans_tbl = {
  w="turtle.forward()",
  a="turtle.turnLeft() turtle.forward() turtle.turnRight()",
  s="turtle.back()",
  d="turtle.turnRight() turtle.forward() turtle.turnLeft()",
  space="turtle.up()",
  leftShift="turtle.down()",
  right="turtle.turnRight()",
  left="turtle.turnLeft()",
  z="os.run({},'boring')", -- run other program
  x="os.run({},'rom/programs/turtle/dance')" -- let's dance!
}

print("Press 'q' to terminate")
while true do
  local event, scancode = os.pullEvent("key")
  local keyname = keys.getName(scancode)
  local message = trans_tbl[keyname]
  if keyname == "q" then break end
  print(keyname," => ",message or "none")

  if message then
    rednet.send(receiver_id, message)
  end
end