home *** CD-ROM | disk | FTP | other *** search
/ ftp.xmission.com / 2014.06.ftp.xmission.com.tar / ftp.xmission.com / pub / lists / fractint / archive / v01.n083 < prev    next >
Internet Message Format  |  1998-01-19  |  40KB

  1. From: owner-fractint-digest@lists.xmission.com (fractint-digest)
  2. To: fractint-digest@lists.xmission.com
  3. Subject: fractint-digest V1 #83
  4. Reply-To: fractint-digest
  5. Sender: owner-fractint-digest@lists.xmission.com
  6. Errors-To: owner-fractint-digest@lists.xmission.com
  7. Precedence: bulk
  8.  
  9.  
  10. fractint-digest        Monday, January 19 1998        Volume 01 : Number 083
  11.  
  12.  
  13.  
  14.  
  15. ----------------------------------------------------------------------
  16.  
  17. Date: Mon, 19 Jan 1998 20:23:23 -0500
  18. From: Jack Valero <jval@globalserve.net>
  19. Subject: Re: (fractint) blakes fractal chat room
  20.  
  21. At 10:33 PM 19/01/98 -0000, you wrote:
  22. >Hi all,
  23. >    Have you visited Blakes chat room yet?
  24. >
  25. >    IMHO we should try to make this a success, and have it
  26. >as active as possible.
  27. >
  28. >    I will be in the room until 2330(11:30pm) GMT so if you
  29. >fancy coming along and talking to an idiot..........
  30.  
  31. Well, I did my duty and entered the room about 8:00pm Eastern time
  32. but I was all alone :(
  33. I've never tried a chat room before so perhaps I did something
  34. wrong. Different rooms kept appearing and vanishing from the
  35. left side list. Tried ringing the bell and was informed that
  36. "Jax rang the bell". Yipee. Waited about 5 mins and then tried another
  37. room just to find out if I was doing things properly but then the
  38. Fractal room disappeared. Didn't know how one properly leaves
  39. such environs so I just split to another url. Frankly, the thing seems
  40. like a rather inefficient and frustrating way to communicate.
  41. Probably just me... fractals confused me the first time too
  42. (still do, actually :)
  43. Regards - Jack
  44.  
  45. visit our fractal gallery: http://www.globalserve.net/~jval/phractal.html
  46.  
  47. - -
  48. - ------------------------------------------------------------
  49. Thanks for using Fractint, The Fractals and Fractint Discussion List
  50. Post Message:   fractint@xmission.com
  51. Get Commands:   majordomo@xmission.com "help"
  52. Administrator:  twegner@phoenix.net
  53. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  54.  
  55. ------------------------------
  56.  
  57. Date: Tue, 20 Jan 1998 12:24:42 +1100
  58. From: Carl Grosser <C.Grosser@nre.vic.gov.au>
  59. Subject: RE: (fractint) Fractal music?
  60.  
  61. - ------ =_NextPart_000_01BD259E.63502860
  62. Content-Type: text/plain; charset="us-ascii"
  63. Content-Transfer-Encoding: 7bit
  64.  
  65. Where did you hear the Factal music? Was it a downloadable midi, wav or some other file?
  66.  
  67. Cheers,
  68.  
  69. Carl.
  70.  
  71. - -----Original Message-----
  72. From:    Nature102 [SMTP:Nature102@aol.com]
  73. Sent:    Tuesday, January 20, 1998 11:57 AM
  74. To:    fractint@lists.xmission.com
  75. Subject:    (fractint) Fractal music?
  76.  
  77.   I just had a chance to hear some fractal-generated music. The stuff sounds
  78. really cool. Kind of mystical. You probably won't hear any CDs of it, but it's
  79. cool. Does anyone know if there's any chance that Fractint is going to be able
  80. to generate fractal music in the near future? For that matter, does anyone
  81. know HOW to generate fractal music?
  82.  
  83. - -
  84. - ------------------------------------------------------------
  85. Thanks for using Fractint, The Fractals and Fractint Discussion List
  86. Post Message:   fractint@xmission.com
  87. Get Commands:   majordomo@xmission.com "help"
  88. Administrator:  twegner@phoenix.net
  89. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  90.  
  91. - ------ =_NextPart_000_01BD259E.63502860
  92. Content-Type: application/ms-tnef
  93. Content-Transfer-Encoding: base64
  94.  
  95. eJ8+IisBAQaQCAAEAAAAAAABAAEAAQeQBgAIAAAA5AQAAAAAAADoAAEIgAcAGAAAAElQTS5NaWNy
  96. b3NvZnQgTWFpbC5Ob3RlADEIAQ2ABAACAAAAAgACAAEEkAYA4AEAAAEAAAAQAAAAAwAAMAIAAAAL
  97. AA8OAAAAAAIB/w8BAAAAVQAAAAAAAACBKx+kvqMQGZ1uAN0BD1QCAAAAAGZyYWN0aW50QGxpc3Rz
  98. LnhtaXNzaW9uLmNvbQBTTVRQAGZyYWN0aW50QGxpc3RzLnhtaXNzaW9uLmNvbQAAAAAeAAIwAQAA
  99. AAUAAABTTVRQAAAAAB4AAzABAAAAHAAAAGZyYWN0aW50QGxpc3RzLnhtaXNzaW9uLmNvbQADABUM
  100. AQAAAAMA/g8GAAAAHgABMAEAAAAeAAAAJ2ZyYWN0aW50QGxpc3RzLnhtaXNzaW9uLmNvbScAAAAC
  101. AQswAQAAACEAAABTTVRQOkZSQUNUSU5UQExJU1RTLlhNSVNTSU9OLkNPTQAAAAADAAA5AAAAAAsA
  102. QDoBAAAAHgD2XwEAAAAcAAAAZnJhY3RpbnRAbGlzdHMueG1pc3Npb24uY29tAAIB918BAAAAVQAA
  103. AAAAAACBKx+kvqMQGZ1uAN0BD1QCAAAAAGZyYWN0aW50QGxpc3RzLnhtaXNzaW9uLmNvbQBTTVRQ
  104. AGZyYWN0aW50QGxpc3RzLnhtaXNzaW9uLmNvbQAAAAADAP1fAQAAAAMA/18AAAAAAgH2DwEAAAAE
  105. AAAAAAAAApFwAQSAAQAeAAAAUkU6IChmcmFjdGludCkgRnJhY3RhbCBtdXNpYz8A+gkBBYADAA4A
  106. AADOBwEAFAAMABgAKgACADoBASCAAwAOAAAAzgcBABQADAAXADEAAgBAAQEJgAEAIQAAAEIwMkY0
  107. MkQ0N0E5MUQxMTFBNzIxMDA2MDk3QzA0MDcxANEGAQOQBgB0BwAAIgAAAAsAAgABAAAACwAjAAAA
  108. AAADACYAAAAAAAsAKQABAAAAAwAuAAAAAAACATEAAQAAANAAAABQQ0RGRUIwOQABAAIATQAAAAAA
  109. AAA4obsQBeUQGqG7CAArKlbCAABtc3BzdC5kbGwAAAAAAE5JVEH5v7gBAKoAN9luAAAAQzpcRXhj
  110. aGFuZ2VcbWFpbGJveC5wc3QAGAAAAAAAAABTUrpCE2+8EaJB+rl/afD4ooAAAAAAAAAYAAAAAAAA
  111. AFNSukITb7wRokH6uX9p8PjCgAAAEAAAALAvQtR6kdERpyEAYJfAQHEeAAAAUkU6IChmcmFjdGlu
  112. dCkgRnJhY3RhbCBtdXNpYz8AAwA2AAAAAABAADkAIErcLkIlvQEeAHAAAQAAAB4AAABSRTogKGZy
  113. YWN0aW50KSBGcmFjdGFsIG11c2ljPwAAAAIBcQABAAAAFgAAAAG9JUIuiNRCL7GRehHRpyEAYJfA
  114. QHEAAB4AHgwBAAAABQAAAFNNVFAAAAAAHgAfDAEAAAATAAAAY2FnQG5yZS52aWMuZ292LmF1AAAD
  115. AAYQ+X6xrQMABxAUAwAAHgAIEAEAAABlAAAAV0hFUkVESURZT1VIRUFSVEhFRkFDVEFMTVVTSUM/
  116. V0FTSVRBRE9XTkxPQURBQkxFTUlESSxXQVZPUlNPTUVPVEhFUkZJTEU/Q0hFRVJTLENBUkwtLS0t
  117. LU9SSUdJTkFMTUVTUwAAAAACAQkQAQAAAHcDAABzAwAAbwUAAExaRnVYLySMdwAKAQMB9yACpAPj
  118. AgBjgmgKwHNldDAgBxOHAoMAUA72cHJxMg/2Jn0KgAjIIDsJbzI1ZjUCgAqBdWMAUAsDYwMAQQtg
  119. bmcxMDMzEQumIFdoBJBlIGTQaWQgeQhgIBZwCsFydBZwIEYA0AGQAyBtUnUAkGM/FlBhBCBpRQVA
  120. YRawb3duCQBhKmQBoGwWoG0W0GksoCB3YXYgBbFzA3AtFqBvF5EFwGYDEGU/NwqiCoQKgEMWcASQ
  121. cywzG+sKwGwuG+oK9Gxp/DM2AUAVEAFAEUAbMAWQQnQQhDE2IC0g4k8tBRBnC4AYEU0HkHNh/Gdl
  122. IOMb5h/0H8ELEx/2YGktMTQ0AUAfQDHcODABQAzQJINiF8ADYYo6DINiD+BOYXQIcAZlFZARcFtT
  123. TVRQUjomp0BhBvAuBaBtvl0b5SWwBmACMCYXVApQqnMZsHkaUEoAcHUKwAx5IAHQGlAxOTk4oStg
  124. MTo1Nw/wTSjHPFRvJhcDUBfhC4B0QMEfQHN0cy54GhAEEI5pAiAocijIdWJqICH1JhcoLYYpJcEX
  125. 6iKPI5rjH0QVUjMwOBChC8Ub8+AgIEkgahhQBUAPgCcW4BkgD3FuYxagdG+vFzQa4y2DB0AtIhBu
  126. BJB3JrAJgBg0LioQF6EuMHXjASAa0XVuZA9AG/MJcJ0HQGwrEAWgKFEgSwuA5RbgbzogbXkuMBhw
  127. B0BtOYBZFxEf4WIZwSsQdz0CICc2URdSAHArEENEzwQgPCEY8BpQYnUFQBjw5ic6lTt0RG8HkT5x
  128. AiB5FqBrbhlQGOA6IBtCZf8/wD5jNtYPgAVAMXMt0RjgqQQgZ28LgGc3MmIWoP8ZwhvkN0E4ljgG
  129. GDQY4AOgdxeSOLAKwWY/cCbRGJBG/wWxQxMAwAJABJAaUBlAQMfjG+RBY0hPVzcyRb8x/P8cAiJ1
  130. IONOL08/UE8iSDmg/QBwawQgAhAFwBhRRFFDZr8aUDmiMXVA0hbgQ2dEBABmYxhQLrIgTC4hG+RQ
  131. dm82QSHFOjXgLXgufwr+Rw/APqADcAOBOoBXYgDAnmoFsBlABGBYKyAiFnDIbHAiG+RBZBoQAwAP
  132. LjA40QWwV2F0d2VnMTixQHBoQLADAHgu+ziwVjVVAIAv0ATyRLBXYv9aT1tWOmBfNy13XBUb5BIB
  133. AgBj4AADABAQAAAAAAMAERAAAAAAAwCAEP////9AAAcwQOaPD0IlvQFAAAgwQOaPD0IlvQELAAGA
  134. CCAGAAAAAADAAAAAAAAARgAAAAADhQAAAAAAAAMABYAIIAYAAAAAAMAAAAAAAABGAAAAAFKFAAC3
  135. DQAAHgAGgAggBgAAAAAAwAAAAAAAAEYAAAAAVIUAAAEAAAAEAAAAOC4wAAMAB4AIIAYAAAAAAMAA
  136. AAAAAABGAAAAAAGFAAAAAAAACwAQgAggBgAAAAAAwAAAAAAAAEYAAAAADoUAAAAAAAADABGACCAG
  137. AAAAAADAAAAAAAAARgAAAAAQhQAAAAAAAAMAEoAIIAYAAAAAAMAAAAAAAABGAAAAABGFAAAAAAAA
  138. AwAVgAggBgAAAAAAwAAAAAAAAEYAAAAAGIUAAAAAAAAeACWACCAGAAAAAADAAAAAAAAARgAAAAA2
  139. hQAAAQAAAAEAAAAAAAAAHgAmgAggBgAAAAAAwAAAAAAAAEYAAAAAN4UAAAEAAAABAAAAAAAAAB4A
  140. J4AIIAYAAAAAAMAAAAAAAABGAAAAADiFAAABAAAAAQAAAAAAAAAeAD0AAQAAAAUAAABSRTogAAAA
  141. AAMADTT9NwAAQ8Y=
  142.  
  143. - ------ =_NextPart_000_01BD259E.63502860--
  144.  
  145.  
  146. - -
  147. - ------------------------------------------------------------
  148. Thanks for using Fractint, The Fractals and Fractint Discussion List
  149. Post Message:   fractint@xmission.com
  150. Get Commands:   majordomo@xmission.com "help"
  151. Administrator:  twegner@phoenix.net
  152. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  153.  
  154. ------------------------------
  155.  
  156. Date: Mon, 19 Jan 1998 17:45:51 -0800
  157. From: "Jim sellers" <sundog@medford.net>
  158. Subject: Re: (fractint) Colour-map loading problem
  159.  
  160. Hi;
  161. I saw in an earlier posting that you were loading colormaps from  "E" + "L"
  162. instead of the "C" + "L".
  163. As I recall I got some leftover garbage on the screen from using "E" + "L".
  164. I hope that helps...Jim
  165.  
  166. - ----------
  167. > From: Nature102 <Nature102@aol.com>
  168. > To: fractint@lists.xmission.com
  169. > Subject: Re: (fractint) Colour-map loading problem
  170. > Date: Monday, January 19, 1998 10:38 AM
  171. > In a message dated 98-01-19 11:09:53 EST, bhyde@connectu.net writes:
  172. > << I had windows95 running... does that count as a TSR? Oh, well. There's
  173. only
  174. >  one word needed: Microsoft. Does anybody know how to get a pure dos boot
  175. on
  176. >  a w95 machine? >>
  177. >   Hit Start/Shut down, and choose "Restart in DOS mode." That normally
  178. works
  179. > well enough for my DOS programs. Fractint seems to run fine through Win95
  180. for
  181. > me, though. 
  182. > -
  183. > ------------------------------------------------------------
  184. > Thanks for using Fractint, The Fractals and Fractint Discussion List
  185. > Post Message:   fractint@xmission.com
  186. > Get Commands:   majordomo@xmission.com "help"
  187. > Administrator:  twegner@phoenix.net
  188. > Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  189.  
  190.  
  191. - -
  192. - ------------------------------------------------------------
  193. Thanks for using Fractint, The Fractals and Fractint Discussion List
  194. Post Message:   fractint@xmission.com
  195. Get Commands:   majordomo@xmission.com "help"
  196. Administrator:  twegner@phoenix.net
  197. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  198.  
  199. ------------------------------
  200.  
  201. Date: Mon, 19 Jan 1998 21:13:12 -0500 (EST)
  202. From: Donald Archer <arch@dorsai.org>
  203. Subject: (fractint) Fractal music
  204.  
  205. I've got some super fractal music at my site at http://www.dorsai.org/~arch.
  206. It is written in the shareware program Art Song in MIDI format, then
  207. sequenced in Orchestrator Plus and/or Cakewalk. It is wholly based on
  208. fractal data (RGB values) derived from fractals drawn in Fractint.
  209.  
  210. Don
  211.  
  212.  
  213. - -
  214. - ------------------------------------------------------------
  215. Thanks for using Fractint, The Fractals and Fractint Discussion List
  216. Post Message:   fractint@xmission.com
  217. Get Commands:   majordomo@xmission.com "help"
  218. Administrator:  twegner@phoenix.net
  219. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  220.  
  221. ------------------------------
  222.  
  223. Date: Mon, 19 Jan 1998 18:55:14 -0800
  224. From: Wizzle <wizzle@cci-internet.com>
  225. Subject: Re: (fractint) blakes fractal chat room
  226.  
  227. Jack...
  228.  
  229. Actually it's a pretty good way to communicate with the right
  230. software.......I prefer mirc or pirch to a browser.  If you have irc
  231. software...you can be notified when someone you want to talk to shows up
  232. rather than having to hang in a room....it's great for real-time help with
  233. programs that run under windows and transferring large files back and forth.
  234.  
  235. The down-side is the one you ran into....people have to be on the net at
  236. the same time.....when we get Fractint that runs under win95 and NT, we can
  237. run a chat program as an ap while we wait for our fractals to materialize.
  238. I noticed from the Fractint wish list that the thing most folks want is a
  239. fully featured Fractint which is stable under NT. 
  240.  
  241. SHORT TERM WISH LIST ITEM  .....a way to compare color maps, overwrite
  242. existing color map names, comment the maps (similar to the comments in the
  243. pars) and select them for deletion. 
  244.  
  245. Angela
  246.  
  247. >Well, I did my duty and entered the room about 8:00pm Eastern time
  248. >but I was all alone :(
  249. >I've never tried a chat room before so perhaps I did something
  250. >wrong. Different rooms kept appearing and vanishing from the
  251. >left side list. Tried ringing the bell and was informed that
  252. >"Jax rang the bell". Yipee. Waited about 5 mins and then tried another
  253. >room just to find out if I was doing things properly but then the
  254. >Fractal room disappeared. Didn't know how one properly leaves
  255. >such environs so I just split to another url. Frankly, the thing seems
  256. >like a rather inefficient and frustrating way to communicate.
  257. >Probably just me... fractals confused me the first time too
  258. >(still do, actually :)
  259. >Regards - Jack
  260. >
  261. >
  262.  
  263. - -
  264. - ------------------------------------------------------------
  265. Thanks for using Fractint, The Fractals and Fractint Discussion List
  266. Post Message:   fractint@xmission.com
  267. Get Commands:   majordomo@xmission.com "help"
  268. Administrator:  twegner@phoenix.net
  269. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  270.  
  271. ------------------------------
  272.  
  273. Date: Mon, 19 Jan 1998 18:57:32 -0800
  274. From: "Jay Hill" <ehill1@san.rr.com>
  275. Subject: (fractint) F.O.T.N. (Fractal of the Night) 19 Jan 1998 (Potatoe) 
  276.  
  277. F.O.T.N. (Fractal of the Night) 19 Jan 1998 (Potatoe) 
  278.  
  279. Tonight's fractal, discovered near last night's Elephant, looks a 
  280. lot like a potato. It is from the MSet, corresponding to the map of 
  281. the Julia sets computed from a formula by Michael G. Wareman. This 
  282. comes from  one of the branches on the period 5 bud on the MSet
  283. butt. Nearby midgets are more normal looking, but not all. I found 
  284. a second potato on another branch. You never know what you will
  285. find, digging around in fractal land! The formula is 
  286.  
  287. z = p1*(z2 + c)2/((z2 + c) + p2) + c 
  288.  
  289. with p1 and p2 equal to 100. 
  290.  
  291. Here are the Fractint parameter files. 
  292.  
  293. Enjoy 
  294.  
  295. http://home.san.rr.com/jayrhill/FotN/FotN19.html
  296.  
  297. Potatoe { ; (c) Jay Hill, 1998
  298.   ; Most of this MSet is almost normal
  299.   ; BUT look! Oh my, it must be Dan's Potatoe
  300.   reset=1960 type=formula formulafile=fgz.frm formulaname=fgz-mand
  301.   center-mag=+0.45659478684285460/+0.35038593708973740/928.2398
  302.   params=100/0/100/0/4.1/0 float=y maxiter=256 inside=bof60
  303.   colors=wU0mK2mU4cKAwh0AAA<4>KKKzjF<3>obCl`Bj_BhYA<11>KF4HD4HD4<14>540540\
  304.   640<93>cU0WWW<106>222222111000000
  305.  
  306. Potatoe2 { ; (c) Jay Hill, 1998
  307.   ; Most of this MSet is almost normal
  308.   ; Oh my, not another Potatoe
  309.   reset=1960 type=formula formulafile=fgz.frm   formulaname=fgz-mand
  310.   center-mag=+0.43608241982133640/+0.32752974768966800/1041.055
  311.   params=100/0/100/0/4.1/0 float=y maxiter=256   inside=bof60
  312.   colors=wU0mK2mU4cKAwh0AAA<4>KKKzjF<3>obCl`Bj_BhYA<11>KF4HD4HD4<14>540540\
  313.   640<93>cU0WWW<106>222222111000000
  314.  
  315. frm:FGZ-Mand { ; (c) Jay Hill, 1998
  316.   IF( |p3| == 0) 
  317.   p3 = 16
  318.   ENDIF
  319.   c=pixel, z=sqrt(-c), bailout = real(p3):
  320.   z1=z*z + c;
  321.   z = p1*z1*z1/(z1 + p2) + c;
  322.   |z| <= bailout
  323.  
  324.  
  325.  
  326. - -
  327. - ------------------------------------------------------------
  328. Thanks for using Fractint, The Fractals and Fractint Discussion List
  329. Post Message:   fractint@xmission.com
  330. Get Commands:   majordomo@xmission.com "help"
  331. Administrator:  twegner@phoenix.net
  332. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  333.  
  334. ------------------------------
  335.  
  336. Date: Mon, 19 Jan 1998 19:18:34 -0800
  337. From: Mark Christenson <mchris@hooked.net>
  338. Subject: (fractint) Astrophysical Lunacy
  339.  
  340. Since I have joined this group, I have had mixed feelings about it.
  341.  
  342. Bad: there's a lot of traffic (on- and off-topic).
  343. Good: there's *so* much free data!
  344. Bad: I'm developing a case of fractal time compression like you
  345.   wouldn't believe (then again, maybe you would).
  346. Good: I'm cranking out lots of (IMHO) good images from other peoples'
  347.   formulae! 
  348. Bad: my life's disappearing into a fractal black hole.
  349.  
  350. OT1 (off-topic #1): Howdy Don, didn't know you were on!
  351.  
  352. Thanks to Morgan L. Owens for his 1/16 astrophysical formula post.
  353. Although I know the meaning of the formulae are seriously perverted 
  354. by plugging in complex numbers, I can't complain about the results.
  355.  
  356. Here are two .pars, one for the OT, the other purely gratuitous. Both 
  357. of these are done at critical points; for ap-102 (which reminds me of 
  358. "magnet" fractals I have seen/done) there are a whole lot of these 
  359. around p1=1.5
  360.  
  361. >> .pars
  362.  
  363. ap-102             { ; "Super Critical", AKA ap-102 by Mark "Bud"
  364. Christenson 1/19/98
  365.              ; from a .frm posted by Morgan L. Owens
  366.   reset=1930 type=formula formulafile=filist.frm formulaname=jul1-138
  367.   function=sqr passes=b center-mag=-2.235e-005/-1.075e-006/0.6800012
  368.   params=1.4586/0 outside=real
  369.   colors=000<14>0zz<22>TWYVUWWVV<21>xx2zz0zy0<22>cW0cV0dU0<20>y20z00z01<29\
  370.   >z0xz0zz1z<29>zxzzzzyzy<21>IzIGzGGwH<13>FIZEE`GGa<22>zzz<13>UUUC_sCYs
  371.   }
  372.  
  373. ap-105             { ; "Top", AKA ap-105 by Mark "Bud" Christenson 1/19/98
  374.              ; from a .frm posted by Morgan L. Owens
  375.                      ; rotated -90 deg
  376.   reset=1930 type=formula formulafile=filist.frm formulaname=jul1-138
  377.   function=tan passes=b center-mag=1.09615/-7.96e-006/0.5999983/1/-90
  378.   params=1.6/0 inside=zmag outside=atan
  379.  
  380. colors=000KKKMKKPKL<3>WKLYKMZKM`LNaLO<3>fNQgORhOSiPTjQU<8>pU_qV`rWasXbt
  381. Y\
  382.   c<8>yjhzliznk<6>zxxzzzzzy<31>VV2UU0TV2<11>M`QL`SK`TJ`VI`W<5>C`dB`eA`f9`g\
  383.   8ah9aj8bk<3>HeoJfpMgqPgs<5>cmz<4>PkvLjvJjuGitEis<3>BenBdmCbk<3>EVeFTcEPa\
  384.   EL`DHZ0005MT<16>0K0Y3uZ2t0K0<42>0z00z00y0<12>0l00k02j0<20>gE0000kkk
  385.   }
  386.  
  387. >> and a re-post of the .frm
  388.  
  389. jul1-138{
  390. z=pixel:
  391. z=(1-sqr(p1))/sqr(1-p1*fn1(z)),
  392. |z|<=4}
  393.  
  394. Enjoy!  Bud
  395. www.hooked.net/~mchris/fractals.htm
  396.  
  397.  
  398. - -
  399. - ------------------------------------------------------------
  400. Thanks for using Fractint, The Fractals and Fractint Discussion List
  401. Post Message:   fractint@xmission.com
  402. Get Commands:   majordomo@xmission.com "help"
  403. Administrator:  twegner@phoenix.net
  404. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  405.  
  406. ------------------------------
  407.  
  408. Date: Mon, 19 Jan 1998 20:12:32 -0800
  409. From: Wizzle <wizzle@cci-internet.com>
  410. Subject: (fractint) Monday - From Paul Carlson 
  411.  
  412. Paul asked me to post.....
  413. *******************************
  414. I think Kerry's extensions to the bubble method are very
  415. ingenious, especially the swirls.  Seeing her formulas
  416. finally got me to translate my bubble method into a
  417. Fractint formula.  If anybody's interested in how I came
  418. to develop the bubble method about 2 1/2 years ago, my
  419. paper, "PSEUDO-3D RENDERING METHODS FOR FRACTALS IN THE
  420. COMPLEX PLANE" which was published in the journal
  421. _Computers & Graphics_, Vol. 20, No. 5, pp. 751-758, 1996
  422. gives all the details.
  423.  
  424. Anyhow, here's the formula and 4 par files to try it with.
  425. The par file bubsmnd2 is the same as bubsmnd1 except for the
  426. value of real(p2) which was increased so that the bubbles,
  427. instead of being tangent to each other, are squished together
  428. (this also required some minor editing of the colormap).
  429. I tried to make the formula as clear as possible.  I'll be
  430. glad to answer any questions about it.
  431.  
  432. Paul
  433.  
  434. Bubbles_Julia_Mset {; Copyright (c) Paul W. Carlson, 1998
  435.     ;****************************************************
  436.     ; Always use floating point math and outside=summ.
  437.     ;
  438.     ; Parameters:
  439.     ;
  440.     ;   p1       = if both real(p1) and imag(p1) are zero
  441.     ;              do Mset, otherwise do Julia set.
  442.     ;   real(p2) = maximum contour of minimum sqrt(|w|)
  443.     ;              (this is the outside edge of the bubbles).
  444.     ;   imag(p2) = Value of |w| at bailout.
  445.     ;   real(p3) = number of color ranges.
  446.     ;   imag(p3) = number of colors in each color range.
  447.     ;
  448.     ; Note that the equation variable is w, not z.  Always
  449.     ; initialize z to zero.
  450.     ;****************************************************
  451.     IF (real(p1) == 0 && imag(p1) == 0)
  452.     w = 0
  453.     c = pixel
  454.     ELSE
  455.     w = pixel
  456.     c = p1
  457.     ENDIF
  458.     z = 0
  459.     bailout = 0
  460.     iter = 0
  461.     range_num = 0
  462.     max_w = imag(p2)
  463.     ;****************************************************
  464.     ; In the accompanying par files, bubsjul1 and 2.par,
  465.     ; we have 2 color ranges with 125 colors in each range
  466.     ; for a total of 250 colors. The first range starts at
  467.     ; color 1.
  468.     ;****************************************************
  469.     num_ranges = real(p3)
  470.     colors_in_range = imag(p3)
  471.     ;****************************************************
  472.     ; Real(p2) is the largest value of contours that will
  473.     ; be plotted. Typical values are 0.05 to 0.25.
  474.     ;****************************************************
  475.     max_min_w = real(p2)
  476.     min_w = 1.0e20:
  477.     ;****************************************************
  478.     ; The equation being iterated.
  479.     ; This example uses the standard Mandelbrot set equation.
  480.     ;****************************************************
  481.     w = w * w + c
  482.     ;****************************************************
  483.     ; Save the smallest value of sqrt(|w|).
  484.     ;****************************************************
  485.     temp = sqrt(|w|)
  486.     IF (temp < min_w)
  487.        min_w = temp
  488.        save_range = range_num
  489.     ENDIF
  490.     ;****************************************************
  491.     ; If the orbit point exceeds the maximum value, set z to
  492.     ; the index into the colormap and set the bailout flag.
  493.     ;****************************************************
  494.     IF (|w| > max_w)
  495.     IF (min_w < max_min_w)
  496.         range_index = (min_w / max_min_w) * (colors_in_range - 1)
  497.         z = range_index + save_range * colors_in_range + 1
  498.     ELSE
  499.         z = 0
  500.     ENDIF
  501.     bailout = 1
  502.     ENDIF
  503.     ;****************************************************
  504.     ; Cycle through the range numbers (0 thru num_ranges - 1)
  505.     ; With two color ranges, even iterations use color
  506.     ; range 0, odd iterations use color range 1.
  507.     ;****************************************************
  508.     range_num = range_num + 1
  509.     IF (range_num == num_ranges)
  510.         range_num = 0
  511.     ENDIF
  512.     ;****************************************************
  513.     ; Since we are using outside=summ, we have to subtract
  514.     ; the number of iterations from z.
  515.     ;****************************************************
  516.     iter = iter + 1
  517.     z = z - iter
  518.     ;****************************************************
  519.     ; Finally, we test for bailout
  520.     ;****************************************************
  521.     bailout == 0  && |w| < max_w
  522. }
  523.  
  524.  
  525. bubsjul1           { ; Copyright (c) Paul Carlson, 1998
  526.   reset=1960 type=formula formulafile=mybubs.frm
  527.   formulaname=bubbles_julia_mset passes=t
  528.   center-mag=0.00981534/2.22045e-016/0.8503401
  529.   params=-0.746410388/0.184309007/0.188/16/2/125 float=y maxiter=10000
  530.   outside=summ colors=000zz0<123>aG0zVz<123>L5L000<3>000
  531.   }
  532.  
  533.  
  534. bubsjul2           { ; Copyright (c) Paul Carlson, 1998
  535.   reset=1960 type=formula formulafile=mybubs.frm
  536.   formulaname=bubbles_julia_mset passes=t
  537.   center-mag=-0.00009916023966658/-0.00019030381371508/29\
  538.   027.04/1/-109.999
  539.   params=0.289631409419512/0.013316315158669/0.2/16/2/125
  540.   float=y maxiter=5000 inside=255 outside=summ
  541.   colors=000zz0<123>WC0zzz<123>OOO000<3>000
  542.   }
  543.  
  544.  
  545. bubsmnd1           { ; Copyright (c) Paul Carlson, 1998
  546.   reset=1960 type=formula formulafile=mybubs.frm
  547.   formulaname=bubbles_julia_mset passes=t
  548.   corners=-0.74886068/-0.7430740133/0.183034132/0.187374132
  549.   params=0/0/0.188/16/1/250
  550.   float=y maxiter=10000 outside=summ
  551.   colors=00Dzz0<249>UB0000<2>000
  552.   }
  553.  
  554.  
  555. bubsmnd2           { ; Copyright (c) Paul Carlson, 1998
  556.   reset=1960 type=formula formulafile=mybubs.frm
  557.   formulaname=bubbles_julia_mset passes=t
  558.   corners=-0.74886068/-0.7430740133/0.183034132/0.187374132
  559.   params=0/0/0.25/16/1/250 float=y maxiter=10000 outside=summ
  560.   colors=00Dzz0<236>UB000D<11>00D000<2>000
  561.   }
  562.  
  563.  
  564.  
  565.  
  566.  
  567. - -
  568. - ------------------------------------------------------------
  569. Thanks for using Fractint, The Fractals and Fractint Discussion List
  570. Post Message:   fractint@xmission.com
  571. Get Commands:   majordomo@xmission.com "help"
  572. Administrator:  twegner@phoenix.net
  573. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  574.  
  575. ------------------------------
  576.  
  577. Date: Mon, 19 Jan 1998 22:11:43 -0600
  578. From: Bob Margolis <rttyman@wwa.com>
  579. Subject: Re: (fractint) Resolution
  580.  
  581. Paul Derbyshire wrote:
  582. > It seems to be that a fractal image at 300dpi printed on an 8+1/2x11 sheet
  583. > of paper would be 2550 by 3300 at maximal size.
  584. > Because of this, I usually only use the D&C stuff to generate a 3200x2400
  585. > image in four 1600x1200 parts.
  586.  
  587. Four years ago this week, I purchased a combination PhotoJet Printer
  588. Board for my LaserJet 4 and a PhotoJet Circuit Board for my computer. It
  589. was manufactured by XLI Corp of North Billerica, Mass. It cost $895
  590. before the added freight charge. The software I use is Picture
  591. Publisher.
  592.  
  593. I still use PhotoJet today. It prints out in gray scale at 2400 dpi on
  594. 8.5 x 11 inch paper. The results of the output are stupendous. My
  595. fractal images have a photolike quality to them in the printouts.
  596.  
  597. I don't know if the company is still around, since I haven't found the
  598. need to contact them since I purchased the circuits boards.
  599.  
  600. Bob Margolis
  601.  
  602. - -
  603. - ------------------------------------------------------------
  604. Thanks for using Fractint, The Fractals and Fractint Discussion List
  605. Post Message:   fractint@xmission.com
  606. Get Commands:   majordomo@xmission.com "help"
  607. Administrator:  twegner@phoenix.net
  608. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  609.  
  610. ------------------------------
  611.  
  612. Date: Mon, 19 Jan 1998 20:17:20 -0800
  613. From: "Jim sellers" <sundog@medford.net>
  614. Subject: Re: (fractint) Fractal music
  615.  
  616. Hi;
  617. I just visited your site and listened to the music......no fractal should
  618. be without it !
  619. Jim
  620.  
  621. - ----------
  622. > From: Donald Archer <arch@dorsai.org>
  623. > To: fractint@lists.xmission.com
  624. > Subject: (fractint) Fractal music
  625. > Date: Monday, January 19, 1998 6:13 PM
  626. > I've got some super fractal music at my site at
  627. http://www.dorsai.org/~arch.
  628. > It is written in the shareware program Art Song in MIDI format, then
  629. > sequenced in Orchestrator Plus and/or Cakewalk. It is wholly based on
  630. > fractal data (RGB values) derived from fractals drawn in Fractint.
  631. > Don
  632. > -
  633. > ------------------------------------------------------------
  634. > Thanks for using Fractint, The Fractals and Fractint Discussion List
  635. > Post Message:   fractint@xmission.com
  636. > Get Commands:   majordomo@xmission.com "help"
  637. > Administrator:  twegner@phoenix.net
  638. > Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  639.  
  640.  
  641. - -
  642. - ------------------------------------------------------------
  643. Thanks for using Fractint, The Fractals and Fractint Discussion List
  644. Post Message:   fractint@xmission.com
  645. Get Commands:   majordomo@xmission.com "help"
  646. Administrator:  twegner@phoenix.net
  647. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  648.  
  649. ------------------------------
  650.  
  651. Date: Tue, 20 Jan 1998 00:00:45 -0500 (EST)
  652. From: Donald Archer <arch@dorsai.org>
  653. Subject: (fractint) fractint music
  654.  
  655. Jim,
  656.  
  657. >>I've got some super fractal music at my site at http://www.dorsai.org/~arch.
  658.  
  659. >I just visited your site and listened to the music......no fractal should
  660. >be without it !
  661.  
  662. Maybe! But the music doesn't come easy or fast. Thanks.
  663.  
  664. Don
  665.  
  666.  
  667.  
  668.  
  669. - -
  670. - ------------------------------------------------------------
  671. Thanks for using Fractint, The Fractals and Fractint Discussion List
  672. Post Message:   fractint@xmission.com
  673. Get Commands:   majordomo@xmission.com "help"
  674. Administrator:  twegner@phoenix.net
  675. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  676.  
  677. ------------------------------
  678.  
  679. Date: Mon, 19 Jan 1998 21:13:20 -0800
  680. From: kathy roth <kroth@well.com>
  681. Subject: (fractint) Lee's Truecolor Fractals
  682.  
  683. >Did you try downloading the par file at the web-site?  Do you still
  684. have
  685. >this =3d problem if you do that??
  686.  
  687. I downloaded the par files without difficulty and there was
  688. no =3D problem.  It gives an error message for the colors
  689. and then runs it in the Fractint default palette with an odd sort
  690. of dithering, which I assumed is how the Truecolor is rendered
  691. in the 256 color palette.  I have had some trouble with getting
  692. pars into Fractint in general, so if anyone is getting something
  693. different, please let me know.  Thanks, they are truly great
  694. images.
  695.  
  696.  
  697. - -
  698. - ------------------------------------------------------------
  699. Thanks for using Fractint, The Fractals and Fractint Discussion List
  700. Post Message:   fractint@xmission.com
  701. Get Commands:   majordomo@xmission.com "help"
  702. Administrator:  twegner@phoenix.net
  703. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  704.  
  705. ------------------------------
  706.  
  707. Date: Mon, 19 Jan 1998 22:36:42 -0700 (MST)
  708. From: Kerry Mitchell <lkmitch@primenet.com>
  709. Subject: (fractint) Explanation, formula & par files--ghost (long)
  710.  
  711. Here's another coloring method that I've used.
  712.  
  713. - -------------------------------------------------------------------------------
  714. Kerry Mitchell
  715. lkmitch@primenet.com
  716. - -------------------------------------------------------------------------------
  717.  
  718. comment { ; narrative copyright Kerry Mitchell
  719.  
  720. Ghost
  721.  
  722. In the ghost coloring scheme, you can make the fractal appear or disappear 
  723. against a gradient background.  It is based on the iteration smoothing 
  724. routine of Linas Vepstas, and uses an adjustable parameter to determine 
  725. how prevalent the fractal appears.
  726.  
  727. The iteration smoothing technique works by letting the iterate go much 
  728. beyond the required escape radius of 4, and converting its geometric 
  729. growth into a real number.  When combined with the original iteration 
  730. number, the result is a real number that can be plotted continuously 
  731. with the decomposition (or outside=real) methods.  Here, the smoothed 
  732. iteration count is scaled and made the polar angle for the decomposition 
  733. coloring.
  734.  
  735. The backgrounds for these images are gradients (using smooth color maps), 
  736. running horizontally, vertically, or in rays from the origin (point 0+0i).  
  737. In the latter case, the background is simply the polar angle of the pixel, 
  738. which may or may not be centered on the screen, depending on the zoom of 
  739. the image.  In the former two cases, the gradients are dynamically set to 
  740. use the full color range irrespective of the pixel coordinates.  In any 
  741. case, the background is represented by an angle, for use with decomposition.
  742.  
  743. Given angles for both the iteration count and the background image, they 
  744. are combined using the "ghost" parameter.  The iteration angle is scaled 
  745. by "ghost" and added to the background angle.  When the ghost level is 
  746. set to zero, then only the background angle remains, and that is what is 
  747. shown in the image.  Increasing the ghost level results in the background 
  748. being subtly, then significantly, perturbed by the fractal.  The disturbance 
  749. starts with the highest iteration levels first (except that interior points 
  750. are assigned 0 iteration, to clarify the boundary), and propagates to the 
  751. lower iterations as the ghostliness is increased.  The effect on the image 
  752. is to see the background gradient smoothly displaced by the fractal, but 
  753. to not see the fractal directly.
  754.  
  755. The best uses of this scheme seems to be on Julia dust (non-connected) 
  756. fractals, in which there is lots of "empty" space for the background to 
  757. show through.
  758.  
  759. }
  760.  
  761. ghost-sample       { ; copyright Kerry Mitchell
  762. ;
  763. ; sample image for ghost_jul
  764. ;
  765.   reset=1960 type=formula formulafile=fractint.frm formulaname=ghost_jul
  766.   center-mag=0/0/1/1/90 params=0.39/0.12/1000000/4 float=y maxiter=256
  767.   inside=0 decomp=256 periodicity=0
  768.   colors=VF0<62>yiUyiVyjVyjWxkW<27>jyijyiiyjiyjhxk<27>WjyVjyViyUiyUhx\
  769.   <59>0GW0GV0FV0FU1EU<27>F0GF0GG0FG0FH1E<27>UF0 cyclerange=0/255
  770.   }
  771.  
  772. horiz-sample       { ; copyright Kerry Mitchell
  773. ;
  774. ; sample image for ghost-horiz_man
  775. ;
  776.   reset=1960 type=formula formulafile=ghost.frm
  777.   formulaname=ghost-horiz_man
  778.   center-mag=-1.94002389671361600/+0.00056527139874739/5498282
  779.   params=1000/1 float=y maxiter=1000 inside=0 decomp=256 periodicity=0
  780.   colors=VF0<62>yiUyiVyjVyjWxkW<27>jyijyiiyjiyjhxk<27>WjyVjyViyUiyUhx\
  781.   <59>0GW0GV0FV0FU1EU<27>F0GF0GG0FG0FH1E<27>UF0 cyclerange=0/255
  782.   }
  783.  
  784. vertical-sample    { ; copyright Kerry Mitchell
  785. ;
  786. ; sample image for ghost-vert_jul
  787. ;
  788.   reset=1960 type=formula formulafile=fractint.frm
  789.   formulaname=ghost-vert_jul center-mag=-0.524765/0.169456/40
  790.   params=0.28/0.005/1000000/1 float=y maxiter=256 inside=0 decomp=256
  791.   colors=F0V<7>iVy<3>yij<3>jyV<7>GV0<3>0GF3CJ<2>G0V<7>jVy<3>yji<3>iy\
  792.   V<7>FV0<3>0FG4BK87NC3RG0W<7>jWy<3>yji<3>iyU<7>FU0<3>0FG4BK87OC3SH1\
  793.   W<6>gSwkWx<2>wglxkh<2>lwYhxU<6>IY2EU1<2>2ID1EH<2>D2SH1X<6>gTwkXx<2\
  794.   >wglxkh<2>lwXhxT<6>IX2ET1<2>2ID1EH<2>D2TI2X<6>hTxlXw<2>xhkwlg<2>kx\
  795.   XgwT<6>HX1DT2<2>1HE2DI<2>E1TI2Y<6>hUxlYw<2>xhkwlg<2>kxWgwS<6>HW1DS\
  796.   2<2>1HE2DI<2>E1UJ3Y<6>iUy<3>yij<3>jyW<7>GW0<3>0GF<3>F0U
  797.   cyclerange=0/255 periodicity=0
  798.   }
  799.  
  800. mandelbrot-ghost   { ; copyright Kerry Mitchell
  801. ;
  802. ; sample image for ghost_man
  803. ;
  804.   reset=1960 type=formula formulafile=ghost.frm formulaname=ghost_man
  805.   center-mag=-0.68/0/0.85 params=1000000/4 float=y maxiter=256
  806.   inside=0 decomp=256 periodicity=0
  807.   colors=0VF<62>UyiVyiVyjWyjWxk<27>ijyijyjiyjiykhx<27>yWjyVjyViyUixU\
  808.   h<59>W0GV0GV0FU0FU1E<27>GF0GF0FG0FG0EH1<27>0UF cyclerange=0/255
  809.   }
  810.  
  811. frm:ghost_man { ; Kerry Mitchell
  812.         ;
  813.         ; colors Mandelbrot set by combining the smoothed iteration
  814.         ; with a background of rays from the center
  815.         ;
  816.         ; use decomp=256
  817.         ; real(p1) = bailout
  818.         ; imag(p1) = "ghost" adjustment: set to 0 for only
  819.         ;   background rays, try 2
  820.         ; calculation performed on variable zc, z used for coloring
  821.         ;
  822.         maxr=real(p1), scale=imag(p1)*pi/128
  823.         ol2=1/log(2), fac=log(0.5*log(maxr))
  824.         iter=1, zc=0, c=pixel, background=pixel
  825.         :
  826.         iter=iter+1, zc=sqr(zc)+c
  827.         ;
  828.         ; bailout
  829.         ;   compute smoothed iteration as "angle"
  830.         ;   multiply angle by background to get final z
  831.         ;   set z to background for interior points
  832.         ;   set "iteration done" flag (iter=-1)
  833.         ;
  834.         if ((|zc|>maxr)||(iter==maxit))
  835.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  836.           angle=cos(smooth)+flip(sin(smooth))
  837.           z=background*angle
  838.           if (iter==maxit)
  839.             z=background
  840.             endif
  841.           iter=-1
  842.           endif
  843.         iter>0
  844.         }
  845.  
  846. frm:ghost_jul { ; Kerry Mitchell
  847.         ;
  848.         ; colors Julia sets by combining the smoothed iteration
  849.         ; with a background of rays from the center
  850.         ;
  851.         ; use decomp=256
  852.         ; p1 = Julia parameter
  853.         ; real(p2) = bailout
  854.         ; imag(p2) = "ghost" adjustment: set to 0 for only
  855.         ;   background rays, try 2
  856.         ; calculation performed on variable zc, z used for coloring
  857.         ;
  858.         maxr=real(p2), scale=imag(p2)*pi/128
  859.         ol2=1/log(2), fac=log(0.5*log(maxr))
  860.         iter=1, zc=pixel, c=p1, background=pixel
  861.         :
  862.         iter=iter+1, zc=sqr(zc)+c
  863.         ;
  864.         ; bailout
  865.         ;   compute smoothed iteration as "angle"
  866.         ;   multiply angle by background to get final z
  867.         ;   set z to background for interior points
  868.         ;   set "iteration done" flag (iter=-1)
  869.         ;
  870.         if ((|zc|>maxr)||(iter==maxit))
  871.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  872.           angle=cos(smooth)+flip(sin(smooth))
  873.           z=background*angle
  874.           if (iter==maxit)
  875.             z=background
  876.             endif
  877.           iter=-1
  878.           endif
  879.         iter>0
  880.         }
  881.  
  882. frm:ghost-horiz_man { ; Kerry Mitchell
  883.         ;
  884.         ; colors Mandelbrot set by combining the smoothed iteration
  885.         ; with a background of horizontal lines
  886.         ;
  887.         ; use decomp=256
  888.         ; real(p1) = bailout
  889.         ; imag(p1) = "ghost" adjustment: set to 0 for only
  890.         ;   background rays, try 2
  891.         ; calculation performed on variable zc, z used for coloring
  892.         ;
  893.         maxr=real(p1), scale=imag(p1)*pi/128
  894.         ol2=1/log(2), fac=log(0.5*log(maxr))
  895.         iter=1, zc=0, c=pixel
  896.         ;
  897.         ; generate horizontal lines
  898.         ;
  899.         yc=(imag(scrnmax)-1)/2, y=imag(scrnpix)
  900.         t=y/yc*pi, background=cos(t)+flip(sin(t))
  901.         :
  902.         iter=iter+1, zc=sqr(zc)+c
  903.         ;
  904.         ; bailout
  905.         ;   compute smoothed iteration as "angle"
  906.         ;   multiply angle by background to get final z
  907.         ;   set z to background for interior points
  908.         ;   set "iteration done" flag (iter=-1)
  909.         ;
  910.         if ((|zc|>maxr)||(iter==maxit))
  911.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  912.           angle=cos(smooth)+flip(sin(smooth))
  913.           z=background*angle
  914.           if (iter==maxit)
  915.             z=background
  916.             endif
  917.           iter=-1
  918.           endif
  919.         iter>0
  920.         }
  921.  
  922. frm:ghost-vert_man { ; Kerry Mitchell
  923.         ;
  924.         ; colors Mandelbrot set by combining the smoothed iteration
  925.         ; with a background of vertical lines
  926.         ;
  927.         ; use decomp=256
  928.         ; real(p1) = bailout
  929.         ; imag(p1) = "ghost" adjustment: set to 0 for only
  930.         ;   background rays, try 2
  931.         ; calculation performed on variable zc, z used for coloring
  932.         ;
  933.         maxr=real(p1), scale=imag(p1)*pi/128
  934.         ol2=1/log(2), fac=log(0.5*log(maxr))
  935.         iter=1, zc=0, c=pixel
  936.         ;
  937.         ; generate vertical lines
  938.         ;
  939.         xc=(real(scrnmax)-1)/2, x=real(scrnpix)
  940.         t=x/xc*pi, background=cos(t)+flip(sin(t))
  941.         :
  942.         iter=iter+1, zc=sqr(zc)+c
  943.         ;
  944.         ; bailout
  945.         ;   compute smoothed iteration as "angle"
  946.         ;   multiply angle by background to get final z
  947.         ;   set z to background for interior points
  948.         ;   set "iteration done" flag (iter=-1)
  949.         ;
  950.         if ((|zc|>maxr)||(iter==maxit))
  951.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  952.           angle=cos(smooth)+flip(sin(smooth))
  953.           z=background*angle
  954.           if (iter==maxit)
  955.             z=background
  956.             endif
  957.           iter=-1
  958.           endif
  959.         iter>0
  960.         }
  961.  
  962. frm:ghost-horiz_jul { ; Kerry Mitchell
  963.         ;
  964.         ; colors Julia sets by combining the smoothed iteration
  965.         ; with a background of horizontal lines
  966.         ;
  967.         ; use decomp=256
  968.         ; p1 = Julia parameter
  969.         ; real(p2) = bailout
  970.         ; imag(p2) = "ghost" adjustment: set to 0 for only
  971.         ;   background rays, try 2
  972.         ; calculation performed on variable zc, z used for coloring
  973.         ;
  974.         maxr=real(p2), scale=imag(p2)*pi/128
  975.         ol2=1/log(2), fac=log(0.5*log(maxr))
  976.         iter=1, zc=pixel, c=p1
  977.         ;
  978.         ; generate horizontal lines
  979.         ;
  980.         yc=(imag(scrnmax)-1)/2, y=imag(scrnpix)
  981.         t=y/yc*pi, background=cos(t)+flip(sin(t))
  982.         :
  983.         iter=iter+1, zc=sqr(zc)+c
  984.         ;
  985.         ; bailout
  986.         ;   compute smoothed iteration as "angle"
  987.         ;   multiply angle by background to get final z
  988.         ;   set z to background for interior points
  989.         ;   set "iteration done" flag (iter=-1)
  990.         ;
  991.         if ((|zc|>maxr)||(iter==maxit))
  992.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  993.           angle=cos(smooth)+flip(sin(smooth))
  994.           z=background*angle
  995.           if (iter==maxit)
  996.             z=background
  997.             endif
  998.           iter=-1
  999.           endif
  1000.         iter>0
  1001.         }
  1002.  
  1003. frm:ghost-vert_jul { ; Kerry Mitchell
  1004.         ;
  1005.         ; colors Julia sets by combining the smoothed iteration
  1006.         ; with a background of vertical lines
  1007.         ;
  1008.         ; use decomp=256
  1009.         ; p1 = Julia parameter
  1010.         ; real(p2) = bailout
  1011.         ; imag(p2) = "ghost" adjustment: set to 0 for only
  1012.         ;   background rays, try 2
  1013.         ; calculation performed on variable zc, z used for coloring
  1014.         ;
  1015.         maxr=real(p2), scale=imag(p2)*pi/128
  1016.         ol2=1/log(2), fac=log(0.5*log(maxr))
  1017.         iter=1, zc=pixel, c=p1
  1018.         ;
  1019.         ; generate vertical lines
  1020.         ;
  1021.         xc=(real(scrnmax)-1)/2, x=real(scrnpix)
  1022.         t=x/xc*pi, background=cos(t)+flip(sin(t))
  1023.         :
  1024.         iter=iter+1, zc=sqr(zc)+c
  1025.         ;
  1026.         ; bailout
  1027.         ;   compute smoothed iteration as "angle"
  1028.         ;   multiply angle by background to get final z
  1029.         ;   set z to background for interior points
  1030.         ;   set "iteration done" flag (iter=-1)
  1031.         ;
  1032.         if ((|zc|>maxr)||(iter==maxit))
  1033.           smooth=(iter+ol2*(fac-log(log(cabs(zc)))))*scale
  1034.           angle=cos(smooth)+flip(sin(smooth))
  1035.           z=background*angle
  1036.           if (iter==maxit)
  1037.             z=background
  1038.             endif
  1039.           iter=-1
  1040.           endif
  1041.         iter>0
  1042.         }
  1043.  
  1044.  
  1045.  
  1046. - -
  1047. - ------------------------------------------------------------
  1048. Thanks for using Fractint, The Fractals and Fractint Discussion List
  1049. Post Message:   fractint@xmission.com
  1050. Get Commands:   majordomo@xmission.com "help"
  1051. Administrator:  twegner@phoenix.net
  1052. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  1053.  
  1054. ------------------------------
  1055.  
  1056. Date: Mon, 19 Jan 1998 22:47:46 -0700 (MST)
  1057. From: Kerry Mitchell <lkmitch@primenet.com>
  1058. Subject: Re: (fractint) Monday - From Paul Carlson 
  1059.  
  1060. On Mon, 19 Jan 1998, Wizzle wrote:
  1061.  
  1062. > Paul asked me to post.....
  1063. > *******************************
  1064. > I think Kerry's extensions to the bubble method are very
  1065. > ingenious, especially the swirls.  Seeing her formulas
  1066.                                             ^^^
  1067.  
  1068. she's a he. :-)
  1069.  
  1070. - -------------------------------------------------------------------------------
  1071. Kerry Mitchell
  1072. lkmitch@primenet.com
  1073. - -------------------------------------------------------------------------------
  1074.  
  1075.  
  1076.  
  1077. - -
  1078. - ------------------------------------------------------------
  1079. Thanks for using Fractint, The Fractals and Fractint Discussion List
  1080. Post Message:   fractint@xmission.com
  1081. Get Commands:   majordomo@xmission.com "help"
  1082. Administrator:  twegner@phoenix.net
  1083. Unsubscribe:    majordomo@xmission.com "unsubscribe fractint"
  1084.  
  1085. ------------------------------
  1086.  
  1087. End of fractint-digest V1 #83
  1088. *****************************
  1089.  
  1090.