Занимательная электроника

#include "18B20.h"

void ini_datcik(){
RCC->APB2ENR |= RCC_APB2ENR_IOPCEN; //Разрешить тактирование порта /
GPIOC->CRL &= ~GPIO_CRL_MODE7; //Очистить биты MODE
GPIOC->CRL &= ~GPIO_CRL_CNF7; //Очистить биты CNF
GPIOC->CRL |= GPIO_CRL_MODE7_1 ; //Выход,частота 2MHz
GPIOC->CRL |= GPIO_CRL_CNF7_0; //Открытый сток общего назначения
GPIOC->ODR |= 1<<7 ; //отпустить шину

RCC->APB1ENR |= RCC_APB1ENR_TIM3EN; //подать тактирование на TIM3 /
TIM3->PSC = 72-1; //настроить делитель для формирования микросекунд
TIM3->ARR = 1000-1; // делаем 1000 раз переполнение и потом выдаем прерывание
TIM3->CR1 = TIM_CR1_CEN;  // запускаем прерывание
}

//сброс
//return 0 – устройство обнаружен, 1 – не обнаружено, 2 – к.з. на линии //
uint8_t ds_reset_pulse(uint16_t PinMask){
uint16_t result;
if((PORT->IDR & PinMask)==0) return 2; //проверить линию на отсутствие замыкания
PORT->ODR &= ~PinMask; //потянуть шину к земле
TIMER->CNT=0;
while(TIMER->CNT<480){}; //ждать 480 микросекунд
PORT->ODR |= PinMask; //отпустить шину
while(TIMER->CNT<550){}; //ждать 70 микросекунд
result = PORT->IDR & PinMask; //прочитать шину
while(TIMER->CNT<960){}; //дождаться окончания инициализации
if(result) return 1; //датчик не обнаружен
return 0; //датчик обнаружен
}

//передача бита 
void ds_write_bit(uint8_t bit,uint16_t PinMask){
TIMER->CNT=0;
PORT->ODR &= ~PinMask; //потянуть шину к земле
while(TIMER->CNT<2){}; //ждать 2 микросекунду
if(bit) PORT->ODR |= PinMask; //если передаем 1, то отпускаем шину
while(TIMER->CNT<60){}; //задержка 58 микросекунд
PORT->ODR |= PinMask; //отпускаем шину
while(TIMER->CNT<62){} // пауза в 2 мкс для разделения битов !!!!
}

//чтение бита 
uint16_t ds_read_bit(uint16_t PinMask){
uint16_t result;
TIMER->CNT=0;
PORT->ODR &= ~PinMask; //потянуть шину к земле
while(TIMER->CNT<2){};
PORT->ODR |= PinMask; //отпускаем шину
while(TIMER->CNT<15){}; //задержка 15 микросекунд
result = PORT->IDR & PinMask; //прочитать шину
while(TIMER->CNT<60){}; //оставшееся время
return result; //возвратить результат
}

//запись байта
void ds_write_byte(uint8_t byte, uint16_t PinMask){
uint8_t i;
for(i=0;i<8;i++) ds_write_bit(byte&(1<<i), PinMask);
}

//чтение байта
uint8_t ds_read_byte(uint16_t PinMask){
uint8_t i,result = 0;
for(i=0;i<8;i++)
   if(ds_read_bit(PinMask)) result |= 1<<i;
return result;
}

//пуск измерения температуры 
//return 0 – пуск выполнен, 1 – датчик не обнаружен, 2 – к.з. на линии //
//*********************************************************************************************
uint8_t ds_start_convert_single(uint8_t PinNumb){
uint8_t result;
result = ds_reset_pulse(1<<PinNumb); //послать импульс сброса
if(result) return result; //если ошибка – возвращаем ее код
ds_write_byte(0xCC,1<<PinNumb); //разрешить доступ к датчику не используя адрес
ds_write_byte(0x44,1<<PinNumb); //запустить преобразование
return 0;
}

//чтение памяти датчика
//return 0 – данные прочитаны, 1 – датчик не обнаружен, 2 – к.з. 3 – ошибка CRC //
uint8_t ds_read_data_single(uint8_t *buff, uint8_t PinNumb){
uint8_t crc = 0;
uint8_t data;
uint8_t i,j;
uint8_t tmp;

tmp = ds_reset_pulse(1<<PinNumb); //послать импульс сброса
if(tmp) return tmp; //если ошибка – возвращаем ее код
ds_write_byte(0xCC,1<<PinNumb); //разрешить доступ к датчику не используя адрес

ds_write_byte(0xBE,1<<PinNumb); //запрос 9 байт памяти

//прочитать 8 байт и вычислить CRC
for( i=0; i<8; i++){
  data = ds_read_byte(1<<PinNumb); //прочитать очередной байт
  buff[i] = data; //сохранить его в массиве
 //вычисление CRC – обрабатываем каждый бит принятого байта
 for( j=0; j<8; j++){//CRC = X^8+X^5+X^4+1 
     tmp = (crc ^ data) & 0x01;// ^ - побитовое исключающее или
     if (tmp==0x01)
              crc = crc ^ 0x18;
     crc = (crc >> 1) & 0x7F;
     if (tmp==0x01) 
              crc = crc | 0x80;
     data = data >> 1;
   }
}

data = ds_read_byte(1<<PinNumb); //прочитать CRC датчика
if(crc==data) return 0; //если CRC совпали – значит ошибки нет
return 3; //CRC не совпали, ошибка принятых данных
}

//чтение температуры датчика 
//return 1280 – ошибка, иначе – результат измерения //
signed int ds_read_temperature(uint8_t PinNumb){
signed char integer = 0;
signed char frac;
signed int result;
uint8_t buff[8];

//прочитать данные из датчика
if(ds_read_data_single(&buff[0],PinNumb)) return 1280;

frac = buff[0] & 0x0f; //получить дробную часть
integer = (buff[0]>>4) | ((buff[1] & 0x0f)<<4); //получить целую часть

//если температура отрицательная
if(integer<0){
  integer = 0 - integer - 1;
  result = integer *10; //учитываем целую часть
  frac = frac | 0xf0;
  frac = 0 - frac ;
}
//если температура положительная
else result = integer *10; //учитываем целую часть

result = result + ((frac*10)/16); //учитываем дробную часть
return result;
}