/Designs/MRAKOMER3/SW/irmrak3.PJT
32,8 → 32,8
 
[Opened Files]
1=C:\Users\locadmin\Documents\MLAB\Designs\MRAKOMER3\SW\irmrak3.c
2=irmrak3.c
3=
2=C:\Users\locadmin\Documents\MLAB\Designs\MRAKOMER3\SW\irmrak3.h
3=C:\Program Files\PICC\devices\16F88.h
4=
[Units]
Count=1
/Designs/MRAKOMER3/SW/irmrak3.c
2,6 → 2,7
#define VERSION "3.0"
#define ID "$Id$"
#include "irmrak3.h"
#bit SSPM3=0x14.3
 
#define SA 0x00 // Slave Address (0 for single slave / 0x5A<<1 default)
#define RAM_Access 0x00 // RAM access command
127,6 → 128,8
setup_vref(FALSE);
setup_oscillator(OSC_4MHZ|OSC_INTRC);
 
// SSPM3=1;
 
delay_ms(1000);
printf("\n\r* Mrakomer %s (C) 2007 KAKL *\n\r",VER); // Welcome message
printf("* %s *\n\r\n\r",REV);
140,7 → 143,11
{
n++;
 
if (kbhit()) if ('w'==getc()) i=0; // Would you like warmer?
if (kbhit())
{
delay_ms(200);
if ('w'==getc()) i=0; // Would you like warmer?
}
 
tempa=ReadTemp(SA, RAM_Tamb); // Read temperatures from sensor
temp=ReadTemp(SA, RAM_Tobj1);
/Designs/MRAKOMER3/SW/irmrak3.h
3,7 → 3,7
 
#FUSES WDT //Watch Dog Timer
#FUSES INTRC_IO //Internal RC Osc, no CLKOUT
#FUSES NOPUT //No Power Up Timer
#FUSES PUT //Power Up Timer
#FUSES NOMCLR //Master Clear pin used for I/O
#FUSES NOBROWNOUT //No brownout reset
#FUSES NOLVP //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O
16,5 → 16,5
 
#use delay(clock=4000000)
#use rs232(baud=2400,parity=N,xmit=PIN_B5,rcv=PIN_B2,bits=8)
#use i2c(Master,Slow,sda=PIN_B1,scl=PIN_B4)//,force_hw)
#use i2c(Master,Slow,sda=PIN_B1,scl=PIN_B4,SMBUS)//,force_hw)