Метка:PIC24

MCC PIC24 – модуль OUTPUT COMPARE – режиме ШИМ

Posted on 15/10/2018Updated on 31/05/2019by catcatcatКатегории:MPLAB X, MPLAB® Code Configurator

Во многих системах управления, для формирования управляющих сигналов требуется модуль ШИМ, он позволяет не только формировать импульсы заданной длительности, но и с применением обычного RC фильтра строить простые ЦАП. MCC -позволяет быстро и легко настроить модули OC в PIC24 для работы с ШИМ. Структурная схема модуля в режиме ШИМ: Процедура настройки модуля для работы в …
Читать далее MCC PIC24 – модуль OUTPUT COMPARE – режиме ШИМ

12-BIT A/D CONVERTER WITH THRESHOLD DETECT на примере PIC24FJ128GA204

Posted on 03/10/2018Updated on 31/05/2019by catcatcatКатегории:MPLAB® Code Configurator, Изучаем PIC24

Введение. 12-битный модуль A/D Converter является усовершенствованной версией 10-битного модуля, предлагаемого на некоторых устройствах PIC24. Оба модуля являются преобразователями, в своих ядрах, с последовательным приближением (SAR), в окружении ряда аппаратных функций для гибкой конфигурации. Эта версия модуля расширяет функциональность, обеспечивая 12-битное разрешение, более широкий диапазон параметров автоматической выборки, более тесную интеграцию с другими аналоговыми модулями, …
Читать далее 12-BIT A/D CONVERTER WITH THRESHOLD DETECT на примере PIC24FJ128GA204

HVLD модуль на примере PIC24FJ128GA204

Posted on 24/09/2018Updated on 31/05/2019by catcatcatКатегории:MPLAB X, MPLAB® Code Configurator, Изучаем PIC24

HVLD модуль представляет собой простое устройство, для контроля напряжения питания микроконтроллера или внешнего напряжения (через делитель). Его задача при “выходе” напряжения за заданные пределы сформировать сообщение микроконтроллеру, что необходимо выполнить соответствующие действия. Метки:PIC24, PIC24FJ128GA204

АЦП ADS1230 и PIC24FJ64GA004

АЦП ADS1230 – это 20 битный АЦП со скоростью измерения 10 или 80 раз в секунду. При подаче питания АЦП постоянно выполняет измерения. Данные можно получить с него по SPI шине. Максимальная тактовая частота шины до 1 мГц. Каждое измерение выполненное АЦП инициализируется самим АЦП по шине данных положительным импульсом. Чтение микроконтроллер должен начинать по получению отрицательного фронта.

Данные передаются старшим битом в перед для чтения 20 бит необходимо 3 байта. Данные выровнены влево.

Для чтения данных необходимо настроить SPI по отрицательному фронту синхроимпульсов.

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

Калибровки смещения

Калибровка смещения может быть начата в любое время для компенсации в ADS1230 погрешности смещения. Чтобы начать калибровку смещения, необходимо по крайней мере, два дополнительных SCLKs после получения 20 бит данных. Данные мы получаем чтением 24 бита. Если продолжить формирование SCLK, то задний фронт 26-го SCLK начинается цикл калибровки. Дополнительные импульсы SCLK могут быть отправлены после 26 SCLK, однако, активность на шине SCLK должны быть сведены к минимуму, во время калибровки смещения, для достижения наилучших результатов. В течение выполнения функции калибровки, аналоговые входные контакты отсоединены от входов АЦП и соответствующий сигнал подается внутри, чтобы выполнить калибровку. Когда калибровка завершена, DRDY/DOUT переходит в низкий уровень, что указывает, что новые данные готовы. Первое преобразование после калибровки содержит достоверные данные.

Стандартная схема подключения АЦП к мосту датчика для измерения веса.

Вариант подключения АЦП к PIC24FJ64GA004.

Подключение будет выполнено к SPI2

void init_spi2 (void) // настройка SPI2
/* настраивается только на приём данных
 * данные с АЦП
 */
{
 /* SPI2 - настройка для работы с входным усилителем и индикатором
 * PPRE
 * 11 = Primary prescale 1:1
 * 10 = Primary prescale 4:1
 * 01 = Primary prescale 16:1
 * 00 = Primary prescale 64:1
  *  SPRE
 * 111 = Secondary prescale 1:1
 * 110 = 2
 * 101 = 3
 * 100 = 4
 * 011 = 5
 * 010 = 6
 * 001 = 7
 * 000 = Secondary prescale 8:1*/
//    RPOR4bits.RP9R=0b01001;   // SPI2 Slave Select Output//CS 
//    RPOR6bits.RP12R=0b01010;     // SPI2 Data Output
    RPINR22bits.SDI2R = 20;     // SPI2 Data Input - RP20/ нога 37
    RPOR10bits.RP21R=11;        // SPI2 Clock Output
    
    SPI2STATbits.SPIEN = 0;         // выключить
    SPI2CON1 = 0b0000000000111001;  //FCY/1/6=50/6=8,3
/*               ||||||||||||||++--- PPRE<1:0>: настройка предделителя 1 11 = Primary prescale 4:1
 *               |||||||||||+++----- SPRE<2:0>: настройка предделителя 2 111 = Primary prescale 8:1
 *               ||||||||||+-------- MSTEN: 1 = Режим ведущего, 0 = режим ведомого
 *               |||||||||+--------- CKP:0 = пассивный уровень шины SCL 1- высокий, 0-низкий
 *               ||||||||+---------- SSEN:Slave Select Enable bit (Slave mode)
 *               |||||||+----------- CKE: смена бита данных происходит: 1-от активного в пассивное(синх-0/1)/0-пассивного в активное (синх-1/0)
 *               ||||||+------------ SMP:0 = Input data sampled at middle of data output time
 *               |||||+------------- MODE16: Communication is word-wide (8 bits)
 *               ||||+-------------- DISSDO: 0-в работе
 *               |||+--------------- DISSCK: 0-в работе
 *               +++---------------- не используются
 */
    SPI2CON2 = 0b0000000000000000;
/*               |||||||||||||||+--- не используется
 *               ||||||||||||||+---- FRMDLY:
 *               |||+++++++++++----- не используются
 *               ||+---------------- FRMPOL:
 *               |+----------------- SPIFSD:
 *               +------------------ FRMEN:
 */

    SPI2STAT = 0b1000000000000000;
/*               |||||||||||||||+--- SPIRBF: Флаг приемного буфера 1 - данные приняты 0- прием выполняется SPI2RXB пуст
 *               ||||||||||||||+---- SPITBF: Флаг передатчика 1 - передача не началась (буфер полон), 0 - передача началась буфер пуст (устанавливается сбрасывается аппаратно)
 *               ||||||||||++++----- не используются
 *               |||||||||+--------- SPIROV: 1 - произошло переполнение 0 - нет переполнения премного буфера.
 *               |||++++++---------- не используются
 *               ||+---------------- SPISIDL: режим работы в состоянии ожидания 0 - работает 1 - отключен модуль
 *               |+----------------- не используется
 *               +------------------ SPIEN: 1 - модуль включен 0 - выключен.
 */
    SPI2STATbits.SPIEN = 1; // БИТ Включить - должен быть активирован последним, чтобы вступили в действии все изменения.
}

void init_spi2 (void) // настройка SPI2

/* настраивается только на приём данных

* данные с АЦП

{

/* SPI2 - настройка для работы с входным усилителем и индикатором

* PPRE

* 11 = Primary prescale 1:1

* 10 = Primary prescale 4:1

* 01 = Primary prescale 16:1

* 00 = Primary prescale 64:1

* SPRE

* 111 = Secondary prescale 1:1

* 110 = 2

* 101 = 3

* 100 = 4

* 011 = 5

* 010 = 6

* 001 = 7

* 000 = Secondary prescale 8:1*/

// RPOR4bits.RP9R=0b01001; // SPI2 Slave Select Output//CS

// RPOR6bits.RP12R=0b01010; // SPI2 Data Output

RPINR22bits.SDI2R = 20; // SPI2 Data Input - RP20/ нога 37

RPOR10bits.RP21R=11; // SPI2 Clock Output

SPI2STATbits.SPIEN = 0; // выключить

SPI2CON1 = 0b0000000000111001; //FCY/1/6=50/6=8,3

/* ||||||||||||||++--- PPRE<1:0>: настройка предделителя 1 11 = Primary prescale 4:1

* |||||||||||+++----- SPRE<2:0>: настройка предделителя 2 111 = Primary prescale 8:1

* ||||||||||+-------- MSTEN: 1 = Режим ведущего, 0 = режим ведомого

* |||||||||+--------- CKP:0 = пассивный уровень шины SCL 1- высокий, 0-низкий

* ||||||||+---------- SSEN:Slave Select Enable bit (Slave mode)

* |||||||+----------- CKE: смена бита данных происходит: 1-от активного в пассивное(синх-0/1)/0-пассивного в активное (синх-1/0)

* ||||||+------------ SMP:0 = Input data sampled at middle of data output time

* |||||+------------- MODE16: Communication is word-wide (8 bits)

* ||||+-------------- DISSDO: 0-в работе

* |||+--------------- DISSCK: 0-в работе

* +++---------------- не используются

SPI2CON2 = 0b0000000000000000;

/* |||||||||||||||+--- не используется

* ||||||||||||||+---- FRMDLY:

* |||+++++++++++----- не используются

* ||+---------------- FRMPOL:

* |+----------------- SPIFSD:

* +------------------ FRMEN:

SPI2STAT = 0b1000000000000000;

/* |||||||||||||||+--- SPIRBF: Флаг приемного буфера 1 - данные приняты 0- прием выполняется SPI2RXB пуст

* ||||||||||||||+---- SPITBF: Флаг передатчика 1 - передача не началась (буфер полон), 0 - передача началась буфер пуст (устанавливается сбрасывается аппаратно)

* ||||||||||++++----- не используются

* |||||||||+--------- SPIROV: 1 - произошло переполнение 0 - нет переполнения премного буфера.

* |||++++++---------- не используются

* ||+---------------- SPISIDL: режим работы в состоянии ожидания 0 - работает 1 - отключен модуль

* |+----------------- не используется

* +------------------ SPIEN: 1 - модуль включен 0 - выключен.

SPI2STATbits.SPIEN = 1; // БИТ Включить - должен быть активирован последним, чтобы вступили в действии все изменения.

}

Сама обработка данных и синхронизация выполняется через прерывания по входу через которые на SPI2 поступают данные. Настройка прерывание:

void ADCIZ (void)// включить измерение
{
    ADCVMOSST=1;            // подать питание на датчик
    ADCPDWN=1;              // включить ADC
    CNEN2bits.CN25IE=1;     // разрешить прерывание по входу
    _CNIF = 0;              // сбросить прерывание
    _CNIE = 1;              // включить прерывание
}

void ADCIZ (void)// включить измерение

{

ADCVMOSST=1; // подать питание на датчик

ADCPDWN=1; // включить ADC

CNEN2bits.CN25IE=1; // разрешить прерывание по входу

_CNIF = 0; // сбросить прерывание

_CNIE = 1; // включить прерывание

}

Первые две строчки это если есть необходимость в управлении подачей питания на измерительный мост и управления режимом “слип” АЦП. Следующие три строки это настройка режима прерывания по входу через который АЦП получает данные.

Получение данных происходит через функцию прерывания:

void __attribute__((interrupt, auto_psv)) _CNInterrupt (void)
{
    unsigned long datain;
    _LATB2=!_LATB2;                    // индикация работы АЦП
    
    while(PORTCbits.RC4);              // ожидать низкого уровня на входе

    SPI2BUF=0;                         // запуск чтения
    while(!SPI2STATbits.SPIRBF);       // ожидать загрузки буфера
    datain=SPI2BUF;
    ADCbufer[ucazad]=datain<<16;       // загрузка данных в буфер, сброс бита SPIRBF
    
    SPI2BUF=0;                         // запуск чтения
    while(!SPI2STATbits.SPIRBF);       // ожидать загрузки буфера
    datain=SPI2BUF;
    ADCbufer[ucazad]+=datain<<8;       // загрузка данных в буфер, сброс бита SPIRBF
    
    SPI2BUF=0;                         // запуск чтения
    while(!SPI2STATbits.SPIRBF);       // ожидать загрузки буфера
    datain=SPI2BUF;
    ADCbufer[ucazad++]+=datain;        // загрузка данных в буфер, сброс бита SPIRBF
    
    if(ucazad==filtrADC)ucazad=0;      // инициализация указателя.
    
    //калибровка
    if(Bit.calADC)                     // если установлен выполнить калибровку
    {
        Bit.calADC=0;                  // сбросить флаг калибровки
        SPI2BUF=0;                     //
        while(!SPI2STATbits.SPIRBF);   // ожидать загрузки буфера
        datain=SPI2BUF;                // сброс бита SPIRBF
    }
    
    _CNIF = 0;                         // сброс прерывания
}

void __attribute__((interrupt, auto_psv)) _CNInterrupt (void)

{

unsigned long datain;

_LATB2=!_LATB2; // индикация работы АЦП

while(PORTCbits.RC4); // ожидать низкого уровня на входе

SPI2BUF=0; // запуск чтения

while(!SPI2STATbits.SPIRBF); // ожидать загрузки буфера

datain=SPI2BUF;

ADCbufer[ucazad]=datain<<16; // загрузка данных в буфер, сброс бита SPIRBF

SPI2BUF=0; // запуск чтения

while(!SPI2STATbits.SPIRBF); // ожидать загрузки буфера

datain=SPI2BUF;

ADCbufer[ucazad]+=datain<<8; // загрузка данных в буфер, сброс бита SPIRBF

SPI2BUF=0; // запуск чтения

while(!SPI2STATbits.SPIRBF); // ожидать загрузки буфера

datain=SPI2BUF;

ADCbufer[ucazad++]+=datain; // загрузка данных в буфер, сброс бита SPIRBF

if(ucazad==filtrADC)ucazad=0; // инициализация указателя.

//калибровка

if(Bit.calADC) // если установлен выполнить калибровку

{

Bit.calADC=0; // сбросить флаг калибровки

SPI2BUF=0; //

while(!SPI2STATbits.SPIRBF); // ожидать загрузки буфера

datain=SPI2BUF; // сброс бита SPIRBF

}

_CNIF = 0; // сброс прерывания

}

Флаг Bit.calADC – предназначен для активирования режима калибровки. Данные загружаются в буфер ADCbufer[] размер которого может быть ограничен переменной filtrADC.

Это может быть интересно

MPLAB® Harmony – или как это просто! Часть 2.20/12/2018
Часть вторая – Первая программа на PIC32. Музыкальная тема к статье, слушаем: Для начала изучения PIC32 надо иметь или демоплату или самому её изготовить имея микроконтроллер. Начнем из трудоемкого варианта …
Toyota Auto Fader – Модуль включения усилителя19/04/2013
Toyota Auto Fader – Модуль включения усилителя. Часто автолюбители прибегают к замене штатного головного устройства на универсальное мультимедийное, в котором значительно расширены функциональные возможности. Если возникает желание оставить в работе …
Проект с использованием MCC часть 0712/01/2017
Модуль PWM – широтно импульсная модуляция (ШИМ). ПИК контроллеры часто на борту имеют модули ШИМ. На их основе строятся многие узлы управления электро приводами. В нашем варианте мы будем его …
PIC18 – System Arbitration05/04/2018
Системный арбитр. Разрешает доступ к памяти между выборами уровнями системы (т.е. Main, Interrupt Service Routine) и выбором периферийных устройств (т.е. DMA и Scanner) на основе назначенных пользователем приоритетов. Каждый из уровней …
Датчик приближения от Румена Желева26/08/2014
Проект на Болгарском языке. Автор Румен Желев. Болгария. Проект, датчик приближения в котором устранены все недостатки влияния засветки посторонними источниками. Применен совершенно оригинальный принцип контроля ИК излучения. Основната идея на …
Четырех канальный терморегулятор ch-400020/03/2013
Четыре независимых канала регулирования температуры, одновременно можно подключить 16 датчиков температуры DS18B20 с удалением до трехсот метров. Можно для регулировки выбрать любой датчик, подключенный к устройству. Каждый канал может работать как в …
ch-светомузыка от теории до реализации10/10/2013
Сразу оговоримся технология или теория ch-светомузыки, это постоянно развивающийся процесс и то что будет сказано сегодня завтра может быть опровергнуто и считаться ошибочным. Назовем само решение проблемы автоматического преобразования или …
HVLD модуль на примере PIC24FJ128GA20424/09/2018
HVLD модуль представляет собой простое устройство, для контроля напряжения питания микроконтроллера или внешнего напряжения (через делитель). Его задача при “выходе” напряжения за заданные пределы сформировать сообщение микроконтроллеру, что необходимо выполнить …
Проект с использованием MCC часть 12-131/01/2017
В настоящее время без визуализации информации уже не интересно. Поэтому научимся выводить информацию на дисплей. Для это возьмет простенький OLED RET012864E/REX012864J я такой приобретал в фирме “Гамма-Украина”, описание можно почитать здесь …
NeoPixel LED и PIC1803/02/2019
Еще раз об управлении светодиодами на драйвере WS2812 и ему подобных. Как известно эти светики управляются по однопроводной шине. Основная особенность, что программно можно описать передачу данных, но это …

Метки:PIC24

Визуализация данных

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

Ниже приведены три функции которые позволяют (совместно с графической библиотекой) вывести на дисплей исследуемую величину.

Преобразование 16 бит в 4 HEX – шестнадцатеричный вид

void bin_HEX (unsigned int chisloin)
{
  char   edin;
    edin=chisloin>>12;
    if(edin<10)SendLCDd (edin+0x30);
    else SendLCDd (edin+0x37);

    edin=chisloin>>8;
    edin=(edin & 0b00001111);
    if(edin<10)SendLCDd (edin+0x30);
    else SendLCDd (edin+0x37);

    edin=chisloin>>4;
    edin=(edin & 0b00001111);
    if(edin<10)SendLCDd (edin+0x30);
    else SendLCDd (edin+0x37);

    edin=(chisloin & 0b00001111);
    if(edin<10)SendLCDd (edin+0x30);
    else SendLCDd (edin+0x37);

}//------------------------------------------------------------------------

void bin_HEX (unsigned int chisloin)

{

char edin;

edin=chisloin>>12;

if(edin<10)SendLCDd (edin+0x30);

else SendLCDd (edin+0x37);

edin=chisloin>>8;

edin=(edin & 0b00001111);

if(edin<10)SendLCDd (edin+0x30);

else SendLCDd (edin+0x37);

edin=chisloin>>4;

edin=(edin & 0b00001111);

if(edin<10)SendLCDd (edin+0x30);

else SendLCDd (edin+0x37);

edin=(chisloin & 0b00001111);

if(edin<10)SendLCDd (edin+0x30);

else SendLCDd (edin+0x37);

}//------------------------------------------------------------------------

Вывод на дисплей двоичных 16 битных чисел – двоичный вид – 16 BIN.

void bin_bin (unsigned int chisloin)
{
  char   a;
  for(a=0;a<16;a++)
  {
      if(chisloin & 0x8000)
          OledSymbol ('1',1,0,0,0);
      else
          OledSymbol ('0',1,0,0,0);
      chisloin<<=1;
  }
}//------------------------------------------------------------------------

void bin_bin (unsigned int chisloin)

{

char a;

for(a=0;a<16;a++)

{

if(chisloin & 0x8000)

OledSymbol ('1',1,0,0,0);

else

OledSymbol ('0',1,0,0,0);

chisloin<<=1;

}

}//------------------------------------------------------------------------

Вывод в десятичном виде – 5 DEC

/*============================================================================*/
/* где,
*  data число в диапазоне от -32768 до +32767
*  comma - положение десятичной точки 0- нет точки, 1-5 перед 1-6 знакоместом
*  если 
*  nom - количество выводимых символов 0/1 - один символ 2-6 символа
*  razm - размер выводимых цифр 0/1-нормальные, 2-7 увеличение в соответствующее раз
*/
void bin_dec(int data,char comma,char nom,char razm)	// вывод на дисплей/режим
{
struct
    {
        unsigned MINS:1;
    }Bit;
    int unsigned data01;
    char dest,sotn,tysc,dtys,stys;
    Bit.MINS=0;

    if (data<0) // если отрицательно
    {
        if (data==0x8000)data01=data;
        else data01=-data;
        Bit.MINS=1; 	// признак отрицательного
    }
    else data01=data;
    // преобразование числа в символ
    stys=data01/100000+0x30;
    dtys=data01%100000/10000+0x30;
    tysc=data01%10000/1000+0x30;
    sotn=data01%1000/100+0x30;
    dest=data01%100/10+0x30;
 //   edin=data%10+0x30;
// гашение не значащих нулей
    if (stys==0x30&&comma<5)// гашение не значащих нулей
    {
        stys=' ';
        if (dtys==0x30&&comma<4)// гашение не значащих нулей
        {
            dtys=' ';
            if (tysc==0x30&&comma<3)
            {
                tysc=' ';
                if (sotn==0x30&&comma<2)
                {
                    sotn=' ';
                    if (comma==0&&comma<1)
                    {
                        if (dest==0x30)dest=' ';
                    }
                }
            }
        }
    }
// формирование символа минус для отрицательных чисел
    if (Bit.MINS==1)// формирование символа минус для отрицательных чисел
    {

        if (dtys!=' ')
        {
            stys='-';
        }
        else
        {
            if (tysc!=' ')
            {
                dtys='-';
            }
            else
            {
                if (sotn!=' ')
                {
                        tysc='-';
                }
                else
                {
                    if (dest!=' ')
                    {
                        sotn='-';
                    }
                    else
                    {
                        dest='-';
                    }
                }
            }
        }

// прорисовка чисел
    }
    if (comma==6&&nom == 6)  OledSymbol (',',1,1,razm,razm);// прорисовка запятой

    if (nom == 6)
    {
        if (dest!=0x20||comma == 6) OledSymbol (stys,1,1,razm,razm);// десятки тысяч
               else OledSymbol (' ',1,1,razm,razm);
    }

    if (comma==5&&nom >= 5)  OledSymbol (',',1,1,razm,razm);// прорисовка запятой

    if (nom >= 5)
    {
        if (dest!=0x20||comma >= 5) OledSymbol (dtys,1,1,razm,razm);// десятки тысяч
               else OledSymbol (' ',1,1,razm,razm);
    }

    if (comma==4&&nom >= 4)    OledSymbol (',',1,1,razm,razm);// прорисовка запятой

    if (nom >= 4)
    {
        if (dest!=0x20||comma >= 4) OledSymbol (tysc,1,1,razm,razm);// тысячи
               else OledSymbol (' ',1,1,razm,razm);
    }

    if (comma==3&&nom >= 3)     OledSymbol (',',1,1,razm,razm);// прорисовка запятой

    if (nom >= 3)
    {
        if (dest!=0x20||comma >= 3) OledSymbol (sotn,1,1,razm,razm);// сотни
               else OledSymbol (' ',1,1,razm,razm);
    }

    if (comma==2&&nom >= 2)    OledSymbol (',',1,1,razm,razm);// прорисовка запятой

    if (nom >= 2)
    {
        if (dest!=0x20||comma >= 2) OledSymbol (dest,1,1,razm,razm);// десятки
               else OledSymbol (' ',1,1,razm,razm);
    }

    if (comma==1)    OledSymbol (',',1,1,razm,razm);// прорисовка запятой
                    OledSymbol (data01%10+0x30,1,1,razm,razm); // единицы

}//

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

/*============================================================================*/

/* где,

* data число в диапазоне от -32768 до +32767

* comma - положение десятичной точки 0- нет точки, 1-5 перед 1-6 знакоместом

* если

* nom - количество выводимых символов 0/1 - один символ 2-6 символа

* razm - размер выводимых цифр 0/1-нормальные, 2-7 увеличение в соответствующее раз

void bin_dec(int data,char comma,char nom,char razm) // вывод на дисплей/режим

{

struct

{

unsigned MINS:1;

}Bit;

int unsigned data01;

char dest,sotn,tysc,dtys,stys;

Bit.MINS=0;

if (data<0) // если отрицательно

{

if (data==0x8000)data01=data;

else data01=-data;

Bit.MINS=1; // признак отрицательного

}

else data01=data;

// преобразование числа в символ

stys=data01/100000+0x30;

dtys=data01%100000/10000+0x30;

tysc=data01%10000/1000+0x30;

sotn=data01%1000/100+0x30;

dest=data01%100/10+0x30;

// edin=data%10+0x30;

// гашение не значащих нулей

if (stys==0x30&&comma<5)// гашение не значащих нулей

{

stys=' ';

if (dtys==0x30&&comma<4)// гашение не значащих нулей

{

dtys=' ';

if (tysc==0x30&&comma<3)

{

tysc=' ';

if (sotn==0x30&&comma<2)

{

sotn=' ';

if (comma==0&&comma<1)

{

if (dest==0x30)dest=' ';

}

// формирование символа минус для отрицательных чисел

if (Bit.MINS==1)// формирование символа минус для отрицательных чисел

{

if (dtys!=' ')

{

stys='-';

}

else

{

if (tysc!=' ')

{

dtys='-';

}

else

{

if (sotn!=' ')

{

tysc='-';

}

else

{

if (dest!=' ')

{

sotn='-';

}

else

{

dest='-';

}

// прорисовка чисел

}

if (comma==6&&nom == 6) OledSymbol (',',1,1,razm,razm);// прорисовка запятой

if (nom == 6)

{

if (dest!=0x20||comma == 6) OledSymbol (stys,1,1,razm,razm);// десятки тысяч