SmartPhone (Server)

--Server
local sChannel=101
local rChannel=102
local hChannel=103
local osName=Transmitter
local cursorPos=1

scr=peripheral.wrap("right")
scr.clear()
scr.setTextScale(2)

modem=peripheral.wrap("back")
modem.open(sChannel)
modem.open(rChannel)

while true do
	scr.setCursorPos(1,1)
	scr.write("phone status:")
	scr.setCursorPos(16,1)
	scr.write(modem.isOpen(sChannel))
	scr.setCursorPos(1,2)
	scr.write("host status:")
	scr.setCursorPos(16,2)
	scr.write(modem.isOpen(hChannel))

	scr.setCursorPos(1,3)
	scr.write("---------------------")

	local event, osef1, osef2, osef3, recieved, osef4 = os.pullEvent("modem_message")
	toSend=textutils.unserialize(recieved)
	scr.clear()

	print("envoie vers un tiers")
	modem.transmit(rChannel,sChannel,recieved)
	scr.setCursorPos(1,4)
	scr.write("New message:")
	scr.setCursorPos(1,5)
	scr.write(toSend.message)
	scr.setCursorPos(1,9)
	scr.write("by ")
	scr.setCursorPos(4,9)
	scr.write(toSend.sender)
	scr.setCursorPos(1,10)
	scr.write("for ")
	scr.setCursorPos(5,10)
	scr.write(toSend.reciever)
end