Qbasic 1.0??????

 BBS: Inland Empire Archive
Date: 06-09-92 (19:33)             Number: 124
From: MATT HART                    Refer#: NONE
  To: GLENN KINEN                   Recvd: NO  
Subj: Qbasic 1.0??????               Conf: (2) Quik_Bas
 GK> i tried it, and inputted ... 2*2, it said "Redo from start". I entered
 GK> Why can't I input a multiplication problem?
 GK> Is there a command for this?

No, no command, never has been in BASIC or any other
language.  There are routines which will translate formulas
- QuickPak Pro has the "Evaluate" procedure.  You must make
one yourself for QBasic.  Something like:

INPUT "Formula ";A$      '<< Note a string
PRINT "Working..."
' A$ = "2*2"
Num# = 0#
i = 1
DO
     L$=MID$(A$,i,1)
     IF VAL(L$) > 0
          j=i
          DO
               j=j+1
               IF j > LEN(A$) THEN EXIT DO
               IF VAL(MID$(A$,i,1)) = 0 THEN EXIT DO
          LOOP
          L$ = MID$(A$,i,j-i+1)
          Num# = VAL(L$)
     ELSE
          SELECT CASE L$
               CASE "*"  ' times
          END SELECT
     ENDIF
     i = i + 1
LOOP UNTIL i > LEN(A$)

This kind of formula evaluation can get really, really
involved.  But it is what you would have to do...
---
 * Origin: Midnight Micro!  V.32/REL  (918)451-3306 (1:170/600)
Outer Court
Echo Basic Postings

Books at Amazon:

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET