(That's not actually necessary, unless you want to see what comes without parameters, but renaming the file is, because no root seems to be on this Lynx-fronted UNIX-compatible terminal system of late.) Your rights to this work do not exclude commercial development, and you are welcome to make recognizable changes to the tune, the colour maps or the methods of imaje composition in order to call it yours. Failing such uses that I would consider fair, and recovering your costs of production means that you owe me. The contents of this message are otherwise meant for intact distribution. Other rights or obligations may follow from laws or institutional guidelines respecting attribution or netiquette in your society. A private instigator transmitted this message. Square { ; Stripped formula for diamond. params=1/0/2/0/ident ; Display=function first. Public domain. z=z-z, c=fn1(pixel), delta=P1: z=(z+delta)*(z-delta)*(z+flip(delta))*(z-flip(delta))/c |z| <= real(P2) } PixelPower { ; Formula for club. Public domain. z=fn1(pixel), s=P2+fn2(pixel), if(P3==(0,0)) P3=sqrt(0,2) endif: z = z^s +P1, |z| <=real(P3) } Heartx { ; Stript version of hearty. params=1/0/4/0/ident ; Public domain. s=z=fn1(real(-1/pixel) +flip(imag(-.5/pixel))): z=s*(z-P2)*(P2-z) |z| <= real(P1) } Rock { ; Formula for Diamond. z=z-z, c=fn1(pixel), iter=-1: iter=iter+1, if(iter>-1 && iter< 14 ) note= 11 elseif(iter> 13 && iter< 36 ) note= 13 elseif(iter> 35 && iter< 42 ) note= 17 elseif(iter> 41 && iter< 52 ) note= 19 elseif(iter> 51 && iter< 66 ) note= 16 elseif(iter> 65 && iter< 80 ) note= 23 elseif(iter> 79 && iter< 102 ) note= 31 elseif(iter> 101 && iter< 108 ) note= 29 elseif(iter> 107 && iter< 118 ) note= 23 elseif(iter> 117 && iter< 132 ) note= 31 elseif(iter> 131 && iter< 146 ) note= 11 elseif(iter> 145 && iter< 168 ) note= 10 elseif(iter> 167 && iter< 174 ) note= 13 elseif(iter> 173 && iter< 184 ) note= 17 elseif(iter> 183 && iter< 198 ) note= 13 elseif(iter> 197 && iter< 212 ) note= 29 elseif(iter> 211 && iter< 234 ) note= 51 elseif(iter> 233 && iter< 240 ) note= 59 elseif(iter> 239 && iter< 254 ) note= 44 elseif(iter>= 254 ) iter=-1 endif, note=note* 19 / 460 z=(z+note)*(z-note)*(z+flip(note))*(z-flip(note))/c |z| <= real(P1) } Hearty { ; Might be worth compiling as overlay. s=z=fn1(real(-1/pixel) +flip(imag(-.5/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= 10 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 elseif(iter>= 127 ) iter = -1 endif, note=flip(note* 19 / 460 ) z=s*(z-note)*(note-z) |z| <= real(P1) } Tool { z = z-z, iter=-1, c=fn2(fn1(pixel)): iter=iter+1, if(iter>-1 && iter< 3 ) note= 47 elseif(iter> 2 && iter< 5 ) note= 23 elseif(iter> 4 && iter< 16 ) note= 37 elseif(iter> 15 && iter< 21 ) note= 29 elseif(iter> 20 && iter< 24 ) note= 31 elseif(iter> 23 && iter< 26 ) note= 29 elseif(iter> 25 && iter< 37 ) note= 31 elseif(iter> 36 && iter< 42 ) note= 23 elseif(iter> 41 && iter< 45 ) note= 31 elseif(iter> 44 && iter< 47 ) note= 29 elseif(iter> 46 && iter< 58 ) note= 41 elseif(iter> 57 && iter< 63 ) note= 47 elseif(iter> 62 && iter< 66 ) note= 43 elseif(iter> 65 && iter< 68 ) note= 47 elseif(iter> 67 && iter< 79 ) note= 23 elseif(iter> 78 && iter< 84 ) note= 31 elseif(iter>= 84 ) iter=-1 endif, z = z^(note/ 33.875) +c z = z*z z = z*z +c |z| <= imag(P1) } DiamondH { ; ~14s/megapixel. Use the absolute negative of ; this to mask off the border of DiamondV. reset=2003 type=formula formulafile=cards.par formulaname=rock function=ident center-mag=0/0/0.0583274/1.3374 params=16/0 float=y maxiter=255 invert=1.32/0/0 symmetry=xyaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 colors=zzz000<4>000zV0<3>zzz<3>0Wz0z00zz00zz0z00z<3>mmzzzzzzuppzzzkeez\ zz`WWzzzRLLzzzGBBzzz000zpzA<3>Bzo0zz00zz00BAzzBCMKzzMPYVzzY`hdzzhmtnzz\ tz000uzu000<4>000<3>0009z900z0zzzz0hzhzzzz000z0z666z6zCCCzCzIIIzIzOOPz\ PzUzVzVz__`z`zeegzgzkkmzmzqq000000zzz<4>zIzz9zz0z000<26>000<4>000z8000\ 0<69>000<4>0000wzzV000zzz0z0z0z0z000wzzV000zzz0z0z0z0z000wzzV000zzz0z0\ z0z0z000wzzV000zzz0z0z0z0z000wzzV000zzz0z0z0z0z000wzzV000zzz0z0z0z0z00\ 0z0 video=SF5 savename=diamondh } DiamondV { ; Use this after above modification to drop ; luminance of DiamondH. Raise luminance through ; negative of this. ~35s/megapixel@350Mhz ; Map Needed for other parameters. reset=2003 type=formula formulafile=cards.par formulaname=rock function=ident center-mag=0/0/0.0583274/1.3374 params=16/0 float=y maxiter=255 outside=atan invert=1.32/0/0 symmetry=xyaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 colors=@grayhack.map } DiamondS { ; fmod view for mask on negation, maybe. ; ~30s/megapixel. reset=2003 type=formula formulafile=cards.par formulaname=rock function=ident center-mag=0/0/0.0583274/1.3374 params=16/0 float=y maxiter=255 inside=0 proximity=1 outside=fmod logmap=old invert=1.32/0/0 symmetry=xyaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 colors=000<151>wwwxxxxxx<3>zzz000<95>000 } ClubsH { ; Sorting off. Start with DiamondH. ; ~1m/megapixel. reset=2003 type=formula formulafile=cards.par formulaname=pixelpower function=sin/sqrt center-mag=1.42995/0/0.1520244/1.4243/90/3.88578058618804789e-016 params=0/0/0/0/0/0 float=y maxiter=1024 inside=0 invert=1.45742001678948/1.33/0 symmetry=xaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 colors=000z00z10z40z70zB0zG0zK0<3>zf0zl0zs0zz0zz0<9>Oz0Kz0Gz0<3>0z0<9>\ 0zb0zf0zj<3>0zz<9>0Oz0Kz0Gz<3>00z<191>z0z } ClubsV { ; ~1.5m/megapixel @ 350Mhz. reset=2003 type=formula formulafile=cards.par formulaname=pixelpower function=sin/sqrt center-mag=1.42995/0/0.1520244/1.4243/90/3.88578058618804789e-016 params=0/0/0/0/0/0 float=y maxiter=1024 inside=0 outside=atan invert=1.45742001678948/1.33/0 symmetry=xaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 colors=@grayhack.map } heartH { ; Chrominance: Alter through masks. ; ~2m/megapixel@350Mhz. reset=2003 type=formula formulafile=cards.par formulaname=hearty function=atanh center-mag=0/-1.1811/0.347/1.18 params=37/0 float=y maxiter=255 inside=0 symmetry=yaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5; colors=@preemoh.map colors=zzzz00zz00z00zV0zz0Wz00z<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 } heartV { ; Drop luminance through this "graymask". ; ~3.5m/megapixel@350Mhz. reset=2003 type=formula formulafile=cards.par formulaname=hearty function=atanh center-mag=0/-1.1811/0.347/1.18 params=37/0 float=y maxiter=255 inside=0 outside=atan symmetry=yaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5; colors=@grayhack.map } heartS { ; Mask on negation. Last. Raise contrast. ; ~3.5m/megapixel@350Mhz. reset=2003 type=formula formulafile=cards.par formulaname=hearty function=atanh center-mag=0/-1.1811/0.347/1.18 params=37/0 float=y maxiter=255 inside=0 proximity=1 outside=fmod symmetry=yaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5; colors=@grayhack.map } Spades_Crude { ; If I do say so, myself. 8-) ; 23.62s/megapixel@350Mhz. reset=2003 type=manzpower center-mag=-0.9616/0/1/1.19/-90/3.88578058618804789e-016 params=0/0/4/0 float=y maxiter=255 inside=0 proximity=4 outside=fmod invert=0.47/-0.47/0 symmetry=xaxis colors=@grayhack.map } Spades { ; 4by5 is 2400*1575 for 8"*5.25" @ 300dpi. ; Same colours as HeartH with first colour black. ; ~50s/megapixel@350Mhz. reset=2003 type=formula formulafile=cards.par formulaname=tool function=flip/recip center-mag=0/0.541224/0.1891708/1.97 params=2/4 float=y maxiter=255 inside=0 symmetry=yaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 viewwindows=0/0/no/600/315 colors=@preemoh.map } SpadesVV { ; Disk-video modes only work with passes=1. ; grayhack.map=-altern.map with first colour set to black. ; ~1m/megapixel@350Mhz. I deleted my true graymaps, ; because it's usually an error for me to use them, ; and they're easy to jenerate, approximately. reset=2003 type=formula formulafile=cards.par formulaname=tool function=flip/recip center-mag=0/0.541224/0.1891708/1.97 params=2/4 float=y maxiter=255 inside=0 outside=atan symmetry=yaxis periodicity=0 viewwindows=0/0/no/600/315 video=SF5 viewwindows=0/0/no/600/315; colors=@grayhack.map }
SherLok Merfy wrote:
PixelPower { ; Formula for club. Public domain. z=fn1(pixel), s=P2+fn2(pixel), if(P3==(0,0)) P3=sqrt(0,2) endif: z = z^s +P1, |z| <= real(P3) }
Is the above a revision of one of the two you posted earlier (both shown below), or is this supposed to be a whole new formula different from the previous ones?? PixelPower { ; SherLok Merfy <brewhaha@freenet.edmonton.ab.ca> ; Fri, 13 Feb 2004 06:07:18 ; (formula) Imajinaries yield asymmetry. chaw=P1, z=fn1(pixel), s=P2-fn2(pixel), if(P3==(0,0)) P3=sqrt(0,2) endif: z = z^s +chaw, |z| <= |P3| } PixelPowerAdd { ; SherLok Merfy <brewhaha@freenet.edmonton.ab.ca> ; Sun, 15 Feb 2004 04:04:22 ; Now you know why I want neg function back. chaw=P1, z=fn1(pixel), s=P2+fn2(pixel), if(P3==(0,0)) P3=sqrt(0,2) endif: z = z^s +chaw, |z| <= |P3| }
Heartx { ; Stript version of hearty. params=1/0/4/0/ident ; Public domain. s=z=fn1(real(-1/pixel) +flip(imag(-.5/pixel))): z=s*(z-P2)*(P2-z) |z| <= real(P1) }
And the same with the above which was posted earlier (as shown below)?? Heartx { ; SherLok Merfy <brewhaha@freenet.edmonton.ab.ca> ; Thu, 11 Mar 2004 00:20:32 ; 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 } And the same for all of the following two items??
Rock { ; Formula for Diamond. z=z-z, c=fn1(pixel), iter=-1: iter=iter+1, if(iter>-1 && iter< 14 ) note= 11 .......(snipped)....... }
Hearty { ; Might be worth compiling as overlay. s=z=fn1(real(-1/pixel) +flip(imag(-.5/pixel))), iter=-1: iter=iter+1, if(iter>-1 && iter< 7 ) note= 11 .......(snipped)....... }
Sincerely, P.N.L. ------------------------------------------------- http://home.att.net/~Paul.N.Lee/PNL_Fractals.html http://www.Nahee.com/Fractals/
On Tue, 30 Mar 2004, Paul N. Lee wrote: In jeneral, cards.par has minor or no revisions to old formulas, which means that it represents selections, even if I later choose to change the tune or ADD a tune to Clubs. Also, note that I hav no real system of recording changes or lack thereof--if it works, then I TRY to make up a new name for the variant. I hav a habit of deleting things that weren't especially memorable, though. The change in default escape value to PixelPower was one that I didn't think was effective, (which means that I'm using a different one). The revision most recently posted is what I intend for the formula, while I will likely change the parameters for clubs when I figure out what |sqrt(0,2)| is. (...)
Heartx { ; Stript version of hearty. params=1/0/4/0/ident ; Public domain. s=z=fn1(real(-1/pixel) +flip(imag(-.5/pixel))): z=s*(z-P2)*(P2-z) |z| <= real(P1) }
And the same with the above which was posted earlier (as shown below)??
This is about the way FRACTINT jeneralizes things, and in this case, the curious result is how little the different functions affect the results. I chose the function that makes hearts look a bit like it's wearing glasses when the post-processing is done. Aside from that, I realized that outside=atan with Diamonds, as with hearts, is not symmetric on the vertical. The iterations component (as a nearly strict rule, chrominance) is, but not ouside=atan, and these are posted on my site, aside from a better map for diamonds. http://ecn.ab.ca/~brewhaha/img/cards/ Four images formatted about fourteen different ways, but geared for _printing_ (files are averaging about 700k @ 2400*1575), so don't be surprised at the long wait if you weren't willing to do the post-processing. Nuts...I forgot to put the separated parameter files into the JPEG comments before I uploaded them. But this is perhaps because I use _those_ names for batch file parameters that I delete. _______ <a href="http://ecn.ab.ca/~brewhaha/">BrewJay's Babble Bin</a> ...now you know why I call it that.
participants (2)
-
Paul N. Lee -
SherLok Merfy