[Fractint] Hearts finalist. heartsf.par = whole message with snipped rambling.
I don't use "frm:formula_name", because that means you can't also run FRACTINT with "formulafile=heartsf.par" and expect to see your formulas. FRACTINT will let you try to run parameter specs. as formulas from such merged files, though. If you missed my QBASIC for blowing music _into_ Fractint, then you can reverse the enjineering with this formula, otherwise more QBASIC might come later with the other three formulas that I will use. My tuning is simple: whole numbered multiples of a source frequency. It doesn't matter what the source frequency is unless you want an orchestra to accompany the computer, because it's ratios that matter to the ear. My tune has literally changed. This one works quite nicely, but that's challenging, because it makes for a look very different from the basis equation: heartx, and I want more unity or commonality among the images than that. I wonder if PDF is sent to PostScript printers without rendition, because writing this stuff in PostScript and converting to PDF might let me compress my output (for cards) to what fits on a floppy (or takes less time to download than to render). If rendition of PDF is done on the host of the printer, then there's no problem, but if it's sent to the printer, then the FRACTALS must be very fast or they'll make it time out. It's tempting to explicitly copyright this work, even if it takes an hour and a half plus some editing on a box older than five years. It falls under collective works, but this doesn't: http://ecn.ab.ca/~brewhaha/img/hearts.jpg , so fair use rules apply, whatever that means with MicroSoft source code running around making a mess of everything else that doesn't work. _______ heartsH { ; Chrominance: Alter through mask of HeartsV as ; grayscale. reset=2003 type=formula formulafile=heartsf.par formulaname=hearty passes=d center-mag=0.00844324/-1.37358/0.3241387/1.2195 params=2/0 float=y maxiter=255 inside=0 colors=000z00zz00z00zV0zz0Wz00z<3>z0zz0Wz00<3>zz0Wz00z0<3>0zz<3>0Lz0Bz\ 00zV0zz0z<3>z0Lz0Bz00<3>zz0Wz00z0<3>0zz<3>0Lz0Bz00z<3>e0zo0zz0zz0Wz00<\ 3>ze0zo0zz0<3>0z00zV0zz<3>0Lz0Bz00z<3>z0z<3>z0Lz0Bz00<3>zV0zb0zj0zr0zz\ 0<3>0z00zV0zz<3>00zV0zz0z<3>z00<7>z_0zc0zh0<3>zz0<3>0z0<3>0ze0zo0zz0Wz\ 00z<3>P0zV0z`0z<3>z0zz0Wz00<3>ze0zo0zz0<3>Lz0Bz00z0<3>0zz<3>0Lz0Bz00z<\ 3>e0zo0zz0zz0Wz00<3>zP0zV0z`0<3>zz0Wz00z0<3>0zz0Wz00z<5>V0z_0ze0z<3>z0\ z<5>z0Wz0Rz0L<3>z00<3>zz0Wz00z0<3>0zz<3>0Lz0Bz00zV0zz0z<3>z0az0Wz0Q<3>\ z00<3>zzz } heartsV { ; Drop luminance through this "graymask" after raising 50%. reset=2003 type=formula formulafile=hearty.par formulaname=hearty passes=d center-mag=0.00844324/-1.37358/0.3241387/1.2195 params=2/0 float=y maxiter=255 inside=0 outside=atan; colors=@rainboh.map colors=000z50z70zB0<3>zJ0zL0zM0zN0zP0zR0<5>z_0z`0za0zb0zd0<14>zu0zv0zw\ 0zx0zy0<14>lz0kz0jz0<5>bz0az0`z0<4>Tz0Sz0Rz0Pz0Nz0Mz0Lz0Iz0Hz0Ez0Dz0Bz\ 0<2>0z00z30z70zB0zD0zH0zJ0zK0zL0zN<3>0zS0zT0zV0zX<4>0zc0zd0zf<14>0zu0z\ v0zw0zx0zy<8>0rz0qz0oz<4>0jz0iz0hz<8>0Xz0Vz0Tz<3>0Pz0Nz0Lz0Jz0Hz0Gz0Dz\ 0Bz<2>00z30z70zB0zD0zF0zG0z<4>P0zQ0zS0zT0zV0z<2>_0z`0za0zb0zc0z<3>h0zi\ 0zk0z<9>u0zv0zw0zx0zy0z<13>z0mz0lz0k<3>z0fz0dz0cz0az0`<4>z0Vz0Tz0S<3>z\ 0Lz0Jz0Hz0Gz0D<3>z04 } heartsS { ; Mask for stripes of fading. Maybe needs work. ; Perhaps wood grain, like on my skull. reset=2003 type=formula formulafile=hearty.par formulaname=hearty passes=d center-mag=0.00844324/-1.37358/0.3241387/1.2195 params=2/0 float=y maxiter=255 inside=0 proximity=1 outside=fmod colors=000zzz000zzz000000zzz000000000zzz000<3>000zzz000<5>000zzz000<4>\ 000<4>000zzz000<4>000<4>000zzz000<6>000<4>000zzz000<10>000<4>000zzz000\ <12>000<4>000zzz000<16>000<4>000zzz000<22>000<4>000zzz000<24>000<4>000\ zzz000<30>000<4>000zzz000<29>000 } Hearty { ; Formula. Needs arrays for speed. Cropped as above, ; about 30min. on 350MhzPII @ 1280x1024, ; more for atan and fmod. s=z=atanh(real(-1/pixel) +flip(imag(-.5/pixel))), iter=0, t=|P1|, mean= 24.15789473684211: imod=(iter/ 127 -trunc(iter/ 127 ))* 127 , ; imod=remainder(num_notes/iter) iter=iter+1, if(imod>-1 && imod< 8 ) note= 11 elseif(imod> 6 && imod< 19 ) note= 13 elseif(imod> 17 && imod< 22 ) note= 17 elseif(imod> 20 && imod< 27 ) note= 19 elseif(imod> 25 && imod< 34 ) note= 16 elseif(imod> 32 && imod< 41 ) note= 23 elseif(imod> 39 && imod< 52 ) note= 31 elseif(imod> 50 && imod< 55 ) note= 29 elseif(imod> 53 && imod< 60 ) note= 23 elseif(imod> 58 && imod< 67 ) note= 31 elseif(imod> 65 && imod< 74 ) note= 11 elseif(imod> 72 && imod< 85 ) note= 9 elseif(imod> 83 && imod< 88 ) note= 13 elseif(imod> 86 && imod< 93 ) note= 17 elseif(imod> 91 && imod< 100 ) note= 13 elseif(imod> 98 && imod< 107 ) note= 29 elseif(imod> 105 && imod< 118 ) note= 51 elseif(imod> 116 && imod< 121 ) note= 59 elseif(imod> 119 && imod< 128 ) note= 44 endif, z=s*(z-flip(note/mean))*(flip(note/mean)-z) |z| <= t } Heartx { ; Formula. The core of hearty. s=z=atanh(real(-1/pixel) +flip(imag(-.5/pixel))), iter=0, t=|P1|,: z=s*(z-(0,1))*((0,1)-z) |z| <= t }
It is hard to say why I became so fascinated with midgets, but
this kind of thing seems to happen with fractals. Many become fascinated with spirals. When I come upon spirals, which I do many times in my search for midgets, I usually pass them by. They all look the same to me. << Well, here are a couple of zooms into your parent of yesterday (Shark Teeth). I think this spiral is quite different from most: Confetti_Spiral { ; ; t= 0:43:30.00 on a P4 2Gh at ; 1600x1200 Image Copyright 2004 ; by Lee H. Skinner ver=2003 reset=2003 type=formula formulafile=fractint.frm formulaname=mandelbrotmix4 function=recip passes=1 center-mag=-3.42706967942867300/+0.65905855299226680/\ 96.6236/1/-47.4999999999997726/2.67549871146854912e-0\ 13 params=0.55/-1.1/0.11/-3.1/0/1e+100 float=y maxiter=1000 inside=bof61 symmetry=none periodicity=10 colors=000jFR<2>zb0<2>zz1zzC<2>zzz<3>jqdfo_blUZjPVgJZ\ eEMb8M_pMX8<3>KJ8JF8JC8I88H44G00<3>TA5WD6ZF7aI8eLAhMB\ iODjQF<3>qeBriAtm9vq8xu7zz5zz4zz3<8>zY4zV5zS5<3>zE6wE\ 6tD6<9>w9Nw8Px8R<2>y6Wy6Yw6Yu5X<3>a5IW4EX4FY4G_4H<3>P\ 3DN2CK2A<3>805G0BO0G<3>g0Ul0Xq0`v0d<2>y0fz0gy0h<3>u1m\ t1ns1or2q<2>v2u<3>c5eZ6`U6X<2>F9LAAG7FO4KW0Qc<3>5Xc6Z\ c7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<3>civflvinvlqvotvsww<\ 2>zzz<3>rwzovzhsw<3>Gch8_d8Xa<3>8JP8FL8CI<4>XCAaB9fB7\ <3>zA0<13>SA1QA1NA1<3>D92<6>UXAW`BYcC<3>hrI<3>UnXRm_N\ lcJkgFfpAaz<6>_5fc0ce7_ } And I'll throw in another midget for balance: Red_leaf_midget { ; ; t= 0:23:44.63 on a P4 2Gh at ; 1600x1200 Image Copyright 2004 ; by Lee H. Skinner ver=2003 reset=2003 type=formula formulafile=fractint.frm formulaname=mandelbrotmix4 function=recip passes=1 center-mag=-6.39992232037162700/-0.74133977875696220/\ 10177.25/1/-39.999999999755623/-4.93227313158595138e-\ 010 params=0.55/-1.1/0.11/-3.1/0/1e+100 float=y maxiter=1000 inside=bof61 symmetry=none periodicity=10 colors=000vxu<3>fo_blUZjPVgJZeEMb8M_pMX8<3>KJ8JF8JC8I\ 88H44G00<3>TA5WD6ZF7aI8eLAhMBiODjQF<3>qeBriAtm9vq8xu7\ zz5zz4zz3<8>zY4zV5zS5<3>zE6wE6tD6<10>w8Px8Rx7S<3>z5_<\ 3>f5Ma5IW4E<2>_4H<3>P3DN2CK2A<3>805G0BO0G<3>g0Ul0Xq0`\ v0d<2>y0fz0gy0h<3>u1mt1ns1or2q<2>v2u<3>c5eZ6`U6X<2>F9\ LAAG7FO4KW0Qc<3>5Xc6Zc7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<\ 3>civflvinvlqvotvsww<2>zzz<3>rwzovzhsw<3>Gch8_d8Xa8TZ\ 8QV0008JP8FL8CI<4>XCAaB9fB7<3>zA0<13>SA1QA1NA1<3>D92<\ 6>UXAW`BYcC<3>hrI<3>UnXRm_NlcJkgFfpAaz<3>PJoSFlWAi_5f\ c0ce7_<3>zb0<2>zz1zzC<2>zzz }
Anybody who followed part of my thread about a project for constructing fractals that are in the jeneral shape of card suits might hav caught my picking up the fact that periodicity is one of those things you might want in your SSTOOLS.INI In jeneral, if a tesseral rendering has stray black lines in it, then you should either raise or cease periodicity cheking. I disable it by default, now. And a fractal called period is here to show you why. If you raise the number (it's negative) on the periodicity check, then the red surrounding this image will approach the remainder of the fractal. The closer the red area gets, the more stray black lines you'll see in the tesseral rendering. (There won't be _any_ such strays without periodicity checking). I don't know how many of those poor renderings I've seen, but I thot that the problem was tesseral, not some approximation of the inner set. In any case, regarding the necessary rock. It's another tuned fractal, but I raised the limits over what I wrote for hearts, so you can see more clearly that it _is_ a fractal. Even if you hav no interest in formulas, it and the parameters for three contrasting renderings of it are in the comments of the JPEG at http://ecn.ab.ca/~brewhaha/img/diamond.jpg You can view them with RDJPGCOM <diamond.jpg >con as well as follow the instructions, which are reasonably complete. A digital mask on an image will impede any operation on that image in the black parts of the mask, which means that it works like a transparency on the action of making a black image white. For hearts, I used an fmod rendering to affect the saturation (and it made the formerly dark side of the heart look cold), but for Diamonds, I've decided that I prefer tdis. The difference between tdis and fmod is that one represents the distance between the two points of the escape, and the other represents the length of the entire escape trail (AFAIK). That means tdis has more potential bandwidth, and I say potential, because I found that a map of the image isn't being used above the fourtieth index of colour. I haven't gotten into the logarithm map, but tdis responds to it, so maybe I won't be stuck with less than 64 colours at the top of the palette. In any case, while I _was_ satisfied with hearts, now that I realize it doesn't hav to take an hour and a half just to jenerate the three components, I might play with it some more to see if I can figure out why it terminates so decisively before the tune ends. Perhaps I can also understand why outside=atan doesn't render properly if I feed it just enough iterations to see all that I'm likely to see when outside=iter. (outside=atan should be able to work with _one_ iteration that jenerates all of the colours in the palette.) _______ Television is the most powerful Weapon of Mass Deception. _______ test { reset=2003 type=mandel passes=t center-mag=-0.44381/0.00203418/0.3942403/1.1619/-90/3.8857805861880478\ 9e-016 params=0/0 float=y maxiter=1024 inside=0 invert=0.00125/-1.4/0 periodicity=-12; colors=@rainboh.map colors=000z50z70zB0<3>zJ0zL0zM0zN0zP0zR0<5>z_0z`0za0zb0zd0<14>zu0zv0zw\ 0zx0zy0<14>lz0kz0jz0<5>bz0az0`z0<4>Tz0Sz0Rz0Pz0Nz0Mz0Lz0Iz0Hz0Ez0Dz0Bz\ 0<2>0z00z30z70zB0zD0zH0zJ0zK0zL0zN<3>0zS0zT0zV0zX<4>0zc0zd0zf<14>0zu0z\ v0zw0zx0zy<8>0rz0qz0oz<4>0jz0iz0hz<8>0Xz0Vz0Tz<3>0Pz0Nz0Lz0Jz0Hz0Gz0Dz\ 0Bz<2>00z30z70zB0zD0zF0zG0z<4>P0zQ0zS0zT0zV0z<2>_0z`0za0zb0zc0z<3>h0zi\ 0zk0z<9>u0zv0zw0zx0zy0z<13>z0mz0lz0k<3>z0fz0dz0cz0az0`<4>z0Vz0Tz0S<3>z\ 0Lz0Jz0Hz0Gz0D<3>z04 } DiamondsH { ; Chrominance to drop through a mask. ; 2:55.11 on a 350MhzPII @ 1280*1024 reset=2003 type=formula formulafile=rock.par formulaname=rock function=ident center-mag=0/0/0.04634342/1.3385/44.9999999999999929/3.885780586188047\ 89e-016 params=8/0 float=y maxiter=255 inside=0 periodicity=0 colors=zzz0zz00zz0zz0Wz00zV0zz0<3>0z00zV0zz<3>00zV0zz0z<3>z00<3>ze0zo0\ zz0Wz00z0<3>0ze0zo0zz<3>00zV0zz0z<3>z00<3>ze0zo0zz0<3>Lz0Bz00z00zV0zz<\ 3>0Lz0Bz00z<3>z0zz0Wz00<3>ze0zo0zz0<3>0z0<3>0ze0zo0zz<3>0Wz0Oz0Gz08z00\ z<3>z0zz0Wz00<3>zz0Wz00z0<3>0zz<7>0Rz0Nz0Iz<3>00z<3>z0z<3>z0Lz0Bz00zV0\ zz0<3>az0Wz0Qz0<3>0z00zV0zz<3>0Lz0Bz00z<3>e0zo0zz0z<3>z00<3>ze0zo0zz0<\ 3>Lz0Bz00z00zV0zz<3>0az0Wz0Qz<3>00zV0zz0z<3>z00zV0zz0<5>Wz0Rz0Lz0<3>0z\ 0<5>0zV0z_0ze<3>0zz<3>00zV0zz0z<3>z00<3>ze0zo0zz0Wz00z0<3>0zP0zV0z`<3>\ 0zz<3>000 } DiamondsV { ; Drop luminance through this mask, first. ; 11:28.49 on a 350MhzPII @ 1280*1024. altern.map ; is nearly 256 grays in eighteen bits. reset=2003 type=formula formulafile=rock.par formulaname=rock function=ident center-mag=0/0/0.04634342/1.3385/44.9999999999999929/3.885780586188047\ 89e-016 params=8/0 float=y maxiter=255 inside=0 outside=atan periodicity=0 colors=000000100010011111211120122222322231233333433342344444544453455\ 555655564566666766675677777877786788888988897899999A999A89AAAAABAAAB9A\ BBBBBCBBBCABCCCCCDCCCDBCDDDDDEDDDECDEEEEEFEEEFDEFFFFFGFFFGEFGGGGGHGGGH\ FGHHHHHIHHHIGHIIIIIJIIIJHIJJJJJKJJJKIJKKKKKLKKKLJKLLLLLMLLLMKLMMMMMNMM\ MNLMNNNNNONNNOMNOOOOOPOOOPNOPPPPPQPPPQOPQQQQQRQQQRPQRRRRRSRRRSQRSSSSST\ SSSTRSTTTTTUTTTUSTUUUUUVUUUVTUVVVVVWVVVWUVWWWWWXWWWXVWXXXXXYXXXYWXYYYY\ YZYYYZXYZZZZZ_ZZZ_YZ_____`___`Z_`````a```a_`aaaaabaaab`abbbbbcbbbcabcc\ cccdcccdbcdddddedddecdeeeeefeeefdefffffgfffgefggggghggghfghhhhhihhhigh\ iiiiijiiijhijjjjjkjjjkijkkkkklkkkljklllllmlllmklmmmmmnmmmnlmnnnnnonnno\ mnooooopooopnopppppqpppqopqqqqqrqqqrpqrrrrrsrrrsqrssssstssstrstttttutt\ tustuuuuuvuuuvtuvvvvvwvvvwuvwwwwwxwwwxvwxxxxxyxxxywxyyyyyzyyyzxyzz<2>z\ zz } DiamondsS { ; Make negative through this mask. ; 5:15.66 on a 350MhzPII @ 1280*1024. ; colors=@tdis.map reset=2003 type=formula formulafile=rock.par formulaname=rock function=ident center-mag=0/0/0.04634342/1.3385/44.9999999999999929/3.885780586188047\ 89e-016 params=8/0 float=y maxiter=255 inside=0 outside=tdis periodicity=0 colors=000<3>555777BBBDDDHHHHHHJJJNNNVVV```dddjjjpppvvvzzzxxxvvvpppjjj\ fffddd```VVVVVVTTTNNNJJJHHHDDDBBB777<3>111000zzz<214>zzz } Rock(XYAXIS) { z=z-z, c=fn1(pixel), iter=-1: iter=iter+1, if(iter>-1 && iter< 7 ) note= 11 elseif(iter> 6 && iter< 18 ) note= 13 elseif(iter> 17 && iter< 21 ) note= 17 elseif(iter> 20 && iter< 26 ) note= 19 elseif(iter> 25 && iter< 33 ) note= 16 elseif(iter> 32 && iter< 40 ) note= 23 elseif(iter> 39 && iter< 51 ) note= 31 elseif(iter> 50 && iter< 54 ) note= 29 elseif(iter> 53 && iter< 59 ) note= 23 elseif(iter> 58 && iter< 66 ) note= 31 elseif(iter> 65 && iter< 73 ) note= 11 elseif(iter> 72 && iter< 84 ) note= 9 elseif(iter> 83 && iter< 87 ) note= 13 elseif(iter> 86 && iter< 92 ) note= 17 elseif(iter> 91 && iter< 99 ) note= 13 elseif(iter> 98 && iter< 106 ) note= 29 elseif(iter> 105 && iter< 117 ) note= 51 elseif(iter> 116 && iter< 120 ) note= 59 elseif(iter> 119 && iter< 127 ) note= 44 endif if(iter>= 127 ) iter=-1 endif temp=note* 19 / 459 z=(z+temp)*(z-temp)*(z+flip(temp))*(z-flip(temp))/c |z| <= real(P1) }
participants (2)
-
Lee H. Skinner -
SherLok Merfy