Генератор НЧ на pic - Страница 6 - Форум Picbasic.ru
Регистрация | Вход
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 6 из 6«123456
Модератор форума: demanik 
Форум Picbasic.ru » Программирование МК » Proton PicBasic » Генератор НЧ на pic
Генератор НЧ на pic
anatol Дата: Пн, 24.09.2012, 00:46  |                                                                                                                Сообщение # 76
Группа: Проверенные
Ранг:  Разобрался
Сообщений: 547
Репутация: 14   ±
Замечания:   ±
На сайте с 10.02.2010

Статус: Offline

Давно ничего не писал на сайте. dry
Ребята. По работе с амплиимпульсом - не городите огород.
Человек не электроприбор, а тем более не электростанция. (В свое время радиактивным излучением лечили бесплодие и наводили красоту)
Типы воздействия практически все опробованы и ничем не отличаются от 20-х годов прошлого века.

Ключевое в амплиимпульсе и подобных:
- трансформаторное разделение и контроль тока пациента;
- "медленное" воздействие тока.
5 кгц - частота несущей "медленного" воздействия выбрана конструкторами от балды - определена применяемыми деталями и их габаритами,
т.е. минимизацией размеров
Удачи в конструкции.
Кстати если намотать трансик (повышаюший) самому например на феррите и применить современные УНЧ - габариты будут маленькими.
ЯНДЕКС Дата: 24.09.2012
ursus Дата: Вт, 25.09.2012, 16:20  |                                                                                                                Сообщение # 77
Группа: Пользователи
Ранг:  Начал соображать
Сообщений: 28
Репутация: 0   ±
Замечания:   ±
На сайте с 14.09.2012

Статус: Offline

Уважаемый Anatol
не помню где но где то проскакивала инфа что 5 кгц выбрана не случайно а именно подбиралась для лучшего лечебного воздействия,да и сомневаюсь что просто от балды взяли именно такое значение ,ведь все лечебные методы воздействия предварительно проходят испытания,возможно выбрали именно из какого то диапазона оптимальных частот с точки зрения лучшего проникновения в ткани пациента

по аналогии могу сказать что в авиации например все машины переменного тока (трансформаторы,преобразователи,генераторы переменки) работают на 400гц,так эту величину взяли не с потолка а именно после изучения в спец нии (для лучшего соотношения мощности\габаритные размеры\вес устройства) так как в авиации идет борьба за каждый лишний килограмм

про феррит согласен полностью
Quote (anatol)
Типы воздействия практически все опробованы и ничем не отличаются от 20-х годов прошлого века.
Вы писали

я не медик но тут не согласен,наука,в том числе и медицина не стоит на месте и наверное вы с этим согласитесь, и все больше и больше ученых приходит к выводам что совр наука почти ничего не знает,а если не может объяснить то просто отрицает(тому много примеров)но это тема для ооочень длинных дискуссий,что стоит только заявление такого ученого как Эйнштейн(дословно не помню-приведу примерно) -''Чем больше я узнаю физику-тем больше верю в бога''
но стоп-стоп-стоп тут мы можем вообще куда -нибудь заехать не туда

с уважением ко всем


ursus
Сообщение отредактировал ursus - Вт, 25.09.2012, 21:00
anatol Дата: Вт, 25.09.2012, 19:09  |                                                                                                                Сообщение # 78
Группа: Проверенные
Ранг:  Разобрался
Сообщений: 547
Репутация: 14   ±
Замечания:   ±
На сайте с 10.02.2010

Статус: Offline

ursus, я тоже далеко не медик (ремонт мед. аппаратуры не в счет).
Как на вкус и цвет товарищей нет, так и в медицине - не могут быть все настроены на 5 кГц. А в приборах подстройки нет.
Это к
Quote
не помню где но где то проскакивала инфа что 5 кгц выбрана не случайно а именно подбиралась для лучшего лечебного воздействия
. Так как сам работал конструктором - знаю "эту кухню" изнутри, со всеми разрешениями и ограничениями, а также использование заделов в производстве. Увы полет фантазии и реальность для конструктора рядом не ходят.
Почему была выбрана несущая 5 кгц. Предполагаю необходимостью обязательного разделения пациент-сеть с помощью трансформатора и необходимостью регулирования импульсов по амплитуде и применению импульсов различных по форме. (Просто трансформатор не передаст прямоугольный или треугольный импульс). В остальном цена, доступность элементной базы и повторяемость...После проведения испытаний сразу в производство - денег на доводку не даст никто (и так сойдет).
Поверь на слово. Так как надоело бить по клавишам.
Посмотри в нете. Вот пару ссылок.
Электролечение
Из справочника фельшера
Просто Гугл
ursus Дата: Вт, 31.12.2013, 17:17  |                                                                                                                Сообщение # 79
Группа: Пользователи
Ранг:  Начал соображать
Сообщений: 28
Репутация: 0   ±
Замечания:   ±
На сайте с 14.09.2012

Статус: Offline

спорить не буду
у нас возможно все

Добавлено (31.12.2013, 17:17)
---------------------------------------------
Новый год бывает ярким
Фейерверки и подарки,
Запах ёлок, Дед Мороз,
Оливье, вино, лосось.
Пусть шампанское искрится,
До утра совсем не спится,
А потом аж целый год
Лошадь на себе везёт!
 
Всех с Новым годом !!!


ursus
Fedor160 Дата: Пн, 13.10.2014, 01:14  |                                                                                                                Сообщение # 80
Группа: Пользователи
Ранг:  Новенький
Сообщений: 5
Репутация: 0   ±
Замечания:   ±
На сайте с 29.01.2014

Статус: Offline

Цитата DAlexV ()
К сожалению Мегаап накрылся тазом. Говорим спасибо ФБР. Перезалил на Депозит. http://depositfiles.com/files/7dyzsr64m
А у вас случайно не сохранился тот архивчик?
DAlexV Дата: Пн, 13.10.2014, 13:31  |                                                                                                                Сообщение # 81
Группа: Модераторы
Ранг:  Разобрался
Сообщений: 691
Репутация: 17   ±
Замечания:   ±
На сайте с 13.05.2008

Статус: Offline

Цитата Fedor160 ()
А у вас случайно не сохранился тот архивчик?
Если про генератор, то да.
http://dfiles.ru/files/741ff6mji

Успехов  wink


Будьте оригинальны - не повторяйте чужих ошибок !!!!
Пишу только на Рыбе (SwordFish). Другую пищу не предлагать, на шерсть влияет :)
Fedor160 Дата: Пн, 13.10.2014, 20:45  |                                                                                                                Сообщение # 82
Группа: Пользователи
Ранг:  Новенький
Сообщений: 5
Репутация: 0   ±
Замечания:   ±
На сайте с 29.01.2014

Статус: Offline

Цитата DAlexV ()
Успехов
 
Спасибо! Еще бы знать как это в протон перевести. С протоном только начинаю, дальше мои познания в программировании заканчиваются , миганием светодиодами во фловкоде. sad   Где нибудь можно найти описание команд SwordFish?
DAlexV Дата: Вт, 14.10.2014, 12:57  |                                                                                                                Сообщение # 83
Группа: Модераторы
Ранг:  Разобрался
Сообщений: 691
Репутация: 17   ±
Замечания:   ±
На сайте с 13.05.2008

Статус: Offline

Код
Device=18F452
Xtal =20

Dim Out As PORTD
Dim CC As Word
Dim x As Word

TRISD=0
PORTD=0

x=1
loop:
' âûâîäèì Ñèíóñ
For CC=1 To 359 Step 1
Out=CRead Sinus + CC
'DelayUS(x)
Next
' âûâîäèì Ïèëó
For CC=0 To 255
Out=CC
Next

' Âûâîäèì òðåóãîëüíèê
For CC=0 To 254
Out=CC
Next
For CC=255 To 1 Step -1
Out=CC
Next

GoTo loop

Sinus:
CData 128,130,132,134,136,139,141,143,145,148,_
150,152,154,156,158,161,163,165,167,169,171,173,175,177,180,182,_
184,186,188,190,191,193,195,197,199,201,203,204,206,208,210,211,_
213,215,216,218,220,221,223,224,226,227,228,230,231,232,234,235,_
236,237,238,239,240,242,243,243,244,245,246,247,248,249,249,250,_
251,251,252,252,253,253,254,254,254,255,255,255,255,255,255,255,_
255,255,255,255,255,255,255,255,254,254,254,253,253,252,252,251,_
251,250,249,249,248,247,246,245,244,244,243,242,241,240,238,237,_
236,235,234,232,231,230,228,227,226,224,223,221,220,218,217,215,_
213,212,210,208,206,205,203,201,199,197,195,194,192,190,188,186,_
184,182,180,178,176,174,171,169,167,165,163,161,159,156,154,152,_
150,148,146,143,141,139,137,134,132,130,128,125,123,121,119,117,_
114,112,110,108,105,103,101,99,97,95,92,90,88,86,84,82,80,78,76,_
74,72,70,68,66,64,62,60,58,56,54,52,51,49,47,45,44,42,40,39,37,_
36,34,33,31,30,28,27,25,24,23,22,20,19,18,17,16,15,14,13,12,11,_
10,9,8,7,7,6,5,5,4,3,3,2,2,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,_
1,1,1,2,2,3,3,4,4,5,6,6,7,8,9,10,10,11,12,13,14,15,16,18,19,20,_
21,22,24,25,26,28,29,31,32,34,35,37,38,40,42,43,45,47,48,50,52,_
54,56,57,59,61,63,65,67,69,71,73,75,77,79,81,83,85,88,90,92,94,_
96,98,101,103,105,107,109,112,114,116,118,120,123,125    ' Òàáëèöà çíà÷åíèÿ ñèíóñà

Прошу прощения. Выложил архив без кода для Протона. sad   Исправляюсь.

Цитата Fedor160 ()
Где нибудь можно найти описание команд SwordFish?
Что же касаемо Help-а для Рыбы то он встроен прямо в оболочку или его можно взять Здесь
Примеры находятся в папке Samples. Библиотеки на офф. сайте.

Успехов  wink


Будьте оригинальны - не повторяйте чужих ошибок !!!!
Пишу только на Рыбе (SwordFish). Другую пищу не предлагать, на шерсть влияет :)
Fedor160 Дата: Вт, 14.10.2014, 18:41  |                                                                                                                Сообщение # 84
Группа: Пользователи
Ранг:  Новенький
Сообщений: 5
Репутация: 0   ±
Замечания:   ±
На сайте с 29.01.2014

Статус: Offline

Спасибо! smile

Компилятор ругается на строчку (Out=СRead Sinus + CC)

Error [line 15]Value Expected
Critical database load errors - unable to recover

перевод гугла (Ошибка [строка 15] Значение Ожидаемое 
Критические ошибки нагрузки базы данных - не в состоянии восстановить)

Честно сказать , не понял , какие ошибки его не устраивают. sad

Недавно поставил компилятор 3.5.6.5 , думал может здесь чего не так. Попробовал другие проекты скомпилировать все ок. Смотрел русский мануал и справку нового компилятора , сравнивал CRead и CData , как мне кажется все норм (правда в английском не силен).

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

Сообщение отредактировал Fedor160 - Вт, 14.10.2014, 22:17
ivan_fd Дата: Ср, 15.10.2014, 10:21  |                                                                                                                Сообщение # 85
Группа: Модераторы
Ранг:  Специалист
Сообщений: 888
Репутация: 47   ±
Замечания:   ±
На сайте с 12.01.2009

Статус: Offline

Проблема у Вас.  У меня все скомпилировалось без ошибок.

Меня все время преследуют умные мысли...но я быстрее!!!
ADMIN Дата: Ср, 15.10.2014, 10:42  |                                                                                                                Сообщение # 86
Администратор
Группа: Администраторы
Ранг:  Специалист
Сообщений: 1106
Репутация: 24   ±
Замечания:   ±
На сайте с 20.08.2007

Статус: Offline

Попробуйте разделить это выражение на две команды
Fedor160 Дата: Чт, 16.10.2014, 00:45  |                                                                                                                Сообщение # 87
Группа: Пользователи
Ранг:  Новенький
Сообщений: 5
Репутация: 0   ±
Замечания:   ±
На сайте с 29.01.2014

Статус: Offline

Проблема в компиляторе 3.5.6.5 , два раза переставлял и все равно ошибку дает , ставил два раза (для перепроверки) 3.5.2.7, все превосходно компилирует. Сравнивал в обоих компиляторах описание CRead и CData , насколько я понял в них ничего не изменилось. Качал компиляторы отсюда.

Цитата ivan_fd ()
Проблема у Вас.  У меня все скомпилировалось без ошибок.

А у вас какая версия протона?
ivan_fd Дата: Чт, 16.10.2014, 16:19  |                                                                                                                Сообщение # 88
Группа: Модераторы
Ранг:  Специалист
Сообщений: 888
Репутация: 47   ±
Замечания:   ±
На сайте с 12.01.2009

Статус: Offline

Конкретно я пробовал на 3.5.5.8.

Меня все время преследуют умные мысли...но я быстрее!!!
Форум Picbasic.ru » Программирование МК » Proton PicBasic » Генератор НЧ на pic
Страница 6 из 6«123456
Поиск: