void HModBus (void)
{
  static byte fase=0;
  volatile UINT clcCRC;
  volatile UINT pakCRC;
 
  //фазы состояний движка ModBus
  enum fase
    {
        FASE_START_RX,    /* запускаем прием */
        FASE_END_RX,    /* ждем завершения приема */
        FASE_NODE_CHK,    /* проверяем номер узла в сети */
        FASE_CRC16_CHK,    /* проверяем CRC16 */
        FASE_FUNK_CHK,    /* проверяем номер номер функции */
        //FASE_FUNK_WRK,    /*  */
        FASE_START_TX,    /* передаем обратно */
        FASE_END_TX        /* ждем завершения передачи */
    };
    
    switch (fase)
    {
        //====== ЗАПУСК ПРИЕМА ======
        case FASE_START_RX:    
        {
            MbusRxRun();
            fase=FASE_END_RX;
            break;
        };
        //====== ЖДЕМ ЗАВЕРШЕНИЯ ПРИЕМА ======
        case FASE_END_RX:
        {
            if (mbus_f_rxend)
            {
                fase=FASE_NODE_CHK;
            }
            break;
        };
        //====== ПРОВЕРЯЕМ ПРИНЯТОЕ - НОМЕР УЗЛА ======
        case FASE_NODE_CHK:
        {
            BYTE temp;
            
            temp=*(mbus_buff.buff+MBUS_FIELD_NODE);
            if ((temp!=mbus_cfg.node)&&(temp!=MMBUS_ALL_NODE)&&(temp!=MMBUS_PRG_NODE))
            {
                fase=FASE_START_RX;    // Пакет не нам, в любом случае
            }
            else
            {
                fase=FASE_CRC16_CHK;
            }
            break;
        };    
        //====== ПРОВЕРЯЕМ ПРИНЯТОЕ - CRC16 ======
        case FASE_CRC16_CHK:
        {
            BYTE *pbuff=mbus_buff.buff;
            
            // вызвать функцию проверки CRC16
            clcCRC=CalcCRC16(pbuff, rxcnt-2);
            
            pakCRC=pbuff[rxcnt-2];    // младший байт
            pakCRC|=((UINT)pbuff[rxcnt-1])<<8;    // старший байт 03 04 83 00
            
            if (clcCRC!=pakCRC)
            {
                fase=FASE_START_RX;
            }
            else /**/
            {
                fase=FASE_FUNK_CHK;
            }
            break;
        };
        //====== ПРОВЕРЯЕМ/ИСПОЛНЯЕМ ПРИНЯТУЮ ФУНКЦИЮ ===== 
        case FASE_FUNK_CHK:
        {
            /* если определена функция проверки/исполнения
                ModBus'овских функций, то исполняем ее */
            if(modbusFunc)
            {
                if (modbusFunc()) fase=FASE_START_RX;    //функция вернула не нуль->передавать не надо
                else fase=FASE_START_TX;    // иначе передаем ответ
            }
            else
            {
                #ifdef DBG_MBUS_ON
                    fase=FASE_START_TX;
                #else  // !DBG_MBUS_ON
                    fase=FASE_START_RX;
                #endif // DBG_MBUS_ON            
            }
            break;
        };            
        //====== ПЕРЕДАЕМ ОТВЕТ ======
        case FASE_START_TX:
        {
            MbusTxRun();
            fase=FASE_END_TX;
            break;
        };
        //====== ЖДЕМ ЗАВЕРШЕНИЯ ПЕРЕДАЧИ ======
        case FASE_END_TX:
        {
            if (mbus_f_txend)
            {
                fase=FASE_START_RX;
            }
            break;
        };
    }

} // END OF HModBus()