Japanino ArduinoISPで ATtiny13 で AD入力 ライブラリ比較(21) (9/23)
なお、ライブラリは前々回のJapanino ArduinoISPで ATtiny13 で I2C液晶 ライブラリ(19) (9/21)を参照の事。
ソース:
'****************************************
' Copyright (c) 2016 k1segawa
' License : free
' Program : ADC Control with LCD Lib
'****************************************
$regfile = "attiny13.dat"
$crystal = 9600000
$hwstack = 24
$swstack = 4
$framesize = 8
Config Scl = Portb. 1
Config Sda = Portb. 0
Config I2cdelay = 5
Config Clockdiv = 1
Const Vmode = 5
Config Lcd = 16 * 2
$lib "Lcd_AQMxx02.LBX"
Config Adc = Single , Prescaler = Auto
Dim A As String * 10 , I As Integer , W As Byte
I2cinit
Initlcd
W = 0
Cls
Start Adc
Do
Wait 1
I = Getadc(3)
A = Str(i)
A = A + " "
A = Left(a , 4)
Locate 1 , 1
Lcd "AD=" ; A
Loop
End
' History
' [2016/09/23]
' PB3 ADC3 Input
ソース的には71→42行で大幅減であるが、HEXサイズ的には824→830バイトで若干増えている。だが見通しは良くなっているので(Wを削除し、9に変更してやると824バイトになり同サイズになる)ライブラリを積極的に使っていこう。元の記事はI2Cの使い方を学ぶ実験だったしね。