Теперь в нашем онлайн-магазине доступна уникальная книга «BEAM-робототехника. От азов до создания практических устройств», идеально подходящая как для кружков робототехники, так и для самообучения дома. Вы можете приобрести её по привлекательной цене в 699 рублей. Дополнительная информация о книге доступна на нашем сайте. Также в ассортименте нашего онлайн-магазина представлены готовые наборы для сборки роботов, с помощью которых ваш ребенок сможет легко собрать своего первого робота, следуя нашим подробным инструкциям. Перейти в магазин


[ Раскрыть online-чат / Закрыть ] · [ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: nightmare, Huntswarrior, Aleks_Crow, {{TNT}}  
АЦП нет, что делать?
Отправлено 10.09.2011 - 17:3316
Начальная группа
1798 сообщений
Мужчина
Quote
Я вполне бы удовлетворился двумя переменными резисторами, какие стоят на регулеровке эквалайзеров. Такие есть, но как выяснилось что некуда их воткнуть в тини2313.

Ну один то можно воткнуть.
Если надо 2, то можно подключить каждый к любому из портов, параллельно конденсатору и на минус.
Переводишь порт на выход, заряжаешь кондер, переводишь порт на вход и измеряешь время разряда этого конденсатора.


Pe40rA, еще идея, подсказанная lebaon из джаббера:
Поставить внешний компаратор и подключить 2 переменных резистора.


Профиль Личное сообщение Дом. страница icq Skype
38
Отправлено 10.09.2011 - 19:1817
Модераторы
211 сообщений
Мужчина

Можно без проблем поставить и два и десять переменных резисторов, если воспользоваться вот этой схемой подключения и далее приведённым кусочком кода. Пины выберешь сам и не забудь изменить это в программе. Программа опроса приведена ниже:
-------------------------------------------------------------------------------------------------------------------------------------------- ---------------------------

$regfile = "attiny2313.dat" 'подключаем описание микроконтроллера
$crystal = 4000000 'устанавливаем частоту внутреннего генератора 4Mhz

Config Pinb.6 = Input 'задаём конфигурацию PINB.6 как вход
Config Pinb.7 = Input 'задаём конфигурацию PINB.7 как вход

Dim W1 As Word 'объявляем переменную W1
Dim W2 As Word 'объявляем переменную W2

Do

W1 = Getrc(pinb , 6)
W2 = Getrc(pinb , 7)

'W1-это переменная кооторую получаем при вращении ручки первого переменного резистора
'W2-это переменная кооторую получаем при вращении ручки второго переменного резистора
'что делать с переменными W1 и W2 надеюсь разберёшься сам

Waitus 1000

Loop


Профиль Личное сообщение Дом. страница icq Skype
50
Администраторы
3417 сообщений
Мужчина
Pe40rA, ну как там, получается что-нибудь ?


Только дурак нуждается в порядке-гений господствует над хаосом...
Онлайн ЧАТ по робототехнике ! Заходи и общайся без регистрации =)
Профиль Личное сообщение Дом. страница icq Skype
34
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск: