KOMUNIKASI SERIAL (UART) RASPBERRY PI (TERIMA DATA)

KOMUNIKASI SERIAL (UART) RASPBERRY PI (TERIMA DATA)

               Melanjutkan postingan sebelumnya yaitu tentang mengirim data, kali ini saya akan menjelaskan bagaimana cara agar Raspberry bisa menerima data melalui serial (UART), jadi terdapat sebuah mikrokontroller yang mengirim data berupa data ADC lalu di tangkap oleh Raspberry melalui port serial, ini sangat umum sekali digunakan untuk mengirim data ke Raspberry karena Raspberry tidak memiliki bagian ADC, jadi menggunakan ADC mikrokontroller yang dikirimkan ke Raspberry. berikut adalah beberapa langkah yang harus dilakukan.

0. pertama install dulu pySerial dengan mengetikkan "sudo apt-get install python-serial"

1. ketikkan "sudo nano /boot/cmdline.txt"

2. Rubah

"dwc_otg.lpm_enable=0 console=ttyAMA0,115200 kgdboc=ttyAMA0,115200 console=tty1 root=/dev/mmcblk0p2 rootfstype=ext4 elevator=deadline rootwait"

menjadi

"dwc_otg.lpm_enable=0 console=tty1 root=/dev/mmcblk0p2 rootfstype=ext4 elevator=deadline rootwait"

3. kemudian save dengan cara ctrl+X lalu ctrl+Y <enter>

4. setelah itu ketikkan "sudo nano /etc/inittab"

5. Rubah

"#Spawn a getty on Raspberry Pi serial line
T0:23:respawn:/sbin/getty -L ttyAMA0 115200 vt100"

menjadi

"#Spawn a getty on Raspberry Pi serial line
#T0:23:respawn:/sbin/getty -L ttyAMA0 115200 vt100"

6. kemudian save dengan cara ctrl+X lalu ctrl+Y <enter>

7. pada tahap ini serial Raspberry siap digunakan tapi harus di Reboot dahulu

8. Ketikkan "sudo shutdown -r now", lalu hidupkan kembali Raspberry

9. Ketikkan program Python berikut, lalu save dengan nama "cobaterima.py"

import serial

port = serial.Serial("/dev/ttyAMA0", baudrate=9600, timeout=1.0)

while True:
       try:
             state=port.readline()
             print (state)
       except:
             pass

10. Program diatas untuk menerima data dari mikrokontroller

11. Hubungkan pin RX-TX-GND raspberry dengan RX-TX-GND mikrontroller

12. Lalu ketikkan Program Bascom berikut.

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

Config Adc = Single , Prescaler = Auto , Reference = Avcc

Dim X As Word

Start Adc

Do
X = Getadc(0)
Print X
Wait 1
Loop

13. Jika berhasil maka pada layar akan tampak data yang dikirimkan oleh mikrokontroller

14. VIDEO HASILNYA

.