HATAYI NERDE YAPIYORUM

[erolcom06]

LIST P=16F84A
         INCLUDE  "P16F84A.INC"
SAYAC1   EQU H'OC'
SAYAC2   EQU H'OD'                 
         BSF       STATUS,5
         CLRF      TRISB
         BCF       STATUS,5
         BCF       STATUS,0
         CLRF      PORTB
         MOVLW     H'01'
         MOVWF     PORTB
SOL
         CALL      GECIKME
         RLF       PORTB,F
         BTFSS     PORTB,7
         GOTO      SOL
SAG
         CALL      GECIKME
         RRF       PORTB,F
         BTFSS     PORTB,0
         GOTO      SAG
         GOTO      SOL
GECIKME
         MOVLW      H'FF'
         MOVWF      SAYAC1
DONGU1
         MOVLW      H'FF'
         MOVWF      SAYAC2
DONGU2
         DECFSZ     SAYAC2,F
         GOTO       DONGU2
         DECFSZ     SAYAC1,F
         GOTO       DONGU1
         RETURN
         END
         
HATAYI NERDE YAPIYOUM?

[Bayramsumbul]

Öncelikle merhaba.Galiba amacınız kara şimşek devresi yapmak.Sigorta ayarları yapılmamış.(Etkileyeceğini düşünmüyorum çünkü;84a çok özellikli uCO değil.)Birde çıkış olarak tanımlanmış port okunabilir mi.(ki kodda "BTFSS PORTB" demişsiniz)Onun yerine ramde bir yazmaç tanımlanip,orada kaydırma yapılıp o yazmacı portbye yazmayı deneyin ister iseniz.

[metaltrrocker]

İlk hatanı söyleyeyim Konu başlığını küçük harflerle yazmalısın.Büyük harfler bağırmak anlamına gelir.
Kolay gelsin.