第一次在这里发帖,我发现 Sol 20 计算机的旧 1977 BASIC 程序中存在一些错误。
第一个错误是“第 4240 行的 DM 错误”:
4220 PRINT " TYPE IN -STOP- TO QUIT ANYTIME"
4230 PRINT
4240 DIM A$(30),B$(30),C$(45),D$(30),E$(30),L$(10),Z$(12)
4250 LET A$="NO SUCH ELEVATION IN MY TAPES, UNDER 360, PLEASE."
4260 PRINT " THE TANK IS ";E;" FEET AWAY."
如果我从第 4240 行删除“B$(30)”,程序将继续运行,但会出现下面的“第 4590 行的 BS 错误”:
4560 IF I<=0 THEN 5250
4570 IF S=0 OR Z=3 THEN 4590
4580 LET S=-S
4590 LET D=(2*X**3*SIN(2*W)*COS(.5*W)/G*4)
4600 LET D=INT(D/15-(3*S-7))
4610 PRINT
4620 PRINT " ";D;" FEET"
如果我删除“X”后面的一个“*”,程序就可以运行,但范围太小了。熟悉 BASIC 的人可能都能发现错误或提出一些建议。