Si además quieres enviarnos un Artículo para el Blog y redes sociales, pulsa el siguiente botón:
Bueno, no he visto ninguna referencia en todo el foro a este lenguaje, y no me extraña pues hasta hace bien poco yo tampoco lo había escuchado nunca. Se trata de JAL, un lenguaje basado en Pascal y pensado para los micros de 8-bits de Microchip. Por lo que he visto tiene soporte para casi todos los micros actuales y también librerías que hacen uso de sus periféricos (jallib).
He escrito en mi blog una entrada sobre el mismo: http://www.mipixel.com/2009/08/23-empezando-con-jal-otro-lenguage-de-programacion " onclick="window.open(this.href);return false;
¿Qué os parece este lenguaje de programación?
La verdad es que cuanto más lo miro más me gusta. Si me he dado cuenta que actualmente está en plena fase de desarrollo. En la lista de correo del proyecto tienen bastante actividad y la última versión de hace un par de semanas corrige bastantes bugs.
Supongo que aún no está muy maduro, pero es gratuito, libre y fácil de usar. Para facilidad dejo aquí un ejemplo de un servidor ECHO por puerto serie sobre USB, es uno de los ejemplos que he modificado un poco (no he puesto los fuses porque uso un bootloader y los básicos ya los tiene configurados):include 18f4550
pragma target clock 48_000_000
include delay
include usb_serial
include print
-- Constantes
const byte str_welcome[] = "Prueba de jallib: serie sobre USBn"
-- Desactivamos interrupciones
INTCON_GIE = false
-- Inicializamos el módulo USB
usb_serial_init()
var bit se_ha_mostrado_msg = true
var byte ch
-- main loop
forever loop
-- Hay que llamar a esta función frecuentemente para atender
-- a las peticiones por USB
usb_serial_flush()
-- Esperamos a que el USB esté configurado por el HOST
if ( usb_cdc_line_status() != 0x00 ) then
if !se_ha_mostrado_msg then
se_ha_mostrado_msg = true
print_string( usb_serial_data, str_welcome )
end if
else
se_ha_mostrado_msg = false
end if
-- Miramos si nos ha llegado algún caracter
if usb_serial_read( ch ) then
-- Y lo imprimimos
usb_serial_data = ch
end if
end loop
A ver si más gente se anima a usar este lenguaje de programación.
¡Saludos!
Estoy escribiendo un tutorial de cómo usar JALv2. Podéis verlo en mi web http://www.mipixel.com/tutorial-jalv2 " onclick="window.open(this.href);return false;
Espero que os guste.
¡Un saludo!
Muy interesante... Gracias por el aporte, no conocía para nada que este lenguaje se utilizara con PIC's, Gracias.
