Kali ini saya mempersembahkan sebuah perangkat lunak yang bisa digunakan untuk pembelajaran kontrol melalui port serial. Sebenarnya perangkat lunak ini sudah saya hasilkan sejak tahun 2008 dan saya gunakan dalam kelas-kelas kuliah maupun pelatihan antarmuka dan otomasi sistem. Sekarang sudah waktunya untuk di-share ke seluruh dunia… Keren euy!
Oke, silahkan unduh dulu softwarenya disini (cara instalasi ada di dalam RAR-nya)..
Baiklah…
Bagaimana menggunakannya?
Versi yang tersedia dalam arsip RAR yang telah Anda unduh adalah versi 2.0, 2.1 dan 2.5. Saya sarankan untuk menjalankan versi terakhir atau 2.5 saja karena sudah banyak perbaikan dari versi sebelumnya. Install Visual Basic 6.0 terlebih dahulu, karena program saya tersebut hanya EXE-nya saja tidak melalui instalasi…
Setelah VB6.0 selesai diinstall, Lakukan klik ganda pada program “simkonser2.5.exe“, maka akan ditampilkan kotak dialog dari virtual serial demo, Gambar 1, yang memberitahukan bahwa hanya bisa mengaktifkan COM6 atau COM7, klik ok saja.
Gambar 1
Perhatikan jendela dari simulator port serial, sebagaimana ditunjukkan pada Gambar 2. Klik pada tombol ON, dan perhatikan, komputer akan membunyikan indikator adanya piranti USB yang seakan-akan ditancapkan pada komputer. Tombol COM6 digunakan untuk memilih COM6 atau COM7 yang akan digunakan.
Gambar 2
Setelah mengaktifkan simulator port serial dengan menekan tombol ON tersebut, maka tombol tersebut berubah menjadi tombol OFF (Gambar 3) dan simulator siap digunakan.
Gambar 3
Aktifkan hyperterminal untuk melakukan percobaan pemberian perintah secara interaktif. Pilih COM6 dengan pengaturan 9600,N,8,1, perhatikan Gambar 4.
Gambar 4
Berikut protokol yang dikenal oleh simulator port serial, masing-masing diikuti dengan “enter”:
- Untuk membaca suhu gunakan perintah “sh”;
- Untuk mengetahui ID board atau ID Simulator Port Serial gunakan perintah “id”;
- Untuk menghidupkan semua LED gunakan perintah “a1″, untuk mematikan gunakan perintah “a0″;
- Untuk menghidupkan LED secara individual gunakan perintah “nomorLED” diikuti “1″, misalnya LED0 menyala gunakan instruksi “01″ dan seterusnya, contoh tampilan pada Gambar 5;
- Untuk mematikan LED secara individual gunakan perintah “nomorLED” diikuti “0″, misalnya LED0 mati gunakan instruksi “00″ dan seterusnya;
- Untuk membaca semua tombol gunakan perintah “ba”;
- Untuk membaca tombol secara individual gunakan perintah “b0″ untuk tombol-0, “b1″ untuk tombol-1 dan seterusnya;
- Bila salah memberikan perintah, akan dikirim “er”;
Gambar 5
Cobalah memberikan perintah-perintah sesuai dengan protokol yang saya berikan tersebut. Learning by doing, silahkan… dicoba dulu sebelum melanjutkan ke artikel berikutnya…
Jika sudah selesai klik dulu tombol OFF baru diikuti dengan klik tombol Keluar, terima kasih. Selanjutnya ikuti artikel sambungan dari bagian-1 ini…
Tags: antarmuka, komputer, pc, port serial, simulator
June 13th, 2011 at 5:58 pm
silakan berkunjung ke web kami: http://foto.uii.ac.id/
June 16th, 2011 at 10:47 am
Pak..saya seorang mahasiswa…
saya mencoba untuk mengirim data dari mikro ke vb tetapi
data dapat saya kirim dari mikro ke hiperterminal dan dari hiperterminal ke VB,,
tetapi tidak bisa klaw dari mikro ke VB,,,hasilnya malah error terus..
“Error not reading com device”
Program Vb saya:
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
With MSComm1
‘non aktifkan dulu serial port
If .PortOpen Then .PortOpen = False
’set serial port yang ingin digunakan
.CommPort = 4
’set baud rate,parity,databits,stopbits
.Settings = “9600,N,8,1″
’set DTR and RTS
.DTREnable = True
.RTSEnable = True
‘aktifkan event oncomm event
.RThreshold = 1
‘non aktifkan event oncomm
.SThreshold = 0
‘aktifkan serial port
.PortOpen = True
End With ‘MSComm1
‘tampilkan tanda derajat
Label2.Caption = “RPM”
End Sub
Private Sub MSComm1_OnComm()
Dim strInput As String
With MSComm1
‘test event data masuk
Select Case .CommEvent
Case comEvReceive
‘tampilkan data dari Arduino
strInput = .Input
Label2.Caption = Asc(Mid(strInput, 1, 1)) & ” RPM”
End Select
End With ‘MSComm1
End Sub
Private Sub Timer2_Timer()
Text1.Text = MSComm1.Input
End Sub
Program Mikro AVR8535:
while (1)
{
// Place your code here
a = read_adc(0);
printf(”%d “,a) ;
delay_ms(100);
};
}
June 16th, 2011 at 10:47 am
Pak..saya seorang mahasiswa…
saya mencoba untuk mengirim data dari mikro ke vb tetapi
data dapat saya kirim dari mikro ke hiperterminal dan dari hiperterminal ke VB,,
tetapi tidak bisa klaw dari mikro ke VB,,,hasilnya malah error terus..
“Error not reading com device”
Program Vb saya:
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
With MSComm1
‘non aktifkan dulu serial port
If .PortOpen Then .PortOpen = False
’set serial port yang ingin digunakan
.CommPort = 4
’set baud rate,parity,databits,stopbits
.Settings = “9600,N,8,1″
’set DTR and RTS
.DTREnable = True
.RTSEnable = True
‘aktifkan event oncomm event
.RThreshold = 1
‘non aktifkan event oncomm
.SThreshold = 0
‘aktifkan serial port
.PortOpen = True
End With ‘MSComm1
‘tampilkan tanda derajat
Label2.Caption = “RPM”
End Sub
Private Sub MSComm1_OnComm()
Dim strInput As String
With MSComm1
‘test event data masuk
Select Case .CommEvent
Case comEvReceive
‘tampilkan data dari Arduino
strInput = .Input
Label2.Caption = Asc(Mid(strInput, 1, 1)) & ” RPM”
End Select
End With ‘MSComm1
End Sub
Private Sub Timer2_Timer()
Text1.Text = MSComm1.Input
End Sub
Program Mikro AVR8535:
while (1)
{
// Place your code here
a = read_adc(0);
printf(”%d “,a) ;
delay_ms(100);
};
Kira2 apa yang harus saya perbaiki…mohon bantuannya>>>
}
August 7th, 2011 at 11:01 pm
pak kira2 punya ndak program HB2000W yang masih pakai pararel port printer, klau punya mohon di share dong…
August 10th, 2011 at 9:14 pm
pak agfi, untuk program simulator serial uC tersebut bisa kita ubah atau tidak. Misalnya kita ingin membuat input sendiri dari uC tersebut sebelum dicoba ke alat.
September 12th, 2011 at 9:11 am
maf pa out of topic…..
pa minta tolong dibahas cara menggunakan IC DTMF MT8888 menggunakan control AT8951/2051 diantaranya MT8888 sebagai tone generator ,sya kurang mengerti pengaturan register’y…klo tone sebagai detector sih dah saya coba g….
thx
October 3rd, 2011 at 12:24 pm
Pengen tau mengenai gps komunikasi via serial. ada yang tau tidak? karena saya coba dihyperterminal tampil $PS$PS$PS,dst apakah demikian?
Dan saya menggunakan atmega8535, bagaimana program VBnya?mohon bantuannya…
March 6th, 2018 at 1:43 pm
seprti arduino ya
March 8th, 2018 at 2:06 pm
duh jadi pegen coba
March 21st, 2018 at 3:01 pm
artikel yang menarik pak
May 16th, 2018 at 1:55 pm
thank you for sharing it’s so helpful
December 8th, 2018 at 11:22 pm
i like this article, thank you for sharing.
December 12th, 2019 at 1:17 am
I like your post and also like your website because your website is very fast and everything in this website is good. Keep writing such informative posts. I have bookmark your website. Thanks for sharing
December 13th, 2019 at 11:08 am
It’s a really unique and informative article. Great work! Much appreciated, keep posting many more…. I added it to my bookmark website list and will be checking back in the near future.
December 31st, 2019 at 10:51 am
It’s very informative and you are obviously very knowledgeable content on your site. You have opened my eyes to varying views on this topic with interesting and solid content, thanks for sharing
January 17th, 2020 at 9:12 am
It’s a really unique and informative article. Now a days Indian Drama Serial Kasauti Zindagi Ki most famous in Asia specially in India & Pakistan.
January 21st, 2020 at 2:52 am
Hi there, just became alert to your blog through Google, and found that it’s really informative. I’m going to watch out for brussels. I will be grateful if you continue this in future. Lots of people will be benefited from your writing. Cheers!
January 28th, 2020 at 6:03 pm
I have read your article; it is very instructive and valuable to me. I admire the valuable information you offer in your articles. Thanks for posting it.
February 9th, 2020 at 9:21 pm
Very Nice. Informative post.
February 9th, 2020 at 9:26 pm
This is a topic that’s close to my heart… Thank you! Exactly where are your contact details though?
February 9th, 2020 at 9:30 pm
bookmarked!!, I love your site!
March 17th, 2020 at 1:40 am
What an Excellent post and an outstanding article. Thanks, author your awesome tropic and excellent content. Really I got very valuable information here.
April 12th, 2020 at 6:56 pm
I haven’t read any articles which possibly tearing me up this way :’) it was just so freaking true! You have lifted up my power. I have lost believe and trust in myself lately. But right from this seconds I have to recommit to myself to love myself first, harder and better and start to climb again ! Thank you