Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
35 lines (35 sloc) 4.73 KB
<?xml version="1.0" encoding="utf-8"?>
<ParameterDict>
<Entry Key="Border.Max.x" Value="0.203170875663216" />
<Entry Key="Border.Max.y" Value="-0.974819197030144" />
<Entry Key="Border.Max.z" Value="2.63537731480172" />
<Entry Key="Border.Min.x" Value="0.0387474809056918" />
<Entry Key="Border.Min.y" Value="-1.05703089440891" />
<Entry Key="Border.Min.z" Value="2.4709539200442" />
<Entry Key="Formula.Static.Cycles" Value="60" />
<Entry Key="Formula.Static.Formula" Value="-1" />
<Entry Key="Formula.Static.jx" Value="-1.2" />
<Entry Key="Formula.Static.jy" Value="0.01" />
<Entry Key="Formula.Static.jz" Value="0.8" />
<Entry Key="Formula.Static.jzz" Value="0" />
<Entry Key="Formula.Static.MinCycle" Value="100" />
<Entry Key="Intern.Formula.Source" Value="/// &lt;summary&gt;&#xD;&#xA; /// Initialisierung&#xD;&#xA; /// &lt;/summary&gt;&#xD;&#xA; public override void Init() {&#xD;&#xA; base.Init();&#xD;&#xA;&#xD;&#xA;additionalPointInfo=new AdditionalPointInfo();&#xD;&#xA; // Hier kann z.B. pow oder gr aus den Einstellungen gelesen werden.&#xD;&#xA; }&#xD;&#xA;&#xD;&#xA;&#xD;&#xA;// Mandelbox&#xD;&#xA; public override long InSet(double ar, double ai, double aj, double br, double bi, double bj, double bk, long zkl, bool invers) {&#xD;&#xA;&#xD;&#xA;double gr=50000;&#xD;&#xA;double xx, yy, zz;&#xD;&#xA; long tw;&#xD;&#xA; int n;&#xD;&#xA; double x=0,y=0,z=0;&#xD;&#xA; double r_n = 0;&#xD;&#xA;&#xD;&#xA; xx = x * x; yy = y * y; zz = z * z; &#xD;&#xA; tw = 0L;&#xD;&#xA; double r = Math.Sqrt(xx + yy + zz);&#xD;&#xA; double scale = ar;&#xD;&#xA;additionalPointInfo.red=0;&#xD;&#xA;additionalPointInfo.green=0;&#xD;&#xA;additionalPointInfo.blue=0;&#xD;&#xA;&#xD;&#xA; for (n = 1; n &lt; zkl; n++) {&#xD;&#xA;if(scale&lt;-1)&#xD;&#xA;scale=scale-ai*(scale+1);&#xD;&#xA;&#xD;&#xA;// ; fold box onto itself &#xD;&#xA; if (x &gt; 1)&#xD;&#xA; x = 2.0 - x;&#xD;&#xA; else if (x &lt; -1)&#xD;&#xA; x = -2.0 - x;&#xD;&#xA; &#xD;&#xA; if (y &gt; 1)&#xD;&#xA; y = 2.0 - y;&#xD;&#xA; else if (y &lt; -1)&#xD;&#xA; y = -2.0 - y;&#xD;&#xA; &#xD;&#xA; if (z &gt; 1)&#xD;&#xA; z = 2.0 - z;&#xD;&#xA; else if (z &lt; -1)&#xD;&#xA; z = -2.0 - z;&#xD;&#xA; &#xD;&#xA; // ; fold sphere onto itself&#xD;&#xA; double fixedRadius = 1;&#xD;&#xA; double minRadius = 0.00001;&#xD;&#xA; double length= r = Math.Pow(x*x + y*y + z*z,aj);&#xD;&#xA; // double length= r = x*x + y*y + z*z;&#xD;&#xA;&#xD;&#xA;&#xD;&#xA; if (length &gt; gr) { &#xD;&#xA;//additionalPointInfo.red=x*x/r;&#xD;&#xA;//additionalPointInfo.green=y*y/r;&#xD;&#xA;//additionalPointInfo.blue=z*z/r;&#xD;&#xA; tw = n; break; &#xD;&#xA; }&#xD;&#xA;&#xD;&#xA; double mult=1;&#xD;&#xA;&#xD;&#xA; if (length &lt; minRadius) {&#xD;&#xA; // mult=Math.Sqrt(fixedRadius)/(minRadius);&#xD;&#xA; } else&#xD;&#xA; if (length &lt; fixedRadius) {&#xD;&#xA; mult=Math.Sqrt(fixedRadius)/(length);&#xD;&#xA; }&#xD;&#xA; mult*=scale;&#xD;&#xA; x*=mult;&#xD;&#xA; y*=mult;&#xD;&#xA; z*=mult;&#xD;&#xA; x+=br;&#xD;&#xA; y+=bi;&#xD;&#xA; z+=bj;&#xD;&#xA; }&#xD;&#xA;&#xD;&#xA;&#xD;&#xA; if (invers) {&#xD;&#xA; if (tw == 0)&#xD;&#xA; tw = 1;&#xD;&#xA; else&#xD;&#xA; tw = 0;&#xD;&#xA; }&#xD;&#xA; return (tw);&#xD;&#xA;&#xD;&#xA; }&#xD;&#xA;&#xD;&#xA;" />
<Entry Key="Transformation.3.AngleX" Value="0" />
<Entry Key="Transformation.3.AngleY" Value="45" />
<Entry Key="Transformation.3.AngleZ" Value="0" />
<Entry Key="Transformation.3.CenterX" Value="-0.407525953022069" />
<Entry Key="Transformation.3.CenterY" Value="2.56540588074062" />
<Entry Key="Transformation.3.CenterZ" Value="0.07803688462125" />
<Entry Key="Transformation.AngleX" Value="12" />
<Entry Key="Transformation.AngleY" Value="0" />
<Entry Key="Transformation.AngleZ" Value="-23" />
<Entry Key="Transformation.Camera.AngleX" Value="0" />
<Entry Key="Transformation.Camera.AngleY" Value="0" />
<Entry Key="Transformation.Camera.AngleZ" Value="0" />
<Entry Key="Transformation.Perspective.Cameraposition" Value="0.3" />
<Entry Key="Transformation.Stereo.Angle" Value="-9" />
<Entry Key="Transformation.Stereo.EyeDistance" Value="0.5" />
<Entry Key="View.Height" Value="1200" />
<Entry Key="View.Perspective" Value="0" />
<Entry Key="View.Width" Value="1200" />
</ParameterDict>