Cómo visualizar un archivo GIF en QBasic

QBasic es una herramienta que se utiliza para ejecutar el lenguaje de programación BASIC. Se traduce los comandos de entrada en acciones informáticas , como el funcionamiento de un archivo o cerrar una aplicación en los sistemas basados ​​en DOS . Un uso para QBasic es abrir y visualizar archivos de imagen. Mostrar un archivo GIF se puede hacer usando una serie de comandos para extraer los datos relevantes del archivo y convertirlo en una forma que QBasic puede mostrar . . Instrucciones
1

abierto QBasic
2

Escriba los siguientes nueve líneas en la ventana de comandos :

filenum % = FreeFile

ABRIR filename.pal $ PARA ENTRADA COMO # filenum %

PARA DummyColour % = 0 a 255

ENTRADA # filenum % , r, g, b

SALIDA y H3C8 , DummyColour %

SALIDA y H3C9 , r

SALIDA y H3C9 , g

SALIDA y H3C9 , b

SIGUIENTE DummyColour %
3

Reemplazar " nombre " por el nombre del archivo GIF. No incluya la extensión ". Gif" . Haga clic en " Enter" para extraer la información paladar gif que controla la pantalla.
4

Escribe las dos líneas siguientes en la ventana de comandos , una vez más reemplazar " nombre de archivo ".

DEF SEG = y HA000

BLOAD " filename.bsv "

Pulse " Enter". El GIF se mostrará en el monitor.