Server code -- event

  class event_srv : public handler_srv, _crob(hush,event) {
  public:
      event_srv(event* e) : handler_srv(e) { }
  
      event_srv() { _type = 0; _x = 0; _y = 0; } 
  
      virtual void type( long t, ENV ) { _type = t; }
      virtual long type( ENV ) { return _type; }
  
      virtual void x( long t, ENV ) { _x = t; }
      virtual long x( ENV ) { return _x; }
  
      virtual void y( long t, ENV ) { _y = t; }
      virtual long y( ENV ) { return _y; }
  
  protected:
      event* _body() { return (event*) handler_srv::_body(); }
      long _type, _x, _y;
  };