SoloCodigo

Muy buenas, estoy  usando un PIC16F876 recibiendo datos por la UART, si hago un retardo largo en el programa principal y durante ese retardo le envio los datos, funciona perfectamente, pero el aparato funcionaria a baterias, por lo que deberia dormirlo cuando no haya datos y despertarlo en cuanto comience a recibir datos. Para despertarlo he puenteado las lineas RX y RB0 y he programado la interrupcion INT0, como no uso el puertoB puedo hacerlo sin problemas y ademas el micro se despertara antes de que haya terminado el bit de "start" y pueda coger todo el primer byte correctamente. Pues bien, al llegar los datos, el micro se despierta, pero no recibe los datos, cuando entra en la rutina de atencion a la INT0 la desprogramo porque ya no me hace falta y asi solamente saltara la interrupcion por recepcion, he comprobado con un led los flags necesarios para la recepcion y estan correctamente, tambien he comprobado con un contador que sin dormirlo recibe 11 datos (correcto) y durmiendolo no recibe ningun dato . Algo pasa al dormirlo que me estropea la recepcion de datos y no se que es, he probado a volver a configurarlo segun salta la INT0 y ese tipo de cosas pero nada. No se si es porque no recibe bien el primer bit y pierde toda la sincronizacion o que le pasa.

Gracias y un saludo.

Muy buenas. Llevo unos dias atascado (otra vez...) Utilizo un 16F876, la interrupcion del tmr0 y la del RB a la vez, cuando salta el timer mira el ADC y me saca el valor por pantalla, y cuando acciono el pulsador me cambia el valor de un registro y asi en el programa principal, que no es mas que un bucle que decide si conectar el timer o no, decide segun ese registro si el aparato funciona o no. Si no funciona desactiva el timer para que no muestre en pantalla y se duerme, y si funciona activa el timer si es que estaba desactivado y hace un retardo.
El problema que tengo es que salta el flag RBIF constantemete, cada vez que salta la interrupcion por lo que sea miro si esta a 1 y muestro en el LCD una letra, lo borro y despues hace lo del ADC. Supuestamente si yo no acciono el pulsador, RBIF no se puede poner a 1 y por lo tanto no ha de mostrarme la letra en pantalla, ademas que al borrar el flag siempre que entra, parece como si el pulsador estuviese constantemente pulsandose, ya que para saltar necesita el flanco de bajada en la patilla RB7... Como no sea el LCD que me esta interaccionando no se me ocurre nada, el tema es que si no activo el timer, me funciona perfectamente la rutina del pulsador, se activa y desactiva bien, pero en cuanto le pongo el timer como que se estorban... asi que no creo que sea por el LCD. Cualquier tipo de ayuda sera agradecida.

Saludos.

Muy buenas. Tengo un dispositivo con un 16F876 en el que he desarrollado dos codigos, uno consiste en manejar teclado y pantalla, esto me funciona bien, el otro consiste en enviar unos datos sencillos por el puerto serie, tambien me funciona bien, pero cuando junto los codigos, osea, primero pido los datos y luego intento enviarlos, la parte de pedirlos funciona bien, pero la parte de enviarlos funciona mal, el caso es que por separado todo funciona bien y si lo junto deja de funcionar. He probado a modificar los valores de los registros principales y reescribirlos con los datos que habia al principio, para hacer como una especie de "reset" en caliente, pero sigue igual, creo que una solucion seria conseguir una especie de reset en caliente sin que pierda los datos de la ram y que la parte de enviar funcione como cuando esta sola. No es que sea una solucion muy buena, pero no se me ocurre otra cosa, y haciendolo como creo que deberia ser no funciona. ¿Alguien puede ayudarme?

Gracias y un saludo.

Muy buenas. Mas que el teclado lo que no funciona es el salto a la interrupcion. No se que error cometo, pero he probado muchas configuraciones y cosas raras y tampoco funciona. El tema es que lo dejo en sleep y cuando salte la interrupcion solamente me muestre algo en pantalla, porque con el teclado no hay manera y sin embargo el LCD funciona bien, pero ni con esas, la interrupcion por actividad en el puerto B no furrula, y la conexion al teclado es bastante sencilla, no se si cambiando a otras configuraciones que he visto con las resistencias pull up fuera del micro puede que funcione...
Si alguien ve algun fallo por favor que lo diga.

Gracias y un saludo.

      

      processor 16F876A

      LIST   P=16F876A   ;Se indica el modo de procesador
      
      INCLUDE   <P16f876A.inc>   ;se incluye la definicion de los
               ;registros internos

      __config 3D31
      


PDel0      EQU   0x21
PDel1      EQU   0x22
PDel2      EQU   0x23
BUFFER      EQU   0x24
INNER      EQU   0x25      ;delay variable mS
OUTER      EQU   0x26      ;delay variable mS
Digito      EQU   0x27

ASCII_H      EQU   0x31
ASCII_M      EQU   0x32
ASCII_L      EQU   0x33

HEXADECIMAL   EQU   0x34


;*************** PARA EL TECLADO ***************************
;


;*********************************************************


;----------------------------------------------------------------------------


      org    0x00      ;vector de inicio
      goto    INICIO


      org    0x05      ;despues del vector de interrupcion
      goto   ServicioInterrupcion


      

;<<<<<<----------------- INICIO PROGRAMA PRINCIPAL ------------------->>>>>>>
;----------------------------------------------------------------------------

INICIO   
      bcf   STATUS,RP0   ;banco 0 _-_-_-_-_-_-_-_-_-_-_-_-_-_-
      bcf   STATUS,RP1
      clrf   PORTA      ;Limpia latches puerto
      clrf   PORTB      ;Limpia latches puerto
      clrf   PORTC      ;Limpia latches puerto
      
      bsf   STATUS,RP0   ;banco 1 _-_-_-_-_-_-_-_-_-_-_-_-_-_-
         
      movlw   0x06      ;Puerto A en modo digital
      movwf   ADCON1
      clrf   TRISA      ;PortA como entrada
      clrf   TRISB      ;PortB como salida
      clrf   TRISC      ;PortC como salida
      
      bcf   STATUS,RP0   ;banco 0 _-_-_-_-_-_-_-_-_-_-_-_-_-_-
      
      clrf   PORTA      ;Limpia latches puerto
      clrf   PORTB      ;Limpia latches puerto
      clrf   PORTC      ;Limpia latches puerto

      


;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
   call    LCD_INI
   movlw   b'00000001'     ;Borrar LCD y Home    
    call    LCD_REG                                    
    movlw   b'00000110'     ;                          
    call    LCD_REG                                    
    movlw   b'00001100'     ;LCD On, cursor Off,Parpadeo Off
    movlw   0x80            ;Direccion caracter
    call    LCD_REG  
      movlw   '0'
      call    LCD_DATOS       ;Visualiza caracter
   
;''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

;###############################################################################
;   PROBANDO TECLADO

   call    Teclado_Inicializa

   movlw   b'11001000'         ; Habilita la interrupción RBI, perifericos y la general.
   movwf   INTCON

   sleep

;   movlw   b'00000000'         ; deshabilita las interrupciónes del teclado
;   movwf   INTCON






aux2   call    PDelay      ;retardo de 2 segundos
      goto   aux2
   




;###########################################################################
;###########################################################################
del_1ms      movlw   d'199'      ;delay 1mS
      movwf   INNER
in_lp      nop
      nop
      decfsz   INNER,F
      goto   in_lp
      return

delay      movwf   OUTER      ;vueltas de 1mS
out_lp      call   del_1ms
      decfsz   OUTER,F
      goto   out_lp
      return
      


;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()
;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()
;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()
   
Hex_Ascii   ;cargar en W el dato hex.
;
      ;MOVLW   .254
      MOVWF   HEXADECIMAL
            clrf    ASCII_H          ;Para BCD D'0'
            clrf    ASCII_M       ;Para BCD D'0'
            clrf    ASCII_L         ;Para BCD D'0'
;
Centenas
;
            movlw     D'100'          ;D'100' --> W
            subwf   HEXADECIMAL,W   ;HEXADECIMAL - D'100' --> W
            btfss   STATUS,C        ;¿ HEXADECIMAL es menor que D'100' ?
            goto    Decenas         ;Si
            movwf   HEXADECIMAL     ;Salva el resto
            incf    ASCII_H,F       ;Incrementa el contador de centenas BCD
            goto    Centenas        ;Vuelve por otros D'100'
;
Decenas
;
            movlw   D'10'             ;D'10' --> W
            subwf   HEXADECIMAL,W   ;HEXADECIMAL - D'10' --> W
            btfss   STATUS,C        ;¿ HEXADECIMAL es menor que D'10' ?
            goto    Unidades        ;Si
            movwf   HEXADECIMAL     ;Salva el resto
            incf    ASCII_M,F       ;Incrementa el contador de decenas BCD
            goto    Decenas         ;Vuelve por otros D'10'
;
Unidades
;
            movf    HEXADECIMAL,W   ;El resto pertenece
            movwf   ASCII_L         ;a las unidades BCD
            clrf    HEXADECIMAL     ;Pone a cero el registro HEXADECIMAL
;
Bcd_A_Ascii
;
            movlw    H'30'           ;H'30' --> W
            iorwf   ASCII_L,F       ;Convierte de BCD a ASCII
            iorwf   ASCII_M,F       ;Convierte de BCD a ASCII
;
            movf    ASCII_H,F       ;ASCII_H --> F
            btfsc   STATUS,Z                ;? ASCII_H es D'00' ?
            goto    Espacio         ;Si
            movlw   H'30'           ;H'30' --> W
            iorwf   ASCII_H,F       ;Convierte de BCD a ASCII
            return                  ;Retorna
;
Espacio
;
            movlw   '0'            ;A' ' --> W
            movwf   ASCII_H     ;A' ' --> ASCII_H
            ;movwf   ASCII_M     ;A' ' --> ASCII_H
            ;movwf   ASCII_L     ;A' ' --> ASCII_H
            return                  ;Retorna
;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()
;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()
;()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()









;###########################################################################
;===========================================================================
;--------------------- RUTINAS LCD 2x16 ------------------------------------
;===========================================================================
;###########################################################################

LCD_E           BSF     PORTA,2         ;Activa señal E
                NOP
                NOP
                NOP                     ;Espera 1uS
                BCF     PORTA,2         ;Desactiva señal E
                RETURN        
                             
LCD_BUSY        BSF     PORTA,1         ;Pone el LCD en modo lectura
                BSF     STATUS,RP0      ;Selecciona el Banco 1
                MOVLW   0xFF  
                MOVWF   TRISB           ;Puerta B act£a de entrada
                BCF     STATUS,RP0      ;Selecciona el Banco 0
                BSF     PORTA,2         ;Activa el LCD (Señal E)
                NOP          
L_BUSY          BTFSC   PORTB,7         ;Chequea el bit BUSY
                GOTO    L_BUSY          ;Est  a "1" (Ocupado)
                BCF     PORTA,2         ;Desactiva el LCD (Se¤al E)
                BSF     STATUS,RP0      ;Selecciona el Banco 1
                CLRF    TRISB           ;Puerta B actua como salida
                BCF     STATUS,RP0      ;Selecciona el Banco 0
                BCF     PORTA,1         ;Pone el LCD en modo escritura
                RETURN        
                             
LCD_REG         BCF     PORTA,0         ;Desactiva RS (Modo instruccion)
                MOVWF   PORTB           ;Saca el codigo de instruccion
                CALL    LCD_BUSY        ;Espera a que se libere el LCD
                GOTO    LCD_E           ;Genera pulso en señal E
                             
LCD_DATOS       BCF     PORTA,0         ;Desactiva RS (Modo instrucci¢n)
                MOVWF   PORTB           ;Valor ASCII a sacar por PORTB
                CALL    LCD_BUSY        ;Espera a que se libere el LCD
                BSF     PORTA,0         ;Activa RS (Modo dato)  
                GOTO    LCD_E           ;Genera pulso en señal E
                             
LCD_INI         MOVLW   b'00111000'
                CALL    LCD_REG         ;Codigo de instruccion
                CALL    DELAY_5MS       ;Temporiza 5 mS.
                MOVLW   b'00111000'
                CALL    LCD_REG         ;Codigo de instruccion
                CALL    DELAY_5MS       ;Temporiza 5 mS.
                MOVLW   b'00111000'
                CALL    LCD_REG         ;Codigo de instruccion
                CALL    DELAY_5MS       ;Temporiza 5 mS.
                RETURN            
                             
;****************************************************************************                                                              
;DELAY_5MS genera una temporizacion de 5mS necesario para la secuencia de
;inicio del LCD                        
                                       
DELAY_5MS     movlw   .6           ; 1 set number of repetitions (
           movwf   PDel0        ; 1 |
PLoop1     movlw   .207         ; 1 set number of repetitions (A)
              movwf   PDel1        ; 1 |
PLoop2       nop                 ; 1 clear watchdog
           decfsz  PDel1, 1     ; 1 + (1) is the time over? (A)
           goto    PLoop2       ; 2 no, loop
           decfsz  PDel0,  1    ; 1 + (1) is the time over? (
           goto    PLoop1       ; 2 no, loop
PDelL1     goto   PDelL2         ; 2 cycles delay
PDelL2     nop                 ; 1 cycle delay
           return                 ; 2+2 Done
;###########################################################################



;-------------------------------------------------------------
; Description: Waits 2000000 cycles     2 segundos
;-------------------------------------------------------------
PDelay     movlw   .167      ; 1 set number of repetitions (C)
           movwf   PDel0     ; 1 |
PLoop0s     movlw   .41       ; 1 set number of repetitions (
           movwf   PDel1     ; 1 |
PLoop1s     movlw   .72       ; 1 set number of repetitions (A)
           movwf   PDel2     ; 1 |
PLoop2s     nop              ; 1 clear watchdog
           decfsz  PDel2, 1  ; 1 + (1) is the time over? (A)
           goto    PLoop2s    ; 2 no, loop
           decfsz  PDel1,  1 ; 1 + (1) is the time over? (
           goto    PLoop1s    ; 2 no, loop
           decfsz  PDel0,  1 ; 1 + (1) is the time over? (C)
           goto    PLoop0s    ; 2 no, loop
PDelL1s     goto    PDelL2s         ; 2 cycles delay
PDelL2s     nop              ; 1 cycle delay
           return              ; 2+2 Done
;-------------------------------------------------------------














ServicioInterrupcion

   call    LCD_INI
   movlw   b'00000001'     ;Borrar LCD y Home    
    call    LCD_REG                                    
    movlw   b'00000110'     ;                          
    call    LCD_REG                                    
    movlw   b'00001100'     ;LCD On, cursor Off,Parpadeo Off
    movlw   0x81            ;Direccion caracter
    call    LCD_REG  
      movlw   '0'
      call    LCD_DATOS       ;Visualiza caracter
   retfie



      END

Muy buenas. Tengo un problema al tener habilitadas varias interrupciones a la vez, concretamente de los timers y INT0 y las RB. Me ocurre, que cuando esta atendiendo a la interrupcion del timer0 y salta la del timer2, no se activa el bit de señalización, asi que cuando sale de la rutina de atencion que estaba atendiendo, no entra a la del timer2 (lo uso de cronometro, asi que es esencial que entre). Parecido ocurre con las RB4-7, pero al reves, si salta la irq, hace bien la rutina, pero no se borra el bit de aviso, ni con "bcf   INTCON,RBIF" ni "bcf   INTCON,0" y entra en un bucle sin salida ya que nunca se borra.
¿Alguien sabe que ocurre?
Gracias de antemano y un saludo.

Muy buenas. Quiero mostrar en un LCD de 4x20, en la primera linea, una barra que muestre el "valor" del conversor analogico digital, cuando este sea 0 no se mostrara nada, cuando sea 255 (maximo) que muestre la 1º linea llena de cuadrados rellenos (caracter FF del LCD compatible hitachi). Para convertir los 255 valores en 20, realizo una division a base de restas, 255/13 = 19,algo asi que resto 13 y muestro cuadrados hasta que el valor de "Barra" sea <0, testeando el flag C que se pondra a uno, salgo del bucle. El asunto es que no funciona, se enciende solamente el 1º caracter y en algunos valores concretos se apaga, los demas caracteres de la linea no se encienden nunca, y es algo que no logro entender. El lcd funciona perfectamente,  es el algoritmo el que falla porque sin la division funciona bien (pero no se ajusta a los 20 caracteres). Uso el pic 16f876, por si sirve de algo. Es la unica forma de poder ajustar por software (que yo sepa), la otra opción sería con un divisor de tension mediante un potenciometro a la entrada del conversor, pero preferiría averiguar porque no funciona así.

Gracias y un saludo.

x_salta    
      movlw 0x0D             ; W=13
      subwf   Barra,1      ; barra = barra - 13

      btfsc   STATUS,C
      return

      movlw   0xFF         ; caracter
      call    LCD_DATOS       ; Visualiza caracter
      goto x_salta

Muy buenas. Tengo un display hitachi de 4x20 caracteres y quiero probarlo con un programa simple.
He visto un codigo en internet muy interesante:

http://www.x-robotics.com/downloads/rutinas/X-Temp_LM35.txt

Mas o menos hace lo que yo quiero, (pongo el mio adjunto) que es mirar la tension en AN0 y sacarlo por el display, en realidad el programa mira en 4 entradas, pero como yo solo uso la AN0, he borrado las rutinas que hacen el resto. No se usan librerias, va todo  en rutinas.
El unico inconveniente es que esta realizado para un display de 2x16, no se si sera por eso que no funciona.
Mi display tiene la pantalla azul oscuro, modificando el contraste consigo que 2 filas de las 4 se pongan mas o menos blancas, imagino que es lo que tiene que hacer, pero no se si tengo que encender los led de la retroiluminacion para ver algo.
Estoy por probar el programa sin modificar a ver que pasa...
Saludos.

Muy buenas. Quiero usar un pic 12f509, pero me encuentro por ahí que es OTP, osea, solo programable una vez. Me llama la atención que en la web de microchip indican que la memoria es del tipo "Standard Flash", por lo que no entiendo a que se debe que solo sea programable una sola vez.
Otra cosilla. He encontrado el 12c508 en smd, pero tiene poca ram y necesito usar por lo menos el 509, pero no lo encuentro en smd. ¿alguien sabe de algun sitio para comprarlo?
Un saludo.

Muy buenas de nuevo. He declarado una variable "ABAJO" cuyo valor puede ser '0' o '1', para indicarle a la rutina de giro de un motor que gire en un sentido o en el otro. La curiosidad, es que a partir de una posicion del programa, en cada paso que doy en el simulador, esta variable se me incrementa inexplicablemete, lo que hace que el programa funcione mal. Las demas estan bien, es solamente esta la que se incrementa. ¿Es cosa del MPASM?¿virus?¿cachondeo?
Saludos.

Muy buenas. ¿Alguien sabe el tiempo de retardo minimo que hay que darle a un motor PAP para que funcione bien?
Un saludo.

Buenas. ¿Se pueden declarar variables para el MPASM de forma parecida al PicBasicPro? (perro var byte ; gato var bit ; W0 var word ; sharks var byte[10]....) ¿Se pueden declarar las variables como espacios  (pepe .space 8)?
Saludos.

Hace años utilice el micropic trainer, en una web de electronica que tenia muy buena pinta he visto otro muy polivalente, estoy a ver si lo localizo. Cual comprariais? Sirven de verdad para hacer todo tipo de pruebas?
Saludetes.

Buenas, estoy haciendo mis primeros pinitos con pics, he bajado de la red unos ejemplos de programas para controlar motores, sensores y demas, pero al complilarlos con el MpAsmWin me da error de que ciertas variables usadas en el programa no han sido declaradas. Sin embargo, se supone que los asm tiene que funcionar perfectamente y las variabes a veces si estan declaradas (Lcd_var):

CBLOCK   Lcd_var         ;Inicio de las variables

y otras veces no (RP0 aparece aqui por primera vez):

UP_LCD          bsf     STATUS,RP0      ;Banco 1

Asi me pasa con otras variables llamadas Z, W... etc que no estan declaradas por ningun lado. Sin embargo, en otros codigos asm que compilo me aparece lo mismo, pero no da error!!! (Z no ha sido declarada anteriormente):

btfss   STATUS,Z   ;Mira si es el último (0x00)

En este ultimo ejemplo el pic es un 16f876, lo que me da pensar que el 16f84 (el utilizado en los ejemplos anteriores) no tiene esos registros y por lo tanto el codigo tiene el tipo de pic mal declarado.
¿Las declaro como Z equ 0? mejor seria Z res 1? o es el compilador que esta mal??
saludos.