User Tools

Site Tools


ru:netconnect

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

ru:netconnect [2016/01/01 22:49]
ru:netconnect [2020/02/28 10:46] (current)
Line 1: Line 1:
 +==== NetConnect ====
 +=== Формат: ===
 +**netconnect** имя_сервера, номер_порта\\
 +**netconnect**( имя_сервера, номер_порта )\\
 +**netconnect** номер_сокета, имя_сервера, номер_порта\\
 +**netconnect**( номер_сокета, имя_сервера, номер_порта )
 +=== Описание: ===
 +Открывает клиентское сетевое соединение с сервером. IP адрес или имя хоста указывается в параметре //имя_сервера//, а порт в параметре //номер_порта//. Если //номер_сокета//, используется нулевой (0) номер.
 +=== Смотри также: ===
 +[[netaddress|NetAddress]], [[netclose|NetClose]], [[netdata|NetData]], [[netlisten|NetListen]], [[netread|NetRead]], [[netwrite|NetWrite]]
 +=== Пример: ===
 +Откройте два экземпляра BASIC-256 на одном компьютере. Скопируйте код "сервера" в один экземпляр и код "клиента" в другой. Запустите сначала сервер, затем клиент. Вы сможете увидеть, как два различных процесса обмениваются сообщениями.<h4>Код для сервера</h4>
 +<code>
 +# Получаем сообщение и посылаем ответ об успешном соединении
 +print "wait for connection on " + netaddress()
 +netlisten 9997
 +print "got connection"
 +do
 +  while not netdata
 +   pause .1
 +   print ".";
 +  end while
 +  n$ = netread
 +  print n$
 +  netwrite "I got '" + n$ + "'."
 +until n$ = "end"
 +netclose
 +</code>
 +Будет напечатано (где xxx.xxx.xxx.xxx IPv4 адрес вашего компьютера)
 +<code>
 +wait for connection on xxx.xxx.xxx.xxx
 +got connection
 +.1 Hi There
 +....2 Hi There
 +........3 Hi There
 +..........4 Hi There
 +.....5 Hi There
 +.......6 Hi There
 +....7 Hi There
 +..........8 Hi There
 +....9 Hi There
 +.....10 Hi There
 +.end
 +</code>
 +<h4>Код для клиента</h4>
 +<code>
 +# Ожидаем ввода сообщения от пользователя и посылаем его на сервер
 +input "enter message?", m$
 +netconnect "127.0.0.1", 9997
 +for t = 1 to 10
 +  pause rand
 +  netwrite t + " " + m$
 +  print netread
 +next t
 +netwrite "end"
 +print netread
 +netclose
 +</code>
 +Будет напечатано
 +<code>
 +enter message?Hi There
 +I got &#039;1 Hi There&#039;.
 +I got &#039;2 Hi There&#039;.
 +I got &#039;3 Hi There&#039;.
 +I got &#039;4 Hi There&#039;.
 +I got &#039;5 Hi There&#039;.
 +I got &#039;6 Hi There&#039;.
 +I got &#039;7 Hi There&#039;.
 +I got &#039;8 Hi There&#039;.
 +I got &#039;9 Hi There&#039;.
 +I got &#039;10 Hi There&#039;.
 +I got &#039;end&#039;.
 +</code>
 +
 +=== Впервые в версии: ===
 +0.9.6.31
  
ru/netconnect.txt · Last modified: 2020/02/28 10:46 (external edit)