Создайте сервер TCP/IP, который прослушивает подключения в localhost и порт 4000.

server = tcpserver("localhost",4000)

server = 
  TCPServer with properties:

        ServerAddress: "127.0.0.1"
           ServerPort: 4000
            Connected: 0
        ClientAddress: ""
           ClientPort: []
    NumBytesAvailable: 0

  Show all properties, functions

Создайте клиент TCP/IP для подключения к объекту сервера с помощью tcpclient. Необходимо указать тот же IP-адрес и номер порта, которые вы используете для создания server.

client = tcpclient("localhost",4000)

client = 
  tcpclient with properties:

              Address: 'localhost'
                 Port: 4000
    NumBytesAvailable: 0

  Show all properties, functions

Проверьте ASCII- терминатора строки по умолчанию для сервера.

server.Terminator

ans = 
"LF"

Установите терминаторы строки как для сервера, так и для клиента на "CR". Сервер TCP/IP и подключенный к нему клиент должны иметь один и тот же терминатор строки.

configureTerminator(server,"CR")
configureTerminator(client,"CR")

Запишите строку данных ASCII на клиент. The writeline функция автоматически добавляет терминатор строки к данным.

writeline(client,"First message.")

Запись другой строки данных ASCII с автоматически добавленным терминатором строки.

writeline(client,"Second message.")

Поскольку клиент подключен к серверу, данные, которые вы отправляете клиенту, можно считать с сервера. Считайте строку данных ASCII, полученных сервером от клиента. The readline функция возвращает данные до тех пор, пока не достигнет терминатора строки.

readline(server)

ans = 
"First message."

Снова прочитайте строку данных ASCII, чтобы вернуть вторую строку.

readline(server)

ans = 
"Second message."