Página principal
Raspberry Pi Pico
Interprete BASIC
with VGA
Buscando montaje curiosos con la Raspberry Pi Pico encontré la página https://geoffg.net/picomitevga.html.
En esta página habían instalado un interprete de Basic, mmBasic, en la Raspberry Pi Pico, y además habían programado una salida de VGA.
El MMBasic es un intérprete Basic libre para microcontroladores de 32 bits. https://mmbasic.com/
Existen intérpretes MMBasic  para DOS, Linux y PIC32.


En el montaje original tiene una SD para almacenar diferentes programas, en mi caso solo quiero que exista un programa, por lo que se la he quitado.

Para la conexión del teclado el montaje original coloca una serie de transistores, yo los he eliminado conectando 4 resistencias.
Como dice el montaje original se puede eliminar la conexión del teclado a 5V y conectarlo a los 3.3V, la mayoría de los teclados funciona lo he probado personalmente.

En el montaje original de la segunda línea del color verde se conectan varias resistencias junto con una resistencia variable.
En mi montaje coloco 2 resistencias junto con un diodo. El ajuste fino del color blanco se ha eliminado.

He añadido dos diodos led, el primero a modo de test de alimentación, y otro de test colocado a GP5.

También he colocado un pulsador para la programación inicial de la Raspberry pi pico.

Se puede añadir una salida de audio, podéis ver la forma en la buena documentación proporcionada en la página web.


Esquema modificado.




Primer montaje.


Circuito montado.

' Colour Bars

Mode 2
CLS
Font 7
For y = 0 To 240 - 240/15 Step 240/16
  Read s$, c
  Text 0, y + 4, s$ + " = RGB(" + Str$(c>>16) + "," + Str$((c>>8) And &B11111111) + "," + Str$(c And &B11111111) + ")"
  Box 155, y, 320 - 155, 240/16, 1, c, c
Next y

Data "white", RGB(white)
Data "yellow", RGB(yellow)
Data "lilac", RGB(lilac)
Data "brown", RGB(brown)
Data "fuchsia", RGB(fuchsia)
Data "rust", RGB(rust)
Data "magenta", RGB(magenta)
Data "red", RGB(red)
Data "cyan", RGB(cyan)
Data "green", RGB(green)
Data "cerulean", RGB(cerulean)
Data "midgreen", RGB(midgreen)
Data "cobalt", RGB(cobalt)
Data "myrtle", RGB(myrtle)
Data "blue", RGB(blue)
Print @(0,y);

PLAY TONE 500, 500
PAUSE 2000
PLAY TONE 300, 300
PAUSE 5000
PLAY STOP


Visión en un televisor con entrada VGA.

Para subir los programas desde el PC a la placa Raspberry pi pico utilizo un par de programas: MMCC y MMEdit.

Terminal serie de programación y ejecución.


Programa de edición y subida a la placa.

El numero de colores máximos representados en la resolución de 320x240 es de 16 colores. En modo de 640x480 es monocromo.
En una de las pruebas he añadido un sensor de temperatura 18B20, para representar en pantalla la temperatura.
Recomiendo este montaje por su sencillez, y por la sensación de estar en los ordenadores de los años 80.

VIDEO
16/03/2023
Después de unos días probando la placa, descubrí que los módulos clónicos de esta tarjeta, no son iguales que la original.
Para que funcionase debía cambiar la toma de 5V para el teclado, desde el pin VSYS al pin VBUS.
También decidí colocar una tarjeta SD y el conector de audio.



Para configurar los pins donde esta conectada la tarjeta SD debemos ejecutar la siguiente orden:
     OPTION SDCARD GP13, GP10, GP11, GP12
La tarjeta SD esta en el disco B: por lo que si queremos trabajar en este disco deberemos ejecutar la orden:
     DRIVE "B:"
Para ver los fichero de este disco se teclea :
     FILES
Si queremos cargar un programa tecleamos:
     LOAD programa.bas
Si queremos cargar el programa tecleamos:
    LOAD programa.bas
    o
    RUN programa.bas
Existen muchas mas ordenes que vienen muy bien documentadas en el manual como:

 MKDIR dname$
Creates a sub directory in the current directory on the current drive.
 CHDIR dname$
Change into to the directory $dname. $dname can also be "." (dot dot) for up one directory or "\" for the
root directory. The starting point is the current directory on the current drive.
RMDIR dir$
Remove, or delete, the directory ‘dir$’ in the current directory on the current drive.
 SEEK #fnbr, pos
Will position the read/write pointer in a file that has been opened for RANDOM access to the 'pos' byte.
 RENAME fromname$ AS toname$
Will rename the file fromname$ to have the name toname$ in the current directory on the current drive
 COPY [mode] fromname$ TO toname$
Will copy the file fromname$ to have the file toname$. See the command reference for more details on the
optional mode.



En cuando a reproducir sonidos, lo primero es configurar los pin de salida:
    OPTION AUDIO GP6, GP7
y luego reproducir un fichero WAV con la orden.
    PLAY WAV demo.wav
Me sorprendió para bien la calidad del sonido reproducido, y probé con diferente tipos de muestreo.
Además se puede generar tonos con la orden:
    PLAY TONE left, right, duration, interrupt
    PLAY TONE 500, 500, 2000




 Saludos.
 Juan Galaz


Bibliografía:
https://geoffg.net/picomitevga.html
https://mmbasic.com/