6 ********************************************** 6 * * 6 * * 6( * PROGRAMME JULIA4 * 62 * * 6< * P.W.H. Moon. 11 January 1986 * 6F * * 6P * Version 4.2 for UK Einstein User Group * 6Z * * 6d * BBCBASIC * 6n * * 6x ********************************************** :  INPUT WINDOW CO-ORDINATES 2 "XMIN, XMAX, YMIN, YMAX";XMIN,XMAX,YMIN,YMAX : INPUT REAL AND IMAGINARY PARTS OF COMPLEX CONSTANT C  "RC, IC";RC,IC  =0 J SCREEN ADDRESSES 0-767 x 0-767, BUT ONLY 192 x 192 PIXELS AVAILABLE. DELTAX=(XMAX-XMIN)/767 DELTAY=(YMAX-YMIN)/767  X=0 384 4  Y=0 767 4 XK=XMIN+X*DELTAX YK=YMIN+Y*DELTAY XCOUNT=0 XKNEW=XK*XK-YK*YK+RC "YKNEW=2*XK*YK+IC ,XCOUNT=XCOUNT+1 6SIZ=XKNEW*XKNEW+YKNEW*YKNEW @XK=XKNEW:YK=YKNEW J SIZ>100 DhA T XCOUNT<30 TXA ^ 69,X,Y: 69,767-X,767-Y h Y r X 8| 76,2);"JULIA4";76,4);"X";76,5);XMIN;76,6);XMAX ) 76,8);"Y";76,9);YMIN;76,10);YMAX ' 76,12);"C";76,13);RC;76,14);IC A 76,16);"TIME";76,17);$;76,18);(/6000);76,19);"MINS."  ;, (#2(<2F<PFZPdZndxnx