Приветствую, учительedm2007 писал(а):KOTик, а ИОН у АЦП кто?
Вот код
Код: Выделить всё
$regfile = "attiny85.dat"
$crystal = 1000000
$hwstack = 40
$swstack = 16
$framesize = 32
Config Debounce = 75
Open "comb.1:9600,8,n,1" For Output As #1 'UART PB.1 TXD
Dim Adc_value As Word 'сюда положим значение АЦП во время измерения
'На каждые 0,1 вольт значение АЦП = 10 -------> !!! Зависит от нагрузки. Чем мощнее нагрузка, тем больше падение напряжения и, соответственно, значение АЦП тоже скажет.
'Делитель напряжения
'[ВХОД] -----10к --------> 4,7к [GND]
' |
' |
' ADC(1)
Const Threshold = 740 '11.6B
Config Portb.0 = Output 'OUT
Led Alias Portb.0 'LED висит PORTB.0
'Настройка АЦП
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Stop Adc
'Программа
Do
Start Adc 'запускаем АЦП
Adc_value = Getadc(1) 'кладем значение в Adc_value
Print #1 , "ADC1 = " ; Adc_value 'выводим в терминал
If Adc_value > Threshold Then 'Если значение АЦП > Threshold
Led = 1 'включаем светик
End If 'конец условия
If Adc_value =< Threshold Then 'Если значение АЦП =< Threshold
Led = 0 'выключаем светик
End If 'конец условия
Loop
'-------------------------------------------------------------------------------
End 'end program- - AVCC
- EXTERNAL or OFF
- INTERNAL_1.1
- INTERNAL_2.56_NOCAP
- INTERNAL_2.56_EXTCAP
И тут где-то читал, что у внутреннего ИОНа тоже имеется погрешность.
Буду признателен, если поможете


