10 OPEN "KB:" AS FILE 1%:INPUT #1%,
	"# OF EXTRA SPACES ON LEFT MARGIN: ";A%:INPUT #1%,
	"DECTAPE DRIVE #";D%:INPUT #1%,"OUTPUT DEVICE: ";O$:
	O$="KB:" IF O$="":OPEN O$ FOR OUTPUT AS FILE 2%
20 ON ERROR GOTO 100:OPEN "DT"+NUM$(D%)+":BOOK" FOR INPUT AS FILE 1%
30 INPUT LINE #1%,A$:A$=SPACE$(A%)+A$ IF LEN(A$)>2%:PRINT #2%,A$;:
	GOTO 30
100 IF ERR=5% THEN PRINT "CAN'T FIND BOOK ON THIS TAPE!!":PRINT:
	CLOSE K% FOR K%=1% TO 12%:RESUME 200
110 IF ERR=11% THEN CLOSE K% FOR K%=1% TO 12%:RESUME 200
120 ON ERROR GOTO 0
200 END