Página principal
Raspberry Pi
Pico
Interprete BASIC
con 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/
