computercraft: chatsay

speaker = peripheral.wrap("left")
chatbox = peripheral.wrap("right")
range = 100000
lang = "de"
response = ""

running = true

while running do
 event, player, message = os.pullEvent("chat")

 if message ~= nil then

  if message == "stop" then
   running = false
   message = "stopping"
  end
  if string.sub(message,1,7) == "setlang" then
    lang = string.sub(message, 9)
    message = "setting language to "..lang
  end

  speaker.speak(message, range, lang)
 end
end