anchor.diff:    state := 'UNKNOWN';
    end;
   
  - ORTCPServer.SendLn(Self.client, '-;AC;CONTROL;'+state);
  + ORTCPServer.SendLn(Self.client, '-;AC;'+IntToStr(Self.id)+';CONTROL;'+state);
   end;
   
   ////////////////////////////////////////////////////////////////////////////////
  
positive.code:  if ((Self.client = nil) or (Self.client <> Sender)) then Exit();
  
   if (UpperCase(parsed[3]) = 'LOGOUT') then begin
     if (Self.running) then
       Self.Stop();
     Self.SendLn(Sender, 'AUTH;logout;');
     Self.m_state.client := nil;
  
negative.code: procedure TBlkAC.OnClientDisconnect();
  begin
   Self.m_state.client := nil;
   if (not Self.stopped) then
     Self.Stop();
  
   Self.Change();
  