home *** CD-ROM | disk | FTP | other *** search
/ Freelog Special Edition 9 / FreelogHS09.iso / FractalExplo / Formulas / Custom3.frs < prev    next >
Encoding:
INI File  |  2001-03-25  |  2.6 KB  |  168 lines
  1. [DrawSize]
  2. X_Size=300
  3. Y_Size=300
  4. [Main]
  5. Renderer=Fractal Explorer 1.22, 25.03.2001
  6. [Fractal]
  7. X_Coord=0.564046223958333264
  8. Y_Coord=0.2500000000000001
  9. W_Coord=0.5
  10. X0_Coord=-2
  11. Y0_Coord=2
  12. W0_Coord=4
  13. AutoIter=0
  14. IFSIter=100
  15. Number=3000
  16. BailOut=100
  17. MaxIter=200
  18. Rotation=3
  19. P1real=1.38410000000000011
  20. P1imag=1.30348258706467662
  21. P2real=0.587064676616915423
  22. P2imag=1.30348258706467662
  23. P3real=0
  24. P3imag=0
  25. PJreal=-0.389000000000000012
  26. PJimag=0
  27. Function1=5
  28. Function2=0
  29. JulieSet=1
  30. Inverted=0
  31. F-Set=0
  32. Filter=105
  33. Strange=0.00999999977648258209
  34. KeepBlk=0
  35. Filter only=1
  36. IFSColorStyle=0
  37. IFSSolidRed=255
  38. IFSSolidGreen=255
  39. IFSSolidBlue=255
  40. IFSquick=1
  41. Smoothing=2
  42. Double=0
  43. Precision=2
  44. ConstructorA1=1
  45. ConstructorB1=0
  46. ConstructorC1=1
  47. ConstructorD1=0
  48. ConstructorE1=0
  49. ConstructorF1=0
  50. ConstructorG1=0
  51. ConstructorH1=0
  52. ConstructorI1=0
  53. ConstructorJ1=0
  54. ConstructorK1=0
  55. ConstructorL1=0
  56. ConstructorM1=0
  57. [IFS]
  58. Name=
  59. Count=0
  60. [Quaternion]
  61. W=0
  62. CR=-0.456425999999999998
  63. CI=0.510553000000000035
  64. CJ=0.122399999999999995
  65. CK=-0.092399999999999996
  66. Rx=0
  67. Ry=0
  68. Rz=0
  69. Lx=2
  70. Ly=0
  71. Lz=-4
  72. AmbientClR=50
  73. AmbientClG=50
  74. AmbientClB=50
  75. DiffuseClR=190
  76. DiffuseClG=150
  77. DiffuseClB=0
  78. SpeculaClR=255
  79. SpeculaClG=255
  80. SpeculaClB=255
  81. StepBig=200
  82. StepSmall=40
  83. [UserFrm]
  84. StringCount=25
  85. Str0={ ----------------------------- }
  86. Str1={ This is FGZ formula
  87. Str2=  Z=C=pixel:
  88. Str3=  Z=Z*Z+C; Z=(3*Z*Z)/(Z+3) + C; }
  89. Str4={ ----------------------------- }
  90. Str5=  // -used variables
  91. Str6=  var Z,Z0,P1: TComplex;
  92. Str7=Begin
  93. Str8=  // -convert parameters to the
  94. Str9=  //  complex values
  95. Str10=  Z :=MakeComplex(x,y);
  96. Str11=  Z0:=MakeComplex(cr,ci);
  97. Str12=  P1:=MakeComplex(p1r,p1i);
  98. Str13=
  99. Str14=  // -=== calculate formula ===-  
  100. Str15=  FuncDisp(Fn1,Z);
  101. Str16=  
  102. Str17=  // -base mandelbrot
  103. Str18=  Z:=CAdd(CSqr(Z),Z0);
  104. Str19=  Z:=CDiv(CMulR(CSqr(Z),3),CAddR(Z,3));
  105. Str20=  Z:=CAdd(Z,Z0);
  106. Str21=
  107. Str22=  // -set the results
  108. Str23=  SetResult(x,y, Z);
  109. Str24=End;
  110. [Colors]
  111. Palette type=9
  112. ColorOrder=10
  113. Grayed=0
  114. Brightness=59
  115. Contrast=63
  116. IterChanging=0
  117. UFDensity=4
  118. UFmappingMode=4
  119. InfinityRed=0
  120. InfinityGreen=0
  121. InfinityBlue=0
  122. [Standart palette]
  123. RedStep=4
  124. RedShift=-255
  125. GreenStep=4
  126. GreenShift=-255
  127. BlueStep=3
  128. BlueShift=82
  129. [Linear palette]
  130. Red1=0
  131. Red2=255
  132. Green1=0
  133. Green2=255
  134. Blue1=128
  135. Blue2=0
  136. [Parabola palette]
  137. Red1=0
  138. Red2=255
  139. Green1=0
  140. Green2=255
  141. Blue1=255
  142. Blue2=0
  143. [Square palette]
  144. Red1=0
  145. Red2=128
  146. Green1=0
  147. Green2=0
  148. Blue1=0
  149. Blue2=255
  150. [UF palette]
  151. Count=4
  152. Node0x=0
  153. Node0r=255
  154. Node0g=210
  155. Node0b=0
  156. Node1x=89
  157. Node1r=192
  158. Node1g=128
  159. Node1b=128
  160. Node2x=179
  161. Node2r=0
  162. Node2g=192
  163. Node2b=255
  164. Node3x=269
  165. Node3r=0
  166. Node3g=0
  167. Node3b=0
  168.