folder Tahribat.com Forumları
linefolder Vukuatlar
linefolder Zamanlayıcılar ?



Zamanlayıcılar ?

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek
    hocam virüs felan yok sadece devre şeması vs hex. kodu var işte :D 8051 ile bir bilgim yok fakat picle bişeyler yapmaya çalışıyoz işte :D bakalım birde c ile yazılmış bir tane displaylı zamanlayıcı var tuş takımından giriliyor geriye sayma süresi displaylerden geriye saydırıyor güzel bişi ama bakalım bir yapım yayınlarım...

    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Tabela Fatihi
    kaygusuz
    kaygusuz's avatar
    Kayıt Tarihi: 06/Nisan/2007
    Erkek

    endtas.com dan faydalanabilirsin

    http://endtas.com/robot/index.php?newlang=turkish 


    Aldananlar aldanmaktan zevk aldıkları için hile ortaya çıkmıyordu Tolstoy
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    amele_2
    amele_2's avatar
    Kayıt Tarihi: 01/Eylül/2005
    Erkek

    lazımsa yada değecekse yazdığımıza ben 8051 e göre yazıvereyim keypad den girilen değeri saydırmayı?

    ama değsin terörist yetiştirmeyelim amacımız bu değil. 


    Ardından yüz köpek havlamayan kurt, kurt sayılmaz..
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek
    amele_2 bunu yazdı:
    -----------------------------

    lazımsa yada değecekse yazdığımıza ben 8051 e göre yazıvereyim keypad den girilen değeri saydırmayı?

    ama değsin terörist yetiştirmeyelim amacımız bu değil. 


    ----------------------------

    bende onu demeye geiriyorum fakat mutlaka su yankın zamanda lazım olacaktır hele bana çok lazım olacaktır. :D

     hocam 8051 ile dökümanım ve programlayıcım yok eğer picle bir bilgin varsa çok makbule geçer :D programlayıcı yapmayla uğraştırma benı :D ama sen yine tasarla elimizin altında olsun bekliyorum

     

    bu da 16f84 için yenı kod :

     '****************************************************************
    '*  Name    : UNTITLED.BAS                                      *
    '*  Author  : [select VIEW...EDITOR OPTIONS]                    *
    '*  Notice  : Copyright (c) 2007 [select VIEW...EDITOR OPTIONS] *
    '*          : All Rights Reserved                               *
    '*  Date    : 22.10.2007                                        *
    '*  Version : 1.0                                               *
    '*  Notes   :                                                   *
    '*          :                                                   *
    '****************************************************************

     


      
    '****************************************************************
    I VAR BYTE
     


    SYMBOL A=PORTB.1         ' BUNLARIN HEPSİ PORTLARA İSİM ATAMAK İÇİN DİR
    SYMBOL B=PORTB.2
    SYMBOL C=PORTB.3
    SYMBOL D=PORTB.4
    SYMBOL E=PORTB.5
    SYMBOL F=PORTB.6
    SYMBOL G=PORTB.7
    SYMBOL S1=PORTA.0
    SYMBOL S2=PORTA.1
    SYMBOL S3=PORTA.2
    SYMBOL RELAY=PORTA.3

    SYMBOL LED=PORTB.0
    '*****************************************************************

    BASLA:    
    low G
    IF S2=1 THEN
    HIGH G
    GOTO ANA
    ELSE
    GOTO BASLA
    ENDIF


    ANA:

    low A
    low B
    low C
    low D
    low E
    low F
    PAUSE 400
    IF S1=1 THEN ZAMAN0
     GOTO ANA
    ZAMAN0:
    HIGH A
    HIGH B
    HIGH C
    HIGH D
    HIGH E
    HIGH F
    GOTO ZAMAN1

     


    ZAMAN1:
      LOW B
      LOW C
      PAUSE 400
      IF S1=1 THEN ZAMAN2
      IF S2=1 THEN AZAMAN1
      GOTO ZAMAN1

    AZAMAN1:

     HIGH LED

    For I=0 to 10
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000

    GOTO AZAMAN1


    ZAMAN2:
    HIGH C
    LOW A
    LOW G
    LOW E
    LOW D
    PAUSE 400
    IF S1=1 THEN ZAMAN3
    IF S2=1 THEN AZAMAN2
    GOTO ZAMAN2


    AZAMAN2:

    HIGH LED

    For I=0 to 20
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000
     GOTO ZAMAN2

    ZAMAN3:
    HIGH E
    LOW C
    PAUSE 400
    IF S1=1 THEN ZAMAN4
    IF S2=1 THEN AZAMAN3
    GOTO ZAMAN3


    AZAMAN3:
     HIGH LED
      For I=0 to 30
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000
    PAUSE RELAY
     
     GOTO ZAMAN3

    ZAMAN4:
    HIGH D
    HIGH A
    LOW F
    PAUSE 400
    IF S1=1 THEN ZAMAN5
    IF S2=1 THEN AZAMAN4
    GOTO ZAMAN4

    AZAMAN4:
     HIGH LED
     For I=0 to 40
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000
     
     
     GOTO ZAMAN4

     


    ZAMAN5:
    HIGH B
    LOW A
    LOW D
    PAUSE 400
    IF S1=1 THEN ZAMAN6
    IF S2=1 THEN AZAMAN5
        GOTO ZAMAN5
    AZAMAN5:
     HIGH LED
      For I=0 to 50
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000
     LOW RELAY
     
     GOTO ZAMAN5
     
    ZAMAN6:
    LOW E
    PAUSE 400
    IF S1=1 THEN ZAMAN7
    IF S2=1 THEN AZAMAN6
    GOTO ZAMAN6


    AZAMAN6:
     HIGH LED
     
     For I=0 to 59
    pause 59000
    next
    HIGH RELAY
    PAUSE 50000
    LOW RELAY
    GOTO ZAMAN6
     
    ZAMAN7:
    HIGH F
    HIGH G
    HIGH E
    HIGH D
    LOW B
    PAUSE 400
    IF S1=1 THEN ZAMAN8
    IF S2=1 THEN AZAMAN7
    GOTO ZAMAN7

    AZAMAN7:

    HIGH LED
     For I=0 to 119 
    pause 60000
    next
    HIGH RELAY
    PAUSE 50000
    LOW RELAY

    GOTO ZAMAN7

     

    ZAMAN8:
    LOW D
    LOW E
    LOW F
    LOW G
    PAUSE 400
    IF S1=1 THEN ZAMAN9
    IF S2=1 THEN AZAMAN8
     GOTO ZAMAN8


    AZAMAN8:
     HIGH LED
       For I=0 to 179 
    pause 60000
    next
    HIGH RELAY
    PAUSE 50000
    LOW RELAY
     
     GOTO ZAMAN8
     
    ZAMAN9:
    HIGH E                  'DİSPLAYİN E KARAKTERİNİ "1" YAP YANI SONDUR..
    PAUSE 400               'PAUSE 400MS BEKLE
    IF S1=1 THEN altzaman  'S1 BUTONU "1" İSE ALTZAMAN ETİKETİNE GİT DEĞİLSE BİR ALT KOMUTA GEÇ
    IF S2=1 THEN AZAMAN9  'S2 BUTONU "1" İSE AZAMAN9 ETİKETİNE GİT DEĞİLSE BİR ALT KOMUTA GEÇ

     GOTO ZAMAN9       'GOTO ZAMAN9 ADLI ETİKETE GİT
     
    AZAMAN9:            'AZAMAN ALDI ETIKET
      HIGH LED           'LED AKTIF OLDU SAYMAYA BASLANDI
       For I=0 to 239    ' I DEĞİŞKENİ 0 İLE 239 ARASI BİR DEĞER ALACAK VE NEXTTEN SONRAKI KONUTA GİDECEK
    pause 60000          'PAUSE BEKLEME SÜRESİ I=1 HER 1 SAYI ARTTIĞINDA PAUSE DEĞERİ KADAR BELİYECEK VE YİNE BASA DÖNECEKTİR SAHA SONRA SON SAYI 239 OLDUĞUNDA NEXTTEN SONRAKI KOMUTA GİDECEK..
    next               'GİT
    HIGH RELAY         'RÖLEYİ "1" YAPTIK
    PAUSE 50000       '50SN  BEKLE
    LOW RELAY         ' RELAY "0" OLDU
      GOTO ZAMAN9    'ZAMAN ADLI PROGRAMA GİT
     
     ALTZAMAN:
     PORTB=%11111111 ' PORTB HEPSİ "1" OLDU DİSPLAY SIFIRLANDI
    GOTO ANA   'ANA ETİKETLİ PROGRAMA GİT

     

    END
     

    çalışması pic ilk açıldığında displayin "g" segmenti yanıyor sonra set butonuna basınca (alttakı buton yazmayı unutmusum)

    displayde "0" yazısı çıkacak bundan sonra secenek tusuna 2-3 sn ye basılı tutulunca menunun rakamları ilerlicek yanı menu1 menu2 gibi fakat displayde sadece 1-2-3-4-5 gibi görünecek su menulerdekı değerler aklımda yok fakat hatırladığım kadarıyla 6. menuye kadar zaman geçikmesi 10'ar 10ar artmakta mesela 3. menuye geldiğimizde 30dk bir geçikme sağlıcak gibi. 7 menu 2 saat. 8. menu 3 saat 9. menu 4 saat gibiydi galiba ama öyle olması lazım :D çok oldu bu devreyi yapalı ondan pek hatırlamıyom....daha sonra mesela istediğiniz menuye geldiniz bundan sonra set butonuna bastınızda led yanacaktır ve zaman geceikmesi işlemye başlıcak for...next döngüsü ile belli bir zaman geçikmesi sağlanacak(menudeki değere yaklasık bişey tam değil)  bundan sonra  bu değer sonunda röle kontağını çekecek ve 50sn bekliyecek bu sırada yaptığınız malumunuz nevale patlayacaktır fakat başka uygulamlarda kullanmak için bu zaman geçikmesinin sonunda led sönucek ve ayarladığınız menuye dönecek ve eğer baska menuye geçmek istersenız  yine secenek tusundan ilerleyebilirsiniz....yayınladığım kodda düzenlemeler yaptım mesela 9 menuye geldiniz ve kararınızı değiştirdiniz ve misal 4.menuye gideceksiniz bunun için 9. menudeyken yine secenek butonuna bastığınızda program kendını basa alacaktır ve yine secenek butonuyla sıfırdan başlayarak istediğiniz menuye gelmenızı sağlayacaktır.... bu kadar basit bişey aslında fakat tek avantajı hata payının çok az olması ve fonksıyonel olarka istediğiniz herşeyi yaptıra bilmenız :d pic bir tek takla atmıyor yanı :D

     

    tekrar tekrar sölüyom sakın ha kımsenın canını yakacak bir biçimde kullanmayın örnek ve elinizin alında bulunsun diye yayıınladım ne benım basımı yakın ne kendı basınızı savas çıkarsa mal mal bakmazsınız hiç olmazsa,olurya (allah göstermesin ırakın düştüğü duruma düşeriz ozaman çok basit gözüken şeylere bile muhtaç oluruz ve basit şeylerle buyuk şeyler yapılabilinir...) yapın 3-5 tane saklayın dolabınızda çantanızda vb. zulada......

     

    aman ha masumların canını yakmayın ne benı ne kendınızı o buyuk yukun altıan sokmayın tbt uyelerine guvenım sonsuz aman  deyim...kolay gele...


    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    buruksu
    buruksu's avatar
    Kayıt Tarihi: 20/Eylül/2003
    Erkek

    gate i 0.5 ile tetiklenebilecek bir devre yada elektronik röle düzenegi veyahutta bir entegre iş görür herhangibi bir saate monte edebilirsiniz,,,

    yol basit oldugu için verimli çalışıyor...


    :) mutluyum, huzurluyum
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek

    ben dediğin gibi bi devre yapmıştım artık zamanlayıcılarla uğraşa uğraşa şöyle bir olaydan ötürü ayak üsüt dediğin devreyi yaptım

     

    akşam saat 1-1.5 civarıydı gene dükkanda yoğun bir gundu seviste 30 yakın tv tamır ettikten sonra eve nasıl geldiğimi bile hatırlamıyom...(ayrıntıya girmeden) biraz kesitirdim sonra rüyamda acayip bir devre gördüm o devrenın içinde öğlen yemeğe giderken bindiğim dolmuştakı ufak digital masa saati gördüm aynısından bendede vardı ve bir anda onun alarmının çalıdığını gördüm rüyamda sonra gözümün önunden bir op-amplar geçiyor bi 555li timer ler sonra en son terleyipte uyandım saat 3 olmuş... kalktım üstümü değiştiridm elimi yüzümü yıkadım benım o saati buldum aynı rüyamdakıleri kağıda aktarmaya başladım bir yandanda saate pil takıp saati ayarlayıp çalar sati kurmaya çalışıyodum sonra alarmı 1 dk ya kurdum ve buzzere giden kabloları ölçmeye başladım baktım acayip bir akım var olmuyor böyle dedim led bağladım oda bir yanıp bir sönuyor sorna aklıma bunu opto kuplör ile saat devresinde ayırıp daha sonra op-ampla kuvvetlendırıp (op-am gereksizmiş farkıan varamadım) sorna 555 ile kısa süreli bir zamanlayıı yapıp röleyi sürdüm baktım gayet güzel çalışıyor fakat saat cin malı olduğundan hep geri kalıyor yanı kalıteli bir saaatle iş mukemmel olur....bunun yanında onu besliyecek türden pil lazım fazla buyuk olmucak ve haftalarca çalıştırcak cinsten :D su anda devre deneme aşamasında bıraktım kendı devremı kendım tasarlarım arkadaş dedim rüyalarımın dvresini attım kenara şerefsiz yan komsum web camımı verseydi resmını çekip koyacaktım ama yarın artık....kolay gele..devre şemasınıda koyarım isten olursa :D denemek isteyen olursa.... 


    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek

    http://img144.imageshack.us/img144/9159/resim037kc8.jpg    benım devrenın görünüşü

    (deney amaçlı kurdum)

     http://img215.imageshack.us/img215/6750/semand2.jpg   jpeg formatında devre seması

     

    isis simulasyonu devre şeması :D

    http://rapidshare.com/files/64673379/basit_zamanlay__305_c__305_.rar.html

     

    kolay gele......


    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ricin
    ricin's avatar
    Kayıt Tarihi: 16/Mayıs/2007
    Erkek
    teşekkür eden yokmu ????

    üniversite öğrencilerine devre tasarımı yapılır...! tekdag-elektronik.blogspot.com/
Toplam Hit: 4042 Toplam Mesaj: 19