Guardar datos en la EEPROM interna del PIC

FAQ •

Buscar •

Registrarse •

Entre para ver sus mensajes privados •

Guardar datos en la EEPROM interna del PIC

Índice de los Foros Electronica Facil » FOROS ELECTRONICA » Microcontroladores PIC

Autor

Mensaje

Meta

Asunto: Guardar datos en la EEPROM interna del PIC

Publicado: 27 Ago, 2009 - 02:50

Experto

Registrado: 03 Sep, 2008
Mensajes: 125

Hola:

Tengo medio hecho unos códigos del PIC16F84A-04, quiero grabar los Relay_1 al Relay_4 en la EEPROM, es decir, los últimos estados de los relés en ON o OFF. Aún así sigo intentado pero si les sale el código mejor que el mio, mejor que mejor.

Código

<br />
;************************************ Meta_Control.asm **************************************
<br />
;
<br />
;   ===================================================================
<br />
;     Del libro &quot;MICROCONTROLADOR PIC16F84. DESARROLLO DE PROYECTOS&quot;
<br />
;     E. Palacios, F. Remiro y L. López.      www.pic16f84a.org
<br />
;     Editorial Ra-Ma.  <!-- w --><a href="http://www.ra-ma.es" target="_blank">www.ra-ma.es</a><!-- w -->
<br />
;   ===================================================================
<br />
;
<br />
; SISTEMA DE GOBIERNO DESDE ORDENADOR: Desde el teclado de un ordenador se desea comandar
<br />
; el movimiento de una estructura móvil, según la siguiente tabla:
<br />
;
<br />
;   TECLA (Por ejemplo)        MOVIMIENTO
<br />
;   -------------------        ----------
<br />
;         t        Adelante
<br />
;         b        Atrás
<br />
;         a        Izquierda
<br />
;         l        Derecha
<br />
;        Espacio         Parada
<br />
;
<br />
; La pulsación de cualquiera de estas teclas activa el estado de las salidas correspondiente
<br />
; RB3 (Adelante), RB2 (Atrás), RB1 (Izquierda), RB0 (Derecha) y apaga el resto.
<br />
;
<br />
; El movimiento que se está realizando aparece reflejado en un mensaje en el visualizador LCD
<br />
; del sistema y también en la pantalla del ordenador.
<br />
;
<br />
; El programa debe permitir modificar facilmente en posteriores revisiones en el hardware de
<br />
; la salida. Es decir, para activar las salidas conviene utilizar el direccionamiento por bit
<br />
; en lugar de por byte (utilizar instrucciones &quot;bsf&quot; y &quot;bcf&quot;, en lugar de &quot;mov..&quot;).
<br />
;
<br />
; ZONA DE DATOS **********************************************************************
<br />
 
<br />
    list        P=16F84A
<br />
    include  &lt;P16F84A.INC&gt;
<br />
    __CONFIG    _CP_OFF &amp;  _WDT_OFF &amp; _PWRTE_ON &amp; _XT_OSC
<br />
 
<br />
    CBLOCK   0x0C      
<br />
    TeclaPulsada                    ; Va a guardar el contenido de la tecla pulsada.
<br />
    MensajeApuntado     ; Va a guarda la dirección del mensaje apuntado.
<br />
    Relay_1
<br />
    Relay_2
<br />
    Relay_3
<br />
    Relay_4
<br />
    ENDC
<br />
 
<br />
#DEFINE  SalidaR1      PORTB,3    ; Define dónde se sitúan las salidas.
<br />
#DEFINE  SalidaR2      PORTB,2
<br />
#DEFINE  SalidaR3      PORTB,1
<br />
#DEFINE  SalidaR4      PORTB,0
<br />
 
<br />
 
<br />
TECLA_RELE_1_ON  EQU  'q'            ; Código de las teclas utilizadas.
<br />
TECLA_RELE_1_OFF    EQU 'a'
<br />
TECLA_RELE_2_ON  EQU  'w'
<br />
TECLA_RELE_2_OFF    EQU 's'
<br />
TECLA_RELE_3_ON  EQU  'e'
<br />
TECLA_RELE_3_OFF    EQU 'd'
<br />
TECLA_RELE_4_ON  EQU  'r'
<br />
TECLA_RELE_4_OFF    EQU 'f'
<br />
TECLA_INICIO        EQU 'z'
<br />
TECLA_PARADA        EQU ' '
<br />
TECLA_INFO      EQU 'i'            ; Código de la tecla espaciadora, (hay un espacio,
<br />
                                    ; tened cuidado al teclear el programa).
<br />
ENTER         EQU    0x0A            ; Código de tecla &quot;Enter&quot; o &quot;Retorno de Carro&quot;.
<br />
CAMBIO_LINEA    EQU 0x0D   ; Código para el cambio de línea.
<br />
 
<br />
    ORG 0x2100                  ; Corresponde a la dirección 0 de la zona EEPROM
<br />
                                    ; de datos.
<br />
    DE  0x00, 0x00, 0x00, 0x00
<br />
 
<br />
; ZONA DE CÓDIGOS ********************************************************************
<br />
 
<br />
    ORG 0
<br />
Inicio
<br />
    call    LCD_Inicializa
<br />
    call    RS232_Inicializa
<br />
    bsf  STATUS,RP0            ; Configura como salidas las 4 líneas del
<br />
    bcf  SalidaR1   ; del Puerto B respetando la configuración del
<br />
    bcf  SalidaR2    ; resto de las líneas.
<br />
    bcf  SalidaR3
<br />
    bcf  SalidaR4
<br />
    bcf  STATUS,RP0
<br />
    call    Parado          ; En principio todas las salidas deben estar 
<br />
Principal                     ; apagadas.
<br />
    call    RS232_LeeDato         ; Espera a recibir un carácter.
<br />
    call    TesteaTeclado
<br />
    goto    Principal
<br />
 
<br />
; &quot;Mensajes&quot; ----------------------------------------------------------------------------
<br />
;
<br />
Mensajes
<br />
    addwf   PCL,F
<br />
MensajeParado
<br />
    DT &quot;Sistema PARADO&quot;, 0x00
<br />
Mensaje_R1_ON
<br />
    DT &quot;RELE 1 ON&quot;, 0x00
<br />
Mensaje_R1_OFF
<br />
    DT &quot;RELE 1 OFF&quot;, 0x00
<br />
Mensaje_R2_ON
<br />
    DT &quot;RELE 2 ON&quot;, 0x00
<br />
Mensaje_R2_OFF
<br />
    DT &quot;RELE 2 OFF&quot;, 0x00
<br />
Mensaje_R3_ON
<br />
    DT &quot;RELE 3 ON&quot;, 0x00
<br />
Mensaje_R3_OFF
<br />
    DT &quot;RELE 3 OFF&quot;, 0x00
<br />
Mensaje_R4_ON
<br />
    DT &quot;RELE 4 ON&quot;, 0x00
<br />
Mensaje_R4_OFF
<br />
    DT &quot;RELE 4 OFF&quot;, 0x00
<br />
Mensaje_Info
<br />
;   DT 0xC9, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xBB
<br />
;   DT ENTER, CAMBIO_LINEA
<br />
    DT 0xBA, &quot; FirmWare v1.00     &quot;, 0xBA
<br />
    DT ENTER, CAMBIO_LINEA
<br />
    DT 0xBA, &quot; PIC16F84A          &quot;, 0xBA
<br />
    DT ENTER, CAMBIO_LINEA
<br />
    DT 0xBA, &quot; 4 MHz              &quot;, 0xBA
<br />
;   DT ENTER, CAMBIO_LINEA
<br />
;   DT 0xCC, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xCD, 0xB9
<br />
    DT ENTER, CAMBIO_LINEA
<br />
    DT &quot;  <!-- e --><a href="mailto:metaconta@gmail.com">metaconta@gmail.com</a><!-- e -->&quot;, 0x00
<br />
Mensaje_Activar
<br />
    DT &quot;Todos activos&quot;, 0x00
<br />
 
<br />
; Subrutina &quot;TesteaTeclado&quot; -------------------------------------------------------------
<br />
;
<br />
; Testea el teclado y actúa en consecuencia.
<br />
 
<br />
TesteaTeclado
<br />
    movwf   TeclaPulsada         ; Guarda el contenido de la tecla pulsada.
<br />
    xorlw   TECLA_RELE_1_ON            ; ¿Es la tecla del movimiento hacia adelante?
<br />
    btfsc   STATUS,Z
<br />
    goto    R1_ON            ; Sí, se desea movimiento hacia adelante.
<br />
;
<br />
    movf    TeclaPulsada,W      ; Recupera el contenido de la tecla pulsada.
<br />
    xorlw   TECLA_RELE_1_OFF         ; ¿Es la tecla del movimiento hacia atrás?
<br />
    btfsc   STATUS,Z
<br />
    goto    R1_OFF          ; Sí, se desea movimiento hacia atrás.
<br />
;
<br />
    movf    TeclaPulsada,W      ; Recupera el contenido de la tecla pulsada.
<br />
    xorlw   TECLA_RELE_2_ON                ; ¿Es la tecla del movimiento hacia la izquierda?
<br />
    btfsc   STATUS,Z
<br />
    goto    R2_ON            ; Sí, se desea movimiento hacia la izquierda.
<br />
;
<br />
    movf    TeclaPulsada,W      ; Recupera el contenido de la tecla pulsada.
<br />
    xorlw   TECLA_RELE_2_OFF            ; ¿Es tecla del movimiento hacia la derecha?
<br />
    btfsc   STATUS,Z
<br />
    goto    R2_OFF        ; Sí, se desea movimiento hacia la derecha.
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_RELE_3_ON                
<br />
    btfsc   STATUS,Z
<br />
    goto    R3_ON            
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_RELE_3_OFF            
<br />
    btfsc   STATUS,Z
<br />
    goto    R3_OFF        
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_RELE_4_ON                
<br />
    btfsc   STATUS,Z
<br />
    goto    R4_ON            
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_RELE_4_OFF            
<br />
    btfsc   STATUS,Z
<br />
    goto    R4_OFF          
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_INICIO            
<br />
    btfsc   STATUS,Z
<br />
    goto    Activar     
<br />
;
<br />
    movf    TeclaPulsada,W      
<br />
    xorlw   TECLA_INFO    
<br />
    btfsc   STATUS,Z
<br />
    goto    Info                    
<br />
;
<br />
    movf    TeclaPulsada,W      ; Recupera el contenido de la tecla pulsada.
<br />
    xorlw   TECLA_PARADA         ; ¿Es la tecla de parada?.
<br />
    btfss   STATUS,Z
<br />
    goto    Fin      ; No es ninguna tecla de movimiento. Sale.
<br />
Parado
<br />
    bcf  SalidaR1   ; Como se ha pulsado la tecla de parada se
<br />
    bcf  SalidaR2    ; desactivan todas las salidas.
<br />
    bcf  SalidaR3
<br />
    bcf  SalidaR4
<br />
    movlw   MensajeParado
<br />
    goto    Visualiza
<br />
R1_ON
<br />
    bsf  SalidaR1
<br />
    movlw   Mensaje_R1_ON
<br />
    goto    Visualiza
<br />
R1_OFF
<br />
    bcf  SalidaR1
<br />
    movlw   Mensaje_R1_OFF
<br />
    goto    Visualiza
<br />
R2_ON
<br />
    bsf  SalidaR2
<br />
    movlw   Mensaje_R2_ON
<br />
    goto    Visualiza
<br />
R2_OFF
<br />
    bcf  SalidaR2
<br />
    movlw   Mensaje_R2_OFF
<br />
    goto    Visualiza
<br />
R3_ON
<br />
    bsf  SalidaR3
<br />
    movlw   Mensaje_R3_ON
<br />
    goto    Visualiza
<br />
R3_OFF
<br />
    bcf  SalidaR3
<br />
    movlw   Mensaje_R3_OFF
<br />
    goto    Visualiza
<br />
R4_ON
<br />
    bsf  SalidaR4
<br />
    movlw   Mensaje_R4_ON
<br />
    goto    Visualiza
<br />
R4_OFF
<br />
    bcf  SalidaR4
<br />
    movlw   Mensaje_R4_OFF
<br />
    goto    Visualiza
<br />
Activar
<br />
    bsf  SalidaR1   ; Como se ha pulsado la tecla de parada se
<br />
    bsf  SalidaR2    ; desactivan todas las salidas.
<br />
    bsf  SalidaR3
<br />
    bsf  SalidaR4
<br />
    movlw   Mensaje_Activar
<br />
    goto    Visualiza
<br />
Info
<br />
    movlw   Mensaje_Info
<br />
 
<br />
; Según el estado de las salidas visualiza el estado del sistema en el visualizador LCD y en
<br />
; el monitor del ordenador.
<br />
 
<br />
Visualiza
<br />
    movwf   MensajeApuntado            ; Guarda la posición del mensaje.
<br />
    call    LCD_Borra            ; Borra la pantalla del modulo LCD.
<br />
    movf    MensajeApuntado,W      ; Visualiza el mensaje en la pantalla
<br />
    call    LCD_Mensaje    ; del visualizador LCD.
<br />
    call    RS232_LineasBlanco    ; Borra la pantalla del ordenador.
<br />
    movf    MensajeApuntado,W
<br />
    call    RS232_Mensaje         ; Lo visualiza en el HyperTerminal.
<br />
    call    RS232_LineasBlanco
<br />
Fin return
<br />
 
<br />
    include  &lt;RS232.INC&gt;
<br />
    include  &lt;RS232MEN.INC&gt;
<br />
    include  &lt;LCD_4BIT.INC&gt;
<br />
    include  &lt;LCD_MENS.INC&gt;
<br />
    include  &lt;RETARDOS.INC&gt;
<br />
    include  &lt;EEPROM.INC&gt;
<br />
    end
<br />

Un cordial saludo.

EDITO:
Lo estoy intentado en esta parte:

Código

R1_ON
<br />
    clrw
<br />
    call    EEPROM_LeeDato
<br />
    movwf   Relay_1
<br />
 
<br />
    movf    Relay_1,W
<br />
    call    EEPROM_EscribeDato
<br />
 
<br />
    bsf  SalidaR1
<br />
    movlw   Mensaje_R1_ON
<br />
    goto    Visualiza

La idea es que si en el PORTB hay en la salida b'10100100', que se guarde ese valor del puerto B en la EEPROM. El motivo es por si se apaga la luz, se queda sin batería o cualquier otra cosa, al reiniciar el PIC de nuevo, lea los últimos valores que estaban antes de quedarse sin pilas.

colgau

Asunto:

Publicado: 31 Ago, 2009 - 10:23

Habitual

Registrado: 06 Feb, 2009
Mensajes: 75
Ubicación: xixon

hola, pos la verdad esque nunca me habia planteao este problema, y supongo que el problema esta en la linea 3. Declaras a DE 0x00; asi debes poner el resto de variables relay que declaras en CBLOCK, cada uno con una direccion de lqa eeprom. Como no he leido el codigo porque entre librerias y ese programa me raya un poco(yo no uso MPLAB sino el block de notas), no se para que usas el DE, supongo que era con este objetivo, que almacenase los estados.Aún asi es solo una idea,esperemos que los expertos digan algo.
Un saludo

Meta

Asunto:

Publicado: 31 Ago, 2009 - 10:53

Experto

Registrado: 03 Sep, 2008
Mensajes: 125

Hola:

Te dejo el proyecto completo.

Saludo.

META_CONTROL.zip

Descripción:

OpenSource

Descargar

Nombre del archivo:

META_CONTROL.zip

Tamaño:

53,61 KB

Descargado:

689 veces

colgau

Asunto:

Publicado: 01 Sep, 2009 - 04:56

Habitual

Registrado: 06 Feb, 2009
Mensajes: 75
Ubicación: xixon

no visualizo el archivo, ya te conmenté que no uso ningun programa para desarrollar codigo, pero no te preocupes, creo que no me has entendido. Vamos por partes:
los Relay1 relay2,relay3 y relay4 los tienes declarados en CBLOCK, no?, pues creo que los tienes que quitar de ahí y ponerlos a continuacion de DE:
DE 00h
Relay1 01h
relay2 02h
etc
de esta manera deberia registrar en la eeprom. Aunque como te comenté nunca se me habia presentado esta cuestion, es solo una conjetura. Suerte y un saludo.

Cambiar a:

Todas las horas son GMT

Índice de los Foros Electronica Facil » FOROS ELECTRONICA » Microcontroladores PIC