()0Y?BTC-PS/8 FOCAL, 1971?MB]BEC MISCL3.RE?MB&BJL C FOCAL.TM?MCN$JT "PROGRAM NAMES --- UP TO SIX ALPHABETIC OR NUMERIC CHARACTERS.  FOCAL"!?MSG$TT "ASSUMES AN .FC OR .FD EXTENSION (PROGRAM OR DATA)."!!!!?MDU$(T "PROGRAMS MAY BE ABOUT 3500 CHARACTERS LONG 
-- 7 BLOCKS.  IF FILES"!?MD;$<T "ARE DELETED IN THE INITIAL DIALOGUE, 5500 CHARACTER PROGRAMS ARE"!?MEG%FT "POSSIBLE."!!!!?ME-(JT "PUSHDOWN LIST OVERFLOW --- WHEN TOO MANY 	DO	 OR 	LIBRARY GOSUB	"!?MFQ(TT "COMMANDS HAVE BEEN GIVEN WITHOUT A 	RETURN	, FOCA
	S PUSHDOWN"!?MF7(^T "LIST BECOMES FILLED.  REMEDY:  REDUCE NUMBER OF BLOCKS IN PROGRAM"!?MGB((T "LENGTH."!!!!?MS/,JT "STRINGS --- ARE ANY SERIES OF CHARACTERS SUCH AS:"!!?MHB,[T !"122.5"!"$99.95"!"NOW IS THE TIME FOR ALL GOOD MEN ...."!?MHK,\T "TEST34"!!
MH/,^T "THE ABOVE STRINGS WERE PRINTED OUT [	122.5	 IS ALSO A NUMBER]"!?MIS,T "BY SURROUNDING THEM WITH QUOTATION MARKS IN A TYPE STATEMENT"!?MI&,(T "AS IN LINE 22.25:"!!;W 22.25?MJK,2T !!"STRINGS MAY ALSO BE PRINTED OUT CHARACTER BY CHARACTER USING"!?MJ0
7T "THE 	FOUT()	 FUNCTION; INPUT OF STRINGS MAY BE HANDLED WITH THE"!?MS9,<T "	FIN()	 FUNCTION ---- HELP CAN REVIEW 	FIN	, 	FOUT	, AND 	QUOTATION"!?MK=-FT "THE ASK COMMAND MAY BE USED TO INPUT SHORT STRINGS FOR COMPARISON"!?ML(-HT "PURPOSES.  OBSERVE THE 
OLLOWING SUBROUTINE FIRST WRITTEN THEN EXECUTED:"!!!?ML7-JF X=22.78,.02,22.88;W X?MM-LT !!!;G 22.9?MMS-NCOMMENT: 	YES OR NO	 SUBROUTINE?MM%-PASK "ANSWER YES OR NO 
  ",AN?MM4-RIF (AN-0YES)22.84,22.86?MND-TIF (AN-0NO)22.8,22.88,22.8?MNN-VSET X=2;RETURN?MNX-XSET X=1;RETURN?MN"-ZT "*GO 22.8"!?MN1-[T "ANSWER YES OR NO 
  "?MOK-\T "YEP"!;D 22.91;T "NOPE"!;D 22.91;T "YES"!!!?MO1-]T "PROGRAM CONTROL WOULD THEN RETURN TO COMMAND FOLLOWING SUBROUTINE"!?MT!-^T "CALL (	DO	 OR 	LIBRARY GOSUB	) WITH X EQUAL 2."!!!!!?MP::JT "VARIABLES --- MAY BE ONE OR TWO CHARACTERS SUCH AS: A, 
, Z7, P2, PI, AB"!?MQ":OT "IF 	ABCDEFG	 WERE USED AS A VARIABLE, ONLY 	AB	 WOULD BE SIGNIFICANT."!?MR:TT "VARIABLES MAY NOT START WITH AN 	F	 OR A DIGIT."!!?MV9:VT "99 VARIABLES ARE AVAILABLE IF ALL FEATURES OF PS/8 FOCAL ARE RETAINED."!?MR1:^T "	!	, 	"?M
5:S DU=FOUT(162)?M<JL R HERROR.RE 1.2?MC.$^T "PROGRAM SIZE --- WITH STANDARD FEATURES OF PS/8 FOCAL,1971 RETAINED,"!?MG!,YTYPE "HELLO"!?MKW-AT "MARKS	 FOR YOU.  ALSO SEE THE FOCAL PROGRAM IN THE INITIAL DIALOGUE."!!?MUK.JT "SUBSCRIPTING --- VARIABLES MAY 
AVE UNIQUE SUBSCRIPTS FROM -2048 THROUGH"!?MU4.TT "2047 ALTHOUGH THE TOTAL NUMBER OF VARIABLES IS LIMITED BY CHOICES MADE"!?MV\.^T "IN THE INITIAL DIALOGUE.  NOTE THAT THE SYMBOL TABLE WILL ACCURATELY"!?MPP.(T "OUTPUT ONLY THE SUBSCRIPTS BETWEEN 0 AND 99.
!!!!?MW!:XT "UP TO 222 REGULAR VARIBLES CAN BE MADE AVAILABLE BY DELETING FEATURES"!?MR):ZT "THROUGH THE INITIAL DIALOGUE"!!?MYW:(T "	, AND 		 ARE PROTECTED VARIABLES AND CANNOT BE 	TYPED	, 	ASKED	"!?MYD:<T "VARIABLES.  		, THE SYSTEM STATUS VARIABLE, IS 
SET	 TO SPECIAL CODES"!?MR;;FT "BY THE INITIAL DIALOGUE."!!!!?MX[:2T "OR 	ERASED	 DIRECTLY, BUT MAY BE 	SET	 AND OTHERWISE USED AS REGULAR"!?M:2

Note: Lines longer than 256 characters were wrapped