Logo by chaos_crystal - Contribute your own Logo!

END OF AN ERA, FRACTALFORUMS.COM IS CONTINUED ON FRACTALFORUMS.ORG

it was a great time but no longer maintainable by c.Kleinhuis contact him for any data retrieval,
thanks and see you perhaps in 10 years again

this forum will stay online for reference
News: Visit the official fractalforums.com Youtube Channel
 
*
Welcome, Guest. Please login or register. April 23, 2024, 08:53:38 AM


Login with username, password and session length


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


Pages: [1]   Go Down
  Print  
Share this topic on DiggShare this topic on FacebookShare this topic on GoogleShare this topic on RedditShare this topic on StumbleUponShare this topic on Twitter
Author Topic: Life as Balancing Act  (Read 853 times)
0 Members and 1 Guest are viewing this topic.
trafassel
Fractal Bachius
*
Posts: 531


trafassel
« on: May 17, 2013, 10:52:22 PM »

Life as Balancing Act



http://www.fractalforums.com/index.php?action=gallery;sa=view;id=14115

public override void Init() { base.Init();if(GetString("intern.Formula.TempUpdateVal")!="03216ff34486e9a9cbbe6ec484326912"){SetParameterBulk("<Entry Key='Border.Max.x' Value='-114.665722767559' /><Entry Key='Border.Max.y' Value='39.4660451441905' /><Entry Key='Border.Max.z' Value='40.387415677018' /><Entry Key='Border.Max.zz' Value='0' /><Entry Key='Border.Min.x' Value='-114.6657396313' /><Entry Key='Border.Min.y' Value='39.4660282804495' /><Entry Key='Border.Min.z' Value='40.3873988132771' /><Entry Key='Border.Min.zz' Value='0' /><Entry Key='Formula.Mandelbulb.Pow1' Value='2' /><Entry Key='Formula.Mandelbulb.Pow2' Value='2' /><Entry Key='Formula.Mandelbulb.Pow3' Value='2' /><Entry Key='Formula.Static.Cycles' Value='250' /><Entry Key='Formula.Static.Formula' Value='-1' /><Entry Key='Formula.Static.jx' Value='0' /><Entry Key='Formula.Static.jy' Value='0' /><Entry Key='Formula.Static.jz' Value='0' /><Entry Key='Formula.Static.jzz' Value='0' /><Entry Key='Formula.Static.MinCycle' Value='250' /><Entry Key='Transformation.3.AngleX' Value='0' /><Entry Key='Transformation.3.AngleY' Value='0' /><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='0' /><Entry Key='Transformation.AngleY' Value='0' /><Entry Key='Transformation.AngleZ' Value='0' /><Entry Key='Transformation.Camera.AngleX' Value='20' /><Entry Key='Transformation.Camera.AngleY' Value='-45' /><Entry Key='Transformation.Camera.AngleZ' Value='160' /><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='1' /><Entry Key='View.Width' Value='1200' /><Entry Key='intern.Formula.TempUpdateVal' Value='03216ff34486e9a9cbbe6ec484326912' />");} additionalPointInfo=new AdditionalPointInfo();} 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=ar,y=ai,z=aj; double r_n = 0; xx = x * x; yy = y * y; zz = z * z; tw = 0L; double r = Math.Sqrt(xx + yy + zz); double scale = 1.1; additionalPointInfo.red=0; additionalPointInfo.green=0; additionalPointInfo.blue=0; for (n = 1; n < zkl; n++) {bool xChanged=false;for (int i=0;i<6;i++) {xChanged=false; if (x > 1){ x = 2.0 - x;xChanged=true;} else if (x < -1){ x = -2.0 - x;xChanged=true;}if(!xChanged) break;} 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; double fixedRadius = 1; xx = x * x; yy = y * y; zz = z * z; double length= r = xx + yy + zz;if(r!=0 && n>100 && n<150) { additionalPointInfo.red+=xx/r; additionalPointInfo.green+=yy/r; additionalPointInfo.blue+=zz/r;}if (length > gr) { tw = n; break; } double mult=1; if (length < fixedRadius && length >0) { mult=fixedRadius/(length); } mult*=scale; x*=mult; y*=mult; z*=mult;if(x<0) {x=-x;} x+=br; y+=bi; z+=bj;} if (invers) { if (tw == 0) tw = 1; else tw = 0; } return (tw);}
« Last Edit: May 17, 2013, 10:56:07 PM by trafassel » Logged
Pages: [1]   Go Down
  Print  
 
Jump to:  

Related Topics
Subject Started by Replies Views Last post
Passion for Life Images Showcase (Rate My Fractal) titia 2 1765 Last post May 30, 2008, 10:45:27 AM
by _db_
It's life Jim, but not as we know it Mandelbulb3D Gallery Madman 0 1200 Last post November 07, 2010, 10:36:24 PM
by Madman
Still Life IV Wildstyle Mad 0 1014 Last post May 25, 2012, 05:47:37 AM
by Mad
Life on the Tip of a Pin Mandelbulb3D Gallery TomWilcox 0 578 Last post September 19, 2012, 10:45:21 PM
by TomWilcox
Life as we don't know it Images Showcase (Rate My Fractal) Kali 7 925 Last post February 07, 2013, 04:22:28 AM
by Kali

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2015, Simple Machines

Valid XHTML 1.0! Valid CSS! Dilber MC Theme by HarzeM
Page created in 0.14 seconds with 26 queries. (Pretty URLs adds 0.004s, 2q)