Directory of image this file is from
This file as a plain text file
()0YLBTC-PS/8 FOCAL, 1971?MB\BECOMMA3.RE?MB%BJL C FOCAL.TM?MB+BTG 2.1?MB5CFS DU=FOUT(162)?MCYCPT " TO THE"!,:22,"COMMAND FOLLOWING THE DO OR LIBRARY GOSUB )"!?MDBDJT !!" MODIFY 3.72 FOLLOWED BY A RETURN AND THE LETTER X WILL CAUSE"!?MD&DTT "LINE 3.72 TO BE TYPED THROUGH ITS FIRST X . YOU MAY THEN:"!!?MEDD-T " 1) TYPE IN REST OF REVISED LINE AND HIT RETURN "!?ME D2T " 2) USE RUB OUT TO ERASE SINGLE CHARACTERS"!?ME>D4T " 3) HIT LINE FEED TO KEEP REMAINDER OF OLD LINE"!?MF[D6T " 4) HIT CTRL/L TO GO TO NEXT OCCURRENCE OF X "!?MF>D8T " 5) HIT CTRL/BELL TO CHANGE SEARCH CHARACTER; THEN HIT NEW "?MX D:T "CHARACTER"!?MGND?T !!!!?MG FJT "Q":20,"(ABBREVIATION)"!!?MG9FOT "*QUIT":20,"(TERMINATES PROGRAM EXECUTION)"!?MG?FTT !!!!?MHPHJT "R":20,"(ABBREVIATION)"!!?MH.HOT "*RETURN":20,"(ALLOWS ESCAPE FROM A DO LOOP ";D 1.8?MH4H2T !!!!?MIRJJT "SET Y=37",:20,"(CAUSES Y TO TAKE THE VALUE 37) !?MI7JTT "S A=110/P+32",:20,"(CAUSES A TO ASSUME THE VALUE OF 110/P+32)"!?MJZJ^T "S Y=Y+1",:20,"(SETS THE NEW VALUE OF Y = 1 PLUS OLD VALUE)"!?MJ?J T "S Z=;T Z":20,"(PERMITS TYPING VALUE OF PROTECTED VARIABLE )"!?MK J"T "S =0":20,"(ONLY WAY TO ZERO PROTECTED VARIABLE )"!!?MK8J(T "*SET Y=<NUMBER,VARIABLE OR EXPRESSION>"!?MRDJ2T !!!!?MS"LT "T ";D 1.7;T "A";D 1.7;T "!";D 1.7;T "B";D 1.7;T "!";?ML5L<T "T $",:20,"(OUTPUTS THE SYMBOL TABLE)"!?MMZMAT "T %10.09",:20,"(SETS THE OUTPUT FORMAT TO ALLOW UP TO 10 DIGITS"!?MM:MDT :22,"TO BE PRINTED, OF WHICH 9 MAY BE DECIMAL PLACES)"!?MNZMFT "T %",:20,"(FORMATS OUTPUT IN POWERS-OF-TEN NOTATION)"!?MOBMHT "(AN INITIAL DIALOGUE OPTION PROVIDES AUTOMATIC PRINTING OF AN = BY"!?MOQMI "THE TYPE COMMAND)"!!?MO9MKT "*TYPE [NUMBERS, VARIABLES, EXPRESSIONS, TEXT IN QUOTES, !,,:,$ OR %]"!?MVOMNT !!!!?MW$N(T "W",:20,"(SAME)"!?MPTN7T !!!!!!!!?MPZPJG 8+Q?MP&PTL R LIBRAR.RE 1.2?MP2P L R LIBRAR.RE 1.2?MP L R HELP 4.7?MGHD>T "*MODIFY L1"!"C",:20,"( C IS THE PARTICULAR SEARCH CHARACTER CHOSEN)"!?MU,L4T "T ()":20"(OUTPUTS VALUE OF SYSTEM STATUS VARIABLE )"!?MR+LJT "TYPE 3":20"(OUTPUTS A 3 ON THE TELEPRINTER OR OTHER OUTPUT DEVICE)"!?M ALTT "T A":20"(OUTPUTS THE VALUE OF A)"!?MK>L^T "T X/Y-1":20"(OUTPUTS THE VALUE OF THE EXPRESSION X/Y-1)"!?MTKL%D 1.7;T "C";D 1.7;T "!",:20,"(OUTPUTS A , B AND C IN A VERTICAL ROW)"!?MTL-T "T !":20"(OUTPUTS A RETURN/LINE FEED)"!?MQL2T "T ",:20,"(OUTP TS A CARRIAGE RETURN WITHOUT A LINE FEED)"!?ML]L:T "T :8,";D 1.7;T "A";D 1.7;T :20,"(OUTPUTS A IN POSITION 8 ON LINE)"!?MUEL7T "T ";D 1.7;T "ANS: ";D 1.7;T ",26+5":20,"(OUTPUTS ANS: 31 "!?MV3NJT "WRITE 2.27",:20,"(OUTPUTS LINE 2.27 OF THE INDIRECT PRO RAM)"!?MWFNTT "W 2",:20,"(OUTPUTS GROUP 2)"!?MO?N^T "WRITE ALL",:20,"(OUTPUTS ENTIRE INDIRECT PROGRAM)"!?MXAN-T "W X",:20,"(OUTPUTS GROUP OR LINE GIVEN BY X )"!!?MPLN2T "*WRITE [GROUP OR LINE NUMBER] (LISTS PROGRAM)"!?MP;D<T " 6) HIT ";S DU=FOUT(223) T " (BACK ARROW) TO DELETE LINE OVER TO LEFT MARGIN"!!?M5"L S COMMA3.RE;L C DTA3:CATLOG?M?ROW) TO DELETE LINE OVER TO LEFT MARGIN"!!?M5":20,"(OUTPUTS ANS: 3 Note: Lines longer than 256 characters were wrapped