1			CONTROL CARD FOR STH.	STH/C01
		00000	2		ORG	0	STH/C02
	00000	0 00000 0 00014	3		PZE	X4+1	STH/C03
	00001	0 00000 0 00000	4		PZE		STH/C04
	00002	746263303460	5		BCD	1(STH)␣	STH/C05
	00003	0 00000 0 00000	6		PZE		STH/C06
			7			END OF STH CONTROL CARD.	STH/C07
		00000	8		ORG	0	STHF2001
	00000	0 50000 4 00001	9	WOT	CLA	1,4 CALCULATE ADDRESS	STHF2002
	00001	0 77100 0 00022	10		ARS	18 FOR COPY INSTRUCTION	STHF2003
	00002	0 40000 4 00001	11		ADD	1,4 X	STHF2004
	00003	−0 63400 4 00013	12		SXD	X4,4 SAVE INDEX REGISTER	STHF2005
	00004	−0 73400 4 00000	13	(STH)	PDX	WOT,4 COUNT OF WORDS PER RECORD TO IR4	STHF2006
	00005	0 62100 0 00006	14		STA	WT1 SUPPLY ADDRESS TO CPY INSTRUCTI0N	STHF2007
	00006	0 70000 4 00000	15	WT1	CPY	0,4 COPY RECORD TO OUTPUT TAPE	STHF2008
	00007	2 00001 4 00006	16		TIX	WT1,4,1 X	STHF2009
	00010	0 76600 0 00333	17		IOD	INPUT OUTPUT DELAY	STHF2010
	00011	−0 53400 4 00013	18		LXD	X4,4 RESTORE IR4, RETURN TO	STHF2011
	00012	0 02000 4 00002	19		TRA	2,4 MAIN PROGRAM	STHF2012
	00013	0 00000 0 00001	20	X4	HTR	1 STORAGE FOR INDEX REGISTER 4	STHF2013