local key = "0ec2eb25b6166c0c27a394ae118ad829"

local serverid = 1

if read() == "get" then
  rednet.send(serverid, "getmail")
  os.sleep(1)
  email = read()
  rednet.send(serverid, email)
  local senderId, message, protocol = rednet.receive()
  file = fs.open("tempcodes", "w")
  file.write(message)
  file.close()
  file = fs.open("tempcodes", "r")
  nextcode = file.readLine()

  repeat
    local response = http.get(
    "http://pastebin.com/raw.php?i="..textutils.urlEncode( nextcode )
    )
    term.clear()
	term.setCursorPos(1,1)
	print(response)
    read()
	nextcode = file.readLine()
  until nextcode == nill
  file.close()
else

print("E-mail:")
email = read()
print("message:")
message = read()


local response = http.post(
"http://pastebin.com/api/api_post.php",
"api_option=paste&"..
"api_dev_key="..key.."&"..
"api_paste_format=lua&"..
"api_paste_name="..textutils.urlEncode(email).."&"..
"api_paste_code="..textutils.urlEncode(message)
)


rednet.send(serverid, email)
os.sleep(1)
rednet.send(serverid, response)

end