roboforum.ru

Технический форум по робототехнике.

Как измерить напряжение аккума

Раздел создан специально для людей которым интересна робототехника, но в силу разных причин они не знают с чего начать.
Задавайте ваши вопросы, какими бы простыми они не казались, постоянные посетители форума постараются ответить на них по мере своих сил.
Робот своими руками. Самодельный робот.

Как измерить напряжение аккума

Сообщение wan0 » 04 янв 2011, 18:57

Здравствуйте! Подскажите, пожалуйста.
Как измерить напряжение с помощью ADC ?
Код: Выделить всёРазвернуть
$regfile = "m32def.dat"                                     
$crystal = 16000000                                       
$baud = 19200

Config Adc = Single , Prescaler = Auto , Reference = Avcc

Dim U As Single                                           
Dim I As Single                                       
Dim Ul As Single
Dim Uadc As Word
Dim Iadc As Word
Dim Uacc As Word

Start Adc
Uadc = Getadc(0)
Iadc = Getadc(1)
Stop Adc
Do
I = Iadc * 0.001668
U = Uadc * 0.02529

Waitms 1000
Ul = I * 1.5
Uacc = U - Ul
I = I * 1000
Print "Charge, " ; Uacc ; " Volt "
Print "Charging current is " ; I ; " Ma"

Loop

End

Нашёл вот такой исходниик, но он отображает.
В поиске нашёл только измерение в процентах.
Дайте код плиз.
Заранее благодарен.
Последний раз редактировалось wan0 04 янв 2011, 20:24, всего редактировалось 1 раз.
Аватара пользователя
wan0
 
Сообщения: 13
Зарегистрирован: 10 дек 2007, 00:44
Откуда: Украина, Симферополь
Skype: vokforever
прог. языки: PHP, VB, С++, BASCOM

Re: Как измерить напряжение и силу тока аккума

Сообщение avr123.nm.ru » 04 янв 2011, 19:00

посмотрите примеры BASCOM с АЦП
Читайте !
Аватара пользователя
avr123.nm.ru
отсылающий читать курс
 
Сообщения: 14195
Зарегистрирован: 06 ноя 2005, 04:18
Откуда: Москва
Предупреждения: -8

Re: Как измерить напряжение и силу тока аккума

Сообщение EdGull » 04 янв 2011, 19:00

какая еще сила тока аккумулятора?
Аватара пользователя
EdGull
 
Сообщения: 10211
Зарегистрирован: 28 дек 2004, 20:33
Откуда: Тольятти
Skype: Ed_Gull
прог. языки: Bascom AVR Basic
ФИО: Гуль Эдуард Викторович

Re: Как измерить напряжение аккума

Сообщение wan0 » 04 янв 2011, 21:56

Почитал пример на робозоне, вспомнил и написал.
Если кому-то пригодится.
Код: Выделить всёРазвернуть
$regfile = "m32def.dat"                                     ' файл спецификации Меги32
$crystal = 16000000                                         ' указываем на какой частоте будем работать
$baud = 19200


Config Adc = Single , Prescaler = Auto , Reference = Internal '2.56

Config Pinb.0 = Output : Led1 Alias Portb.0                 'КРАСНЫЙ ногу сконфигурировали как выход и обозвали Led1
Config Pinb.1 = Output : Led2 Alias Portb.1                 'ЗЕЛёНый ногу сконфигурировали как выход и обозвали Led2
Config Pinb.2 = Output : Led3 Alias Portb.2                 'СИНИЙ ногу сконфигурировали как выход и обозвали Led3



Dim U As Word
Dim I As Byte
Dim Volt As Single
       Start Adc

Do

   U = Getadc(0)
   Volt = 0.005 * U
   Print "charge " ; Volt ; " V"
   Waitms 1000
Loop


End
Аватара пользователя
wan0
 
Сообщения: 13
Зарегистрирован: 10 дек 2007, 00:44
Откуда: Украина, Симферополь
Skype: vokforever
прог. языки: PHP, VB, С++, BASCOM

Re: Как измерить напряжение аккума

Сообщение Myp » 05 янв 2011, 11:17

особенно красиво наверно должны моргать 3 цветных светодиода :D
<telepathmode>На вопросы отвечает Бригадир Телепатов!</telepathmode>
Всё уже придумано до нас!
Аватара пользователя
Myp
скрытый хозяин вселенной :)
 
Сообщения: 18018
Зарегистрирован: 18 сен 2006, 12:26
Откуда: Тверь по прозвищу Дверь
прог. языки: псевдокод =) сила в алгоритме!
ФИО: глубокоуважаемый Фёдор Анатольевич


Вернуться в Новичкам или основы основ роботостроения.

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 0

cron