COS PHI METER BERBASIS AVR ATMEGA 16 DENGAN BASCOM AVR

Seringkali ketika dihadapkan pada pengukuran Faktor daya (co phi) kita mengalami kesulitan ketika membuat cos phi sensor. Salah atu metodenya adalah dengan menggunakan zerro crossing detektor yang kemudian dihubungkan ke pin T0 atau T1 dari Mikrokontroler. Berikut ini adalah listing program dari COS PHI METER

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

Dim S As Single
Dim Y As Word

Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portb.3 , Rs = Portb.2

Config Lcd = 16 * 2

 Cursor Off
 Cls
 Config Timer1 = Counter , Edge = Falling
 Lcd "FAKTOR  DAYA"
 Lowerline
 Lcd "COS Phi=  "                                           '
Do
Start Counter1
Wait 1
Stop Counter1

S = Counter1 / 100

Locate 2 , 10
Lcd Fusing(s , "#.#")


Counter1 = 0
Loop
End