/014 PS-OS/8 OPTION DECODER
/CHECKS THE OPTION, SPECIFIED IN THE AC AND CAUSES
/A RETURN, DEPENDING ON WHETHER THE OPTION HAS BEEN
/SET
/OPTIONS IN OS8 RESIDE IN FIELD 1 LOC 7643-7645 :
/
/7643  A B C D E F G H I J K L   ASCII 301-314
/7644  M N O P Q R S T U V W X   ASCII 315-330
/7645  Y Z 0 1 2 3 4 5 6 7 8 9   ASCII 331, 332, 260-271
/
/	TAD (16		/CHECK OPTION 16 (N)
/	JMS OPTION
/	   OPTION NOT SET RETURN/AC=0
/	   OPTION SET RETURN	/AC=0
/

OPTM1,	7777
	-14		/-12(10)
	7642		/POINTER
	0		/TEMP. STORAGE
	7642		/COUNTER, ALSO POINTER
OPTION,	0		/ENTER WITH POSITION IN AC
	DCA OPTION-2
	TAD OPTION-3	/RESTORE COUNTER
	DCA OPTION-1
	TAD OPTION-2	/SUBTRACT 12 TO FIND WORD
	TAD OPTION-4
	ISZ OPTION-1
	SMA SZA
	JMP .-3
	TAD OPTM1	/FOR L AND X
	DCA OPTION-2	/SAVE REMAINDER MODULO 12
	CLL CML		/AND ROTATE ONE BIT INTO POSITION
	RAL		/ROTATE FURTHER
	ISZ OPTION-2
	JMP .-2
	CDF 10		/AND WITH OPT WORD FIELD 1
	AND I OPTION-1
	CDF 0
	SZA CLA
	ISZ OPTION	/IN CASE IT HAS BEEN SET
	JMP I OPTION