home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / FFSPAS.ZIP / READ.ME < prev   
Encoding:
Text File  |  1993-01-04  |  21.5 KB  |  790 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.                           FINAL FRONTIER SOFTWARE
  12.                       FFSPAS PROCEDURES FOR TURBO PASCAL
  13.  
  14.                               524 Rock Avenue
  15.                         Chestertown, New York 12817
  16.                              Tel. 518-494-4097
  17.                               Voice and Data
  18.  
  19.  
  20.  
  21.  
  22.                                   Support
  23.                               for registered
  24.                       Owners of the FFSPAS addons is
  25.                  provided through the FINAL FRONTIER BBS.
  26.  
  27.                             Final Frontier BBS
  28.                               (518) 761-0869
  29.                            1200-2400-9600 N-8-1
  30.                            Queensbury, New York
  31.  
  32.                                 Registered
  33.                                owners of the
  34.                         FFSPAS addons may obtain the
  35.                  latest version of the procedures complete
  36.              with source code through the Final Frontier BBS.
  37.  
  38.                        Recompilation of the units
  39.                require Technojock(tm) Toolkit 5.0-5.02
  40.                                     and
  41.             the TPBCD unit from Turbo Profesional(tm) which
  42.                    must be purchased from the vendor(s).
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 2
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.      These units were developed using the TECHNOJOCK(tm) Toolkit.
  66.      TECHNOJOCK is a trademark of the Technojock Toolkit for Turbo
  67.      Pascal by Technojock Software, Inc.
  68.  
  69.      The calc55 unit was developed with the TECHNOJOCK Toolkit and
  70.      with Turbo Power's Turbo Professional 5.0(tm) TPBCD unit.
  71.  
  72.      This archive is released without explicit or implicit, expressed,
  73.      or implied warranties of any kind, including, without limitation,
  74.      any warranties of fitness for a particular purpose.
  75.  
  76.      The authors shall not be liable for any damage whether
  77.      direct, indirect, special or consequential arising from failure
  78.      of any or all of the enclosed programs to operate in the manner
  79.      desired by the user(s). The authors shall also not be liable for
  80.      any damage to data or property that may be caused directly or
  81.      indirectly by the use of this program.
  82.  
  83.      In no event will the authors be liable to the user(s) for any
  84.      damages, including any lost profits, lost savings or other
  85.      consequential or incidental damages arising out of the use, misuse
  86.      or inability to use the programs, or FOR ANY CLAIM BY ANY OTHER
  87.      PARTY.   By using any or all of the enclosed programs, you
  88.      acknowledge that you have read every part of this document and
  89.      have agreed with each and all provisions of the present disclaimer.
  90.  
  91.                  *YOU USE THESE UNITS SOLELY AT YOUR OWN RISK*
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 3
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.                                Documentation
  124.                                     For
  125.                                FFSPAS Units
  126.  
  127.  
  128.  
  129.                      (C) 1990 Final Frontier Software
  130.                                 Version 1.0
  131.  
  132.  
  133.  
  134.  
  135. FILES ON THIS DISK
  136. ------------------
  137.  
  138.                  COLRCALC.ZIP contains the following files:
  139.  
  140. Turbo Pascal 5.0 and 5.5 TPU's
  141.  
  142. CALC55.TPU        A Turbo Pascal 5.5 Calculator TPU.
  143. CALC50.TPU        A Turbo Pascal 5.0 Calculator TPU.
  144. COLOR55.TPU       A Turbo Pascal 5.5 color TPU.
  145. COLOR50.TPU       A Turbo Pascal 5.0 color TPU.
  146.  
  147. If you are using Turbo Pascal 5.5 use the COLOR55 and/or the CALC55 TPU's.
  148. If you are using Turbo Pascal 5.0 use the COLOR50 and/or the CALC50 TPU's.
  149.  
  150. ┌─────────────────────────  !!!   N O T E   !!!  ────────────────────────────┐
  151. │                                                                            │
  152. │ Turbo Professional's (tm) 5.0 TPBCD.TPU and Technojock's Toolkit is        │
  153. │ required to create programs that use the CALCULATOR TPU.  Because CALC55   │
  154. │ uses the TPBCD unit this unit must be located in your default TPU          │
  155. │ directory inorder to write programs that use the CALC55 unit.  THESE UNITS │
  156. │ MUST BE OBTAINED from TECHNOJOCK and TURBO POWER.                          │
  157. │                                                                            │
  158. │ Both toolkits may be obtained from the appropriate vendor.                 │
  159. │                                                                            │
  160. └─────────────────────────  !!!   N O T E   !!!  ────────────────────────────┘
  161.  
  162. Demonstration Files
  163.  
  164. DEMO.PAS          A demo program to show how to use the color and
  165.                   calculator unit in a full program complete with NESTTTT5
  166.                   menus.
  167. DCALCU.PAS        A pascal program to demonstrate the calculator unit.
  168. DCOLOR.PAS        A pascal program to demonstrate the color unit.
  169.  
  170.  
  171.  
  172. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 4
  173.  
  174.  
  175. Executable Demonstration Files
  176.  
  177. DCALCU.EXE        Compiled version of CALC.PAS.
  178. DCOLOR.EXE        Compiled version of DEMOCOLO.PAS.
  179. DEMO.EXE          Compiled version of DEMO.PAS
  180.  
  181. Documentation Files
  182.  
  183. READ.ME           This documentation file.
  184.  
  185. Technojock (tm) is the trade name of a Turbo Pascal toolkit produced by
  186. Technojock Software, Inc.
  187.  
  188. This product is not produced or supported by Technojock Software, Inc. and
  189. the name Technojock is not associated with the author in any way.  This is
  190. not to "knock" Technojock in any way, it's merely stated to protect me.
  191.  
  192.  
  193.  
  194. The Technojock Toolkit is a wonderful collection of functions and
  195. procedures that rival most on the market.  The Technojock Toolkit is
  196. probably the best toolkit for Pascal bar none.  The toolkit is also one of
  197. the simplest to use and is supported very well.  I encourage all who use
  198. the toolkit to register it.  It is well worth the money.
  199.  
  200. It is hoped that the style of these procedures provide an extra measure
  201. of utility for current users of the Technojock Toolkit by providing a
  202. means to change screen colors and to incorporate the use of a calculator
  203. in the programs you write.  Both procedures augment existing toolkit
  204. functions but DO NOT compete with any of the toolkit functions.
  205.  
  206. At the time of development of these add-on units the current version of
  207. the Technojock Toolkit was 5.02 and Turbo Professional was 5.0.
  208.  
  209. The first release of the toolkit add-ons incorporates two easy to use
  210. turbo pascal 5.0 or 5.5 units called Calc and Color.  Each of the units
  211. brings power and ease of use to programming with Turbo Pascal.
  212.  
  213. Mouse Support
  214. -------------
  215.  
  216. If a mouse is detected, the mouse version of the unit is called whereby
  217. all functions are performed through the mouse. If a mouse is NOT detected,
  218. a keyboard version of the calculator or color procedure is displayed.  All
  219. calculator or color functions are performed through use of the keyboard OR
  220. mouse.  Support of BOTH the keyboard and mouse AT THE SAME time is not
  221. possible in this release of the ADDON units because the Technojock (tm)
  222. GetKey procedure does not provide both keyboard and mouse support at the
  223. same time.
  224.  
  225.  
  226.  
  227. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 5
  228.  
  229.  
  230. Future releases of this software may incorporate support of both the
  231. keyboard and mouse if Technojock's version 6.0 release GetKey procedure
  232. supports this function with a free floating mouse cursor.
  233.  
  234.  
  235.  
  236.  
  237.                                =============
  238.                                 FFSPAS Unit
  239.                                =============
  240.                                  - COLOR -
  241.  
  242.  
  243.  
  244.   INTRODUCTION
  245.   ------------
  246.  
  247.   This TURBO PASCAL UNIT contains one procedure to display a mouse or
  248.   keyboard driven display to select foreground and background screen
  249.   colors. Selected colors are returned in the following variables:
  250.  
  251.   forecolor : integer  - foreground color
  252.   backcolor : integer  - background color
  253.  
  254.   The unit also returns the following:
  255.  
  256.   forecolorsel : string - foreground color in English as a string
  257.   backcolorsel : string - background color in English as a string
  258.  
  259.   The color unit automatically detects the presence of a color screen or
  260.   a mouse, adjusts itself accordingly and functions well with either
  261.   the mouse or keyboard.
  262.  
  263.   KeyBoard Movement:
  264.  
  265.   Use left arrow, right arrow, home, end, pgup and pgdn keys to move
  266.   cursor box.  Use tab or shift tab to jump from a foreground to a background
  267.   window.   Press enter in foreground or background window to select default
  268.   color.
  269.  
  270.   Mouse Movement:
  271.  
  272.   Use mouse to move mouse cursor.  Press left button to select default
  273.   color.  To Exit place mouse cursor on exit button and press left button.
  274.  
  275.   The color procedure provides:  mouse support
  276.                                  automatic mouse detection
  277.                                  automatic color screen detection
  278.  
  279.   PROCEDURE SUMMARY
  280.   -----------------
  281.  
  282.   Color(ForeColorSel, BackColorSel, ForeColor, BackColor);
  283.  
  284.  
  285. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 6
  286.  
  287.  
  288.   EXAMPLES
  289.   --------
  290.  
  291.   PROGRAM test_color;
  292.  
  293.   USES crt, fastttt5, strnttt5, keyttt5, winttt5,
  294.        miscttt5, color, nestttt5, calc;
  295.  
  296.   VAR
  297.   ch  : CHAR;
  298.  
  299.   BEGIN
  300.      IF numon THEN Set_Num(FALSE);
  301.      Offcursor;
  302.      CLRSCR;
  303.      Color(ForeColorSel, BackColorSel, ForeColor, BackColor); GOTOXY(1, 5);
  304.      Mkwin(10, 2, 70, 12, forecolor, backcolor, 1); Writebetween(11, 69, 2,
  305.      forecolor, backcolor, ' NESTTTT5 Color Attributes '); Writeat(12, 3,
  306.      forecolor, backcolor, ' The foreground attribute is: ' + '(' +
  307.      int_to_str(forecolor) + ')');
  308.      Writeat(12, 4, forecolor, backcolor, ' The background attribute is: '
  309.      + '(' + int_to_str(backcolor) + ')');
  310.      Writeat(12, 5, nttt.boxfcol, backcolor, ' The Border foreground attribute
  311.      is: ' + '(' + int_to_str(nttt.boxfcol) + ')');
  312.      Writeat(12, 6, forecolor, nttt.boxbcol, ' The Border background
  313.      attribute is: ' + '(' + int_to_str(nttt.boxbcol) + ')');
  314.      Writeat(12, 7, nttt.capfcol, backcolor, ' First Capital letter
  315.      foreground attribute is: ' + '(' + int_to_str(nttt.capfcol) + ')');
  316.      Writeat(12, 8, nttt.norfcol, backcolor, ' Normal menu topics
  317.      foreground attribute is: ' + '(' + int_to_str(nttt.norfcol) + ')');
  318.      Writeat(12, 9, nttt.lofcol, backcolor, ' Non-selected menu topic
  319.      foreground attribute is: ' + '(' + int_to_str(nttt.lofcol) + ')');
  320.      Writeat(12, 10, nttt.hifcol, backcolor, ' Selected menu topic
  321.      foreground attribute is: ' + '(' + int_to_str(nttt.hifcol) + ')');
  322.      Writeat(12, 11, forecolor, nttt.hibcol, ' Selected menu topic
  323.      background attribute is: ' + '(' + int_to_str(nttt.hibcol) + ')');
  324.      IF moused THEN writeAT(20, 25, white, black, 'Press a key, a
  325.      mousekey, or move the mouse');
  326.      IF NOT moused THEN writeAT(34, 25, white, black, 'Press a key ...');
  327.      DELAY(500);
  328.      ch := getkey;
  329.      IF windowcounter > 0 THEN FOR i = 1 to windowcounter DO rmwin;
  330.      Reset_Startup_Mode;
  331.      GOTOXY(1, 2);
  332.      Clearline(1, white, blue);
  333.      WriteCenter(1, white, blue, '(C) Copyright 1990 Final Frontier Software');
  334.      Beep;
  335.      END.
  336.  
  337.  
  338.  
  339.  
  340.  
  341.  
  342.  
  343. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 7
  344.  
  345.  
  346.  =========================================================================
  347.   PROCEDURE COLOR
  348.  -------------------------------------------------------------------------
  349.  
  350.   Purpose:  Displays a screen to select foreground and background color
  351.             attributes for the main program.
  352.  
  353.   Declaration:  Color(ForeColorSel, BackColorSel: string; ForeColor,
  354.                       BackColor: integer);
  355.  
  356.   Returns: Integer and String
  357.  
  358.            An integer containing a CRT compatible value for the
  359.            foreground color attribute (ie: 15) is returned in ForeColor;
  360.  
  361.            An integer containing a CRT compatible value for the
  362.            background color attribute (ie: 4) is returned in BackColor;
  363.  
  364.            A string containing a value for the foreground color
  365.            attribute (ie: white) is returned in ForeColorSel.
  366.            A string containing a value for the background color
  367.            attribute (ie: red) is returned in BackColorSel.
  368.  
  369.   Remarks: None
  370.  
  371.   Example #1:
  372.  
  373.   BEGIN
  374.     Color(ForeColorSel, BackColorSel, ForeColor, BackColor);
  375.     TEXTCOLOR(forecolor);
  376.     TEXTBACKGROUND(backcolor);
  377.     CLRSCR;
  378.     Writeln('The new foreground color is', forecolorsel,'(',forecolor,')';
  379.     Writeln('The new background color is', backcolorsel,'(',backcolor,')'
  380.   END;
  381.  
  382.  
  383. Example #2:
  384.  
  385. {$F+}
  386. PROCEDURE Action(var code : integer; var finish : byte);
  387. {THIS PROCEDURE CHECKS FOR MENU SELECTIONS USING NESTTT5;
  388.    BEGIN
  389.       CASE code OF
  390.       ...
  391.       ...
  392.       801 : BEGIN   {Screen Colors}
  393.                finish := dontclear;
  394.                Color(ForeColorSel, BackColorSel,ForeColor, BackColor );
  395.                foreground := forecolor;
  396.                background := backcolor;
  397.                TEXTCOLOR(foreground);
  398.                TEXTBACKGROUND(backcolor);
  399.  
  400.  
  401. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 8
  402.  
  403.  
  404.  
  405.                finish := dontclear;
  406.                Show_Nest(mainmenu);
  407.  
  408.  
  409.             END;
  410.       ...
  411.       ...
  412.       END; {case}
  413.    END; {procedure}
  414. {$F-}
  415.  
  416. Additional examples of program code demonstrating use of the color unit are
  417. provided in the demonstration programs Color and Demo.
  418.  
  419.                                =============
  420.                                 FFSPAS Unit
  421.                                =============
  422.                                  - CALC -
  423.  
  424.  
  425.   The CALC unit contains one procedure to display a mouse or keyboard
  426.   driven calculator with one call.
  427.  
  428.  
  429.   The calculator supports : addition
  430.                             subtraction
  431.                             multiplication
  432.                             division with divide by zero trap
  433.                             square root
  434.                             one memory function
  435.                             cut and paste from display tape
  436.                             mouse support
  437.                             help screens
  438.                             user established default colors
  439.                             automatic mouse detection
  440.                             automatic color screen detection
  441.  
  442. The calculator unit automatically detects the presence of a color screen
  443. or a mouse, adjusts itself accordingly and functions well with either a
  444. mouse or keyboard.
  445.  
  446. CHANGING THE DEFAULT CALC VARIABLES
  447. ---------------------------------------
  448.  
  449. The interface section if the CALC unit includes a variable CTTT of Type
  450. ColorDisplay.  The elements of the CTTT records have established defaults
  451. and do not require modification.  The programmer can change the default
  452. elements as follows:
  453.  
  454.  
  455.  
  456. (C) Copyright 1990  Final Frontier Software  All Rights Res.         Page 9
  457.  
  458.  
  459.   CTTT is defined as follows:
  460.  
  461.   Fore       := black;  Calculator foreground attribute
  462.   Back       := cyan;   Calculator background attribute
  463.   statusfore := white;  Status line and mouse buttons foreground attr
  464.   statusback := blue;   Status line and mouse buttons background attr
  465.   tapefore   := white;  Calculator tape foreground attribute
  466.   tapeback   := black;  Calculator tape background attribute
  467.   highlight  := red;    Calculator selection key Foreground attribute
  468.   Points     := 2;      Number of decimal points - default = 2
  469.   delaytime  := 100;    User adjustable variable for sensitivity of
  470.                         Mouse buttons.
  471.  
  472. Examples of how to change global defaults of the calculator unit is
  473. provided in the demonstration programs.
  474.  
  475.   PROCEDURE SUMMARY   - Calculator;
  476.   -----------------
  477.  
  478.   SIMPLE EXAMPLE
  479.   --------------
  480.  
  481.         PROGRAM TestIt;
  482.  
  483.           Uses CALC;
  484.  
  485.           BEGIN
  486.                 Calculator
  487.           END.
  488.  
  489.  
  490.   =========================================================================
  491.   PROCEDURE CALCULATOR
  492.   -------------------------------------------------------------------------
  493.  
  494.   Purpose:  Displays a calculator on the screen.
  495.  
  496.   Declaration:  Calculator
  497.  
  498.   Returns: None
  499.  
  500.   Remarks: None
  501.  
  502.   NestTT5 Example:
  503.  
  504. {$F+}
  505. PROCEDURE Action(var code : integer; var finish : byte);
  506. {THIS PROCEDURE CHECKS FOR MENU SELECTIONS USING NESTTT5;
  507.    BEGIN
  508.       CASE code OF
  509.       ...
  510.       ...
  511.  
  512.  
  513.  
  514. (C) Copyright 1990  Final Frontier Software  All Rights Res.        Page 10
  515.  
  516.  
  517.       1500: begin {Calculator}
  518.                If moused then CTTT.delaytime := 100;   ──┐
  519.                If not moused then CTTT.delaytime := 0; ──┘ Necessary to
  520.  
  521.  
  522.                CTTT.points := 2;                           slow down mouse
  523.                Calculator;  {calls calculator}             sensitivity.
  524.                Assign_Idle_Hook(Dummy);
  525.                finish := refreshmenu;
  526.             END;
  527.       ...
  528.       ...
  529.    END; {case}
  530. END; {procedure}
  531. {$F-}
  532.  
  533. DISTRIBUTION
  534. ------------
  535.  
  536. Please feel free to copy and distribute this software providing
  537. the following conditions are met:
  538.  
  539. 1 - This documentation MUST be included with the files in
  540.     library/compressed (.ZIP) format.  This means that the files have been
  541.     combined into one file.
  542.  
  543. 2 - No fee or consideration may be charged, however a distribution cost
  544.     may be charged for the cost of diskettes and shipping and handling.
  545.     Fee not to exceed $5.00.
  546.  
  547. 3 - The files may NOT be distributed in modified form.
  548.  
  549. 4 - This product may not be combined or "bundled" with any other product
  550.     or service.
  551.  
  552. 5 - This product may not be rented leased to others or used in commercial
  553.     or shareware programs unless registered.
  554.  
  555.  
  556. These TPU's are released as shareware.  If you use it and like it, please
  557. support the author's development and improvement of the FFSPAS Units by
  558. sending a check or money order for $5.00 for each unit.  Registered users of
  559. the units will receive the source code plus free phone support.
  560. Upgrades will be available FREE to registered owners from The Final Frontier
  561. BBS (1200-2400-9600 HST), Glens Falls, New York (518) 761-0869.
  562.  
  563. If anyone has developed their own add-on units that are compatible with the
  564. TECHNOJOCK Toolkit(tm) and would like to swap procedures or have them
  565. added to the FFSPAS units, please drop me a letter.
  566.  
  567.  
  568. (C) Copyright 1990  Final Frontier Software  All Rights Res.        Page 11
  569.  
  570. Acknowledgements:
  571. -----------------
  572.  
  573. The author wishes to thank Brian Dunworth of the Final Frontier BBS in
  574. Glens Falls, New York (518) 761-0869 for his diligence in reporting bugs
  575. during the alpha and beta stages of software testing. Brian is co-owner of
  576. these procedures.  REGISTERED users of the units may obtain the latest
  577. version and/or source code of the procedures from Brian's board.  Settings
  578. for the Final Frontier BBS are 1200-2400-9600 baud, N-8-1.
  579.  
  580. We also wish to thank George Butts of the BufferBoard BBS in Oregon (503)
  581. 747-7636 for his review of the code and constructive criticism and
  582. recommended code improvements.
  583.  
  584. Compiling Notes:
  585.  
  586. COLOR55.PAS requires the Technojock(tm) Toolkit to re-compile the source
  587. code.  CALC55.PAS requires the Technojock(tm) Toolkit and Turbo
  588. Professional 5.0 BCD unit and Technojock's Toolkit to re-compile
  589. the source code.
  590.  
  591. William W. Miller, Jr.
  592. February 01, 1990
  593. Version 1.0
  594.  
  595.                           FINAL FRONTIER SOFTWARE
  596.                             TURBO PASCAL UNITS
  597.                             REGISTRATION FORM
  598.                                VERSION 1.0
  599.  
  600.  
  601.         Name:    ________________________________   Please return this
  602.                                                     form along with a
  603.         Address: ________________________________   check or money order
  604.                                                     to:
  605.         City:    ________________________________
  606.                                                     William W. Miller, Jr.
  607.                                                     524 Rock Avenue
  608.         State:   ________________________________   Chestertown, New York
  609.                                                                    12817
  610.         ZipCode: ________________________________
  611.  
  612.  
  613.          I enclose a check or money order to register my copy of my
  614.          addon units for Turbo Pascal.
  615.  
  616.          I would like to register:
  617.  
  618.              COLOR  @ $5.00        ___________         5.25" DISK _____
  619.  
  620.  
  621.  
  622.              CALC   @ $5.00        ___________         3.5"  DISK _____
  623.  
  624.          Both units @ $7.50        ___________
  625.  
  626.          Comments: ____________________________________________________
  627.  
  628.          ______________________________________________________________
  629.  
  630.          ______________________________________________________________
  631.  
  632.          ______________________________________________________________
  633.  
  634.          Bug or Problem Report: _______________________________________
  635.  
  636.          ______________________________________________________________
  637.  
  638.          ______________________________________________________________
  639.  
  640.  
  641.          Suggested procedures for another FFSPAS unit: ________________
  642.  
  643.          ______________________________________________________________
  644.  
  645.          ______________________________________________________________
  646.  
  647.          ______________________________________________________________
  648.  
  649.  
  650.  
  651.  
  652.  
  653.  
  654.  
  655.  
  656.  
  657.  
  658.  
  659.  
  660.  
  661.  
  662.  
  663.  
  664.  
  665.  
  666.  
  667.  
  668.  
  669.  
  670.  
  671.  
  672.  
  673.  
  674.  
  675.  
  676.  
  677.  
  678.  
  679.  
  680.  
  681.  
  682.  
  683.  
  684.  
  685.  
  686.  
  687.  
  688.  
  689.  
  690.  
  691.  
  692.  
  693.  
  694.  
  695.  
  696.  
  697.  
  698.  
  699.  
  700.  
  701.  
  702.  
  703.  
  704.  
  705.  
  706.  
  707.  
  708.  
  709.  
  710.  
  711.  
  712.  
  713.  
  714.  
  715.  
  716.  
  717.  
  718.  
  719.  
  720.  
  721.  
  722.  
  723.  
  724.  
  725.  
  726.  
  727.  
  728.  
  729.  
  730.  
  731.  
  732. (C) Copyright 1990  Final Frontier Software  All Rights Res.        Page 14
  733.  
  734.  
  735.  
  736.  
  737.  
  738.  
  739.  
  740.  
  741.  
  742.  
  743.  
  744.  
  745.  
  746.  
  747.  
  748.  
  749.  
  750.  
  751.  
  752.  
  753.  
  754.  
  755.  
  756.  
  757.  
  758.  
  759.  
  760.  
  761.  
  762.  
  763.  
  764.  
  765.  
  766.  
  767.  
  768.  
  769.  
  770.  
  771.  
  772.  
  773.  
  774.  
  775.  
  776.  
  777.  
  778.  
  779.  
  780.  
  781.  
  782.  
  783.  
  784.  
  785.  
  786.  
  787.  
  788.  
  789.  
  790.