WndClass.style         = CS_HREDRAW | CS_VREDRAW;

       WndClass.cbClsExtra    = 0;

       WndClass.cbWndExtra    = 0;

    // register the class

    if (!RegisterClass(&WndClass))

              return(FALSE);

    return(TRUE);

}

long FAR PASCAL ClientProc(HWND hWnd, unsigned message, UINT wParam, LONG lParam)

{

       int length, i;

       WSADATA wsaData;

       int Status;

       switch (message)

       {