Язык программирования PicBasic

[Lev@]

Когда начинается творческий ступор - плавится мосХ, например, тогда я пишу прогу на БарсикЕ, а потом переделую под ASM.

[Реклама]

Реклама: ООО ТД Промэлектроника, ИНН: 6659197470, Тел: 8 (800) 1000-321

[Lev@]

2 a_sergeevich, давай инфу по Си и/или microСи. Можно даже ветку сделать!?

[Реклама]

20% скидка на весь каталог электронных компонентов в ТМ Электроникс!

Акция "Лето ближе - цены ниже", успей сделать выгодные покупки!

Плюс весь апрель действует скидка 10% по промокоду APREL24 + 15% кэшбэк и бесплатная доставка!

Перейти на страницу акции

Реклама: ООО ТМ ЭЛЕКТРОНИКС, ИНН: 7806548420, info@tmelectronics.ru, +7(812)4094849

[a_sergeevich]

Да не вопрос. Только я думаю надо ветку отдельную создать. Завтра, ну т.е уже сегодня залью всю инфу, программы на какой-нибудь файлообменник, создам тему и выложу ссылки. Жди.

[Реклама]

Выбираем схему BMS для заряда литий-железофосфатных (LiFePO4) аккумуляторов

Обязательным условием долгой и стабильной работы Li-FePO4-аккумуляторов, в том числе и производства EVE Energy, является применение специализированных BMS-микросхем. Литий-железофосфатные АКБ отличаются такими характеристиками, как высокая многократность циклов заряда-разряда, безопасность, возможность быстрой зарядки, устойчивость к буферному режиму работы и приемлемая стоимость. Но для этих АКБ очень важен контроль процесса заряда и разряда для избегания воздействия внешнего зарядного напряжения после достижения 100% заряда. Инженеры КОМПЭЛ подготовили список таких решений от разных производителей. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

[Lev@]

Ок, жду!

[Реклама]

Сравнительное тестирование аккумуляторов EVE Energy и Samsung типоразмера 18650

Инженеры КОМПЭЛ провели сравнительное тестирование аккумуляторов EVE и Samsung популярного для бытовых и индустриальных применений типоразмера 18650. 

Для теста были выбраны аккумуляторы литий-никельмарганцевой системы: по два образца одного наименования каждого производителя – и протестированы на двух значениях тока разряда: 0,5 А и 2,5 А. Испытания проводились в нормальных условиях на электронной нагрузке EBD-USB от ZKEtech, а зарядка осуществлялась от лабораторного источника питания в режиме CC+CV в соответствии с рекомендациями в даташите на определенную модель. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

[25Watt]

Доброй ночи всем.

На изучение ассемблера не хватает свободного времени, забросил давно. Осваиваю теперь потихоньку PicBasic

Поигрался со светодиодами, огоньками бегущими, и прочим... Вроде работает. Начал с pic16f84, как это не банально...

Вот уже некоторое время ломаю голову над следующей поставленной задачей, не получается Решил обратиться за помощью к Вам.

Нужно измерить длительность положительного имульса в интервале 10...1000мс, как это реализовать на этом языке?

Pulsin работает как то криво. После "переполнения" назначенной ей переменной, даже если импульс не появился, программа выполняется дальше, и в это время на поступление импульса никак не реагирует. Как убрать это "мертвое время"? И еще, выходит, что при кварце на 4мГц, максимальное время измерения ограничено 0,65сек (65535 максимальное значение переменной) Как это обойти программно?

[Реклама]

Литиевые аккумуляторы EVE Energy и решения для управления перезаряжаемыми источниками тока (материалы вебинара)

Опубликованы материалы вебинара Компэл, посвященного литиевым аккумуляторам EVE Energy и решениям для управления перезаряжаемыми источниками тока.

На вебинаре мы представили информацию не только по линейкам аккумуляторной продукции EVE, но и по решениям для управления ею, что поможет рассмотреть эти ХИТ в качестве дополнительной альтернативы для уже выпускающихся изделий. Также рассмотрели нюансы работы с производителем и сервисы, предоставляемые Компэл по данной продукции. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

[AlenB]

...И еще, выходит, что при кварце на 4мГц, максимальное время измерения ограничено 0,65сек (65535 максимальное значение переменной) Как это обойти программно?

1. Поскольку для счета используется скорее всего TMR0, а он - 8битный (т.е. дает значение только 0...255), то в программу уже введена какая-то переменная для второго байта. Значит, разбираться в коде и аналогично вводить переменные для 3-го, 4-го и т.д. байтов...

2. Можно выставить другой предделитель для TMR0. Правда, точность ухудшится.

3. Просто использовать кварц на меньшую частоту. Значение переменной останется то же (65535), но замедлится выполнение программы, а время измерения, наоборот, увеличится пропорционально снижению частоты.

Но как это делается в вашем басике, я не знаю. На асме это занимает от двух до 5 строчек кода.

Изменено 17 января, 2010 пользователем AlenB

[Реклама]

Литиевые батарейки и аккумуляторы от мирового лидера  EVE в Компэл

Компания Компэл, официальный дистрибьютор EVE Energy, бренда №1 по производству химических источников тока (ХИТ) в мире, предлагает продукцию EVE как со склада, так и под заказ. Компания EVE широко известна в странах Европы, Америки и Юго-Восточной Азии уже более 20 лет. Недавно EVE была объявлена поставщиком новых аккумуляторных элементов круглого формата для электрических моделей «нового класса» компании BMW.

Продукция EVE предназначена для самого широкого спектра применений – от бытового до промышленного. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

[25Watt]

Поскольку для счета используется скорее всего TMR0, а он - 8битный (т.е. дает значение только 0...255), то в программу уже введена какая-то переменная для второго байта. Значит, разбираться в коде и аналогично вводить переменные для 3-го, 4-го и т.д. байтов...

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

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

В PicBasicPro нравится что можно без заморочек выводить на лсд дисплей все что нужно, да и синтаксис простой и понятный

Просто использовать кварц на меньшую частоту. Значение переменной останется то же (65535), но замедлится выполнение программы, а время измерения, наоборот, увеличится пропорционально снижению частоты.

Ну это уже совсем крайние меры.

Изменено 17 января, 2010 пользователем 25Watt

[Alex]

На асме я это дело представляю

Ну и делайте тогда на АСМе, зачем делать на том, что Вы плохо знаете ?

А вообще, задача решается просто. Настраиваем таймер на 1 мс. и перезапускаем постоянно его. Т.е. делаем тики в 1 мс. и смотрим за состоянием входа. Добавляем 1 переменную размером 2 байта и когда на входе лог. 1, считаем ей кол-во тиков. Всё просто.

[AlenB]

Что же, на нем только мигалки светодиодные писать что ли

Да, именно так (и да простят меня модераторы)

Вот (http://www.barrymichels.com/ide/) человек делал контроллер для винта. После переписывания кода с басика на труЪ-асм быстродействие увеличилось в 40раз.

[Alex]

Вот так это будет выглядеть на Си.

pulse.rarPIC16F628A. И тебе советую заменить 84-ый на него.

Думаю принцип понятен, перведёшь на своего Барсика

[25Watt]

Ну и делайте тогда на АСМе, зачем делать на том, что Вы плохо знаете ?

Ну ассемблер я тоже только поверхностно знаю. Уж больно много он времени отнимает...

А вообще, задача решается просто. Настраиваем таймер на 1 мс. и перезапускаем постоянно его. Т.е. делаем тики в 1 мс. и смотрим за состоянием входа. Добавляем 1 переменную размером 2 байта и когда на входе лог. 1, считаем ей кол-во тиков. Всё просто.

Кажется примерно алгоритм понял.

PIC16F628A. И тебе советую заменить 84-ый на него

Да я и сам понял давно. Но сейчас под рукой только 84й. 628х заказал, но что-то долго едут...

Думаю принцип понятен, перведёшь на своего Барсика

Спасибо конечно, но вот в Си я даже основ не знаю. Пол часа изучал ваш код, так и не понял ничего

Пошел дальше ломать моск...

Изменено 17 января, 2010 пользователем 25Watt

[25Watt]

Вот как то так получается

time var word				  'определение переменных
portb.0 = 1					'PORTB0 как вход
lcdout $FE, 1, "test"		  'вывод на дисплей
pause 1000					 'пауза 1с
lcdout $FE, 1, "0"			 'вывод на дисплей
start:						 'метка
if portb.0 = 0 then start	  'если на входе лог. 0, то переход на метку
pause 1						'пауза 1 мс
time = time + 1				'инкремент переменной
if time > 1000 then goto error 'если больше 1000 то переход на метку
if portb.0 = 1 then start	  'если на входе лог. 1, то переход на метку
lcdout $FE, 1, #time		   'значение переменной на дисплей
error:						 'метка
time = 0					   'очищаем переменную
goto start					 'в начало

Точность низкая получается, но приемлемо для моих целей.

Теперь нужно измерить количество импульсов (до 10) и длительность каждого занести в память

Изменено 17 января, 2010 пользователем 25Watt

[skrvad]

Добрый день или вечер всем. Помогите с вопросом можно ли в пикбейсике перевести трехбайтное число в 10-чный формат (8 байт). Или как это сделать проще?

[Arkan]

Здравствуйте, у меня возникла проблема , при написании прошивки, команду

pause 500 программа признаёт синтаксической ошибкой, есть ли замена этой команде, работаю с программой picsimulatoride, скачивал PicBasicPro_2.43 вобще не запускается.

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

[skrvad]

   Найдите в сети прграмму PicBasik Plus она же (PBP_Editor), там все нормально реализовано, даже команды ASM воспринимает и компилятор рабочий . Справка вся расписана примерами. 

Изменено 12 марта, 2010 пользователем skrvad

[дямон]

всем привет, может быть вопрос глупый, ноо...

Суть вопроса:

Есть переменная со значением, например:

a var byte

a=6

Как мне заставить эту ДЕСЯТИЧНУЮ шестёрку вывестись на порт В например. Тоесть не будет ли ошибкой если я напишу:

a var byte

a=6

portB = a

Или же надо как-то иначе?

[a_sergeevich]

Можешь выводить, ошибки не будет.

[дямон]

спасибо

[дямон]

Всем доброго времени суток, Расскажите, как пользоваться АЦП на Бэйсике?

Читал книгу Чака Хелибайка, он пишет что там нужно мерять напряжение с помощью "плечей" - 2-х резисторов - один постоянный другой переменный, в других местах видел где-то, что можно просто переменный резистор подцепить.

Как правильнее сделать?

[lc433]

Как правильнее сделать?

По закону Ома будет правильнее. АЦП анализирует напряжение на входе. Как будете подавать, такие данные и получите в цифровом формате.

[дямон]

подскажите, как указывать конфигурацию пика? WDT осциллятор и прочее. как это указать?

[fracht]

добрый вечер!

хотеть узнать, как можно повторить программу main n-раз, допустим 5 раз

Symbol LED = 0

TRISB = %11111110

main:

High LED

Pause 500

Low LED

Pause 500

goto main

END

к примеру, я хочу заставить диод мигать по пол секунды,пять раз, затем он потухнет на 5 сек, потом снова начнет по пол секунды мигать 5 раз

как так сделать?

[Alex]

Юзайте циклы. В бейсике, на сколько я знаю, это будет - FOR.

[дямон]

Вот, по идее должно работать так: 5 раз моргнули с перерывом 0,5 секунды, подождали 5 секунд.

Symbol	LED = 0	

TRISB = %11111110	

PORTB.0 = 0 'делаем 0 на выводе светодиода, не обязательно но оооочень желательно

a var byte 'переменная - счётчик

main:
a=0	
for a = 1 to 5 'начинаем считать 5 раз
High	LED	

Pause	500

Low	LED	


Pause	500	

next a   '  прибавляем к счётчику единицу и повторяем снова

pause 5000 ' когда а = 5 - делаем паузу 5 секунд и повторяем всё заново

goto	main	
END	

[fracht]

прога рработает! а не может быть больше 65000, вот что я узнал)