Mengakses IC ADC Eksternal ADC0820

Mengakses IC ADC Eksternal ADC0820

           Kali ini akan dijelaskan mengenai bagaimana cara mengakses IC ADC eksternal menggunakan mikrokontroller ATMega16 dan bahasa basic (Bascom AVR), sebenarnya pada mikrokontroller sudah terdapat ADC internalnya yaitu pada PortA dengan 10 bit namun sengaja menggunakan IC ADC0820 untuk mengetahui bagaimana cara kerja dari IC ADC eksternal ini yang menghasilkan output 8 bit, untuk bentuk alatnya seperti Gambar 6.47a 

         Alat yang untuk mengakses IC ADC ini menggunakan mikrokontroller ATMega16 dengan tampilan LCD eksternal, seperti halnya ADC internal mikrokontroller, ADC0820 juga berfungsi sama yaitu mengkonversikan tegangan input menjadi nilai digital yang kemudian diolah menggunakan rumus sehingga hasilnya bisa berupa tegangan.

Skema ADC0820

Program Bascom AVR

'The Db0 -7 Is Connectet To A Free Port

'Pull WR pin low and read port you get value 0-255

$regfile = "m16def.dat"

$crystal = 12000000

'CODE TEST :

Ddrd = &B00000000           ' adc0820 D0 to D7

Portd = 0

Config Portb.5 = Output      'WR pin pull low to read

Portb.5 = 1

Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2

Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5

Config Lcd = 16 * 2

Cursor Off Noblink

Dim Adc_val As Byte               'read val from adc0820

Dim Adc_single As Single     'show volt from adc0820 read value / 51

Config Single = Scientific , Digits = 2

Cls

Do

Portb.5 = 0          'pull low to read

Adc_val = Pind

Portb.5 = 1

Adc_single = Adc_val / 51

Locate 1 , 1

Lcd " READ : " ; Adc_val ; " "

Locate 2 , 1

Lcd "VOLT : " ; Adc_single ; " "

Loop

End

VIDEO HASILNYA