File: MISCL1.RE of Tape: Sources/Focal/fc3
(.FC,.FO Focal format converted to 'WRITE' listing) 

C-PS/8 FOCAL, 1971

01.05 C MISCL1.RE
01.10 L C FOCAL.TM
01.20 I (-FABS(Q-.2))1.25;S K3=0;L G INDEX.RE
01.25 T "***** MISCELLANEOUS"!!!!
01.30 T "WORDS AND PHRASES LISTED UNDER MISCELLANEOUS IN THE INDEX BUT NOT GIVEN"!
01.40 T "IN THE 'BULK' PRINT OUT ARE FOUND UNDER THEIR OWN NAMES.  'FILES', FOR"!
01.50 T "EXAMPLE, IS DESCRIBED UNDER 'FILE COMMANDS'."!!!!
01.60 G 3.1

02.10 D 3.22;D 3.24;D 3.26;D 3.28;T !!!!

03.10 T "***** CHANGES FROM FOCAL,1969:"!!
03.11 T "PROGRAMS WRITTEN IN FOCAL,1969 SHOULD REQUIRE ONLY ONE CHANGE TO"!
03.12 T "RUN UNDER PS/8 FOCAL,1971:"!!
03.13 T :5,"THE INPUT DEVICE IS SWITCHED TO THE HIGH SPEED PAPER TAPE READER"!
03.14 T :5,"WITH THE 'OPEN INPUT PTR:' COMMAND AND SWITCHED BACK TO THE TERMINAL"!
03.15 T :5,"WITH 'OPEN INPUT TTY:,ECHO' INSTEAD OF WITH THE '*' COMMAND OF"!
03.16 T :5,"FOCAL,1969."!!!!"OTHER CHANGES INCLUDE:"!!!
03.18 T " 1) EXTENDED LIBRARY FEATURES WITH DEVICE-INDEPENDENT CHAINING"!
03.20 T :5,"AND SUBROUTINE CALLS BETWEEN PROGRAMS."!!
03.21 T " 2) "
03.22 T :5,"FILE READING AND WRITING COMMANDS, 10 DIGIT PRECISION, AND/OR STANDARD"!
03.24 T :5,"TRIG FUNCTIONS, WHICH MAY BE DELETED BY THE INITIAL DIALOGUE TO ALLOW UP TO"!
03.26 T :5,"222 VARIABLES WITH 5500 CHARACTER PROGRAMS; WITH ALL FEATURES"!
03.28 T :5,"RETAINED, 98 VARIABLES AND 3500 CHARACTERS REMAIN."!!
03.30 T " 3) COMPUTED LINE NUMBERS."!!
03.32 T " 4) TABULATION."!!
03.34 T " 5) IMPROVED DISTRIBUTION AND 'PSEUDO-RANDOM' INITIALIZATION OF 'FRAN()',"!
03.36 T :5,"THE PSEUDO-RANDOM NUMBER FUNCTION."!!
03.38 T " 6) UNLIMITED LINE LENGTHS."!!
03.40 T " 7) CHARACTER MANIPULATIONS HANDLED WITH 'FIN()' AND 'FOUT()'."!!
03.42 T " 8) FSGN(0)=0  [FSGN(0)=1 IN FOCAL,1969]"!!
03.44 T " 9) 'ERASE ALL' AND 'MODIFY' DO NOT ERASE VARIABLES."!!
03.46 T "10) IN ADDITION TO THE FDIS() DISPLAY FUNCTION FOR DEC'S 34D DISPLAY,"!
03.48 T :5"VERSIONS ARE AVAILABLE WITH DISPLAY AND JOYSTICK FUNCTIONS FOR "!
03.50 T :5,"THE TEKTRONIX T-4002 GRAPHIC COMPUTER TERMINAL."!!
03.52 T "11) 3 SPECIAL VARIABLES ARE PROTECTED FROM THE 'ERASE' COMMAND ---"!
03.54 T :5,"'!', '";S DU=FOUT(162);T "',AND '#'.  '#' IS SET TO 1 BY THE INITIAL DIALOGUE"!
03.56 T :5,"IF ALL OPTIONAL FEATURES OF PS/8 FOCAL ARE DELETED, AND TO 2310 IF"!
03.58 T :5,"STANDARD FEATURES ARE RETAINED."!!
03.60 T  "12) PS/8 FOCAL'S STARTING ADDRESS IS 10200 (FIELD 1)."!!!!
03.70 T "  CTRL/P IS THE BREAK CHARACTER"!
03.80 T "  ------ -- --- ----- ---------"!!!
03.90 T "NOTE:  PS/8 FOCAL DATA FILES ARE COMPATIBLE WITH EDIT AND TECO-8;"!
03.92 T :8"HOWEVER, PS/8 FOCAL PROGRAM FILES ARE SAVED AS CORE IMAGES."!!!!!!!!

07.10 G 7+Q
07.20 L R COMMA1.RE 1.2
07.61 L R MISCL2.RE 8.1