PDA

Просмотр полной версии : BASCOM AVR



vigor53
10.06.2021, 11:28
Кто сможет помочь с программкой ( кодом )на BASCOM ?
Есть такой код - работает

$regfile = "attiny13.dat"
$crystal = 9600000

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output

Start Adc

Do
If Getadc(2) <= 400 Then
Waitms 1000
Portb.0 = 1
Else
Portb.0 = 0
End If
If Getadc(3) <= 400 Then
Waitms 1000
Portb.1 = 1
Else
Portb.1 = 0
End If

Loop
End

-----------
Что нужно - чтоб при совпадении значений на ADC - появлялсось - 1 на порте 0 (1)
не важно
Именно при совпадении !( Причем подбором в программе )
И с этим вопрос - значение 533 в ADC как перисчитать на вольты ?
У меня к примеру - есть значенич 1. 29 в - при котором ДОЛЖНО быть срабатывание ????
Причем - если совпало только на одном ACD - нет реакции , только при совпадении на 2 портах
Схема работает , --- но только -каждый аcп - на свой порт
Надо обьеденить - при совпадении уровней на ADC- или ниже усатановленного
На выходе порта выдавался импрульс - 0.5-.1.0секhttp://forum.modelka.com.ua/attachment.php?attachmentid=329935&stc=1