Contoh Program Komunikasi Serial dengan BASCOM AVR

Mungkin komunikasi serial sudah tidak asing lagi di telinga yang sudah hobi bermain mikrokontroler, dimana prinsip dari komunikasi serial yaitu dimana komunikasi ini pengiriman data dilakukan per bit, data dikirim dengan bentuk pulsa listrik kontinyu yang disebut bit. Data dikirim satu bit demi satu bit secara berurutan melalui kanal komunikasi yang telah ditentukan. Sehingga jika dicermati, komunikasi serial lebih lambat dibandingkan komunikasi paralel yang mampu mengirim 8 bit sekaligus dalam sekali detak. Beberapa contoh komunikasi serial ialah mouse, scanner, system akuisisi data yang terhubung ke port COM1/COM2, dan masih banyak lagi termasuk mikrokontroler.


Didalam mikrokontroler, untuk dapat berkomunikasi serial dengan PC, membutuhkan suatu konverter yang biasa kita kenal RS232, dan jika ingin mengetahui sejenak tentang RS232 ini, bisa kembali membaca pada postingan yang lalu tentang Rangkaian RS232. Selain RS232 tersebut karena penggunaannya masuk ke port serial, ada juga beberapa device yang menggunakan port USB dengan sebuah device yang biasa kita kenal USB to Serial TTL Converter. Jika dalam berkomunikasi serial ingin melalui port USB untuk konverter tersebut, Anda bisa membaca postingan saya tentang Cara Membuat USB to Serial TTL Converter untuk piranti pendukung dalam berkomunikasi serial ini.


Karena saya sudah pernah memposting tentang RS232 dan USB to Serial TTL Converter, sehingga tidak perlu lagi saya membahas mengenai hal tersebut. Disini, ada sebuah contoh pemrograman komunikasi serial mikrokontroler atmega32 dengan BASCOM AVR. Dimana dalam program ini, hanya membaca penekanan tombol pada hypeterminal dengan menampilkannya di LCD 16x2. Dalam pemrograman ini hanya membaca penekakan tombol A dan B saja, jika mikrokontroler mendapatkan input data A, maka akan menampilkannya di layar LCD tersebut. Untuk source code tersebut ada dibawah ini :


 
Komunikasi Serial ATMEGA32 dengan BASCOM AVR :

$regfile = "m32def.dat"
$crystal = 12000000
$baud = 9600

Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5
Config Lcdbus = 4
Config Lcd = 16 * 2
Cursor Off
Cls

Dim Tombol As Byte

Terima_data:
Do 
Tombol = Inkey()
Select Case Tombol
  Case "A" :
   Cursor Off
   Locate 1 , 1
   Lcd "Tes Serial"
   Locate 2 , 1
   Lcd "Tombol A ditekan"
  Case "B" :
   Cursor Off
   Locate 1 , 1
   Lcd "Tes Serial"
   Locate 2 , 1
   Lcd "Tombol B ditekan"
  End Select
Loop

Mudah bukan?

Untuk komunikasi serial tidak jauh berbeda dengan program biasa, hanya ada sedikit tambahan, yaitu untuk kecepatan baudrate ($baud), penekanan tombol (Inkey() atau Waitkey()), dan dapat mengirim kembali penekanan tombol (Print).


 
Membutuhkan USB to Serial TTL Converter (USB langsung ke RX,TX, GND mikrokontroler)?

Klik tab di atas berlabel "Produk"

Artikel Terkait Lainnya :

Posted in: Mikrokontroler