anchor.diff:      fGTUEvent: TIMBEventEntry;
       fGTUSensorEvent: TIMBEventEntry;
       fGTUStatisticEvent: TIMBEventEntry;
  +    fSIMStartEvent: TIMBEventEntry;
  +    fSIMStopEvent: TIMBEventEntry;
       fOffsetInRD: TGIS_Point;
     public
       procedure HandleGTUEvent(aEvent: TIMBEventEntry; var aPayload: ByteBuffers.TByteBuffer); stdcall;
       procedure HandleGTUSensorEvent(aEvent: TIMBEventEntry; var aPayload: ByteBuffers.TByteBuffer); stdcall;
       procedure HandleGTUStatisticEvent(aEvent: TIMBEventEntry; var aPayload: ByteBuffers.TByteBuffer); stdcall;
  +    procedure HandleSimStartEvent(aEvent: TIMBEventEntry; var aPayload: ByteBuffers.TByteBuffer); stdcall;
  +    procedure HandleSimStopEvent(aEvent: TIMBEventEntry; var aPayload: ByteBuffers.TByteBuffer); stdcall;
     end;
   
     TSSMProject  = class(TProject)
  
positive.code:   end;
  end;
  
  { TSSMProject }
  
  constructor TSSMProject.Create(aSessionModel: TSessionModel; aConnection: TConnection;
  
negative.code:   fGTUSensorEvent.OnNormalEvent := HandleGTUSensorEvent;
    fGTUStatisticEvent := (scenario.project as TSSMProject).imb3Connection.Subscribe('StatisticsGTULane');
    fGTUStatisticEvent.OnNormalEvent := HandleGTUStatisticEvent;
    fSIMStartEvent := (scenario.project as TSSMProject).imb3Connection.Subscribe('Sim_Start');
    fSIMStartEvent.OnNormalEvent := HandleSIMStartEvent;
    fSIMStopEvent := (scenario.project as TSSMProject).imb3Connection.Subscribe('Sim_Stop');
    fSIMStopEvent.OnNormalEvent := HandleSIMStopEvent;
    fOffsetInRD.X := scenario.mapView.lon;
    fOffsetInRD.Y := scenario.mapView.lat;
    fOffsetInRD := (scenario.project as TSSMProject).sourceProjection.FromGeocs(fOffsetInRD);
  