With the order in place for the new satellite dish, Dr. J has started planning a new control room. I just got a FractoFax exhibiting details of his plans. I think he may have eyes bigger than his pocket book. I wonder what signals he will be getting with all this.
|
Figure 1. Control Center.
Stay warm,
Jay
frm:3telescope { ; (c) Jay Hill, 1998
; use outside=summ periodicity=0
done = 1, z = 0, zc = 0, c = pixel
s=|c|, t1=(256*s - 96)*s + 32*Real(c), t2=16*s + 32*Real(c) + 16
B=sqrt(-4*c-7), t3=|8+4*c*(1-B)|, t4=|8+4*c*(1+B)| ; component tests
z=z + 249*(t1<=3) + 250*(t2<=1) + 251*(t3<=1) + 252*(t4<=1) ;
set colors
if(z>0) ; for periods 1, 2, and 3.
done=-1 ; color is set for c in a component, skip iterations
endif
: ; initialization.
zc=sqr(zc) + c ; standard MSet iteration
if (|zc| >= 4) ; Bailout at 4
done=-1 ; Set flag to force an exit.
endif
done >= 0 ; Continue if the flag >=0.
}
Control_Center_3 { ; (c) Jay Hill, 1998
; invert at -1.76852915
reset=1960 type=formula formulafile=color101.par
formulaname=3telescope center-mag=-35.1759/0/0.01/1/90 float=y
maxiter=2560 inside=0 outside=summ logmode=fly
invert=1/-1.768529152467/0 symmetry=xaxis periodicity=0
colors=cK0Ucz<9>34o00m00l<31>00A<42>\
bbuccwccw<83>11v00u00u00t00s<70>003w\
wwwwwwwwUmK000000
}
