Translate

Cara mengakses Sensor Arus LA-55-P DC Current TEST (Tutorial Current Sensor LA-55-P)

Cara mengakses Sensor Arus LA-55-P DC Current TEST (Tutorial Current Sensor LA-55-P)

                  
               Selamat malam, kali ini saya akan menjelaskan mengenai bagaimana cara mengakses sensor arus LA-55-P pada sumber arus DC, pada media sumber DC pembacaan bisa dengan mudah dilakukan tanpa harus melakukan sampling data atau melakukan pengolahan data, jadi data yang dihasilkan bisa langsung dibaca oleh mikrokontroller menggunakan fitur ADC-nya, namun yang harus diingat bahwa sensor ini bisa untuk mengukur arus DC maupun AC, sehingga jika mau digunakan untuk mengukur sumber arus AC haruslah dinaikkan offset terlebih dahulu sebesar 2.5 volt sehingga nilai yang terbaca jika terbalik akan tetap bisa terbaca, karena titik 0 nya berada pada 2.5 volt bukan pada 0 volt. pada pengujian ini saya menggunakan rangkaian penaik tegangan dengan menggunakan LM317 dan OP-AMP LM741 sebagai amplifiernya, sebelumnya, harus diketahui bahwa sensor ini memiliki output 1:1000, maka dari itu harus digunakan non-inverting amplifier untuk membesarkan nilai tegangan yang terbaca, karena jika perubahan tegangan terlalu kecil akan menyulitkan mikrokontroller untuk membacanya. berikut penjelasan mengenai skema dan programnya.



a. Minimum System




b. Rangkaian LA-55-P




c. Rangkaian Supply 2,5 volt 



d. Rangkaiam Amplifier




e. Program Bascom AVR

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

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

Ddrb.0 = 1

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

Cursor Off
Cls

Dim Dataadc As Word
Dim V As Single
Dim X As String * 5

Start Adc

Do

Dataadc = Getadc(0)

V = Dataadc * 5
V = V / 1023

X = Fusing(v , "#.##")


Locate 1 , 1
Lcd "adc= " ; Dataadc

Locate 2 , 1
Lcd "V= " ; X
Loop
  



f. Cara merubah ADC ke Arus terukur menggunakan regresi linier

Silahkan masuk ke link berikut, di POINT E , rubah parameternya menjadi arus

LINK





g. VIDEO HASILNYA



  




Mengakses Sensor Arus ACS712 20A bascom avr

Mengakses Sensor Arus ACS712 - 20A bascom avr


               Malam ini saya akan bercerita mengenai bagaimana cara mengakses sensor ACS712 dengan maksimal arus 20A menggunakan mikrokontroller dan bahasa bascom AVR, disini saya menggunakan sebuah resistor variabel yang besar yang mana bisa mengeluarkan arus hingga 3A lebih, karena supply-nya terbatas hanya sampai 30 volt 3A maka saya hanya melakukan pengujian sampai 2A saja, namun menurut datasheet, sensor ini bisa sampai 20A. berikut adalah penjelasan lengkapnya.


 a. Minimum System





b. Program Bascom AVR

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

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

Ddrb.0 = 1

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

Cursor Off
Cls

Dim Dataadc As Word
Dim V As Single
Dim X As String * 5

Start Adc

Do

Dataadc = Getadc(0)

V = Dataadc * 5
V = V / 1023

X = Fusing(v , "#.##")


Locate 1 , 1
Lcd "adc= " ; Dataadc

Locate 2 , 1
Lcd "V= " ; X
Loop




c. Grafik Linierisasi ( DATASHEET )






d. Cara merubah ADC ke Arus terukur menggunakan regresi linier

Silahkan masuk ke link berikut, di POINT E , rubah parameternya menjadi arus

LINK




e. VIDEO HASILNYA