Udah pernah dicoba apa belum ?
Saya udah pernah coba pakai komponen Timer kalau property intervalnya diisi 1 tetap
aja diaksesnya setiap 55 milli detik, padahal kalau diliat helpnya dikatakan
intervalnya dalam milli detik.
Pakai fungsi Timer juga paling kecil 55 milli detik. Coba liat listing program ini :
Private Sub cmdStart_Click()
Mulai = True
Dim Start As Single, Finish As Single
Start = Timer
Do While Mulai = True
Finish = Timer
If Finish <> Start Then
Text1.Text = Finish - Start
Start = Finish
End If
DoEvents
Loop
End Sub
Harusnya dengan program ini kita bisa dapat interval waktu yang paling kecil kan, tapi
kenyataannya cuma sekitar 55 milli detik.
Tapi akan Saya coba pakai API itu, kalau berhasil akan Saya kasih tau
----- Original Message -----
From: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Rabu, 30 Agustus, 2000 17:07
Subject: Re: [MIKRODATA] Timer vb kurang kecil
Terima kasih atas informasinya Bp. Irsya, namun informasi dari anda ini yang
mengatakan bahwa resolusi timer terkecil PC standar hanya 1/18.2 atau nyaris hanya per
55 milisecond membuat saya agak bingung. Setahu saya ada fungsi WIN32 API yang bisa
diakses untuk mendapatkan resolusi timer 1 milisecond. Yah setidaknya bila tidak pas
betul yah mendekati 1 milisecond.
Fungsi API tersebut:
Function SetTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal
uElapse As Long, ByVal lpTimerFunc As Long) As Long
Function KillTimer Lib "user32" (ByVal hwnd As Long, ByVal nIDEvent As Long) As Long
Jadi apakah benar fungsi API tersebut bisa lebih kecil dari 1/18.2 detik?
Iwan Prasetyo
--------------
On Tue, 29 August 2000, "Irsya" wrote:
>
> Dari sumber buku pemograman saya dikatakan Timer PC merupakan rutin yang selau
dieksekusi oleh processor sebanyak 18.2 kali setiap detiknya. Jadi Timer terkecil yang
didapat pada PC standar adalah 1/18.2 hasilnya sekitar 0.0549 detik nggak mungkin
lebih kecil dari ini. Dalam PC terdapat chip 8253 yang dapat digunakan untuk
memprogram ulang laju timer agar sesuai yang diinginkan, dimana untuk komunikasinya
digunakan port 40h.
> Kemudian kita mengganti interupsi 1Ch tadi dengan yang baru kita buat, maka kita
akan mendapatkan timer sesuai keinginan kita.
> Sayangnya Saya baru berhasil membuat programnya dengan bahasa C (turbo C), karena
VB nggak menyediakan perintah untuk mengganti interupsi.
> Kemarin Saya dapat email dari sdr Thonie (milis waroengVB) katanya harus
menggunakan NASM (bahasa Asembler) dicompile jadi dll baru bisa digunakan, tapi saya
belum sempat mencobanya karena NASM itu downloadnya lama.
>
> Ada nggak yang bisa bantu, soalnya saya perlu juga.
>
>
>
> ----- Original Message -----
> From: starbali
> To: [EMAIL PROTECTED]
> Sent: Selasa, 29 Agustus, 2000 8:45
> Subject: [MIKRODATA] Timer vb kurang kecil
>
>
> Untuk rekan2 penggemar VB saya mempunyai kesulitan. Kalau rekan2 atau mikrodata
ada yang bisa tolong bantu kami.
>
> Saya ingin membuat dtr on/off sebanyak 576 bit dengan logic 10101010...dst
> Waktu yang saya perlukan 480 mili second untuk total 576 bit. Jadi waktu yang
saya perlukan tiap bit adalah 480/576 = 0.8333333 mili second.
>
> Kalau saya makai timernya VB minimal 1 mili second, itu yang menjadi masalah.
> Jawaban saya tunggu di [EMAIL PROTECTED] terima kasih banyak.
>
> Mahfudin-Denpasar
> Bali
