• May 18, 2021, 04:25:05 PM

Login with username, password and session length

 


Spudsville butterfliesRemember the 60s?Distrubance in the force
Remember the 60s?
Previous Image | Next Image
Description: Rendition of Fragmentarium Spudsville,  smeared to the edge of extinction  :worship:
Please visit: https://github.com/3Dickulus/FragM/blob/master/Fragmentarium-Source/Examples/Experimental/Spudsville2.frag

Please note. 3Dickulus traced the lineage of this algorithm back to the first incarnation of Fragmentarium :
// Spudsville, based on Lenords parameters from here: http://www.fractalforums.com/index.php?action=gallery;sa=view;id=4248

He also found this reference to DarkBeam's work with spudsville: http://www.fractalforums.com/feature-request/extract-mathematical-formula-from-mandelbulb/msg58368/#msg58368

MB3D users can find parameters here: https://fractalforums.org/index.php?action=gallery;sa=view;id=5814#c3235

control.isteps = 7
control.cx = 1.200
control.cy = 2.820
control.cz = 2.970
control.cw = 3.170
control.dx = 2.710
control.dy = 6.030
control.dz = 0.550
control.fx = 1.200

void spudsSphereFold(thread float3 &z, thread float &dz, device Control &control) {
    float r2 = dot(z,z);
    if (r2< control.cx) {
        float temp = (control.cy / control.cx);
        z *= temp;
        dz *= temp;
    } else if (r2 < control.cy) {
        float temp = control.cy /r2;
        z *= temp;
        dz *= temp;
    }
}

void spudsBoxFold(thread float3 &z, thread float &dz, device Control &control) {
    z = clamp(z, -control.cz, control.cz) * 2.0 - z;
}

void spudsBoxFold3(thread float3 &z, thread float &dz, device Control &control) {
    z = clamp(z, -control.cw,control.cw) * 2.0 - z;
}

void spudsPowN2(thread float3 &z, float zr0, thread float &dr, device Control &control) {
    float zo0 = asin( z.z/zr0 );
    float zi0 = atan2( z.y,z.x );
    float zr = pow( zr0, control.fx-1.0 );
    float zo = zo0 * control.fx;
    float zi = zi0 * control.fx;
    dr = zr*dr * control.fx * abs(length(float3(1.0,1.0,control.dx)/sqrt(3.0))) + 1.0;
    zr *= zr0;
    z = zr*float3( cos(zo)*cos(zi), cos(zo)*sin(zi), control.dx * sin(zo) );
}

float DE(float3 pos,device Control &control, thread float4 &orbitTrap) {
    int i = 0;
    float dz = 1.0;
    float r = 1;
   
    float3 ot,trap = control.otFixed;
    if(control.orbitStyle == 2) trap -= pos;
   
    while(r < 10 && i < control.isteps) {
        if (i <=  control.isteps/2) {
            spudsBoxFold(pos,dz,control);
            spudsSphereFold(pos,dz,control);
            pos = control.dz * pos;
            dz *= abs(control.dz);
            r = length(pos);
        } else {
            spudsBoxFold3(pos,dz,control);
            r = length(pos);
            spudsPowN2(pos,r,dz,control);
            pos = control.dw * pos;
            dz *= abs(control.dw);
        }
       
        ot = pos;
        if(control.orbitStyle > 0) ot -= trap;
        orbitTrap = min(orbitTrap, float4(abs(ot), dot(ot,ot)));
       
        i++;
    }
   
    return r * log(r) / dz;
}

Stats:
Views: 100
Total Favorities: 0 View Who Favorited
Filesize: 4.09MB
Height: 1057 Width: 2000
Keywords: Peter Max stereo 
Posted by: kosalos April 30, 2021, 03:30:35 AM

Rating: ***** by 3 members.
Total Likes: 3

Image Linking Codes
BB Code
BB Thumbnail Image Code
BB Medium Image Code
0 Members and 1 Guest are viewing this picture.

Comments (12)

3DickUlus
Administrator
*******
Offline Offline

Posts: 2217



View Profile WWW
April 30, 2021, 06:13:32 AM
Groovy man! :time:
velvet
Fractal Fanatic
***
Offline Offline

Posts: 20



View Profile
April 30, 2021, 10:01:32 AM
Well yes, yes I do. I think I had a dress in this fabric, only shorter.  :yes:
gerson
Fractal Frankfurter
*
Offline Offline

Posts: 609



View Profile
May 02, 2021, 04:50:26 AM
Super.
Tas_mania
Fractal Feline
**
Offline Offline

Posts: 183



View Profile WWW
May 03, 2021, 01:26:18 AM
I'm not sure what happens to links of Fractal Forums.
This link takes me to the 'Spudsville2.fract' Will it work?
https://github.com/3Dickulus/Fragmentarium_Examples_Folder/blob/b6da79fc9ac346d0a7197b16f323e4759f3c68a6/Experimental/Spudsville2.frag
kosalos
Fractal Feline
**
Offline Offline

Posts: 153



View Profile
May 03, 2021, 06:03:41 AM
Yes, the frag you linked to is the same algorithm I copied from.
Fragmentarium is an excellent program, but for me half the fun is writing my own stuff, even if it isn't as good.
All the DE()s I have been posting lately are written in the Metal shading language for the Mac, but they should be easy to refactor to FragM.
In the same github link you found is a 'kosalos' folder that holds many frags for FragM, including a spudsville.frag that I'm sure matches what you have found.
I'm hooked on stereo renditions of everything, so all those frags in my folder can be rendered in Stereo mode in Fragm if you like (read comments at top of 3D-XId.frag)
good luck
Caleidoscope
Moderator
*
Offline Offline

Posts: 859



View Profile WWW
May 03, 2021, 06:01:44 PM
Quote from: velvet
Well yes, yes I do. I think I had a dress in this fabric, only shorter.  :yes:


You sure?  How short?  More like a bikini :D   You must ha bedazzled the entire beach!   :joy: :clapping: :worship:
velvet
Fractal Fanatic
***
Offline Offline

Posts: 20



View Profile
May 04, 2021, 02:38:53 AM
:))  I blush when I recall how short. Mind you, my legs were a lot different back then.
Caleidoscope
Moderator
*
Offline Offline

Posts: 859



View Profile WWW
May 05, 2021, 12:06:21 AM
I remember those days very well ;)  And after all you still got the same legs  :joy: :rock:  So let's rock girl  :yes: :no: :yes: :headbang:
3DickUlus
Administrator
*******
Offline Offline

Posts: 2217



View Profile WWW
May 08, 2021, 04:01:17 AM
I did not write this frag, it's one of the "Experimental" frags from the first incarnation of Fragmentarium, I think Syntopia may have created it.

The only clue to the origins is this line...
Quote
// Spudsville, based on Lenords parameters from here: http://www.fractalforums.com/index.php?action=gallery;sa=view;id=4248

..which may hold other clues ;)

So, if I may humbly request, could you change the description to read "Fragmentarium" instead of "3Dickulus"  ::) and perhaps include the above line in your Metal version so the origins are not lost? (or confused) tnx.

oh, and here is the MB3D parameters...
Code: [Select]
Mandelbulb3Dv16{
I.....S....w....61........kiOARcpCTB.PgSkZihnL1EXmTXzgo6DzXKASI1I3Rpz0ueBAUptFiD
................................lyrAx6kmky1........Y./..................y.2.....
................/M.//....6kv....4/....E......6Vs2qQgO3vD/..........c./...w1.BnAH
z.....kD..../2.........wz.......................................................
........kqbL4K1cazX5vZXFiwzrzY2/SBGz..yjp1IDqOBWGwXgZflfm2etzYvqlUV0UOyDJ90p0REc
azn5vZXFiwzrzWhgpmFezzxD......YE.........................2kz0...................
..............................mxD5.grzQ..Vzn/.ByD5.MtzQ.kbzn/.cyD5..............
................tzzzz1.....U..6.k....61...EB....8....k1...kD....2/...211...UJF1.
...U.08cUyDcU0uzU08cz18cU06.mc..zzzz.g5MarH7iXyDWra4dabdnz1..........2E28.URPh2.
KjySnbineyHQNbzTGMixz0..........V2V0.6oKp/U.0PJWp1PyzEmYEkti4xvD..........E.Gc..
mcV0.MxuvBTuCfujKjySnbiney9..........2l28oTITs/...........Um3yuedc8tz42Ra9hwxv.k
/6V0z5FAZ............oklrlkCx9yjW9wTJHz2Vz1...8cU0.cU08.zz/cU08.U08c.szDU08c..8c
U0EzT/8cU0.cU08.Qs5cU08.U08c..bTU08c..8cU0.ly/8cU0.cU08.Mw5cU08.U08c.kqTU08c..8c
U0.kz/8cU0.cU08....cU08.zz/cU08.yz1cU08.xz3cU08.................................
E....A....E/....2....A....EEh3aSdtqNU6oPs/UQ..........................k/9.......
.....................1........xD..........2.....................................
................................................................................
.....................61...U/....1....MoPgFKOiR467t4RU.pPr/......................
8..0...........................E........W.A........wz.........zD................
................................................................................
................................/....U0.........TBJOiZ3.........................
........................................U.2.....................................
................................................................................
............................................}


and a link to the earliest mention (that I could find) of spudsville on the old forum by DarkBeam http://www.fractalforums.com/feature-request/extract-mathematical-formula-from-mandelbulb/msg58368/#msg58368
Last modified by: 3DickUlus May 08, 2021, 04:36:27 AM
Sabine62
3f
******
Offline Offline

Posts: 1205


It's just a jump to the left...


View Profile WWW
May 10, 2021, 11:26:04 AM
Fantastic, Kosalos!!!  :clapping:
kosalos
Fractal Feline
**
Offline Offline

Posts: 153



View Profile
May 10, 2021, 05:47:42 PM
Thank you for the kind words.
I made a mistake: I am continually tweaking my app without first making a backup.   :embarrass:
I couldn't recreate that image for a million dollars.
Guess that makes it "art".
Well, we'll always have velvet's legs to think about.
velvet
Fractal Fanatic
***
Offline Offline

Posts: 20



View Profile
May 12, 2021, 05:38:10 PM
Sad to lose a digital creation. You know it's never going to turn up some day under the sofa or in the gap between the car door and the passenger seat. I am honoured my legs have provided some levity in this otherwise unfortunate episode.

Return to Gallery


Powered by SMF Gallery Pro