#include<p18cxxx.h>
#include<delays.h>
#include<xlcd.h> //Подключим библиотеку от Microchip для LCD
//Конфигурацию взял из PICDEM FS USB
#pragma config PLLDIV = 5 // (20 MHz кварцевый резонатор)
#pragma config CPUDIV = OSC1_PLL2
#pragma config USBDIV = 2 // Clock source from 96MHz PLL/2
#pragma config FOSC = HSPLL_HS
#pragma config FCMEN = OFF
#pragma config IESO = OFF
#pragma config PWRT = OFF
#pragma config BOR = ON
#pragma config BORV = 3
#pragma config VREGEN = ON //USB Voltage Regulator
#pragma config WDT = OFF
#pragma config WDTPS = 32768
#pragma config MCLRE = ON
#pragma config LPT1OSC = OFF
#pragma config PBADEN = OFF
//#pragma config CCP2MX = ON
#pragma config STVREN = ON
#pragma config LVP = OFF
//#pragma config ICPRT = OFF // Dedicated In-Circuit Debug/Programming
#pragma config XINST = OFF // Extended Instruction Set
#pragma config CP0 = OFF
#pragma config CP1 = OFF
//#pragma config CP2 = OFF
//#pragma config CP3 = OFF
#pragma config CPB = OFF
#pragma config CPD = OFF
#pragma config WRT0 = OFF
#pragma config WRT1 = OFF
//#pragma config WRT2 = OFF
//#pragma config WRT3 = OFF
#pragma config WRTB = OFF // Boot Block Write Protection
#pragma config WRTC = OFF
//#pragma config WRTD = OFF
#pragma config EBTR0 = OFF
#pragma config EBTR1 = OFF
//#pragma config EBTR2 = OFF
//#pragma config EBTR3 = OFF
#pragma config EBTRB = OFF
//###################################################################
#define tris_dallas TRISAbits.TRISA3
#define dallas LATAbits.LATA3
#define dallas_port PORTAbits.RA3
//###################################################################
#pragma udata
char dallas_ok[]="OK";
char dallas_error[]="Error";
char DRomBuf[8]={0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08};
char DRomBufASCII[17];
char DTemp[2]={0x00,0x00};
char com_reg,error_dallas;
char con_dallas=0;
//###################################################################
#pragma code
void DelayFor18TCY(void) //provides a 18 Tcy delay
{
Delay10TCYx(60);
}
void DelayPORXLCD(void) //provides at least 15ms delay
{
Delay1KTCYx(200);
}
void DelayXLCD(void) // provides at least 5ms delay
{
Delay1KTCYx(70);
}
void ClrStr(char,char);
//**********Прототипы функций для датчика температуры***************
void Delay480us(void);
void Delay60us(void);
void HowDelay(int);
char ResetDallas(void);
void DoutLow(void);
void DoutHigh(void);
char DRecive(void);
void DSend(char);
char* HexToASCII(char*,char*,int );
void DReadRom(void);
char* DGetTemp(void);
//###################################################################
void main(void)
{
ADCON1 |= 0x0F;
OpenXLCD(FOUR_BIT&LINES_5X7);
WriteCmdXLCD(SHIFT_CUR_RIGHT);
WriteCmdXLCD(CURSOR_OFF&BLINK_OFF);
WriteCmdXLCD(0x01);
while(BusyXLCD());
while(1)
{
ClrStr(0xC0,16);
HowDelay(2);
ResetDallas();
if(error_dallas){ //Если датчик не ответил
while(BusyXLCD());
SetDDRamAddr(0x80);
putsXLCD(dallas_error);
}
else{ //Если датчик ответил
while(BusyXLCD());
SetDDRamAddr(0x80);
putsXLCD(dallas_ok);
}
DReadRom(); //Читаем ROM
while(BusyXLCD());
SetDDRamAddr(0xC0); //Устанавливаем адрес куда будем выводить ROM
putsXLCD(HexToASCII(DRomBuf,DRomBufASCII,8)); //Печатаем на LCD ROM
HowDelay(2); //Здаржка на большое время
while(BusyXLCD());
SetDDRamAddr(0x86); //Устанавливаем адрес куда будем выводить Температуру
putsXLCD(HexToASCII(DGetTemp(),DRomBufASCII,2)); //2 байта -старший ,затем младший в Hex
HowDelay(4);
}
}
//Выводит на LCD пробелы.Параметр addr-с какого адреса чистить,len-сколько байтов в строке чистить
void ClrStr(char addr,char len){
int i;
SetDDRamAddr(addr);
for(i=0;i<len;i++){
while(BusyXLCD());
WriteDataXLCD(' ');
}
}
//Функция возвращает адрес массива символов в памяти, куда запишет
//преобразованные в строку шеснадцатиричные значения байтов в массиве,
//переданном ей параметром sour(адрес массива байтов, который надо преобразовать)
//len -колличество байтов в sour,dest-адрес массива, куда запишем преобразованную
//строку, равную len*2.
char* HexToASCII(char *sour,char *dest,int len)
{
int i;
char tmp;
int j=0;
for(i=0;i<len;i++){
tmp=((sour[i]>>4)&0x0f);
if(tmp<=9){
dest[j]=tmp+0x30;
}
else if(tmp>=0x0A && tmp<=0x0F){
dest[j]=tmp+0x37;
}
j++;
tmp=sour[i];
tmp=tmp &= 0x0f;
if(tmp<=9){
dest[j]=tmp+0x30;
}
else if(tmp>=0x0A && tmp<=0x0F){
dest[j]=tmp+0x37;
}
j++;
}
dest[j]=0;
return dest;
}
//**********Функции для работы с датчиком температуры****************
char ResetDallas(void){ //Сброс датчика
char err=1;
error_dallas=1;
DoutLow();
Delay480us();
DoutHigh();
Delay60us();
if(!dallas_port){
error_dallas=0;
err=0;
}
Delay480us();
return err;
}
//Чтение ROM датчика - сохраняет 8 байт ROM датчика в массиве DRomBuf[7]
void DReadRom(void){
int i;
int j=0;
DoutLow();
DoutHigh();
if(!dallas_port){
return;
}
if(ResetDallas()){
return;
}
DSend(0x33);
for(i=0;i<8;i++){
DRomBuf[i]=DRecive();
}
}
//Измеряем и читаем температуру из одного датчика
char* DGetTemp(void){
int i;
int j=0;
DoutLow();
DoutHigh();
if(!dallas_port)return DTemp;
if(con_dallas)goto READ;
if(ResetDallas()) return DTemp;
DSend(0xCC);
DSend(0x44);
con_dallas=1;
return DTemp;
READ:
con_dallas=0;
if(ResetDallas())return DTemp;
DSend(0xCC);
DSend(0xBE);
DTemp[1]=DRecive();
DTemp[0]=DRecive();
return DTemp;
}
//Функции протокола 1-wire
void DoutLow(void){ //устанавливает линию передачи в 0
dallas=0;
tris_dallas=0;
Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();
Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();Nop();
Nop();Nop();Nop();Nop();
}
void DoutHigh(void){ //отпускает линию в 1 (+5В от резистора)
tris_dallas=1;
Nop();Nop();Nop();Nop();Nop();Nop();
}
//Принимает байт
char DRecive(void){
int i;
for(i=0;i<8;i++){
DoutLow();
DoutHigh();
if(dallas_port){
STATUSbits.C=1;
}
else{
STATUSbits.C=0;
}
Rrcf(com_reg,1,1);
Delay60us();
}
return com_reg;
}
//Передает байт далласу
void DSend(char data){
int i;
com_reg=data;
for(i=0;i<8;i++){
DoutLow();
Rrcf(com_reg,1,1);
if(STATUSbits.C){
DoutHigh();
}
else{
DoutLow();
}
Delay60us();
DoutHigh();
}
}
//Функции задержки
void Delay480us(void){
Delay100TCYx(58);
}
void Delay60us(void){
Delay10TCYx(72);
}
void HowDelay(int i){
int j=0;
for(;j<i;j++){
Delay10KTCYx(0);
}
}