socket=Sconnect(addr,port[,timeout_10ths])
Sclose(socket)
Srecv (socket, no_bytes [,timeout_10ths[ ,&pData_buf]]);
socket=Slisten(port)
socket=Saccept(lsock,[timeout_10ths,&pAddr,&pPort])
Ssend (socket, data, no_bytes, [, data1[,data2...]])
flag=Scheck(socket,rd_wr_err)
hostname=Shostname()
socket=SopenDGRAM(port)
SsendDGRAM(sock,addr,port,data,no_bytes,[data1[,data2...])
SrecvDGRAM (socket, no_bytes, pAddr, pPort ,timeout_10ths ,&pData_buf)
Strace(on_off)