pic16f716 программный шимм

**Serega4789** · April 30

Добрый день! нужно реализовать программный шим 3 канала частотой 16.66 период 60мкс пауза 10мкс и 3прерывания для кнопок. Есть наработки подобной проги на ассемблере хотя бы реализация шима?

Adver

PCBWay - всего $5 за 10 печатных плат, первый заказ для новых клиентов БЕСПЛАТЕН (Экспресс изготовление за 24 часа!)

Сборка высококачественных печатных плат от $30 + БЕСПЛАТНАЯ доставка по всему миру + трафарет

Онлайн просмотрщик Gerber-файлов от PCBWay!

Новые услуги: 3D-печать и обработка с ЧПУ

Студенческое спонсорство

IMXO · April 30

а че так скромно, всего 17кГц, сразу закладывайтесь на 100..200кГц програмнного ШИМа , самое оно будет.

Adver

$0 за 1-4 слойные печатные платы, полный цикл сборки печатных плат под ключ

Бесплатное ПО для анализа печатных плат NextDFM. Незаменимый помощник для разработчиков PCB!

**Serega4789** · May 1

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

21 час назад, IMXO сказал:

а че так скромно, всего 17кГц, сразу закладывайтесь на 100..200кГц програмнного ШИМа , самое оно будет.

50мкс длина импульса 10мкс пауза

Adver

Широкий выбор продукции MEAN WELL для промавтоматики на складе КОМПЭЛ

Компания КОМПЭЛ наращивает объем поставок источников питания MEAN WELL для промышленной автоматизации. Компания MEAN WELL не планирует уходить с рынка РФ, а ее продукция широко применяется в сфере промавтоматики (монтаж на DIN-рейку) и рекомендована в качестве замены других брендов и для применения в новых разработках.

Представляем ассортимент продукции MEAN WELL на складе КОМПЭЛ для надежного и бесперебойного электропитания устройств промавтоматики.

Подробнее>>

**Serega4789** · May 1

n++;
if (n> 4){PORTB |= 1<<5;}else{PORTB &= ~(1<<5);}
if(n==10){n=0;}

так делал ,не получается выдержать паузу 10 мкс

Adver

LED-драйверы MEAN WELL – выбор больше, стоимость ниже

Компэл расширил и существенно пополнил склад LED-драйверами компании MEAN WELL, одновременно снизив цену на них. В настоящий момент на складе представлена широкая линейка продукции для наружного (семейства HLG, ELG, XLG, LPC, LPV), и для внутреннего (APC, LCM, SLD, APV) освещения.

Имеется большой выбор моделей с различными режимами стабилизации выходных параметров. Кроме того, есть в наличии и линейка DC/DC-драйверов, как понижающих (семейство LDD), так и повышающих (семейство LDH).

Подробнее>>

**Serega4789** · May 3

проблемы прерываниями!

В режиме прерваний по порту B нормально работает только PORTB 4 , остальные срабатывают через 2 события .

Прерывание и опрос например В7 вкл порт В2 срабатвает через 2 раза если увеличить частоту мк или снизить частоту прерываний (10гц)

то норм. Делал в flowcode так бстрее

Adver

Мощный универсальный неизолированный стабилизатор MORNSUN

Компания MORNSUN разработала универсальный понижающе-повышающий неизолированный стабилизатор (DC/DC-преобразователь) с выходным током до 10 А — KUB4836EB-10A. Этот стабилизатор можно использовать при входном напряжении в диапазоне 9…60 В (питающие шины с номинальным значением напряжения 12/24/48 В), а выходное напряжение можно подстраивать в диапазоне от 0 до 60 В. Преобразователь выполнен в корпусе 1/8 Brick с возможностью установки на печатную плату, имеется разновидность для монтажа на шасси — KUB4836EBF-10A.

Читать подробнее >>

IMXO · May 3

28 минут назад, Serega4789 сказал:

В режиме прерваний по порту B нормально работает только PORTB 4 , остальные срабатывают через 2 события .

вы пишите чушь.
прерыванию абсолютно фиолетово по какому выводу прошло изменение состояния по 4, 5, 6, 7 или любой их комбинации, прерывание будет сгенеривовано.
прерывание может быть потеряно:
1. если состояние пина поменялось на исходное до прочтения порта и сброса флага
2. если проводятся несколько чтений порта (последовательное чтение отдельных пинов) между которыми произошло изменение состояния.

Adver

Материалы вебинара «Источники питания MEAN WELL для промавтоматики и серверного оборудования в новых условиях»

Опубликованы материалы вебинара Компэл посвященного линейке продукции MEAN WELL для промышленной автоматизации и оборудования, систем охраны, серверного, телекоммуникационного оборудования и базовых станций 4G/5G. На вебинаре была рассмотрена продукция MEAN WELL, которая может заменить часть источников питания производителей, временно ушедших с российского рынка.

Были даны ответы на вопросы участников вебинара. В частности разобрали, на что нужно обращать внимание при подборе той или иной замены, и какими особенностями обладает продукция MW для различных приложений. Подробнее>>

**Serega4789** · May 4

Позже скину схему в протеусе и проект программы.

Проект диммер два канала с управлением пачкой импульсов.

Т. К есть только прерывания на порт В0 и по всему порту логика такая:

Ловлю прерывания по portB

В прерывании опрос pB4 и pb7

В зовисимости какой из них 1 ка

Взвожу флаг F1или F2,

В ЦЫКЛЕ основной программы

По флагам F1-2 вкл таймер открытия тиристора, после запуск пачки импульсов 400мкс

Время вкл 50мкс выкл 10мкс

Сброс флагов F1 или F2

Ноги импульсов PB3 и Pb2

По каналу прерывание РВ4 импульс РВ2 все хорошо импульсы строго по прерыванию, а по другому каналу 2 раза по прерыванию затем 2 пропуска. Отключал один из каналов из программы все равно такая ерунда,может протеус виноват так частенько бывает

**Serega4789** · May 4

архив

Новая папка.zip

Edited May 4 by Serega4789

**Serega4789** · May 5

Значит послесработки прерывания сигнал уходит в ноль до того как будет опрошен.

Подскажите, если в инициализации я один из портов B4 или 7, например 4выставлю на вход а 7 выход

Прерывание порт В вектор int4 ->когда сработает прерывание на заведамо включено м на вхот порту В4 я врублю флаг F1 , переведу В4 на выход В7 на вх

Вектор поменяю на int 7 и Затем F2=1 так по кругу гонять прерывания,

Это будет корректно?

Edited May 5 by Serega4789

**Serega4789** · May 11

#include <xc.h>

#define _XTAL_FREQ 4000000

// CONFIG
#pragma config FOSC = HS        // Oscillator Selection bits (HS oscillator)
#pragma config WDTE = OFF       // Watchdog Timer (WDT disabled)
#pragma config PWRTE = ON       // Power-up Timer Enable bit (Power-up Timer is enabled)
#pragma config CP = OFF         // Code Protection bit (Code protection disabled)
//--------------------------------------------
#include <stdio.h>

//------------------------------------------------
unsigned int F1_count=0,F2_count=0,stop_count1=0,stop_count2=0;
unsigned int x1=1,x2=0;
unsigned int FLA=0,FLB=0;
unsigned char dimmer=20;//65
unsigned char F1,F2;
//unsigned char pvm1=0,pvm2=0,n=0;
unsigned char  start=0;
unsigned char count_dimmer=0;
//unsigned int FLB=0;
//------------------------------------------------

void interrupt high_isr (void)
//void interrupt isr(void)
{
  
   PORTBbits.RB6 = 1;
   PORTBbits.RB6 = 0;
  
 
    
    if(x1 ) //proverka konkretnogo port x1 ili x2
    {
    if (RB4==1 && FLA==0 )
    {
     
     FLA=1;
     //PORTBbits.RB2 = 1;
     //PORTBbits.RB2 = 0;
    }
    }
    if(x2 )
    {
     if (RB7==1 && FLB==0 )
     {
       
       FLB=1;
      //PORTBbits.RB3 = 1;
      //PORTBbits.RB3 = 0;
     } 
    }
if(start==1){  
if (FLA && RB4==0) {x1=0; x2=1;F1=1;}
if (FLB && RB7==0) {x2=0; x1=1;F2=2;}   
}   
   
     
  if (RBIF) {RBIF=0; } // flag int 

}


 
//------------------------------------------------
void main()
{
 
  TRISB = 0x91;
  TRISA = 0x7;
  PORTBbits.RB2 = 0;
  PORTBbits.RB3 = 0;
  PORTBbits.RB5 = 0;
  PORTBbits.RB6 = 0;
  PORTBbits.RB1 = 0;
  PORTBbits.RB0 = 0;
  INTEDG = 1; //rising edge
  //INTEDG = 0; //falling edge
  //OPTION_REG=0xc0;
  OPTION_REG = 0b01000000;
  RBIF = 0;
  RBIE = 1;
  GIE = 1;
  while(1)
  {
  //............................................................................
   if (RB0==1)
   {
    start=0;
    
   }
   else
   {
       start=1; 
   }
   if (start==0)
   {
    x1=0;
    x2=1;
    F1_count=0;
    F2_count=0;
    FLA=0;
    FLB=0;dimmer=20; 
    count_dimmer=0;
    PORTBbits.RB5 = 0;
    PORTBbits.RB6 = 0;
   } 
   else
   {
   
   PORTBbits.RB5 = 1;
   }
  //............................................................................ 
   if(start==1)
   {
   //....................................
     if(F1)
     {
     if(F1_count!=dimmer){F1_count++;}  
     if(F1_count==dimmer)
     {
    PORTBbits.RB2 = 1;//620mks pchka /50 =12 ugol  400 edinic 180 grad
     __delay_us ( 60 ); //380 minim znachenie dimmer
    PORTBbits.RB2 = 0;
     __delay_us ( 10 );
     
    PORTBbits.RB2 = 1;
     __delay_us ( 50 );
    PORTBbits.RB2 = 0;
     __delay_us ( 10 );
     
     PORTBbits.RB2 = 1;
     __delay_us ( 50 );
    PORTBbits.RB2 = 0;
     __delay_us ( 10 );
     
     PORTBbits.RB2 = 1;
     __delay_us ( 50 );
    PORTBbits.RB2 = 0;
     __delay_us ( 10 );
     
     PORTBbits.RB2 = 1;
     __delay_us ( 50 );
    PORTBbits.RB2 = 0;
     __delay_us ( 10 );
   
    F1=0;
    F1_count=0;
    FLA=0;   
    }   
   }  
   
  //........................................
     if(F2)
    {
    if(F2_count!=dimmer){ F2_count++; }  
    if(F2_count==dimmer)
    {
      
    PORTBbits.RB3 = 1;
    __delay_us ( 60 );
    PORTBbits.RB3 = 0;
    __delay_us ( 10 );
    
    PORTBbits.RB3 = 1;
     __delay_us ( 50 );
    PORTBbits.RB3 = 0;
     __delay_us ( 10 );
     
     PORTBbits.RB3 = 1;
    __delay_us ( 50 );
    PORTBbits.RB3 = 0;
    __delay_us ( 10 );
    
    PORTBbits.RB3 = 1;
    __delay_us ( 50 );
    PORTBbits.RB3 = 0;
    __delay_us ( 10 );
    
    PORTBbits.RB3 = 1;
    __delay_us ( 50 );
    PORTBbits.RB3 = 0;
    __delay_us ( 10 );
    F2=0;
    F2_count=0;  
    FLB=0;
     //...razgon.............................. 
   /*
    if (start)
   {
    if(dimmer!=1){if(count_dimmer!=10){count_dimmer++;}else{count_dimmer=0;dimmer--;}}else{PORTBbits.RB6 = 1;}
    
    } 
     */
    //...................    
   
    }//if(F2_count==dimmer)
     }
      }//start
   
   /*  

 if (n< pvm1){PORTBbits.RB2 = 1;}else{PORTBbits.RB2 = 0;}
 if (n< pvm2){PORTBbits.RB3 = 1;}else{PORTBbits.RB3 = 0;}
 if(n==6){n=0;}
  */ 
    
         }
}
//------------------------------------------------

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

**korsaj** · May 12

Мы писали мы писали - наши пальчики устали. А что писали не понятно.

**korsaj** · May 12

Сделайте прерывание каждые 10 мкС, в прерывании инкрементируйте счетчик, при его равенстве 5 меняйте состояние пина порта, а при 6 еще и обнуляйте его.

**BARS_** · May 12

В 01.05.2022 в 08:06, Serega4789 сказал:

3 шт тр для управления тиристорами

А какой смысл гнать ШИМ на тиристоры? Один фиг они не закроются, пока ток не опустится ниже порога удержания...

**Lexter** · May 12

59 минут назад, BARS_ сказал:

какой смысл гнать ШИМ на тиристоры?

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

**BARS_** · May 12

Тогда вообще непонятно, нафига автор такие сложности выдумывает, когда у данного МК есть аппаратный ШИМ.

6 минут назад, Lexter сказал:

Тут ведь надо, чтобы ещё и достаточное напряжение на тиристоре было в наличии.

Ну так ведь можно привязаться к началу полупериода

**Lexter** · May 12

3 часа назад, BARS_ сказал:

привязаться к началу полупериода

Вот в этом месте обычно и возникают проблемы при управлении одним импульсом. Детектор перехода через ноль сработает, но неизвестно, хватит ли напряжения в сети в этот момент для открытия тиристора. При напряжении на нём около нуля-то он не защёлкнется. Делать задержку с запасом - терять начальную часть синусоиды, мощность до 100% регулироваться не будет. Поэтому дают пачку импульсов, за время которой напряжение гарантированно нарастёт до уровня, при котором тиристор откроется. А откроется он по тому импульсу пачки, при котором напряжение будет достаточным, т.е. максимально возможно близко к началу полупериода.

IMXO · May 12

1 час назад, Lexter сказал:

за время которой напряжение гарантированно нарастёт до уровня, при котором тиристор откроется.

Причем здесь вообще напряжение?!
У тиристора есть "ток удержания" - минимальный ток при котором тиристор остается в открытом состоянии.
Если по завершении импульса открытия на гейте , ток протекающий через тиристор не превысит ток удержания тиристор закроется

**Lexter** · May 12

44 минуты назад, IMXO сказал:

Причем здесь вообще напряжение?!

При чём здесь вообще закрывание тиристора? Речь идёт об его открывании в начале полупериода сетевого напряжения.

IMXO · May 12

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

Sign In

pic16f716 программный шимм

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members

Сообщения