100 /	MOVE THE TAPE
 110 
 120 START,	TAD	(1200)	/SET FORWARD BITS
 130 	DTLA		/LOAD IT
 140 LOOP,	DTSF		/FLAG UP?
 150 	JMP	LOOP	/NO, WAIT FOR IT
 160 	TAD	(600)	/GET NEW GO BIT AND DIRECTION REVERSER
 170 	DTXA		/LOAD IT
 180 	JMP	LOOP	/KEEP GOING