Zamanlayıcı yenileme

[ipek]

Basicte ikinci denemem  şimdiden karaya oturduk

bir fırınımız var bununda bir bacası mevcut

baca'da 2 adet fan var  bunların bir ac hep aynı yöne dönüyor
diğeri dc bir röleye bağlı 90saniye doğru 90 saniye ters dönüyor
adamlar bu aleti 70 li yıllarda yapmışlar pcb'ye basılmış encoder
gibi bir sey ac minicik bir saat motoruyla dönüyor yıllar bunu yıpratmış motor gitmiş
çalışma esası kısa tutmayaya gayret edeceğim bir adet komitatör var bu 6 posizyonlu ac motoru zamanlıyor
posisyon 1'de 1 saat dönüyor 23 saat duruyor
posisyon 2'de 3 saat dönüyor 21 saat duruyor
posisyon 3'de 6 saat dönüyor 18 saat duruyor
posisyon 4'de  9 saat dönüyor 15 saat duruyor
posisyon 5'de 12 saat dönüyor 12 saat duruyor
posisyon 6'da ac motor zamandan çıkıp hep dönüyor manual gibi

şimdi bir şeyler karaladım dc motor bunun zamanını bozar diye şimdilik dahil etmedim
pause yerine pauseus komutu kullandım simule ederken saatlerce beklemeyeyim diye
atıyorum 24 saat 86.400 saniye for next döngüsünde çalışmaya gayret ettim elbette başka yöntemleri
vardır

    IF  SAYI=1 THEN     
    FOR X= 0 TO 24
    for y= 0 to 600
    pauseUS 6000
    next y
    next x
    toggle PORTB.0
    for X= 0 TO 9
    pause 1000
    next x
    toggle PORTB.0

örnek deneme için 24 saat çalış 10 saniye dur gibi burada pauseus yerine pause kullanılacak..
proteus mu benimle maytap geçiyor picbasic'in kurallarını çiğniyorum anlayamadım...
ilgini bekliyorum saygılar...
not o kadarda kritik değil bozulanda +- 10 dakika hatalı çalışıyormuş..
timer al tak falan demiyeceğinizi umuyorum bu hevesimi kırar..

http://hotfile.com/dl/94320186/09ad775/BacaTimer.rar.html

[OG]

Proton

http://hotfile.com/dl/94400211/168f05f/BacaTimer.rar.html

[ipek]

OG hocam klavyenize sağlık ayrıca bu kadar ayrıntılı ve anlaşılabilir kod yazmanız beni protona teşvik etti tekrar sağolun...

[OG]

Hocam PBP kullanıyorsanız Proton'a geçmemeniz için bir sebep yok ki. Çok daha güçlü bir dil, daha az kod üretir, temelde syntax aynıdır, çok küçük farklar dışında.