RednetAPI

local messend = ""
local idpc = 0
local mesreceive = ""

function SendResponse()
	while true do
		rednet.send(idpc, messend)
		sleep(1)
	end
end
function ReceiveResponse()
	while true do
		id, mesreceive = rednet.receive()
		if id == idpc then
			return
		end
	end
end
function CheckServer(mess, id, checkmess)
	messend = mess
	idpc = id

	while mesreceive ~= checkmess do
		parallel.waitForAny(SendResponse, ReceiveResponse)
	end
end
function ServerReturn(mess, id)
	messend = mess
	idpc = id

	parallel.waitForAny(SendResponse, ReceiveResponse)

	return mesreceive
end