else {

                  lret = 0L; /* 阻塞模式 */

                  ioctlsocket(sd, FIONBIO, (u_long FAR *) &lret);

              }

              if (iClientOrServer == iShout) {  /* SHOUT */

                  /* 产生数据并写入套接口 */

                  if (iProto == iTCP)