gistfile1.ec

import "ecere"

ConsoleFile con { };

class MySocket : Socket
{
   unsigned int OnReceive(unsigned char * buffer, unsigned int count)
   {
      con.Write(buffer, 1, count);
      return count;
   }
}

Service myService
{
   port = 1234;

   void OnAccept()
   {
      MySocket { this };
   }
};

MySocket udpSocket { };

MySocket clientSocket { };
MySocket clientUDPSocket { };

class NetApp : GuiApplication
{
   void Main()
   {
      clientSocket.Connect("localhost", 1234);
      clientUDPSocket.DatagramConnect("localhost", 1234);

      myService.Start();
      udpSocket.DatagramHost(1234);

      while(true)
      {
         ProcessNetworkEvents();
         WaitNetworkEvent();
      }
   }
}