Previous File Previous Page Single Page Next Page Next File

* PAGE 2

0051 00043 0 01 00051 JMP XEOF END OF FILE 0052 00044 34 0210 SKS3 SKS '0210 SKIP IF AN ERROR HAS NOT BEEN DETECTED 0053 00045 0 01 00057 JMP ERR ERROR 0054 00046 34 0510 SKS4 SKS '0510 SKIP IF END OF TAPE HAS NOT BEEN DETECTED 0055 00047 0 01 00052 JMP XEOT END OF TAPE 0056 00050 0 12 00000 IRS MTIN 0057 00051 0 12 00000 XEOF IRS MTIN END OF FILE RETURN 0058 00052 0 12 00000 XEOT IRS MTIN END OF TAPE RETURN 0059 00053 0 02 00000 XERR LDA 0 ERROR RETURN 0060 00054 100040 SZE 0061 00055 0 07 00066 SUB WCNT 0062 00056 -0 01 00000 JMP* MTIN 0063 * 0064 00057 0 12 00065 ERR IRS RCNT STEP RETRY COUNTER 0065 00060 100000 SKP HAVE ANOTHER GO 0066 00061 0 01 00053 JMP XERR TOO MANY ERRORS - GIVE UP 0067 00062 14 1510 OCP2 OCP '1510 BACKSPACE ONE RECORD 0068 00063 0 01 00021 JMP RTRY AND TRY AGAIN 0069 * 0070 00064 BUFA BSS 1 BUFFER BASE ADDRESS 0071 00065 RCNT BSS 1 RETRY COUNTER 0072 00066 WCNT BSS 1 WORD COUNTER (-N TO -1) 0073 00067 BUFP BSS 1 BUFFER WORD POINTER 0074 * 0075 * 0076 00070 0 000071 STBA DAC STBL 0077 * 0078 00071 0 000025 STBL DAC OCP1 0079 00072 0 000031 DAC INA1 0080 00073 0 000037 DAC INA2 0081 00074 0 000040 DAC SKS1 0082 00075 0 000042 DAC SKS2 0083 00076 0 000044 DAC SKS3 0084 00077 0 000046 DAC SKS4 0085 00100 0 000062 DAC OCP2 0086 00101 0 000000 XAC M$NBR1 0087 00102 0 000000 XAC M$NBR2 0088 00103 000000 OCT 0 END TABLE 0089 * 0090 * 0091 00104 177766 FIN LITERALS 0092 * 0093 END END OF I$MAGT BUFA 000064 BUFP 000067 DSCD 000037 ERR 000057 INA1 000031 INA2 000037 MTIL 000026 MTIN 000000 NXTW 000031 OCP1 000025 OCP2 000062 RCNT 000065 RTRY 000021 SKS1 000040 SKS2 000042 SKS3 000044 SKS4 000046 STAT 000040 STBA 000070 STBL 000071
Previous File Previous Page Single Page Next Page Next File