Merhaba,
aşağıdaki fonksiyon işinize yarar mı?
Public Sub Pause(BeklemeZamani As Currency)
Dim BASLA As Currency
BASLA = Timer
Do While Timer < (BASLA + BeklemeZamani)
DoEvents
Loop
End Sub
Kullanımı:
Private Sub Text1_Change()
Text3.Text = Replace(Text1.Text, Chr$(13), Chr$(32))...
Pic 16f84 te assembly dilinde 3saatlik bekleme yaptırmak istiyoruz yani port b nin sıfırıncı bitini 3 saatte bir 1dakika high yapmak istiyoruz. Daha sonra 1dakika bitince yine low olacak sonra tekrar 3saat sonra high olacak bu şekilde tekrar edecek. BU konuda yardımlarınızı bekliyorum.
teşekkürler.
Merhaba arkadaslar daha önceki kullanıcı adım stealth fakat sistemdeki bir sorun nedeni ile bu kullanıcı adi ile aktif olucam neyse konuyu dağıtmadan konuya girelim ..
Xp-Sp2 cd sini takıyorum ve işlem yarısına geldiği zaman arkdaslar pc kendini bekleme konumuna aliyor yardımcı olursanız...