2 D=58920 '<<---Change this value to reflect TOP address of X-TEL.
4 A$="":FORA=63610TO63613:A$=A$+CHR$(PEEK(A)):NEXT:IFA$="Menu"THENOPEN"COM:57I1E"FORINPUTAS1:CLOSE:RUN"R:X-TEL
16 OPENR$+ST$FORINPUTAS1:OPENR$+ST$FOROUTPUTAS2
50 IFQ$=""ANDERR=52THENQ$="R:":RESUME10ELSEIFERR=54THENPRINT:PRINT"     Timming Error, Try Again....":GOSUB58:RESUME5ELSEPRINT"Error"ERR"in line"ERL:END