5Hµ ®¯>F >ÿÿ~ d½.¹üºÉx ¡ ‚6 ¡ To convert this program for use under disc BASIC: Œ: ¡ 1. Remove the REM from all lines enclosed between –! ¡ ##########################'s  9 ¡ 2. Run the program, selecting all options in turn, ª4 ¡ (make sure you have a non-write-protected disc ´ ¡ in the default drive). ¾3 ¡ 3. Add REM at the start of all lines between È! ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~'s Ò: ¡ 4. Run it again to check the saved screens. Finish! Ü ¡ æ) ¡ clear screen and display selections: ð# ·:± 20,6:ƒ "Press C for circle," ú ± 26,7: ƒ "D for dots,"  ± 26,8:ƒ "G for grid,"  ± 26,9:ƒ "BREAK to stop."  ¡ "* ¡ scan keyboard until a key is pressed: , B1$=Þ$: „ B1$="" ‰ 300 6 „ B1$="C" ´ B1$="c" ‰ ’ 590 @ „ B1$="D" ´ B1$="d" ‰ ’ 810 J „ B1$="G" ´ B1$="g" ‰ ’ 360 T+ 300:¡ not the right key, so scan again ^ ¡ h ¡ ***** GRID subroutine r2 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ | 450 †2 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 8 ¡ the following sections applies only to disc systems š I-"i",6,"grid" ¤ ·:M 6 ® C 6 ¸ • Â6 ¡ the following section is not used in disc version Ì ¸ Ö Š Y=2 ™ 252 š 10 à$ Ø 0,Y ™ 510,Y:¡ horizontal lines ê ‹ Y ô Š X=0 ™ 511 š 15 þ" Ø X,2 ™ X,252:¡ vertical lines  ‹ X  ± 24,12:ƒ "C, D, or BREAK?"; 2 ¡ ############################################# && ¡ OPEN"o",6,"grid":GRSAVE 6:CLOSE 6 02 ¡ ############################################# : • D ¡ N ¡ ***** CIRCLE subroutine X2 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ b 680 l2 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ v8 ¡ the following sections applies only to disc systems € I-"i",6,"circle" Š ·:M 6 ” C 6 ž • ¨6 ¡ the following section is not used in disc version ² ¸ ¼+ ¤4:¡ reduced accuracy for faster drawing Æ= Š T0=0 ™ 45/7 š .0175:¡ approx 1 degree steps (in radians) Ð- § 255+¼(150*Ô(T0)+.5),128+¼(100*Ó(T0)+.5) Ú ‹ T0 ä ¤8:¡ restore normal accuracy î ± 24,8: ƒ "D, G, or BREAK?"; ø2 ¡ ############################################# ( ¡ OPEN"o",6,"circle":GRSAVE 6:CLOSE 6  2 ¡ #############################################  •   ¡ * ¡ ***** DOTS subroutine 42 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ > 900 H2 ¡ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ R8 ¡ the following sections applies only to disc systems \ I-"i",6,"dots" f ·:M 6 p C 6 z • „6 ¡ the following section is not used in disc version Ž ¸ ˜ Š X=0 ™ 510 š 15 ¢ Š Y=2 ™ 252 š 10 ¬ § X,Y ¶ ‹ Y À ‹ X Ê ± 24,12: ƒ "C, G, or BREAK?"; Ô2 ¡ ############################################# Þ& ¡ OPEN"o",6,"dots":GRSAVE 6:CLOSE 6 è2 ¡ ############################################# ò • ü ‘ ÿÿTVTEST€*** input