datacc

loop = true
function data_set(channel, raw)
  raw = raw:gsub(" ", ":S:")
  http.request("http://creeper9207.com/cc/data_set.php?number="..channel.."&&data="..raw)
  while loop == true do
    event = os.pullEvent()
    if event == "http_success" then
      return "success"
    elseif event == "http_failure" then
      return "failure:1"
    end
  end
end
function data_get(channel)
  http.request("http://creeper9207.com/cc/data_get.php?number="..channel)
  event, url, data = os.pullEvent()
  while loop == true do
    if event == "http_success" then
      return data.readAll()
    elseif event == "http_failure" then
      return "failure:2"
    end
  end
end