Microsoft QuickBASIC (también QB ) es un entorno de desarrollo integrado (o IDE) y compilador para el lenguaje de programación BASIC que fue desarrollado por Microsoft . QuickBASIC se ejecuta principalmente en DOS , aunque también hubo una versión de corta duración para el clásico Mac OS . Está basado libremente en GW-BASIC pero agrega tipos definidos por el usuario, estructuras de programación mejoradas, mejores gráficos y soporte de disco y un compilador además del intérprete . Microsoft comercializó QuickBASIC como el nivel introductorio de su sistema de desarrollo profesional BASIC. [1] Microsoft comercializó otros dos IDE similares para C y Pascal, a saber, QuickC y QuickPascal .
Microsoft lanzó la primera versión de QuickBASIC el 18 de agosto de 1985 en un único disquete de 5,25 pulgadas y 360 KB . QuickBASIC versión 2.0 y posteriores contenían un entorno de desarrollo integrado (IDE), que permitía a los usuarios editar directamente en su editor de texto en pantalla.
Aunque todavía se admiten en QuickBASIC, los números de línea se volvieron opcionales. Los saltos de programa también funcionaron con etiquetas con nombre. Las versiones posteriores también agregaron estructuras de control, como declaraciones condicionales multilínea y bloques de bucle.
Se incluyó el "PC BASIC Compiler" de Microsoft para compilar programas en ejecutables de DOS. A partir de la versión 4.0, el editor incluía un intérprete que permitía al programador ejecutar el programa sin salir del editor. El intérprete se utilizó para depurar un programa antes de crear un archivo ejecutable. Desafortunadamente, había algunas diferencias sutiles entre el intérprete y el compilador, lo que significaba que los programas grandes que se ejecutaban correctamente en el intérprete podían fallar después de la compilación, o no compilarse en absoluto debido a diferencias en las rutinas de administración de memoria. [2]
La última versión de QuickBASIC fue la 4.5 (1988), aunque el desarrollo del Sistema de desarrollo profesional (PDS) de Microsoft BASIC continuó hasta su último lanzamiento de la versión 7.1 en octubre de 1990. [3] Al mismo tiempo, el paquete de QuickBASIC se cambió silenciosamente. para que los discos utilicen la misma compresión utilizada para BASIC PDS 7.1. [4] La versión Basic PDS 7.x del IDE se llamó QuickBASIC Extended (QBX) y solo se ejecutaba en DOS, a diferencia del resto de Basic PDS 7.x, que también se ejecutaba en OS/2. El sucesor de QuickBASIC y Basic PDS fue Visual Basic versión 1.0 para MS-DOS, distribuido en versiones Standard y Professional. Las versiones posteriores de Visual Basic no incluían versiones de DOS, ya que Microsoft se concentró en aplicaciones de Windows.
Un subconjunto de QuickBASIC 4.5, llamado QBasic , se incluyó con MS-DOS 5 y versiones posteriores, reemplazando el GW-BASIC incluido en versiones anteriores de MS-DOS. En comparación con QuickBASIC, QBasic se limita únicamente a un intérprete, carece de algunas funciones, sólo puede manejar programas de un tamaño limitado y carece de soporte para módulos de programas separados. Como carece de compilador, no se puede utilizar para producir archivos ejecutables, aunque el código fuente del programa aún se puede compilar con un compilador QuickBASIC 4.5, PDS 7.x o VBDOS 1.0, si está disponible.
QuickBASIC 1.00 para el sistema operativo Apple Macintosh se lanzó en 1988. Fue oficialmente compatible con máquinas que ejecutaban System 6 con al menos 1 MB de RAM. [5] QuickBASIC también podría ejecutarse en System 7 , siempre que el direccionamiento de 32 bits estuviera deshabilitado.
Hola mundo , versión más corta:
? "Hola Mundo"Hola mundo , versión extendida:
CLS PRINT "Hola Mundo" FIN DEJAR BOTELLAS = 99 : DEJAR BOTELLAS$ = "99" : DEJAR BOTELLA$ = " botellas" FOR A = 1 A 99 IMPRIMIR BOTELLAS$ ; BOTELLA$ ; "de cerveza en la pared", ; BOTELLAS$ ; BOTELLA$ ; "de cerveza." DEJAR BOTELLAS = BOTELLAS - 1 SI BOTELLAS > 0 ENTONCES DEJAR BOTELLAS$ = LTRIM$ ( STR$ ( BOTELLAS )) : LET PRONOUN$ = "uno" SI BOTELLAS = 0 ENTONCES DEJAR BOTELLAS$ = "no más" : LET PRONOUN$ = "eso" SI BOTELLAS <> 1 ENTONCES DEJE BOTELLA$ = " botellas" SI BOTELLAS = 1 ENTONCES DEJE BOTELLA$ = " botella " IMPRIMIR " Tomar " ; PRONOMBRE$ ; "baja y pásalo", ; BOTELLAS$ ; BOTELLA$ ; "de cerveza en la pared." IMPRIMIR : SIGUIENTE A IMPRIMIR "No más botellas de cerveza en la pared, no más botellas de cerveza". IMPRIMIR "Ve a la tienda y compra algunas más, 99 botellas de cerveza en la pared". Ejemplo de gráficos:
PANTALLA 13 DIM a ( 3976 ) COMO ENTERO , b ( 3976 ) COMO ENTERO , c ( 3976 ) COMO ENTERO DIM d ( 3976 ) COMO ENTERO , e ( 3976 ) COMO ENTERO col % = 16 : col1 % = 16 : col2 % = 16 : col3 % = 16 : col4 % = 16 col5 % = 16 : col6 % = 16 : col7 % = 16 : bandera = 1 : bandera1 = 1 bandera2 = 1 : bandera3 = 1 : bandera4 = 1 : bandera5 = 1 : bandera6 = 1 : flag7 = 1 GET ( 1 , 38 ) - ( 318 , 62 ), a PUT ( 2 , 38 ) , a , PSET LINE ( 1 , 38 ) - ( 1 , 62 ), col % IF flag = 1 ENTONCES col % = col % + 1 : SI col % = 32 ENTONCES bandera = 2 SI bandera = 2 ENTONCES col % = col % - 1 : SI col % = 16 ENTONCES bandera = 1 GET ( 2 , 63 ) - ( 319 , 87 ), segundo PUT ( 1 , 63 ), b , PSET LINE ( 319 , 63 ) - ( 319 , 87 ), col1 % SI bandera1 = 1 ENTONCES col1 % = col1 % + 1 : SI col1 % = 32 ENTONCES bandera1 = 2 SI bandera1 = 2 ENTONCES col1 % = col1 % - 1 : SI col1 % = 16 ENTONCES bandera1 = 1 GET ( 1 , 88 ) - ( 318 , 112 ), c PUT ( 2 , 88 ), c , PSET LINE ( 1 , 88 ) - ( 1 , 112 ), col2 % SI bandera2 = 1 ENTONCES col2 % = col2 % + 1 : SI col2 % = 32 ENTONCES bandera2 = 2 SI bandera2 = 2 ENTONCES col2 % = col2 % - 1 : SI col2 % = 16 ENTONCES bandera2 = 1 OBTENER ( 2 , 113 ) - ( 319 , 137 ), d PUT ( 1 , 113 ), d , PSET LÍNEA ( 319 , 113 ) - ( 319 , 137 ), col3 % SI bandera3 = 1 ENTONCES col3 % = col3 % + 1 : SI col3 % = 32 ENTONCES bandera3 = 2 SI bandera3 = 2 ENTONCES col3 % = col3 % - 1 : SI col3 % = 16 ENTONCES bandera3 = 1 GET ( 1 , 138 ) - ( 318 , 162 ), e PUT ( 2 , 138 ), e , LÍNEA PSET ( 1 , 138 ) - ( 1 , 162 ), col4 % SI bandera4 = 1 ENTONCES col4 % = col4 % + 1 : SI col4 % = 32 ENTONCES bandera4 = 2 SI bandera4 = 2 ENTONCES col4 % = col4 % - 1 : SI col4 % = 16 ENTONCES flag4 = 1 BUCLE HASTA LEN ( INKEY$ ) Muestra REM de tipo burbuja N = 10 DIM A ( N ) AS INTEGER FOR L = 1 TO N A ( L ) = INT ( RND * 10 + 1 ) NEXT FOR X = 1 TO N FOR Y = 1 TO N - 1 IF A ( X ) < A ( Y ) LUEGO INTERCAMBIAR A ( X ), A ( Y ) SIGUIENTE SIGUIENTE PARA L = 1 A N IMPRIMIR A ( L ) SIGUIENTE FINAL QuickBASIC tiene una comunidad no oficial de programadores aficionados que utilizan el compilador para escribir videojuegos , GUI y utilidades . [6] [7] [8] La comunidad ha dedicado varios sitios web, foros de mensajes y revistas en línea al idioma. [9] [10]
Hoy en día, los programadores a veces usan emuladores de DOS , como DOSBox , para ejecutar QuickBASIC en Linux y en computadoras personales modernas que ya no admiten el compilador. [11] [12] Las alternativas a esto incluyen FreeBASIC y QB64 , pero aún no pueden ejecutar todos los programas QBasic/QuickBASIC. [13]
Desde 2008, un conjunto de rutinas TCP/IP para QuickBASIC 4.xy 7.1 ha revitalizado cierto interés en el software. En particular, la comunidad de aficionados a las computadoras antiguas ha podido escribir software para computadoras antiguas que ejecutan DOS, permitiendo a estas máquinas acceder a otras computadoras a través de una LAN o Internet. Esto ha permitido que sistemas incluso tan antiguos como un 8088 cumplan nuevas funciones, como actuar como servidor web o utilizar IRC . [14]
Visual Basic de Microsoft fue el sucesor de QuickBASIC. Otros compiladores, como PowerBASIC y FreeBASIC , tienen distintos grados de compatibilidad. QB64 , un traductor multiplataforma de QuickBASIC a C++, mantiene una compatibilidad cercana al 100 % y se compila de forma nativa para Windows , Linux y macOS . [15]
{{cite web}}: Mantenimiento CS1: URL no apta ( enlace )