BASCOM AVR : SENSOR GP

loading...

BASCOM AVR :  SENSOR GP

Sensor GP adalah sensor jarak digital dengan kemampuan optic. Sensor ini menggunakan triangulasi dengan chip PSD yang telah terintegrasi. Biasanya dipasaran sensor dimuat dengan kabel yang terdiri dari VCC, GND, dan data yang panjangnya sekitar 10 cm. Sensor GP ini merupakan tergolong kedalam sensor jarak yang mampu saturasi sampai 80 cm. Dimana semakin dekat benda terhadap sensor maka akan semakin besar tegangan yang dikeluarkan oleh sensor tersebut. Untuk mendapatkan logika high anda dapat memasang sensor ini dengan benda berjarak 20 cm. Namun itu pun dalam keadaan set pabrikan, jika anda ingin menambah atau mengurangi batas minimum dan maksimum sensor ini high atau low anda dapat menentukannya. Untuk batas maksimalnya sensor ini dapat mendeteksi logika low sampai 150 cm. Biasanya logika high dan low diterjemahkan kedalam tegangan antar 1 dan 5 volt.

Sensor GP dikelompokan kedalam dua jenis ada yang mempunyai output analog

 dan ada yang mempunyai output digital. Output analog diterjemahkan kedalam

 tegangan antara 0 – 5 volt sedangkan output digital diterjemahkan hanya high

 dan low. Serinyapun sangat banya untuk sensor GP ini. Dibawah ini tipe-tipe

sensor GP menurut Conrad:

Sharp, GP2Y0D02YK, GP2Y0D02YK, Sharp, GP2Y0D02YK, GP2Y0D02YK, 

GP2Y0D02YK, Mftr. Bagian Tidak GP2Y0D02YK, MPN GP2Y0D02YK, EAN 

4016138096927, EAN-4016138096927, Sensor jarak GP2Y0D02YK, 

GP 2 Y0D 02 YK, Tegangan operasi: 5 V / DC, Rentang pengukuran: 

Rentang deteksi 20 -150 cm, Komponen, Sensor, Sensor Jarak , Sensor 

jarak jauh, sensor jarak, sensor jarak, sensor objek, sensor jarak, sensor 

jarak, sensor jarak, sakelar sensor, sakelar sensor, GP2Y0D02YK, sensor 

jarak, sensor jarak, sakelar sensor, peringatan jarak, detektor jarak

Nah seperti itu mungkin bahasanya sedikit aneh karena saya langsung menerjemahkannya kedalam google translate.

Sekarang kemampuan sensor GP sendiri seperti pada table dibawah ini !

Type	GP2Y0D02YK
Content	1 pc(s)
Operating voltage	5 Vdc
Outputs	Voltage (analogue)
	20 cm
Max. range	150 cm
Connector	Cable, open end
Cable length	10 cm
Min. temperature	-10 °C
Max. temperature	+60 °C

Berikut ini adalah gambar untuk sensor GP sendiri !

 

Yang terakhir adalah kode program sensor do dalam BASCOM. Berikut adalah hasil riset saya selama di lab robotic untuk sensor GP.

$regfile = "m128def.dat"                                   'Mikro yg di gunakan

$crystal = 16000000                                         'Xtal

$baud = 19200

'===============================================================================

'     Deklarasi

'===============================================================================

'------- Pin GP ----------------------------

Config Pine.5 = Input                                       'GP depan kiri

Config Pine.4 = Input                                       'GP depan kanan

Config Pine.7 = Input                                       'GP belakang kiri

Config Pine.6 = Input                                       'GP belakang kanan

Gpkirid Alias Pine.5

Gpkanand Alias Pine.4

Gpkirib Alias Pine.7

Gpkananb Alias Pine.6

'------- Servo Capit -----------------------

Config Portf.0 = Output

Dim Servocap As Integer

Dim Icap As Byte

Dim I As Byte

'===============================================================================

'     Program Utama

'===============================================================================

Print "Mulaii"

'Servocap = 4500

'Wait 1

'Pulseout Portf , 0 , Servocap

'Print Servocap

'Wait 1

'Pulseout Portf , 0 , Servocap

'Print Servocap

Wait 1

Do

   Print "kirid : " ; Gpkirid ; " kanand : " ; Gpkanand ; "kirib: " ; Gpkirib ; " kananb : " ; Gpkananb

   'Icap = Waitkey()

   'If Icap = 97 Then

   '   Servocap = Servocap + 50

   '   Print Servocap

   '   Pulseout Portf , 0 , Servocap

   'Elseif Icap = 115 Then

   '   Servocap = Servocap - 50

   '   Print Servocap

   '   Pulseout Portf , 0 , Servocap

   'End If

Loop

End

'end program

'===============================================================================

loading...