QBasic

QBasic
Appeared in 1991 - 2000
Developer Microsoft Corporation
Influenced by QuickBASIC, GW-BASIC
Influenced QB64
OS MS-DOS, Windows 95, Windows 98, Windows Me, PC-DOS, OS/2, eComStation
License MS-EULA
Website www.microsoft.com

QBasic is an IDE and interpreter for a variant of the BASIC programming language which is based on QuickBASIC. Code entered into the IDE is compiled to an intermediate form, and this intermediate form is immediately interpreted on demand within the IDE.[1] It can run under nearly all versions of DOS and Windows, or through DOSBox/DOSEMU, on Linux and FreeBSD.[2] For its time, QBasic provided a state-of-the-art IDE, including a debugger with features such as on-the-fly expression evaluation and code modification.

Like QuickBASIC, but unlike earlier versions of Microsoft BASIC, QBasic is a structured programming language, supporting constructs such as subroutines and while loops.[3][4] Line numbers, a concept often associated with BASIC, are supported for compatibility, but are not considered good form, having been replaced by descriptive line labels.[1] QBasic has limited support for user-defined data types (structures), and several primitive types used to contain strings of text or numeric data.[5][6]

Contents

History

QBasic was intended as a replacement for GW-BASIC. It was based on the earlier QuickBASIC 4.5 compiler but without QuickBASIC's compiler and linker elements. Version 1.0 was shipped together with MS-DOS 5.0 and higher, as well as Windows 95, Windows NT 3.x, and Windows NT 4.0. IBM recompiled QBasic and included it in PC-DOS 5.x, as well as OS/2 2.0 onwards.[7] eComStation, descended from OS/2 code, includes QBasic 1.0. QBasic 1.1 is included with MS-DOS 6.x, and, without EDIT, in Windows 95, Windows 98 and Windows Me. Starting with Windows 2000, Microsoft no longer includes QBasic with their operating systems.[8] (However, some localized versions of Windows 2000 and Windows XP still have it, and it can be given out as freeware.)...

QBasic (as well as the built-in MS-DOS Editor) is backward compatible with DOS releases prior to 5.0 (down to at least DOS 3.20). However, if used on any 8088/8086 computers, or on some 80286 computers, the QBasic program may run very slowly, or perhaps not at all, due to its memory size. Until MS-DOS 7, MS-DOS Editor required QBasic: the "edit.com" program simply started QBasic in editor mode only, and this mode can also be entered by running QBASIC.EXE with the /EDITOR switch (i.e., command line "QBASIC /EDITOR".

Examples

QBasic came complete with four pre-written example programs. These were "Nibbles", a variant of the Snake game; "Gorillas", an Artillery game; "MONEY MANAGER", a personal finance manager; and "RemLine", a GW-BASIC code line-number-removing program.[1]

"Hello, World!"

PRINT "Hello, World!"

Simple game

This program challenges the user to guess a randomly selected number within the 1-10 range, without offering the usual hints of "higher"/"lower":

CLS
PRINT "Guess the number!"
INPUT "Would you like to play? (Y/N): ", choice$     ' An input statement, that takes what the user inputs...
choice$ = UCASE$(choice$)                            ' makes the input completely uppercase (fkld ---> FKLD)
IF choice$ = "YES" OR choice$ = "Y" THEN             ' and decides whether or not they want to play:
  guesses% = 5                                       ' Set up number of guess remaining
  RANDOMIZE TIMER                                    ' Sets up the random number generator
  target% = INT(RND * 10) + 1                        ' Picks a random number between 1 and 10 (inclusive)
  won% = 0                                           ' Sets up a flag called 'won%' to check if user has won
  PRINT "The number is between 1 and 10."
  WHILE guesses% > 0 AND won% = 0                    ' Enters a loop until the user wins or runs out of chances
    INPUT "Enter your guess: ", guess%               ' Takes user input (the guess)
    IF guess% = target% THEN                         ' Determines if the guess was correct
      PRINT "Correct, the answer was"; target%; "!"      won% = 1                                       ' Sets a flag to indicate user has won
    ELSE
      guesses% = guesses% - 1                        ' Deducts one chance
      PRINT "Sorry, please try again. You have"; guesses%; "guesses left."
    END IF
  WEND                                               ' End of guessing loop
  IF won% = 0 THEN PRINT "You ran out of guesses, the number was"; target%; "."
END IF

Easter egg

QBasic has a little-known Easter egg. To see it, press and hold <kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Left CTRL</kbd>+<kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Left SHIFT</kbd>+<kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Left ALT</kbd> and <kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Right CTRL</kbd>+<kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Right SHIFT</kbd>+<kbd class="keyboard-key" style="border: 1px solid; border-color: #ddd #bbb #bbb #ddd; border-bottom-width: 2px; -moz-border-radius: 3px; -webkit-border-radius: 3px; border-radius: 3px; background-color: #f9f9f9; padding: 1px 3px; font-family: inherit; font-size: 0.85em; white-space: nowrap;">Right ALT</kbd> simultaneously after running QBasic at the DOS prompt but before the title screen loads: this lists The Team of programmers.[7] Note that on modern computers, it is much too fast to perform. It is best done on an old PC (preferably one with a working Turbo button, with the switch on to slow the CPU to 4.77 MHz) or in an emulator like Bochs or DOSBox which can be slowed down.

See also

References

External links