You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
BgeREM* *<br />
900<br />
1080 1000 DIM DIM Y '1'(79)<br />
1658 1050 ? "SHORT "SHCRT DELAY WHILE Ion-llLE CALCULATING"<br />
CAlClLATIt-G"<br />
I860 11160 ? "COORDINATES "CiXJRDlNATES FOR Fffi CIRCLE CIRClE ... . . uu<br />
1188 1181l FOR F~ 1=1 1=1 TO TO 79 79<br />
1260 Y(I>=SQRa6&0-C40-I)*u;"SETCOLOR 2,u;H\JE;",u;lJJ12<br />
2/1;HUE;lV;LUH2<br />
4870 ? "SETCOLffi "SETCOLOR 1,0, U<br />
1,8,U;UUH1 ;llJ11<br />
4080 4880 FOR 11.'1'= DLY=11 TO 50 58, ■• NEXT Il. DLY '1'<br />
4090 4890 IF PEEK(53279)::7 PEEKC >=7 THEN 4890 4898<br />
4100 4188 HEXT NEXT Lut11 LJUH1<br />
4tHl 4110 HEXT NEXT Lut12 LUM2<br />
4129 4128 HtXT NEXT H.JE HUE<br />
5eOO 5008 GRAPHICS 7<br />
5100 ? "~ICS "GRAPHICS MODE 7"<br />
5200 5208 ca..~ COLOR 1<br />
5300 5388 FOR FCft X=l TO 79 STEP 2<br />
5400 5408 PlOT PLOT 48+)V2, 48+X/2,23-Y