*20
/PATCH TO FOCAL-RT TO CALL DEAD START
/LOADER ON L E,
	PMODE
	*5114
	NOP		/DISABLE RUBOUT ON FIN()
	FIELD 1
	*176
	2155
	*1776
	3		/ONLY 4 FILES
	*2155
	IOF
	LINC
	LMODE
	CLR
	AXO
	LDF 2
	RDC
	4\270
	LDA I
	1400
	LIF 2
	JMP 20
	LISTAPE -1