NamedPipeServerStream sps = new NamedPipeServerStream("char", PipeDirection.InOut, 100);
            sps.WaitForConnection();
            Console.WriteLine("подключился клиент");

            using (StreamReader sr = new StreamReader(sps))
            {
                string temp;
                // We read a line from the pipe and print it together with the current time
                while ((temp = sr.ReadLine()) != null)
                {
                    Console.WriteLine("{0}: {1}", DateTime.Now, temp);
                }
            }

             Console.WriteLine("End");

HANDLE hPipe; 
	LPTSTR lpvMessage=TEXT("Default message from client."); 
	TCHAR  chBuf[BUFSIZE]; 
	BOOL   fSuccess = FALSE; 
	DWORD  cbRead, cbToWrite, cbWritten, dwMode; 
	LPTSTR lpszPipename = TEXT("\\\\.\\pipe\\char"); 

	while (1) 
	{
		hPipe = CreateFile( 
         lpszPipename,   // pipe name 
         GENERIC_READ |  // read and write access 
         GENERIC_WRITE, 
         0,              // no sharing 
         NULL,           // default security attributes
         OPEN_EXISTING,  // opens existing pipe 
         0,              // default attributes 
         NULL);          // no template file 
 
		// Break if the pipe handle is valid. 
 
		if (hPipe != INVALID_HANDLE_VALUE) break; 
 
		// Exit if an error other than ERROR_PIPE_BUSY occurs. 
 
		if (GetLastError() != ERROR_PIPE_BUSY) 
		{
			MessageBox(NULL,TEXT("Could not open pipe. GLE=\n"+GetLastError()),TEXT(""),MB_OK);			
			return -1;
		}
 
		// All pipe instances are busy, so wait for 20 seconds. 
 
		if ( ! WaitNamedPipe(lpszPipename, 20000)) 
		{
			MessageBox(NULL,TEXT("Could not open pipe: 20 second wait timed out."),TEXT(""),MB_OK);
			return -1;
		} 
	} 

	cbToWrite = (lstrlen(lpvMessage)+1)*sizeof(TCHAR);

	fSuccess = WriteFile( 
      hPipe,                  // pipe handle 
      lpvMessage,             // message 
      cbToWrite,              // message length 
      &cbWritten,             // bytes written 
      NULL);                  // not overlapped 

	if ( ! fSuccess) 
	{
		MessageBox(NULL,TEXT("WriteFile to pipe failed. GLE=\n"+GetLastError()),TEXT(""),MB_OK);			
		return -1;
	}
	else
	{
		MessageBox(NULL,TEXT("OK"),TEXT(""),MB_OK);	
	}