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: , , , ,

8 Responses to “Antarmuka Port Serial-1: Simulator Port Serial (v2.5)”

  1. silakan berkunjung ke web kami: http://foto.uii.ac.id/

  2. 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);
    };
    }

  3. 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>>>
    }

  4. pak kira2 punya ndak program HB2000W yang masih pakai pararel port printer, klau punya mohon di share dong…

  5. 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.

  6. 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

  7. 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…

Trackbacks/Pingbacks

  1. Antarmuka Port Serial-2: Membaca ID Alat | DSP & Embedded Electronics

Leave a Reply

You can use these tags: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>