/* Aquí dejo el código en ensamblador para el micro de freescale de la serie MM 256 **/
/**Prueben con distintos códigos de inicialización para la lcd, yo tuve ese problema, tuve que cambiar mas de tres ocasiones el código de inicializacion porque para cada lcd es diferente. Observen que estoy utilizando muchos registros para los datos, si pueden utilizar menos esta perfecto. Este código lo hice muy rápido y no me senté a optimizarlo, solo espere que prendiera la pantalla y entregue la practica. Observe que utilicé solamente cuatro bits del puerto en el micro para mandar los datos a la lcd, esto es importante por eso prendo y apago mas seguido el enable, si quieren para 8 bits es un poco mas sencillo, después subo el código para 8 bits.
He tardado en subir los códigos porque quiero subir todos los códigos comentados para que sepan a que se refiere cada linea, me parece importante eso para que puedan comprender el código a fondo.
.extern ___SP_INIT
.global _main
.global _asm_startup
.include "derivative.inc"
/*****************************************************************************/
/* Variables Declaration */
/*****************************************************************************/
.bss
/*****************************************************************************/
/* Constants declaration */
/*****************************************************************************/
.text
config: .byte $36, $36, $36, $06, $06, $01
msg1: .byte "hola"
.align 4
/*****************************************************************************/
/*****************************************************************************/
/* Start Up Code */
_asm_startup:
/* disable interrupts */
move.w #$2700,SR
/* setup the stack pointer */
lea ___SP_INIT,A7
/* WDT Disable */
move.b #$23,d1
move.b d1,SOPT1
/*****************************************************************************/
/*****************************************************************************/
/* Main Function */
/*****************************************************************************/
/*****************************************************************************/
_main:
move.b #%11000000,d0
move.b d0,PTCDD //activando como salida pin 6 y 7 para enable y Rs respectivamente del puerto D
move.b #%11110000,d1
move.b d1, PTHDD //activando como salida de los datos los primeros cuatro pines del puerto H
move.b #0, d4
/********************Aqui inicializamos la lcd**********************/
comando:
move.b #$00,d0
move.b d0,PTCD // ponemos rs en 0 para comando
move #config, A0 // A0 apunta a lo que esta en config
move #6,d2 //ponemos 6 en d2 para utilizarlo como referencia del comando que hay en el main
bsr escribe_lcd // vamos a escribir el comando en la lcd
escribe_lcd:
move.b (A0)+,d0 // lo que esta en A0 se mueve a d0
move.b d0, PTHD // despues al puerto de los pines de salida que van a mandar dato, los primeros cuatro bits
move.b #%01000000,d1 //pasamos a registro lo que activa enable
move.b d1,PTCD // ACTIVAMOS ENABLE
move.b #0, d4
bsr delay_20 // VAMOS AL DELAY DE 20ms
move.b #000000,d3
move.b d3,PTCD // ponemos enable en 0
lsl.l #4,d0 //rotamos para que llegue la segunda parte, pues usamos 4 bits
move.b d0,PTHD // mandamos los otros cuatro bits
move.b d1, PTCD // volvemos a activar enable
move.b #0, d4
bsr delay_20 //vamos a delay de 20ms
move.b d3,PTCD //ponemos enable en 0
subi.l #1,d2 // le restamos uno a d2 para contar que ya ingresamos el primer comando
cmpi.l #0,d2 // comparamos cero con d2 para ver si ya termino
bne escribe_lcd // si aun faltan comandos regresar a escribe_lcd
/**************si es igual 0 con d2 brincamos a escribir datos, lo que queremos ver en la lcd ***/
dato:
movea #msg1, A0 // A0 apunta a lo que esta en msg1 que es la palabra hola
move.b #4,d2 // ponemos un 4 en d2
// pasamos a escribe_lcd1
escribe_lcd1:
move.b #%10000000,d0
move.b d0, PTCD // ponemos rs en 1 porque estamos escribiendo datos y enable se mantiene en 0
move.b (A0)+, d1 //movemos lo que esta en A0 a D1
move.b d1, PTHD // pasamos a los puertos la primer parte de la letra
move.b #%11000000,d4
move.b d4, PTCD // activamos enable
move.b #0, d4
bsr delay_20 // vamos a dalay de 20ms
move.b d0,PTCD // dejamos rs en 1 y enable lo mandamos a 0
lsl.l #4,d1 // rotamos pra poner la segunda parte de la letra
move.b d1,PTHD //mandamos la segunda parte de la letra al puerto de salida
move.b d4, PTCD // ponemos enable en 1
move.b #0, d4
bsr delay_20 // brincamos al delay de 20ms
move.b d0,PTCD //pasamos enable a 0 y rs se mantiene en 1
subi.l #1,d2 // le restamos 1 a d2 para saber que ya pasamos la letra
cmpi.l #0,d2 //comparamos 0 con d2 para ver si ya termino y si no termino regresamos a escribe_lcd1
bne escribe_lcd1
bra _main
/********************************** Aqui va el delay *********************************/
/***este delay es de 20 milisegundos, esta hecho para la lcd que yo necesite, dependiendo del delay que ustedes necesitan ajustan el numero de lineas de codigo, este micro hace una instruccion en un microsegundo es por eso que comparo el 6667 para que en tres lineas sean aprox 20 milisegundos**/
delay_20:
addi.l #1,d4
cmpi.l #6667,d4
bne delay_20
rts
