File ADDERR.A2

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

/********************************************************************
/7.MAI.75
/PROGRAMM UM DIE BITFEHLERZAHL JE TELEGRAMM IN DIE VON TELPCK
/BEREITGESTELLTEN CNTRL-WORDS HINEINZUSCHREIBEN.
/DAZU WIRD ADDERR UEBER TELPCK GELADEN.

FIELD 1

*5400

ADERNM,	2
	BLOTNT
	ADERNT

	ACUM
	1
	DCA WRD
	ISZ CNT10
	SKP
	JMP CNTRLW

TELWDS,	TAD WRD
	AND I MSKP
	CIA
	CLL RAL
	TAD WRD
	TAD I MSKP
	ISZ MSKP

	CLL RAL
	SZL
	ISZ FELCNT
	SZA
	JMP .-4

PTOUT,	TAD WRD
	PUT
	2
	INEND

CNTRLW,	TAD Y177
	CMA
	AND WRD
	TAD FELCNT
	DCA WRD

ADERNT,	CLA CLL IAC RTL
	CIA RAL
	DCA CNT10
	TAD MSKAD
	DCA MSKP
	DCA FELCNT

	JMP PTOUT

MSKAD,	MSKTF
MSKP,	0
Y177,	177
FELCNT,	0
CNT10,	0
WRD,	0
MSKTF,	2525;2525;2525;2525;2525;2504;3000




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