# Haal een bericht op een stuur een 'success' terug
print "wachtend op een connectie op " + netaddress()
netlisten 9997
print "connectie opgesteld"
do
while not netdata
pause .1
print ".";
end while
n$ = netread
print n$
netwrite "I heb '" + n$ + "' ontvangen."
until n$ = "end"
netclose
Dit zal het volgende tonen (waar xxx.xxx.xxx.xxx het IPv4 adres van je computer is)
wachtend op een connectie op xxx.xxx.xxx.xxx
connectie opgesteld
.........1 hallo
.......2 hallo
....3 hallo
.........4 hallo
..5 hallo
.....6 hallo
........7 hallo
.........8 hallo
..........9 hallo
........10 hallo
end
Client Code
# Geef een bericht in di naar de server verstuurd zal worden
input "Geef een bericht in?", 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
toont dan
enter message? Hallo
Ik heb '1 Hallo' ontvangen.
Ik heb '2 Hallo' ontvangen.
Ik heb '3 Hallo' ontvangen.
Ik heb '4 Hallo' ontvangen.
Ik heb '5 Hallo' ontvangen.
Ik heb '6 Hallo' ontvangen.
Ik heb '7 Hallo' ontvangen.
Ik heb '8 Hallo' ontvangen.
Ik heb '9 Hallo' ontvangen.
Ik heb '10 Hallo' ontvangen.
Ik heb 'end' ontvangen.
See Also
NetAddress, NetClose, NetData, NetListen, NetRead, NetWrite
New To Version
0.9.6.31
vorige | Netwerk | volgende