Baştaki kodlar neden çalışmıyor?

[DİRİLİŞ_MAK]

Device 16F877
XTAL 4
TRISA=%00001111

TRISB=%00000000
PORTB=%00110000


basla:

    If PORTA.1=1 Then
        PORTB.0=1
        PORTB.2=1
       
    ElseIf PORTA.0=1 Then
   
   
        PORTB.0=1
        PORTB.2=0
    Else
   
    PORTB.0=0
    PORTB.2=1
   
   
    EndIf

GoTo basla

End

Arkadaşları yukarıda ki kodları ISIS'de çalıştırmak istediğimde komutların If, ElseIf olan kısımalrı çalışmıyor ne olursa olsun hep else kısmına yazılan kodlar çalışıyor? Neden diğer kodlar da çalışmıyor acaba?

[fofo]

PORTB nin kullandığın pinlerini giriş olarak ayarlamamışsın 
PORTB nin 0. ve 2.  portlaını kullandığına göre  TRISB=%00000101  şeklinde yazmalısın

[ete]

PortB ile ilgili konum testi yapılmıyor. PortB pinlerine çıkış emri veriliyor sadece dolayısıyla PortB nin ayarlarında kusur yok.
Programın formatı yanlış gibi. Aşağıdaki şekilde bir denenmeli,

Device 16F877
XTAL 4
TRISA=%00001111

TRISB=%00000000
PORTB=%00110000


basla:

    If PORTA.1=1 Then
         PORTB.0=1
         PORTB.2=1

         If  PORTA.0=1 Then 
            PORTB.0=1
            PORTB.2=0
         endif
    Else
    
       PORTB.0=0
       PORTB.2=1
   
    EndIf

GoTo basla

End

Ete