[DrawSize] X_Size=100 Y_Size=100 [Main] Renderer=Fractal Explorer 1.24b2, 24/08/2002 Comment= SignText=Dr. Joseph Trotsky 2002 [Fractal] X_Coord=-0.194751419269991636 Y_Coord=0.00903255339985077744 W_Coord=0.372 X0_Coord=-2 Y0_Coord=2 W0_Coord=4 AutoIter=0 IFSIter=100 Number=3000 ST_Number=1 BailOut=196 MaxIter=494 Rotation=10 Rotation_free=180 P1real=0.5 P1imag=0.5 P2real=0.5 P2imag=0.5 P3real=0 P3imag=0 P4real=0 P4imag=0 PJreal=0.5 PJimag=0.5 Function1=34 Function2=0 Transformer=10 JulieSet=0 Inverted=1 F-Set=1 Filter=90 Strange=0.25 KeepBlk=0 NoOutside=0 Filter only=0 IFSColorStyle=0 IFSSolidRed=255 IFSSolidGreen=255 IFSSolidBlue=255 IFSquick=1 Smoothing=0 Double=0 Precision=2 ConstructorA1=1 ConstructorB1=0 ConstructorC1=1 ConstructorD1=0 ConstructorE1=0 ConstructorF1=0 ConstructorG1=0 ConstructorH1=0 ConstructorI1=0 ConstructorJ1=0 ConstructorK1=0 ConstructorL1=0 ConstructorM1=0 [IFS] Name= Count=0 [Quaternion] W=0 CR=-0.456425999999999998 CI=0.510553000000000035 CJ=0.122399999999999995 CK=-0.092399999999999996 Rx=0 Ry=0 Rz=0 Lx=2 Ly=0 Lz=-4 Lx2=-2 Ly2=0 Lz2=-4 AmbientClR=50 AmbientClG=50 AmbientClB=50 DiffuseClR=190 DiffuseClG=150 DiffuseClB=0 SpeculaClR=255 SpeculaClG=255 SpeculaClB=255 AmbientClR2=50 AmbientClG2=50 AmbientClB2=50 DiffuseClR2=190 DiffuseClG2=150 DiffuseClB2=0 SpeculaClR2=255 SpeculaClG2=255 SpeculaClB2=255 MergeMode=0 MergeModeAlpha=10 StepBig=200 StepSmall=40 MaxIter=10 Bailout=16 QTrims=1 [UserFrm] StringCount=37 Str0=˙˙//˙-declaration˙of˙the˙local˙temporary˙variables Str1=˙˙var˙T0,T1,T2,T3,T4,T5˙:˙TComplex; Str2=Begin˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str3=˙˙//˙-"julia"˙flag˙˙˙˙˙˙˙˙˙˙˙˙ Str4=˙˙If˙julia˙Then˙begin˙˙˙˙˙˙˙˙˙ Str5=˙˙end;˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str6=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str7=˙˙//˙-initialization˙code˙˙˙˙˙ Str8=˙˙//˙˙(first˙iteration)˙˙˙˙˙˙˙ Str9=˙˙If˙iter_number=1˙Then˙begin˙ Str10=˙˙end;˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str11=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str12=˙˙//˙write˙your˙formula˙here˙˙ Str13=//˙z*z*z/c+z*z*fn1(z)+z^fn1(z)+c Str14=˙˙T1:=Z; Str15=˙˙FuncDisp(FN1,T1); Str16=˙˙T2:=Z; Str17=˙˙FuncDisp(FN1,T2); Str18=˙˙T2:=CPower(Z,T2); Str19=˙˙T3:=CSqr(Z); Str20=˙˙T3:=CMul(T3,Z); Str21=˙˙T3:=CDiv(T3,C); Str22=˙˙Z:=CSqr(Z); Str23=˙˙Z:=CMul(Z,T1); Str24=˙˙Z:=CAdd(T3,Z); Str25=˙˙Z:=CAdd(Z,T2); Str26=˙˙Z:=CAdd(Z,C); Str27=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str28=˙˙SetResult(x,y,˙Z);˙˙˙˙˙˙˙˙˙˙ Str29=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str30=˙˙//˙user-defined˙bailout˙test: Str31=˙˙//˙uncomment˙and˙change˙next˙ Str32=˙˙//˙lines˙if˙you˙want˙˙˙˙˙˙˙˙˙ Str33=//If˙x*x+y*y>4˙Then˙begin˙˙˙˙˙˙ Str34=//˙˙˙EndLoop:=True;˙˙˙˙˙˙˙˙˙˙˙˙ Str35=//end;˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str36=End; [Colors] Palette type=99 ColorOrder=0 Grayed=0 Brightness=9 Contrast=0 IterChanging=0 UFDensity=4 UFmappingMode=4 InfinityRed=0 InfinityGreen=0 InfinityBlue=0 [Standart palette] RedStep=7 RedShift=0 GreenStep=11 GreenShift=0 BlueStep=14 BlueShift=64 [Linear palette] Red1=0 Red2=255 Green1=0 Green2=255 Blue1=128 Blue2=0 [Parabola palette] Red1=0 Red2=255 Green1=0 Green2=255 Blue1=255 Blue2=0 [Square palette] Red1=0 Red2=128 Green1=0 Green2=0 Blue1=0 Blue2=255 [UF palette] Count=4 Node0x=1 Node0r=255 Node0g=210 Node0b=0 Node1x=90 Node1r=192 Node1g=128 Node1b=128 Node2x=180 Node2r=0 Node2g=192 Node2b=255 Node3x=270 Node3r=0 Node3g=0 Node3b=0