comment { These are Modified Carr formulas based on the original with the gracious permission of Dr. Robert Carr. Utmost care has been taken to preserve the original formulation fully intact. Several "User Friendly" additions have been made which allow the user to alter the fractal through the following parameters: Scale: Use this parameter to reduce or enlarge the image without having to zoom the entire image.Depending on the complexity of Z, larger numbers may be needed to produce desired scale.Begin with 2, 4, 6, 8, etc. Bailout: The user may now change this parameter as desired. In a few cases, more than one bailout may be chosen. Functions(3-4): In most cases, extreme changes in form may be achieved by varying one or more of these formula functions. NOTE: In the interest of faster calculation speeds, the original "Maxiter" (maximum iterations) default has been lowered from 500 to 100. I found that, in 99.99% of instances there was no detectable difference, and in the 0.01% of instances with a difference, these were very small. My gratefull thanks go to Dr. Robert Carr, both for writing such great formulations and for graciously permitting me to add what little functionality my small knowledge allows. I hope that you will find these modifications helpful. } =================================================================== Carr1800S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: z = (1/#pixel)/@scale c = 1/(#pixel-sqr(z/z^z+z)/atan(#pixel)) loop: z = fn1(fn2(fn3(z^3+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1800S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 10 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1801S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale c = 1/(#pixel-z-cos(sqr(z/(#pixel-.124)))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1801S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (1.6,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 10 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1802S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/#pixel)/@scale c = 1/(#pixel-conj(z^2/|#pixel|+#pixel/z)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1802S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 10 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1803S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider type init: z = (1/#pixel)/@scale c = 1/(#pixel-conj(z^2/|#pixel|+#pixel/z)) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1803S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1804S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/#pixel)/@scale c = 1/(#pixel-cosh(z^2/cos(#pixel)/#pixel+#pixel/z)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1804S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1805S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/asin(1/atanh(1/#pixel-conj(1/#pixel))))/@scale c = 1/#pixel+(z+1)/#pixel loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1805S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (1.7,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1806S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-ct))/@scale c3 = conj(tan(#pixel)) c2 = c3+conj(sinh(#pixel)) ct = conj(1/#pixel)+flip(1/#pixel) c = 1/(sin(c3)+cos(c2))-ct loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1806S" method = multipass periodicity = 0 maxiter = 100 magn = .3 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1807S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(op)-flip(op)))/@scale c3 = tan(#pixel) c2 = |c3|+conj(sin(#pixel)) op = 1/#pixel c = 1/(c3+flip(c2))-asin(op)-atan(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1807S" method = multipass periodicity = 0 maxiter = 100 magn = .22 center = (-1.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1808S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(op)-flip(op)))/@scale c3 = sin(conj(#pixel)) c2 = |c3|+conj(atan(#pixel)) op = 1/#pixel c = 1/(conj(c3)+flip(c2))-asin(op)-atan(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1808S" method = multipass periodicity = 0 maxiter = 100 magn = .17 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1809S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(op)-flip(op)))/@scale c3 = asin(conj(#pixel)) c2 = |c3|+cos(#pixel) op = 1/#pixel c = 1/(conj(c3)+flip(c2))-asin(op)-atan(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1809S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1810S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z1 = conj(op)-flip(op) c = 1/(#pixel+sqrt(7*op)) z = (1/(#pixel+sqrt(op)-log(op)-|z1|))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1810S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1811S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z1 = conj(op)-flip(op) c = 1/(#pixel+sqrt(7*op)) z = (1/(#pixel+.45-sqrt(op)+log(2*op)+|z1|-cos(5*op)))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1811S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1812S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z1 = conj(op)-flip(op) c = 1/(#pixel-cos(op)-conj(cos(op))+sqrt(7*op)-log(op/2)) z = (1/(#pixel+.45-sqrt(op)-log(2*op)+z1-cos(5*op)))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1812S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1813S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/flip(#pixel)/conj(atan(5/#pixel-.724)))/@scale c = 1/(flip(#pixel)*tan(7/#pixel-.524)-flip(1/#pixel)-conj(1/#pixel)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1813S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1814S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(conj(#pixel)-cos(7/#pixel-.524)-sin(1/#pixel)+conj(1/#pixel)))/@scale c = 1/#pixel/real(5/#pixel-.724) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1814S" method = multipass periodicity = 0 maxiter = 100 magn = .2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1815S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(conj(#pixel)-cos(7/#pixel-.524)-sin(1/#pixel)+conj(1/#pixel)))/@scale c = 1/(#pixel-conj(z-1.1)*z*z^conj(cotanh(#pixel-.2))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1815S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1816S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(conj(#pixel)-cos(7/#pixel-.524)-sin(1/#pixel)+conj(1/#pixel)))/@scale c = 1/(#pixel-conj(z-1.1)*z*z^conj(cotanh(5/#pixel-.2))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1816S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1817S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale c = 1/(#pixel-z+2.5^conj(cos(#pixel-1))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1817S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1818S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-atan(op-conj(c)+.55)+conj(op)+flip(op)))/@scale op = 1/#pixel c = conj(op)/exp(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1818S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1819S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-atan(op-conj(c)+.55)+conj(op)+flip(op)))/@scale op = 1/#pixel c = conj(op)/sqr(sin(op)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1819S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1820S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(cos(#pixel)-sqr(conj(exp(1.79*op)))))/@scale op = 1/#pixel c = op/(#pixel-flip(op)-conj(op)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1820S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1821S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: op = #pixel-flip(1/#pixel)-conj(1/#pixel) z = (1/op)/@scale c = 1/#pixel/op loop: z = fn1(fn2(fn3(z^2+c))) c = (1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z bailout: |real(z)| <= @bailout default: title = "Carr 1821S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1822S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = conj(op)/(#pixel-sin(op)-conj(op)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1822S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1823S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = conj(op)/(#pixel-sin(op)-conj(op)) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1823S" method = multipass periodicity = 0 maxiter = 100 magn = 1.5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1824S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 5/atan(op)/(#pixel-sin(op)-conj(op)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1824S" method = multipass periodicity = 0 maxiter = 100 magn = 3 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1825S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = exp(op)/(conj(.073*#pixel-cos(op)-conj(op))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1825S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1826S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (conj((1-conj(c)*cos(c))/conj(#pixel-conj(1/#pixel))))/@scale c = 1/(#pixel-conj(1/#pixel)*cos(.88/#pixel)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1826S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1827S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: z = (1/(#pixel-conj(1/#pixel)*cos(.88/#pixel)))/@scale c = conj((1-conj(z)*cos(z))/conj(#pixel-conj(1/#pixel))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1827S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1828S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: c = 1/(#pixel-conj(1/#pixel)-flip(1.88/#pixel)) z = (1/(flip(#pixel)-conj(c+sin(1/#pixel))*sin(c+1/c)))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1828S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1829S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: c = 1/(#pixel-conj(1/#pixel)-flip(1.88/#pixel)) z = (1/(flip(#pixel)-conj(c+sin(1/#pixel))*sin(c+.8/c)))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1829S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1830S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/(flip(#pixel)-conj(z+sin(op/z))*sin(z+1/z)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1830S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1831S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/(flip(#pixel)-conj(z+sin(op/z))*sin(z+1/z)+exp(op+1/z)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1831S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1832S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/(flip(#pixel)-conj(z+sin(op/z))*sin(z+1/z)+exp(op+1/z)) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1832S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1833S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (tan(op)/(flip(conj(#pixel-tan(op)))-1))/@scale c = 1/(flip(#pixel)-conj(z+sin(op/z))*sin(z+1/z)+exp(op+conj(1/z))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1833S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1834S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (tan(op)/(cos(conj(#pixel-tan(op)))-1))/@scale c = 1/(flip(#pixel)-conj(z+sin(op/z))*sin(z+1/z)+exp(op+conj(1/z))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1834S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1835S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel c = conj(op)/(cos(conj(#pixel-tan(op)))-1) z = (1/(flip(#pixel)-conj(c+sin(op/c))*sin(c+1/c)+exp(op+conj(1/c))))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1835S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1836S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = tan(op)/(cos(conj(#pixel-tan(op)))-1) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1836S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1837S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = tan(op)/(cos(conj(#pixel-tan(op)))-1.75) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1837S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1838S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)-1))/@scale c = tan(op)/(cos(conj(#pixel-tan(op)))-1.75) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1838S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1839S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel c = (tan(op))/(cos(conj(#pixel-tan(op)))+(-.7456,.2)) z = (1/(#pixel-conj(op)-flip(op)-1/c))/@scale loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1839S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1840S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/(#pixel-tan(op)/(cos(conj(#pixel-tan(op)))-1)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1840S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1841S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(cos(conj(#pixel^2-tan(op)))-1))/@scale c = 1/(#pixel-cos(op)-conj(op))-sqrt(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1841S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1842S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(cos(conj(#pixel^2-tan(op+conj(.88*op))))-1))/@scale c = 1/(#pixel-cos(1.88*op)-conj(op))-sqrt(op) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1842S" method = multipass periodicity = 0 maxiter = 100 magn = .6 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1843S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (flip(op)/conj(op+2.78/flip(#pixel)))/@scale c = 1/(#pixel-tan(op))*.94*cos((z+7*op)/conj(#pixel-1)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1843S" method = multipass periodicity = 0 maxiter = 100 magn = .8 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1844S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = ((conj(op*flip(.91*op))-1)*op)/@scale c = 1/(#pixel-tan(op))+(-.7645,.2) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1844S" method = multipass periodicity = 0 maxiter = 100 magn = .04 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1845S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-flip(op)-tan(|op|)-conj(op)))/@scale c = 1/(#pixel+(-1.7456,.2)-atan(op-cosh(|z|)-|z|)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1845S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1846S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: op = 1/#pixel z = (1/(#pixel-flip(op)-tan(|op|)-conj(op)))/@scale c = 1/(#pixel-atan(op-cosh(|z|)-|z|)-conj(1/exp(#pixel-.85))) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1846S" method = multipass periodicity = 0 maxiter = 100 magn = .2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1847S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: op = 1/#pixel z = (1/(#pixel-exp(op)-tan(|op|)-conj(op)))/@scale c = 1/(#pixel-asinh(op-cos(|z|)-|z|)-conj(1/exp(#pixel-0.85))) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1847S" method = multipass periodicity = 0 maxiter = 100 magn = .2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1848S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: op = 1/#pixel z = (1/(#pixel-exp(op)-tan(|op|)-conj(op)))/@scale c = 1/(#pixel-asinh(op-cos(|z|)-|z|)-conj(1/exp(#pixel+1.85))) loop: z = fn1(fn2(fn3(z^2+c))) c = (1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z bailout: |real(z)| <= @bailout default: title = "Carr 1848S" method = multipass periodicity = 0 maxiter = 100 magn = .09 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1849S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia : slow render init: op = 1/#pixel z = (1/(#pixel-exp(op)-sinh(|op|)-conj(op)))/@scale c = 1/(#pixel-asinh(op-cos(|z|)-|z|)-conj(cos(1/exp(#pixel+1.85)))) loop: z = fn1(fn2(fn3(z^2+c))) c=(1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z bailout: |real(z)| <= @bailout default: title = "Carr 1849S" method = multipass periodicity = 0 maxiter = 100 magn = .09 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1850S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/|#pixel-conj(op)-flip(op)|)/@scale c = 1/(#pixel-acosh(op-cos(|z|)-|z|)-conj(1/exp(#pixel+1.85))) loop: z = fn1(fn2(fn3(z^2+c))) z = conj(z*z+c) bailout: |real(z)| <= @bailout default: title = "Carr 1850S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1851S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)-(sqrt(1/exp(#pixel+.75)))))/@scale c = 1/(#pixel-acosh(op-cos(|z|)-|z|)-conj(1/exp(#pixel+1.85))) loop: z = fn1(fn2(fn3(z^2+c))) z = conj(z*z+c) bailout: |real(z)| <= @bailout default: title = "Carr 1851S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1852S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z1 = conj(#pixel)-sqrt(op)-log(op)-.9 z = (1/(#pixel-conj(z1)-exp(1/exp(#pixel+.45))))/@scale c = 1/(#pixel+sqrt(op)/log(op)-conj(1/z1)) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1852S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1853S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z1 = -1/(#pixel-conj(op)-flip(op)+.5) z = (exp(z1)/sin(#pixel))/@scale c = 1/#pixel-.5 loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1853S" method = multipass periodicity = 0 maxiter = 100 magn = .4 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1854S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/(#pixel-conj(cos(1/sqr(cos(#pixel))))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1854S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1855S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-exp(op)))/@scale c = 1/(#pixel+conj(cos(1/sqr(cos(#pixel+conj(op)))))-1) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1855S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1856S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: c = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) z = (#pixel/(6+c))/@scale loop: z = fn1(fn2(fn3(z^2+c))) z = z^2+conj(c) bailout: |real(z)| <= @bailout default: title = "Carr 1856S" method = multipass periodicity = 0 maxiter = 100 magn = .3 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1857S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-sin(op)-tan(op)))/@scale c = conj(#pixel-conj(op))/(4+tan(conj(z^2-conj(7*op)))) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1857S" method = multipass periodicity = 0 maxiter = 100 magn = .3 center = (-1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1858S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: op = 1/#pixel z = (1/(#pixel-sin(op)-tan(op)))/@scale c = conj(#pixel-conj(op))/(4+tan(conj(z^2-conj(7*op)))) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1858S" method = multipass periodicity = 0 maxiter = 100 magn = .2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1859S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: op = 1/#pixel z = (1/(#pixel-sin(op)-tan(op)))/@scale c = conj(#pixel-conj(op))/(4+tan(conj(z^2-conj(7*op)))) loop: z = fn1(fn2(fn3(z^2+c))) c = (1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z bailout: |real(z)| <= @bailout default: title = "Carr 1859S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1860S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: c1 = (-.7456,.2) op = 1/#pixel z = (tan(op-c^2)/(9+c1+c))/@scale c = tan(op)/tan(#pixel-conj(op)-flip(op))/9+c1 loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1860S" method = multipass periodicity = 0 maxiter = 100 magn = .9 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1861S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/#pixel z = (1/(#pixel-conj(op)-flip(op)))/@scale c1 = 1/(#pixel-sin(op)-cos(op)) c = 1/(#pixel-c1+z) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1861S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1862S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: op = 1/conj(#pixel) z = (1/(#pixel-conj(op)-flip(op)))/@scale c = 1/tan(#pixel)/conj(5/#pixel-.724) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1862S" method = multipass periodicity = 0 maxiter = 100 magn = .08 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1863S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Carr-brot-2 init: z = (log(pi)+conj(1/#pixel))/@scale loop: z = fn1(fn2(fn3(z-z^2-#pixel))) bailout: |z| <= @bailout default: title = "Carr 1863S" method = multipass periodicity = 0 maxiter = 100 magn = 1.7 center = (-1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1864S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Carr-brot-3 init: z = (sqrt(pi+2)+1/#pixel)/@scale loop: z = z-z^2-#pixel z = fn1(fn2(fn3(z*z+z))) bailout: |sin(z)| <= @bailout default: title = "Carr 1864S" method = multipass periodicity = 0 maxiter = 100 magn = 7 center = (-.55,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1865S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Carr-brot-4 init: z = (1/(#pixel-sqrt(conj(#pixel))-log(#pixel)))/@scale loop: z = fn1(fn2(fn3(z-z^2-#pixel))) bailout: |sin(z)| <= @bailout default: title = "Carr 1865S" method = multipass periodicity = 0 maxiter = 100 magn = 1.9 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1866S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/(#pixel-sin(op)-tan(op)))/@scale c = conj(#pixel-conj(op))/(4+tan(conj(z^2-conj(7*op)))) loop: z = fn1(fn2(fn3(z^2+c))) c = conj((1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z) bailout: |real(z)| <= @bailout default: title = "Carr 1866S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1867S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/(#pixel-sin(op)-cos(op)))/@scale c = conj(#pixel-conj(op))/(4+tan(conj(z^2-conj(7*op)))) loop: z = fn1(fn2(fn3(z^2+c))) c = sin((1+flip(imag(sqrt(sin(c)))))*real(sqrt(tan(c)))/9+z) bailout: |real(z)| <= @bailout default: title = "Carr 1867S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1868S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandelbrot init: c1 = 1/tan(#pixel)/#pixel z = (c1/(-.7456,.2))/@scale c = c1/(-.3,.6) loop: z = fn1(fn2(fn3(z^2+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1868S" method = multipass periodicity = 0 maxiter = 100 magn = .25 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1869S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Spider init: z = (1/tan(1/#pixel))/@scale c = 1/(#pixel-conj(z/z^z+z)) loop: z = fn1(fn2(fn3(z^2+c))) c = z+c/2.125 bailout: |real(z)| <= @bailout default: title = "Carr 1869S" method = multipass periodicity = 0 maxiter = 100 magn = 1.2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1870S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Newton init: z = (cos(#pixel-1/#pixel))/@scale c = (-.7456,.2) loop: z = fn1(fn2(fn3((3*z^4+c)/4/z^3))) bailout: .004 <= |z^4-c|*@bailout default: title = "Carr 1870S" method = multipass periodicity = 0 maxiter = 100 magn = 1.2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 1 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1871S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Newton init: z = (tan(#pixel-conj(1/#pixel)))/@scale c = (.3,.6) loop: z = fn1(fn2(fn3((3*z^4+c)/4/z^3))) bailout: .004 <= |real(z^4-c)|*@bailout default: title = "Carr 1871S" method = multipass periodicity = 0 maxiter = 100 magn = 1.2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 1 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1872S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Sylvie Gallet formula init: z = (conj(1/#pixel))/@scale c = 1/(#pixel-z-flip(1/#pixel)) loop: IF (|compt| >= |limit|) c = (-.743380900000982,-.131850030300002) ENDIF z = fn1(fn2(fn3(z*z + c))) compt = compt+1 bailout: |z| <= @bailout default: title = "Carr 1872S" method = multipass periodicity = 0 maxiter = 100 magn = .01 center = (0,0) heading caption = "Parameters" endheading param compt caption = "Param 1" default = 0.0 hint = "Select a value for the first formula parameter." endparam param limit caption = "Limit" default = 0.3 hint = "Select a value for the formula limit." endparam param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1873S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: c1 = 1/(#pixel-sin(op)) z1 = c1-conj(op) z = (1/(#pixel-(c-cos(z1))/z1/c1))/@scale op = 1/#pixel c = 1/(#pixel-(z1+c1)*op) loop: z = fn1(fn2(fn3(z*z+c))) bailout: |real(z)| <= @bailout default: title = "Carr 1873S" method = multipass periodicity = 0 maxiter = 100 magn = .7 center = (1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1874S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Lee Skinner formula init: p = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) t3 = 3*cos(p) t2 = p*p a = (t2+1)/t3 b = 2*a^3+(t2-2)/t3 aa3 = a*a*3 z = (-a)/@scale loop: z = fn1(fn2(fn3(z*z-aa3*z+b))) bailout: |real(z)| <= @bailout default: title = "Carr 1874S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1875S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Lee Skinner formula init: p = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) t3 = 3*1/cos(p) t2 = tan(p*p) b = 2*a^3+(t2-2)/t3 aa3 = a*a*3 a = (t2+(1/#pixel))/t3 z = (-a)/@scale loop: z = fn1(fn2(fn3(z*z-aa3*z+b))) bailout: |real(z)| <= @bailout default: title = "Carr 1875S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1875S_Corrected { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified Lee Skinner formula init: p = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) t3 = 3*1/cos(p) t2 = tan(p*p) a = (t2+(1/#pixel))/t3 b = 2*a^3+(t2-2)/t3 aa3 = a*a*3 z = (-a)/@scale loop: z = fn1(fn2(fn3(z*z-aa3*z+b))) bailout: |real(z)| <= @bailout default: title = "Carr 1875S_Corrected" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1876S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*2.924)))/@scale c = 1/(#pixel-conj(op)-flip(op)) loop: z = fn1(fn2(fn3(z*z+c+(-.3,.6)))) bailout: |z| <= @bailout default: title = "Carr 1876S" method = multipass periodicity = 0 maxiter = 100 magn = .05 center = (-8,-20) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1877S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*2.924)))/@scale c = 1/(#pixel-sin(op)-conj(cos(op))) loop: z = fn1(fn2(fn3(z*z+c+(-.3,.6)))) bailout: |z| <= @bailout default: title = "Carr 1877S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1878S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*2.924)))/@scale c = 1/(#pixel-sin(op)-conj(cos(op))) loop: z = fn1(fn2(fn3(z*z+c+(-.8,.2)))) bailout: |z| <= @bailout default: title = "Carr 1878S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1879S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*.924)))/@scale c = 1/(#pixel-sin(op)-conj(cos(op))) loop: z = fn1(fn2(fn3(z*z+c+(-.6,.45)))) bailout: |z| <= @bailout default: title = "Carr 1879S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1880S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*.924)))/@scale c = 1/(#pixel-sin(op)-exp(2*op)) loop: z = fn1(fn2(fn3(z*z+c+(-.6,.05)))) bailout: |z| <= @bailout default: title = "Carr 1880S" method = multipass periodicity = 0 maxiter = 100 magn = .3 center = (-1,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1881S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*.924)))/@scale c = 1/(#pixel-sin(op)-exp(2*op)) loop: z = fn1(fn2(fn3(z*z+c+(.09,-.71)))) bailout: |z| <= @bailout default: title = "Carr 1881S" method = multipass periodicity = 0 maxiter = 100 magn = 1.75 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1882S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: op = 1/#pixel z = (1/(#pixel-real(op)+flip(imag(op)*.924)))/@scale c = 1/(#pixel-sqr(op)-exp(2*op)) loop: z = fn1(fn2(fn3(z*z+c+(.39,-.2491)))) bailout: |z| <= @bailout default: title = "Carr 1882S" method = multipass periodicity = 0 maxiter = 100 magn = 1.75 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1883S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale loop: z = fn1(fn2(fn3(z*z+(-.7456,.2)))) bailout: |z| <= @bailout default: title = "Carr 1883S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1884S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale c = 1/(#pixel-abs(imag(z)-real(z))+flip(1-abs(1-real(z)-imag(z)))) loop: z = fn1(fn2(fn3(z*z+c+(-.7456,.2)))) bailout: |z| <= @bailout default: title = "Carr 1884S" method = multipass periodicity = 0 maxiter = 100 magn = .5 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1885S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Mandel-Julia init: z = (1/(#pixel-abs(cos(c)-conj(c))+flip(cabs(tanh(c)-conj(c)))))/@scale c = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) loop: z = fn1(fn2(fn3(z*z+c+(.39776,-.009)))) bailout: |z| <= @bailout default: title = "Carr 1885S" method = multipass periodicity = 0 maxiter = 100 magn = .2 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1886S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modified FractalFenderC init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale loop: IF (|z| > 1) z = fn1(fn2(fn3(cosh(z)+#pixel))) ENDIF z = fn1(fn2(fn3(z^2+#pixel))) bailout: |z| <= @bailout default: title = "Carr 1886S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1887S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 init: z = #pixel/@scale c = 1/(#pixel-conj(1/#pixel)-flip(1/#pixel)) loop: z = fn1(fn2(fn3(z^3/5/#pixel+conj(z^2)+c+(.39776,-.009)))) bailout: |z| <= @bailout default: title = "Carr 1887S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1888S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: op = 1/#pixel c = 1/(#pixel-conj(op)-flip(op)) z = (1/(#pixel-3/c+c/4-conj(op)))/@scale loop: z = fn1(fn2(fn3(z*z+c+(.35776,-.08294)))) bailout: |real(z)| <= @bailout default: title = "Carr 1888S" method = multipass periodicity = 0 maxiter = 100 magn = 1 center = (0,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1889S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Modification of Sylvie Gallet frm. Redone by Sylvie init: z = c = #pixel/@scale loop: test = @test z = fn1(fn2(fn3(z^2+c+(.35776,-.08294)))) IF (|test| < 1) float ztest = |z| float btest = @b1 ELSE IF (z == 0) z1 = (z^5-1) ELSE z1 = (z^5-1)/(4*z^4) ENDIF float ztest = @b2 float btest = |z1| ENDIF bailout: |ztest| <= |btest|*@bailout default: title = "Carr 1889S" method = multipass periodicity = 0 maxiter = 100 magn = 1.4 center = (-.5,0) heading caption = "Parameters" endheading bool param test1 caption = "Test" default = true hint = "Select to test the value of Z & B elements." endparam param b1 caption = "Param 1" default = 16 hint = "Select a value for the 1st formula parameter." endparam param b2 caption = "Param 2" default = 0.0001 hint = "Select a value for the 2nd formula parameter." endparam param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1890S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale loop: z = fn1(fn2(fn3(z*z+#pixel+(.34776,-.08094)))) bailout: |z| <= @bailout default: title = "Carr 1890S" method = multipass periodicity = 0 maxiter = 100 magn = 1.4 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1891S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale loop: z = fn1(fn2(fn3(z*z+#pixel+(.34899,-.08294)))) bailout: |z| <= @bailout default: title = "Carr 1891S" method = multipass periodicity = 0 maxiter = 100 magn = 1.4 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ========================================================== Carr1892S { ; A "Modified Carr" formula, based on the original with permission. ; Functionality added by Sharon S. Schultz, May, 2003. ; Updated for UF2 by Erik Reckase, March 2000 ; Julia or not? init: z = (1/(#pixel-conj(1/#pixel)-flip(1/#pixel)))/@scale c = sin((1+flip(imag(sqrt(sin(z)))))*real(sqrt(tan(z)))/9+z) loop: z = fn1(fn2(fn3(z*z+c+(.34899,-.08294)))) bailout: |z| <= @bailout default: title = "Carr 1892S" method = multipass periodicity = 0 maxiter = 100 magn = 1.4 center = (-.5,0) heading caption = "Parameters" endheading param scale caption = "Scale" default = 1.0 hint = "Select a value to scale the image elements." endparam param bailout caption = "Bailout" default = 4 hint = "Select a bailout value for the formula." endparam heading caption = "Functions" endheading func fn1 caption = "Change" default = ident() hint = "Select a function to change the formula." endfunc func fn2 caption = "Change More" default = ident() hint = "Select a function to change the formula more." endfunc func fn3 caption = "Total Change" default = ident() hint = "Select a function to totally change the formula." endfunc } ==========================================================