10 REM > BLib.Skt2 0.11 18-Dec-2010

   20 REM Sockets and Resolver Library, noncompressed functions

   30 REM Requires X%->32-byte control block, Y%=X%DIV256

   40 REM FNdns_*() require name%->80 bytes

   50 :

   60 REM FNskt_open(pf%,type%,prot%)

   70 REM ----------------------------

   80 DEFFNskt_open(X%!4,X%!8,X%!12):!X%=&810:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

   90 :

  100 REM FNskt_bind(handle%,addr%,addrlen%)

  110 REM ----------------------------------

  120 DEFFNskt_bind(X%!4,X%!8,X%!12):!X%=&10810:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  130 :

  140 REM FNskt_listen(handle%,count%)

  150 REM ----------------------------

  160 DEFFNskt_listen(X%!4,X%!8):!X%=&2080C:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  170 :

  180 REM FNskt_accept(handle%,addr%,addrlen%)

  190 REM ------------------------------------

  200 DEFFNskt_accept(X%!4,X%!8,X%!12):!X%=&30810:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  210 :

  220 REM FNskt_connect(handle%,addr%,addrlen%)

  230 REM -------------------------------------

  240 DEFFNskt_connect(X%!4,X%!8,X%!12):!X%=&40810:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  250 :

  260 REM FNskt_recv(handle%,data%,len%,opts%)

  270 REM ------------------------------------

  280 DEFFNskt_recv(X%!4,X%!8,X%!12,X%!16):!X%=&50814:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  290 :

  300 REM FNskt_send(handle%,data%,len%,opts%)

  310 REM ------------------------------------

  320 DEFFNskt_send(X%!4,X%!8,X%!12,X%!16):!X%=&80814:A%=192:CALL&FFF1:=X%!4 OR X%?3>0

  330 :

  340 REM PROCskt_shutdown(handle%,type%)

  350 REM -------------------------------

  360 DEFPROCskt_shutdown(X%!4,X%!8):!X%=&B040C:A%=192:CALL&FFF1:ENDPROC

  370 :

  380 REM PROCskt_close(handle%)

  390 REM ----------------------

  400 DEFPROCskt_close(X%!4):!X%=&10040C:A%=192:CALL&FFF1:ENDPROC

  410 :

  420 REM FNdns_gethostbyname(name$)

  430 REM --------------------------

  440 DEFFNdns_gethostbyname(A$):!X%=&401808:X%!4=name%:$name%=A$:A%=192:CALL&FFF1:=X%+4 AND X%?3=0

  450 :

  460 REM FNdns_gethost(name$)

  470 REM --------------------

  480 DEFFNdns_gethost(A$):!X%=&411808:X%!4=name%:$name%=A$:A%=192:CALL&FFF1:=X%+4 AND X%?3=0

  490 :