Directory of image this file is from
This file as a plain text file
()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