BBS: Inland Empire Archive
Date: 01-29-93 (16:01)             Number: 378
From: ROB MCKEE                    Refer#: NONE
  To: MATT ROBERTS                  Recvd: NO  
Subj: QuickBASIC                     Conf: (2) Quik_Bas
Hello Matt!
   Matt Roberts wrote in a message to Bobby Miller:
 >   How would the program I write be able to know that
 > the "-F" is there,

 MR> Look up COMMAND$ in your QuickBASIC manual, Bobby.  Keep in
 MR> mind (as several folks were kind enough to point out to me
 MR> here) that COMMAND$ always returns upper case, so you'll
 MR> have to set your routines to look for -F regardless of
 MR> whether or not you type -f from the command line.

 Or from a compiled program to return a True Case Command line...

 ' $include: 'qb.bi'
 DIM r AS RegType
 r.ax = &H5100
 interrupt &H21, r, r
 DEF SEG = r.bx
 Cmd$ = SPACE$(PEEK(&H80))
 FOR t = &H81 TO &H80 + PEEK(&H80)
     d = PEEK(t)
     IF d = 13 THEN
         Cmd$ = LEFT$(Cmd$, t)
         EXIT FOR
     END IF
     MID$(Cmd$, t - &H80, 1) = CHR$(PEEK(t))

 Catcha Later Matt, I'll see you on the flip side - Rob
 Vote Zack_Jones,Quik_Bas Moderator

--- timEd/B6
 * Origin: Flyer_Proof_Computer_Svs,V32B,V42B,XA (1:125/1212.13)
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