Proton 3 de int. kullanamıyorum

Başlatan muhittin_kaplan, 10 Mart 2008, 00:59:03

muhittin_kaplan

RB0 int. sim de düzgün çalışıyor ama neden devrede gerçekleşmiyor. Yardım ederseniz sevinirim

  Device=16F84A        
        Dim BUTON As PORTB.0        
        Dim LED As PORTB.7        
        Symbol GIE = INTCON.7 ;Tüm kesme işlemlerine izin verme biti INTCON        
        Symbol INTE = INTCON.4 ;RB0/INT ucundan gelen kesmeye izin verme biti       
        Symbol INTF = INTCON.1 ;RB0/INT harici kesme bayrağı INTCON
        TRISB=%00000001
        TRISA=0
        PORTB=0 
        PORTA=0
        On Interrupt GoTo INT ;interrupt durumunda INT etiketine git 
        Dim Sayi As Byte        
        GIE=1 ;Tüm kesme işlemlerine izin ver        
        INTE=1 ;RB0/INT ucundan gelen kesmeye izin ver  
BASLA:

        DelayMS 50;ana programda bekleme dışında hiçbir komut
        High LED
        DelayMS 50
        Low LED 
        GoTo BASLA ;yok işlem yapılmıyor 
        Disable ;kesmelere izin verme
        
INT: 
        
        GIE=0 ;diğer kesme işlemlerine izin verme        
        INTE=0 ;RB0/INT ucundan gelen kesmeyi sıfırla        
        INTF=0 ;RB0/INT harici kesme bayrağını sıfırla       
        
        For Sayi=0 To $0fh
            PORTA=Sayi
            DelayMS 100
        Next
        PORTA=0        
        INTE=1 ;RB0/INT ucundan gelen kesmeye izin ver        
        GIE=1 ;diğer tüm kesme işlemlerine izin ver        
        Resume ;ana programa dön        
        Enable ;diğer interruptlara izin ver
        End

Kodlar Alıntıdır Ama bunuda Çalıştıramadım Gerçek devre Üzerinde..

Maxim

XTAL 4

osc tanımı yok ondan olmasın ?