News: Check out the originating "3d Mandelbulb" thread here
 Welcome, Guest. Please login or register. July 05, 2022, 09:54:29 PM 1 Hour 1 Day 1 Week 1 Month Forever Login with username, password and session length

## The All New FractalForums is now in Public Beta Testing! Visit FractalForums.org and check it out!

Data459pic10333
Previous Image | Next Image
Description: Cycles: 170
Mandebrot type formula (Formua=-1)
jx=-1.1   (ar)
jy=0.013 (ai)
jz=0        (aj)

Formula:

/// <summary>
/// Initialisierung
/// </summary>
public override void Init() {
base.Init();

additionalPointInfo=new AdditionalPointInfo();
// Hier kann z.B. pow oder gr aus den Einstellungen gelesen werden.
}

// Mandelbox
public override long InSet(double ar, double ai, double aj,  double br, double bi, double bj, double bk, long zkl, bool invers) {

double gr=50000;
double xx, yy, zz;
long tw;
int n;
double x=0,y=0,z=0;
double r_n = 0;

xx = x * x; yy = y * y; zz = z * z;
tw = 0L;
double r = Math.Sqrt(xx + yy + zz);
double scale = ar;
additionalPointInfo.red=0;
additionalPointInfo.green=0;
additionalPointInfo.blue=0;

for (n = 1; n < zkl; n++) {
if(scale<-1)
scale=scale-ai*(scale+1);

//              ; fold box onto itself
if (x > 1)
x = 2.0 - x;
else if (x < -1)
x = -2.0 - x;

if (y > 1)
y = 2.0 - y;
else if (y < -1)
y = -2.0 - y;

if (z > 1)
z = 2.0 - z;
else if (z < -1)
z = -2.0 - z;

//  ; fold sphere onto itself
double fixedRadius = 1;
double minRadius = 0.00001;
double length=   r = Math.Pow(x*x + y*y + z*z,aj);
//  double length=   r = x*x + y*y + z*z;

if (length > gr) {
additionalPointInfo.red=x*x/r;
additionalPointInfo.green=y*y/r;
additionalPointInfo.blue=z*z/r;
tw = n; break;
}

double mult=1;

if (length < minRadius) {
//  mult=Math.Sqrt(fixedRadius)/(minRadius);
}   else
if (length < fixedRadius) {
mult=Math.Sqrt(fixedRadius)/(length);
}
mult*=scale;
x*=mult;
y*=mult;
z*=mult;
x+=br;
y+=bi;
z+=bj;
}

if (invers) {
if (tw == 0)
tw = 1;
else
tw = 0;
}
return (tw);

}

Stats:
Total Favorities: 0 View Who Favorited
Filesize: 232.86kB
Height: 1200 Width: 1200
Keywords: Mandelbox Gestaltlupe
Posted by: trafassel September 25, 2010, 12:57:39 AM

Rating: Has not been rated yet.

Image Linking Codes
 BB Code Direct Link Html Link
0 Members and 1 Guest are viewing this picture.

 Comments (1) KRAFTWERK Global Moderator Fractal Senior Posts: 1439 Virtual Surreality September 27, 2010, 09:57:10 AMThis is soo beautiful Trafassel!!!!

Return to Gallery

Powered by SMF Gallery Pro

 Dilber MC Theme by HarzeM
Page created in 0.213 seconds with 28 queries. (Pretty URLs adds 0.01s, 1q)