Метка: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.

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

Цифровой спидометр для автомобиля28/03/2013
Универсальность печатной платы ch-c0030pcb позволяет создавать на её основе разнообразные устройства. Одним из таких устройств является электронный спидометр для автомобиля, в котором можно задать два компаратора скорости, например, для города и …
MPLAB® Code Configurator and Encoder22/04/2017
Еще раз про энкодер… Для некоторых приложений очень удобно и экономически выгодно, для настройки и управления использовать энкодер. Такие энкодеры имеют строенную тактовую кнопку которую можно применить для выбора режимов работы …
Проект с использованием MCC часть 12-226/02/2017
Настало время для изучения шины I2C. Изучать будем на примере работы с индикатором RET012864E. Что изменили со старой схемы: В прошлой теме я затупил и не добавил подтягивающие резисторы которые необходимы …
Мониторинг температуры28/03/2013
Настоящий проект создан как обучающий с применением библиотек ds18b20 и LCDHD44780 и компилятора Microchip MPLAB XC8 C Compiler V1.12. Если необходимо иметь информацию по состоянию температуры в помещении или в здании, с количеством до 6 точек (16), то вы сможете …
Гаджеты для домашней автоматики – Датчик движения30/01/2014
Управление светодиодным освещением – Датчик движения. Данный гаджет предназначен для управления освещением рабочих столов (кухонных столов), освещение прихожих, освещение зеркал в прихожих, автоматическое включение света в коридорах. Датчик позволяет определить наличие …
Защита датчиков температуры DS18B20 от статического электричества30/03/2013
Статья перепечатана с сайта http://svetomuzyka.narod.ru При удалении датчика на большие расстояния возникает опасность наведения импульсов высокого напряжения на кабель, который соединяет датчик с контролером. Если не принимать меры защиты, то наведенное …
Acquaintance with audio-bluetooth modules F-6888 (BK3254).03/09/2020
Для проектов появилось необходимость познакомиться с недорогими модулями китайского производства, которые можно приобрести у нас в Украине и у китацев, на алиэкспрессе. Так как меня интересует не просто, как в …
LED модуль P10 (1R) V706A07/06/2016
Это еще одно чудо от китайского брата. Это монохромные матрицы, называются они P10 (1R) V706A, ну типа R-красные, но не верьте паяют светики и зеленые и синие, в общем любые какие …
Гаджеты для домашней автоматики – Датчик приближения01/02/2014
Управление светодиодным освещением – Датчик приближения. Данный гаджет предназначен для управления внутренним освещением мебели. Датчик позволяет определить закрытие или открытие дверцы или ящика и при этом включать или выключать освещение. …
ESP8266 применение в проектах21/09/2018
(Актуально только для версий прошивки 1.хх) ESP8266 показала себя как надежное и безотказное устройство для обмена данными с применением WIFI. Я использую ESP8266 исключительно через UART, с применением AT команд. Все …

Метки: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);// десятки тысяч