/* вот здесь  6 и 85 подгоночные коэффициенты для компенсации гистерезиса магнитного поля неодимового магнита.
   *  85-минимальное значение амплитуды при котором маятник начинает движение. этот коэффициент тем больше чем сильнее постоянный магнит
   *  и чем меньше зазор между постоянным и электромагнитом. Определяется раскомментированием строчек сериал ниже и просмотром сериал порта.
   *  6- коэффициент деления для того чтобы максимальное значение Amp не выходило за 256 ( 1024/6+85=255)
   */
   Amp=ampl/6+85;

   uint16_t  t;
...

      //1 полуволна - возрастание напряжение
      for (uint16_t i=(descr1*(1-k)); i<descr1; i++) {
         t=sin(1.57/descr1*i)*Amp; // считаем синус...
         PWM1(t);
      }

...

void PWM1(uint8_t val)
{
   OCR1A = val;// Output Compare Register = 250 в нашем случае это скважность шим (0 - это 0, а FF - 100 %)
}