Генератор для катушки Мишина

Alp
Offline
Зарегистрирован: 22.01.2019

я писал выше, на той же странице, мне попался бракованный модуль INA219. Жду другой.

wpd123
Offline
Зарегистрирован: 24.03.2019

Alp пишет:

я писал выше, на этой же странице, мне попался бракованный модуль INA219. Жду другой.

Ага,уже увидел! Ну отпишитесь, что у вас получится, когда придёт модуль INA219. Интересно.

Viktor95
Offline
Зарегистрирован: 25.12.2018

AJGrupp пишет:

Итак, какой вариант Вам нужен?

Вариант 1

- сразу в мусорку.

Вариант 2

- мой генератор даёт его без проблем. Я о нём упомянул только в виде намёка ребяткам на факт, что их генератор на ТДА не справляется даже с этой элементарщиной.

В ответ начался истеричный припадок, а я не оскорбляю чувств верующих. Лично мне Вариант 2 не интересен, как само-собой-разумеющийся.

Вариант 3

- Круто. Но не поражает, так как имею достаточно хороший опыт именно по этому варианту. Соответственно - имею и много вопросов, от работы на высоких токах (доходил до 30 А), так и по снятию лишней энергии. И, конечно, по выбору компонентов, без милитари вариантов.

Вариант 4

- предположу, что это некоторая издёвка с Вашей стороны, типа, всё равно туземцы не поймут. Если говорить о дёшёвом и простом исполнении, то Ардуинка не потянет. Из того, что у меня под рукой, можно попробовать на PIC32MK. 

 

Мой ответ - есть интерес к Варианту 3 (75%) и Варианту 4 (25%).

 

 

Муж_Долговой
Муж_Долговой аватар
Offline
Зарегистрирован: 07.10.2018

   Вчера ездили с внуком за пивом ... директор сельпо спросил ... есть ли у меня осфилограф. Оказалось - хочет посмотреть соответствие переключателя синус/меандр. Говорит лечу - лечу ожирение, а оно не проходит. Может тумблер не той стороной прикрутили. Я согласился, го только когда внук уедет.

   Катушка Мишина у него фирменная. От производителя.

   Вопрос: Что я увижу по осцилографу? И как это комментировать?

  И как удержаться, что бы не заржать, если не увижу ничего?

  Какое там напряжение? надо ли внешний делитель творить, если мой осцилограф всего до 50 V? 

  Очень прошу прощения, если вопрос не в духе темы.

  

 

Alp
Offline
Зарегистрирован: 22.01.2019

Муж_Долговой пишет:

   Вопрос: Что я увижу по осцилографу? И как это комментировать?

 

Как то так https://www.youtube.com/watch?time_continue=2&v=lUo4paQxOao

Муж_Долговой
Муж_Долговой аватар
Offline
Зарегистрирован: 07.10.2018

    Очень огромное спасибо! У него "Биолис - 03" 

Только у меня осцилограф однолучевой. Так что ток мерить не буду. Напряжением обойдусь

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Муж_Долговой пишет:

   Вчера ездили с внуком за пивом ... директор сельпо спросил ... есть ли у меня осфилограф. Оказалось - хочет посмотреть соответствие переключателя синус/меандр. Говорит лечу - лечу ожирение, а оно не проходит. Может тумблер не той стороной прикрутили.

Да уж )))

AJGrupp
Offline
Зарегистрирован: 24.07.2017

Муж_Долговой пишет:

... синус/меандр... 

Что я увижу по осцилографу? И как это комментировать?...

На синусе Вы должны увидеть это:

синусНа меандре Вы должны увидеть это:

 

меандр

 

Если Вы увидите что-нибудь другое, например, как на предложенном Вам видео - значит генератор ТУФТА.

Вы упомянули однолучевой осцил., то есть старая модель?

У меня имеется С1-55, если желаете, продемонстрирую как на нём будет показывать при синусе и меандре.

AJGrupp
Offline
Зарегистрирован: 24.07.2017

Viktor95 пишет:

Мой ответ - есть интерес к Варианту 3 (75%) и Варианту 4 (25%).

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

Вопрос 2:

- Какой диапазон частот должен быть у генератора?

Муж_Долговой
Муж_Долговой аватар
Offline
Зарегистрирован: 07.10.2018

Alp пишет:

Муж_Долговой пишет:

   Вопрос: Что я увижу по осцилографу? И как это комментировать?

 

Как то так https://www.youtube.com/watch?time_continue=2&v=lUo4paQxOao

У него прибор как на видео с 5,20 минуты.

Ак на время измерений катушка должна быть приложена к голой задницы для иммитации нагрузки?

Alp
Offline
Зарегистрирован: 22.01.2019

Муж_Долговой пишет:

Ак на время измерений катушка должна быть приложена к голой задницы для иммитации нагрузки?

В/на задницу - решейте сами, необязательно, но если нравится ....В видео они лежат свободно. Вообще Мишин многократно негативно отзывался о поделиях рекламируемого некоторыми здесь Осипова, к каковым относится и аппарат вашего друга.

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Alp пишет:

Муж_Долговой пишет:

Ак на время измерений катушка должна быть приложена к голой задницы для иммитации нагрузки?

В/на задницу - решейте сами, необязательно, но если нравится ....В видео они лежат свободно. Вообще Мишин многократно негативно отзывался о поделиях рекламируемого некоторыми здесь Осипова, к каковым относится и аппарат вашего друга.

я изначально смотрел катушку в онлайн калькуляторе, 100микрогенги 3000 пикофарад в последовательном включении, так вот на осциллограмме картинко была как у меня, только вместо второго горба выброс от перезаряда ёмкости, и значительный, но это в идеальных условиях, так как TDA не идеальна, а реальна имеем то что имеем )))

...не скажу Вам что я идеальная,
   я живая и, просто реальная...

   (c) Iren. P. Unknown

Alp
Offline
Зарегистрирован: 22.01.2019

ua6em пишет:

я изначально смотрел катушку в онлайн калькуляторе, 100микрогенги 3000 пикофарад в последовательном включении, так вот на осциллограмме картинко была как у меня, только вместо второго горба выброс от перезаряда ёмкости, и значительный, но это в идеальных условиях, так как TDA не идеальна, а реальна имеем то что имеем )))

Вы меня удивляете.

При чем здесь TDA? Свой ток и напряжение она в диапазоне частот держит, не самовозбуждается, не тормозит. Это обычный усилитель. Что вы хотите от усилителя хоть на микросхемах, хоть на россыпи? Вам не нравится что, его АЧХ, ФЧХ, мощность, КУ, форма корпуса....?

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

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

Это не моя статья https://www.ruselectronic.com/posledovatelnyj-kolebatelnyj-kontur/ советую желающим ознакомиться.

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Alp пишет:

Это не моя статья https://www.ruselectronic.com/posledovatelnyj-kolebatelnyj-kontur/ советую желающим ознакомиться.

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

Alp
Offline
Зарегистрирован: 22.01.2019

Генератор в такой режим загнать нельзя в принципе. Автогенератор - можно.

В нашей схеме задающий генератор от катушек отвязан напрочь. Его КНИ составляет максимум десятые процента. В моей схеме питание осуществляется генератора через свой стабилизатор, усилителя через свой БП.

Поэтому любые искажения синуса, в т.ч. гармонические, от генератора не зависят. Зависят от БП и усилителя.

БП высокочастотный, следовательно высокоэффективный и стабильный. Эквивалентные емкости конденсаторов по питанию гораздо больше. При токах в катушках 200-300 мА, рекомендованных Мишиным, БП почти не греется. При токах в 800-1000 мА для любителей экспериментов греется довольно сильно, но встроенная термозащита не срабатывает. 

Усилитель работает согласно даташиту. Не нравится с буквой А, можно не меняя схему поставить помощнее, с буквой В. Но это уже за рамками лечебных рекомендаций Мишина.

 

Viktor95
Offline
Зарегистрирован: 25.12.2018

AJGrupp пишет:

Вопрос 2:

- Какой диапазон частот должен быть у генератора?

Наверное, было бы странно, если используя AD9833 или AD9850, я буду сильно ограничивать их возможности...

Целевой диапазон: 0.1 Гц - 6 мГц.

АндрейS
Offline
Зарегистрирован: 13.04.2018

Прошу помочь с скетчем из 39 поста что на первой странице, возникают ошибки, ардуино 1,8,8 :
8:1: error: 'Adafruit_INA219' does not name a type Adafruit_INA219 ;
37:2: error: 'ina219' was not declared in this scope ina219.begin(0x40);
84:16: error: 'ina219' was not declared in this scope Data_ina219=ina219.getCurrent_mA();
exit status 1 'Adafruit_INA219' does not name a type

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

АндрейS пишет:

Прошу помочь с скетчем из 39 поста что на первой странице, возникают ошибки, ардуино 1,8,8 :
8:1: error: 'Adafruit_INA219' does not name a type Adafruit_INA219 ;
37:2: error: 'ina219' was not declared in this scope ina219.begin(0x40);
84:16: error: 'ina219' was not declared in this scope Data_ina219=ina219.getCurrent_mA();
exit status 1 'Adafruit_INA219' does not name a type

компилируется под версией 1.8.5 но с библиотеками положенными в папку скетча:
 

#include <SPI.h>
#include <Wire.h>
#include "LiquidCrystal_I2C.h"
LiquidCrystal_I2C lcd(0x27, 20, 4);   // Для экрана 20х4 (четырехстрочный), I2C адрес дисплея уточнить

#include "Adafruit_INA219.h"
Adafruit_INA219 ina219;

unsigned int imax = 0;
unsigned int Data_ina219 = 0;

const int SINE = 0x2000;                    // определяем значение регистров AD9833 взависимости от формы сигнала
const int SQUARE = 0x2020;                  // После обновления частоты нужно определить форму сигнала
const int TRIANGLE = 0x2002;                // и произвести запись в регистр.

const float refFreq = 25000000.0;           // Частота кристалла на плате AD9833

long Fmin = 200000;
long Fmax = 350000;
long FFmax = 0;
long freq = Fmin;
long ifreq = 0;
int Ftune = 10000;
int Ffinetune = 200;

const int FSYNC = 10;                       // Standard SPI pins for the AD9833 waveform generator.
const int CLK = 13;                         // CLK and DATA pins are shared with the TFT display.
const int DATA = 11;



/************************** SETUP *************************/ 
void setup() {
 Serial.begin(9600);
 lcd.begin();
 ina219.begin(0x40);
 ina219.setCalibration_16V_400mA();  
 SPI.begin();
             
 delay(10); 
 AD9833reset(); // Ресет после включения питания
 delay(10);
 
 AD9833setFrequency(freq, SINE);  // выставляем нижнюю частоту 
    
for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
     delay(2);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    lcd.setCursor(0, 2);                  // 2 строка
    lcd.print(ifreq);
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}  
    Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 0);                  // 1 строка
    lcd.print("GENERATOR MPGSP-V1.0");
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(1);
}

    
 }    // Конец процедуры инициализации прибора

void loop() {
   Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(200);
if(Data_ina219 < imax ){
  
  for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // Set the frequency and Sine Wave output 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}
   }
  lcd.clear();//Очистка дисплея
  
  }
    
}

// AD9833 documentation advises a 'Reset' on first applying power.
void AD9833reset() {
  WriteRegister(0x100);   // Write '1' to AD9833 Control register bit D8.
  delay(10);
}

// Set the frequency and waveform registers in the AD9833.
void AD9833setFrequency(long frequency, int Waveform) {

  long FreqWord = (frequency * pow(2, 28)) / refFreq;

  int MSB = (int)((FreqWord & 0xFFFC000) >> 14);    //Only lower 14 bits are used for data
  int LSB = (int)(FreqWord & 0x3FFF);

  //Set control bits 15 ande 14 to 0 and 1, respectively, for frequency register 0
  LSB |= 0x4000;
  MSB |= 0x4000;

  WriteRegister(0x2100);
  WriteRegister(LSB);                  // Write lower 16 bits to AD9833 registers
  WriteRegister(MSB);                  // Write upper 16 bits to AD9833 registers.
  WriteRegister(0xC000);               // Phase register
  WriteRegister(Waveform);             // Exit & Reset to SINE, SQUARE or TRIANGLE

}
void WriteRegister(int dat) {

  // Display and AD9833 use different SPI MODES so it has to be set for the AD9833 here.
  SPI.setDataMode(SPI_MODE2);

  digitalWrite(FSYNC, LOW);           // Set FSYNC low before writing to AD9833 registers
  delayMicroseconds(10);              // Give AD9833 time to get ready to receive data.

  SPI.transfer(highByte(dat));        // Each AD9833 register is 32 bits wide and each 16
  SPI.transfer(lowByte(dat));         // bits has to be transferred as 2 x 8-bit bytes.

  digitalWrite(FSYNC, HIGH);          //Write done. Set FSYNC high
}

 

АндрейS
Offline
Зарегистрирован: 13.04.2018

ua6em, не помогло, только строки с ошибками поменялись :
7: error: 'Adafruit_INA219' does not name a type Adafruit_INA219 ina219;
36: error: 'ina219' was not declared in this scope ina219.begin(0x40);
83: error: 'ina219' was not declared in this scope Data_ina219=ina219.getCurrent_mA();

И правильно я понял что этот скетч для этой схемы https://easyeda.com/nikolayispolin/Ad_9833-81971df3f3d24c7799cea6b49fb2e1f0 ?
И вопрос по схеме, там правильно подключены энкодеры? Контакты обозначеные как VCC и GND подключены поразному. На TDA подается 5в, этого достаточно?

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

попробуйте в версии 1.8.5 - у меня компилируется, по аппаратной части ничего не подскажу, не повторял

INA219.h
 

/*!
 * @file Adafruit_INA219.h
 *
 * This is a library for the Adafruit INA219 breakout board
 * ----> https://www.adafruit.com/products/904
 * 
 * Adafruit invests time and resources providing this open source code, 
 * please support Adafruit and open-source hardware by purchasing 
 * products from Adafruit!
 *
 * Written by Kevin "KTOWN" Townsend for Adafruit Industries.
 *
 * BSD license, all text here must be included in any redistribution.
 *
 */

#ifndef _LIB_ADAFRUIT_INA219_
#define _LIB_ADAFRUIT_INA219_

#if ARDUINO >= 100
 #include "Arduino.h"
#else
 #include "WProgram.h"
#endif

#include <Wire.h>

/**************************************************************************/
/*! 
    @brief  default I2C address
*/
/**************************************************************************/
    #define INA219_ADDRESS                         (0x40)    // 1000000 (A0+A1=GND)

/**************************************************************************/
/*! 
    @brief  read
*/
/**************************************************************************/
    #define INA219_READ                            (0x01)

/*=========================================================================
    CONFIG REGISTER (R/W)
    -----------------------------------------------------------------------*/

/**************************************************************************/
/*! 
    @brief  config register address
*/
/**************************************************************************/
    #define INA219_REG_CONFIG                      (0x00)
    /*---------------------------------------------------------------------*/

/**************************************************************************/
/*! 
    @brief  reset bit
*/
/**************************************************************************/
    #define INA219_CONFIG_RESET                    (0x8000)  // Reset Bit

/**************************************************************************/
/*! 
    @brief  mask for bus voltage range
*/
/**************************************************************************/
    #define INA219_CONFIG_BVOLTAGERANGE_MASK       (0x2000)  // Bus Voltage Range Mask

/**************************************************************************/
/*! 
    @brief  bus voltage range values
*/
/**************************************************************************/
enum{
    INA219_CONFIG_BVOLTAGERANGE_16V =        (0x0000),  // 0-16V Range
    INA219_CONFIG_BVOLTAGERANGE_32V =        (0x2000),  // 0-32V Range
};

/**************************************************************************/
/*! 
    @brief  mask for gain bits
*/
/**************************************************************************/
    #define INA219_CONFIG_GAIN_MASK                (0x1800)  // Gain Mask

/**************************************************************************/
/*! 
    @brief  values for gain bits
*/
/**************************************************************************/
enum{
    INA219_CONFIG_GAIN_1_40MV        =       (0x0000),  // Gain 1, 40mV Range
    INA219_CONFIG_GAIN_2_80MV        =       (0x0800),  // Gain 2, 80mV Range
    INA219_CONFIG_GAIN_4_160MV       =       (0x1000),  // Gain 4, 160mV Range
    INA219_CONFIG_GAIN_8_320MV       =       (0x1800),  // Gain 8, 320mV Range
  };
	
  /**************************************************************************/
/*! 
    @brief  mask for bus ADC resolution bits
*/
/**************************************************************************/
    #define INA219_CONFIG_BADCRES_MASK             (0x0780)  // Bus ADC Resolution Mask

/**************************************************************************/
/*! 
    @brief  values for bus ADC resolution
*/
/**************************************************************************/
enum {
    INA219_CONFIG_BADCRES_9BIT       =       (0x0000),  // 9-bit bus res = 0..511
    INA219_CONFIG_BADCRES_10BIT      =       (0x0080),  // 10-bit bus res = 0..1023
    INA219_CONFIG_BADCRES_11BIT      =       (0x0100),  // 11-bit bus res = 0..2047
    INA219_CONFIG_BADCRES_12BIT       =      (0x0180),  // 12-bit bus res = 0..4097
};

/**************************************************************************/
/*! 
    @brief  mask for shunt ADC resolution bits
*/
/**************************************************************************/  
    #define INA219_CONFIG_SADCRES_MASK             (0x0078)  // Shunt ADC Resolution and Averaging Mask

/**************************************************************************/
/*! 
    @brief  values for shunt ADC resolution
*/
/**************************************************************************/
enum {
    INA219_CONFIG_SADCRES_9BIT_1S_84US     = (0x0000),  // 1 x 9-bit shunt sample
    INA219_CONFIG_SADCRES_10BIT_1S_148US   = (0x0008),  // 1 x 10-bit shunt sample
    INA219_CONFIG_SADCRES_11BIT_1S_276US   = (0x0010),  // 1 x 11-bit shunt sample
    INA219_CONFIG_SADCRES_12BIT_1S_532US   = (0x0018),  // 1 x 12-bit shunt sample
    INA219_CONFIG_SADCRES_12BIT_2S_1060US  = (0x0048),	 // 2 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_4S_2130US  = (0x0050),  // 4 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_8S_4260US  = (0x0058),  // 8 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_16S_8510US = (0x0060),  // 16 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_32S_17MS   = (0x0068),  // 32 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_64S_34MS   = (0x0070),  // 64 x 12-bit shunt samples averaged together
    INA219_CONFIG_SADCRES_12BIT_128S_69MS =  (0x0078),  // 128 x 12-bit shunt samples averaged together
};

/**************************************************************************/
/*! 
    @brief  mask for operating mode bits
*/
/**************************************************************************/
    #define INA219_CONFIG_MODE_MASK                (0x0007)  // Operating Mode Mask

/**************************************************************************/
/*! 
    @brief  values for operating mode
*/
/**************************************************************************/
 enum {   
    INA219_CONFIG_MODE_POWERDOWN          =  (0x0000),
    INA219_CONFIG_MODE_SVOLT_TRIGGERED    =  (0x0001),
    INA219_CONFIG_MODE_BVOLT_TRIGGERED    =  (0x0002),
    INA219_CONFIG_MODE_SANDBVOLT_TRIGGERED = (0x0003),
    INA219_CONFIG_MODE_ADCOFF             =  (0x0004),
    INA219_CONFIG_MODE_SVOLT_CONTINUOUS  =  (0x0005),
    INA219_CONFIG_MODE_BVOLT_CONTINUOUS   =  (0x0006),
    INA219_CONFIG_MODE_SANDBVOLT_CONTINUOUS = (0x0007),	
};
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  shunt voltage register
*/
/**************************************************************************/
    #define INA219_REG_SHUNTVOLTAGE                (0x01)
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  bus voltage register
*/
/**************************************************************************/
    #define INA219_REG_BUSVOLTAGE                  (0x02)
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  power register
*/
/**************************************************************************/
    #define INA219_REG_POWER                       (0x03)
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  current register
*/
/**************************************************************************/
    #define INA219_REG_CURRENT                     (0x04)
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  calibration register
*/
/**************************************************************************/
    #define INA219_REG_CALIBRATION                 (0x05)
/*=========================================================================*/

/**************************************************************************/
/*! 
    @brief  Class that stores state and functions for interacting with INA219 current/power monitor IC
*/
/**************************************************************************/
class Adafruit_INA219{
 public:
  Adafruit_INA219(uint8_t addr = INA219_ADDRESS);
  void begin(void);
  void begin(TwoWire *theWire);
  void setCalibration_32V_2A(void);
  void setCalibration_32V_1A(void);
  void setCalibration_16V_400mA(void);
  float getBusVoltage_V(void);
  float getShuntVoltage_mV(void);
  float getCurrent_mA(void);
  float getPower_mW(void);

 private:
  TwoWire *_i2c;

  uint8_t ina219_i2caddr;
  uint32_t ina219_calValue;
  // The following multipliers are used to convert raw current and power
  // values to mA and mW, taking into account the current config settings
  uint32_t ina219_currentDivider_mA;
  uint32_t ina219_powerMultiplier_mW;

  void init();
  void wireWriteRegister(uint8_t reg, uint16_t value);
  void wireReadRegister(uint8_t reg, uint16_t *value);
  int16_t getBusVoltage_raw(void);
  int16_t getShuntVoltage_raw(void);
  int16_t getCurrent_raw(void);
  int16_t getPower_raw(void);
};

#endif

INA219.cpp
 

/*!
 * @file Adafruit_INA219.cpp
 *
 * @mainpage Adafruit INA219 current/power monitor IC
 *
 * @section intro_sec Introduction
 *
 *  Driver for the INA219 current sensor
 *
 *  This is a library for the Adafruit INA219 breakout
 *  ----> https://www.adafruit.com/products/904
 *    
 *  Adafruit invests time and resources providing this open source code, 
 *  please support Adafruit and open-source hardware by purchasing 
 *  products from Adafruit!
 *
 * @section author Author
 *
 * Written by Kevin "KTOWN" Townsend for Adafruit Industries.
 *
 * @section license License
 *
 * BSD license, all text here must be included in any redistribution.
 *
 */

#if ARDUINO >= 100
 #include "Arduino.h"
#else
 #include "WProgram.h"
#endif

#include <Wire.h>

#include "Adafruit_INA219.h"

/**************************************************************************/
/*! 
    @brief  Sends a single command byte over I2C
*/
/**************************************************************************/
void Adafruit_INA219::wireWriteRegister (uint8_t reg, uint16_t value)
{
  _i2c->beginTransmission(ina219_i2caddr);
  #if ARDUINO >= 100
    _i2c->write(reg);                       // Register
    _i2c->write((value >> 8) & 0xFF);       // Upper 8-bits
    _i2c->write(value & 0xFF);              // Lower 8-bits
  #else
    _i2c->send(reg);                        // Register
    _i2c->send(value >> 8);                 // Upper 8-bits
    _i2c->send(value & 0xFF);               // Lower 8-bits
  #endif
  _i2c->endTransmission();
}

/**************************************************************************/
/*! 
    @brief  Reads a 16 bit values over I2C
*/
/**************************************************************************/
void Adafruit_INA219::wireReadRegister(uint8_t reg, uint16_t *value)
{

  _i2c->beginTransmission(ina219_i2caddr);
  #if ARDUINO >= 100
    _i2c->write(reg);                       // Register
  #else
    _i2c->send(reg);                        // Register
  #endif
  _i2c->endTransmission();
  
  delay(1); // Max 12-bit conversion time is 586us per sample

  _i2c->requestFrom(ina219_i2caddr, (uint8_t)2);  
  #if ARDUINO >= 100
    // Shift values to create properly formed integer
    *value = ((_i2c->read() << 8) | _i2c->read());
  #else
    // Shift values to create properly formed integer
    *value = ((_i2c->receive() << 8) | _i2c->receive());
  #endif
}

/**************************************************************************/
/*! 
    @brief  Configures to INA219 to be able to measure up to 32V and 2A
            of current.  Each unit of current corresponds to 100uA, and
            each unit of power corresponds to 2mW. Counter overflow
            occurs at 3.2A.
			
    @note   These calculations assume a 0.1 ohm resistor is present
*/
/**************************************************************************/
void Adafruit_INA219::setCalibration_32V_2A(void)
{
  // By default we use a pretty huge range for the input voltage,
  // which probably isn't the most appropriate choice for system
  // that don't use a lot of power.  But all of the calculations
  // are shown below if you want to change the settings.  You will
  // also need to change any relevant register settings, such as
  // setting the VBUS_MAX to 16V instead of 32V, etc.

  // VBUS_MAX = 32V             (Assumes 32V, can also be set to 16V)
  // VSHUNT_MAX = 0.32          (Assumes Gain 8, 320mV, can also be 0.16, 0.08, 0.04)
  // RSHUNT = 0.1               (Resistor value in ohms)
  
  // 1. Determine max possible current
  // MaxPossible_I = VSHUNT_MAX / RSHUNT
  // MaxPossible_I = 3.2A
  
  // 2. Determine max expected current
  // MaxExpected_I = 2.0A
  
  // 3. Calculate possible range of LSBs (Min = 15-bit, Max = 12-bit)
  // MinimumLSB = MaxExpected_I/32767
  // MinimumLSB = 0.000061              (61uA per bit)
  // MaximumLSB = MaxExpected_I/4096
  // MaximumLSB = 0,000488              (488uA per bit)
  
  // 4. Choose an LSB between the min and max values
  //    (Preferrably a roundish number close to MinLSB)
  // CurrentLSB = 0.0001 (100uA per bit)
  
  // 5. Compute the calibration register
  // Cal = trunc (0.04096 / (Current_LSB * RSHUNT))
  // Cal = 4096 (0x1000)
  
  ina219_calValue = 4096;
  
  // 6. Calculate the power LSB
  // PowerLSB = 20 * CurrentLSB
  // PowerLSB = 0.002 (2mW per bit)
  
  // 7. Compute the maximum current and shunt voltage values before overflow
  //
  // Max_Current = Current_LSB * 32767
  // Max_Current = 3.2767A before overflow
  //
  // If Max_Current > Max_Possible_I then
  //    Max_Current_Before_Overflow = MaxPossible_I
  // Else
  //    Max_Current_Before_Overflow = Max_Current
  // End If
  //
  // Max_ShuntVoltage = Max_Current_Before_Overflow * RSHUNT
  // Max_ShuntVoltage = 0.32V
  //
  // If Max_ShuntVoltage >= VSHUNT_MAX
  //    Max_ShuntVoltage_Before_Overflow = VSHUNT_MAX
  // Else
  //    Max_ShuntVoltage_Before_Overflow = Max_ShuntVoltage
  // End If
  
  // 8. Compute the Maximum Power
  // MaximumPower = Max_Current_Before_Overflow * VBUS_MAX
  // MaximumPower = 3.2 * 32V
  // MaximumPower = 102.4W
  
  // Set multipliers to convert raw current/power values
  ina219_currentDivider_mA = 10;  // Current LSB = 100uA per bit (1000/100 = 10)
  ina219_powerMultiplier_mW = 2;     // Power LSB = 1mW per bit (2/1)

  // Set Calibration register to 'Cal' calculated above	
  wireWriteRegister(INA219_REG_CALIBRATION, ina219_calValue);
  
  // Set Config register to take into account the settings above
  uint16_t config = INA219_CONFIG_BVOLTAGERANGE_32V |
                    INA219_CONFIG_GAIN_8_320MV |
                    INA219_CONFIG_BADCRES_12BIT |
                    INA219_CONFIG_SADCRES_12BIT_1S_532US |
                    INA219_CONFIG_MODE_SANDBVOLT_CONTINUOUS;
  wireWriteRegister(INA219_REG_CONFIG, config);
}

/**************************************************************************/
/*! 
    @brief  Configures to INA219 to be able to measure up to 32V and 1A
            of current.  Each unit of current corresponds to 40uA, and each
            unit of power corresponds to 800�W. Counter overflow occurs at
            1.3A.
			
    @note   These calculations assume a 0.1 ohm resistor is present
*/
/**************************************************************************/
void Adafruit_INA219::setCalibration_32V_1A(void)
{
  // By default we use a pretty huge range for the input voltage,
  // which probably isn't the most appropriate choice for system
  // that don't use a lot of power.  But all of the calculations
  // are shown below if you want to change the settings.  You will
  // also need to change any relevant register settings, such as
  // setting the VBUS_MAX to 16V instead of 32V, etc.

  // VBUS_MAX = 32V		(Assumes 32V, can also be set to 16V)
  // VSHUNT_MAX = 0.32	(Assumes Gain 8, 320mV, can also be 0.16, 0.08, 0.04)
  // RSHUNT = 0.1			(Resistor value in ohms)

  // 1. Determine max possible current
  // MaxPossible_I = VSHUNT_MAX / RSHUNT
  // MaxPossible_I = 3.2A

  // 2. Determine max expected current
  // MaxExpected_I = 1.0A

  // 3. Calculate possible range of LSBs (Min = 15-bit, Max = 12-bit)
  // MinimumLSB = MaxExpected_I/32767
  // MinimumLSB = 0.0000305             (30.5�A per bit)
  // MaximumLSB = MaxExpected_I/4096
  // MaximumLSB = 0.000244              (244�A per bit)

  // 4. Choose an LSB between the min and max values
  //    (Preferrably a roundish number close to MinLSB)
  // CurrentLSB = 0.0000400 (40�A per bit)

  // 5. Compute the calibration register
  // Cal = trunc (0.04096 / (Current_LSB * RSHUNT))
  // Cal = 10240 (0x2800)

  ina219_calValue = 10240;
  
  // 6. Calculate the power LSB
  // PowerLSB = 20 * CurrentLSB
  // PowerLSB = 0.0008 (800�W per bit)

  // 7. Compute the maximum current and shunt voltage values before overflow
  //
  // Max_Current = Current_LSB * 32767
  // Max_Current = 1.31068A before overflow
  //
  // If Max_Current > Max_Possible_I then
  //    Max_Current_Before_Overflow = MaxPossible_I
  // Else
  //    Max_Current_Before_Overflow = Max_Current
  // End If
  //
  // ... In this case, we're good though since Max_Current is less than MaxPossible_I
  //
  // Max_ShuntVoltage = Max_Current_Before_Overflow * RSHUNT
  // Max_ShuntVoltage = 0.131068V
  //
  // If Max_ShuntVoltage >= VSHUNT_MAX
  //    Max_ShuntVoltage_Before_Overflow = VSHUNT_MAX
  // Else
  //    Max_ShuntVoltage_Before_Overflow = Max_ShuntVoltage
  // End If

  // 8. Compute the Maximum Power
  // MaximumPower = Max_Current_Before_Overflow * VBUS_MAX
  // MaximumPower = 1.31068 * 32V
  // MaximumPower = 41.94176W

  // Set multipliers to convert raw current/power values
  ina219_currentDivider_mA = 25;      // Current LSB = 40uA per bit (1000/40 = 25)
  ina219_powerMultiplier_mW = 1;         // Power LSB = 800mW per bit

  // Set Calibration register to 'Cal' calculated above	
  wireWriteRegister(INA219_REG_CALIBRATION, ina219_calValue);

  // Set Config register to take into account the settings above
  uint16_t config = INA219_CONFIG_BVOLTAGERANGE_32V |
                    INA219_CONFIG_GAIN_8_320MV |
                    INA219_CONFIG_BADCRES_12BIT |
                    INA219_CONFIG_SADCRES_12BIT_1S_532US |
                    INA219_CONFIG_MODE_SANDBVOLT_CONTINUOUS;
  wireWriteRegister(INA219_REG_CONFIG, config);
}

/**************************************************************************/
/*! 
    @brief set device to alibration which uses the highest precision for 
      current measurement (0.1mA), at the expense of 
      only supporting 16V at 400mA max.
*/
/**************************************************************************/
void Adafruit_INA219::setCalibration_16V_400mA(void) {
  
  // Calibration which uses the highest precision for 
  // current measurement (0.1mA), at the expense of 
  // only supporting 16V at 400mA max.

  // VBUS_MAX = 16V
  // VSHUNT_MAX = 0.04          (Assumes Gain 1, 40mV)
  // RSHUNT = 0.1               (Resistor value in ohms)
  
  // 1. Determine max possible current
  // MaxPossible_I = VSHUNT_MAX / RSHUNT
  // MaxPossible_I = 0.4A

  // 2. Determine max expected current
  // MaxExpected_I = 0.4A
  
  // 3. Calculate possible range of LSBs (Min = 15-bit, Max = 12-bit)
  // MinimumLSB = MaxExpected_I/32767
  // MinimumLSB = 0.0000122              (12uA per bit)
  // MaximumLSB = MaxExpected_I/4096
  // MaximumLSB = 0.0000977              (98uA per bit)
  
  // 4. Choose an LSB between the min and max values
  //    (Preferrably a roundish number close to MinLSB)
  // CurrentLSB = 0.00005 (50uA per bit)
  
  // 5. Compute the calibration register
  // Cal = trunc (0.04096 / (Current_LSB * RSHUNT))
  // Cal = 8192 (0x2000)

  ina219_calValue = 8192;

  // 6. Calculate the power LSB
  // PowerLSB = 20 * CurrentLSB
  // PowerLSB = 0.001 (1mW per bit)
  
  // 7. Compute the maximum current and shunt voltage values before overflow
  //
  // Max_Current = Current_LSB * 32767
  // Max_Current = 1.63835A before overflow
  //
  // If Max_Current > Max_Possible_I then
  //    Max_Current_Before_Overflow = MaxPossible_I
  // Else
  //    Max_Current_Before_Overflow = Max_Current
  // End If
  //
  // Max_Current_Before_Overflow = MaxPossible_I
  // Max_Current_Before_Overflow = 0.4
  //
  // Max_ShuntVoltage = Max_Current_Before_Overflow * RSHUNT
  // Max_ShuntVoltage = 0.04V
  //
  // If Max_ShuntVoltage >= VSHUNT_MAX
  //    Max_ShuntVoltage_Before_Overflow = VSHUNT_MAX
  // Else
  //    Max_ShuntVoltage_Before_Overflow = Max_ShuntVoltage
  // End If
  //
  // Max_ShuntVoltage_Before_Overflow = VSHUNT_MAX
  // Max_ShuntVoltage_Before_Overflow = 0.04V
  
  // 8. Compute the Maximum Power
  // MaximumPower = Max_Current_Before_Overflow * VBUS_MAX
  // MaximumPower = 0.4 * 16V
  // MaximumPower = 6.4W
  
  // Set multipliers to convert raw current/power values
  ina219_currentDivider_mA = 20;  // Current LSB = 50uA per bit (1000/50 = 20)
  ina219_powerMultiplier_mW = 1;     // Power LSB = 1mW per bit

  // Set Calibration register to 'Cal' calculated above 
  wireWriteRegister(INA219_REG_CALIBRATION, ina219_calValue);
  
  // Set Config register to take into account the settings above
  uint16_t config = INA219_CONFIG_BVOLTAGERANGE_16V |
                    INA219_CONFIG_GAIN_1_40MV |
                    INA219_CONFIG_BADCRES_12BIT |
                    INA219_CONFIG_SADCRES_12BIT_1S_532US |
                    INA219_CONFIG_MODE_SANDBVOLT_CONTINUOUS;
  wireWriteRegister(INA219_REG_CONFIG, config);
}

/**************************************************************************/
/*! 
    @brief  Instantiates a new INA219 class
    @param addr the I2C address the device can be found on. Default is 0x40
*/
/**************************************************************************/
Adafruit_INA219::Adafruit_INA219(uint8_t addr) {
  ina219_i2caddr = addr;
  ina219_currentDivider_mA = 0;
  ina219_powerMultiplier_mW = 0;
}

/**************************************************************************/
/*! 
    @brief  Setups the HW (defaults to 32V and 2A for calibration values)
    @param theWire the TwoWire object to use
*/
/**************************************************************************/
void Adafruit_INA219::begin(TwoWire *theWire) {
  _i2c = theWire;
  init();
}

/**************************************************************************/
/*! 
    @brief  Setups the HW using the default Wire object
*/
/**************************************************************************/
void Adafruit_INA219::begin(void) {
  _i2c = &Wire;
  init();
}

/**************************************************************************/
/*! 
    @brief  begin I2C and set up the hardware
*/
/**************************************************************************/
void Adafruit_INA219::init() {
  _i2c->begin();
  // Set chip to large range config values to start
  setCalibration_32V_2A();
}

/**************************************************************************/
/*! 
    @brief  Gets the raw bus voltage (16-bit signed integer, so +-32767)
    @return the raw bus voltage reading
*/
/**************************************************************************/
int16_t Adafruit_INA219::getBusVoltage_raw() {
  uint16_t value;
  wireReadRegister(INA219_REG_BUSVOLTAGE, &value);

  // Shift to the right 3 to drop CNVR and OVF and multiply by LSB
  return (int16_t)((value >> 3) * 4);
}

/**************************************************************************/
/*! 
    @brief  Gets the raw shunt voltage (16-bit signed integer, so +-32767)
    @return the raw shunt voltage reading
*/
/**************************************************************************/
int16_t Adafruit_INA219::getShuntVoltage_raw() {
  uint16_t value;
  wireReadRegister(INA219_REG_SHUNTVOLTAGE, &value);
  return (int16_t)value;
}

/**************************************************************************/
/*! 
    @brief  Gets the raw current value (16-bit signed integer, so +-32767)
    @return the raw current reading
*/
/**************************************************************************/
int16_t Adafruit_INA219::getCurrent_raw() {
  uint16_t value;

  // Sometimes a sharp load will reset the INA219, which will
  // reset the cal register, meaning CURRENT and POWER will
  // not be available ... avoid this by always setting a cal
  // value even if it's an unfortunate extra step
  wireWriteRegister(INA219_REG_CALIBRATION, ina219_calValue);

  // Now we can safely read the CURRENT register!
  wireReadRegister(INA219_REG_CURRENT, &value);
  
  return (int16_t)value;
}

/**************************************************************************/
/*! 
    @brief  Gets the raw power value (16-bit signed integer, so +-32767)
    @return raw power reading
*/
/**************************************************************************/
int16_t Adafruit_INA219::getPower_raw() {
  uint16_t value;

  // Sometimes a sharp load will reset the INA219, which will
  // reset the cal register, meaning CURRENT and POWER will
  // not be available ... avoid this by always setting a cal
  // value even if it's an unfortunate extra step
  wireWriteRegister(INA219_REG_CALIBRATION, ina219_calValue);

  // Now we can safely read the POWER register!
  wireReadRegister(INA219_REG_POWER, &value);
  
  return (int16_t)value;
}
 
/**************************************************************************/
/*! 
    @brief  Gets the shunt voltage in mV (so +-327mV)
    @return the shunt voltage converted to millivolts
*/
/**************************************************************************/
float Adafruit_INA219::getShuntVoltage_mV() {
  int16_t value;
  value = getShuntVoltage_raw();
  return value * 0.01;
}

/**************************************************************************/
/*! 
    @brief  Gets the shunt voltage in volts
    @return the bus voltage converted to volts
*/
/**************************************************************************/
float Adafruit_INA219::getBusVoltage_V() {
  int16_t value = getBusVoltage_raw();
  return value * 0.001;
}

/**************************************************************************/
/*! 
    @brief  Gets the current value in mA, taking into account the
            config settings and current LSB
    @return the current reading convereted to milliamps
*/
/**************************************************************************/
float Adafruit_INA219::getCurrent_mA() {
  float valueDec = getCurrent_raw();
  valueDec /= ina219_currentDivider_mA;
  return valueDec;
}

/**************************************************************************/
/*! 
    @brief  Gets the power value in mW, taking into account the
            config settings and current LSB
    @return power reading converted to milliwatts
*/
/**************************************************************************/
float Adafruit_INA219::getPower_mW() {
  float valueDec = getPower_raw();
  valueDec *= ina219_powerMultiplier_mW;
  return valueDec;
}

Имена сделайте сами правильные

АндрейS
Offline
Зарегистрирован: 13.04.2018

ua6em, как правильные имена опредилить?

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

АндрейS пишет:

ua6em, как правильные имена опредилить?

как в скетче написано          - #include "Adafruit_INA219.h"

АндрейS
Offline
Зарегистрирован: 13.04.2018

ua6em, благодарю, скомпилировалось)). Вы вроде где то писали что на TDA надо подавать минимум 7в? Вы себе на AD9833 будете генератор делать?

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

АндрейS пишет:

ua6em, благодарю, скомпилировалось)). Вы вроде где то писали что на TDA надо подавать минимум 7в? Вы себе на AD9833 будете генератор делать?

аппаратно деляю не я, а мой товарищ, я пытаюсь писать программу, как только у него дело до этого дойдёт, то да, тут регулировку мощности не могу уговориь ввести. TDA работает от +5V

АндрейS
Offline
Зарегистрирован: 13.04.2018

ua6em. так у вас на этом сайте цель какая, найти единомышленников чтобы доделать сырой скетч?

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

АндрейS пишет:

ua6em. так у вас на этом сайте цель какая, найти единомышленников чтобы доделать сырой скетч?

может кто алгоритм какой-нибудь интересный предложит по определению резонанса, а скетч работающий, потому и не выкладываю, что права переданы, а вот на dds выложил, так как моя идея )))

 

АндрейS
Offline
Зарегистрирован: 13.04.2018

ua6em пишет:

аппаратно деляю не я, а мой товарищ,


 

   Так ваш товарищ не любитель выкладывания схем. Если он сделает схему на ДДС, вы ее сюда не выложите, я правильно понимаю? Тема как оказалась не очень популярная, почти за 2 года даже тех кто повторил очень мало, около 3-5 человек. Схемы никто не предлагает. Есть только одна схема на easyeda.com автор которой Nikolayispolin и все, ее вроде как повторил Flikk и вроде как скетч из 268 поста должен подойти. Желающих повторить думаю много, но из за того что все тут разбросано и мало понятно отмечаются в этой теме еденицы.

  Народ клепает схемы Горелочкина, которые стали народными, покупает осциллографы. Но на ардуино с ДДС модулем то лучше, тем что осциллограф не особо нужен, она не намного сложнее зато с любой катушкой может работать, информацию на дисплее можно видеть. Это потенциальная народная схема))) Вот бы довести это все до ума, но я вам не помощник, знаний очень мало.

  У меня все детали пришли кроме AD 9833, ее второй раз заказал но уже с отслеживанием, она уже на подходе. Буду пробовать собирать.

Alp
Offline
Зарегистрирован: 22.01.2019

ua6em пишет:

[TDA работает от +5V

от 3,5 работает тоже. Уверен будет в пределах лечебных токов и от 3,3 ардуиновых нормально.

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Помоему информации на сайте по построению генератора более чем достаточно, что по классике задающий ГЕНЕРАТОР -усилитель, что на DDS, далее только конкретика исполнения...перспектива всё  жа за DDS, двигаясь в сторону лайф-синус...
Мало повторяют потому что за разумные деньги можно купить готовое, промышленного исполнения, тот же лайв-синус (у меня кстати он есть) ...)))
 

 

АндрейS
Offline
Зарегистрирован: 13.04.2018

   ua6em, вы смотрите только со своей точки зрения. Информации в теме dimax достаточно даже для начинающих)) Нашел я Nikolayispolin, он же Flikk, в схеме https://easyeda.com/nikolayispolin/Ad_9833-81971df3f3d24c7799cea6b49fb2e1f0 действительно ошибка, верхний энкодер должен подключаться как и нижний.

 

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

АндрейS пишет:

   ua6em, вы смотрите только со своей точки зрения. Информации в теме dimax достаточно даже для начинающих)) Нашел я Nikolayispolin, он же Flikk, в схеме https://easyeda.com/nikolayispolin/Ad_9833-81971df3f3d24c7799cea6b49fb2e1f0 действительно ошибка, верхний энкодер должен подключаться как и нижний.

DDS на AD9833 надо

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Alp пишет:

ua6em пишет:

[TDA работает от +5V

от 3,5 работает тоже. Уверен будет в пределах лечебных токов и от 3,3 ардуиновых нормально.

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

Alp
Offline
Зарегистрирован: 22.01.2019

ua6em пишет:

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

Известны рекомендации Мишина и классиков от 50 - до 300мА для емкостных.

Впрочем, зачем нужна регулировка мощности? вполне можно устанавливать рабочий ток перед сеансом. Никаких проблем, регулируем напряжением на 5 ноге.

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Alp пишет:

ua6em пишет:

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

Известны рекомендации Мишина и классиков от 50 - до 300мА для емкостных.

Впрочем, зачем нужна регулировка мощности? вполне можно устанавливать рабочий ток перед сеансом. Никаких проблем, регулируем напряжением на 5 ноге.

И как продвинулись с генератором?

Alp
Offline
Зарегистрирован: 22.01.2019

Возник вопрос. Ранее, в ручном режиме по коду (см.ранее) все работало, и генератор AD9833 и дисплей 16х4 I2C.

Запаял INA219. Проверил адреса 0х27-дисплей и 0х40-INA.

Модифицировал скетч из #46, все скомпилировалось и загрузилось, и ничего не увидел на дислее вообще-пустой экран светится. Не могу понять в чем ошибка, в ручном скетче все показывает и настраивает. Прошу помочь найти ошибку кода:

[code]
#include <Wire.h>
#include <SPI.h>
#include "LiquidCrystal_I2C.h"
LiquidCrystal_I2C lcd(0x27, 16, 2);   // Для экрана 16х2, I2C адрес дисплея уточнить  
#include "Adafruit_INA219.h"
Adafruit_INA219 ina219;
 
unsigned int imax = 0;
unsigned int Data_ina219 = 0;
 
const int SINE = 0x2000;                    // определяем значение регистров AD9833 взависимости от формы сигнала
const int SQUARE = 0x2020;                  // После обновления частоты нужно определить форму сигнала
const int TRIANGLE = 0x2002;                // и произвести запись в регистр.
 
const float refFreq = 25000000.0;           // Частота кристалла на плате AD9833

long Fmin = 200000;
long Fmax = 350000;
long FFmax = 0;
long freq = Fmin;
long ifreq = 0;
int Ftune = 10000;
int Ffinetune = 200;
  
const int FSYNC = 10;                       // Standard SPI pins for the AD9833 waveform generator.
const int CLK = 13;                         // CLK and DATA pins are shared with the TFT display.
const int DATA = 11;
 
  
 /********* используемые подпрограммы выносим сюда *********/
  
// AD9833 documentation advises a 'Reset' on first applying power.
void AD9833reset() {
  WriteRegister(0x100);   // Write '1' to AD9833 Control register bit D8.
   delay(10);
 }
  
// *******************
// Set the frequency and waveform registers in the AD9833.
void AD9833setFrequency(long frequency, int Waveform) {
  
 long FreqWord = (frequency * pow(2, 28)) / refFreq;

  int MSB = (int)((FreqWord & 0xFFFC000) >> 14);    //Only lower 14 bits are used for data
  int LSB = (int)(FreqWord & 0x3FFF);
 
//Set control bits 15 ande 14 to 0 and 1, respectively, for frequency register 0
  LSB |= 0x4000;
  MSB |= 0x4000;
 
  WriteRegister(0x2100);
  WriteRegister(LSB);                  // Write lower 16 bits to AD9833 registers
  WriteRegister(MSB);                  // Write upper 16 bits to AD9833 registers.
  WriteRegister(0xC000);               // Phase register
  WriteRegister(Waveform);             // Exit & Reset to SINE, SQUARE or TRIANGLE
 
 }
  
 
// *************************
// Display and AD9833 use different SPI MODES so it has to be set for the AD9833 here.
 
 void WriteRegister(int dat) {

 SPI.setDataMode(SPI_MODE2);
 digitalWrite(FSYNC, LOW);           // Set FSYNC low before writing to AD9833 registers
 delayMicroseconds(10);              // Give AD9833 time to get ready to receive data.
 SPI.transfer(highByte(dat));        // Each AD9833 register is 32 bits wide and each 16
 SPI.transfer(lowByte(dat));         // bits has to be transferred as 2 x 8-bit bytes.
  digitalWrite(FSYNC, HIGH);          //Write done. Set FSYNC high
}
 
  
//************************** SETUP *************************/
void setup() {
 SPI.begin();
 Serial.begin(9600);
 lcd.begin();
  ina219.begin(0x40);
 // ina219.setCalibration_16V_400mA(); 
 ina219.setCalibration_32V_2A();  // Интересно, в библиотеку можно внести изменения
                                  // сделав свои параметры калибровки? надо 16V 2A
           
 delay(10);
  AD9833reset(); // Ресет после включения питания
  delay(10);
 AD9833setFrequency(freq, SINE);  // выставляем нижнюю частоту
 //     
for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
     delay(2);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  //
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    lcd.setCursor(0, 0);                  // 1 строка? начало
    lcd.print(ifreq);
    freq=freq+Ffinetune;
   AD9833setFrequency(ifreq, SINE);
   if (freq >=FFmax) {freq = FFmax;} 
    Data_ina219=ina219.getCurrent_mA();
  
    lcd.setCursor(0, 0);                  // 1 строка, начало
    lcd.print("Freq = ");
    lcd.setCursor(7, 0);                   //1 строка 7 позиция
    lcd.print(ifreq);
    lcd.setCursor(0, 1);                  // 2 строка, начало
    lcd.print("I = ");
    lcd.setCursor(7, 1);                  // 2 строка 7 позиция
    lcd.print(Data_ina219);
    delay(1);
 }
 }    // Конец процедуры инициализации прибора
  
 
// ТЕЛО ПРОГРАММЫ
 
void loop() {
  Data_ina219=ina219.getCurrent_mA();
   lcd.setCursor(0, 0);                  // 1 строка
   lcd.print("Freq = ");
   lcd.setCursor(7, 0);                   //1 строка 7 позиция
   lcd.print(ifreq);
   lcd.setCursor(0, 1);                  // 2 строка
   lcd.print("I = ");
  lcd.setCursor(7, 1);                  // 2 строка 7 позиция
   lcd.print(Data_ina219);
    delay(200);
 if(Data_ina219 < imax ){
   
  for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // Set the frequency and Sine Wave output
for (int j=1; j <= 100; j++) {
   Data_ina219=ina219.getCurrent_mA();
   if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
   freq=freq+Ffinetune;
   AD9833setFrequency(ifreq, SINE);
   if (freq >=FFmax) {freq = FFmax;}
   }
  lcd.clear();//Очистка дисплея
   
  } 
}
[/code]

 

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

а библиотека на дисплей где лежит?

Alp
Offline
Зарегистрирован: 22.01.2019

"подключить библиотеку"-"внесены библиотеки"

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

я бы залил любой скетч посмотреть только работу дисплея, что работает

Alp
Offline
Зарегистрирован: 22.01.2019

Работает, на другом скетче работает, я же писал. Может что то в этом скетче я не так сделал?

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

нажми кнопку ресет, после подачи напряжения на ардуино, может подвисает?

Alp
Offline
Зарегистрирован: 22.01.2019

Не подвисает. В выходные попробую другие библиотеки.

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Alp пишет:

Не подвисает. В выходные попробую другие библиотеки.

а вот так?
 

#include <Wire.h>
#include <SPI.h>
#include "LiquidCrystal_I2C.h"
LiquidCrystal_I2C lcd(0x27, 16, 2);   // Для экрана 16х2, I2C адрес дисплея уточнить  
#include "Adafruit_INA219.h"
Adafruit_INA219 ina219;
 
unsigned int imax = 0;
unsigned int Data_ina219 = 0;
 
const int SINE = 0x2000;                    // определяем значение регистров AD9833 взависимости от формы сигнала
const int SQUARE = 0x2020;                  // После обновления частоты нужно определить форму сигнала
const int TRIANGLE = 0x2002;                // и произвести запись в регистр.
 
const float refFreq = 25000000.0;           // Частота кристалла на плате AD9833

long Fmin = 200000;
long Fmax = 350000;
long FFmax = 0;
long freq = Fmin;
long ifreq = 0;
int Ftune = 10000;
int Ffinetune = 200;
  
const int FSYNC = 10;                       // Standard SPI pins for the AD9833 waveform generator.
const int CLK = 13;                         // CLK and DATA pins are shared with the TFT display.
const int DATA = 11;
 
  
 /********* используемые подпрограммы выносим сюда *********/
  
// AD9833 documentation advises a 'Reset' on first applying power.
void AD9833reset() {
  WriteRegister(0x100);   // Write '1' to AD9833 Control register bit D8.
   delay(10);
 }
  
// *******************
// Set the frequency and waveform registers in the AD9833.
void AD9833setFrequency(long frequency, int Waveform) {
  
 long FreqWord = (frequency * pow(2, 28)) / refFreq;

  int MSB = (int)((FreqWord & 0xFFFC000) >> 14);    //Only lower 14 bits are used for data
  int LSB = (int)(FreqWord & 0x3FFF);
 
//Set control bits 15 ande 14 to 0 and 1, respectively, for frequency register 0
  LSB |= 0x4000;
  MSB |= 0x4000;
 
  WriteRegister(0x2100);
  WriteRegister(LSB);                  // Write lower 16 bits to AD9833 registers
  WriteRegister(MSB);                  // Write upper 16 bits to AD9833 registers.
  WriteRegister(0xC000);               // Phase register
  WriteRegister(Waveform);             // Exit & Reset to SINE, SQUARE or TRIANGLE
 
 }
  
 
// *************************
// Display and AD9833 use different SPI MODES so it has to be set for the AD9833 here.
 
 void WriteRegister(int dat) {

 SPI.setDataMode(SPI_MODE2);
 digitalWrite(FSYNC, LOW);           // Set FSYNC low before writing to AD9833 registers
 delayMicroseconds(10);              // Give AD9833 time to get ready to receive data.
 SPI.transfer(highByte(dat));        // Each AD9833 register is 32 bits wide and each 16
 SPI.transfer(lowByte(dat));         // bits has to be transferred as 2 x 8-bit bytes.
  digitalWrite(FSYNC, HIGH);          //Write done. Set FSYNC high
}
 
  
//************************** SETUP *************************/
void setup() { SPI.begin();
 Serial.begin(9600);
 lcd.begin();
  ina219.begin(0x40);
 // ina219.setCalibration_16V_400mA(); 
 ina219.setCalibration_32V_2A();  // Интересно, в библиотеку можно внести изменения
                                  // сделав свои параметры калибровки? надо 16V 2A
           
 delay(10);
  AD9833reset(); // Ресет после включения питания
  delay(10);
 AD9833setFrequency(freq, SINE);  // выставляем нижнюю частоту
 //     
for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
     delay(2);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  //
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
//    lcd.setCursor(0, 0);                  // 1 строка? начало
//    lcd.print(ifreq);
    freq=freq+Ffinetune;
   AD9833setFrequency(ifreq, SINE);
   if (freq >=FFmax) {freq = FFmax;} 
    Data_ina219=ina219.getCurrent_mA();
}
    lcd.setCursor(0, 0);                  // 1 строка, начало
    lcd.print("Freq = ");
    lcd.setCursor(7, 0);                   //1 строка 7 позиция
    lcd.print(ifreq);
    lcd.setCursor(0, 1);                  // 2 строка, начало
    lcd.print("I = ");
    lcd.setCursor(7, 1);                  // 2 строка 7 позиция
    lcd.print(Data_ina219);
    delay(1);
 
  }    // Конец процедуры инициализации прибора
  
 
// ТЕЛО ПРОГРАММЫ
 
void loop() {
  Data_ina219=ina219.getCurrent_mA();
   lcd.setCursor(0, 0);                  // 1 строка
   lcd.print("Freq = ");
   lcd.setCursor(7, 0);                   //1 строка 7 позиция
   lcd.print(ifreq);
   lcd.setCursor(0, 1);                  // 2 строка
   lcd.print("I = ");
  lcd.setCursor(7, 1);                  // 2 строка 7 позиция
   lcd.print(Data_ina219);
    delay(200);
 if(Data_ina219 < imax ){
   
  for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // Set the frequency and Sine Wave output
for (int j=1; j <= 100; j++) {
   Data_ina219=ina219.getCurrent_mA();
   if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
   freq=freq+Ffinetune;
   AD9833setFrequency(ifreq, SINE);
   if (freq >=FFmax) {freq = FFmax;}
   }
  lcd.clear();//Очистка дисплея
   
  } 
}

 

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

Как успехи?

АндрейS
Offline
Зарегистрирован: 13.04.2018

Собрал я генератот по схеме Ивана-исполина https://easyeda.com/nikolayispolin/Ad_9833-81971df3f3d24c7799cea6b49fb2e1f0

Скетч вот этот:

#include <SPI.h>
#include <Wire.h>
#include "LiquidCrystal_I2C.h"
LiquidCrystal_I2C lcd(0x27, 20, 4);   // Для экрана 20х4 (четырехстрочный), I2C адрес дисплея уточнить

#include "Adafruit_INA219.h"
Adafruit_INA219 ina219;

unsigned int imax = 0;
unsigned int Data_ina219 = 0;

const int SINE = 0x2000;                    // определяем значение регистров AD9833 взависимости от формы сигнала
const int SQUARE = 0x2020;                  // После обновления частоты нужно определить форму сигнала
const int TRIANGLE = 0x2002;                // и произвести запись в регистр.

const float refFreq = 25000000.0;           // Частота кристалла на плате AD9833

long Fmin = 200000;
long Fmax = 350000;
long FFmax = 0;
long freq = Fmin;
long ifreq = 0;
int Ftune = 10000;
int Ffinetune = 200;

const int FSYNC = 10;                       // Standard SPI pins for the AD9833 waveform generator.
const int CLK = 13;                         // CLK and DATA pins are shared with the TFT display.
const int DATA = 11;



/************************** SETUP *************************/ 
void setup() {
 Serial.begin(9600);
 lcd.begin();
 ina219.begin(0x40);
 ina219.setCalibration_16V_400mA();  
 SPI.begin();
             
 delay(10); 
 AD9833reset(); // Ресет после включения питания
 delay(10);
 
 AD9833setFrequency(freq, SINE);  // выставляем нижнюю частоту 
    
for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
     delay(2);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    lcd.setCursor(0, 2);                  // 2 строка
    lcd.print(ifreq);
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}  
    Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 0);                  // 1 строка
    lcd.print("GENERATOR MPGSP-V1.0");
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(1);
}

    
 }    // Конец процедуры инициализации прибора

void loop() {
   Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(200);
if(Data_ina219 < imax ){
  
  for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // Set the frequency and Sine Wave output 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}
   }
  lcd.clear();//Очистка дисплея
  
  }
    
}

// AD9833 documentation advises a 'Reset' on first applying power.
void AD9833reset() {
  WriteRegister(0x100);   // Write '1' to AD9833 Control register bit D8.
  delay(10);
}

// Set the frequency and waveform registers in the AD9833.
void AD9833setFrequency(long frequency, int Waveform) {

  long FreqWord = (frequency * pow(2, 28)) / refFreq;

  int MSB = (int)((FreqWord & 0xFFFC000) >> 14);    //Only lower 14 bits are used for data
  int LSB = (int)(FreqWord & 0x3FFF);

  //Set control bits 15 ande 14 to 0 and 1, respectively, for frequency register 0
  LSB |= 0x4000;
  MSB |= 0x4000;

  WriteRegister(0x2100);
  WriteRegister(LSB);                  // Write lower 16 bits to AD9833 registers
  WriteRegister(MSB);                  // Write upper 16 bits to AD9833 registers.
  WriteRegister(0xC000);               // Phase register
  WriteRegister(Waveform);             // Exit & Reset to SINE, SQUARE or TRIANGLE

}
void WriteRegister(int dat) {

  // Display and AD9833 use different SPI MODES so it has to be set for the AD9833 here.
  SPI.setDataMode(SPI_MODE2);

  digitalWrite(FSYNC, LOW);           // Set FSYNC low before writing to AD9833 registers
  delayMicroseconds(10);              // Give AD9833 time to get ready to receive data.

  SPI.transfer(highByte(dat));        // Each AD9833 register is 32 bits wide and each 16
  SPI.transfer(lowByte(dat));         // bits has to be transferred as 2 x 8-bit bytes.

  digitalWrite(FSYNC, HIGH);          //Write done. Set FSYNC high
}

 не работоает, с чего начинать искать причниу?
плату развел в KiCad https://yadi.sk/d/5dbMZ6J74rgXhw

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

определиться с адресом дисплея загрузив скет определения адресов i2C устройств                                                                                                                                                                                                                

АндрейS
Offline
Зарегистрирован: 13.04.2018

Адрес дислплея я нашел 0*27, и подключал на простом сектче, он работал

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

попробуйте код из поста 292

АндрейS
Offline
Зарегистрирован: 13.04.2018

Код из 292 поста не заработал

ua6em
ua6em аватар
Offline
Зарегистрирован: 17.08.2016

оставить только setup(), loop() сделать пустым и построчно отлаживать, других вариантов нет, код из поста 292, вызывать 100 раз перерисовку дисплея в цикле - неправильно. У alp тоже не заработал...
Вываодить периодически в монитор после некоторых строк и смотреть, где встряёт

АндрейS
Offline
Зарегистрирован: 13.04.2018

А ваш код из 46 поста?

#include <Wire.h>
#include <SPI.h>
#include "LiquidCrystal_I2C.h"
LiquidCrystal_I2C lcd(0x3F, 20, 4);   // Для экрана 20х4 (четырехстрочный), I2C адрес дисплея уточнить

#include "Adafruit_INA219.h"
Adafruit_INA219 ina219;

unsigned int imax = 0;
unsigned int Data_ina219 = 0;

const int SINE = 0x2000;                    // определяем значение регистров AD9833 взависимости от формы сигнала
const int SQUARE = 0x2020;                  // После обновления частоты нужно определить форму сигнала
const int TRIANGLE = 0x2002;                // и произвести запись в регистр.

const float refFreq = 25000000.0;           // Частота кристалла на плате AD9833

long Fmin = 200000;
long Fmax = 350000;
long FFmax = 0;
long freq = Fmin;
long ifreq = 0;
int Ftune = 10000;
int Ffinetune = 200;

const int FSYNC = 10;                       // Standard SPI pins for the AD9833 waveform generator.
const int CLK = 13;                         // CLK and DATA pins are shared with the TFT display.
const int DATA = 11;


/********* используемые подпрограммы выносим сюда *********/

// AD9833 documentation advises a 'Reset' on first applying power.
void AD9833reset() {
  WriteRegister(0x100);   // Write '1' to AD9833 Control register bit D8.
  delay(10);
}

// *******************
// Set the frequency and waveform registers in the AD9833.
void AD9833setFrequency(long frequency, int Waveform) {

  long FreqWord = (frequency * pow(2, 28)) / refFreq;

  int MSB = (int)((FreqWord & 0xFFFC000) >> 14);    //Only lower 14 bits are used for data
  int LSB = (int)(FreqWord & 0x3FFF);

//Set control bits 15 ande 14 to 0 and 1, respectively, for frequency register 0
  LSB |= 0x4000;
  MSB |= 0x4000;

  WriteRegister(0x2100);
  WriteRegister(LSB);                  // Write lower 16 bits to AD9833 registers
  WriteRegister(MSB);                  // Write upper 16 bits to AD9833 registers.
  WriteRegister(0xC000);               // Phase register
  WriteRegister(Waveform);             // Exit & Reset to SINE, SQUARE or TRIANGLE

}


// *************************
// Display and AD9833 use different SPI MODES so it has to be set for the AD9833 here.

void WriteRegister(int dat) {

  SPI.setDataMode(SPI_MODE2);
  digitalWrite(FSYNC, LOW);           // Set FSYNC low before writing to AD9833 registers
  delayMicroseconds(10);              // Give AD9833 time to get ready to receive data.
  SPI.transfer(highByte(dat));        // Each AD9833 register is 32 bits wide and each 16
  SPI.transfer(lowByte(dat));         // bits has to be transferred as 2 x 8-bit bytes.
  digitalWrite(FSYNC, HIGH);          //Write done. Set FSYNC high
}


/************************** SETUP *************************/ 
void setup() {
 SPI.begin();
 Serial.begin(9600);
 lcd.begin();
 ina219.begin(0x40);
// ina219.setCalibration_16V_400mA();  
 ina219.setCalibration_32V_2A();  // Интересно, в библиотеку можно внести изменения 
                                  // сделав свои параметры калибровки? надо 16V 2A
           
 delay(10); 
 AD9833reset(); // Ресет после включения питания
 delay(10);
 
 AD9833setFrequency(freq, SINE);  // выставляем нижнюю частоту 
    
for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
     delay(2);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    lcd.setCursor(0, 2);                  // 2 строка
    lcd.print(ifreq);
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}  
    Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 0);                  // 1 строка
    lcd.print("GENERATOR MPGSP-V1.0");
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(1);
} 
 }    // Конец процедуры инициализации прибора


// ТЕЛО ПРОГРАММЫ

void loop() {
   Data_ina219=ina219.getCurrent_mA();
    lcd.setCursor(0, 1);                  // 2 строка
    lcd.print("Freq = ");
    lcd.print(ifreq);
    lcd.setCursor(0, 3);                  // 4 строка
    lcd.print("TOK = ");
    lcd.setCursor(7, 3);                  // 4 строка 7 позиция
    lcd.print(Data_ina219);
    delay(200);
if(Data_ina219 < imax ){
  
  for (int i=1; i <= 15; i++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    if (freq >=Fmax) {freq = Fmax;}
     freq=freq+Ftune;
     AD9833setFrequency(freq, SINE);
    }
    freq = ifreq-10000;
    FFmax =ifreq +10000;
    imax = 0;
    AD9833setFrequency(freq, SINE);                  // Set the frequency and Sine Wave output 
for (int j=1; j <= 100; j++) {
    Data_ina219=ina219.getCurrent_mA();
    if (Data_ina219 > imax){ imax=Data_ina219; ifreq = freq; } // Если значение больше, то запомнить
    freq=freq+Ffinetune;
    AD9833setFrequency(ifreq, SINE);
    if (freq >=FFmax) {freq = FFmax;}
   }
  lcd.clear();//Очистка дисплея
  
  }  
}



Я отладить не смогу, так как в коде не разбераюсь совсем