[DrawSize] X_Size=100 Y_Size=75 [Main] Renderer=Fractal Explorer 1.24b2, 27/08/2002 Comment= SignText= [Fractal] X_Coord=-6.74738124182361217 Y_Coord=2.74390357724680966 W_Coord=6.95 X0_Coord=-2 Y0_Coord=2 W0_Coord=4 AutoIter=0 IFSIter=100 Number=3000 ST_Number=22 BailOut=333 MaxIter=104 Rotation=10 Rotation_free=0 P1real=0.5 P1imag=0.5 P2real=0.5 P2imag=0.5 P3real=0 P3imag=0 P4real=0 P4imag=0 PJreal=1.19999999999999996 PJimag=0.599999999999999978 Function1=2 Function2=0 Transformer=0 JulieSet=0 Inverted=0 F-Set=0 Filter=69 Strange=0.00999999977648258209 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=35 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*P1-Fn1(Z^P2)/Fn2(Fn1(P1-C)^Fn1(P2+C)) Str14=˙˙T1:=CPower(Z,P2); Str15=˙˙FuncDisp(FN1,T1); Str16=˙˙T2:=CSub(P1,C); Str17=˙˙FuncDisp(FN1,T2); Str18=˙˙T3:=CAdd(P2,C); Str19=˙˙FuncDisp(FN1,T3); Str20=˙˙T2:=CPower(T2,T3); Str21=˙˙FuncDisp(FN2,T2); Str22=˙˙Z:=CMul(Z,P1); Str23=˙˙T1:=CDiv(T1,T2); Str24=˙˙Z:=CSub(Z,T1); Str25=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str26=˙˙SetResult(x,y,˙Z);˙˙˙˙˙˙˙˙˙˙ Str27=˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str28=˙˙//˙user-defined˙bailout˙test: Str29=˙˙//˙uncomment˙and˙change˙next˙ Str30=˙˙//˙lines˙if˙you˙want˙˙˙˙˙˙˙˙˙ Str31=//If˙x*x+y*y>4˙Then˙begin˙˙˙˙˙˙ Str32=//˙˙˙EndLoop:=True;˙˙˙˙˙˙˙˙˙˙˙˙ Str33=//end;˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ Str34=End; [Colors] Palette type=99 ColorOrder=0 Grayed=0 Brightness=-2 Contrast=0 IterChanging=0 UFDensity=10 UFmappingMode=4 InfinityRed=0 InfinityGreen=0 InfinityBlue=0 [Standart palette] RedStep=11 RedShift=0 GreenStep=15 GreenShift=0 BlueStep=20 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=2 Node0r=0 Node0g=0 Node0b=0 Node1x=93 Node1r=255 Node1g=210 Node1b=0 Node2x=182 Node2r=192 Node2g=128 Node2b=128 Node3x=272 Node3r=0 Node3g=192 Node3b=255