3095 |
jacho |
1 |
CCS PCM C Compiler, Version 4.106, 47914 25-6-13 09:31 |
|
|
2 |
|
|
|
3 |
Filename: D:\Honza\MLAB\Modules\HumanInterfaces\TOUCHBOARD01A\SW\PIC16F887\main.lst |
|
|
4 |
|
|
|
5 |
ROM used: 1007 words (12%) |
|
|
6 |
Largest free fragment is 2048 |
|
|
7 |
RAM used: 7 (2%) at main() level |
|
|
8 |
19 (5%) worst case |
|
|
9 |
Stack: 2 locations |
|
|
10 |
|
|
|
11 |
* |
|
|
12 |
0000: MOVLW 02 |
|
|
13 |
0001: MOVWF 0A |
|
|
14 |
0002: GOTO 20B |
|
|
15 |
0003: NOP |
|
|
16 |
.................... #include "D:\Honza\MLAB\Modules\HumanInterfaces\TOUCHBOARD01A\SW\PIC16F887\main.h" |
|
|
17 |
.................... #include <16F887.h> |
|
|
18 |
.................... //////// Standard Header file for the PIC16F887 device //////////////// |
|
|
19 |
.................... #device PIC16F887 |
|
|
20 |
.................... #list |
|
|
21 |
.................... |
|
|
22 |
.................... #device adc=8 |
|
|
23 |
.................... |
|
|
24 |
.................... #FUSES NOWDT //No Watch Dog Timer |
|
|
25 |
.................... #FUSES INTRC_IO //Internal RC Osc, no CLKOUT |
|
|
26 |
.................... #FUSES NOPUT //No Power Up Timer |
|
|
27 |
.................... #FUSES MCLR //Master Clear pin enabled |
|
|
28 |
.................... #FUSES NOPROTECT //Code not protected from reading |
|
|
29 |
.................... #FUSES NOCPD //No EE protection |
|
|
30 |
.................... #FUSES NOBROWNOUT //No brownout reset |
|
|
31 |
.................... #FUSES IESO //Internal External Switch Over mode enabled |
|
|
32 |
.................... #FUSES FCMEN //Fail-safe clock monitor enabled |
|
|
33 |
.................... #FUSES NOLVP //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O |
|
|
34 |
.................... #FUSES NODEBUG //No Debug mode for ICD |
|
|
35 |
.................... #FUSES NOWRT //Program memory not write protected |
|
|
36 |
.................... #FUSES BORV40 //Brownout reset at 4.0V |
|
|
37 |
.................... |
|
|
38 |
.................... #use delay(clock=8000000) |
|
|
39 |
* |
|
|
40 |
01F5: MOVLW 25 |
|
|
41 |
01F6: MOVWF 04 |
|
|
42 |
01F7: BCF 03.7 |
|
|
43 |
01F8: MOVF 00,W |
|
|
44 |
01F9: BTFSC 03.2 |
|
|
45 |
01FA: GOTO 208 |
|
|
46 |
01FB: MOVLW 02 |
|
|
47 |
01FC: MOVWF 78 |
|
|
48 |
01FD: CLRF 77 |
|
|
49 |
01FE: DECFSZ 77,F |
|
|
50 |
01FF: GOTO 1FE |
|
|
51 |
0200: DECFSZ 78,F |
|
|
52 |
0201: GOTO 1FD |
|
|
53 |
0202: MOVLW 97 |
|
|
54 |
0203: MOVWF 77 |
|
|
55 |
0204: DECFSZ 77,F |
|
|
56 |
0205: GOTO 204 |
|
|
57 |
0206: DECFSZ 00,F |
|
|
58 |
0207: GOTO 1FB |
|
|
59 |
0208: BCF 0A.3 |
|
|
60 |
0209: BCF 0A.4 |
|
|
61 |
020A: GOTO 3EB (RETURN) |
|
|
62 |
.................... |
|
|
63 |
.................... |
|
|
64 |
.................... #define S_SDA PIN_C3 |
|
|
65 |
.................... #define S_SCL PIN_C4 |
|
|
66 |
.................... #use i2c(master, sda=S_SDA, scl=S_SCL) |
|
|
67 |
* |
|
|
68 |
009D: MOVLW 08 |
|
|
69 |
009E: MOVWF 78 |
|
|
70 |
009F: NOP |
|
|
71 |
00A0: BCF 07.4 |
|
|
72 |
00A1: BCF 20.4 |
|
|
73 |
00A2: MOVF 20,W |
|
|
74 |
00A3: BSF 03.5 |
|
|
75 |
00A4: MOVWF 07 |
|
|
76 |
00A5: NOP |
|
|
77 |
00A6: BCF 03.5 |
|
|
78 |
00A7: RLF 24,F |
|
|
79 |
00A8: BCF 07.3 |
|
|
80 |
00A9: BTFSS 03.0 |
|
|
81 |
00AA: GOTO 0B1 |
|
|
82 |
00AB: BSF 20.3 |
|
|
83 |
00AC: MOVF 20,W |
|
|
84 |
00AD: BSF 03.5 |
|
|
85 |
00AE: MOVWF 07 |
|
|
86 |
00AF: GOTO 0B5 |
|
|
87 |
00B0: BCF 03.5 |
|
|
88 |
00B1: BCF 20.3 |
|
|
89 |
00B2: MOVF 20,W |
|
|
90 |
00B3: BSF 03.5 |
|
|
91 |
00B4: MOVWF 07 |
|
|
92 |
00B5: NOP |
|
|
93 |
00B6: BCF 03.5 |
|
|
94 |
00B7: BSF 20.4 |
|
|
95 |
00B8: MOVF 20,W |
|
|
96 |
00B9: BSF 03.5 |
|
|
97 |
00BA: MOVWF 07 |
|
|
98 |
00BB: BCF 03.5 |
|
|
99 |
00BC: BTFSS 07.4 |
|
|
100 |
00BD: GOTO 0BC |
|
|
101 |
00BE: DECFSZ 78,F |
|
|
102 |
00BF: GOTO 09F |
|
|
103 |
00C0: NOP |
|
|
104 |
00C1: BCF 07.4 |
|
|
105 |
00C2: BCF 20.4 |
|
|
106 |
00C3: MOVF 20,W |
|
|
107 |
00C4: BSF 03.5 |
|
|
108 |
00C5: MOVWF 07 |
|
|
109 |
00C6: NOP |
|
|
110 |
00C7: BCF 03.5 |
|
|
111 |
00C8: BSF 20.3 |
|
|
112 |
00C9: MOVF 20,W |
|
|
113 |
00CA: BSF 03.5 |
|
|
114 |
00CB: MOVWF 07 |
|
|
115 |
00CC: NOP |
|
|
116 |
00CD: NOP |
|
|
117 |
00CE: BCF 03.5 |
|
|
118 |
00CF: BSF 20.4 |
|
|
119 |
00D0: MOVF 20,W |
|
|
120 |
00D1: BSF 03.5 |
|
|
121 |
00D2: MOVWF 07 |
|
|
122 |
00D3: BCF 03.5 |
|
|
123 |
00D4: BTFSS 07.4 |
|
|
124 |
00D5: GOTO 0D4 |
|
|
125 |
00D6: CLRF 78 |
|
|
126 |
00D7: NOP |
|
|
127 |
00D8: BTFSC 07.3 |
|
|
128 |
00D9: BSF 78.0 |
|
|
129 |
00DA: BCF 07.4 |
|
|
130 |
00DB: BCF 20.4 |
|
|
131 |
00DC: MOVF 20,W |
|
|
132 |
00DD: BSF 03.5 |
|
|
133 |
00DE: MOVWF 07 |
|
|
134 |
00DF: BCF 03.5 |
|
|
135 |
00E0: BCF 07.3 |
|
|
136 |
00E1: BCF 20.3 |
|
|
137 |
00E2: MOVF 20,W |
|
|
138 |
00E3: BSF 03.5 |
|
|
139 |
00E4: MOVWF 07 |
|
|
140 |
00E5: BCF 03.5 |
|
|
141 |
00E6: RETURN |
|
|
142 |
00E7: MOVLW 08 |
|
|
143 |
00E8: MOVWF 25 |
|
|
144 |
00E9: MOVF 77,W |
|
|
145 |
00EA: MOVWF 26 |
|
|
146 |
00EB: BSF 20.3 |
|
|
147 |
00EC: MOVF 20,W |
|
|
148 |
00ED: BSF 03.5 |
|
|
149 |
00EE: MOVWF 07 |
|
|
150 |
00EF: NOP |
|
|
151 |
00F0: BCF 03.5 |
|
|
152 |
00F1: BSF 20.4 |
|
|
153 |
00F2: MOVF 20,W |
|
|
154 |
00F3: BSF 03.5 |
|
|
155 |
00F4: MOVWF 07 |
|
|
156 |
00F5: BCF 03.5 |
|
|
157 |
00F6: BTFSS 07.4 |
|
|
158 |
00F7: GOTO 0F6 |
|
|
159 |
00F8: BTFSC 07.3 |
|
|
160 |
00F9: BSF 03.0 |
|
|
161 |
00FA: BTFSS 07.3 |
|
|
162 |
00FB: BCF 03.0 |
|
|
163 |
00FC: RLF 78,F |
|
|
164 |
00FD: NOP |
|
|
165 |
00FE: BCF 20.4 |
|
|
166 |
00FF: MOVF 20,W |
|
|
167 |
0100: BSF 03.5 |
|
|
168 |
0101: MOVWF 07 |
|
|
169 |
0102: BCF 03.5 |
|
|
170 |
0103: BCF 07.4 |
|
|
171 |
0104: DECFSZ 25,F |
|
|
172 |
0105: GOTO 0EB |
|
|
173 |
0106: BSF 20.3 |
|
|
174 |
0107: MOVF 20,W |
|
|
175 |
0108: BSF 03.5 |
|
|
176 |
0109: MOVWF 07 |
|
|
177 |
010A: NOP |
|
|
178 |
010B: BCF 03.5 |
|
|
179 |
010C: BCF 07.3 |
|
|
180 |
010D: MOVF 26,W |
|
|
181 |
010E: BTFSC 03.2 |
|
|
182 |
010F: GOTO 115 |
|
|
183 |
0110: BCF 20.3 |
|
|
184 |
0111: MOVF 20,W |
|
|
185 |
0112: BSF 03.5 |
|
|
186 |
0113: MOVWF 07 |
|
|
187 |
0114: BCF 03.5 |
|
|
188 |
0115: NOP |
|
|
189 |
0116: BSF 20.4 |
|
|
190 |
0117: MOVF 20,W |
|
|
191 |
0118: BSF 03.5 |
|
|
192 |
0119: MOVWF 07 |
|
|
193 |
011A: BCF 03.5 |
|
|
194 |
011B: BTFSS 07.4 |
|
|
195 |
011C: GOTO 11B |
|
|
196 |
011D: NOP |
|
|
197 |
011E: BCF 07.4 |
|
|
198 |
011F: BCF 20.4 |
|
|
199 |
0120: MOVF 20,W |
|
|
200 |
0121: BSF 03.5 |
|
|
201 |
0122: MOVWF 07 |
|
|
202 |
0123: NOP |
|
|
203 |
0124: BCF 03.5 |
|
|
204 |
0125: BCF 07.3 |
|
|
205 |
0126: BCF 20.3 |
|
|
206 |
0127: MOVF 20,W |
|
|
207 |
0128: BSF 03.5 |
|
|
208 |
0129: MOVWF 07 |
|
|
209 |
012A: BCF 03.5 |
|
|
210 |
012B: RETURN |
|
|
211 |
.................... #use rs232(baud=9600,parity=N,xmit=PIN_B3,rcv=PIN_B2,bits=8) //rcv TXD xmit RXD |
|
|
212 |
* |
|
|
213 |
0033: BSF 03.5 |
|
|
214 |
0034: BCF 06.3 |
|
|
215 |
0035: BCF 03.5 |
|
|
216 |
0036: BCF 06.3 |
|
|
217 |
0037: MOVLW 08 |
|
|
218 |
0038: MOVWF 78 |
|
|
219 |
0039: GOTO 03A |
|
|
220 |
003A: NOP |
|
|
221 |
003B: BSF 78.7 |
|
|
222 |
003C: GOTO 04B |
|
|
223 |
003D: BCF 78.7 |
|
|
224 |
003E: RRF 2B,F |
|
|
225 |
003F: BTFSC 03.0 |
|
|
226 |
0040: BSF 06.3 |
|
|
227 |
0041: BTFSS 03.0 |
|
|
228 |
0042: BCF 06.3 |
|
|
229 |
0043: BSF 78.6 |
|
|
230 |
0044: GOTO 04B |
|
|
231 |
0045: BCF 78.6 |
|
|
232 |
0046: DECFSZ 78,F |
|
|
233 |
0047: GOTO 03E |
|
|
234 |
0048: GOTO 049 |
|
|
235 |
0049: NOP |
|
|
236 |
004A: BSF 06.3 |
|
|
237 |
004B: MOVLW 3F |
|
|
238 |
004C: MOVWF 04 |
|
|
239 |
004D: DECFSZ 04,F |
|
|
240 |
004E: GOTO 04D |
|
|
241 |
004F: NOP |
|
|
242 |
0050: BTFSC 78.7 |
|
|
243 |
0051: GOTO 03D |
|
|
244 |
0052: BTFSC 78.6 |
|
|
245 |
0053: GOTO 045 |
|
|
246 |
0054: RETURN |
|
|
247 |
.................... |
|
|
248 |
.................... |
|
|
249 |
.................... void main() |
|
|
250 |
.................... { |
|
|
251 |
* |
|
|
252 |
020B: CLRF 04 |
|
|
253 |
020C: BCF 03.7 |
|
|
254 |
020D: MOVLW 1F |
|
|
255 |
020E: ANDWF 03,F |
|
|
256 |
020F: MOVLW 71 |
|
|
257 |
0210: BSF 03.5 |
|
|
258 |
0211: MOVWF 0F |
|
|
259 |
0212: MOVF 0F,W |
|
|
260 |
0213: BCF 06.3 |
|
|
261 |
0214: BCF 03.5 |
|
|
262 |
0215: BSF 06.3 |
|
|
263 |
0216: BSF 03.5 |
|
|
264 |
0217: BSF 03.6 |
|
|
265 |
0218: MOVF 09,W |
|
|
266 |
0219: ANDLW C0 |
|
|
267 |
021A: MOVWF 09 |
|
|
268 |
021B: BCF 03.6 |
|
|
269 |
021C: BCF 1F.4 |
|
|
270 |
021D: BCF 1F.5 |
|
|
271 |
021E: MOVLW 00 |
|
|
272 |
021F: BSF 03.6 |
|
|
273 |
0220: MOVWF 08 |
|
|
274 |
0221: BCF 03.5 |
|
|
275 |
0222: CLRF 07 |
|
|
276 |
0223: CLRF 08 |
|
|
277 |
0224: CLRF 09 |
|
|
278 |
.................... |
|
|
279 |
.................... setup_adc_ports(NO_ANALOGS|VSS_VDD); |
|
|
280 |
* |
|
|
281 |
0228: BSF 03.5 |
|
|
282 |
0229: BSF 03.6 |
|
|
283 |
022A: MOVF 09,W |
|
|
284 |
022B: ANDLW C0 |
|
|
285 |
022C: MOVWF 09 |
|
|
286 |
022D: BCF 03.6 |
|
|
287 |
022E: BCF 1F.4 |
|
|
288 |
022F: BCF 1F.5 |
|
|
289 |
0230: MOVLW 00 |
|
|
290 |
0231: BSF 03.6 |
|
|
291 |
0232: MOVWF 08 |
|
|
292 |
.................... setup_adc(ADC_CLOCK_DIV_2); |
|
|
293 |
0233: BCF 03.5 |
|
|
294 |
0234: BCF 03.6 |
|
|
295 |
0235: BCF 1F.6 |
|
|
296 |
0236: BCF 1F.7 |
|
|
297 |
0237: BSF 03.5 |
|
|
298 |
0238: BCF 1F.7 |
|
|
299 |
0239: BCF 03.5 |
|
|
300 |
023A: BSF 1F.0 |
|
|
301 |
.................... setup_spi(SPI_SS_DISABLED); |
|
|
302 |
023B: BCF 14.5 |
|
|
303 |
023C: BCF 20.5 |
|
|
304 |
023D: MOVF 20,W |
|
|
305 |
023E: BSF 03.5 |
|
|
306 |
023F: MOVWF 07 |
|
|
307 |
0240: BCF 03.5 |
|
|
308 |
0241: BSF 20.4 |
|
|
309 |
0242: MOVF 20,W |
|
|
310 |
0243: BSF 03.5 |
|
|
311 |
0244: MOVWF 07 |
|
|
312 |
0245: BCF 03.5 |
|
|
313 |
0246: BCF 20.3 |
|
|
314 |
0247: MOVF 20,W |
|
|
315 |
0248: BSF 03.5 |
|
|
316 |
0249: MOVWF 07 |
|
|
317 |
024A: MOVLW 01 |
|
|
318 |
024B: BCF 03.5 |
|
|
319 |
024C: MOVWF 14 |
|
|
320 |
024D: MOVLW 00 |
|
|
321 |
024E: BSF 03.5 |
|
|
322 |
024F: MOVWF 14 |
|
|
323 |
.................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); |
|
|
324 |
0250: MOVF 01,W |
|
|
325 |
0251: ANDLW C7 |
|
|
326 |
0252: IORLW 08 |
|
|
327 |
0253: MOVWF 01 |
|
|
328 |
.................... setup_timer_1(T1_DISABLED); |
|
|
329 |
0254: BCF 03.5 |
|
|
330 |
0255: CLRF 10 |
|
|
331 |
.................... setup_timer_2(T2_DISABLED,0,1); |
|
|
332 |
0256: MOVLW 00 |
|
|
333 |
0257: MOVWF 78 |
|
|
334 |
0258: MOVWF 12 |
|
|
335 |
0259: MOVLW 00 |
|
|
336 |
025A: BSF 03.5 |
|
|
337 |
025B: MOVWF 12 |
|
|
338 |
.................... setup_ccp1(CCP_OFF); |
|
|
339 |
025C: BCF 03.5 |
|
|
340 |
025D: BSF 20.2 |
|
|
341 |
025E: MOVF 20,W |
|
|
342 |
025F: BSF 03.5 |
|
|
343 |
0260: MOVWF 07 |
|
|
344 |
0261: BCF 03.5 |
|
|
345 |
0262: CLRF 17 |
|
|
346 |
0263: BSF 03.5 |
|
|
347 |
0264: CLRF 1B |
|
|
348 |
0265: CLRF 1C |
|
|
349 |
0266: MOVLW 01 |
|
|
350 |
0267: MOVWF 1D |
|
|
351 |
.................... setup_comparator(NC_NC_NC_NC);// This device COMP currently not supported by the PICWizard |
|
|
352 |
0268: BCF 03.5 |
|
|
353 |
0269: BSF 03.6 |
|
|
354 |
026A: CLRF 07 |
|
|
355 |
026B: CLRF 08 |
|
|
356 |
026C: CLRF 09 |
|
|
357 |
.................... |
|
|
358 |
.................... printf("Simple Thermomether \r\n",); |
|
|
359 |
026D: MOVLW 04 |
|
|
360 |
026E: MOVWF 0D |
|
|
361 |
026F: MOVLW 00 |
|
|
362 |
0270: MOVWF 0F |
|
|
363 |
0271: BCF 03.6 |
|
|
364 |
0272: GOTO 055 |
|
|
365 |
.................... |
|
|
366 |
.................... unsigned int STAV1; |
|
|
367 |
.................... unsigned int data1; |
|
|
368 |
.................... |
|
|
369 |
.................... |
|
|
370 |
.................... while(TRUE) |
|
|
371 |
.................... { |
|
|
372 |
.................... |
|
|
373 |
.................... |
|
|
374 |
.................... |
|
|
375 |
.................... //akcelerometr |
|
|
376 |
.................... int1 ack=0; |
|
|
377 |
0273: BCF 23.0 |
|
|
378 |
.................... i2c_start(); // If the write command is acknowledged, |
|
|
379 |
0274: BSF 20.3 |
|
|
380 |
0275: MOVF 20,W |
|
|
381 |
0276: BSF 03.5 |
|
|
382 |
0277: MOVWF 07 |
|
|
383 |
0278: NOP |
|
|
384 |
0279: BCF 03.5 |
|
|
385 |
027A: BSF 20.4 |
|
|
386 |
027B: MOVF 20,W |
|
|
387 |
027C: BSF 03.5 |
|
|
388 |
027D: MOVWF 07 |
|
|
389 |
027E: NOP |
|
|
390 |
027F: BCF 03.5 |
|
|
391 |
0280: BCF 07.3 |
|
|
392 |
0281: BCF 20.3 |
|
|
393 |
0282: MOVF 20,W |
|
|
394 |
0283: BSF 03.5 |
|
|
395 |
0284: MOVWF 07 |
|
|
396 |
0285: NOP |
|
|
397 |
0286: BCF 03.5 |
|
|
398 |
0287: BCF 07.4 |
|
|
399 |
0288: BCF 20.4 |
|
|
400 |
0289: MOVF 20,W |
|
|
401 |
028A: BSF 03.5 |
|
|
402 |
028B: MOVWF 07 |
|
|
403 |
.................... ack = i2c_write(0xB5);// then the device is ready. |
|
|
404 |
028C: MOVLW B5 |
|
|
405 |
028D: BCF 03.5 |
|
|
406 |
028E: MOVWF 24 |
|
|
407 |
028F: CALL 09D |
|
|
408 |
0290: MOVF 78,W |
|
|
409 |
0291: BCF 23.0 |
|
|
410 |
0292: BTFSC 78.0 |
|
|
411 |
0293: BSF 23.0 |
|
|
412 |
.................... i2c_stop(); |
|
|
413 |
0294: BCF 20.3 |
|
|
414 |
0295: MOVF 20,W |
|
|
415 |
0296: BSF 03.5 |
|
|
416 |
0297: MOVWF 07 |
|
|
417 |
0298: NOP |
|
|
418 |
0299: BCF 03.5 |
|
|
419 |
029A: BSF 20.4 |
|
|
420 |
029B: MOVF 20,W |
|
|
421 |
029C: BSF 03.5 |
|
|
422 |
029D: MOVWF 07 |
|
|
423 |
029E: BCF 03.5 |
|
|
424 |
029F: BTFSS 07.4 |
|
|
425 |
02A0: GOTO 29F |
|
|
426 |
02A1: NOP |
|
|
427 |
02A2: GOTO 2A3 |
|
|
428 |
02A3: NOP |
|
|
429 |
02A4: BSF 20.3 |
|
|
430 |
02A5: MOVF 20,W |
|
|
431 |
02A6: BSF 03.5 |
|
|
432 |
02A7: MOVWF 07 |
|
|
433 |
02A8: NOP |
|
|
434 |
.................... ack=!ack; |
|
|
435 |
02A9: MOVLW 01 |
|
|
436 |
02AA: BCF 03.5 |
|
|
437 |
02AB: XORWF 23,F |
|
|
438 |
.................... |
|
|
439 |
.................... i2c_stop(); |
|
|
440 |
02AC: BCF 20.3 |
|
|
441 |
02AD: MOVF 20,W |
|
|
442 |
02AE: BSF 03.5 |
|
|
443 |
02AF: MOVWF 07 |
|
|
444 |
02B0: NOP |
|
|
445 |
02B1: BCF 03.5 |
|
|
446 |
02B2: BSF 20.4 |
|
|
447 |
02B3: MOVF 20,W |
|
|
448 |
02B4: BSF 03.5 |
|
|
449 |
02B5: MOVWF 07 |
|
|
450 |
02B6: BCF 03.5 |
|
|
451 |
02B7: BTFSS 07.4 |
|
|
452 |
02B8: GOTO 2B7 |
|
|
453 |
02B9: NOP |
|
|
454 |
02BA: GOTO 2BB |
|
|
455 |
02BB: NOP |
|
|
456 |
02BC: BSF 20.3 |
|
|
457 |
02BD: MOVF 20,W |
|
|
458 |
02BE: BSF 03.5 |
|
|
459 |
02BF: MOVWF 07 |
|
|
460 |
02C0: NOP |
|
|
461 |
.................... |
|
|
462 |
.................... i2c_start(); |
|
|
463 |
02C1: BCF 03.5 |
|
|
464 |
02C2: BSF 20.3 |
|
|
465 |
02C3: MOVF 20,W |
|
|
466 |
02C4: BSF 03.5 |
|
|
467 |
02C5: MOVWF 07 |
|
|
468 |
02C6: NOP |
|
|
469 |
02C7: BCF 03.5 |
|
|
470 |
02C8: BSF 20.4 |
|
|
471 |
02C9: MOVF 20,W |
|
|
472 |
02CA: BSF 03.5 |
|
|
473 |
02CB: MOVWF 07 |
|
|
474 |
02CC: NOP |
|
|
475 |
02CD: BCF 03.5 |
|
|
476 |
02CE: BCF 07.3 |
|
|
477 |
02CF: BCF 20.3 |
|
|
478 |
02D0: MOVF 20,W |
|
|
479 |
02D1: BSF 03.5 |
|
|
480 |
02D2: MOVWF 07 |
|
|
481 |
02D3: NOP |
|
|
482 |
02D4: BCF 03.5 |
|
|
483 |
02D5: BCF 07.4 |
|
|
484 |
02D6: BCF 20.4 |
|
|
485 |
02D7: MOVF 20,W |
|
|
486 |
02D8: BSF 03.5 |
|
|
487 |
02D9: MOVWF 07 |
|
|
488 |
.................... I2C_Write(0xB4); |
|
|
489 |
02DA: MOVLW B4 |
|
|
490 |
02DB: BCF 03.5 |
|
|
491 |
02DC: MOVWF 24 |
|
|
492 |
02DD: CALL 09D |
|
|
493 |
.................... I2C_write(0x00); |
|
|
494 |
02DE: CLRF 24 |
|
|
495 |
02DF: CALL 09D |
|
|
496 |
.................... i2c_stop(); |
|
|
497 |
02E0: BCF 20.3 |
|
|
498 |
02E1: MOVF 20,W |
|
|
499 |
02E2: BSF 03.5 |
|
|
500 |
02E3: MOVWF 07 |
|
|
501 |
02E4: NOP |
|
|
502 |
02E5: BCF 03.5 |
|
|
503 |
02E6: BSF 20.4 |
|
|
504 |
02E7: MOVF 20,W |
|
|
505 |
02E8: BSF 03.5 |
|
|
506 |
02E9: MOVWF 07 |
|
|
507 |
02EA: BCF 03.5 |
|
|
508 |
02EB: BTFSS 07.4 |
|
|
509 |
02EC: GOTO 2EB |
|
|
510 |
02ED: NOP |
|
|
511 |
02EE: GOTO 2EF |
|
|
512 |
02EF: NOP |
|
|
513 |
02F0: BSF 20.3 |
|
|
514 |
02F1: MOVF 20,W |
|
|
515 |
02F2: BSF 03.5 |
|
|
516 |
02F3: MOVWF 07 |
|
|
517 |
02F4: NOP |
|
|
518 |
.................... i2c_start(); |
|
|
519 |
02F5: BCF 03.5 |
|
|
520 |
02F6: BSF 20.3 |
|
|
521 |
02F7: MOVF 20,W |
|
|
522 |
02F8: BSF 03.5 |
|
|
523 |
02F9: MOVWF 07 |
|
|
524 |
02FA: NOP |
|
|
525 |
02FB: BCF 03.5 |
|
|
526 |
02FC: BSF 20.4 |
|
|
527 |
02FD: MOVF 20,W |
|
|
528 |
02FE: BSF 03.5 |
|
|
529 |
02FF: MOVWF 07 |
|
|
530 |
0300: NOP |
|
|
531 |
0301: BCF 03.5 |
|
|
532 |
0302: BCF 07.3 |
|
|
533 |
0303: BCF 20.3 |
|
|
534 |
0304: MOVF 20,W |
|
|
535 |
0305: BSF 03.5 |
|
|
536 |
0306: MOVWF 07 |
|
|
537 |
0307: NOP |
|
|
538 |
0308: BCF 03.5 |
|
|
539 |
0309: BCF 07.4 |
|
|
540 |
030A: BCF 20.4 |
|
|
541 |
030B: MOVF 20,W |
|
|
542 |
030C: BSF 03.5 |
|
|
543 |
030D: MOVWF 07 |
|
|
544 |
.................... I2C_Write(0xB5); |
|
|
545 |
030E: MOVLW B5 |
|
|
546 |
030F: BCF 03.5 |
|
|
547 |
0310: MOVWF 24 |
|
|
548 |
0311: CALL 09D |
|
|
549 |
.................... STAV1=i2c_read(0); |
|
|
550 |
0312: CLRF 77 |
|
|
551 |
0313: CALL 0E7 |
|
|
552 |
0314: MOVF 78,W |
|
|
553 |
0315: MOVWF 21 |
|
|
554 |
.................... i2c_stop(); |
|
|
555 |
0316: BCF 20.3 |
|
|
556 |
0317: MOVF 20,W |
|
|
557 |
0318: BSF 03.5 |
|
|
558 |
0319: MOVWF 07 |
|
|
559 |
031A: NOP |
|
|
560 |
031B: BCF 03.5 |
|
|
561 |
031C: BSF 20.4 |
|
|
562 |
031D: MOVF 20,W |
|
|
563 |
031E: BSF 03.5 |
|
|
564 |
031F: MOVWF 07 |
|
|
565 |
0320: BCF 03.5 |
|
|
566 |
0321: BTFSS 07.4 |
|
|
567 |
0322: GOTO 321 |
|
|
568 |
0323: NOP |
|
|
569 |
0324: GOTO 325 |
|
|
570 |
0325: NOP |
|
|
571 |
0326: BSF 20.3 |
|
|
572 |
0327: MOVF 20,W |
|
|
573 |
0328: BSF 03.5 |
|
|
574 |
0329: MOVWF 07 |
|
|
575 |
032A: NOP |
|
|
576 |
.................... |
|
|
577 |
.................... i2c_start(); |
|
|
578 |
032B: BCF 03.5 |
|
|
579 |
032C: BSF 20.3 |
|
|
580 |
032D: MOVF 20,W |
|
|
581 |
032E: BSF 03.5 |
|
|
582 |
032F: MOVWF 07 |
|
|
583 |
0330: NOP |
|
|
584 |
0331: BCF 03.5 |
|
|
585 |
0332: BSF 20.4 |
|
|
586 |
0333: MOVF 20,W |
|
|
587 |
0334: BSF 03.5 |
|
|
588 |
0335: MOVWF 07 |
|
|
589 |
0336: NOP |
|
|
590 |
0337: BCF 03.5 |
|
|
591 |
0338: BCF 07.3 |
|
|
592 |
0339: BCF 20.3 |
|
|
593 |
033A: MOVF 20,W |
|
|
594 |
033B: BSF 03.5 |
|
|
595 |
033C: MOVWF 07 |
|
|
596 |
033D: NOP |
|
|
597 |
033E: BCF 03.5 |
|
|
598 |
033F: BCF 07.4 |
|
|
599 |
0340: BCF 20.4 |
|
|
600 |
0341: MOVF 20,W |
|
|
601 |
0342: BSF 03.5 |
|
|
602 |
0343: MOVWF 07 |
|
|
603 |
.................... I2C_Write(0xB4); |
|
|
604 |
0344: MOVLW B4 |
|
|
605 |
0345: BCF 03.5 |
|
|
606 |
0346: MOVWF 24 |
|
|
607 |
0347: CALL 09D |
|
|
608 |
.................... I2C_write(0x01); |
|
|
609 |
0348: MOVLW 01 |
|
|
610 |
0349: MOVWF 24 |
|
|
611 |
034A: CALL 09D |
|
|
612 |
.................... i2c_stop(); |
|
|
613 |
034B: BCF 20.3 |
|
|
614 |
034C: MOVF 20,W |
|
|
615 |
034D: BSF 03.5 |
|
|
616 |
034E: MOVWF 07 |
|
|
617 |
034F: NOP |
|
|
618 |
0350: BCF 03.5 |
|
|
619 |
0351: BSF 20.4 |
|
|
620 |
0352: MOVF 20,W |
|
|
621 |
0353: BSF 03.5 |
|
|
622 |
0354: MOVWF 07 |
|
|
623 |
0355: BCF 03.5 |
|
|
624 |
0356: BTFSS 07.4 |
|
|
625 |
0357: GOTO 356 |
|
|
626 |
0358: NOP |
|
|
627 |
0359: GOTO 35A |
|
|
628 |
035A: NOP |
|
|
629 |
035B: BSF 20.3 |
|
|
630 |
035C: MOVF 20,W |
|
|
631 |
035D: BSF 03.5 |
|
|
632 |
035E: MOVWF 07 |
|
|
633 |
035F: NOP |
|
|
634 |
.................... i2c_start(); |
|
|
635 |
0360: BCF 03.5 |
|
|
636 |
0361: BSF 20.3 |
|
|
637 |
0362: MOVF 20,W |
|
|
638 |
0363: BSF 03.5 |
|
|
639 |
0364: MOVWF 07 |
|
|
640 |
0365: NOP |
|
|
641 |
0366: BCF 03.5 |
|
|
642 |
0367: BSF 20.4 |
|
|
643 |
0368: MOVF 20,W |
|
|
644 |
0369: BSF 03.5 |
|
|
645 |
036A: MOVWF 07 |
|
|
646 |
036B: NOP |
|
|
647 |
036C: BCF 03.5 |
|
|
648 |
036D: BCF 07.3 |
|
|
649 |
036E: BCF 20.3 |
|
|
650 |
036F: MOVF 20,W |
|
|
651 |
0370: BSF 03.5 |
|
|
652 |
0371: MOVWF 07 |
|
|
653 |
0372: NOP |
|
|
654 |
0373: BCF 03.5 |
|
|
655 |
0374: BCF 07.4 |
|
|
656 |
0375: BCF 20.4 |
|
|
657 |
0376: MOVF 20,W |
|
|
658 |
0377: BSF 03.5 |
|
|
659 |
0378: MOVWF 07 |
|
|
660 |
.................... I2C_Write(0xB5); |
|
|
661 |
0379: MOVLW B5 |
|
|
662 |
037A: BCF 03.5 |
|
|
663 |
037B: MOVWF 24 |
|
|
664 |
037C: CALL 09D |
|
|
665 |
.................... data1=i2c_read(0); |
|
|
666 |
037D: CLRF 77 |
|
|
667 |
037E: CALL 0E7 |
|
|
668 |
037F: MOVF 78,W |
|
|
669 |
0380: MOVWF 22 |
|
|
670 |
.................... i2c_stop(); |
|
|
671 |
0381: BCF 20.3 |
|
|
672 |
0382: MOVF 20,W |
|
|
673 |
0383: BSF 03.5 |
|
|
674 |
0384: MOVWF 07 |
|
|
675 |
0385: NOP |
|
|
676 |
0386: BCF 03.5 |
|
|
677 |
0387: BSF 20.4 |
|
|
678 |
0388: MOVF 20,W |
|
|
679 |
0389: BSF 03.5 |
|
|
680 |
038A: MOVWF 07 |
|
|
681 |
038B: BCF 03.5 |
|
|
682 |
038C: BTFSS 07.4 |
|
|
683 |
038D: GOTO 38C |
|
|
684 |
038E: NOP |
|
|
685 |
038F: GOTO 390 |
|
|
686 |
0390: NOP |
|
|
687 |
0391: BSF 20.3 |
|
|
688 |
0392: MOVF 20,W |
|
|
689 |
0393: BSF 03.5 |
|
|
690 |
0394: MOVWF 07 |
|
|
691 |
0395: NOP |
|
|
692 |
.................... |
|
|
693 |
.................... |
|
|
694 |
.................... |
|
|
695 |
.................... |
|
|
696 |
.................... printf("Stav: %d (procenta)\r\n", ack); |
|
|
697 |
0396: MOVLW 00 |
|
|
698 |
0397: BCF 03.5 |
|
|
699 |
0398: BTFSC 23.0 |
|
|
700 |
0399: MOVLW 01 |
|
|
701 |
039A: MOVWF 24 |
|
|
702 |
039B: MOVLW 10 |
|
|
703 |
039C: BSF 03.6 |
|
|
704 |
039D: MOVWF 0D |
|
|
705 |
039E: MOVLW 00 |
|
|
706 |
039F: MOVWF 0F |
|
|
707 |
03A0: BCF 03.0 |
|
|
708 |
03A1: MOVLW 06 |
|
|
709 |
03A2: BCF 03.6 |
|
|
710 |
03A3: MOVWF 25 |
|
|
711 |
03A4: CALL 12C |
|
|
712 |
03A5: MOVF 24,W |
|
|
713 |
03A6: MOVWF 25 |
|
|
714 |
03A7: MOVLW 1F |
|
|
715 |
03A8: MOVWF 26 |
|
|
716 |
03A9: CALL 190 |
|
|
717 |
03AA: MOVLW 14 |
|
|
718 |
03AB: BSF 03.6 |
|
|
719 |
03AC: MOVWF 0D |
|
|
720 |
03AD: MOVLW 00 |
|
|
721 |
03AE: MOVWF 0F |
|
|
722 |
03AF: BCF 03.0 |
|
|
723 |
03B0: MOVLW 0D |
|
|
724 |
03B1: BCF 03.6 |
|
|
725 |
03B2: MOVWF 25 |
|
|
726 |
03B3: CALL 12C |
|
|
727 |
.................... printf("Stav00: %d (procenta)\r\n", STAV1); |
|
|
728 |
03B4: MOVLW 1B |
|
|
729 |
03B5: BSF 03.6 |
|
|
730 |
03B6: MOVWF 0D |
|
|
731 |
03B7: MOVLW 00 |
|
|
732 |
03B8: MOVWF 0F |
|
|
733 |
03B9: BCF 03.0 |
|
|
734 |
03BA: MOVLW 08 |
|
|
735 |
03BB: BCF 03.6 |
|
|
736 |
03BC: MOVWF 25 |
|
|
737 |
03BD: CALL 12C |
|
|
738 |
03BE: MOVF 21,W |
|
|
739 |
03BF: MOVWF 25 |
|
|
740 |
03C0: MOVLW 1F |
|
|
741 |
03C1: MOVWF 26 |
|
|
742 |
03C2: CALL 190 |
|
|
743 |
03C3: MOVLW 20 |
|
|
744 |
03C4: BSF 03.6 |
|
|
745 |
03C5: MOVWF 0D |
|
|
746 |
03C6: MOVLW 00 |
|
|
747 |
03C7: MOVWF 0F |
|
|
748 |
03C8: BCF 03.0 |
|
|
749 |
03C9: MOVLW 0D |
|
|
750 |
03CA: BCF 03.6 |
|
|
751 |
03CB: MOVWF 25 |
|
|
752 |
03CC: CALL 12C |
|
|
753 |
.................... printf("Stav01: %d (procenta)\r\n", data1); |
|
|
754 |
03CD: MOVLW 27 |
|
|
755 |
03CE: BSF 03.6 |
|
|
756 |
03CF: MOVWF 0D |
|
|
757 |
03D0: MOVLW 00 |
|
|
758 |
03D1: MOVWF 0F |
|
|
759 |
03D2: BCF 03.0 |
|
|
760 |
03D3: MOVLW 08 |
|
|
761 |
03D4: BCF 03.6 |
|
|
762 |
03D5: MOVWF 25 |
|
|
763 |
03D6: CALL 12C |
|
|
764 |
03D7: MOVF 22,W |
|
|
765 |
03D8: MOVWF 25 |
|
|
766 |
03D9: MOVLW 1F |
|
|
767 |
03DA: MOVWF 26 |
|
|
768 |
03DB: CALL 190 |
|
|
769 |
03DC: MOVLW 2C |
|
|
770 |
03DD: BSF 03.6 |
|
|
771 |
03DE: MOVWF 0D |
|
|
772 |
03DF: MOVLW 00 |
|
|
773 |
03E0: MOVWF 0F |
|
|
774 |
03E1: BCF 03.0 |
|
|
775 |
03E2: MOVLW 0D |
|
|
776 |
03E3: BCF 03.6 |
|
|
777 |
03E4: MOVWF 25 |
|
|
778 |
03E5: CALL 12C |
|
|
779 |
.................... delay_ms(500); |
|
|
780 |
03E6: MOVLW 02 |
|
|
781 |
03E7: MOVWF 24 |
|
|
782 |
03E8: MOVLW FA |
|
|
783 |
03E9: MOVWF 25 |
|
|
784 |
03EA: GOTO 1F5 |
|
|
785 |
03EB: DECFSZ 24,F |
|
|
786 |
03EC: GOTO 3E8 |
|
|
787 |
.................... } |
|
|
788 |
03ED: GOTO 273 |
|
|
789 |
.................... } |
|
|
790 |
03EE: SLEEP |
|
|
791 |
|
|
|
792 |
Configuration Fuses: |
|
|
793 |
Word 1: 2CF4 INTRC_IO NOWDT NOPUT MCLR NOPROTECT NOCPD NOBROWNOUT IESO FCMEN NOLVP NODEBUG |
|
|
794 |
Word 2: 3FFF NOWRT BORV40 |