Added Turbo Pascal reimplementation of Ladder

LadderTP/TP/READ.ME

@@ -0,0 +1,181 @@
+
+                  Welcome to TURBO PASCAL Version 3.0!
+                  ------------------------------------
+
+    In  spite  of all efforts,  some errors have found their way into
+    the new TURBO 3.0 manual.    This file contains all the necessary
+    corrections and additions, and we apologize for any inconvenience
+    this may cause you.
+
+    Please make a working  copy of your TURBO disk and store the ori-
+    ginal in a safe  place.  For help  making a backup  copy,  please
+    refer to appendix M of the TURBO PASCAL Reference Manual.
+
+    NOTE<54><45> You<6F><75> TURBϠ PASCA<43> dis<69> ha<68> bee<65> pre-installe<6C><65> fo<66><6F> you<6F> <20>
+<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Microbe<EFBFBD> dis<69> system<65> pa<70> n<> attentio<69> t<> th<74> manua<75> wit<69> regard<72> <20>
+<EFBFBD><EFBFBD><EFBFBD><EFBFBD>to installing TURBO PASCAL.
+
+
+              *******************************************
+              *                                         *
+              *   Need help  with TURBO?  Please  see   *
+              *   Appendix N in your Reference Manual   *
+              *   for answers to common questions.      *
+              *                                         *
+              *******************************************
+
+
+                         -------------------
+
+
+       Contents of the READ.ME File
+       ----------------------------
+    1. CORRECTIONS to the 3.0 Reference Manual        [ All versions ]
+    2. OMMISSIONS from the 3.0 Reference Manual       [ All versions ]
+    3. New FEATURES                                   [ CP/M-80      ]
+    4. ADDITIONAL FILE LIST                           [ CP/M-80      ]
+
+
+                         -------------------
+
+
+                             CORRECTIONS
+                             -----------
+
+
+Page 253 - MOV AL,[BP-1]
+------------------------
+     The correct statement is:  MOV AL,[BP+4]
+
+
+Page 293 - TURBO-BCD will compile and run any program
+-----------------------------------------------------
+     Well - almost. The Real functions Sin, Cos, ArcTan, Ln, Exp,
+     and Sqrt and the pre-declared constant Pi are not  available
+     in  TURBOBCD.
+<EFBFBD>
+
+                         -------------------
+
+
+                              OMISSIONS
+                              ---------
+
+
+User Written Error Handlers
+---------------------------
+     In  Turbo Pascal 3.0 you may write your own error  handler,
+     which  is  called in case of an I/O or Run-time  error.  The
+     procedure must have the following header:
+
+          procedure Error(ErrNo, ErrAddr: Integer);
+
+     The  name of the  procedure  and its  parameters  are  unim-
+     portant,  as  long   as  it  is a procedure with  two  value
+     parameters  of  type Integer.
+
+     The value passed in ErrNo is the error type and number.  The
+     most significant byte,  i.e. "Hi(ErrNo)", contains the error
+     type,  and  the least significant byte,   i.e.  "Lo(ErrNo)",
+     contains the error number (see Appendix F or G in the  Turbo
+     Pascal Manual).
+
+     The following error types are defined:
+
+          0   User Break (Ctrl-C).
+          1   I/O error.
+          2   Run-time error.
+
+     In  case  of  a user interrupt (Ctrl-C),   the low  byte  of
+     "ErrNo" is always 1.  "ErrAddr" contains the address (offset
+     in Code Segment for 16 bit versions) of the error.
+
+     To  activate the error handler,   assign its offset  address
+     to  the standard variable "ErrorPtr", i.e.
+
+          ErrorPtr:=Ofs(Error);  { 16 bit }  or
+          ErrorPtr:=Addr(Error); {  8 bit }
+
+     There are no limits to what an error handler may  do.  Typi-
+     cally  it will close all open files,   output an error  mes-
+     sage, and call the Halt  standard procedure to terminate the
+     program.   If  an  error handler returns,   i.e.  if it does
+     not  call  Halt,   or  if an error occurs  within  an  error
+     handler,   Turbo Pascal will itself output the error message
+     and terminate the program.
+
+
+
+
+                         -------------------
+<EFBFBD>
+
+                NEW FEATURES OF CP/M-80 IMPLEMENTATION OF
+                                TURBO 3.0
+                             - AN OVERVIEW -
+                -----------------------------------------
+
+Inline
+------
+     A constant identifier used in an INLINE statement does  not
+     always generate two bytes of code.
+
+Files
+-----
+     New FIB formats.
+     Optional 4th parameter on Blockread/Write returns number of
+       blocks actually read.
+     SeekEoln function.
+     SeekEof function.
+
+
+Misc.
+-----
+     Exit procedure       -  To exit the current block
+     OvrDrive procedure   -  To specify the drive on which to find overlays
+     ParamCount function  -  Gives number of characters in the command buffer
+     ParamStr function    -  Gives the string of characters in the command line
+
+Overlays
+--------
+
+     Overlay  files  are  opened and closed every time  they  are
+     accessed.  Therefore,  there is never a need to specifically
+     close  an  overlay file.
+
+     The  Y compiler directive is no longer  supported.  Instead,
+     the   OvrPath (MS-DOS) or OvrDrive (CP/M)  standard   proce-
+     dures   may  be  used to specify the drive and  subdirectory
+     in which overlay files reside.
+
+     Please note that run-time error F0 indicates that your over-
+     lay file is missing or is called recursively.    (This error
+     number is omitted from the Reference  Manual but is included
+     elsewhere in this file.)
+
+
+                         -------------------
+
+                       TURBO PASCAL Version 3.0
+                              CP/M-80
+                        Additional File List
+
+     In addition to the list  of files  mentioned in  Chapter 1 of
+     your TURBO Reference Manual, the following files are included
+     on your TURBO disk:
+<EFBFBD>
+     Sample programs
+     ---------------
+     LISTER   PAS    - simple program to list your Pascal source
+     CMDLIN   PAS    - get parameters from the command line
+
+     MC       PAS    - sample spreadsheet program - MAIN MODULE
+     MC-MOD00 INC    - sample spreadsheet program - INCLUDE MODULE 00
+     MC-MOD01 INC    - sample spreadsheet program - INCLUDE MODULE 01
+     MC-MOD02 INC    - sample spreadsheet program - INCLUDE MODULE 02
+     MC-MOD03 INC    - sample spreadsheet program - INCLUDE MODULE 03
+     MC-MOD04 INC    - sample spreadsheet program - INCLUDE MODULE 04
+     MC-MOD05 INC    - sample spreadsheet program - INCLUDE MODULE 05
+     MC       HLP    - spreadsheet help file
+     MCDEMO   MCS    - spreadsheet data file (not for use with TURBO-87)
+

LadderTP/TP/TINST.MSG

@@ -0,0 +1,123 @@
+1                  TURBO Pascal installation menu.
+2           Choose installation item from the following:
+3 
+4 [S]creen installation   |   [C]ommand installation   |   [Q]uit
+5 
+6                        Enter S, C, or Q:
+10 Duplicate definition. Error occurred between question
+11 Commands starting with the same letter must have the same length.
+   Error occurred between question
+12 The total maximum length of commands are execeeded
+13  ->
+
+
+14 CURSOR MOVEMENTS:
+
+20  Character left               
+21    Alternative                
+22  Character right              
+23  Word left                    
+24  Word right                   
+25  Line up                      
+26  Line down                    
+27  Scroll down                  
+28  Scroll up                    
+29  Page up                      
+30  Page down                    
+31  To left on line              
+32  To right on line             
+33  To top of page               
+34  To bottom of page            
+35  To top of file               
+36  To end of file               
+37  To begining of block         
+38  To end of block              
+39  To last cursor position      
+
+
+15 INSERT & DELETE:
+
+40  Insert mode on/off           
+41  Insert line                  
+42  Delete line                  
+43  Delete to end of line        
+44  Delete right word            
+45  Delete character under cursor
+46  Delete left character        
+47    Alternative                
+
+
+16 BLOCK COMMANDS:
+
+48  Mark block begin             
+49  Mark block end               
+50  Mark single word             
+51  Hide/display block           
+52  Copy block                   
+53  Move block                   
+54  Delete block                 
+55  Read block from disk         
+56  Write block to disk          
+
+
+17 MISC. EDITING COMMANDS:  
+
+57  End edit                     
+58  Tab                          
+59  Auto tab on/off              
+60  Restore line                 
+61  Find                         
+62  Find & replace               
+63  Repeat last find             
+64  Control character prefix     
+
+101 Nothing
+ ^Q: Quit, ^R: Last page, ^C: Next page, <RETURN>: Select terminal:
+ Wait Sorting Definitions
+ Change to:
+ (Y/N)? 
+ y
+ n
+ Text file name:
+ Command:
+ Numeric entry expected
+ Legal range is 
+ , please re-enter: 
+ Choose one of the following terminals:
+ None of the above   ( Max. 20 Characters )
+ Delete a definition ( Max. 20 Characters )
+ Which terminal? (Enter no. or ^Q to exit): 
+ Delete terminal? (Enter no. or ^Q to exit):
+ Do you want to modify this definition before installation? 
+ Terminal type:
+ Send an initialization string to the terminal?
+ Initializaion defined as a command string? (No = a file)
+ Send a reset string to the terminal
+ Reset defined as a command? (No = a file)
+ CURSOR LEAD-IN command: 
+ CURSOR POSITIONING COMMAND to send between line and column:   
+ CURSOR POSITIONING COMMAND to send after both line and column:
+ Column first
+ OFFSET to add to LINE:  
+ OFFSET to add to COLUMN:
+ Binary address
+ Number of ASCII digits (2 or 3): 
+ CLEAR SCREEN command: 
+ Does CLEAR SCREEN also HOME cursor
+ HOME command: 
+ DELETE LINE command: 
+ INSERT LINE command: 
+ ERASE TO END OF LINE command:
+ START HIGHLIGHTING command:  
+ END HIGHLIGHTING command:    
+ Number of rows (lines) on your screen: 
+ Number of columns on your screen:      
+ Delay after CURSOR ADDRESS (0-255 ms):                     
+ Delay after CLEAR, DELETE and INSERT (0-255 ms):           
+ Delay after ERASE TO END OF LINE and HIGHLIGHT (0-255 ms): 
+ Is this definition correct?
+                     Hardware dependent information
+ Operating frequency of your microprocessor in MHz (for delays):
+pendent information
+ Operating frequency of your microprocessor in MHz (for delays):
+

LadderTP/TP/TURBO.MSG

@@ -0,0 +1,101 @@
+
 are not allowed
+ can not be
+ constant
+ does not
+ expression
+ identifier
+ file
+ here
+Integer
+File
+Illegal
+ or
+Undefined
+ match
+ real
+String
+Textfile
+ out of range
+ variable
+ overflow
+ expected
+ type
+Invalid
+ pointer
+01';'
+02':'
+03','
+04'('
+05')'
+06'='
+07':='
+08'['
+09']'
+10'.'
+11'..'
+12BEGIN
+13DO
+14END
+15OF
+17THEN
+18TO DOWNTO
+20Boolean
+21
+22
+23
+24
+25
+26
+27
+28Pointer
+29Record
+30Simple
+31Simple
+32
+33
+34
+35
+36Type
+37Untyped
+40 label
+41Unknown syntax error
+42 in preceding definitions
+43Duplicate label
+44Type mismatch
+45
+46 and CASE selector
+47Operand(s) operator
+48 result
+49  length
+50 length
+51 subrange base
+52Lower bound > upper bound
+53Reserved word
+54 assignment
+55 exceeds line
+56Error in integer
+57Error in
+58 character in
+60s

+61s ands

+62Structureds

+63s

+64s and untypeds

+65Untypeds

+66I/O

+67s must be parameters
+68 componentss
+69dering of fields
+70Set base
+71 GOTO
+72Label not within current block
+73 FORWARD procedure(s)
+74INLINE error
+75 use of ABSOLUTE
+90 not found
+91Unexpected end of source
+97Too many nested WITH's
+98Memory
+99Compilerd WITH's
+98Memory
+99Compiler