/* Маска для получения только значения калибровки без знака. */
#define MASK_CALIBER      ((1<<4) | (1<<3) | (1<<2) | (1<<1) | (1<<0))
/* Маска для получения только значения калибровки без знака. */
#define MASK_CALIBER_SIGN (1 << 5)
/**
* Получение значения коррекции хода.
* @param caliber Калибровочное слово из RTC.
* @return Коррекция хода в ppm.
*/
int8_t caliber_to_ppm(uint8_t caliber)
{
        int8_t result = caliber & MASK_CALIBER;
        result = (uint8_t) result * 2;
        if ((caliber & MASK_CALIBER_SIGN) != 0) {
                result = -result;
        } else {
                result = (uint8_t) result * 2;
        }
        return result;
}
/**
* Получение калибровочного слова.
* @param ppm Коррекция хода в ppm.
* @return Калибровочное слово для RTC.
*/
uint8_t ppm_to_caliber(int8_t ppm)
{
        uint8_t result;
        if (ppm < 0) {
                result = (uint8_t) (-ppm + 1) / 2;
                result |= MASK_CALIBER_SIGN;
        } else {
                result = (uint8_t) (ppm + 2) / 4;
        }
        return result;
}