/	RX8B DEFINITIONS.

	DEVCODE=75^10+6000	/SKELETON IOT CODE OF DISK

	SEL=	DEVCODE+0	/LOAD DRIVE PAIR PER AC[11]
	LCD=	DEVCODE+1	/LOAD COMMAND REGISTER
	XDR=	DEVCODE+2	/TRANSFER DATA REGISTER
	STR=	DEVCODE+3	/SKIP ON, CLEAR TRANSFER FLAG
	SER=	DEVCODE+4	/SKIP ON, CLEAR ERROR FLAG
	SDN=	DEVCODE+5	/SKIP ON, CLEAR DONE FLAG
	INTR=	DEVCODE+6	/INTERRUPT ENABLE/DISABLE PER AC[11]
	INIT=	DEVCODE+7	/INITIALIZE CONTROLLER, RECALIBRATE DRIVES
START,	INIT			/CLEAN UP
	LAS			/GET SWITCHES
	DCA	0		/SETUP THE COUNTER
	SDN			/WAIT
	JMP	.-1		/FOR FLAG
	TAD	(16)		/GET READ ERROR REGISTER FUNCTION
	LCD			/LOAD THE COMMAND
	ISZ	0		/WASTE
	JMP	.-1		/TIME
	SDN			/FLAG UP?
	HLT			/NO, BARF
	JMP	START		/TRY AGAIN