Autor Tema: Ayuda rutina numero multiplo de otro  (Leído 1500 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado dnilo3a

  • PIC10
  • *
  • Mensajes: 3
Ayuda rutina numero multiplo de otro
« en: 12 de Octubre de 2009, 15:08:24 »

Hola tengo un problema con el siguiente codigo , la idea es que el puerto b este como entrada si pongo ahi un numero multiplo de 3 en el puerto c rc0 enciende si no lo es entonces se apaga, ya he verificado varias veces y en la simulacion no me esta funcionando me sale el led intermitente cuando pongo 0 o cualquier numero


si por favor me pueden colaborar 

gracias


Codigo


 LIST P = 16F877A            ;indica tipo de micro
 INCLUDE "P16F877A.INC"


 LIST

              NUM1         EQU 20H
            temp  EQU 21H
      
            BSF              STATUS,RP0  ; se pasa al banco 1
            MOVLW          B'11111111'
            MOVWF          TRISB     ; puerto b como entrada
            MOVLW          B'00000000'
            MOVWF          TRISC ;puerto c como salida
            BCF           STATUS,RP0  ; se pasa al banco 0
              CLRF         PORTC
leer   
      
            CLRF          NUM1
             CLRF         PORTC
   
   
INICIO   
                 movlw PORTB   ; copiio lo del puerto b a w
                  movwf NUM1    ; copio lo del w al num1
 
resta             movlw b'00000011'
                  subwf  NUM1,1   ; resto num1 - 3
                  btfsc  STATUS,Z  ; si es 0 salta
                  goto resultmul
                  btfsc  STATUS,C
                   goto resta             
                  goto resulnomult
resultmul

            
                  bsf PORTC,0
                  goto INICIO


resulnomult
               
                bcf PORTC,0
                 goto INICIO
   
       
END

Desconectado dnilo3a

  • PIC10
  • *
  • Mensajes: 3
Re: Ayuda rutina numero multiplo de otro
« Respuesta #1 en: 12 de Octubre de 2009, 21:17:13 »
Error encontrado


INICIO
movlw PORTB ; copiio lo del puerto b a w

se puso

movf portb,0      y con eso ya funciono gracias sin embargo