Antes de Python, antes de JavaScript, antes incluso de C, estaba el BASIC. Y en el MSX, el BASIC no era un simple intérprete: era el sistema operativo. Al encender, te recibía un amigable "Ok" y un cursor parpadeante. No había iconos, ni ventanas, ni ratón. Solo tú, el teclado y un mundo por crear. Este tutorial te enseña a programar en MSX BASIC, ya sea en un emulador o en una máquina real, para que redescubras la magia de decirle al ordenador qué hacer, línea a línea.

Por qué MSX BASIC

• Es el lenguaje con el que muchos empezamos a programar.
• Enseña conceptos fundamentales sin abstracciones innecesarias.
• El resultado es inmediato: escribes, ejecutas, ves.

Paso 1: Arrancar el MSX

Si usas openMSX, selecciona una máquina estándar como la Philips VG-8020. Al arrancar, verás algo así:

MSX BASIC version 2.0
Copyright 1983 by Microsoft
Ok

Ese "Ok" es tu señal. El ordenador espera órdenes.

Paso 2: Primer comando: PRINT

Escribe esto y pulsa Enter:

PRINT "HOLA MUNDO"

El MSX responderá:

HOLA MUNDO
Ok

Ya has programado. Bienvenido de vuelta.

Paso 3: Variables y operaciones

El BASIC de MSX usa variables sin declaración previa. Los nombres pueden tener hasta dos caracteres (sí, es limitado, pero era 1983).

A = 5
B = 3
PRINT A + B
PRINT A * B

El resultado:

8
15

Paso 4: Dibujar en pantalla

El MSX tiene modos gráficos. El modo estándar es SCREEN 0 (texto). Cambiemos a SCREEN 1 (gráficos de baja resolución):

SCREEN 1
COLOR 15,4,4
CIRCLE(128,100),50,10
PAINT(128,100),10,10

Acabas de dibujar un círculo azul. El COLOR 15,4,4 define: texto blanco, fondo azul oscuro, borde azul oscuro.

Paso 5: Un programa con bucle

Los números de línea son obligatorios. Escribe:

10 FOR I=1 TO 10
20 PRINT "VUELTA"; I
30 NEXT I
40 PRINT "FIN"

Ahora ejecuta con:

RUN

Verás las 10 vueltas y luego FIN. Si quieres listar el programa, escribe LIST.

Paso 6: Guardar y cargar

En un MSX real guardabas en casete. En openMSX, monta un disco virtual:

SAVE "CAS:PROGRAMA"   (para casete)
SAVE "A:PROGRAMA.BAS" (para disquete)

Para cargar:

LOAD "CAS:PROGRAMA"

Primer programa completo

Aquí tienes un pequeño juego de adivinanza:

10 RANDOMIZE VAL(RIGHT$(TIME$,2))
20 N = INT(RND*100)+1
30 INPUT "ADIVINA EL NUMERO (1-100)"; G
40 IF G < N THEN PRINT "MAS ALTO": GOTO 30
50 IF G > N THEN PRINT "MAS BAJO": GOTO 30
60 PRINT "ACERTASTE EN "; C; " INTENTOS"

Ejecuta con RUN. Adivina el número. El MSX te irá dando pistas.

Mantenimiento

Guarda tus programas en discos virtuales. Crea una carpeta "MIS_BAS" y monta siempre la misma imagen de disco. Así tendrás tu biblioteca personal de programas MSX, como en los viejos tiempos, pero sin ruido de casete.

Programar en BASIC no era más fácil que ahora. Era más honesto.

#MSX #BASIC #ProgramaciónRetro #openMSX #Aprendizaje