Zamanlayıcılar ?
-
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...
-
endtas.com dan faydalanabilirsin
http://endtas.com/robot/index.php?newlang=turkish
-
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.
-
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.3SYMBOL 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 ZAMAN1AZAMAN1:
HIGH LED
For I=0 to 10
pause 59000
next
HIGH RELAY
PAUSE 50000GOTO 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 ZAMAN2ZAMAN3:
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 ZAMAN3ZAMAN4:
HIGH D
HIGH A
LOW F
PAUSE 400
IF S1=1 THEN ZAMAN5
IF S2=1 THEN AZAMAN4
GOTO ZAMAN4AZAMAN4:
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 ZAMAN7AZAMAN7:
HIGH LED
For I=0 to 119
pause 60000
next
HIGH RELAY
PAUSE 50000
LOW RELAYGOTO 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İTEND
ç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...
-
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...
-
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....
-
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......
-
teşekkür eden yokmu ????