16F84A Xtal osilatör sorunu

[fokas]

Selam
Eski bir elektronikçi olarak pic konusunda yeniyim sizler ve ete hocanın yardımlarıyla öğrenmeye çalışıyorum.16F84A ile havaya yazı dev. Yaptım 4MHz xtal ve 22p kondansatörlü .
Fakat devre ledleri sürmüyor elimi ıslatıp xtal uçlarına dokununca yanıp sönüyorlar sallayıncada yazı çıkıyor.ıslaklık geçince tekrar yavaşlayarak tamamen sönüyorlar.Xtak ve con. Değiştirdim devreyi kontrol ettim farklı hex dosyaları denedim hepsinde aynı.Yardımcı olursanız sevinirim

[Bülent]

Pic' in 4 No: lu MCLR bacağında 3K3 veya 4K7 gibi birşey var mı ?

[fokas]

4.7k +5v bağlı reset için devre bilimve teknik dergisinde yayımlanan devre

[ta2pw]

Buna benzer bir şey benimde başıma gelmişti daha sonra reset direncini yanlışlıkla eksi ye bağladığımı farkettim  bu direnç i artı ya bağlayınca sorun kalmadı.

[F®T]

Sigorta ayarlarında sorun olablir.

[ete]

Ya kristal programa uyumsuz yada program kristale uyumsuz. Yada kondansatörler gerçek değeirnde değiller. Yada kristal uygun değil. Bana kalırsa bir rezonatör (3 bacaklıdır) alıp onunla dene.
Ete

[cevat]

Kristal bozuk olabilir. Piyasa da çok... bozuk  malzemeler  var. Çin 'den kalitesiz kristalleri getirip piyasaya sürüyorlar. İmalat hatası kristaller, imha edilmesi gerekirken, bizim uyanıklar ( yeter ki... para kazansınlar... bozuk malları sağlam diye satıyorlar, esnaflar ya.... ) piyasaya sürüyor. 2-3 gün önce 20 adet kristal aldım. 16 tanesi bozuk. Geri götürüp değiştireceğim, ayrıca cezası da ayrı....
Sağlamlığını kontrol  için devre bile hazırladım, ayrıca osiloskoptan da tekrar kontrol ediyorum.  Aslında tüm malzemeleri teker teker ölçecek kadar
" KIL  "   biri değilimdir ama... Hassas devrelerimde, malzemeleri teker teker ölçer oldum...

Bozuk Kristalleri aldığım yere de söyledim. " Bu bozuk mallarla bindiğiniz dalı kesiyorsunuz. Müşteri kaybedersiniz, haberiniz olsun "  dedim...
(50 tane 1000 uf kondansatör aldım hepsini tek tek ölçtüm 850 uf. İçlerinden bir tane 1000 uf çıkmaz mı?
Hassas bir devre de kullanmak üzere 50 tane 1M8 direnç aldım. tek tek ölçtüm bir tane 1M8 değerinde direnç yoktu. ya 1.75 mO veya 1.9 mO, 50 tane dirençten 1 tane 1M8 olmaz mı? iki direnci seri bağlayarak istediğim değeri elde etmiştim... Düşünsem belki de bu örnekleri çoğaltabilirim...


İyi çalışmalar, kolay gelsin...

[fokas]

Teşekkürler eve gidince deneyeceğim.Bu arada kristal ve kondansatörleri çıkarınca bir şey değişmiyor.Yani elimi ıslatıp dokununca bir müddet çalışıyor

[fokas]

Arkadaşlar xtal iptal edildi 16 nolu bacak ile + arasına 2.2k direnç bağlandı .Bu şekilde okunacak kadar oldu.

[est32]

Arkadaşlar xtal iptal edildi 16 nolu bacak ile + arasına 2.2k direnç bağlandı .Bu şekilde okunacak kadar oldu.

zamanında kristallere verdiğim o paralarım boşa mı gitti yoksa???
sigorta(fuse) ayarlarından RC osilatör seçili olmasın???

[fokas]

En son denediğim uygulama sonuç aynı

-------------------------------------------------------------------------------------
YAZAN      SAMİ HOCA
;TARİH      04-01-2009
;DOSYA ADI   UCAN1
;PIC ADI   16F84
;REZONATÖR   4 MHZ
;WATCHDOG   DEVRE DIŞI
;KOD KORUMA   YOK
;KONU      8 LED İLE HAVAYA YAZI YAZMA
;------------------------------------------
   LIST   P=16F84
   INCLUDE   "P16F84.INC"
;-TANIMLAR---------------------------------
   S1   EQU   20H   ;S1 DEĞİŞKENİ TANIMLANDI
   S2    EQU   10H   ;S2 DEĞİŞKENİ TANIMLANDI
;   S3   EQU   12H   ;S3 DEĞİŞKENİ TANIMLANDI
;   ADET   EQU   11H   ;DEĞİŞKEN TANIMLANDI
;   HIZ   EQU   0EH   ;DEĞİŞKEN TANIMLANDI

   BSF    STATUS,5    ;BANK1 E GEC
   MOVLW    B'01111'    ;W REG'E SAYIYI AT
   MOVWF    TRISA       ;PORTA UÇLARINI GİRİS YAP
   CLRF   TRISB      ;PORTB UÇLARINI ÇIKIŞ YAP
   BCF    STATUS,5    ;BANK0 A GEC
   CLRF    PORTB       ;PORTB LEDLERİNİ SÖNDÜR

;*****PORTB'YE YAZI GÖNDERME*****

BASLA
;*****(S) HARFİ*****
   MOVLW    4Eh      ;b'01001110'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    99h      ;b'10011001'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    99h      ;b'10011001'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    99h      ;b'10011001'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    62h      ;b'01100010'
   MOVWF    PORTB
   CALL    BEKLE1

   CLRF    PORTB
   CALL    BEKLE1

;*****(A) HARFİ*****
   MOVLW    0FCh      ;b'11111100'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    1Ah      ;b'00011010'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    19h      ;b'00011001'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    1Ah      ;b'00011010'
   MOVWF    PORTB
   CALL    BEKLE1
   MOVLW    0FCh      ;b'11111100'
   MOVWF    PORTB
   CALL    BEKLE1

   CLRF    PORTB
   CALL    BEKLE1

;*****(M) HARFİ*****
   MOVLW    0FFh      ;b'11111111'
   MOVWF    PORTB
   CALL   BEKLE1
   MOVLW    02h         ;b'00000010'
   MOVWF    PORTB
   CALL   BEKLE1
   MOVLW    1Ch         ;b'00011100'
   MOVWF    PORTB
   CALL   BEKLE1
   MOVLW    1Ch         ;b'00011100'
   MOVWF    PORTB   
   CALL   BEKLE1
   MOVLW    02h         ;b'00000010'
   MOVWF    PORTB
   CALL   BEKLE1
   MOVLW    0FFh      ;b'11111111'
   MOVWF    PORTB
   CALL   BEKLE1

   CLRF    PORTB
   CALL   BEKLE1

;*****(İ) HARFİ*****
   MOVLW    0FDh      ;b'11111101'
   MOVWF    PORTB
   CALL   BEKLE1

   CLRF    PORTB
   CALL   BEKLE1
   CALL   BEKLE1

   CLRF    PORTB
   CALL    BEKLE2

   GOTO    BASLA

;*****1 MİLİSANİYE GECİKME*****
BEKLE1

   MOVLW    d'20'       ;YAKLASIK 1 MİLİSANİYE
   MOVWF    S1       ;BEKLEME YAP
DONGU1
   MOVLW    d'10'
   MOVWF    S2
DONGU2
   DECFSZ    S2,1
   GOTO    DONGU2
   DECFSZ    S1,1
   GOTO    DONGU1
   RETURN
;*****95 MİLİSANİYE GECİKME******
BEKLE2

   MOVLW    d'255'       ;YAKLASIK 74 MİLİSANİYE
   MOVWF    S1       ;BEKLEME YAP
DONGU3
   MOVLW    d'75'
   MOVWF    S2
DONGU4
   DECFSZ    S2,1
   GOTO    DONGU4
   DECFSZ    S1,1
   GOTO    DONGU3
   RETURN

   END

[kgguler]

Programda sigorta seçimleri görünmüyor.programlayıcı olarak ICPROG kullanıyorsanız osilatör seçimini XT olarakseçili olmasına dikkat edin.

[F®T]

sigortadandır.

[fokas]

Pic kit 2 kullanıyorum