Регистрация | Вход

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 15 из 15
  • «
  • 1
  • 2
  • 13
  • 14
  • 15
Модератор форума: ivan_fd  
Форум Picbasic.ru » Программирование МК » PicBasicPro » Cчет импульсов (счет импульсов)
Cчет импульсов
DeveloperX Дата: Чт, 05.06.2008, 16:05  |                                                                                                                Сообщение # 211
Группа: Пользователи
Ранг:  Могу и подсказать
Сообщений: 149
Репутация: 1   ±
Замечания:   ±
На сайте с 25.10.2007

Статус: Offline

Yrok, не помогло!!!
вот все исходники
Прикрепления: voltmeter.zip(37.9 Kb)
ЯНДЕКС Дата: 05.06.2008
holyuser Дата: Чт, 05.06.2008, 22:28  |                                                                                                                Сообщение # 212
Группа: Проверенные
Ранг:  Могу и подсказать
Сообщений: 228
Репутация: 5   ±
Замечания:   ±
На сайте с 12.12.2007

Статус: Offline

Вот что у меня получилось:


Code

'****************************************************************
'*  Name    : VoltMeter.pbp                    
'*  Author  : Never Mind                    
'*  Notice  : Copyright (c) 2008 Absolutely Free                 
'*  Date    : 05.6.2008 г.                    
'*  Version : 1.0                    
'*  Notes   : PIC16F676 & LCD 16x2                    
'****************************************************************

   DEFINE  OSC 4
   DEFINE  OSCCAL_1K 1     
   DEFINE  NO_CLRWDT 1

   DEFINE  LCD_DREG    PORTC
   DEFINE  LCD_DBIT    0
   DEFINE  LCD_RSREG    PORTC
   DEFINE  LCD_RSBIT    4
   DEFINE  LCD_EREG    PORTC
   DEFINE  LCD_EBIT    5
   DEFINE  LCD_BITS    4
   DEFINE  LCD_LINES    2
   DEFINE  LCD_COMMANDUS    2000
   DEFINE  LCD_DATAUS    50

   DEFINE  ADC_BITS 10
   DEFINE  ADC_CLOCK 3
   DEFINE  ADC_SAMPLEUS 50

   voltage   VAR WORD
   i         VAR WORD
   dummy     VAR WORD
   disp      VAR WORD
   scale     CON 6826

   OPTION_REG = %10000000
   PIE1 = 0
   TRISA = %00111111
   TRISC = %00000000
   ANSEL = 1
   PORTC = 0
   CMCON = 7
   ADCON0 = %10000001
   i = 10000

begin:
   ADCIN 0,voltage
   dummy = voltage * i
   disp = DIV32 scale
   LCDOUT $FE,128,"Input Voltage > "
   LCDOUT $FE,192,"  ",#(disp DIG 3),#(disp DIG 2),","_
   ,#(disp DIG 1),#(disp DIG 0)," Volts  "
   PAUSE 1000
   GOTO begin
    
   END

Добавлено (06.06.2008, 0:17:55)
---------------------------------------------
Все работает нормально... happy

Добавлено (06.06.2008, 4:28:39)
---------------------------------------------
А вот и схема:

DeveloperX Дата: Пт, 06.06.2008, 10:43  |                                                                                                                Сообщение # 213
Группа: Пользователи
Ранг:  Могу и подсказать
Сообщений: 149
Репутация: 1   ±
Замечания:   ±
На сайте с 25.10.2007

Статус: Offline

всё понятно, кроме этого:
Quote (holyuser)
i = 10000
holyuser Дата: Пт, 06.06.2008, 11:20  |                                                                                                                Сообщение # 214
Группа: Проверенные
Ранг:  Могу и подсказать
Сообщений: 228
Репутация: 5   ±
Замечания:   ±
На сайте с 12.12.2007

Статус: Offline

Дело в том, что в PicBasic-е - только целые числа (без знака), а WORD макс. 65535.
Чтобы получить необходимое количество разрядов в результате, и при том минимизировать неточность округления
при вычислениях, в некоторых случаях приходится прибегать к таким вот приемам.

В нашем случае константа scale = 2^n/(Uref*Kd) = 68.26666(6)
где:
n=10 - разрядность АЦП
Uref=5V - опорное напряжение (в нашем случае это VDD)
Kd=3 - коэффициент деления входного напряжения резистивным делителем: Kd=(R1+R2)/R2

Ясно, что такое значение scale непригодно для непосредственного использования в программе.
Поэтому scale нужно сначала умножить на подходящее число 10^m, и при вычислениях учитывать это,
чтобы не превысить ограничения PicBasic-а.
Вот откуда i=10000

Хотя, наверно, можно сделать и по-другому, но это вопрос вкуса...

Сообщение отредактировал holyuser - Пт, 06.06.2008, 11:24
DeveloperX Дата: Вт, 10.06.2008, 15:00  |                                                                                                                Сообщение # 215
Группа: Пользователи
Ранг:  Могу и подсказать
Сообщений: 149
Репутация: 1   ±
Замечания:   ±
На сайте с 25.10.2007

Статус: Offline

holyuser, БОЛЬШУЩЕЕ спасибо!!!
всё получилось!!!
cjvjd Дата: Ср, 30.07.2008, 00:19  |                                                                                                                Сообщение # 216
Группа: Удаленные
Ранг: 
Сообщений:
Репутация:   ±
Замечания:   ±
На сайте с

Статус:

Здравствуйте!
Объясните, пожалуйста, программа microbasic compiler for pic ver. 7.0.0 ну ни как не хочет понимать COUNT и PULSIN или у этой программы есть другая команда? В helpe этих команд также нет. Заранее спасибо. Владимир Москва. surprised
Bogdankul Дата: Пт, 03.06.2022, 17:52  |                                                                                                                Сообщение # 217
Группа: Заблокированные
Ранг:  Пытаюсь разобраться
Сообщений: 41
Репутация: -3   ±
Замечания:   ±
На сайте с 22.10.2019

Статус: Offline

Добрый день друзья.

Есть такой интересный сайт для заказа услуг стоматологии в Минске.К вашим услугам лучшие стоматологи Минска с многолетним стажем.стоматология минск,удаление зуба, отбеливание зубов,лечение зуба,удаление зуба мудрости,стоматология минск цены и стоматология платные услуги минск.
В случаях, когда терапевтическая стоматология бессильна, приходится прибегать к хирургической. А если зубосохраняющие операции не принесут результата, прибегают к удалению зуба.Необходимость вырвать зуб возникает при:полном или сильном разрушении кариесом;наличии кисты;острых формах периодонтита;количестве зубов выше нормы;неправильном расположении в десне — актуально для зубов мудрости, нередко растущих перпендикулярно основному зубному ряду;установке брекет-системы или зубного протеза;физическом травмировании, смещении в десне, невозможности восстановительной операции.Рекомендации после удаления.После операции в десне остается открытая лунка, на которую иногда накладываются швы. Нежелательно касаться лунки языком, дав сформироваться кровяному сгустку. По той же причине рекомендуется не принимать пищу на протяжении 3-4 часов после посещения стоматолога. Необходимо некоторое время воздерживаться от горячей еды и напитков, а также алкоголя. Несоблюдение рекомендации приведет к увеличению периода заживления и болезненным ощущениям.Качественно и безопасно вырвать зуб в Минске можно платно. Цена удаления зуба в стоматологии зависит от количества корней, расположения, сложности удаления. Операция проводится квалифицированными хирургами-стоматологами.
Увидимся!
индивидуальная гигиена полости рта при пародонтите
отбеливание зубов яблоком
отбеливание зубов дентал
коррекция зубных протезов съемных цена
хирургический шаблон зуба
циркониевые коронки минск
снятие наддесневых зубных отложений
протез зубной съемный на присосках
кариес после пломбирования зуба
сколько проходит анестезия зуба
снимок зуба удаление
амбулаторные зубные хирургические операции
чувствительность зубов причины и лечение
имплантация зубов стоимость цены
удаление зуба мудрости стоимость
стоматологическая имплантация зубов
преимущества металлокерамических коронок
имплантация зубов с пластикой
удаление кисты зуба
ультразвуковое снятие зубных отложений
съемные зубные протезы на имплантах
имплантация зубов adin
заложили лекарство после удаления зуба
воспаление десна зуб удаление
удаление ретинированных зубов минск
удаление 7 зуба цена
отбеливание зубов картинки
металлокерамика зубы штифт
протезирование зубов металлокерамика цены
отбеливание чувствительных зубов
детская стоматология гигиена полости рта
болит зуб после пломбирования каналов
изготовить съемный зубной протез
съемные зубные протезы
протезирование зубов на 6 имплантах
удаление капюшона зуба
зубной съемный протез акри
съемные зубные протезы самые дорогие
бюгельные зубные протезы на верхнюю челюсть цена
лечение периодонтита стадии
корректировка съемных зубных протезов
кусок зуба после удаления
имплантация 1 зуба
безметалловая пресс керамика
лечение пульпита взрослым
натирает зубной протез съемный нижний
имплантация зубов верхней челюсти
зуб мудрости удаление гайморита
уход после имплантации зубов
композитные виниры цена


магнитоэлектрические измерительные приборы
Antonionwo Дата: Ср, 22.06.2022, 00:16  |                                                                                                                Сообщение # 218
Группа: Пользователи
Ранг:  Начал соображать
Сообщений: 31
Репутация: 0   ±
Замечания:   ±
На сайте с 31.01.2021

Статус: Offline

Приветствую Вас дамы и господа!
Предлагаем Вашему вниманию замечательный сайт https://dengi-do-zarplaty.ru/
Отличные наличные – ведущая компания в сфере микрокредитования, деньги будут у вас на карте через 15 минут. Оформить займ можно круглосуточно, в выходные и праздники.Мы применяем самые передовые технологии, чтобы вы могли за 15 минут получить займ на карту или наличными.Наш сервис доступен везде где есть интернет, получить деньги можно в одном из наших отделений или круглосуточно не выходя из дома.


тонировка окон пвх
Antoniocgi Дата: Ср, 22.06.2022, 01:11  |                                                                                                                Сообщение # 219
Группа: Пользователи
Ранг:  Пытаюсь разобраться
Сообщений: 40
Репутация: 0   ±
Замечания:   ±
На сайте с 08.10.2020

Статус: Offline

Добрый день друзья!
Предлагаем Вашему вниманию замечательный сайт https://dengi-do-zarplaty.ru/
Первое, что приходит в голову – это обратиться в банк. Но здесь есть нюансы. Чтобы оформить деньги в кредит в банке, понадобиться время, которого иногда нет. Или к примеру, если человек имеет плохую кредитную историю, банк однозначно не одобрит ему запрашиваемые средства. Получить желаемую сумму будет также сложно тем, кто не имеет официальной работы и постоянного дохода.Если в Ваши планы входит взять деньги в долг без банков и поручителей, в таком случае единственным выходом из ситуации будет - оформление микрозайма в МФО. Все выше перечисленные категории заемщиков, которые считаются максимально рискованными для банковского сектора, в МФО получают положительное решение по выдачи средств.


пленка 3м для авто
Victoregc Дата: Ср, 22.06.2022, 02:52  |                                                                                                                Сообщение # 220
Группа: Заблокированные
Ранг:  Начал соображать
Сообщений: 37
Репутация: 0   ±
Замечания:   ±
На сайте с 27.11.2020

Статус: Offline

Доброго времени суток дамы и господа!
Есть такой интересный сайт https://dengi-do-zarplaty.ru/
Займ на карту онлайн – популярная микрофинансовая услуга. Ее основными достоинствами, по сравнению с обычным банковским кредитом, выступают: оперативность выдачи денег на карточку и доступность большей части потенциальных заемщиков, включая проблемных, то есть имеющих плохую кредитную историю, текущие долги и непогашенные финансовые обязательства.Займы на карту стали реальной возможностью получить деньги не в банке, что требует много времени и доступно далеко не всем. Важным дополнением становится минимум формальностей при получении займа и лояльность со стороны МФО по отношению к потенциальным клиентам. Получить быстрый займ на карту онлайн можно в случае острой нехватки денежных средств, например, при задержке зарплаты, при обнаружении болезни и т.д.


декоративная пленка для стекла купить
Antonioedv Дата: Ср, 22.06.2022, 16:12  |                                                                                                                Сообщение # 221
Группа: Заблокированные
Ранг:  Пытаюсь разобраться
Сообщений: 46
Репутация: 0   ±
Замечания:   ±
На сайте с 01.04.2021

Статус: Offline

Здравствуйте господа!
Есть такой замечательный сайт https://dengi-do-zarplaty.ru/
Конечно, никто не хочет давать деньги в долг и особенно никому не хочется брать их взаймы. Но иногда ситуация решает за нас и приходится очень срочно искать, откуда взять деньги. В первую очередь обычно обращаются к родственникам, друзьям, коллегам по работе, партнерам по бизнесу, но во многих случаях они могут отказать. Хорошим выбором будет обратиться в финансовую компанию, в которой можно на выгодных условиях взять кредит, чтобы улучшить свое положение. Причем важно не только оформить кредит быстро с хорошими требованиями, но и взять кредит наличными под низкий процент. Никто не хочет влезать в долги, которые еще не понятно, как придется отдавать.


пленка защитная xperia
ЯНДЕКС Дата: 22.06.2022
Форум Picbasic.ru » Программирование МК » PicBasicPro » Cчет импульсов (счет импульсов)
  • Страница 15 из 15
  • «
  • 1
  • 2
  • 13
  • 14
  • 15
Поиск: