HI, ; software with unlimited possibilities cannot be easy to handle. Of course that´s the reason nobody ever has tried to create completely new images. I have tried to make MFR12 more userfriendly. ; Therefor I have supplied some means to enable an easy startup: A complete set of Parfiles for every participating frm (11). They create an image with the basic shape and also have some default settings. ; Also all basic images are supplied, so all there is to do: Load an image and add other frms and settings. ; To start it´s only necessary to insert in line 3 (Rp2) of the setup screen the number of 2 to 5 frms to use. The number is given in the name of the parfile. ; Of course there is a lot more to it, for instance the warp effect and the border system, but these things are not needed for a startup. ; I know that this is interesting for very few users, just give it a try and you will see that crating images with MFR12 is a fascinating game - and after all this IS a forum. Of course I will assist and reply all inevitable questions and also will explain the more demanding features of the software if there is any interest. ; To avoid possible loss due to Dropbox I will repeat the Parfiles and the Frm (one minimal change due to the Spider Frm) ; https://www.dropbox.com/sh/82yqz36o7y07aah/fyxOhKGxac ; Cheers, Albrecht ==============================start_par==================================== 1_Secant_Basic { ; Time 02.33.90 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/exp/exp/sin passes=t center-mag=2.22045e-016/0/0.5226667/1/-90/3.88578058618804789e-016 params=1.42593798638874/0.4447980163579212/10000.0703570002/15234.050603\ 0602/152048.0404808048/384.1604894048/384.00482000595/256.1007683/512.10\ 07683001/512.1007683 float=y maxiter=3072 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=000000zr0zz1zzC<2>zzz<3>jqdfo_blU<3>Mb8<3>LQ8KM8KJ8<2>I88H44G00<3\
TA5WD6ZF7aI8eLAhMBiODjQF<3>qeBriAtm9vq8xu7zz5zz4zz3<4>zj4zg4zc4<3>zS5zP\ 5zL6zI6zE6wE6tD6<6>vAIv9Kv9M<3>x7Sy7Uy6Wz6Yz5_<3>f5Ma5IW4E<2>_4H<3>P3DN2\ CK2A<3>805G0BO0G<3>g0Ul0Xq0`v0d<2>y0fz0gy0h<3>u1mt1ns1or2q<2>v2u<3>c5eZ6\ `U6X<2>F9LAAG7FO4KW0Qc<3>5Xc6Zc7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<3>civflvin\ vlqvotvsww<2>zzz<3>rwzovzhsw<3>Gch8_d8Xa<3>8JP8FL8CI<4>XCAaB9fB7<3>zA0<1\ 3>SA1QA1NA1<3>D92<6>UXAW`BYcC<3>hrI<3>UnXRm_NlcJkgFfpAaz<3>PJoSFlWAi_5fc\ 0ce7_jFRoNIzb0zj0 }
2_Mandel_Basic { ; Time 02.22.04 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/sin/exp/sin passes=t center-mag=0.315433/0.00308737/0.9205382/1/-90/-1.23373533611470521e-014 params=-0.05825983458967864/0.3785210730307932/20000.32595700022/15234.0\ 506030602/152048.0404808048/384.1604894048/384.00482000595/256.1007683/5\ 12.1007683001/512.1007683001 float=y maxiter=3072 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=000<2>110110000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f0Ci0Dl0\ F<3>z0K<6>Z0EV0DR0C<3>A08004000<26>000<4>000<7>Q0UU0YX0a_0dc0hf0l<2>p0w<\ 4>_0dX0aU0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<10>2WI2TG2RE<3>4G54D36F5<16\
kkammcpoe<3>zwm<3>mhZjdVfaS<3>VMCRI8OE4KA0000<43>000<4>000330<12>110 }
2alt_Dblmandel_Bas { ; Alternaive for Single Mandel ; Time 01.57.81 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/sin/exp/sin passes=t center-mag=-0.49234/0.00308737/1.183773/0.9769/180 params=-0.05825983458967864/0.3785210730307932/20000.32595710022/15234.0\ 506030602/152048.0404808048/384.1604894048/384.00482000595/256.1007683/5\ 12.1007683001/512.1007683001 float=y maxiter=3072 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=000110110000110<2>000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f0\ Ci0Dl0F<3>z0K<6>Z0EV0DR0C<3>A08004000<26>000<4>000<7>Q0UU0YX0a_0dc0hf0l<\ 2>p0w<4>_0dX0aU0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<10>2WI2TG2RE<3>4G54D3\ 6F5<16>kkammcpoe<3>zwm<3>mhZjdVfaS<3>VMCRI8OE4KA0000<43>000<4>000330<10>\ 110 } 3_Bees_Basic { ; Time 01.22.94 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/sin/exp/sin passes=t center-mag=0.74349/0.00308737/0.2679171/1/-90/3.88578058618804789e-016 params=-0.05825983458967864/0.3785210730307932/30000.32595700022/15234.0\ 506030602/152048.0404808048/384.1604894048/384.00482000595/256.1007683/5\ 12.1007683001/512.1007683001 float=y maxiter=3072 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=000000zr0zz1zzC<2>zzz<3>jqdfo_blU<3>Mb8<3>LQ8KM8KJ8<2>I88H44G00<3\
TA5WD6ZF7aI8eLAhMBiODjQF<3>qeBriAtm9vq8xu7zz5zz4zz3<4>zj4zg4zc4<3>zS5zP\ 5zL6zI6zE6wE6tD6<6>vAIv9Kv9M<3>x7Sy7Uy6Wz6Yz5_<3>f5Ma5IW4E<2>_4H<3>P3DN2\ CK2A<3>805G0BO0G<3>g0Ul0Xq0`v0d<2>y0fz0gy0h<3>u1mt1ns1or2q<2>v2u<3>c5eZ6\ `U6X<2>F9LAAG7FO4KW0Qc<3>5Xc6Zc7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<3>civflvin\ vlqvotvsww<2>zzz<3>rwzovzhsw<3>Gch8_d8Xa<3>8JP8FL8CI<3>SCCXCAaB9<3>uA2zA\ 0xA0<12>SA1QA1NA1<3>D92<6>UXAW`BYcC<3>hrI<3>UnXRm_NlcJkgFfpAaz<3>PJoSFlW\ Ai_5fc0ce7_jFRoNIzb0zj0 }
4_Julia_Basic { ; Time 01.57.81 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/exp/exp/sin passes=t center-mag=-0.502551/0.00230074/1.04123/1.0201/77.2315031053739602/0.531\ 703639330900923 params=0.2030091250343333/0.3606067079683828/40000.07030100001/25233.867\ 49100335/151024.7048889127/383.443930242594/384.6230639709148/256.119445\ 6278993/511.3025872032647/766.2888233554911 float=y maxiter=1024 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=00y000<4>0000000000800000800A00000K00K0gK0g00hL0hK0jK00K00N00H0kH\ 0k00kS0lU00Z00_0la00d00d0000mh00j00000m0000n000n0000000or0xt0xu0uv0ux0sx\ 0sx00x0<3>0y00000y0<2>0y0zy0zy0zy00y00y0zxyzxvzx0ywu0vt0ut0qs0ps0pr00000\ 000r0pq00q00q0000000oqz0000000p00qyo00p00pryqtyqwxqyxqy0qxwpvvpvuou0lttj\ stjq0hotbmsSXsQWsNVpJSpIG00000000F0G00DC0DB09A07606500500406400300000x00\ xv02vww00w0uwtuwtt2t02s0vs0vr01qr1q0uq00nq0nq0kqukn0il00j0hjt0it60r6gq50\ i00h00h00300f00S00F00F00E50D00C00C00700000060804805005000800860905900000\ 068z08yp0yqoysoxvoxvo9vo90ox8ow00w0000AtJnrJnpJmoJmnKkiKjfKkdK000000C00E\ 00F00F0000<3>000wx0twxswwpvwnvu0uu0ttmtr0tq0spksp0rn0pmkokkojjljjkiij0ij\ 000000000y00x00xzyxzxwyvw0tuxouxosvmsulqsj0qiophophm00l00k0hj<3>0hh0gh00\ f0fe0cd0cY00V00U00N00O000 } 4alt_Manowar_Bas { ;Alternative for Julia ; Time 01.45.08 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/sin/exp/sin passes=t center-mag=-0.479531/0.00308737/1.116437/1/90/-1.23373533611470521e-014 params=1.892178106021302/0.4900357066560869/40000.32595700022/25234.0506\ 020602/152048.0404808025/384.1604894022/384.00482000595/256.1007683/512.\ 1007683001/512.1007683001 float=y maxiter=3072 inside=maxiter logmap=3 periodicity=0 rseed=-2436 colors=000wyz<3>nvz<3>MglFch7_d<3>7NS7JP7FL7CI<4>WCA`B9eB7<3>yA0<13>RA1P\ A1MA1<3>C92<6>TXAV`BXcC<3>grI<3>TnXQm_MlcIkgEfp9az<3>OJoRFlVAiZ5fb0cd7_i\ FRnNIyb0yj0000yr0yz1yzC<2>yzz<3>iqdeo_alU<3>Lb8<3>KQ8JM8JJ8<2>H88G44F00<\ 3>SA5VD6YF7`I8dLAgMBhODiQF<3>peBqiAsm9uq8wu7yz5yz4yz3<4>yj4yg4yc4<3>yS5y\ P5yL6yI6yE6vE6sD6<6>uAIu9Ku9M<3>w7Sx7Ux6Wy6Yy5_<3>e5M`5IV4E<2>Z4H<3>O3DM\ 2CJ2A<3>705F0BN0G<3>f0Uk0Xp0`u0d<2>x0fy0gx0h<3>t1ms1nr1oq2q<2>u2u<3>b5eY\ 6`T6X<2>E9L9AG6FO3KW0Qc0Sc<3>5Zc6`c6aa6c_6eY<3>EcgGciIbl<3>R_v<3>bivelvh\ nvkqvntvrww<2>yzz } 5a_Mmods_Sinus_Bas { ; Time 04.12.99 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/sin/exp/sin passes=t center-mag=0.166375/0.00308737/0.02002671/1/-90/-1.23373533611470521e-01\ 4 params=-0.05825983458967864/0.3785210730307932/50000.07595700001/51234.0\ 506030602/150248.0404808048/384.1604894048/384.00482000595/256.1007683/5\ 12.1007683001/512.1007683001 float=y maxiter=1024 inside=maxiter logmap=yes periodicity=0 rseed=-2436 colors=000000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f0Ci0Dl0F<3>z0K<6\
Z0EV0DR0C<3>A08004000<26>000<4>000<7>Q0UU0YX0a_0dc0hf0l<2>p0w<4>_0dX0aU\ 0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<10>2WI2TG2RE<3>4G54D36F5<16>kkammcpo\ e<3>zwm<3>mhZjdVfaS<3>VMCRI8OE4KA0000<43>000<4>000330<6>220220220<3>1100\ 00110110110 }
5b_Mmods_Cosin_Bas { ; Time 02.42.96 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=cos/sin/exp/sin passes=t center-mag=0.332423/0.00308737/0.0511977/1/-90/-1.23373533611470521e-014 params=-0.05825983458967864/0.3785210730307932/50000.07595700023/51234.0\ 506030602/152048.0404808048/384.1604894048/384.00482000595/256.1007683/5\ 12.1007683001/512.1007683001 float=y maxiter=1024 inside=maxiter logmap=yes periodicity=0 rseed=-2436 colors=000000KA4<7>gcOjgRmjT<3>zzc<9>UOFRKDOGA<3>A00<9>f0Ci0Dl0F<3>z0K<6\
Z0EV0DR0C<3>A08004000<26>000<4>000<7>Q0UU0YX0a_0dc0hf0l<2>p0w<4>_0dX0aU\ 0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<10>2WI2TG2RE<3>4G54D36F5<16>kkammcpo\ e<3>zwm<3>mhZjdVfaS<3>VMCRI8OE4KA0000<43>000<4>000330<6>220220220<3>1100\ 00110110110 }
6_Phoenix_Basic { ; Time 00.18.18 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=cos/exp/exp/sin passes=t center-mag=0.0530235/-0.0039903/0.9981015/1/-90/-1.23373533611470521e-01\ 4 params=-0.05825983458967864/0.3785210730307932/60000.07035700001/51234.0\ 506030602/151024.0204808192/384.32768524288/384.00482000595/256.1007683/\ 512.1007683001/768.2007680082311 float=y maxiter=1024 inside=maxiter periodicity=0 rseed=-2436 colors=000330<5>220220220<3>110000110<2>000KA4<7>gcOjgRmjT<3>zzc<9>UOFRK\ DOGA<3>A00<9>f0Ci0Dl0F<3>z0K<6>Z0EV0DR0C<3>A08004000<26>000<4>000<7>Q0UU\ 0YX0a_0dc0hf0l<2>p0w<4>_0dX0aU0Y<2>K0NH0JG0NE1R<3>7UX6`Z4h_2oa0wc<10>2WI\ 2TG2RE<3>4G54D36F5<16>kkammcpoe<3>zwm<3>mhZjdVfaS<3>VMCRI8OE4KA0000<43>0\ 00<4>000330 } 7_Newton_Basic { ; Time 02.48.18 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=exp/sin/exp/sin passes=t center-mag=-0.000670243/0.00308737/0.7444028/1/-90/3.88578058618804789e-\ 016 params=-0.05825983458967864/0.3785210730307932/70000.32595700023/35234.0\ 506030602/151024.0204808192/384.32768524288/384.00482000595/256.1007683/\ 512.1007683001/768.2007680082311 float=y maxiter=1024 inside=maxiter logmap=yes periodicity=0 rseed=-2436 colors=00y000000000wx0twxswwpvwnvu0uu0ttmtr0tq0spksp0rn0pmkokkojjljjkiij\ 0ij000000000y00x00xzyxzxwyvw0tuxouxosvmsulqsj0qiophophm00l00k0hj<3>0hh0g\ h00f0fe0cd0cY00V00U00N00O000<4>000<2>0000800000800A00000K00K0gK0g00hL0hK\ 0jK00K00N00H0kH0k00kS0lU00Z00_0la00d00d0000mh00j00000m0000n000n0000000or\ 0xt0xu0uv0ux0sx0sx00x0<3>0y00000y0<2>0y0zy0zy0zy00y00y0zxyzxvzx0ywu0vt0u\ t0qs0ps0pr00000000r0pq00q00q0000000oqz0000000p00qyo00p00pryqtyqwxqyxqy0q\ xwpvvpvuou0lttjstjq0hotbmsSXsQWsNVpJSpIG00000000F0G00DC0DB09A07606500500\ 406400300000x00xv02vww00w0uwtuwtt2t02s0vs0vr01qr1q0uq00nq0nq0kqukn0il00j\ 0hjt0it60r6gq50i00h00h00300f00S00F00F00E50D00C00C00700000060804805005000\ 800860905900000068z08yp0yqoysoxvoxvo9vo90ox8ow00w0000AtJnrJnpJmoJmnKkiKj\ fKkdK000000C00E00F00F0000000 } 8_Spider_Basic { ; Time 00.50.20 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=exp/sin/exp/sin passes=t center-mag=-0.0606262/0.0140242/1.06411/1/-105.000000000000028/1.3107570\ 5844807544e-014 params=-0.008056886501663262/0.04943998535111546/80000.32595700023/25234\ .0506030602/152048.0404808048/384.1604894048/384.00482000595/256.1007683\ /512.1007683001/512.1007683001 float=y maxiter=1024 inside=maxiter logmap=4 periodicity=0 rseed=-2436 colors=000EXw<3>SFlWAi_5fc0ce7_jFRoNIzb0zj0000zr0zz1zzC<2>zzz<3>jqdfo_bl\ U<3>Mb8<3>LQ8KM8KJ8<2>I88H44G00<3>TA5WD6ZF7aI8eLAhMBiODjQF<3>qeBriAtm9vq\ 8xu7zz5zz4zz3<4>zj4zg4zc4<3>zS5zP5zL6zI6zE6wE6tD6<6>vAIv9Kv9M<3>x7Sy7Uy6\ Wz6Yz5_<3>f5Ma5IW4E<2>_4H<3>P3DN2CK2A<3>805G0BO0G<3>g0Ul0Xq0`v0d<2>y0fz0\ gy0h<3>u1mt1ns1or2q<2>v2u<3>c5eZ6`U6X<2>F9LAAG7FO4KW0Qc<3>5Xc6Zc7`c7aa7c\ _7eY<3>FcgHciJbl<3>S_v<3>civflvinvlqvotvsww<2>zzz<3>rwzovzhsw<3>Gch8_d8X\ a<3>8JP8FL8CI<4>XCAaB9fB7<3>zA0<13>SA1QA1NA1<3>D92<6>UXAW`BYcC<3>hrI<6>J\ kgFfpAaz } 8alt_Magnet_Basic { ;Alternative for Spider ; Time 02.16.98 ; 1280/1024 reset=2004 type=formula formulafile=mfr_12.frm formulaname=multifractal_12 function=sin/exp/exp/sin passes=t center-mag=-0.300855/-0.00563554/0.6131608/1/-90/3.88578058618804789e-01\ 6 params=-0.05825983458967864/0.3785210730307932/80000.6459570111/14235.49\ 11030602/152048.0404808035/384.1604894022/384.00482000595/256.1007683001\ /512.1007683001/768.1007683001 float=y maxiter=3071 inside=maxiter periodicity=0 rseed=-2436 colors=000rwzovz<3>NglGch8_d<3>8NS8JP8FL8CI<3>SCCXCAaB9<3>uA2zA0xA0<12>S\ A1QA1NA1<3>D92<6>UXAW`BYcC<3>hrI<3>UnXRm_NlcJkgFfpAaz<3>PJoSFlWAi_5fc0ce\ 7_jFRoNIzb0zj0000zr0zz1zzC<2>zzz<3>jqdfo_blU<3>Mb8<3>LQ8KM8KJ8<2>I88H44G\ 00<3>TA5WD6ZF7aI8eLAhMBiODjQF<3>qeBriAtm9vq8xu7zz5zz4zz3<4>zj4zg4zc4<3>z\ S5zP5zL6zI6zE6wE6tD6<6>vAIv9Kv9M<3>x7Sy7Uy6Wz6Yz5_<3>f5Ma5IW4E<2>_4H<3>P\ 3DN2CK2A<3>805G0BO0G<3>g0Ul0Xq0`v0d<2>y0fz0gy0h<3>u1mt1ns1or2q<2>v2u<3>c\ 5eZ6`U6X<2>F9LAAG7FO4KW0Qc<3>5Xc6Zc7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<3>civf\ lvinvlqvotvsww<2>zzz<2>txz } frm:multifractal_12 { ; Albrecht Niekamp Dec, 2013 ;P1 spider-julia-seed ;RP2 Left: 5 Digit_Channels: (1)shape (2)out (3)ins_1 (4)ins_2 (5)ins_3 ; Frm: 0_off 1_Secant 2_Mand(2) 3_Bees 4_Jul/Manowar 5_Mmods ; 6_Phoenix 7_Newton 8_Spider/Magnet ; Right: 2 Digit_ManyMods_Number of sides 2 Digit_Phoen 2 Digit_Spid ; 1 Digit_TransReset-Shape: 0_no 1_DblMan 2_Iter 3_both +5_warp ; 4 Digit_TransReset-Ch 2-5: 0_no 1_z 2_Iter 3_both +5_warp ;IP2 Left: 5 Digit_Bailout Number for Channels 1 to 5 ; Right: Variables: 4 Digit_Mand/Jul (2var) 2 Digit_Secant 4 Digit_Bees ;RP3 Left: 2 Digit_Newtonvariable 4 Digits_bailout1 ; Right: 4 Digit_bailout2 4 Digit_bailout3 1 Digit_Magnet ;IP3 Left: 4 Digit_Shape: Warp-factor (fn1 is used) ; Right: 4 Digit_bailout4 4 Digit_bailout5 1 digit_mow=2 1 digit_mag=2 ;RP4 Left: 4 Digit_Outside: Warp-factor (fn2 used) ; Right: Outside: 4 Digit+fractdig_Border-out 4 Digit+fractdig_border-in ;IP4 Left: Inside1_Maxiter ; Right: Inside1_Transit: 1_maxit 2_borderout 3_borderin +5_maxit+bord ; 5 Digit_warp factor (fn2 used) 4 Digit+fractaldigit_border1 ;RP5 Left: Inside2_Maxiter ; Right: Inside2_Transit: 1_maxit 2_borderout 3_borderin +5_maxit+bord ; 5 Digit_warp factor (fn3 used) 4 Digit+fractaldigit_border2 ;IP5 Left: Inside3_Maxiter ; Right: Inside3_Transit: 1_maxit 2_borderout 3_borderin +5_maxit+bord ; 5 Digits_Warp factor (fn4 used) 4 Digit+fractaldigit_border3 ;fn(1) shared by many-mods + bees ; z=pixel da=real(p2) dd=trunc(da) tt=dd>0 da=trunc(((da-dd)*100000000000)+11111) dd=trunc(dd+11111) d=trunc(dd/10000) dd=dd-d*10000 d3=(d==4)+(d==5)+(d==8)+(d==9) d4=d3==0 vb=d>5 ex0=(d>1) sc=d==2 mo=d==6 px=d==7 ab=px+(d==3)+(d==5)+(d==9) d=trunc(dd/1000) dd=dd-d*1000 ex1=(d>1) sc1=d==2 mo1=d==6 px1=d==7 v1m=mo1+px1 v1j=d>7 dd1=v1j+(d==4)+(d==5) ab1=px1+(d==3)+(d==5)+(d==9) d=trunc(dd/100) dd=dd-d*100 ex2=(d>1) sc2=d==2 mo2=d==6 px2=d==7 v2m=mo2+px2 v2j=d>7 dd2=v2j+(d==4)+(d==5) ab2=px2+(d==3)+(d==5)+(d==9) d=trunc(dd/10) ex3=(d>1) sc3=d==2 mo3=d==6 px3=d==7 v3m=mo3+px3 v3j=d>7 dd3=v3j+(d==4)+(d==5) ab3=px3+(d==3)+(d==5)+(d==9) d=dd-d*10 ba=imag(p5) mi3=trunc(ba) dd=(d>1)+(mi3>1) ex4=(dd==2) sc4=d==2 mo4=d==6 px4=d==7 v4m=mo4+px4 v4j=d>7 dd4=v4j+(d==4)+(d==5) ab4=px4+(d==3)+(d==5)+(d==9) tt=ex1+ex0+ex2+ex3+ex4 ; mm=trunc(da/1000000000) da=da-mm*1000000000 ph=trunc(da/10000000) da=da-ph*10000000 sp=trunc(da/100000) da=da-sp*100000 d=trunc(da/10000) da=da-d*10000 dm=(d==2)+(d==4) ir0=(d==3)+(d==4) d=trunc(da/1000) w1=d>4 da=da-d*1000 d=d-5*w1 rs1=(d==2)+(d==4) ir1=(d==3)+(d==4) da=da-d*100 d=trunc(da/10) w2=d>4 d=d-5*w2 rs2=(d==2)+(d==4) ir2=(d==3)+(d==4) d=trunc(da/10) w3=d>4 da=da-d*10 d=d-5*w3 rs3=(d==2)+(d==4) ir3=(d==3)+(d==4) w4=da>4 da=da-5*w4 rs4=(da==2)+(da==4) sp=sp/100 ; d=real(p3) dd=trunc(d) da=trunc((d-dd)*10000000000) pp=trunc(dd/10000) ba1=dd-10000*pp ba2=trunc(da/1000000) da=da-1000000*ba2 ba3=trunc(da/100) da=da-100*ba3 mg=trunc(da/10) ; d=imag(p3) sfac=trunc(d) da=trunc((d-sfac)*10000000000) ba4=trunc(da/1000000) da=da-ba4*1000000 ba5=trunc(da/100) da=da-ba5*100 d=trunc(da/10) da=da-d*10 mow=d==2 mag=da==2 ; d=real(p4) ofac=trunc(d) da=trunc((d-ofac)*10000000000) bh=trunc(da/100000)/10 bl=(da-bh*1000000)/10 bs=bl/2 ; d=imag(p2) dd=trunc(d) da=trunc((d-dd)*10000000000) d=trunc(dd/10000) dd=dd-d*10000 bb0=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/1000) dd=dd-d*1000 bb1=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/100) dd=dd-d*100 bb2=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=trunc(dd/10) dd=dd-d*10 bb3=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) d=dd bb4=ba1*(d==1)+ba2*(d==2)+ba3*(d==3)+ba4*(d==4)+ba5*(d==5) ; d=da p0=trunc(d/100000000)/10 d=d-p0*1000000000 p6=trunc(d/1000000)/10 d=d-p6*10000000 p7=trunc(d/10000)/10 d=d-p7*100000 dp=p6+p0/100 p8=trunc(d/100)/100 d=d-p8*10000 p9=d/100 ; d=imag(p4) mi1=trunc(d) da=trunc((d-mi1)*100000000000) d=trunc(da/10000000000) bt1=d>6 da=da-d*10000000000 d=d-5*bt1 dt1=d>1 iv1=d==3 fac1=trunc(da/100000) da=da-fac1*100000 bo1=(da/100000)/10 ; d=real(p5) mi2=trunc(d) da=trunc((d-mi2)*100000000000) d=trunc(da/10000000000) bt2=d>6 da=da-d*10000000000 d=d-5*bt2 dt2=d>1 iv2=d==3 fac2=trunc(da/100000) da=da-fac2*100000 bo2=(da/100000)/10 ; d=imag(p5) mi3=trunc(d) da=trunc((d-mi3)*100000000000) d=trunc(da/10000000000) bt3=d>6 da=da-d*10000000000 d=d-5*bt3 dt3=d>1 iv3=(d==3) fac3=trunc(da/100000) da=da-fac3*100000 bo3=(da/100000)/10 ; if (vb) if (d3) if (ab) if (mag) c=z z=pixel x=mg x=x+(x==0)*3 ;magnet else z=pixel ;Spider c=p1 endif else z=pixel ;newton c=p1 endif elseif (ab) c=z ;Phoenix z=pixel else c=0.4*log(sqr(z^mm)) ;many mods z=0 endif elseif (d3) if (ab) if (mow) ;manowar mt = (4 * (real(p2)<=0) + real(p2) * (0<p2) ) c=p1 z=pixel else c=p1 ;Julia z=pixel endif else ;bees c=p1 z=pixel endif elseif (ab) c=z ;Mandel z=0 else c=z ;Secant z=pixel endif t=0 bo=|z| p=pp z0=p7 zold=(0.0,0.0) cb=p9 ba=bb0 : if (tt>0) t=t+1 if (ex0) ex0=t<mi1 if (bo>bs) u=2*(fn1(t/sfac)) ex0=0 if (ir0) t=0 endif if (d4) z=z*u if (mo) c=0.4*log(sqr(z^mm)) else c=pixel endif else z=pixel cb=p9*u c=p1*u p=pp*u endif tt=tt-1+ex0 endif elseif ((ex1)&&bo>bl) if (bo<bh) d3=dd1 ba=bb1 ab=ab1 ex1=0 tt=tt-1 if (w1) u=2*(fn2(t/ofac)) else u=1,0 endif if (ir1) t=0 endif if (d3) vb=v1j if (rs1) z=pixel cb=p9*u c=p1*u p=pp*u else c=p1 z=z*u cb=p9 endif else vb=v1m if (rs1) c=z*u z=pixel*(sc1+px1) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo1) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex2) if (dt1) if (iv1) d=bo>bo1 else d=bo<bo1 endif if (bt1) d=d+(t>mi1) endif else d=t>mi1 endif if (d) ab=ab2 d3=dd2 ba=bb2 ex2=0 tt=tt-1 if (w2) u=2*(fn2(t/fac1)) else u=1,0 endif if (ir2) t=0 endif if (d3) vb=v2j if (rs2) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v2m if (rs2) c=z*u z=pixel*(sc2+px2) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo2) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex3) if (dt2) if (iv2) d=bo>bo2 else d=bo<bo2 endif if (bt2) d=d+(t>mi2) endif else d=t>mi2 endif if (d) ab=ab3 d3=dd3 ba=bb3 ex3=0 tt=tt-1 if (w3) u=2*(fn3(t/fac2)) else u=1,0 endif if (ir3) t=0 endif if (d3) vb=v3j if (rs3) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v3m if (rs3) c=z*u z=pixel*(sc3+px3) z0=p7*u ph=ph*u else c=z z=z*u endif vb=v3m if (mo3) c=0.4*log(sqr(z^mm)) endif endif endif elseif (ex4) if (dt3) if (iv3) d=bo>bo3 else d=bo<bo3 endif if (bt3) d=d+(t>mi3) endif else d=t>mi3 endif if (d) ab=ab4 d3=dd4 ba=bb4 ex4=0 tt=0 if (w4) u=2*(fn4(t/fac3)) else u=1,0 endif if (d3) vb=v4j if (rs4) z=pixel cb=p9*u c=p1*u p=pp*u else cb=p9 c=p1 z=z*u endif else vb=v4m if (rs4) c=z*u z=pixel*(sc4+px4) z0=p7*u ph=ph*u else c=z z=z*u endif if (mo4) c=0.4*log(sqr(z^mm)) endif endif endif endif endif if (vb) if (d3) if (ab) if (mag) ;magnet z=((z^x+c-1)/(2*z+c-2))^(x-1) else z=z*z+c ;Spiderjul c=c*sp+z endif else z1=z^p-1 ;newton z2=p*z*z z=z-z1/z2 endif elseif (ab) z1=z*z+0.56+ph/100-0.5*zold ;Phoenix zold=z z=z1 else z2=fn1(z)+c ;Many_mods z1=cos(z2) z=c*(1-z1)/(1+z1) endif elseif (d3) if (ab) if (mow) z1 = z ;manowar oldz = z z = sqr(oldz) + z1 + c z1 = oldz else z2=z*z ;Julia z=z2*z2+p6*z2+c-p0 endif else z1=fn1(z)-cb ;Bees z2=z1^p8-1 z3=p8*(z1^(p8-1)) z=z-(z2/z3) endif elseif (ab) if (dm) z=z*z+c+c*c-dp ;Double Mandel else z2=z*z ;Mandel z=z2*z2+p6*z2+c-p0 endif else z3=z ;Secant z1=z0*z0*z0*z0-1 z2=z*z*z*z-1 z=z-z2*(z-z0)/(z2-z1) z0=z3 endif bo=|z| bo<ba }