1			1 FORCE NEW RECORD
	00001	0 00031 0 00036	2		HTR	X−1,0,25 CARD FOR DE
		00031	3		ORG	25
TD	00031	3 00000 0 00001	4		TXH	1 READ IN REST OF DIAGNOSTIC
	00032	0 76200 0 00221	5		RTB	1 READ INTO 30, TABLE SEARCH AND ALL
	00033	−0 53400 1 00036	6		LXD	ZERO,1 CONVERTING + PRINT ETC, ROUTINES
	00034	0 70000 1 00036	7	CP	CPY	30,1
	00035	1 77777 1 00034	8		TXI	CP,1,−1 END RECORD SKIP, EXIT TO 31
	00036	0 00000 0 00000	9	ZERO	HTR	0, RECORD NUMBER OF NEXT COPIED HERE
	00037	0 00000 0 00000	10	X