
BUENO SEGURO QUE HAY QUE REVISARLO PORQUE NO FUNCA, SEGURO QUE ALGO LE FALTA...

POR QUE NO CUENTA Y PORQUE NO TENGO CLARO EL TEMA... SI PUEDEN AYUDARME A QUE FUNCIONE.
MARIO: cuando hay superflujo es cuando TMR1 conto arriba de los 65536 y hay que limpiar a cero TMRIF (PIR1.0 = 0)?
y el papel de PIE1.0 ?? __Gracias por tus consejos y perdon mi ignorancia... es la unica forma que tengo de aprender.

' INYECTO UNA SEÑAL CUADRADA EN EL PIN RC0
DEFINE OSC 20
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 5
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 4
DEFINE LCD_LINES 2
Contador var word 'variable a incrementar
Contador.lowbyte = TMR1L
contador.Highbyte = TMR1H
TMR1L = 0
TMR1H = 0
INTCON = %11000000 'prende las interrupciones globales y perifericas
T1CON = %00000011 'prende el TMR1 y habilita el pin RC0 como fuente ext. de reloj
PIR1.0 = 0 'limpia bandera de superflujo de TMR1
PIE1.0 = 1 'habilita interrupcion periferica de superflujo de TMR1
on interrupt goto Encoder 'interrupcion en PBP
enable
pause 400
Lcdout $FE,1,"Contador"
while 1=1 'bucle principal
pause 200
low portb.7 'apago led para saber cuando estoy en el bucle
lcdout $FE,$C0,dec contador 'muestro el conteo en LCD
wend
disable
Encoder: ' Interrupcion
high portb.7 ' prendo un led para ver si entro en la interrupcion
Contador = Contador + 1 '????????
resume
enable