Üye Girişi
Bağlan Google+ ile Bağlan Facebook ile Bağlan
Yeni Kayıt
Tüm Forumlar
  • Tüm Forumlar
  • Donanım / Hardware
  • Elektronik ve Mekanik
  • Elektronik
  • Bu Konuda
Şimdi Ara

Zordayım KURTARIN???

Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir - 2 Masaüstü
5 sn
7
Cevap
0
Favori
555
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
Konuya Özel
0 oy
Öne Çıkar
Cevapla
Sayfa: 1
Giriş
Mesaj
  • arkadaşlar kız arkadaşıma bir hediye hazırlıyorum tanışma yıl dönümümüz yaklaştı ona ismini ledlerle yanıp sönen bir ışık şovu hazırlayacağım aşağıdaki devrede ledlerin yerine transistör veya röle bağlayacağım
    http://i60.photobucket.com/albums/h25/ibrahim_kut/devre.jpg
    çıkışları şöyle olmalı her bir satır geçişi 1 sn herbir çıkış 1sn çalışsın
    Rb0-RB1-Rb2-Rb3-Rb4-Rb5-Rb6
    0110000
    1011000
    0111100
    1011110
    0111111
    1001111
    0100111
    1000011
    0100001
    1000000
    0110001
    1011011
    0111111
    1001110
    0100100
    1000000
    0110000
    1001000
    0100100
    1000010
    0100001
    1010001
    0101001
    1000101
    0100011
    1010011
    0101011
    1000111
    0110111
    1001111
    0111111
    1011110
    0111101
    1011011
    0110111
    1001111
    0111111
    1000000
    0110101
    1001010
    0111111
    1000000
    0111000
    1000111
    0111111
    1000000
    0111111
    1000000

    ilgilenenlere minnettar kalırım. ilişkimi kurtarın.







  • dostum kapılarla yapma bence zahmetli olur picle yap karasimsek devresi ile yapabilirsin
  • bence hiç bunlarla uğraşma, benim için lamba mı yaktın moduna girebilir! en güzeli; onu ne kadar sevdiğini, senin için ne kadar değerli olduğunu anlatan ve çeşitli animasyonların olduğu bir web sitesi hazırlayarak ilişkini kurtarabilirsin. diye düşünüyorum.
  • sanırım yazmayı unuttum bu devreyi kapılarla değil sadece pic le yapmak istiyorum. PIC'i programlayamadım şimdi sizden yardım istiyorum her şey hazır baskı devresi 16F84 her şey tamam hatta 225 adet LED bile aldım. Şimdi yok mu bana bu PIC'i Programlayıp HEX dosyası ile Program diyagramını bana gönderecek??????
  • lütfen doğruluğunu kontrol edermisiniz!!!!
    ;---------------------------------------------------------------------------------------------------------
    ;Yazan :Ibrahim KUT
    ;Konu :TULAY KAYAN HARFLER
    ; :RB0Y,RB1A,RB2L,RB3U,RB4T,RB5FLAS1,RB6FLAS2
    ;---------------------------------------------------------------------------------------------------------
    LIST P=16F84
    INCLUDE "P16F84.INC"
    SAYAC1 EQU H'B8'
    SAYAC2 EQU H'B9'
    SAYAC3 EQU H'BA'
    SAYAC4 EQU H'BB'
    ;-----------------------------------------------------------------------
    BSF STATUS,5 ;BANK1 E GEC
    CLRF TRISB ;PORTB UCLARI CIKIS
    MOVLW H'FF' ;H'FF' --> W
    MOVWF TRISA ;PORTA UCLARI GIRIS
    BCF STATUS,5 ;BANK0 A GEC
    CLRF PORTB ;PORTB TEMIZLE
    CLRF PORTA ;PORTA TEMIZLE
    MOVLW H'00' ;H'00' --> W
    MOVWF DURUM ;W --> DURUM
    MOVLW H'FF' ;H'FF' --> W
    MOVWF SAYAC1 ;W --> SAYAC1
    MOVWF SAYAC2 ;W --> SAYAC2
    MOVLW D'10' ;D'10' --> W
    MOVWF SAYAC3 ;W --> SAYAC3
    MOVLW D'200' ;D'200' --> W
    MOVWF SAYAC4 ;W --> SAYAC4
    ;-----------------------------------------------------------------------
    BASLA
    MOVLW B'01000000' ;B'00000001' --> W
    MOVWF PORTB ;W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00110000' ;B'00000001' --> W
    MOVWF PORTB ;W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111100' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011110' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01001111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'001000001' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010001' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101110' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000100' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000100' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100010' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000001' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00110001' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01001001' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100101' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01000011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00110011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01001011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111110' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011101' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111011' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010101' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101010' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010101' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101010' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01010101' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00101010' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00100000' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'01011111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    MOVLW B'00111111' ;B'00110001' --> W
    MOVWF PORTB ; W --> PORTB
    CALL GECIKME1 ;GECIKME1 E DALLAN
    GOTO BASLA ;BASLA YA GIT
    ;-----------------------------------------------------------------------
    GECIKME1
    DECFSZ SAYAC3,F ;SAYAC3=SAYAC3-1, SAYAC3=?0
    GOTO B1 ;HAYIR SAYAC3=!O
    GOTO C2 ;EVET SAYAC3==0, C2 GIT
    B1
    DECFSZ SAYAC2,F ;SAYAC2=SAYAC2-1,SAYAC2=?0
    GOTO B2 ;HAYIR SAYAC2=!0
    MOVLW H'FF' ;H'FF' --> W
    MOVWF SAYAC2 ;W --> SAYAC2
    GOTO GECIKME2 ;EVET SAYAC2==0, GIT GECIKME2 E
    B2
    DECFSZ SAYAC1,F ;SAYAC1=SAYAC1-1,SAYAC1=?0
    GOTO B2 ;HAYIR SAYAC1=!0
    MOVLW H'FF' ;H'FF' --> W
    MOVWF SAYAC1 ;W --> SAYAC1
    GOTO B1 ;EVET SAYAC1==0, GIT B1 E
    C2
    MOVLW D'10' ; D'10'--> W
    MOVWF SAYAC3 ; W --> SAYAC3
    RETURN ;KALDIGIN YERE DON
    ;-----------------------------------------------------------------------
    END
    ;-----------------------------------------------------------------------




  • arkadaşlar tek siz kaldınız gerçekten acil yıl dönümüne az bir zaman kaldı baskı devreyi yaptım
    aşağıdaki linke bakın
    http://i60.photobucket.com/albums/h25/ibrahim_kut/ads305z.jpg
    sadece PIC programı gerekiyordu onuda yaptım (kendi çabamla) en azından doğruluğunu bir yanıtlayın
  • arkadasım programmın derledim.. 2 yerde hata verdi. "DURUM" ve "GECİKME2" etiketlerini tanımlamamıssın...
    istersen list dosyasını gönderebilirim..



    < Bu mesaj bu kişi tarafından değiştirildi Q_mes -- 8 Mayıs 2006; 2:33:07 >
    • 
Sayfa: 1

Benzer içerikler

- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.
Hizmet kalitesi için çerezleri kullanabiliriz. DH’ye girerek kullanım izni vermiş sayılırsınız.
Anladım Veri Politikamız