- 58 -
drawbox:
REM
LOCATE BOXSTX, BOXSTY:
REM
BOX$ = CHR$(201)
REM
FOR I = 1 TO BOXWIDE: BOX$ = BOX$ + CHR$(205): NEXT
REM
PRINT BOX$;
RETURN
help:
LOCATE 14, 10: PRINT "E W N S keys move telescope. SPACE BAR stops.";
LOCATE 15, 10: PRINT "M key to enter Messier object.";
LOCATE 16, 10: PRINT"T key to enter sTar.";
LOCATE 17, 10: PRINT "P key to enter Planet (900 + orbit #).";
LOCATE 18, 10: PRINT "C key to enter Cngc object.";
LOCATE 19, 10: PRINT "X to End program.";
RETURN
END