anchor.diff:             'All work and no play makes Jack a dull boy. All work and no play makes Jack a dull boy.'
         ;
   
  -      MQTTClient := TMQTTClient.Create('localhost', 1883);
  +      MQTTClient := TMQTTClient.Create('www.google.com', 1883);
   
         // Setup callback handlers
         MQTTClient.OnConnAck := @OnConnAck;
  
positive.code:           CheckSynchronize(0);
  
            // Yawn.
            sleep(100);
          end;
      end;
  
  
negative.code: 
        while true do
          begin
  	Writeln('System:time:', TimeStampToMSecs(DateTimeToTimeStamp(Now)));
            case state of 
              STARTING :
                         begin
  