RBCH SORUNU

[kontiki]

İyi akşamlar  ve kolay gelsın ustalar
Pıc16f887 ıle kesmeleri ogrenıyorum ete hocadanın derslerınden rb0  dan denedım ısıs de test
Ettım ardından devreyi kurdum çalıstı  rbch kesmelerını denedım ısıs de calıstı ama devreyı kurunca buton basılıyken sonuyo cektıgım zaman yanıyo yanık kalmıyo yada sonuk  bekleme zamanlarını degıstırdım olmadı yardımcı olursanız sevınırım sımdıden tessekurler

-----------------------CALSIMAYAN RBCH IN KODLARI
@ DEVICE pic16F887
@ DEVICE pic16F887, WDT_OFF 
@ DEVICE pic16F887, PWRT_OFF 
@ DEVICE pic16F887, PROTECT_OFF
@ DEVICE pic16F887, MCLR_OFF 
@ DEVICE pic16F887,  INTRC_OSC_NOCLKOUT
@ DEVICE pic16F887, BOD_OFF
@ DEVICE pic16F887, LVP_ON
ON INTERRUPT GOTO IKI
ANSEL=0     
ANSELH=0   
OPTION_REG=%11000000
 INTCON=%10001000   
IOCB=%00010000
CM1CON0=0
 CM2CON0=0           
TRISB=%00010000
 OSCCON=%01110101
TRISA=%00000000
PORTA=0
PORTB=0
DURUM VAR BYTE   
SYMBOL LED=PORTA.0
BASLA :
DURUM=PORTB   
PAUSEUS 100       
GOTO BASLA
DISABLE   
IKI:
TOGGLE LED
PAUSE 200
DURUM=PORTB
INTCON.0=0
 RESUME 
ENABLE   
END
  -----------RB0 IN KESMESI CALISAN
@ DEVICE pic16F887
@ DEVICE pic16F887, WDT_on 
@ DEVICE pic16F887, PWRT_ON 
@ DEVICE pic16F887, PROTECT_OFF
@ DEVICE pic16F887, MCLR_OFF 
@ DEVICE pic16F887,  INTRC_OSC_NOCLKOUT
ANSEL=0
ANSELH=0

OPTION_REG=%00000000
INTCON=%10010000     
WPUB=%00000001
IOCB=%00000001

TRISA=0
TRISB=%00000001
PORTB=%00000001
CM1CON0=0
CM2CON0=0

SYMBOL TUS=PORTB.0
SYMBOL LED=PORTA.0
 ON INTERRUPT GoTo KESME
BASLA:
pauseus 100
goto basla
DISABLE
KESME:
TOGGLE LED
PAUSE 1
INTCON.1=0
Resume
Enable
 End