Autor Tema: Problemas al programas un 16f690  (Leído 1035 veces)

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado CORDEL

  • PIC10
  • *
  • Mensajes: 1
Problemas al programas un 16f690
« en: 21 de Abril de 2014, 21:52:36 »
Buen dia, tengo un problema con un pic 16f690 realize un sencillo codigo un contador de 0 a 9 y lo simule con proteus y funciona perfectamente, lo pruebo con el simulador de mplab y trabaja, pero al grabar el pic no funciona, encontre el problema en la trabla, si hago el mismo trabajo sin tablas no hay problemas, pero al agregar las tabalas y utilizar el pcl el pic se traba adjunto copia del codigo para verificar si el problema esta en el codigo estoy utilizando un pickit3 para grabar el pic.

Código: ASM
  1.  

list p=16F690 ; list directive to define processor
#include <p16F690.inc> ; processor specific variable definitions


__CONFIG _CP_OFF & _CPD_OFF & _BOR_OFF & _MCLRE_ON & _WDT_OFF & _PWRTE_ON & _INTRC_OSC_NOCLKOUT & _FCMEN_OFF & _IESO_OFF

PCL      EQU  0X02
CBLOCK   0X20
CONTADOR
MEMORIA   
MEMORIA1
DELAY1
DELAY2
ENDC



      ORG    0

start
   BSF   STATUS,RP0
   MOVLW   B'00000000'
   MOVWF   PORTC
   
   BCF   STATUS,RP0
      
            MOVLW   MEMORIA
BAR         MOVF   MEMORIA,W
         CALL   TABLA
         MOVWF   PORTC
            
ONDELAYLOOP   DECFSZ   DELAY1,F
         GOTO   ONDELAYLOOP
         DECFSZ   DELAY2,F
         GOTO   ONDELAYLOOP
                           
         INCF   MEMORIA
         MOVF   MEMORIA,W
         XORLW   0AH
         BTFSS   STATUS,Z
         GOTO   BAR
         CLRF   MEMORIA
         GOTO   BAR   

      
TABLA      ADDWF   PCL,F
         RETLW   B'11000000'   ;DIGITO0   63
         RETLW   B'11111001'   ;DIGITO1   6
         RETLW   B'10100100' ;DIGITO2   91   
         RETLW   B'10110000' ;DIGITO3   79
         RETLW   B'10011001'   ;DIGITO4   102
         RETLW   B'10010010'   ;DIGITO5   109
         RETLW   B'10000010' ;DIGITO6   125
         RETLW   B'11111000' ;DIGITO7   7
         RETLW   B'10000000' ;DIGITO8   127
         RETLW   B'10010000'   ;DIGITO9   111

END   


espero me puedan ayudar.


 

anything