C-PS/8 FOCAL, 1971
 1.05 C MISCL2.RE
 1.10 L C FOCAL.TM
 1.20 G 2.1
 2.10 T !!!!!!!!
 2.20 T "***** MISCELLANEOUS:"!!!!!
 5.10 C THIS IS A BIG TEST
 8.10 T "EXPRESSIONS --- AN EVALUATABLE GROUP OF NUMBERS OR VARIABLES:"!
 8.20 T "(2+3*X) OR (22/7)"!!!!
10.10 T "HIGH SPEED PAPER TAPE READER CAN READ IN FOCAL PROGRAMS:"!!
10.20 T "  1) TYPE 	OPEN INPUT PTR:	"!
10.30 T "  2) AFTER 	^	 IS TYPED OUT, HIT SPACE BAR TO READ TAPE"!
10.40 T "  3) AFTER 	
	 IS TYPED OUT, HIT 	CTRL/P	"!!!
10.45 T "THE FOLLOWING 3 LINE PROGRAM WILL ASK FOR 10 NUMBERS FROM THE READER:"!!;W 10.6
10.56 W 10.65
10.57 W 10.7
10.59 G 10.9
10.60 OPEN INPUT PTR:
10.65 FOR X=1,10;ASK A(X)
10.70 OPEN INPUT TTY:,ECHO;COMMENT --- RESTORES TERMINAL TO NORMAL
10.90 T !!!!
12.10 T "INITIAL DIALOGUE --- ASK FOCAL	S INITIAL DIALOGUE FOR 	HELP	 WHICH WILL "!
12.20 T "LIST OPTIONS OTHER THAN STANDARD FEATURES.  		 IS THE SYSTEM STATUS"!
12.30 T "VARIABLE (PROTECTED) AND IS 	SET	 TO THE PRODUCT OF CODES REPRESENTING"!
12.40 T %4.00,"FEATURES CHOSEN IN THE INITIAL DIALOGUE."!!!
12.50 T "FEATURE":45"CODE"!;F I=1,43;T "-"
12.52 T " ----"!
12.55 T "	0	   NO OPTIONAL FEATURES":43,1,!
12.60 T "	1	   FSIN AND FCOS FUNCTIONS":43,2,!"	2	   FSIN, FCOS, FLOG, FEXP AND FATN":43,6,!
12.70 T "	3	   EXTENDED PRECISION (10 DIGITS)":43,5,!"	4	   FILE COMMADS":43,7,!
12.80 T "	5	   LEADING SPACE IN 	TYPE	":43,11,!"	6	   	=	 AUTOMATICALLY PRINTED BY 	TYPE	":43,13,!
12.90 T "	7	   	:	 AUTOMATICALLY PRINTED BY 	ASK	":43,17,!
12.92 T "	8	   	&	 IN POWERS-OF-TEN NOTATION":47,"-1"!
12.94 T "	9	   FEATURES 2,3,4":43,210,!!
12.96 T "	YES	 STANDARD FETURES 2,3,4,5":43,2310,!!!!!
13.10 T "LINE NUMBERS --- MAY RANGE FROM 1.01 THROUGH 31.99 BUT MUST NOT"!
13.20 T "INCLUDE INTEGERS.  VARIABLES NOT STARTING WITH 	A	 MAY BE USED IN PLACE"!
13.30 T "OF LINE NUMBERS (EXAMPLE:  	GOTO X	).  GROUP NUMBERS ARE INTEGERS FROM"!
13.40 T "1 - 31 AND REFERENCE GROUPS OF LINES WITH 	DO	, 	WRITE	 AND 	ERASE	"!
13.50 T "COMMANDS."!!!!
14.10 T "MERGING PROGRAMS --- 	A	 AND 	B	 IS DONE WITH A SERIES OF COMMANDS"!
14.11 T "WHICH CONVERT 	A	 INTO A DATA FILE (PS/8 EDITOR COMPATIBLE) AND"!
14.12 T "THEN BRING IT IN 	ON TOP	 OF PROGRAM 	B	:"!!
14.20 T "  1) LIBRARY CALL A"!
14.25 T "  2) OPEN INPUT TTY:"!
14.30 T "  3) OPEN OUTPUT A":25,"(STEPS 3-5 WILL NOT PRINT OUT)"!
14.40 T "  4) SET B=FOUT(223);W"!
14.50 T "  5) SET B=FOUT(223);OUTPUT CLOSE;OPEN INPUT TTY:,ECHO"!
14.54 T "  6) LIBRARY CALL B"!
14.58 T "  7) OPEN INPUT A"!
14.60 T "  8) [HIT 	CTRL/P	; WAIT FOR 	
01.00	]"!
14.65 T "  9) LIBRARY DELETE A.FD"!!
14.70 T "THE MERGED PROGRAM WILL NOW BE IN YOUR PROGRAM BUFFER."!!!!
15.10 T "PRECISION --- IF YOU CHOOSE TO DELETE EXTENDED PRECISION (10 DIGITS)"!
15.20 T "IN THE INITIAL DIALOGUE, YOU WILL HAVE ROOM FOR 20% MORE VARIABLES"!!!!
16.10 T "PIP --- A PS/8 SYSTEM PROGRAM WHICH CAN LIST YOUR ENTIRE DEVICE DIRECTORY"!
16.20 T "BY TYPING 	R PIP	 TO PS/8 MONITOR THEN 	/L	.  HIT 	CTRL/C	 TO RETURN TO"!
16.30 T "PS/8 MONITOR.  BE SURE TO USE 	/I	 OPTION WHEN TRANSFERRING PROGRAMS."!!!!
17.10 L R MISCL3.RE 18.1