6jock { ; early formula init: z = fn1(#pixel) y = fn2(#pixel) loop: z = z ^ 3 + z * y + y * y + p1 y = z + y + p2 bailout: |z| < |y| default: title = "6jock" switch: type = "6jock" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1=p1 ;p2 = p2 fn1 = fn1 fn2 = fn2 } 5jock { ; really early formula init: z = #pixel loop: z = fn2(z) * fn1(z) + 1 / z bailout: |z| < 15 default: title = "5jock" } 4jock { ; really early formula init: z = #pixel loop: z = fn2(z*z) + fn1(z) + z + p1 bailout: z <= 16 default: title = "4jock" } 15jock { ; another early formula probably copied from fractint init: z = #pixel loop: shift = fn3(z * p1) + p2 if |z| < shift * @shift z = (fn1(z * z) + p1) / (fn2(z*z)+p2) else z = (fn2(z) + p1) / (fn1(z)+p2) endif bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + \ abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "15jock" param shift caption = "Shift Value" default = 8.0 endparam param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam func fn1 caption = "First Function" default = sin() endfunc func fn2 caption = "Second Function" default = sin() endfunc } 100jock { ; early init: z = #pixel loop: if |z| < @shift z = (fn1(z * z+z) + p1) / (fn2(z*z+z)+p2) else z = (fn2(z + sqrt(z) ) + p1) / (fn1(z + sqrt(z)) + p2) endif bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + \ abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "100jock" param shift caption = "Shift Value" default = 8.0 endparam param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam } 101jock { ;early init: z = #pixel loop: if |z| < @shift z = (fn1(z * fn3(z)) + p1) / (fn3(z* fn2(z))+p2) else z = fn1(fn2(fn3(fn1(z)+z)+z)+z) endif bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + \ abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "101jock" param shift caption = "Shift Value" default = 8.0 endparam param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam } 18jock { ;early init: z = #pixel c = p1 loop: z = fn1(z) +fn2(z*c) + fn3(c+z) +p1 x = fn2(fn1(c) + c ) + x z = fn3(z*x) bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + \ abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "18jock" param shift caption = "Shift Value" default = 8.0 endparam param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam func fn1 caption = "First Function" default = sin() endfunc func fn2 caption = "Second Function" default = sin() endfunc } 20jock { init: z = #pixel y = #pixel loop: y = fn1(y) + y + p1 z = fn2(y)+ z + p2 bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "20jock" param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam } 22jock { ;early init: x = #pixel y = #pixel loop: a = sqr(fn1(x)) b = sqr(fn2(y)) z = fn3(a+b) + z + p1 bailout: (@test == 0 && |z| <= @bailout) || \ (@test == 1 && sqr(real(z)) <= @bailout) || \ (@test == 2 && sqr(imag(z)) <= @bailout) || \ (@test == 3 && (sqr(real(z)) <= @bailout && \ sqr(imag(z)) < @bailout)) || \ (@test == 4 && (sqr(real(z)) <= @bailout || \ sqr(imag(z)) < @bailout)) || \ (@test == 5 && (sqr(abs(real(z)) + abs(imag(z))) <= @bailout)) || \ (@test == 6 && (sqr(real(z) + imag(z)) <= @bailout)) default: title = "22jock" param test caption = "Bailout Test" default = 0 enum = "mod" "real" "imag" "or" "and" "manh" "manr" endparam param bailout caption = "Bailout value" default = 64.0 min = 1 endparam } rbmask1 { ; unknown source init: z = fn1(#pixel) loop: z = p1*fn2(z)^2 + p2*fn3(z)^2 + #pixel bailout: |z| < 4 default: title = "rbmask1" } sn00z { init: complex z = #pixel loop: a=fn1(z^2) - fn2(z/#pixel) b=fn3(a*a/z) - p1 z=fn4(b*p1)-@fn5(z-p3)-p2 bailout: |z| < @bailout default: title = "sn00z" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.1125, -0.0875) endparam param p2 caption = "Parameter 2" default = (0.2, -0.8125) endparam param p3 caption = "Parameter 3" default = (0,0) endparam switch: type = "sn00z" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p1 = #pixel ; comment out the appropriate line below to correspond to the ? parm ;p1 = p1 p2 = p2 p3 = p3 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } snuse { init: complex z = #pixel loop: a=fn1(z^2) - fn2(z/#pixel) -p3 b=fn3(a*a/z) - p1 z=fn4(b*p1)-@fn5(z)-p2 bailout: |z| < @bailout default: title = "snuse" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.275, 0.2125) endparam param p2 caption = "Parameter 2" default = (0,0) endparam param p3 caption = "Parameter 3" default = (0,0) endparam switch: type = "snuse" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1 = p1 ;p2 = p2 p3 = p3 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } ftpo { init: z = Pixel loop: foo = fn1(@fn6(z) /flip(@fn9(z))) a = fn2(@fn8(foo)*foo/fn3(z)) + p1 z = fn4((@fn5(a)+z)/@fn7(a)*z) + p2 bailout: |z| <= @bailout default: title = "ftpo" maxiter = 1000 periodicity = 2 center = (0,0) magn = 0.5 param bailout caption = "Bailout Value" default = (1000,0) endparam param p1 default = (1.225, 2.3625) endparam param p2 default = (0.1625, 0.0125) endparam func fn1 caption = " function1" default = ident() endfunc func fn2 caption = " function2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc func fn6 caption = "Func 6" default = ident() endfunc func fn7 caption = "Func 7" default = ident() endfunc func fn8 caption = "Func 8" default = cabs() endfunc func fn9 caption = "Func 9" default = ident() endfunc switch: type = "ftpo" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1=p1 ;p2=p2 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 fn6 = fn6 fn7 = fn7 fn8 = fn8 fn9 = fn9 bailout = bailout } deimos { init: complex z = #pixel loop: a = log(z^2- p1)+p1 b = fn1(a/z) c = abs(z-a^2) + fn2(a^2/fn3(b^2)) z = (@fn5(c)-fn4(z^2)) + p2 bailout: |z| < @bailout default: title = "deimos" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (-1.225,0.6125) endparam param p2 caption = "Parameter 2" default = (-.49375,0.0125) endparam switch: type = "deimos" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p1 = #pixel ; comment out the appropriate line below to correspond to the ? parm ;p1 = p1 p2 = p2 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } flarphy-work { init: complex z = #pixel complex b = 0 complex a = 0 loop: a = fn1(a+ fn2(b/fn3(z)))+p1 b = fn4(b^2 + z)-p1 z = @fn5(b-a+p2)+ flip(p1) bailout: |z| < @bailout default: title = "flarphy-work" param bailout caption = "Bailout" default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.39875, -0.01125) endparam param p2 caption = "Parameter 2" default = (0,0) endparam switch: type = "flarphy-work" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1 = p1 ;p2 = p2 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } ftpo2k { init: z = Pixel oldfoo = z loop: foo = fn1(@fn6(z) /flip(@fn9(z))) a = fn2(@fn8(foo)*foo/fn3(z)) + p1 bar = flip(foo^2/a^2)-flip(oldfoo/a+p3) z = fn4((@fn5(a)+z)/@fn7(a)*z) + p2/bar oldfoo = foo bailout: |z| < @bailout default: title = "ftpo2k" maxiter = 1000 periodicity = 2 center = (0,0) magn = 0.5 param bailout caption = "Bailout Value" default = (1000,0) endparam param p1 default = (-2.7, -1.2) endparam param p2 default = (-0.85, 0.27) endparam param p3 default = (0.2, -3.5) endparam func fn1 caption = " function1" default = exp() endfunc func fn2 caption = " function2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = flip() endfunc func fn5 caption = "Func 5" default = ident() endfunc func fn6 caption = "Func 6" default = ident() endfunc func fn7 caption = "Func 7" default = ident() endfunc func fn8 caption = "Func 8" default = cos() endfunc func fn9 caption = "Func 9" default = ident() endfunc switch: type = "ftpo2k" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1=p1 ;p2 = p2 p3 = p3 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 fn6 = fn6 fn7 = fn7 fn8 = fn8 fn9 = fn9 bailout = bailout } Oscar { init: complex z = #pixel loop: a = fn1(p2*fn4(z)^3) + acos(conj(z)^2 + sqr(flip(z))) z = sqr(a+p1) + fn3(z)/fn2(#pixel) bailout: |z| < @bailout default: title = "Oscar" param bailout caption = "Bailout" default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc param p1 caption = "Parameter 1" default = (-.4,0) endparam param p2 caption = "Parameter 2" default = (0,-.1) endparam switch: type = "oscar" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p2 = #pixel ; comment out the appropriate line below to correspond to the ? parm p1=p1 ;p2 = p2 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 bailout = bailout } neptwona { init: complex z = #pixel loop: a = z^2 - p1 b = fn1(a^2 - p3*z^2)/fn2(z^2/a) c = fn3(a - fn2(b*p2) + fn3(z)) z = ((fn4(b+c)-@fn5(z)) + b/@p4) bailout: |z| < @bailout default: title = "neptwona" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.325, 0.00625) endparam param p2 caption = "Parameter 2" default = (1,0) endparam param p3 caption = "Parameter 3" default = (1,0) endparam param p4 caption = "Parameter 4" default = (-1.93125, 0.48125) endparam switch: type = "neptwona" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p1 = #pixel ; comment out the appropriate line below to correspond to the ? parm ;p1 = p1 p2 = p2 p3 = p3 p4 = p4 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } ploom { init: complex z = #pixel loop: a = z*z b = (a-z) / #pixel + p1 c = fn3(a*b) / (fn1(a+b)* fn2(a-b)) z = fn4(z+a+b+@fn5(c)) / p2 - c bailout: |z| < @bailout default: title = "ploom" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc param p1 caption = "Parameter 1" default = (0,.1) endparam param p2 caption = "Parameter 2" default = (1.5375,1.2375) endparam switch: type = "ploom" ; edit the line p? = #pixel , change the ? to the parm you want to tweak p1 = #pixel ; comment out the appropriate line below to correspond to the ? parm ;p1=p1 p2 = p2 fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 bailout = bailout } IFS-Barnsley+jockIII { ; IFS-Barnsley by Samuel Monnier, 5.01 ; hacked by Jock Cooper init: z = #pixel c1 = fn1(@bseed) c2 = fn2(@bseed) complex auxz = (0,0) auxc = @c loop: if @mode == 0 || @mode == 2 if real(z) > @c z = fn4(z+@p1)*c1 else z = @fn5(z+@p2)*c2 endif endif if @mode == 1 || @mode == 2 if imag(z) > @c z = fn4(z+@p1)*c1 else z = @fn5(z+@p2)*c2 endif endif if @mode == 3 if cabs(z) > exp(@c) z = fn4(z+@p1)*c1 else z = @fn5(z+@p2)*c2 endif endif if @mode == 4 if real(z)*imag(z) > @c z = fn4(z+@p1)*c1 else z = @fn5(z+@p2)*c2 endif endif if @mode == 5 if fn3(z) > @c z = fn4(z+@p1)*c1 else z = @fn5(z+@p2)*c2 endif endif if @mode == 6 if (@func_operation == 0) auxz = fn3(z + @p3) elseif (@func_operation == 1) auxz = fn3(z - @p3) elseif (@func_operation == 2) auxz = fn3(z * @p3) elseif (@func_operation == 3) auxz = fn3(z / @p3) elseif (@func_operation == 4) auxz = fn3(z ^ @p3) endif auxc = @fn6(auxc + @p4)*(c1+c2) if auxz > auxc z = fn4(auxz+@p1)*c1 else z = @fn5(auxz+@p2)*c2 endif endif if @mode == 7 if fn3(z) > @c if (@func_operation == 0) z = @fn6(fn4(z+@p1)*c1 + @p3) elseif (@func_operation == 1) z = @fn6(fn4(z+@p1)*c1 - @p3) elseif (@func_operation == 2) z = @fn6(fn4(z+@p1)*c1 * @p3 ) elseif (@func_operation == 3) z = @fn6(fn4(z+@p1)*c1 / @p3) elseif (@func_operation == 4) z = @fn6((fn4(z+@p1)*c1) ^ @p3) endif else if (@func_operation == 0) z = @fn6(@fn5(z+@p2)*c2 + @p4) elseif (@func_operation == 1) z = @fn6(@fn5(z+@p2)*c2 - @p4) elseif (@func_operation == 2) z = @fn6(@fn5(z+@p2)*c2 * @p4) elseif (@func_operation == 3) z = @fn6(@fn5(z+@p2)*c2 / @p4) elseif (@func_operation == 4) z = @fn6((@fn5(z+@p2)*c2) ^ @p4) endif endif endif if @mode == 8 if fn3(z) > @c if (@func_operation == 0) z = @fn6(fn4(z*c1+p1) + @p3) elseif (@func_operation == 1) z = @fn6(fn4(z*c1+p1) - @p3) elseif (@func_operation == 2) z = @fn6(fn4(z*c1+p1) * @p3 ) elseif (@func_operation == 3) z = @fn6(fn4(z*c1+p1) / @p3) elseif (@func_operation == 4) z = @fn6(fn4(z*c1+p1) ^ @p3) endif else if (@func_operation == 0) z = @fn6(@fn5(z*c2+p2) + @p4) elseif (@func_operation == 1) z = @fn6(@fn5(z*c2+p2) - @p4) elseif (@func_operation == 2) z = @fn6(@fn5(z*c2+p2) * @p4) elseif (@func_operation == 3) z = @fn6(@fn5(z*c2+p2) / @p4) elseif (@func_operation == 4) z = @fn6(@fn5(z*c2+p2) ^ @p4) endif endif endif bailout: |z| < @bailout default: title = "IFS-Barnsley+jock III" param bailout caption = "Bailout" default = 1e3 endparam param mode caption = "Mode" default = 0 enum = "Real" "Imaginary" "Alternate" "Cabs" "Cross" "Func" "FuncII" "FuncIII" "FuncIV" endparam param bseed caption = "Barnsley Seed" default = (0,0) endparam param c caption = "Critical Value" default = 0.0 endparam param p1 caption = "Parameter 1" default = (-1,0) endparam param p2 caption = "Parameter 2" default = (1,0) endparam func fn1 caption = "Case 1 Seed Function" default = ident() endfunc func fn2 caption = "Case 2 Seed Function" default = ident() endfunc func fn4 caption = "Extra Function 1" default = ident() endfunc func fn5 caption = "Extra Function 2" default = ident() endfunc func fn3 caption = "Switch Function" default = ident() visible = (@mode == 5 || @mode == 6 || @mode == 7 || @mode == 8) endfunc func fn6 caption = "Switch Func 2" default = ident() visible = (@mode == 6 || @mode == 7 || @mode == 8) endfunc param @func_operation caption = "Switch Operation" enum = "+" "-" "*" "/" "^" visible = (@mode == 6 || @mode == 7 || @mode == 8) endparam param p3 caption = "Switch Parameter 1" default = (1,0) visible = (@mode == 6 || @mode == 7 || @mode == 8) endparam param p4 caption = "Switch Parameter 2" default = (1,0) visible = (@mode == 6 || @mode == 7 || @mode == 8) endparam switch: type = "IFS-Barnsley+jockIII" p2 = #pixel p1 = p1 ;p2 = p2 p3 = p3 p4 = p4 bseed = bseed fn1 = fn1 fn2 = fn2 fn3 = fn3 fn4 = fn4 fn5 = fn5 fn6 = fn6 mode = mode c = c func_operation = func_operation } 4AD { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 v2 = p4+(v1-z)/w1 v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*(v4-v2) + v2/v5) bailout: |z| < @bailout default: title = "4AD" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = recip() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.411547,0.020891) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam } 4ADT { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 v2 = p4+(v1-z) /(w1+z) v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*(v4-v2) + v2/v5) bailout: |z| < @bailout default: title = "4ADT" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = recip() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.411547,0.020891) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam } ifb { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel v6=0 loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 v2 = p4+(v1-z) /(w1+z+v4) v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*(v4-v2) + v2/v5 ) bailout: |z| < @bailout default: title = "ifb" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = tan() endfunc func fn2 caption = "Func 2" default = exp() endfunc param p1 caption = "Parameter 1" default = (0.00445556,-0.00184641) endparam param p2 caption = "Parameter 2" default = (1.008304482,0.009341447) endparam param p3 caption = "Parameter 3" default = (-0.3978969,-0.0010917) endparam param p4 caption = "Parameter 4" default = (0.5090448,-0.0536594) endparam } 4ADT { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 v2 = p4+(v1-z) /(w1+z) v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*(v4-v2) + v2/v5) bailout: |z| < @bailout default: title = "4ADT" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = recip() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.411547,0.020891) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam } EZ { ; generated/mutated init: z=#pixel w1=#pixel loop: v2 = z^2+p2 w1 = (w1+(p1*v3)) v4 = z+fn1(p3-v2)-fn2(p3*v2) v2 = p4+(p3-z)/(v2*w1) v3 = #pixel+v3+(v4+v2) z = (z+p3*p3*(v4-v2)) bailout: |z| < @bailout default: title = "EZ" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = sqr() endfunc param p1 caption = "Parameter 1" default = (-0.225149,-0.017545) endparam param p2 caption = "Parameter 2" default = (0.2429824,-0.0105264) endparam param p3 caption = "Parameter 3" default = (0.415204,0.017544) endparam param p4 caption = "Parameter 4" default = (0.619883,-0.116959) endparam } 414 { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + (v1+v2)^2 -v6 v2 = p4+(v1+z)/w1 v3 = (v1+v3*p2-(fn2(v4)+v2)) v6 = z * v6 +v4-v3 z = (z+(v5)*v1*(v4-v2) + v2/v5 ) bailout: |z| < @bailout default: title = "414" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc param p1 caption = "Parameter 1" default = (0.100934,-0.042531) endparam param p2 caption = "Parameter 2" default = (1.0018625,-0.0323632) endparam param p3 caption = "Parameter 3" default = (-0.0000312281,3.938e-7) endparam param p4 caption = "Parameter 4" default = (0.619514,0.259887) endparam } mD4xx { ; generated/mutated init: z=#pixel w1=#pixel v3=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v2 = p4+(v1-z*v2)/w1 v3 = (v1+v3/p2-v2*(fn2(v4)+v2)) z = (z+v1*v1*(v4-v2)) bailout: |z| < @bailout default: title = "mD4xx" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.411547,0.020891) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam } 477 { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 -v6 *v4 v2 = p4+(v1-z)/w1 v3 = (v1+v3*p2-(fn2(v4)+v2)) v6 = z * v6 +v4-v3 z = (z+v5*v1*(v4-v2) + v2/v5 ) bailout: |z| < @bailout default: title = "477" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = ident() endfunc param p1 caption = "Parameter 1" default = (0.100934,-0.042531) endparam param p2 caption = "Parameter 2" default = (1.0018625,-0.0323632) endparam param p3 caption = "Parameter 3" default = (-0.0000312281,3.938e-7) endparam param p4 caption = "Parameter 4" default = (0.619514,0.259887) endparam } f81 { ; generated/mutated init: z=#pixel w1=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)-p2) v4 = z+(v1-v2)-(v1*v2) v2 = p4+(v1-z)/w1 v3 = (#pixel+v3+(v4+v2)) z = (z+v1*v1*(v4-v2)) bailout: |z| < @bailout default: title = "f81" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.165452,-0.271267) endparam param p2 caption = "Parameter 2" default = (0.02766,0.94453) endparam param p3 caption = "Parameter 3" default = (-0.143891,0.479816) endparam param p4 caption = "Parameter 4" default = (0.013958,-0.04925) endparam } L6 { ; generated/mutated then hand tweaked init: complex z = #pixel complex var1 complex var2 = #pixel loop: a = z*z + p3 if @flavor == 0 var1 = fn1(#pixel + (p1*a)) endif if @flavor == 1 var1 = #pixel + fn1(p1*a) endif if @flavor == 2 var1 = sqrt(#pixel + fn1(p1*a)) endif if @flavor == 3 var1 = fn1(var2/#pixel) + (p1*a) endif if @topping == 0 var2 = (z+(a+b)* (a-b-p4)) endif if @topping ==1 var2 = (z^2+(a+b)* (a-b-p4)) endif if @topping == 2 var2 = (z^2+(a+b)^2 * (a-b-p4)) endif if @topping == 3 var2 = (z+(a+b)- (a*b*p4)) endif b = (a-z) / var1 c = (a*b) / var2 if @type == 0 z = (z+a+b+c) / p2 - c endif if @type == 1 z = (z+a+b+c/#pixel) / p2 - c endif if @type == 2 z = ((z+a+b +c) / p2 - c)/#pixel endif bailout: |z| < @bailout default: title = "L6" param bailout caption = "Bailout", default = 30 endparam func fn1 caption = "Func 1" default = ident() endfunc param flavor caption = "Flavor" default = 0 enum = "Chocolate" "Vanilla" "Strawberry" "Pistachio" endparam param topping caption = "Topping" default = 0 enum = "Sprinkles" "Nuts" "Hot Fudge" "Fruit" endparam param type caption = "Type" default = 0 enum = "Ice Cream" "Ice Milk" "Yogurt" endparam param p1 caption = "Parameter 1" default = (0.0625, -0.3125) endparam param p2 caption = "Parameter 2" default = (1.3625, 0.2625) endparam param p3 caption ="Parameter 3" default = (0,0.01) endparam param p4 caption ="Parameter 4" default = (0,0) endparam switch: type = "L6" p1 = #pixel ;p1 = p1 p2 = p2 p3 = p3 p4 = p4 fn1 = fn1 bailout = bailout } 4KK { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3+z)) v4 = z+(v1-v2)-(v1*v2) v5 = v5 + v4^2 v2 = p4+(v1-z)/w1 v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*(v4-v2) + v2/v5) bailout: |z| < @bailout default: title = "4KK" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = recip() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.411547,0.020891) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam } SSX { ; generated/mutated init: z=#pixel w1=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+(p1*v3)) v4 = z+(v1-v2)-(v1*v2)* (w1-v2) v2 = p4+(v1+v2-z)/w1 v3 = (v1+v3*p2-(fn2(v4)+v2)) z = (z+v1*v1*(v4-v2)) bailout: |z| < @bailout default: title = "SSX" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = ident() endfunc func fn2 caption = "Func 2" default = cotanh() endfunc param p1 caption = "Parameter 1" default = (-0.5198,-0.306646) endparam param p2 caption = "Parameter 2" default = (0.936232,0.026087) endparam param p3 caption = "Parameter 3" default = (-0.523756,-0.022714) endparam param p4 caption = "Parameter 4" default = (0.581781,-0.11134) endparam } ILBP { ; generated/mutated init: z=#pixel w1=#pixel v5=#pixel loop: v2 = z^2 v1 = p3 w1 = fn1(#pixel+@fn5(p1*v3)) v4 = z+(v1-v2)-fn3(v1*v2) v5 = v5 + v4^2 v2 = p4+fn4(v1-z)/w1 v3 = (v3*p2-(fn2(v4)+v2)) z = (z+v5*v1*@fn6(v4-v2*v3) + v2/v5) bailout: |z| < @bailout default: title = "ILBP" param bailout caption = "Bailout", default = 3000 endparam func fn1 caption = "Func 1" default = sqr() endfunc func fn2 caption = "Func 2" default = recip() endfunc func fn3 caption = "Func 3" default = ident() endfunc func fn4 caption = "Func 4" default = ident() endfunc func fn5 caption = "Func 5" default = ident() endfunc func fn6 caption = "Func 6" default = ident() endfunc param p1 caption = "Parameter 1" default = (-0.187757,-0.048484) endparam param p2 caption = "Parameter 2" default = (0.997101,-0.002899) endparam param p3 caption = "Parameter 3" default = (-0.006785,0.000058) endparam param p4 caption = "Parameter 4" default = (0.649275,0.075363) endparam }