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