OPEN "localhost:12321" FOR SERVER AS echo
WHILE TRUE
fd = ACCEPT(echo)
PRINT "Incoming connection from: ", GETPEER$(fd)
RECEIVE data$ FROM fd
SEND data$ & CR$ & NL$ TO fd
CLOSE SERVER fd
WEND