http://lowres.inutilis.com/programs/?lccpost=V5dfVgPAr4 ]]>

Just a quick note: It seems that there are some small errors in the supplied source code – due to OCR I guess:

line 760 should be

760 INPUT D9

instead of

760 PRINT D9

line 770:

770 IF D9 > 5 THEN 790

instead of

770 IF D95 THEN 790

line 1830:

1830 IF F >= 13 THEN 1850

instead of

1830 IF F >= 13 THEN 1650

line 2890:

2890 IF RND(-1)*10>((M/100-4)**2+72)/((M/100-4)**2+12)-1 THEN 3550

instead of

2890 IF RND(-1)*10>((M/100-4)**27+72)/((M/100-4)**2+12)-1 THEN 3550

line 6200:

6200 PRINT “TYPE “; S$(S6)

instead of

6200 PRINT “TYPE “; S$(56)

line 6260:

6260 IF C$=S$(S6) THEN 6280

instead of

6260 IF C$=S$(56) THEN 6280