ds1821_1.sdb

PIC HiTech_C_Mike_Pearces_DS1821_thermostatwith Dallas DS1821 Programmer and schematic. Tested on P

[p GLOBOPT AUTOSTATIC PIC14 PICMIDHI PICLOMID ]
"10 C:\HT-PIC\INCLUDE\pic1267x.h
[v _RTCC `Vuc  1 s 1 @1 ]
"11
[v _TMR0 `Vuc  1 s 1 @1 ]
"12
[v _PCL `Vuc  1 s 1 @2 ]
"13
[v _STATUS `Vuc  1 s 1 @3 ]
"14
[v _FSR `uc  1 s 1 @4 ]
"15
[v _GPIO `Vuc  1 s 1 @5 ]
"16
[v _PCLATH `uc  1 s 1 @10 ]
"17
[v _INTCON `Vuc  1 s 1 @11 ]
"18
[v _PIR1 `Vuc  1 s 1 @12 ]
"19
[v _ADRES `Vuc  1 s 1 @30 ]
"20
[v _ADCON0 `Vuc  1 s 1 @31 ]
"22
[v _OPTION `Xuc  1 s 1 @129 ]
"23
[v _TRIS `VXuc  1 s 1 @133 ]
"24
[v _PIE1 `VXuc  1 s 1 @140 ]
"25
[v _PCON `VXuc  1 s 1 @142 ]
"26
[v _OSCCAL `VXuc  1 s 1 @143 ]
"27
[v _ADCON1 `VXuc  1 s 1 @159 ]
"30
[v _RP0 `Vb  1 s 0 @29 ]
"31
[v _TO `Vb  1 s 0 @28 ]
"32
[v _PD `Vb  1 s 0 @27 ]
"33
[v _ZERO `Vb  1 s 0 @26 ]
"34
[v _DC `Vb  1 s 0 @25 ]
"35
[v _CARRY `Vb  1 s 0 @24 ]
"42
[v _GP5 `Vb  1 s 0 @45 ]
"43
[v _GP4 `Vb  1 s 0 @44 ]
"44
[v _GP3 `Vb  1 s 0 @43 ]
"45
[v _GP2 `Vb  1 s 0 @42 ]
"46
[v _GP1 `Vb  1 s 0 @41 ]
"47
[v _GP0 `Vb  1 s 0 @40 ]
"50
[v _GIE `Vb  1 s 0 @95 ]
"51
[v _PEIE `Vb  1 s 0 @94 ]
"52
[v _T0IE `Vb  1 s 0 @93 ]
"53
[v _INTE `Vb  1 s 0 @92 ]
"54
[v _GPIE `Vb  1 s 0 @91 ]
"55
[v _T0IF `Vb  1 s 0 @90 ]
"56
[v _INTF `Vb  1 s 0 @89 ]
"57
[v _GPIF `Vb  1 s 0 @88 ]
"60
[v _ADIF `Vb  1 s 0 @102 ]
"63
[v _ADCS1 `Vb  1 s 0 @255 ]
"64
[v _ADCS0 `Vb  1 s 0 @254 ]
"65
[v _CHS1 `Vb  1 s 0 @252 ]
"66
[v _CHS0 `Vb  1 s 0 @251 ]
"67
[v _GODONE `Vb  1 s 0 @250 ]
"68
[v _ADON `Vb  1 s 0 @248 ]
"71
[v _GPPU `Xb  1 s 0 @1039 ]
"72
[v _INTEDG `Xb  1 s 0 @1038 ]
"73
[v _T0CS `Xb  1 s 0 @1037 ]
"74
[v _T0SE `Xb  1 s 0 @1036 ]
"75
[v _PSA `Xb  1 s 0 @1035 ]
"76
[v _PS2 `Xb  1 s 0 @1034 ]
"77
[v _PS1 `Xb  1 s 0 @1033 ]
"78
[v _PS0 `Xb  1 s 0 @1032 ]
"81
[v _TRIS5 `VXb  1 s 0 @1069 ]
"82
[v _TRIS4 `VXb  1 s 0 @1068 ]
"83
[v _TRIS3 `VXb  1 s 0 @1067 ]
"84
[v _TRIS2 `VXb  1 s 0 @1066 ]
"85
[v _TRIS1 `VXb  1 s 0 @1065 ]
"86
[v _TRIS0 `VXb  1 s 0 @1064 ]
"89
[v _ADIE `VXb  1 s 0 @1126 ]
"92
[v _POR `Vb  1 s 0 @1137 ]
"96
[v _CAL3 `VXb  1 s 0 @1151 ]
"97
[v _CAL2 `VXb  1 s 0 @1150 ]
"98
[v _CAL1 `VXb  1 s 0 @1149 ]
"99
[v _CAL0 `VXb  1 s 0 @1148 ]
"100
[v _CALFST `VXb  1 s 0 @1147 ]
"101
[v _CALSLW `VXb  1 s 0 @1146 ]
"112
[v _PCFG2 `VXb  1 s 0 @1274 ]
"113
[v _PCFG1 `VXb  1 s 0 @1273 ]
"114
[v _PCFG0 `VXb  1 s 0 @1272 ]
"76 DS1821_1.C
[v _SCL `b  1 s 0 @40 ]
"77
[v _SCL_TRIS `b  1 s 0 @1064 ]
"78
[v _SDA `b  1 s 0 @41 ]
"79
[v _SDA_TRIS `b  1 s 0 @1065 ]
"80
[v _SW1 `b  1 s 0 @42 ]
"81
[v _SW1_DIR `b  1 s 0 @1066 ]
"82
[v _SW2 `b  1 s 0 @43 ]
"83
[v _SW2_DIR `b  1 s 0 @1067 ]
"84
[v _SPWR `b  1 s 0 @44 ]
"85
[v _SPWR_DIR `b  1 s 0 @1068 ]
"86
[v _D_PIN `b  1 s 0 @45 ]
"87
[v _D_TRIS `b  1 s 0 @1069 ]
"12 delay.c
[v _DelayMs `(v  1 e 0 0 ]
{
[v _cnt `uc  1 a 1 w ]
[v _cnt `uc  1 a 1 0 ]
[v _i `uc  1 a 1 1 ]
"24
{
[v __dcnt `uc  1 a 1 2 ]
}
"21
[v _cnt `uc  1 a 1 0 ]
"28
} 3
"65 m_i2c_1.c
[v _I2C_Send `(uc  1 e 1 0 ]
{
[v _Address `uc  1 a 1 w ]
[v _Data `*uc  1 p 1 0 ]
[v _Num `uc  1 p 1 1 ]
[v _Address `uc  1 a 1 0 ]
[v _Num `uc  1 p 1 1 ]
[v _Data `*uc  1 p 1 0 ]
"66
[v _Address `uc  1 a 1 0 ]
"88
} 1
"95
[v _i2csendbyte `(uc  1 e 1 0 ]
{
[v _Byte `uc  1 a 1 w ]
[v _Byte `uc  1 a 1 0 ]
[v _count `uc  1 a 1 1 ]
"97
[v _Byte `uc  1 a 1 0 ]
"118
} 2
"126
[v _i2cstart `(v  1 e 0 0 ]
{
"141
} 0
"148
[v _i2cstop `(v  1 e 0 0 ]
{
"155
} 0
"162
[v _i2cclock `(v  1 e 0 0 ]
{
"168
} 0
"176
[v _i2cgetack `(uc  1 e 1 0 ]
{
"192
} 0
"202
[v _i2cdelay `(v  1 e 0 0 ]
{
[v _delay `uc  1 a 1 w ]
[v _delay `uc  1 a 1 0 ]
[v __dcnt `uc  1 a 1 1 ]
"208
[v _delay `uc  1 a 1 0 ]
"212
} 2
"32 1wire002.c
[v _D_Presence `b  1 e 0 0 ]
"33
[v _D_ShortCircuit `b  1 e 0 0 ]
"34
[v _D_Error `b  1 e 0 0 ]
"35
[v _D_Data `b  1 e 0 0 ]
"42
[v _D_Reset `(v  1 e 0 0 ]
{
[v _count `uc  1 a 1 0 ]
"55
{
[v __dcnt `uc  1 a 1 1 ]
"58
}
{
[v __dcnt `uc  1 a 1 1 ]
"59
}
{
[v __dcnt `uc  1 a 1 1 ]
"63
}
{
[v __dcnt `uc  1 a 1 1 ]
"75
}
{
[v __dcnt `uc  1 a 1 1 ]
}
"77
} 2
"85
[v _D_Write `(v  1 e 0 0 ]
{
[v _Data `i  1 p 2 0 ]
[v _count `uc  1 a 1 0 ]
[v _Data `i  1 p 2 0 ]
"94
{
[v __dcnt `uc  1 a 1 1 ]
"96
}
{
[v __dcnt `uc  1 a 1 1 ]
"97
}
{
[v __dcnt `uc  1 a 1 1 ]
"102
}
{
[v __dcnt `uc  1 a 1 1 ]
"107
}
{
[v __dcnt `uc  1 a 1 1 ]
}
"108
} 2
"115
[v _D_Read `(uc  1 e 1 0 ]
{
[v _count `uc  1 a 1 0 ]
[v _data `uc  1 a 1 1 ]
"122
{
[v __dcnt `uc  1 a 1 2 ]
"124
}
{
[v __dcnt `uc  1 a 1 2 ]
"126
}
{
[v __dcnt `uc  1 a 1 2 ]
"135
}
{
[v __dcnt `uc  1 a 1 2 ]
"137
}
{
[v __dcnt `uc  1 a 1 2 ]
}
"139
} 3
"172 DS1821_1.C
[v _Digits `Cuc  0a e 0 0 ]
[v _Digits `Cuc  10a e 10 0 ]
"207
[v _TempH `c  1 e 1 0 ]
"208
[v _TempL `c  1 e 1 0 ]
"209
[v _TempS `uc  1 e 1 0 ]
"211
[v _ValueType `uc  1 e 1 0 ]
"212
[v _EditPosition `uc  1 e 1 0 ]
"213
[v _DisplayBuff `uc  5a e 5 0 ]
"214
[v _count `uc  1 e 1 0 ]
"224
[s S96 . 4 `uc  1 Ones 1 0 
`uc  1 Tens 1 1 
`uc  1 Hundreds 1 2 
`uc  1 Type 1 3 
]
"225
[u S95 . 4 `uc  4a Data 4 0 
`S96  1 Area 4 0 
]
[v _Edit `S95  1 e 4 0 ]
"227
[v _Current `uc  1 e 1 0 ]
"228
[v _temp `uc  1 e 1 0 ]
"230
[v _HighLowTemp `b  1 e 0 0 ]
"231
[v _Negative `b  1 e 0 0 ]
"232
[v _Flash `b  1 e 0 0 ]
"233
[v _Programmed `b  1 e 0 0 ]
"234
[v _ClrL `b  1 e 0 0 ]
"235
[v _ClrH `b  1 e 0 0 ]
"236
[v _Active `b  1 e 0 0 ]
"253
[v _main `(v  1 e 0 0 ]
{
"286
} 0
"302
[v _ToggleMode `(v  1 e 0 0 ]
{
"328
} 0
"337
[v _ReadCurrent `(v  1 e 0 0 ]
{
"358
} 0
"367
[v _WriteCurrent `(v  1 e 0 0 ]
{
"391
} 0
"400
[v _DisplayCurrent `(v  1 e 0 0 ]
{
"497
} 0
"505
[v _DoUserIO `(v  1 e 0 0 ]
{
"594
} 0
"601
[v _GetKeyPressed `(uc  1 e 1 0 ]
{
[v _pos `uc  1 a 1 0 ]
[v _done `uc  1 a 1 1 ]
"644
} 2
"651
[v _ConvertForDisplay `(v  1 e 0 0 ]
{
[v _temp `c  1 a 1 0 ]
"694
} 1