01.03.2014 Views

Section 2 - Commodore Computers

Section 2 - Commodore Computers

Section 2 - Commodore Computers

SHOW MORE
SHOW LESS

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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!