P683 683 RAI Lun 17 Ott 21:55:09GRAFICA.BAS 01/03$ 940 REM CIRCLE 950 REM 960 REM 975 B INT " " 1020 LOCATE 7,12,0:PRINT "P‖ 205)+CHR$(184) 1040 LOCATE 1 ,9,0:PRIv HR$(179) 1050 LOCATE 12,9,0:PRINT CHRm sion 1.10 "+CHR$(179) 1070 LOCATE0 )+CHR$(190) 1080 COLOR 15,0:LOCATE 17 inue" 1100 IF INKEY$<>"" THEN cOTO 11

P683 683 RAI Lun 17 Ott 21:56:55GRAFICA.BAS 02/03% " THEN GOTO 1160 1150 cOTO 11 0 1 6 !" 1210 PRINT "THIS PROGRAM USES GRAP' E." 1230 DEF SEG 1240 IF INKEY$<>"" ,1000 1314 COLOR 7,0,0:CLS:END 1320 %

P683 683 RAI Lun 17 Ott 21:57:05GRAFICA.BAS 03/03& 1=.5+RND*5:S2=RND*2 1360 CLS 1365 LO■ @ @ @ @ @ @ @ @ @ @ @ @