formula solver 1/7

 BBS: Inland Empire Archive
Date: 03-13-93 (22:24)             Number: 334
From: QUINN TYLER JACKSON          Refer#: NONE
  To: ALL                           Recvd: NO  
Subj: formula solver 1/7             Conf: (2) Quik_Bas

________O_/________________________| SNIP |______________________\_O_______
        O \                        | HERE |
     / O 'This file created by PostIt! v4.0.
'>>> Start of page 1.

 '                  QBS and BASIC Code Cache:  YES!
 '
 ' ****************************ANNOUNCING!******************************
 ' **              The Public Domain Module of the Week!              **
 ' *    The parser you always wanted but were afraid to ask for!       *
 ' *                                                                   *
 ' *            ********************************************           *
 ' *            * DESCPARS.BAS v1.0 (Public Domain Version)*           *
 ' *            ********************************************           *
 ' *                                                                   *
 ' *                                                                   *
 ' *     The full featured recursive descent parser written by         *
 ' *                     Quinn Tyler Jackson                           *
 ' *                                                                   *
 ' *     Revolving around the FUNCTION funEvaluate(Expression$)        *
 ' *                                                                   *
 ' *                          FEATURES:                                *
 ' *                                                                   *
 ' *         1. addition, subtraction, multiplation, division          *
 ' *     2. integer division, modulo division, nth root extraction     *
 ' *                     3. factorial expansion                        *
 ' *         3. logical greater than, less than, and equality          *
 ' *             4. nested parenthesis precedence override             *
 ' *  5. PASCAL style variable assignment (using the ":=" of PASCAL)   *
 ' *                        6. and more!                               *
 ' *                                                                   *
 ' ******You compatability freaks:  TESTED IN DOS 5.0's QBASIC!!!*******
 '
 ' DEDICATION:
 '
 ' This program is dedicated to my wife Laleh, and our three children,
 '  Ozra, Shahraam, and Arehzou, who give up a lot of their time with
 '           me so I can program at this infernal keyboard!
 '
 ' USE RESTRICTIONS:
 '
 ' If you have a wife, give her a hug and kiss.  If you have kids, do ' the
 ' same.  Only then do you have the right to use this code.  ;-)
 '                  [and the QUIK_BAS echo said AMEN]
 '
 ' FEATURES EXPLAINED:
 '
 '   1. addition, subtraction, multiplation, division
 '
 '   This FUNCTION can solve equations such as:
 '
 '       5+4
 '       5*89
 '       6/5
 '
 '   2. integer division, modulo division, nth root extraction
 '
 '   This FUNCTION can solve equations using standard extensions:
 '
 '       5%2  (5 MOD 2)
 '       5\2  (integer division)
 '       2]25 (square root of 25)
 '       3]8  (cube root of 8)
 '
 '   3. factorial expansion
 '

'>>> Continued on page 2.

--- Maximus/2 2.01wb
 * Origin: The Nibble's Roost, Richmond BC Canada 604-244-8009 (1:153/918)