anchor.diff:  { TMissionParserPreview }
   function TMissionParserPreview.GetTileInfo(X,Y: Integer): TKMTilePreview;
   begin
  -  Result := fMapPreview[(Y-1)*fMapX + X];
  +  Result := fMapPreview[(Y-1)*fMapX + X-1];
   end;
   
   
  
positive.code:     fMapX := NewX;
      fMapY := NewY;
  
      SetLength(fMapPreview, fMapX * fMapY + 1);
      for I := 1 to fMapX * fMapY do
      begin
        S.Read(fMapPreview[I].TileID);
        S.Seek(1, soFromCurrent);
  
negative.code:                           if (P[0] = 255) then
                            begin
                              if RevealForPlayer(fLastHand) then
                                for I := 0 to fMapX * fMapY - 1 do
                                  fMapPreview[I].Revealed := True;
                            end
                            else
  