diff --git a/2.10/Source/Render64.pas b/2.10/Source/Render64.pas index 3ca3221..2290f26 100644 --- a/2.10/Source/Render64.pas +++ b/2.10/Source/Render64.pas @@ -251,7 +251,7 @@ begin IterateBatchProc := IterateBatchAngle; end; - nsamples := Round(sample_density * bucketSize / (oversample * oversample)); + nsamples := Round(sample_density * NrSlices * bucketSize / (oversample * oversample)); nrbatches := Round(nsamples / (fcp.nbatches * SUB_BATCH_SIZE)); for i := 0 to nrbatches do begin diff --git a/2.10/Source/RenderMM.pas b/2.10/Source/RenderMM.pas index 83ba84f..a8038ae 100644 --- a/2.10/Source/RenderMM.pas +++ b/2.10/Source/RenderMM.pas @@ -96,8 +96,8 @@ begin begin cosa := cos(FCP.FAngle); sina := sin(FCP.FAngle); - rcX := image_Center_X*(1 - cosa) - image_Center_X*sina - camX0; - rcY := image_Center_Y*(1 - cosa) + image_Center_Y*sina - camY0; + rcX := image_Center_X*(1 - cosa) - image_Center_Y*sina - camX0; + rcY := image_Center_Y*(1 - cosa) + image_Center_X*sina - camY0; end; end; @@ -182,7 +182,7 @@ begin FImageMaker.SetCP(FCP); FImageMaker.Init; - fcp.sample_density := fcp.sample_density * nrslices; +// fcp.sample_density := fcp.sample_density * nrslices; fcp.height := fcp.height div nrslices; center_y := fcp.center[1]; zoom_scale := power(2.0, fcp.zoom); @@ -213,7 +213,7 @@ begin end; end; - fcp.sample_density := fcp.sample_density / nrslices; +// fcp.sample_density := fcp.sample_density / nrslices; fcp.height := fcp.height * nrslices; end;