File TACH2

Directory of image this file is from
This file as a plain text file

*20
	PMODE
	*200
PARAM,	CLA CLL
	TLS
	TAD K324
	JMS TYPE
	TAD K306
	JMS TYPE
	JMS GET
	JMS CRLF
	TAD NUM
	CIA
	DCA I TFAD
	TAD K324
	JMS TYPE
	TAD K304
	JMS TYPE
	JMS GET
	JMS CRLF
	TAD NUM
	CIA
	DCA I TDAD
	TAD K324
	JMS TYPE
	TAD K315
	JMS TYPE
	JMS GET
	JMS CRLF
	TAD NUM
	CIA
	DCA I TMAD
	TAD K324
	JMS TYPE
	TAD K311
	JMS TYPE
	JMS GET
	JMS CRLF
	TAD NUM
	CIA
	DCA I TIAD
	TAD ICHTAB
	DCA CHPT
GET1,	JMS LISNR
	TAD K377
	TAD M207
	SNA
	JMP CONT
	TAD K207
	DCA NXT
GET2,	JMS LISNR
	SZA CLA
	JMP .+5
	JMS LISNR
	TAD K377
	DCA NXT
	JMP GET2
	TAD NXT
	TAD M215
	SNA
	JMP CR
	TAD K215
	DCA I CHPT
	TAD TEMP
	DCA NXT
	JMP GET2
CR,	JMS CRLF
	TAD K252
	DCA I CHPT
	JMP GET1
	HLT
GET,	0
	TAD M4
	DCA TALLY4
	DCA NUM

OOP, TAD NUM CLL RAL RTL DCA NUM JMS LISN TAD M260 TAD NUM DCA NUM ISZ TALLY4 JMP LOOP JMP I GET TDAD, 576 TIAD, 577 TFAD, 574 TMAD, 575 K377, 377 TEMP, 0 K324, 324 K304, 304 K311, 311 K306, 306 K315, 315 M260, -260 NUM, 0 TALLY4, 0 M4, -4 K207, 207 M207, -207 K252, 252 K215, 215 M215, -215 ICHTAB, 777 NXT, 0 CONT, TAD ICHTAB DCA CHPT JMP 377 *377 HLT READY, CLSA CLA CLLR CLAB TAD K4100 CLLR DSFX, LINC LMODE SET I 1 364 SET I 7 762 DSC 7 DSC I 7 PDP PMODE CLCA TAD TF SPA CLA JMP DSFX CLLR TAD K4100 CLLR CLCA TAD TI SPA CLA JMP .-3 CLLR TAD ICHBF DCA BFPT JMS FETCH TAD IMBF DCA BFPT JMS FETCH CLA CLAB TAD K4100 CLLR READY1, CLA TAD ICHBF DCA BFPT LINC LMODE JMP DSPLA PDP PMODE CLCA TAD TD SPA JMP READY1 CLA CLLR CLAB TAD K4100 CLLR READY2, CLA TAD IMBF DCA BFPT LINC LMODE JMP DSPLA PDP PMODE CLCA TAD TM SPA JMP READY2 CLA CLLR OSR SNA JMP WAIT TEST, CLA 6304 6301 JMP .-1 6306 SNA CLA JMP .-2 JMP READY WAIT, HLT JMP READY K4100, 4100 ICHBF, 667 IMBF, 767 FETCH, 0 REPT, TAD I CHPT TAD M252 SNA JMP I FETCH TAD KK252 AND M1 CLL RAL TAD K600 DCA I BFPT JMP REPT K600, 600 M1, 77 M252, -252 LMODE DSPLA, CLR ADD 0 STC RETRN SET I TALLYD 1767 SET I 1 364
OAD, LDA I BFPT STC PATT SET 7 PATT DSC 7 DSC I 7 LDA I 4 ADM 1 CLR XSK I TALLYD JMP LOAD RETRN, 0 KK252, 252 PATT, 0 *13 TALLYD, 0 CHPT, 0 BFPT, 0 *574 TF, 0 TM, 0 TD, 0 TI, 0 *602 4477 7744 5177 2651 4136 2241 4177 3641 4577 4145 4477 4044 4136 2645 1077 7710 7741 0041 4142 4076 1077 4324 0177 0301 3077 7730 3077 7706 4177 7741 4477 3044 4276 0376 4477 3146 5121 4651 4040 4077 0177 7701 0176 7402 0677 7701 1463 6314 0770 7007 4543 6151 0000 0000 *700 0000 0000 *740 4136 3641 2101 0177 4523 2151 4122 2651 5172 0651 1506 4225 4443 6050 5126 2651 5120 3651 1400 0014 2551 4546 7777 7777 *31 PDP PMODE
ISN, 0 CLA KSF JMP .-1 KRB TLS JMP I LISN JMS TYPE JMP I CRLF TYPE, 0 TSF JMP .-1 TLS CLA JMP I TYPE CRLF, 0 TAD KK215 JMS TYPE TAD K212 JMS TYPE JMP I CRLF K212, 212 KK215, 215
ISNR, 0 CL, CLA KSF JMP .-1 KRB DCA I TEMPAD TAD I TEMPAD TAD M200 SNA CLA JMP CL TAD I TEMPAD TLS TAD M377 JMP I LISNR TEMPAD, TEMP M200, -200 M377, -377



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search