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