Posts tagged ‘serial port’

Mendeteksi Port Serial Dengan Visual Basic 2010


Port Serial adalah salah satu kelengkapan yang sampai sekarang masih ada pada sebuah PC. Port serial biasanya digunakan untuk menghubungkan sebuah device dengan PC. Walaupun kehadiran USB semakin mendominasi standar komunikasi antar device, namun komunikasi serial masih sangat familiar.

Dengan memahami komunikasi serial, kita akang dapat melakukan banyak hal, khususnya bagi engineer atau bagi hobbiest elektronika.

Penggunaan laptop saat ini juga cenderung mendominasi baik bagi kalangan praktisi elektronika maupun mahasiswa. Sehingga kehadiran port serial pada sebuah laptop sangatlah penting. Disisi lain, laptop yang dirilis saat ini tidak ada yang menyertakan port serial sebagai sebuah device komunikasi. Untuk mengatasi ini, dipasaran banyak dijual aksesoris USB to Serial yang harganya bervariasi dan relatif terjangkau.

Dengan aksesoris USB to Serial, Anda dapat menghadirkan port serial virtual pada laptop atau PC yang sebelumnya tidak ada. Bisa juga digunakan untuk menambah kebutuhan port serial. Untuk mengetahui keberadaan port serial pada sebuah komputer, kita bisa melakukan pengecekan melalui langkah berikut:

1. Klik kanan pada My Computer, pilih Manage
manage
2.Pilih Computer Management–> System Tools–> Device Manager. Lihat pada group Ports (COM & LPT)

port

Pada contoh di atas, PC memiliki satu port serial onboard dan satu virtual serial port dengan ID chip Prolific.

Sekarang, bagaimana cara mendeteksi port serial secara otomatis menggunakan Visual Basic 2010?

Pada sesi ini diberikan contoh menggunakan VB 2010, namun saya sudah mencoba dan dapat diterapkan juga pada VB 2008.

Buat project seperti berikut:

1. Pilih New Project

New Project

2. Buat form berikut

form

3.Isikan coding berikut:

– Tambahkan komponen Serial Port dari group Components

add serialport

– Pada Button1 (button Close)


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 Dim Ingin As MsgBoxResult
 Ingin = MsgBox("Apakah Anda akan keluar?", MsgBoxStyle.YesNo, "Keluar")
 If Ingin = MsgBoxResult.Yes Then
 Me.Close()
 ElseIf Ingin = MsgBoxResult.No Then
 Exit Sub
 End If
 End Sub

– Pada button Disconnect


Private Sub btnDisconnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisconnect.Click
 'tutup koneksi Serial port, jika berhasil tampilkan indikator
 Try
 SerialPort1.Close()
 btnConnect.Enabled = True
 btnDisconnect.Enabled = False
 Catch ex As Exception
 MsgBox(ex.ToString)
 End Try
 End Sub

– Pada button Connect


Private Sub btnConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConnect.Click
 'cek, jika status serial port open, tutp koneksi serial port
 If SerialPort1.IsOpen Then
 SerialPort1.Close()
 End If

'atur properti serial port
 Try
 With SerialPort1
 .PortName = cbbCOMPorts.Text
 .BaudRate = 115200
 .ReadBufferSize = 500
 .Parity = IO.Ports.Parity.None
 .DataBits = 8
 .StopBits = IO.Ports.StopBits.One
 .Handshake = IO.Ports.Handshake.None
 End With
 'open koneksi serial port
 SerialPort1.Open()

btnConnect.Enabled = False
 btnDisconnect.Enabled = True
 Catch ex As Exception
 MsgBox(ex.ToString)
 End Try
 End Sub

– Pada Form1_load


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 'cek available serial port pada komputer
 'termasuk serial modem
 For i As Integer = 0 To _
 My.Computer.Ports.SerialPortNames.Count - 1
 'tambahkan ke dalam list combo serial port
 cbbCOMPorts.Items.Add( _
 My.Computer.Ports.SerialPortNames(i))
 Next
 'disable button disconnect
 btnDisconnect.Enabled = False
 End Sub

Berikut adalah hasil programnya.

result

Demikian, semoga bermanfaat.

Mengatur Setting Port Serial Pada Visual Basic


Untuk menjawab beberapa pertanyaan yang sudah saya terima, disini saya akan mencoba menjelaskan langkah-langkah untuk mengatur setting antara hardware dan software.

Peralatan yang disiapkan=

a. Device USB to Serial dan driver

b. Visuak basic

Setelah siap, makal langkah berikutnya adalah:

1. Memastikan bahwa USB to Serial terpasang dan terdeteksi oleh komputer/laptop

untuk memastikan ini, maka Anda harus memasang driver sesuai dengan chip yang digunakan dengan benar. Selanjutnya untuk mengetahui apakah device sudah terpasang dengan benar dan dikenali oleh komputer/laptop, cek dengan langkah membuka pada Windows (disini dicontohkan pada Windows XP).

device manager awal

Start –> My Computer –> (klik kanan), pilih Manage –> Pilih Device Manager, selanjutnya jika device sudah dikenali maka akan muncul tampilan berikut:

deteksi serial port

2.Pada visual basic, kita tambahkan komponen serial dengan menekan Ctrl + T, kemudian pilih Microsoft Comm Control 6.0, klik Apply kemudian Close.

tambah komponen serial pada VB

3. Berikutnya akan muncul icon seperti berikut pada group komponen di sebelah kiri

komponen serial VB

4. Drag icon MSComm ke bagian desain form.

drag komponen serial vb

5. Cek nomer port serial yang terdeteksi pada hardware berikut

port number hardware

6. Isikan nomer serial pada CommPort Properties, sama dengan nomer port serial yang terdeteksi pada hardware, isikan angka 9 seperti port hardware

setting CommPort

7. Kemudian atur nilai Settings yang menunjukkan Baudrate, parity, panjang bit data dan stop/start bit

Setting VB

Demikian, sehingga setting port serial pada VB dapat dilakukan dan siap digunakan untuk komunikasi serial dengan perangkat lain.

Demian semoga bermanfaat.

Belajar Python: Membaca Serial Port


Tujuan Tutorial:

Akan lebih bagus jika pada awal tulisan ini disampaikan kompetensi apa yang akan didapatkan setelah mempelajari. Pembaca akan dapat melakukan komunikasi serial antara perangkat elektronika (misalnya: mikrokontroller) dengan Python.

 

Bagi seorang engineer, perangkat serial port adalah suatu perangkat yang familiar dan masih dipakai sampai sekarang. Sehingga tidak menarik lagi manakala suatu bahasa pemrograman tidak bisa mengakomodir sistem komunikasi ini.

(Sumber: http://www.swharden.com/blog/images/max232_serial_microcontroller.gif)

Python adalah termasuk yang menyediakan dukungan untuk komunikasi serial. Sehingga bagi setiap engineer dapat menggunakan Python sebagai pilihan bahasa pemrograman. Sebelum dapat melakukan komunikasi serial pada Python, maka dibutuhkan sebuah module yang perlu di install secara terpisah dari Python. Untuk dapat mendapatkan module unduh disini kemudian install.

Selanjutnya, pembaca dianggap sudah dapat melakukan proses installasi pySerial secara sukses. Pada uraian selanjutnya akan disampaikan bagaimana cara melakukan komunikasi serial.

Langkah-langkah yang dapat dilakukan untuk melakukan komunikasi serial adalah:

1. Buka Python Shell

2. Klin New Window (Ctrl + N), kemudian akan muncul window baru

3. Kemudian ketik script berikut:

    import serial
ser = serial.Serial(‘com10’,9600,timeout=1)

from Tkinter import *
root=Tk()
def task():
a=ser.readline(1)
print “nilai= ” + a
root.after(200,task)

root.after(200,task)
root.mainloop()

4. Berikut adalah hasilnya

akan muncul window:

pada Python Shell akan muncul:

 

Penjelasan:

import serial

bagian ini berfungsi untuk melibatkan module serial sehingga dapat digunakan pada Python.

ser = serial.Serial(‘com10’,9600,timeout=1)

Untuk mendeklarasikan variabel ser sebagai serial port dengan properti konfigurasi nomer port= COM10, baudrate= 9600, dan timeout=1.

a=ser.readline()

Membaca data dari serial dan menampung pada variabel a sebagai buffer.

print “nilai= ” + a

Menampilkan nilai yang didapatkan pada Python Shell.

root.after(200,task)

Melakukan schedule setiap 200 milidetik.

root.after(200,task)

Mengulang schedule setiap 200 milidetik

root.mainloop()

lakukan Loop.

 

Demikian semoga bermanfaat.

 

%d blogger menyukai ini: