6 ********************************************** 6 * * 6 * * 6( * PROGRAMME MANDEL3 * 62 * * 6< * P.W.H. Moon. 25 December 1985. * 6F * * 6P * Version 3.1 for UK Einstein User Group * 6Z * * 6d * BBCBASIC * 6n * * 6x ********************************************** :  INPUT WINDOW CO-ORDINATES 3 "XMIN, XMAX, YMIN, YMAX ";XMIN,XMAX,YMIN,YMAX  =0 DELTAX=(XMAX-XMIN)/767 DELTAY=(YMAX-YMIN)/767  X=0 767 4 RC=XMIN+X*DELTAX  Y=0 767 4 IC=YMIN+Y*DELTAY RZ=0:IZ=0:XCOUNT=0 RZNEW=RZ*RZ-IZ*IZ+RC IZNEW=2*IZ*RZ+IC RZ=RZNEW:IZ=IZNEW XCOUNT=XCOUNT+1 "SIZ=RZNEW*RZNEW+IZNEW*IZNEW , SIZ>4 DJA 6 XCOUNT<100 dz@ @ 69,X,Y J Y T X 9^ 73,2);"MANDEL3";73,4);"X";73,5);XMIN;73,6);XMAX )h 73,8);"Y";73,9);YMIN;73,10);YMAX 6r 73,12);"TIME";73,13);(/6000);73,14);"MINS." | DMIN~EMAX333DMIN0EMAX