Diferencia entre revisiones de «SCI (Interfaz de Comunicación Serial) - MC9S08QE128»

  LDA #$00
  STA SCI1BDH
  LDA #$1A
  STA SCI1BDL  ;/*Baud Rate = 9600bps para un clock de 4MHZ*/
  LDA #$00
  STA SCI1C1  ;/*Transmisión y recepción normal de 8 bits sin paridad*/
  LDA #$0C
  STA SCI1C2 ;/*Habilita transmisor y receptor*/

  LDA #$00
  STA SCI1BDH ;/* Tasa alta de transmisión deshabilitada (Baud high disabled)*/
  LDA #$1A   ;/* Pre-escaler ajustado: [SBR12:SBR0] = 4Mhz/(16*9600) =~ 26,04d= 1A (hex)*/ 
              /* valor requerido para trabajar a 9600bps*/
  STA SCI1BDL  ;/*Baud Rate = 9600bps*/
  LDA #$00
  STA SCI1C1  ;/*Transmisión y recepción normal de 8 bits sin paridad*/
  LDA #$2C
  STA SCI1C2 ;/*Habilita transmisor y receptor*/

  // Inicializaciones para trabajar con SCI    
  SCI1BDH = 0x00;
  SCI1BDL = 0x1A; /*Baud Rate = 9600bps*/ 
  SCI1C1 = 0x00; /*Transmisión y recepción normal de 8 bits sin paridad*/
  SCI1C2 = 0x0C; /*Habilita transmisor y receptor*/

  // Inicializaciones para trabajar con SCI    
  SCI1BDH = 0x00;
  SCI1BDL = 0x1A; /*Baud Rate = 9600bps*/ 
  SCI1C1 = 0x00; /*Transmisión y recepción normal de 8 bits sin paridad*/
  SCI1C2 = 0x2C; /*Habilita transmisor y receptor, habilito recepción por interrupciones*/

  LDA #$00
  STA SCI1BDH
  LDA #$1A
  STA SCI1BDL  ;/*Baud Rate = 9600bps para un clock de 4MHZ*/

    void interrupt VectorNumber_Vsci1tx SCI_TX_ISR(void){
     byte leer;
     leer=SCI1S1; /*Baja la bandera de transmisión, por tal motivo para
                     volverlo a utilizar hay que ponerlo nuevamente en cero*/
     SCI1D=dato;  //en el registro SCI1D se guarda lo que se quiere enviar por serial, 
                  //la variable dato se tiene 
                  //que inicializar como una variable global
                       
     SCI1C2=0x2C;  //esta línea de código es opcional, se escribe si se quiere que el programa
                   // reciba por interrupción
                   //en caso contrario borrarla.
    }

;**************************************************************
;*                 Interrupt Vectors                          *
;**************************************************************
             ORG   $FFE0  ; espacio en memoria donde se encuentra la interrupción 
            
            DC.W  Recibe     ; Rutina de Recepción

Recibe:    bclr SCI1S1_RDRF,SCI1S1 ;pasa a la siguiente línea de código cuando el registro 
                                   ; SCI1S1_RDRF es distinto de cero 
           lda SCI1D  ;guarda en el acumulador el dato recibido por serial 
           sta dato  ; se guarda el dato
           lda SCI1S1 ; se baja la bandera de recepción  
           mov #$8C, SCI1C2 ; se modifica el registro SCI1C2 para entrar a un vector de 
                            ; transmisión si es necesario, de lo contrario
                            ; borrar la línea de código      
           RTI

//vector de interrupción por sci para recibir
void interrupt VectorNumber_Vsci1rx SCI_RX_ISR(void) {
     byte leer;
     byte dato;      //se declaran las variables que recibe el dato que se escribe
     leer = SCI1S1; //baja la bandera de recepción, por tal motivo para volverlo a utilizar hay que ponerlo nuevamente en cero
     dato = SCI1D;  //el registro SCI1D es donde se guarda el dato que se manda por puerto serial, dicho dato se le asigna a la variable dato
     SCI1C2=0x8C;  //esta línea de código es opcional, se escribe si se quiere que el programa transmita por interrupción 
}

Transmitir:  
  etiq:      lda dato ; se coloca en el dato que se desea transmitir en el acumulador
             sta SCI1D ; se coloca el dato en el registro de data del puerto para ser enviado
             BRCLR SCI1S1_TDRE,SCI1S1,etiq  ; Condición de salto que verifica si la 
             ;el dato fue transmitido
             lda SCI1S1 ; se aclara la bandera MUY IMPORTANTE
             RTS        ;  se sale de la sub rutina y vuelve al PC+1 de donde fue llamada

void Transmitir_dato(byte dato)    // Se ejecuta la transmisión de dato por encuesta
 {   byte bandera;
     while (SCI1S1_TDRE == 0);   // No finaliza ciclo hasta que esté libre el registro
                                 // en el que se guardará el dato que se enviará
         bandera= SCI1S1;	// Aclara la bandera
   	 SCI1D = dato;         // Enviando dato 
 }

recepcion:  
    etiq: BRCLR SCI1S1_RDRF,SCI1S1,etiq; Condición de salto que verifica si la el dato fue recibido
          bclr SCI1S1_RDRF,SCI1S1 ; se aclara la bandera para decir que ya se recibió el dato
          lda SCI1D ;se coloca el dato del registro de data del puerto que fue recibida en el acumulador
          sta dato ; se coloca el valor del acumulador en la variable dato
          lda SCI1S1; se aclara la bandera MUY IMPORTANTE 
          RTS;  se sale de la sub rutina y vuelve al PC+1 de donde fue llamada

byte Recibir_dato(void)         //Se ejecuta la recepción de dato por encuesta
 {   byte dato_R; 
     byte bandera;
     while (SCI1S1_RDRF == 0); // No finaliza ciclo hasta que esté listo el dato 
	   bandera= SCI1S1;   // Aclara la bandera 
	   dato_R = SCI1D;   // Se Salva el dato 
           return dato_R;   // Retorna dato
 }