Directory of image this file is from
This file as a plain text file
[AUTOCORR [NEW VERSION OF COAUTO, WITH INPUT LIST ENTERED AT THE BUFFERED TELETYPE AND CORRELATIONS CALCULATED FROM THE BEGINNING OF EACH EVOKED POTENTIAL, THAT IS AT EVERY 100 OCTAL POINTS. [A J HANCE, JUNE 1967 [ENTRY LIST [COMPILER $20 JMP 1Y NOP SETi12 2A-2 SETi3 -401 CLR COM STAi12 XSKi3 JMP p-2 SETi12 2A-1 LDAi 12 JMP 7P SROi 3737 JMP p-5 #5Z JMP 7R STA p+3 JMP 7P LDAi 00 SHDi 7300 JMP 6E SHDi 1300 JMP 6D SHDi 1200 JMP 6C ADAi -7 APOi JMP 6A-1 ADAi 7 STC 6B ADD 6A ROL 3 ADAi #6B 00 BCLi 7000 STC 6A JMP 5Z #6D LDAi 215 OPRi2 LDAi 330 OPRi2 SROi 3777 JMP p-5 LDAi 12 JMP 7P LDA 12 APO JMP 6A+4 CLR COM STA 12 ADD 2P ADM 12 JMP p-11 LDAi #6A 00 AZEi JMP 5Z STAi12 CLR STC 6A JMP 5Z #6C LDA 6A AZE STAi12 LDA 12 APOi COM STA 12 JMP 6A+4 #6E SETi3 6E+3777+10 LDHi3 JMP 7P SROi 3737 JMP p-4 JMP p+4 3134 4134 4633 OPRi1 JMP 2N [BUFTTY [BUFFERED TTY [READ AND PRINT [SUBROUTINE. [PRINT #7P STC p+13 ADD 0 STC p+14 ADD p+10 ADAi 7L STC p+2 LDA 0 OPRi2 LDAi 0 SAEi 12 JMP 000 SROi 5252 JMP p-3 LDAi 212 JMP p-13 [READ #7R LDA 0 STC p+33 ADD 1 STC p+22 ADD 2 STC p+23 OPRi1 SETi1 -101 SETi2 7L-1 SAEi2 JMP p+21 LDAi 7L COM ADD 2 AZEi COM STC p+10 LDAi 0 STC 1 LDAi 0 STC 2 LDAi 0 JMP 000 XSKi1 JMP p-23 JMP p-14 [TABLE #7L 260 261 262 263 264 265 266 267 270 271 215 377 240 246 247 255 253 257 243 215 301 302 303 304 305 306 307 310 311 312 313 314 315 316 317 320 321 322 323 324 325 326 327 330 331 332 275 245 254 256 244 333 212 251 337 336 273 276 274 252 242 335 272 277 207 [END OF SUBROUT #2P -1 [END COMPILER #2N SETi13 2A-1 LDAi13 APOi JMP p+12 SAEi 7777 JMP p+2 JMP 4F COM BSEi 5000 STC 2J JMP p+10 BSEi 5000 STA 2J BCLi 7000 ADAi13 ADAi -1 STC 10 ADD 2J ADAi 1001 STA 4B ADD p-3 STC 4C STC 2B [READ IN DATA TO QUARTERS 5, 6, 7. RDC i #2J 5001 RDC i #4B 6002 RDC #4C 7003 SETi3 2377 LDAi #2B 0000 AZEi JMP 2C ROR 3 ADAi 2377 STC 2 SETi1 -1000 LDAi2 STAi3 XSKi1 JMP p-3 #2C LDAi 1000 ADM 2B SETi1 -1000 SETi2 3377 SETi3 3777 LDA 2 STA 3 LDAi -1 ADD 2 STC 2 ADD p-3 ADD 3 STC 3 XSKi1 JMP p-12 [AUTOCORREL, SETi12 2777 JMP 4A SETi1 1377 SETi2 2377 CLR STAi2 XSKi1 JMP p-2 SETi1 6777 SETi4 1577 SETi5 2400 SETi6 4A-1 LDAi 2777 STC 3A #1I SETi2 2777 CLR STC 4A-1 SETi3 #3A 2777 #1J LDAi3 MULi2 STA 1K SCR 13 STC 1L CLR ADD 1K LAM 6 STC 0 ADD 1L LAM 5 STC 0 LAM 6 STC 0 LAM 5 XSK 3 JMP 1J LDA 5 STC 1L ADD 1 COM STC 1A STC 7F STC 7 SETi11 -14 ADD 1L STAi #7F 0 APOi JMP 7B COM STC 1L ADD 4A-1 COM STC 4A-1 #7B CLR ADD 7 ROL 1 STC 7 ADD 4A-1 ROLi1 STC 4A-1 ADD 1L ROLi1 STA 1L ADD 1 AZEi CLR APO JMP p+6 STC 1L LDAi 1 ADD 7 STC 7 XSKi11 JMP 7B LDA 7F APOi JMP p+5 LDA 7 COM STC 7 LDA 7 STA 5 XSKi1 LDAi5 LDAi5 XSKi4 JMP p+2 JMP 3C LDAi 1 ADM 3A JMP 1I #3C SETi1 0 LDAi -3770 ADA 2400 APOi JMP p+3 XSKi1 JMP p-5 SETi2 2377 SETi3 1377 LDAi2 MUL 1 SCR 3 STA 2 XSKi3 JMP p-6 SETi1 1577 SETi2 2376 SETi3 2377 SETi4 2400 LDA 2776 STA 3000 #1Q XSKi2 XSKi3 XSKi4 LDAi2 ADAi4 SCR 1 STAi3 XSKi1 JMP 1Q LDA 2J BCLi 7000 BSE 2B STA 2777 LDAi 1 ADM 4D ADAi -5777 APOi JMP 4G WRCu #4D 5000 LDA 2B SAEi 4000 JMP 2J-1 LDAi 1 ADD 2J STC 2J XSKi10 JMP 2J-11 JMP 2N+2 #4F CHK 0 CLR SETi1 100 SETi2 4E SETi3 1767 DSCi2 XSKi3 JMP p-2 #4E JMP 4F+2 4477 4044 0 7741 0041 0 3077 7706 #1A 0 #1K 0 #1L 0 [NORMALIZE SUBROUTINE 000 #4A LDA 0 STC 5A STC 5B STC 5C SET 2 12 SETi3 777 #5E CLR LDAi2 SCR 13 STC 5D LDA 2 LAM 5C STC 0 ADD 5D LAM 5B STC 0 LAM 5C STC 0 LAM 5B XSKi3 JMP 5E SETi2 1774 #5F CLR ADD 5C ROLi1 STC 5C ADD 5B ROLi1 STC 5B XSKi2 JMP 5F ADD 5B COM STC 5B STC 4A-1 SET 2 12 SETi3 777 #5G LDAi2 ADD 5B STA 2 APOi COM ADD 4A-1 APOi JMP 5H COM ADD 4A-1 STC 4A-1 #5H XSKi3 JMP 5G SETi1 0 LDAi -2640 ADD 4A-1 APOi JMP p+4 XSKi1 JMP p-4 JMP 1X SET 2 12 SETi3 777 #5N LDAi2 MUL 1 SCR 5 STA 2 XSKi3 JMP 5N #5A 00 #5B 00 #5C 00 #5D 00 #1X SETi1 2377 CLR STAi1 XSK 1 JMP p-2 JMP 4D-11 [STARTING MESSAGE #1Y MTBi 0 SETi1 -33 SETi2 1Z+3777 LDHi2 JMP 7P XSKi1 JMP p-3 LDAi NOP STA 1Y STC 1Y+1 JMP 22 #1Z " MOUNT DATATAPE - UNIT 0 ; [FUL MESSAGE #4G LDAi 4H STC 4F+6 #4H JMP 4F+2 4477 4044 0 0177 7701 0 0177 0301 7777 #2A 7777 7777 7777 7777 [END OF AUTOCORR