ENTRY MAIN
MAIN,	CLA CLL
	TLS
	HLT
	OSR
	/TAD K260
	JMS TYPE
	CALL 0,EXIT
TYPE,	0
NEU,	TSF
	JMP NEU
	TLS
	JMP I TYPE
K260,	260
	END