Uppss, jeje, perdona aikrana, tienes razón jim_17, no te equivocas, no me di cuenta.
¿Pq no usas un 16f628 que es lo mismo pero mejor y más barato?
Bueno, siento haberte confunduido, creo que este esterá mejor.
clrf color //pasa 0 a color
blank: macro
bcf PORTB, color
movlw 0x02 //cargo a w el valor a comparar
subwf color,w //resto color - w, si da positivo o cero es valido, si da menos es que era menos de 2. (color se me queda con el resultado, mirar luego)
btfsc STATUS,C //Salto si C es 0, osea el resultado es negativo y NO se da la condición
clrf color //pongo a color = 0, ya que si C no es 0 es que fue 1 y quiere decir que se cumplia condición (si es así dejamos la variable color=0)
incf color,1 //si no incrementamos color=color+1 y continuamos.
done:
endm
Espero que esta vez si que te sirva, jeje.
Salu2