Title: A bitt modified my formula
Post by: Alef on October 07, 2012, 06:07:30 PM
Slightly modified my baguabox formula, so that unit vector is not reversed. Realy just used + instead of -. Didn't explored much, but I got this 3D chessbord. (https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations/Chessboard_of_Space2.jpg) (https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations/Chessboard_of_Space3.jpg) Then switched to normal power 2 modulus function and got this. This is the same parameter with the same zoom ake wiewport and the same colour method. A bitt more chaotic: (https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations/Chessboard_of_Space5mod.jpg) Here is Chaos Pro code: Baguabox (quaternion) {
// Mandelbox alternative. // Based on work of TGlad, Traffasel, Kali, M Benesi and LucaGen. // By Edgar Malinovsky 25.07.2012. // You may redistribute this algorithm, modify, derivate or use comercialy as you wish as long as you atribute proper credits. // 10.08.2012 + smoother spherefold. // 23.09.2012 + changeable factor for inversion addition. // 04.10.2012 + fold using positive (non inverted) unit vector. // 04.10.2012 + and fold using normal power 2 modulus.
parameter real bailout; parameter quaternion julia; quaternion C; real zx, zy, zz, temp, modulus, radius; parameter real add, Min_R, Scale, lenght; parameter int settype; parameter int baguafold, modulustype;
void init(void) { if (settype=="Julia Set") { z = pixel; C = julia; } else { z= 0; C= pixel; }
}
void loop(void) { zx=real(z); zy=imag(z); zz=part_j(z);
if (modulustype == 0) { //Folding by pow 8 modulus having unit circle shaped as octagon pillow. modulus =((zx)^8 + (zy)^8+ (zz)^8)^0.125 ; } else if (modulustype == 1) {//normal, are faster and less detailed. modulus =sqrt(sqr(zx) + sqr(zy)+ sqr(zz)); }
if (baguafold == 0) { //more chaotic pattern.
if (modulus != 0) //formula works even without this conditional. { if (zx > lenght) { zx=-zx/modulus -add; } else if (zx < -lenght) { zx=-zx/modulus +add; }
if (zy > lenght) { zy=-zy/modulus -add; } else if (zy < -lenght) { zy=-zy/modulus +add; } if (zz > lenght) { zz=-zz/modulus -add; } else if (zz < -lenght) { zz=-zz/modulus +add; } }
} else if (baguafold == 1) { //more solid shape
if (modulus != 0) //formula works even without this conditional. { if (zx > lenght) { zx=zx/modulus +add; } else if (zx < -lenght) { zx=zx/modulus -add; }
if (zy > lenght) { zy=zy/modulus +add; } else if (zy < -lenght) { zy=zy/modulus -add; } if (zz > lenght) { zz=zz/modulus +add; } else if (zz < -lenght) { zz=zz/modulus -add; } }
} //spherefold. Similar to TGlads original, but allows to use a negative radius.
radius =sqr(zx) + sqr(zy) + sqr(zz) ;
if (radius < abs(Min_R) ) { temp = Scale/Min_R; } else { temp = Scale; }
//scaling and generating z value. z = quaternion(zx, zy, zz, 0)* temp + C;
} bool bailout(void) { return( |z| < bailout ); } void description(void) { this.title = "Baguabox";
bailout.caption = "Bailout Value"; bailout.default = 15.0; bailout.min = 0.5; bailout.hint = "Larger number increases fractal";
settype.caption = "Set type"; settype.enum = "Mandelbrot Set\nJulia Set"; settype.default = 0; separator.label1.caption = "Shape depends on folding parameters and bailout."; add.caption = "Add value"; add.default = 0.1; lenght.caption = "Lenght"; lenght.default = 2.0; Min_R.caption = "Radius"; Min_R.default = 0.5; Scale.caption = "Scale"; Scale.default = 1.5;
modulustype.caption = "Modulus for Folding"; modulustype.default=0; modulustype.enum="Power 8 (detailed)\nPower 2 (faster)";
baguafold.caption = "Bagua Fold vector"; baguafold.default=0; baguafold.enum="Negative\nPositive";
julia.caption = "Julia Parameter"; julia.default = (0.35,-0.35,2.0,0); julia.hint = "4th value is not used"; julia.visible = (settype=="Julia Set"); } }
And here is Chaos pro parameter file of second fractal. Start a quaternion and past this in Chaos pro Chessboard_of_Space3 { credits="Asdam1;10/5/2012/12/38" commentTemplate="Saved on $month$\ , $day$ $year$ at $hour$:$min$:$sec$\nDate: $date$\nTime: $time$\nR\ esolution: $xdots$ x $ydots$\nCalculation time: $calctime$\nVersion\ : $version$" CommentText="Saved on Oct, 7 2012 at 14:18:59\nDate: Oct 7, 2012\nT\ ime: 14:18:59\nResolution: 480 x 360\nCalculation time: 00:07:44.20\ 8\nVersion: 4.0" creationTime=2012/10/5/12/38/48 saveTime=2012/10/7/14/18/59 Creator="Asdam1" ModifiedBy="Asdam1" calcTime=464208 version=4.0 Type=Quaternion Subtype=0 Width=480 Height=360 DisplayDepth=24 roughness=+0.015 DOFEnabled=+1 DOFAperture=+1.25 DOFFocalLength=+0.436665978603351 DOFPlaneDistance=+0.873331957206702 FogEnabled=+1 FogRed=255 FogGreen=255 FogBlue=255 FogFront=+0.766960983401948 FogBack=+2.542169739843 FogDensity=+0.516159425503928 FogLinear=+0.05 FogSquare=+0.05 FogExp=+0.2 formula: filename="Malinovsky3D.cfm" entry="Baguabox" p_bailout=15 p_settype="Mandelbrot Set" p_add=0.09 p_lenght=2 p_Min_R=0.5 p_Scale=1.5 p_modulustype="Power 8 (detailed)" p_baguafold="Positive" p_julia=0.35/-0.35/2/0 p_addw1=0 p_addinverse=0 p_coefInv=0.125 p_coefInv2=0 p_coefInv3=0 p_vectored="None" p_coefVector=0.1/0.4 maxiter=12 highresmult=15 backtrace=4 inside: filename="NumberSeekerColouring.ccl" entry="LogTrichrome" p_pallete="Mixed Harmonic" p_posneg=0/0 p_lgtype="2- Smoother Triple log" p_darkness=2.5 p_postfn="1- None" p_switchRB=0 p_baseR=1.35 p_baseG=1.55 p_baseB=1.65 solid=0 background=16777215 dimensional: observer=0.48773243501017/-0.73956094850916/-0.49209625976303 topview=0.52265166928109/0.67338495891164/-0.52286511617172 viewpoint=-0.17697342729415/0.30453086102332/0.18812906173448 backClippingPlane=1.412316522135 lighting: lightModel=0 light0Shadow=yes light1Enabled=yes light1Shadow=yes light2Shadow=yes light3Enabled=yes light3Shadow=yes light4Enabled=yes light4Shadow=yes gradient: smooth=yes colormodel=CM_RGB knotmode=all dragknotmode=global Offset=0 knotrgb=(0,243,243,243) knotrgb=(32,0,90,220) knotrgb=(64,190,190,190) knotrgb=(96,220,60,0) knotrgb=(128,255,255,255) knotrgb=(160,0,34,160) knotrgb=(192,243,243,243) knotrgb=(224,240,34,0) } https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations (https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations) p.s. Still, a bitt chaotic. This fractal were a superb if it was bit more orderly. Maybe I should try to look for julia sets, they should be more orderly.
Title: Re: A bitt modified my formula
Post by: Alef on October 14, 2012, 04:28:41 PM
Julia sets, as expected, are more orderly. These are the most orderly of all so far generated, a walls made of checquered squeres. The smoothest have Radius=0, so that my spherefold effectively is turned off. Second have Radius=-0.5 so that my spherefold in the center continiusly mirrored smaller and smaller circles. Still Chaos Pro optimisation cuted out triangles in some wall panels, but this allows to see, what is beyond walls. Interesting would be to explore this in some more advanced raytracer;) Alsou a bitt updated LogTrichrome colour formula, so that it have more control over the final result. (https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations/Chess_apartment_jul4.jpg) Chess_apartment_jul4 { credits="Asdam1;10/9/2012/21/29" commentTemplate="Saved on $month$\ , $day$ $year$ at $hour$:$min$:$sec$\nDate: $date$\nTime: $time$\nR\ esolution: $xdots$ x $ydots$\nCalculation time: $calctime$\nVersion\ : $version$" CommentText="Saved on Oct, 12 2012 at 22:08:17\nDate: Oct 12, 2012\\ nTime: 22:08:17\nResolution: 320 x 240\nCalculation time: 00:09:09.\ 279\nVersion: 4.0" creationTime=2012/10/9/21/29/22 saveTime=2012/10/12/22/8/17 Creator="Asdam1" ModifiedBy="Asdam1" calcTime=549279 version=4.0 Type=Quaternion Subtype=0 Width=320 Height=240 WinWidth=320 WinHeight=240 DisplayDepth=24 roughness=+0.02 DOFAperture=+1 DOFFocalLength=+1.49843490041196 DOFPlaneDistance=+2.99686980082393 FogFront=+1.43841121435165 FogBack=+6.1111135840416 FogDensity=+0.196094392362284 formula: filename="Malinovsky3D.cfm" entry="Baguabox" p_bailout=14 p_settype="Julia Set" p_add=0 p_lenght=2 p_Min_R=0 p_Scale=1.5 p_modulustype="Power 8 (detailed)" p_baguafold="Positive" p_julia=0.3/0.3/0/0 p_addw1=0 p_addinverse=0 p_coefInv=0 p_coefInv2=0.125 p_coefInv3=0 p_vectored="None" p_coefVector=0.1/0.4 maxiter=17 highresmult=15 backtrace=4 inside: filename="NumberSeekerColouring.ccl" entry="LogTrichrome" p_pallete="Pallete by harmonic mean" p_posneg=0/0 p_lgtype="1- Triple logarithm" p_darkness=3 p_postfn="1- None" p_switchRB=0 p_baseR=1.37 p_baseG=1.55 p_baseB=1.65 solid=0 background=16777215 dimensional: topview=0.0011924770495299/0.99908630535026/-0.042721569026168 viewpoint=-0.25065136016492/0.14516231067434/0.38776837912137 lighting: light0Shadow=yes light1Enabled=yes light1Shadow=yes light4Enabled=yes light4Shadow=yes gradient: smooth=yes colormodel=CM_RGB knotmode=all dragknotmode=global Offset=0 knotrgb=(0,255,248,231) knotrgb=(43,128,0,64) knotrgb=(85,255,248,231) knotrgb=(127,255,120,70) knotrgb=(170,34,33,25) knotrgb=(214,165,217,0) }(https://sites.google.com/site/3dfractals/baguabox/baguaboxvariations/Chess_apartment_sept3.jpg) Chess_apartment_sept3 { credits="Asdam1;7/29/2012/22/52" commentTemplate="Saved on $month$\ , $day$ $year$ at $hour$:$min$:$sec$\nDate: $date$\nTime: $time$\nR\ esolution: $xdots$ x $ydots$\nCalculation time: $calctime$\nVersion\ : $version$" CommentText="Saved on Oct, 12 2012 at 22:08:36\nDate: Oct 12, 2012\\ nTime: 22:08:36\nResolution: 320 x 240\nCalculation time: 00:13:11.\ 538\nVersion: 4.0" creationTime=2012/7/29/22/52/47 saveTime=2012/10/12/22/8/36 Creator="Asdam1" ModifiedBy="Asdam1" calcTime=791538 version=4.0 Type=Quaternion Subtype=0 Width=320 Height=240 WinWidth=480 WinHeight=360 DisplayDepth=24 roughness=+0.02 FogRed=255 FogGreen=255 FogBlue=255 FogFront=+1.40803902864456 FogBack=+5.8464755988121 FogDensity=+0.20644448048056 FogLinear=+0.025 FogSquare=+0.025 FogExp=+0.1 formula: filename="Malinovsky3D.cfm" entry="Baguabox" p_bailout=15 p_settype="Julia Set" p_add=0.1 p_lenght=1.9 p_Min_R=-0.5 p_Scale=1.3 p_modulustype="Power 8 (detailed)" p_baguafold="Positive" p_julia=0.35/-0.35/0/0 p_addw1=0 p_addinverse=0 p_coefInv=0 p_coefInv2=0.125 p_coefInv3=0 p_vectored="None" p_coefVector=-0.1/0.5 maxiter=17 highresmult=15 backtrace=4 inside: filename="NumberSeekerColouring.ccl" entry="LogTrichrome" p_pallete="Fractal Explorer like" p_posneg=0/0 p_lgtype="1- Triple logarithm" p_darkness=3 p_postfn="1- None" p_switchRB=0 p_baseR=1.37 p_baseG=1.55 p_baseB=1.65 solid=0 background=0 dimensional: topview=0.0061384573678085/0.99152447328558/-0.1297749521938 viewpoint=-0.42443416197004/0.44037822567656/0.34456233590828 lighting: light0Shadow=yes light1Enabled=yes light1Shadow=yes light4Enabled=yes light4Shadow=yes gradient: smooth=yes colormodel=CM_RGB knotmode=all dragknotmode=global Offset=0 knotrgb=(0,100,100,100) knotrgb=(50,220,50,132) knotrgb=(101,120,245,194) knotrgb=(151,149,160,34) knotrgb=(202,40,8,100) } These were the most "square" julia sets. Throught it allways generated angular sets, but not allways square.
Title: Re: A bitt modified my formula
Post by: kram1032 on October 14, 2012, 05:29:34 PM
wanna play a party? :D
Title: Re: A bitt modified my formula
Post by: Alef on October 14, 2012, 05:52:18 PM
Probably at the party one should eat the mushrooms :scared:
Title: Re: A bitt modified my formula
Post by: Alef on October 23, 2012, 06:13:40 PM
Animated this. Well, it would need a better PC to animate this.
http://www.youtube.com/watch?v=Ta0jYxZx5ao (http://www.youtube.com/watch?v=Ta0jYxZx5ao)
http://vimeo.com/user4157496/baguabox (http://vimeo.com/user4157496/baguabox)
|