anchor.diff:      for I := Max(Y-Radius,1) to Min(Y+Radius,fMapY) do
       for K := Max(X-Radius,1) to Min(X+Radius,fMapX) do
       if (Sqr(X-K) + Sqr(Y-I)) <= Sqr(Radius) then
  -      fMapPreview[(I-1)*fMapX + K].Revealed := True;
  +      fMapPreview[(I-1)*fMapX + K-1].Revealed := True;
     end;
   
   var
  
positive.code: { TMissionParserPreview }
  function TMissionParserPreview.GetTileInfo(X,Y: Integer): TKMTilePreview;
  begin
    Result := fMapPreview[(Y-1)*fMapX + X];
  end;
  
  
  
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
  