Rev Author Line No. Line
1045 jacho 1 CCS PCM C Compiler, Version 4.106, 47914 23-4-13 03:00
2  
3 Filename: C:\Users\Honza\Documents\pic\I2C_HUB\main.lst
4  
5 ROM used: 2678 words (33%)
6 Largest free fragment is 2048
7 RAM used: 8 (2%) at main() level
8 42 (11%) worst case
9 Stack: 2 locations
10  
11 *
12 0000: MOVLW 08
13 0001: MOVWF 0A
14 0002: GOTO 000
15 0003: NOP
16 .................... #include "C:\Users\Honza\Documents\pic\I2C_HUB\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 //Internal RC Osc
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 0160: MOVLW 3C
41 0161: MOVWF 04
42 0162: BCF 03.7
43 0163: MOVF 00,W
44 0164: BTFSC 03.2
45 0165: GOTO 173
46 0166: MOVLW 02
47 0167: MOVWF 78
48 0168: CLRF 77
49 0169: DECFSZ 77,F
50 016A: GOTO 169
51 016B: DECFSZ 78,F
52 016C: GOTO 168
53 016D: MOVLW 97
54 016E: MOVWF 77
55 016F: DECFSZ 77,F
56 0170: GOTO 16F
57 0171: DECFSZ 00,F
58 0172: GOTO 166
59 0173: RETURN
60 ....................
61 ....................
62 ....................
63 ....................
64 .................... //For AKCE
65 .................... //ADRESA pro èteni 0xE1
66 .................... //pro zápis 0xE0
67 ....................
68 ....................
69 .................... #define EEPROM_SDA PIN_C4
70 .................... #define EEPROM_SCL PIN_C3
71 .................... #use i2c(master, sda=EEPROM_SDA, scl=EEPROM_SCL)
72 *
73 00D1: MOVLW 08
74 00D2: MOVWF 78
75 00D3: NOP
76 00D4: BCF 07.3
77 00D5: BCF 20.3
78 00D6: MOVF 20,W
79 00D7: BSF 03.5
80 00D8: MOVWF 07
81 00D9: NOP
82 00DA: BCF 03.5
83 00DB: RLF 3B,F
84 00DC: BCF 07.4
85 00DD: BTFSS 03.0
86 00DE: GOTO 0E5
87 00DF: BSF 20.4
88 00E0: MOVF 20,W
89 00E1: BSF 03.5
90 00E2: MOVWF 07
91 00E3: GOTO 0E9
92 00E4: BCF 03.5
93 00E5: BCF 20.4
94 00E6: MOVF 20,W
95 00E7: BSF 03.5
96 00E8: MOVWF 07
97 00E9: NOP
98 00EA: BCF 03.5
99 00EB: BSF 20.3
100 00EC: MOVF 20,W
101 00ED: BSF 03.5
102 00EE: MOVWF 07
103 00EF: BCF 03.5
104 00F0: BTFSS 07.3
105 00F1: GOTO 0F0
106 00F2: DECFSZ 78,F
107 00F3: GOTO 0D3
108 00F4: NOP
109 00F5: BCF 07.3
110 00F6: BCF 20.3
111 00F7: MOVF 20,W
112 00F8: BSF 03.5
113 00F9: MOVWF 07
114 00FA: NOP
115 00FB: BCF 03.5
116 00FC: BSF 20.4
117 00FD: MOVF 20,W
118 00FE: BSF 03.5
119 00FF: MOVWF 07
120 0100: NOP
121 0101: NOP
122 0102: BCF 03.5
123 0103: BSF 20.3
124 0104: MOVF 20,W
125 0105: BSF 03.5
126 0106: MOVWF 07
127 0107: BCF 03.5
128 0108: BTFSS 07.3
129 0109: GOTO 108
130 010A: CLRF 78
131 010B: NOP
132 010C: BTFSC 07.4
133 010D: BSF 78.0
134 010E: BCF 07.3
135 010F: BCF 20.3
136 0110: MOVF 20,W
137 0111: BSF 03.5
138 0112: MOVWF 07
139 0113: BCF 03.5
140 0114: BCF 07.4
141 0115: BCF 20.4
142 0116: MOVF 20,W
143 0117: BSF 03.5
144 0118: MOVWF 07
145 0119: BCF 03.5
146 011A: RETURN
147 011B: MOVLW 08
148 011C: MOVWF 3C
149 011D: MOVF 77,W
150 011E: MOVWF 3D
151 011F: BSF 20.4
152 0120: MOVF 20,W
153 0121: BSF 03.5
154 0122: MOVWF 07
155 0123: NOP
156 0124: BCF 03.5
157 0125: BSF 20.3
158 0126: MOVF 20,W
159 0127: BSF 03.5
160 0128: MOVWF 07
161 0129: BCF 03.5
162 012A: BTFSS 07.3
163 012B: GOTO 12A
164 012C: BTFSC 07.4
165 012D: BSF 03.0
166 012E: BTFSS 07.4
167 012F: BCF 03.0
168 0130: RLF 78,F
169 0131: NOP
170 0132: BCF 20.3
171 0133: MOVF 20,W
172 0134: BSF 03.5
173 0135: MOVWF 07
174 0136: BCF 03.5
175 0137: BCF 07.3
176 0138: DECFSZ 3C,F
177 0139: GOTO 11F
178 013A: BSF 20.4
179 013B: MOVF 20,W
180 013C: BSF 03.5
181 013D: MOVWF 07
182 013E: NOP
183 013F: BCF 03.5
184 0140: BCF 07.4
185 0141: MOVF 3D,W
186 0142: BTFSC 03.2
187 0143: GOTO 149
188 0144: BCF 20.4
189 0145: MOVF 20,W
190 0146: BSF 03.5
191 0147: MOVWF 07
192 0148: BCF 03.5
193 0149: NOP
194 014A: BSF 20.3
195 014B: MOVF 20,W
196 014C: BSF 03.5
197 014D: MOVWF 07
198 014E: BCF 03.5
199 014F: BTFSS 07.3
200 0150: GOTO 14F
201 0151: NOP
202 0152: BCF 07.3
203 0153: BCF 20.3
204 0154: MOVF 20,W
205 0155: BSF 03.5
206 0156: MOVWF 07
207 0157: NOP
208 0158: BCF 03.5
209 0159: BCF 07.4
210 015A: BCF 20.4
211 015B: MOVF 20,W
212 015C: BSF 03.5
213 015D: MOVWF 07
214 015E: BCF 03.5
215 015F: RETURN
216 .................... #use rs232(baud=9600,parity=N,xmit=PIN_C7,rcv=PIN_C6,bits=8) //rcv TXD xmit RXD
217 *
218 0065: BCF 20.7
219 0066: MOVF 20,W
220 0067: BSF 03.5
221 0068: MOVWF 07
222 0069: BCF 03.5
223 006A: BCF 07.7
224 006B: MOVLW 08
225 006C: MOVWF 78
226 006D: GOTO 06E
227 006E: NOP
228 006F: BSF 78.7
229 0070: GOTO 07F
230 0071: BCF 78.7
231 0072: RRF 44,F
232 0073: BTFSC 03.0
233 0074: BSF 07.7
234 0075: BTFSS 03.0
235 0076: BCF 07.7
236 0077: BSF 78.6
237 0078: GOTO 07F
238 0079: BCF 78.6
239 007A: DECFSZ 78,F
240 007B: GOTO 072
241 007C: GOTO 07D
242 007D: NOP
243 007E: BSF 07.7
244 007F: MOVLW 3F
245 0080: MOVWF 04
246 0081: DECFSZ 04,F
247 0082: GOTO 081
248 0083: NOP
249 0084: BTFSC 78.7
250 0085: GOTO 071
251 0086: BTFSC 78.6
252 0087: GOTO 079
253 0088: RETURN
254 ....................
255 ....................
256 ....................
257 .................... void main()
258 .................... {
259 *
260 0064: DATA 00,00
261 *
262 0800: CLRF 04
263 0801: BCF 03.7
264 0802: MOVLW 1F
265 0803: ANDWF 03,F
266 0804: MOVLW 71
267 0805: BSF 03.5
268 0806: MOVWF 0F
269 0807: MOVF 0F,W
270 0808: BCF 03.5
271 0809: BCF 20.7
272 080A: MOVF 20,W
273 080B: BSF 03.5
274 080C: MOVWF 07
275 080D: BCF 03.5
276 080E: BSF 07.7
277 080F: BSF 03.5
278 0810: BSF 03.6
279 0811: MOVF 09,W
280 0812: ANDLW C0
281 0813: MOVWF 09
282 0814: BCF 03.6
283 0815: BCF 1F.4
284 0816: BCF 1F.5
285 0817: MOVLW 00
286 0818: BSF 03.6
287 0819: MOVWF 08
288 081A: BCF 03.5
289 081B: CLRF 07
290 081C: CLRF 08
291 081D: CLRF 09
292 ....................
293 .................... setup_adc_ports(NO_ANALOGS|VSS_VDD);
294 *
295 0821: BSF 03.5
296 0822: BSF 03.6
297 0823: MOVF 09,W
298 0824: ANDLW C0
299 0825: MOVWF 09
300 0826: BCF 03.6
301 0827: BCF 1F.4
302 0828: BCF 1F.5
303 0829: MOVLW 00
304 082A: BSF 03.6
305 082B: MOVWF 08
306 .................... setup_adc(ADC_CLOCK_DIV_2);
307 082C: BCF 03.5
308 082D: BCF 03.6
309 082E: BCF 1F.6
310 082F: BCF 1F.7
311 0830: BSF 03.5
312 0831: BCF 1F.7
313 0832: BCF 03.5
314 0833: BSF 1F.0
315 .................... setup_spi(SPI_SS_DISABLED);
316 0834: BCF 14.5
317 0835: BCF 20.5
318 0836: MOVF 20,W
319 0837: BSF 03.5
320 0838: MOVWF 07
321 0839: BCF 03.5
322 083A: BSF 20.4
323 083B: MOVF 20,W
324 083C: BSF 03.5
325 083D: MOVWF 07
326 083E: BCF 03.5
327 083F: BCF 20.3
328 0840: MOVF 20,W
329 0841: BSF 03.5
330 0842: MOVWF 07
331 0843: MOVLW 01
332 0844: BCF 03.5
333 0845: MOVWF 14
334 0846: MOVLW 00
335 0847: BSF 03.5
336 0848: MOVWF 14
337 .................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
338 0849: MOVF 01,W
339 084A: ANDLW C7
340 084B: IORLW 08
341 084C: MOVWF 01
342 .................... setup_timer_1(T1_DISABLED);
343 084D: BCF 03.5
344 084E: CLRF 10
345 .................... setup_timer_2(T2_DISABLED,0,1);
346 084F: MOVLW 00
347 0850: MOVWF 78
348 0851: MOVWF 12
349 0852: MOVLW 00
350 0853: BSF 03.5
351 0854: MOVWF 12
352 .................... setup_ccp1(CCP_OFF);
353 0855: BCF 03.5
354 0856: BSF 20.2
355 0857: MOVF 20,W
356 0858: BSF 03.5
357 0859: MOVWF 07
358 085A: BCF 03.5
359 085B: CLRF 17
360 085C: BSF 03.5
361 085D: CLRF 1B
362 085E: CLRF 1C
363 085F: MOVLW 01
364 0860: MOVWF 1D
365 .................... setup_comparator(NC_NC_NC_NC);// This device COMP currently not supported by the PICWizard
366 0861: BCF 03.5
367 0862: BSF 03.6
368 0863: CLRF 07
369 0864: CLRF 08
370 0865: CLRF 09
371 ....................
372 .................... printf("Simple Thermomether \r\n",);
373 0866: MOVLW 04
374 0867: MOVWF 0D
375 0868: MOVLW 00
376 0869: MOVWF 0F
377 086A: BCF 0A.3
378 086B: BCF 03.6
379 086C: GOTO 089
380 086D: BSF 0A.3
381 ....................
382 .................... unsigned int8 INTEP,INTEP1, NAP,NAP1, PROUD,PROUD1,KAPZ,KAPZ1,KAPC,KAPC1, STAV,STAV1;
383 ....................
384 ....................
385 ....................
386 .................... int16 data4;
387 .................... int16 data5;
388 .................... int16 data6;
389 .................... int16 data7;
390 .................... int16 data8;
391 .................... int16 data9;
392 ....................
393 .................... byte XH;
394 ....................
395 ....................
396 ....................
397 ....................
398 ....................
399 .................... while(TRUE)
400 .................... {
401 ....................
402 ....................
403 ....................
404 ....................
405 .................... //akcelerometr
406 .................... int1 ack;
407 .................... i2c_start(); // If the write command is acknowledged,
408 086E: BSF 20.4
409 086F: MOVF 20,W
410 0870: BSF 03.5
411 0871: MOVWF 07
412 0872: NOP
413 0873: BCF 03.5
414 0874: BSF 20.3
415 0875: MOVF 20,W
416 0876: BSF 03.5
417 0877: MOVWF 07
418 0878: NOP
419 0879: BCF 03.5
420 087A: BCF 07.4
421 087B: BCF 20.4
422 087C: MOVF 20,W
423 087D: BSF 03.5
424 087E: MOVWF 07
425 087F: NOP
426 0880: BCF 03.5
427 0881: BCF 07.3
428 0882: BCF 20.3
429 0883: MOVF 20,W
430 0884: BSF 03.5
431 0885: MOVWF 07
432 .................... ack = i2c_write(0xE1);//hen the device is ready.
433 0886: MOVLW E1
434 0887: BCF 03.5
435 0888: MOVWF 3B
436 0889: BCF 0A.3
437 088A: CALL 0D1
438 088B: BSF 0A.3
439 088C: MOVF 78,W
440 088D: BCF 3A.0
441 088E: BTFSC 78.0
442 088F: BSF 3A.0
443 .................... i2c_stop();
444 0890: BCF 20.4
445 0891: MOVF 20,W
446 0892: BSF 03.5
447 0893: MOVWF 07
448 0894: NOP
449 0895: BCF 03.5
450 0896: BSF 20.3
451 0897: MOVF 20,W
452 0898: BSF 03.5
453 0899: MOVWF 07
454 089A: BCF 03.5
455 089B: BTFSS 07.3
456 089C: GOTO 09B
457 089D: NOP
458 089E: GOTO 09F
459 089F: NOP
460 08A0: BSF 20.4
461 08A1: MOVF 20,W
462 08A2: BSF 03.5
463 08A3: MOVWF 07
464 08A4: NOP
465 .................... ack=!ack;
466 08A5: MOVLW 01
467 08A6: BCF 03.5
468 08A7: XORWF 3A,F
469 ....................
470 ....................
471 .................... i2c_start();
472 08A8: BSF 20.4
473 08A9: MOVF 20,W
474 08AA: BSF 03.5
475 08AB: MOVWF 07
476 08AC: NOP
477 08AD: BCF 03.5
478 08AE: BSF 20.3
479 08AF: MOVF 20,W
480 08B0: BSF 03.5
481 08B1: MOVWF 07
482 08B2: NOP
483 08B3: BCF 03.5
484 08B4: BCF 07.4
485 08B5: BCF 20.4
486 08B6: MOVF 20,W
487 08B7: BSF 03.5
488 08B8: MOVWF 07
489 08B9: NOP
490 08BA: BCF 03.5
491 08BB: BCF 07.3
492 08BC: BCF 20.3
493 08BD: MOVF 20,W
494 08BE: BSF 03.5
495 08BF: MOVWF 07
496 .................... I2C_Write(0xE0);
497 08C0: MOVLW E0
498 08C1: BCF 03.5
499 08C2: MOVWF 3B
500 08C3: BCF 0A.3
501 08C4: CALL 0D1
502 08C5: BSF 0A.3
503 ....................
504 .................... I2C_write(0x80);
505 08C6: MOVLW 80
506 08C7: MOVWF 3B
507 08C8: BCF 0A.3
508 08C9: CALL 0D1
509 08CA: BSF 0A.3
510 .................... i2c_stop();
511 08CB: BCF 20.4
512 08CC: MOVF 20,W
513 08CD: BSF 03.5
514 08CE: MOVWF 07
515 08CF: NOP
516 08D0: BCF 03.5
517 08D1: BSF 20.3
518 08D2: MOVF 20,W
519 08D3: BSF 03.5
520 08D4: MOVWF 07
521 08D5: BCF 03.5
522 08D6: BTFSS 07.3
523 08D7: GOTO 0D6
524 08D8: NOP
525 08D9: GOTO 0DA
526 08DA: NOP
527 08DB: BSF 20.4
528 08DC: MOVF 20,W
529 08DD: BSF 03.5
530 08DE: MOVWF 07
531 08DF: NOP
532 ....................
533 .................... i2c_start();
534 08E0: BCF 03.5
535 08E1: BSF 20.4
536 08E2: MOVF 20,W
537 08E3: BSF 03.5
538 08E4: MOVWF 07
539 08E5: NOP
540 08E6: BCF 03.5
541 08E7: BSF 20.3
542 08E8: MOVF 20,W
543 08E9: BSF 03.5
544 08EA: MOVWF 07
545 08EB: NOP
546 08EC: BCF 03.5
547 08ED: BCF 07.4
548 08EE: BCF 20.4
549 08EF: MOVF 20,W
550 08F0: BSF 03.5
551 08F1: MOVWF 07
552 08F2: NOP
553 08F3: BCF 03.5
554 08F4: BCF 07.3
555 08F5: BCF 20.3
556 08F6: MOVF 20,W
557 08F7: BSF 03.5
558 08F8: MOVWF 07
559 .................... I2C_Write(0xE1);
560 08F9: MOVLW E1
561 08FA: BCF 03.5
562 08FB: MOVWF 3B
563 08FC: BCF 0A.3
564 08FD: CALL 0D1
565 08FE: BSF 0A.3
566 .................... XH=i2c_read();
567 08FF: MOVLW 01
568 0900: MOVWF 77
569 0901: BCF 0A.3
570 0902: CALL 11B
571 0903: BSF 0A.3
572 0904: MOVF 78,W
573 0905: MOVWF 39
574 .................... i2c_stop();
575 0906: BCF 20.4
576 0907: MOVF 20,W
577 0908: BSF 03.5
578 0909: MOVWF 07
579 090A: NOP
580 090B: BCF 03.5
581 090C: BSF 20.3
582 090D: MOVF 20,W
583 090E: BSF 03.5
584 090F: MOVWF 07
585 0910: BCF 03.5
586 0911: BTFSS 07.3
587 0912: GOTO 111
588 0913: NOP
589 0914: GOTO 115
590 0915: NOP
591 0916: BSF 20.4
592 0917: MOVF 20,W
593 0918: BSF 03.5
594 0919: MOVWF 07
595 091A: NOP
596 ....................
597 .................... delay_ms(1000);
598 091B: MOVLW 04
599 091C: BCF 03.5
600 091D: MOVWF 3B
601 091E: MOVLW FA
602 091F: MOVWF 3C
603 0920: BCF 0A.3
604 0921: CALL 160
605 0922: BSF 0A.3
606 0923: DECFSZ 3B,F
607 0924: GOTO 11E
608 ....................
609 ....................
610 .................... //printf("Stav: %d (procenta)\r\n", ack);
611 ....................
612 .................... printf("Stavx: %X(procenta)\r\n", XH);
613 0925: MOVLW 10
614 0926: BSF 03.6
615 0927: MOVWF 0D
616 0928: MOVLW 00
617 0929: MOVWF 0F
618 092A: BCF 03.0
619 092B: MOVLW 07
620 092C: BCF 03.6
621 092D: MOVWF 3B
622 092E: BCF 0A.3
623 092F: CALL 174
624 0930: BSF 0A.3
625 0931: MOVF 39,W
626 0932: MOVWF 3B
627 0933: MOVLW 37
628 0934: MOVWF 3C
629 0935: BCF 0A.3
630 0936: GOTO 1C3
631 0937: BSF 0A.3
632 0938: MOVLW 14
633 0939: BSF 03.6
634 093A: MOVWF 0D
635 093B: MOVLW 00
636 093C: MOVWF 0F
637 093D: BSF 03.0
638 093E: MOVLW 0C
639 093F: BCF 03.6
640 0940: MOVWF 3B
641 0941: BCF 0A.3
642 0942: CALL 174
643 0943: BSF 0A.3
644 ....................
645 ....................
646 ....................
647 ....................
648 ....................
649 ....................
650 .................... i2c_start();
651 0944: BSF 20.4
652 0945: MOVF 20,W
653 0946: BSF 03.5
654 0947: MOVWF 07
655 0948: NOP
656 0949: BCF 03.5
657 094A: BSF 20.3
658 094B: MOVF 20,W
659 094C: BSF 03.5
660 094D: MOVWF 07
661 094E: NOP
662 094F: BCF 03.5
663 0950: BCF 07.4
664 0951: BCF 20.4
665 0952: MOVF 20,W
666 0953: BSF 03.5
667 0954: MOVWF 07
668 0955: NOP
669 0956: BCF 03.5
670 0957: BCF 07.3
671 0958: BCF 20.3
672 0959: MOVF 20,W
673 095A: BSF 03.5
674 095B: MOVWF 07
675 .................... I2C_Write(0xE0);
676 095C: MOVLW E0
677 095D: BCF 03.5
678 095E: MOVWF 3B
679 095F: BCF 0A.3
680 0960: CALL 0D1
681 0961: BSF 0A.3
682 ....................
683 .................... I2C_write(0x01);
684 0962: MOVLW 01
685 0963: MOVWF 3B
686 0964: BCF 0A.3
687 0965: CALL 0D1
688 0966: BSF 0A.3
689 .................... i2c_stop();
690 0967: BCF 20.4
691 0968: MOVF 20,W
692 0969: BSF 03.5
693 096A: MOVWF 07
694 096B: NOP
695 096C: BCF 03.5
696 096D: BSF 20.3
697 096E: MOVF 20,W
698 096F: BSF 03.5
699 0970: MOVWF 07
700 0971: BCF 03.5
701 0972: BTFSS 07.3
702 0973: GOTO 172
703 0974: NOP
704 0975: GOTO 176
705 0976: NOP
706 0977: BSF 20.4
707 0978: MOVF 20,W
708 0979: BSF 03.5
709 097A: MOVWF 07
710 097B: NOP
711 ....................
712 ....................
713 ....................
714 ....................
715 ....................
716 ....................
717 ....................
718 .................... i2c_start();
719 097C: BCF 03.5
720 097D: BSF 20.4
721 097E: MOVF 20,W
722 097F: BSF 03.5
723 0980: MOVWF 07
724 0981: NOP
725 0982: BCF 03.5
726 0983: BSF 20.3
727 0984: MOVF 20,W
728 0985: BSF 03.5
729 0986: MOVWF 07
730 0987: NOP
731 0988: BCF 03.5
732 0989: BCF 07.4
733 098A: BCF 20.4
734 098B: MOVF 20,W
735 098C: BSF 03.5
736 098D: MOVWF 07
737 098E: NOP
738 098F: BCF 03.5
739 0990: BCF 07.3
740 0991: BCF 20.3
741 0992: MOVF 20,W
742 0993: BSF 03.5
743 0994: MOVWF 07
744 .................... I2C_Write(0xAA);
745 0995: MOVLW AA
746 0996: BCF 03.5
747 0997: MOVWF 3B
748 0998: BCF 0A.3
749 0999: CALL 0D1
750 099A: BSF 0A.3
751 .................... I2C_write(0x0c);
752 099B: MOVLW 0C
753 099C: MOVWF 3B
754 099D: BCF 0A.3
755 099E: CALL 0D1
756 099F: BSF 0A.3
757 ....................
758 .................... i2c_start();
759 09A0: BSF 20.4
760 09A1: MOVF 20,W
761 09A2: BSF 03.5
762 09A3: MOVWF 07
763 09A4: NOP
764 09A5: BCF 03.5
765 09A6: BSF 20.3
766 09A7: MOVF 20,W
767 09A8: BSF 03.5
768 09A9: MOVWF 07
769 09AA: NOP
770 09AB: BCF 03.5
771 09AC: BTFSS 07.3
772 09AD: GOTO 1AC
773 09AE: BCF 07.4
774 09AF: BCF 20.4
775 09B0: MOVF 20,W
776 09B1: BSF 03.5
777 09B2: MOVWF 07
778 09B3: NOP
779 09B4: BCF 03.5
780 09B5: BCF 07.3
781 09B6: BCF 20.3
782 09B7: MOVF 20,W
783 09B8: BSF 03.5
784 09B9: MOVWF 07
785 .................... I2C_Write(0xAB);
786 09BA: MOVLW AB
787 09BB: BCF 03.5
788 09BC: MOVWF 3B
789 09BD: BCF 0A.3
790 09BE: CALL 0D1
791 09BF: BSF 0A.3
792 .................... INTEP=i2c_read(0);
793 09C0: CLRF 77
794 09C1: BCF 0A.3
795 09C2: CALL 11B
796 09C3: BSF 0A.3
797 09C4: MOVF 78,W
798 09C5: MOVWF 21
799 .................... i2c_stop();
800 09C6: BCF 20.4
801 09C7: MOVF 20,W
802 09C8: BSF 03.5
803 09C9: MOVWF 07
804 09CA: NOP
805 09CB: BCF 03.5
806 09CC: BSF 20.3
807 09CD: MOVF 20,W
808 09CE: BSF 03.5
809 09CF: MOVWF 07
810 09D0: BCF 03.5
811 09D1: BTFSS 07.3
812 09D2: GOTO 1D1
813 09D3: NOP
814 09D4: GOTO 1D5
815 09D5: NOP
816 09D6: BSF 20.4
817 09D7: MOVF 20,W
818 09D8: BSF 03.5
819 09D9: MOVWF 07
820 09DA: NOP
821 ....................
822 .................... i2c_start();
823 09DB: BCF 03.5
824 09DC: BSF 20.4
825 09DD: MOVF 20,W
826 09DE: BSF 03.5
827 09DF: MOVWF 07
828 09E0: NOP
829 09E1: BCF 03.5
830 09E2: BSF 20.3
831 09E3: MOVF 20,W
832 09E4: BSF 03.5
833 09E5: MOVWF 07
834 09E6: NOP
835 09E7: BCF 03.5
836 09E8: BCF 07.4
837 09E9: BCF 20.4
838 09EA: MOVF 20,W
839 09EB: BSF 03.5
840 09EC: MOVWF 07
841 09ED: NOP
842 09EE: BCF 03.5
843 09EF: BCF 07.3
844 09F0: BCF 20.3
845 09F1: MOVF 20,W
846 09F2: BSF 03.5
847 09F3: MOVWF 07
848 .................... I2C_Write(0xAA);
849 09F4: MOVLW AA
850 09F5: BCF 03.5
851 09F6: MOVWF 3B
852 09F7: BCF 0A.3
853 09F8: CALL 0D1
854 09F9: BSF 0A.3
855 .................... I2C_write(0x0d);
856 09FA: MOVLW 0D
857 09FB: MOVWF 3B
858 09FC: BCF 0A.3
859 09FD: CALL 0D1
860 09FE: BSF 0A.3
861 .................... i2c_start();
862 09FF: BSF 20.4
863 0A00: MOVF 20,W
864 0A01: BSF 03.5
865 0A02: MOVWF 07
866 0A03: NOP
867 0A04: BCF 03.5
868 0A05: BSF 20.3
869 0A06: MOVF 20,W
870 0A07: BSF 03.5
871 0A08: MOVWF 07
872 0A09: NOP
873 0A0A: BCF 03.5
874 0A0B: BTFSS 07.3
875 0A0C: GOTO 20B
876 0A0D: BCF 07.4
877 0A0E: BCF 20.4
878 0A0F: MOVF 20,W
879 0A10: BSF 03.5
880 0A11: MOVWF 07
881 0A12: NOP
882 0A13: BCF 03.5
883 0A14: BCF 07.3
884 0A15: BCF 20.3
885 0A16: MOVF 20,W
886 0A17: BSF 03.5
887 0A18: MOVWF 07
888 .................... I2C_Write(0xAB);
889 0A19: MOVLW AB
890 0A1A: BCF 03.5
891 0A1B: MOVWF 3B
892 0A1C: BCF 0A.3
893 0A1D: CALL 0D1
894 0A1E: BSF 0A.3
895 .................... INTEP1=i2c_read(0);
896 0A1F: CLRF 77
897 0A20: BCF 0A.3
898 0A21: CALL 11B
899 0A22: BSF 0A.3
900 0A23: MOVF 78,W
901 0A24: MOVWF 22
902 .................... i2c_stop();
903 0A25: BCF 20.4
904 0A26: MOVF 20,W
905 0A27: BSF 03.5
906 0A28: MOVWF 07
907 0A29: NOP
908 0A2A: BCF 03.5
909 0A2B: BSF 20.3
910 0A2C: MOVF 20,W
911 0A2D: BSF 03.5
912 0A2E: MOVWF 07
913 0A2F: BCF 03.5
914 0A30: BTFSS 07.3
915 0A31: GOTO 230
916 0A32: NOP
917 0A33: GOTO 234
918 0A34: NOP
919 0A35: BSF 20.4
920 0A36: MOVF 20,W
921 0A37: BSF 03.5
922 0A38: MOVWF 07
923 0A39: NOP
924 ....................
925 .................... i2c_start();
926 0A3A: BCF 03.5
927 0A3B: BSF 20.4
928 0A3C: MOVF 20,W
929 0A3D: BSF 03.5
930 0A3E: MOVWF 07
931 0A3F: NOP
932 0A40: BCF 03.5
933 0A41: BSF 20.3
934 0A42: MOVF 20,W
935 0A43: BSF 03.5
936 0A44: MOVWF 07
937 0A45: NOP
938 0A46: BCF 03.5
939 0A47: BCF 07.4
940 0A48: BCF 20.4
941 0A49: MOVF 20,W
942 0A4A: BSF 03.5
943 0A4B: MOVWF 07
944 0A4C: NOP
945 0A4D: BCF 03.5
946 0A4E: BCF 07.3
947 0A4F: BCF 20.3
948 0A50: MOVF 20,W
949 0A51: BSF 03.5
950 0A52: MOVWF 07
951 .................... I2C_Write(0xAA);
952 0A53: MOVLW AA
953 0A54: BCF 03.5
954 0A55: MOVWF 3B
955 0A56: BCF 0A.3
956 0A57: CALL 0D1
957 0A58: BSF 0A.3
958 .................... I2C_write(0x08);
959 0A59: MOVLW 08
960 0A5A: MOVWF 3B
961 0A5B: BCF 0A.3
962 0A5C: CALL 0D1
963 0A5D: BSF 0A.3
964 .................... i2c_stop();
965 0A5E: BCF 20.4
966 0A5F: MOVF 20,W
967 0A60: BSF 03.5
968 0A61: MOVWF 07
969 0A62: NOP
970 0A63: BCF 03.5
971 0A64: BSF 20.3
972 0A65: MOVF 20,W
973 0A66: BSF 03.5
974 0A67: MOVWF 07
975 0A68: BCF 03.5
976 0A69: BTFSS 07.3
977 0A6A: GOTO 269
978 0A6B: NOP
979 0A6C: GOTO 26D
980 0A6D: NOP
981 0A6E: BSF 20.4
982 0A6F: MOVF 20,W
983 0A70: BSF 03.5
984 0A71: MOVWF 07
985 0A72: NOP
986 .................... i2c_start();
987 0A73: BCF 03.5
988 0A74: BSF 20.4
989 0A75: MOVF 20,W
990 0A76: BSF 03.5
991 0A77: MOVWF 07
992 0A78: NOP
993 0A79: BCF 03.5
994 0A7A: BSF 20.3
995 0A7B: MOVF 20,W
996 0A7C: BSF 03.5
997 0A7D: MOVWF 07
998 0A7E: NOP
999 0A7F: BCF 03.5
1000 0A80: BCF 07.4
1001 0A81: BCF 20.4
1002 0A82: MOVF 20,W
1003 0A83: BSF 03.5
1004 0A84: MOVWF 07
1005 0A85: NOP
1006 0A86: BCF 03.5
1007 0A87: BCF 07.3
1008 0A88: BCF 20.3
1009 0A89: MOVF 20,W
1010 0A8A: BSF 03.5
1011 0A8B: MOVWF 07
1012 .................... I2C_Write(0xAB);
1013 0A8C: MOVLW AB
1014 0A8D: BCF 03.5
1015 0A8E: MOVWF 3B
1016 0A8F: BCF 0A.3
1017 0A90: CALL 0D1
1018 0A91: BSF 0A.3
1019 .................... NAP=i2c_read(0);
1020 0A92: CLRF 77
1021 0A93: BCF 0A.3
1022 0A94: CALL 11B
1023 0A95: BSF 0A.3
1024 0A96: MOVF 78,W
1025 0A97: MOVWF 23
1026 .................... i2c_stop();
1027 0A98: BCF 20.4
1028 0A99: MOVF 20,W
1029 0A9A: BSF 03.5
1030 0A9B: MOVWF 07
1031 0A9C: NOP
1032 0A9D: BCF 03.5
1033 0A9E: BSF 20.3
1034 0A9F: MOVF 20,W
1035 0AA0: BSF 03.5
1036 0AA1: MOVWF 07
1037 0AA2: BCF 03.5
1038 0AA3: BTFSS 07.3
1039 0AA4: GOTO 2A3
1040 0AA5: NOP
1041 0AA6: GOTO 2A7
1042 0AA7: NOP
1043 0AA8: BSF 20.4
1044 0AA9: MOVF 20,W
1045 0AAA: BSF 03.5
1046 0AAB: MOVWF 07
1047 0AAC: NOP
1048 ....................
1049 .................... i2c_start();
1050 0AAD: BCF 03.5
1051 0AAE: BSF 20.4
1052 0AAF: MOVF 20,W
1053 0AB0: BSF 03.5
1054 0AB1: MOVWF 07
1055 0AB2: NOP
1056 0AB3: BCF 03.5
1057 0AB4: BSF 20.3
1058 0AB5: MOVF 20,W
1059 0AB6: BSF 03.5
1060 0AB7: MOVWF 07
1061 0AB8: NOP
1062 0AB9: BCF 03.5
1063 0ABA: BCF 07.4
1064 0ABB: BCF 20.4
1065 0ABC: MOVF 20,W
1066 0ABD: BSF 03.5
1067 0ABE: MOVWF 07
1068 0ABF: NOP
1069 0AC0: BCF 03.5
1070 0AC1: BCF 07.3
1071 0AC2: BCF 20.3
1072 0AC3: MOVF 20,W
1073 0AC4: BSF 03.5
1074 0AC5: MOVWF 07
1075 .................... I2C_Write(0xAA);
1076 0AC6: MOVLW AA
1077 0AC7: BCF 03.5
1078 0AC8: MOVWF 3B
1079 0AC9: BCF 0A.3
1080 0ACA: CALL 0D1
1081 0ACB: BSF 0A.3
1082 .................... I2C_write(0x09);
1083 0ACC: MOVLW 09
1084 0ACD: MOVWF 3B
1085 0ACE: BCF 0A.3
1086 0ACF: CALL 0D1
1087 0AD0: BSF 0A.3
1088 .................... i2c_stop();
1089 0AD1: BCF 20.4
1090 0AD2: MOVF 20,W
1091 0AD3: BSF 03.5
1092 0AD4: MOVWF 07
1093 0AD5: NOP
1094 0AD6: BCF 03.5
1095 0AD7: BSF 20.3
1096 0AD8: MOVF 20,W
1097 0AD9: BSF 03.5
1098 0ADA: MOVWF 07
1099 0ADB: BCF 03.5
1100 0ADC: BTFSS 07.3
1101 0ADD: GOTO 2DC
1102 0ADE: NOP
1103 0ADF: GOTO 2E0
1104 0AE0: NOP
1105 0AE1: BSF 20.4
1106 0AE2: MOVF 20,W
1107 0AE3: BSF 03.5
1108 0AE4: MOVWF 07
1109 0AE5: NOP
1110 .................... i2c_start();
1111 0AE6: BCF 03.5
1112 0AE7: BSF 20.4
1113 0AE8: MOVF 20,W
1114 0AE9: BSF 03.5
1115 0AEA: MOVWF 07
1116 0AEB: NOP
1117 0AEC: BCF 03.5
1118 0AED: BSF 20.3
1119 0AEE: MOVF 20,W
1120 0AEF: BSF 03.5
1121 0AF0: MOVWF 07
1122 0AF1: NOP
1123 0AF2: BCF 03.5
1124 0AF3: BCF 07.4
1125 0AF4: BCF 20.4
1126 0AF5: MOVF 20,W
1127 0AF6: BSF 03.5
1128 0AF7: MOVWF 07
1129 0AF8: NOP
1130 0AF9: BCF 03.5
1131 0AFA: BCF 07.3
1132 0AFB: BCF 20.3
1133 0AFC: MOVF 20,W
1134 0AFD: BSF 03.5
1135 0AFE: MOVWF 07
1136 .................... I2C_Write(0xAB);
1137 0AFF: MOVLW AB
1138 0B00: BCF 03.5
1139 0B01: MOVWF 3B
1140 0B02: BCF 0A.3
1141 0B03: CALL 0D1
1142 0B04: BSF 0A.3
1143 .................... NAP1=i2c_read(0);
1144 0B05: CLRF 77
1145 0B06: BCF 0A.3
1146 0B07: CALL 11B
1147 0B08: BSF 0A.3
1148 0B09: MOVF 78,W
1149 0B0A: MOVWF 24
1150 .................... i2c_stop();
1151 0B0B: BCF 20.4
1152 0B0C: MOVF 20,W
1153 0B0D: BSF 03.5
1154 0B0E: MOVWF 07
1155 0B0F: NOP
1156 0B10: BCF 03.5
1157 0B11: BSF 20.3
1158 0B12: MOVF 20,W
1159 0B13: BSF 03.5
1160 0B14: MOVWF 07
1161 0B15: BCF 03.5
1162 0B16: BTFSS 07.3
1163 0B17: GOTO 316
1164 0B18: NOP
1165 0B19: GOTO 31A
1166 0B1A: NOP
1167 0B1B: BSF 20.4
1168 0B1C: MOVF 20,W
1169 0B1D: BSF 03.5
1170 0B1E: MOVWF 07
1171 0B1F: NOP
1172 ....................
1173 .................... i2c_start();
1174 0B20: BCF 03.5
1175 0B21: BSF 20.4
1176 0B22: MOVF 20,W
1177 0B23: BSF 03.5
1178 0B24: MOVWF 07
1179 0B25: NOP
1180 0B26: BCF 03.5
1181 0B27: BSF 20.3
1182 0B28: MOVF 20,W
1183 0B29: BSF 03.5
1184 0B2A: MOVWF 07
1185 0B2B: NOP
1186 0B2C: BCF 03.5
1187 0B2D: BCF 07.4
1188 0B2E: BCF 20.4
1189 0B2F: MOVF 20,W
1190 0B30: BSF 03.5
1191 0B31: MOVWF 07
1192 0B32: NOP
1193 0B33: BCF 03.5
1194 0B34: BCF 07.3
1195 0B35: BCF 20.3
1196 0B36: MOVF 20,W
1197 0B37: BSF 03.5
1198 0B38: MOVWF 07
1199 .................... I2C_Write(0xAA);
1200 0B39: MOVLW AA
1201 0B3A: BCF 03.5
1202 0B3B: MOVWF 3B
1203 0B3C: BCF 0A.3
1204 0B3D: CALL 0D1
1205 0B3E: BSF 0A.3
1206 .................... I2C_write(0x0a);
1207 0B3F: MOVLW 0A
1208 0B40: MOVWF 3B
1209 0B41: BCF 0A.3
1210 0B42: CALL 0D1
1211 0B43: BSF 0A.3
1212 .................... i2c_stop();
1213 0B44: BCF 20.4
1214 0B45: MOVF 20,W
1215 0B46: BSF 03.5
1216 0B47: MOVWF 07
1217 0B48: NOP
1218 0B49: BCF 03.5
1219 0B4A: BSF 20.3
1220 0B4B: MOVF 20,W
1221 0B4C: BSF 03.5
1222 0B4D: MOVWF 07
1223 0B4E: BCF 03.5
1224 0B4F: BTFSS 07.3
1225 0B50: GOTO 34F
1226 0B51: NOP
1227 0B52: GOTO 353
1228 0B53: NOP
1229 0B54: BSF 20.4
1230 0B55: MOVF 20,W
1231 0B56: BSF 03.5
1232 0B57: MOVWF 07
1233 0B58: NOP
1234 .................... i2c_start();
1235 0B59: BCF 03.5
1236 0B5A: BSF 20.4
1237 0B5B: MOVF 20,W
1238 0B5C: BSF 03.5
1239 0B5D: MOVWF 07
1240 0B5E: NOP
1241 0B5F: BCF 03.5
1242 0B60: BSF 20.3
1243 0B61: MOVF 20,W
1244 0B62: BSF 03.5
1245 0B63: MOVWF 07
1246 0B64: NOP
1247 0B65: BCF 03.5
1248 0B66: BCF 07.4
1249 0B67: BCF 20.4
1250 0B68: MOVF 20,W
1251 0B69: BSF 03.5
1252 0B6A: MOVWF 07
1253 0B6B: NOP
1254 0B6C: BCF 03.5
1255 0B6D: BCF 07.3
1256 0B6E: BCF 20.3
1257 0B6F: MOVF 20,W
1258 0B70: BSF 03.5
1259 0B71: MOVWF 07
1260 .................... I2C_Write(0xAB);
1261 0B72: MOVLW AB
1262 0B73: BCF 03.5
1263 0B74: MOVWF 3B
1264 0B75: BCF 0A.3
1265 0B76: CALL 0D1
1266 0B77: BSF 0A.3
1267 .................... PROUD=i2c_read(0);
1268 0B78: CLRF 77
1269 0B79: BCF 0A.3
1270 0B7A: CALL 11B
1271 0B7B: BSF 0A.3
1272 0B7C: MOVF 78,W
1273 0B7D: MOVWF 25
1274 .................... i2c_stop();
1275 0B7E: BCF 20.4
1276 0B7F: MOVF 20,W
1277 0B80: BSF 03.5
1278 0B81: MOVWF 07
1279 0B82: NOP
1280 0B83: BCF 03.5
1281 0B84: BSF 20.3
1282 0B85: MOVF 20,W
1283 0B86: BSF 03.5
1284 0B87: MOVWF 07
1285 0B88: BCF 03.5
1286 0B89: BTFSS 07.3
1287 0B8A: GOTO 389
1288 0B8B: NOP
1289 0B8C: GOTO 38D
1290 0B8D: NOP
1291 0B8E: BSF 20.4
1292 0B8F: MOVF 20,W
1293 0B90: BSF 03.5
1294 0B91: MOVWF 07
1295 0B92: NOP
1296 ....................
1297 .................... i2c_start();
1298 0B93: BCF 03.5
1299 0B94: BSF 20.4
1300 0B95: MOVF 20,W
1301 0B96: BSF 03.5
1302 0B97: MOVWF 07
1303 0B98: NOP
1304 0B99: BCF 03.5
1305 0B9A: BSF 20.3
1306 0B9B: MOVF 20,W
1307 0B9C: BSF 03.5
1308 0B9D: MOVWF 07
1309 0B9E: NOP
1310 0B9F: BCF 03.5
1311 0BA0: BCF 07.4
1312 0BA1: BCF 20.4
1313 0BA2: MOVF 20,W
1314 0BA3: BSF 03.5
1315 0BA4: MOVWF 07
1316 0BA5: NOP
1317 0BA6: BCF 03.5
1318 0BA7: BCF 07.3
1319 0BA8: BCF 20.3
1320 0BA9: MOVF 20,W
1321 0BAA: BSF 03.5
1322 0BAB: MOVWF 07
1323 .................... I2C_Write(0xAA);
1324 0BAC: MOVLW AA
1325 0BAD: BCF 03.5
1326 0BAE: MOVWF 3B
1327 0BAF: BCF 0A.3
1328 0BB0: CALL 0D1
1329 0BB1: BSF 0A.3
1330 .................... I2C_write(0x0b);
1331 0BB2: MOVLW 0B
1332 0BB3: MOVWF 3B
1333 0BB4: BCF 0A.3
1334 0BB5: CALL 0D1
1335 0BB6: BSF 0A.3
1336 .................... i2c_stop();
1337 0BB7: BCF 20.4
1338 0BB8: MOVF 20,W
1339 0BB9: BSF 03.5
1340 0BBA: MOVWF 07
1341 0BBB: NOP
1342 0BBC: BCF 03.5
1343 0BBD: BSF 20.3
1344 0BBE: MOVF 20,W
1345 0BBF: BSF 03.5
1346 0BC0: MOVWF 07
1347 0BC1: BCF 03.5
1348 0BC2: BTFSS 07.3
1349 0BC3: GOTO 3C2
1350 0BC4: NOP
1351 0BC5: GOTO 3C6
1352 0BC6: NOP
1353 0BC7: BSF 20.4
1354 0BC8: MOVF 20,W
1355 0BC9: BSF 03.5
1356 0BCA: MOVWF 07
1357 0BCB: NOP
1358 .................... i2c_start();
1359 0BCC: BCF 03.5
1360 0BCD: BSF 20.4
1361 0BCE: MOVF 20,W
1362 0BCF: BSF 03.5
1363 0BD0: MOVWF 07
1364 0BD1: NOP
1365 0BD2: BCF 03.5
1366 0BD3: BSF 20.3
1367 0BD4: MOVF 20,W
1368 0BD5: BSF 03.5
1369 0BD6: MOVWF 07
1370 0BD7: NOP
1371 0BD8: BCF 03.5
1372 0BD9: BCF 07.4
1373 0BDA: BCF 20.4
1374 0BDB: MOVF 20,W
1375 0BDC: BSF 03.5
1376 0BDD: MOVWF 07
1377 0BDE: NOP
1378 0BDF: BCF 03.5
1379 0BE0: BCF 07.3
1380 0BE1: BCF 20.3
1381 0BE2: MOVF 20,W
1382 0BE3: BSF 03.5
1383 0BE4: MOVWF 07
1384 .................... I2C_Write(0xAB);
1385 0BE5: MOVLW AB
1386 0BE6: BCF 03.5
1387 0BE7: MOVWF 3B
1388 0BE8: BCF 0A.3
1389 0BE9: CALL 0D1
1390 0BEA: BSF 0A.3
1391 .................... PROUD1=i2c_read(0);
1392 0BEB: CLRF 77
1393 0BEC: BCF 0A.3
1394 0BED: CALL 11B
1395 0BEE: BSF 0A.3
1396 0BEF: MOVF 78,W
1397 0BF0: MOVWF 26
1398 .................... i2c_stop();
1399 0BF1: BCF 20.4
1400 0BF2: MOVF 20,W
1401 0BF3: BSF 03.5
1402 0BF4: MOVWF 07
1403 0BF5: NOP
1404 0BF6: BCF 03.5
1405 0BF7: BSF 20.3
1406 0BF8: MOVF 20,W
1407 0BF9: BSF 03.5
1408 0BFA: MOVWF 07
1409 0BFB: BCF 03.5
1410 0BFC: BTFSS 07.3
1411 0BFD: GOTO 3FC
1412 0BFE: NOP
1413 0BFF: GOTO 400
1414 0C00: NOP
1415 0C01: BSF 20.4
1416 0C02: MOVF 20,W
1417 0C03: BSF 03.5
1418 0C04: MOVWF 07
1419 0C05: NOP
1420 ....................
1421 ....................
1422 .................... i2c_start();
1423 0C06: BCF 03.5
1424 0C07: BSF 20.4
1425 0C08: MOVF 20,W
1426 0C09: BSF 03.5
1427 0C0A: MOVWF 07
1428 0C0B: NOP
1429 0C0C: BCF 03.5
1430 0C0D: BSF 20.3
1431 0C0E: MOVF 20,W
1432 0C0F: BSF 03.5
1433 0C10: MOVWF 07
1434 0C11: NOP
1435 0C12: BCF 03.5
1436 0C13: BCF 07.4
1437 0C14: BCF 20.4
1438 0C15: MOVF 20,W
1439 0C16: BSF 03.5
1440 0C17: MOVWF 07
1441 0C18: NOP
1442 0C19: BCF 03.5
1443 0C1A: BCF 07.3
1444 0C1B: BCF 20.3
1445 0C1C: MOVF 20,W
1446 0C1D: BSF 03.5
1447 0C1E: MOVWF 07
1448 .................... I2C_Write(0xAA);
1449 0C1F: MOVLW AA
1450 0C20: BCF 03.5
1451 0C21: MOVWF 3B
1452 0C22: BCF 0A.3
1453 0C23: CALL 0D1
1454 0C24: BSF 0A.3
1455 .................... I2C_write(0x04);
1456 0C25: MOVLW 04
1457 0C26: MOVWF 3B
1458 0C27: BCF 0A.3
1459 0C28: CALL 0D1
1460 0C29: BSF 0A.3
1461 .................... i2c_stop();
1462 0C2A: BCF 20.4
1463 0C2B: MOVF 20,W
1464 0C2C: BSF 03.5
1465 0C2D: MOVWF 07
1466 0C2E: NOP
1467 0C2F: BCF 03.5
1468 0C30: BSF 20.3
1469 0C31: MOVF 20,W
1470 0C32: BSF 03.5
1471 0C33: MOVWF 07
1472 0C34: BCF 03.5
1473 0C35: BTFSS 07.3
1474 0C36: GOTO 435
1475 0C37: NOP
1476 0C38: GOTO 439
1477 0C39: NOP
1478 0C3A: BSF 20.4
1479 0C3B: MOVF 20,W
1480 0C3C: BSF 03.5
1481 0C3D: MOVWF 07
1482 0C3E: NOP
1483 .................... i2c_start();
1484 0C3F: BCF 03.5
1485 0C40: BSF 20.4
1486 0C41: MOVF 20,W
1487 0C42: BSF 03.5
1488 0C43: MOVWF 07
1489 0C44: NOP
1490 0C45: BCF 03.5
1491 0C46: BSF 20.3
1492 0C47: MOVF 20,W
1493 0C48: BSF 03.5
1494 0C49: MOVWF 07
1495 0C4A: NOP
1496 0C4B: BCF 03.5
1497 0C4C: BCF 07.4
1498 0C4D: BCF 20.4
1499 0C4E: MOVF 20,W
1500 0C4F: BSF 03.5
1501 0C50: MOVWF 07
1502 0C51: NOP
1503 0C52: BCF 03.5
1504 0C53: BCF 07.3
1505 0C54: BCF 20.3
1506 0C55: MOVF 20,W
1507 0C56: BSF 03.5
1508 0C57: MOVWF 07
1509 .................... I2C_Write(0xAB);
1510 0C58: MOVLW AB
1511 0C59: BCF 03.5
1512 0C5A: MOVWF 3B
1513 0C5B: BCF 0A.3
1514 0C5C: CALL 0D1
1515 0C5D: BSF 0A.3
1516 .................... KAPZ=i2c_read(0);
1517 0C5E: CLRF 77
1518 0C5F: BCF 0A.3
1519 0C60: CALL 11B
1520 0C61: BSF 0A.3
1521 0C62: MOVF 78,W
1522 0C63: MOVWF 27
1523 .................... i2c_stop();
1524 0C64: BCF 20.4
1525 0C65: MOVF 20,W
1526 0C66: BSF 03.5
1527 0C67: MOVWF 07
1528 0C68: NOP
1529 0C69: BCF 03.5
1530 0C6A: BSF 20.3
1531 0C6B: MOVF 20,W
1532 0C6C: BSF 03.5
1533 0C6D: MOVWF 07
1534 0C6E: BCF 03.5
1535 0C6F: BTFSS 07.3
1536 0C70: GOTO 46F
1537 0C71: NOP
1538 0C72: GOTO 473
1539 0C73: NOP
1540 0C74: BSF 20.4
1541 0C75: MOVF 20,W
1542 0C76: BSF 03.5
1543 0C77: MOVWF 07
1544 0C78: NOP
1545 ....................
1546 .................... i2c_start();
1547 0C79: BCF 03.5
1548 0C7A: BSF 20.4
1549 0C7B: MOVF 20,W
1550 0C7C: BSF 03.5
1551 0C7D: MOVWF 07
1552 0C7E: NOP
1553 0C7F: BCF 03.5
1554 0C80: BSF 20.3
1555 0C81: MOVF 20,W
1556 0C82: BSF 03.5
1557 0C83: MOVWF 07
1558 0C84: NOP
1559 0C85: BCF 03.5
1560 0C86: BCF 07.4
1561 0C87: BCF 20.4
1562 0C88: MOVF 20,W
1563 0C89: BSF 03.5
1564 0C8A: MOVWF 07
1565 0C8B: NOP
1566 0C8C: BCF 03.5
1567 0C8D: BCF 07.3
1568 0C8E: BCF 20.3
1569 0C8F: MOVF 20,W
1570 0C90: BSF 03.5
1571 0C91: MOVWF 07
1572 .................... I2C_Write(0xAA);
1573 0C92: MOVLW AA
1574 0C93: BCF 03.5
1575 0C94: MOVWF 3B
1576 0C95: BCF 0A.3
1577 0C96: CALL 0D1
1578 0C97: BSF 0A.3
1579 .................... I2C_write(0x05);
1580 0C98: MOVLW 05
1581 0C99: MOVWF 3B
1582 0C9A: BCF 0A.3
1583 0C9B: CALL 0D1
1584 0C9C: BSF 0A.3
1585 .................... i2c_stop();
1586 0C9D: BCF 20.4
1587 0C9E: MOVF 20,W
1588 0C9F: BSF 03.5
1589 0CA0: MOVWF 07
1590 0CA1: NOP
1591 0CA2: BCF 03.5
1592 0CA3: BSF 20.3
1593 0CA4: MOVF 20,W
1594 0CA5: BSF 03.5
1595 0CA6: MOVWF 07
1596 0CA7: BCF 03.5
1597 0CA8: BTFSS 07.3
1598 0CA9: GOTO 4A8
1599 0CAA: NOP
1600 0CAB: GOTO 4AC
1601 0CAC: NOP
1602 0CAD: BSF 20.4
1603 0CAE: MOVF 20,W
1604 0CAF: BSF 03.5
1605 0CB0: MOVWF 07
1606 0CB1: NOP
1607 .................... i2c_start();
1608 0CB2: BCF 03.5
1609 0CB3: BSF 20.4
1610 0CB4: MOVF 20,W
1611 0CB5: BSF 03.5
1612 0CB6: MOVWF 07
1613 0CB7: NOP
1614 0CB8: BCF 03.5
1615 0CB9: BSF 20.3
1616 0CBA: MOVF 20,W
1617 0CBB: BSF 03.5
1618 0CBC: MOVWF 07
1619 0CBD: NOP
1620 0CBE: BCF 03.5
1621 0CBF: BCF 07.4
1622 0CC0: BCF 20.4
1623 0CC1: MOVF 20,W
1624 0CC2: BSF 03.5
1625 0CC3: MOVWF 07
1626 0CC4: NOP
1627 0CC5: BCF 03.5
1628 0CC6: BCF 07.3
1629 0CC7: BCF 20.3
1630 0CC8: MOVF 20,W
1631 0CC9: BSF 03.5
1632 0CCA: MOVWF 07
1633 .................... I2C_Write(0xAB);
1634 0CCB: MOVLW AB
1635 0CCC: BCF 03.5
1636 0CCD: MOVWF 3B
1637 0CCE: BCF 0A.3
1638 0CCF: CALL 0D1
1639 0CD0: BSF 0A.3
1640 .................... KAPZ1=i2c_read(0);
1641 0CD1: CLRF 77
1642 0CD2: BCF 0A.3
1643 0CD3: CALL 11B
1644 0CD4: BSF 0A.3
1645 0CD5: MOVF 78,W
1646 0CD6: MOVWF 28
1647 .................... i2c_stop();
1648 0CD7: BCF 20.4
1649 0CD8: MOVF 20,W
1650 0CD9: BSF 03.5
1651 0CDA: MOVWF 07
1652 0CDB: NOP
1653 0CDC: BCF 03.5
1654 0CDD: BSF 20.3
1655 0CDE: MOVF 20,W
1656 0CDF: BSF 03.5
1657 0CE0: MOVWF 07
1658 0CE1: BCF 03.5
1659 0CE2: BTFSS 07.3
1660 0CE3: GOTO 4E2
1661 0CE4: NOP
1662 0CE5: GOTO 4E6
1663 0CE6: NOP
1664 0CE7: BSF 20.4
1665 0CE8: MOVF 20,W
1666 0CE9: BSF 03.5
1667 0CEA: MOVWF 07
1668 0CEB: NOP
1669 ....................
1670 ....................
1671 .................... i2c_start();
1672 0CEC: BCF 03.5
1673 0CED: BSF 20.4
1674 0CEE: MOVF 20,W
1675 0CEF: BSF 03.5
1676 0CF0: MOVWF 07
1677 0CF1: NOP
1678 0CF2: BCF 03.5
1679 0CF3: BSF 20.3
1680 0CF4: MOVF 20,W
1681 0CF5: BSF 03.5
1682 0CF6: MOVWF 07
1683 0CF7: NOP
1684 0CF8: BCF 03.5
1685 0CF9: BCF 07.4
1686 0CFA: BCF 20.4
1687 0CFB: MOVF 20,W
1688 0CFC: BSF 03.5
1689 0CFD: MOVWF 07
1690 0CFE: NOP
1691 0CFF: BCF 03.5
1692 0D00: BCF 07.3
1693 0D01: BCF 20.3
1694 0D02: MOVF 20,W
1695 0D03: BSF 03.5
1696 0D04: MOVWF 07
1697 .................... I2C_Write(0xAA);
1698 0D05: MOVLW AA
1699 0D06: BCF 03.5
1700 0D07: MOVWF 3B
1701 0D08: BCF 0A.3
1702 0D09: CALL 0D1
1703 0D0A: BSF 0A.3
1704 .................... I2C_write(0x06);
1705 0D0B: MOVLW 06
1706 0D0C: MOVWF 3B
1707 0D0D: BCF 0A.3
1708 0D0E: CALL 0D1
1709 0D0F: BSF 0A.3
1710 .................... i2c_stop();
1711 0D10: BCF 20.4
1712 0D11: MOVF 20,W
1713 0D12: BSF 03.5
1714 0D13: MOVWF 07
1715 0D14: NOP
1716 0D15: BCF 03.5
1717 0D16: BSF 20.3
1718 0D17: MOVF 20,W
1719 0D18: BSF 03.5
1720 0D19: MOVWF 07
1721 0D1A: BCF 03.5
1722 0D1B: BTFSS 07.3
1723 0D1C: GOTO 51B
1724 0D1D: NOP
1725 0D1E: GOTO 51F
1726 0D1F: NOP
1727 0D20: BSF 20.4
1728 0D21: MOVF 20,W
1729 0D22: BSF 03.5
1730 0D23: MOVWF 07
1731 0D24: NOP
1732 .................... i2c_start();
1733 0D25: BCF 03.5
1734 0D26: BSF 20.4
1735 0D27: MOVF 20,W
1736 0D28: BSF 03.5
1737 0D29: MOVWF 07
1738 0D2A: NOP
1739 0D2B: BCF 03.5
1740 0D2C: BSF 20.3
1741 0D2D: MOVF 20,W
1742 0D2E: BSF 03.5
1743 0D2F: MOVWF 07
1744 0D30: NOP
1745 0D31: BCF 03.5
1746 0D32: BCF 07.4
1747 0D33: BCF 20.4
1748 0D34: MOVF 20,W
1749 0D35: BSF 03.5
1750 0D36: MOVWF 07
1751 0D37: NOP
1752 0D38: BCF 03.5
1753 0D39: BCF 07.3
1754 0D3A: BCF 20.3
1755 0D3B: MOVF 20,W
1756 0D3C: BSF 03.5
1757 0D3D: MOVWF 07
1758 .................... I2C_Write(0xAB);
1759 0D3E: MOVLW AB
1760 0D3F: BCF 03.5
1761 0D40: MOVWF 3B
1762 0D41: BCF 0A.3
1763 0D42: CALL 0D1
1764 0D43: BSF 0A.3
1765 .................... KAPC=i2c_read(0);
1766 0D44: CLRF 77
1767 0D45: BCF 0A.3
1768 0D46: CALL 11B
1769 0D47: BSF 0A.3
1770 0D48: MOVF 78,W
1771 0D49: MOVWF 29
1772 .................... i2c_stop();
1773 0D4A: BCF 20.4
1774 0D4B: MOVF 20,W
1775 0D4C: BSF 03.5
1776 0D4D: MOVWF 07
1777 0D4E: NOP
1778 0D4F: BCF 03.5
1779 0D50: BSF 20.3
1780 0D51: MOVF 20,W
1781 0D52: BSF 03.5
1782 0D53: MOVWF 07
1783 0D54: BCF 03.5
1784 0D55: BTFSS 07.3
1785 0D56: GOTO 555
1786 0D57: NOP
1787 0D58: GOTO 559
1788 0D59: NOP
1789 0D5A: BSF 20.4
1790 0D5B: MOVF 20,W
1791 0D5C: BSF 03.5
1792 0D5D: MOVWF 07
1793 0D5E: NOP
1794 ....................
1795 .................... i2c_start();
1796 0D5F: BCF 03.5
1797 0D60: BSF 20.4
1798 0D61: MOVF 20,W
1799 0D62: BSF 03.5
1800 0D63: MOVWF 07
1801 0D64: NOP
1802 0D65: BCF 03.5
1803 0D66: BSF 20.3
1804 0D67: MOVF 20,W
1805 0D68: BSF 03.5
1806 0D69: MOVWF 07
1807 0D6A: NOP
1808 0D6B: BCF 03.5
1809 0D6C: BCF 07.4
1810 0D6D: BCF 20.4
1811 0D6E: MOVF 20,W
1812 0D6F: BSF 03.5
1813 0D70: MOVWF 07
1814 0D71: NOP
1815 0D72: BCF 03.5
1816 0D73: BCF 07.3
1817 0D74: BCF 20.3
1818 0D75: MOVF 20,W
1819 0D76: BSF 03.5
1820 0D77: MOVWF 07
1821 .................... I2C_Write(0xAA);
1822 0D78: MOVLW AA
1823 0D79: BCF 03.5
1824 0D7A: MOVWF 3B
1825 0D7B: BCF 0A.3
1826 0D7C: CALL 0D1
1827 0D7D: BSF 0A.3
1828 .................... I2C_write(0x07);
1829 0D7E: MOVLW 07
1830 0D7F: MOVWF 3B
1831 0D80: BCF 0A.3
1832 0D81: CALL 0D1
1833 0D82: BSF 0A.3
1834 .................... i2c_stop();
1835 0D83: BCF 20.4
1836 0D84: MOVF 20,W
1837 0D85: BSF 03.5
1838 0D86: MOVWF 07
1839 0D87: NOP
1840 0D88: BCF 03.5
1841 0D89: BSF 20.3
1842 0D8A: MOVF 20,W
1843 0D8B: BSF 03.5
1844 0D8C: MOVWF 07
1845 0D8D: BCF 03.5
1846 0D8E: BTFSS 07.3
1847 0D8F: GOTO 58E
1848 0D90: NOP
1849 0D91: GOTO 592
1850 0D92: NOP
1851 0D93: BSF 20.4
1852 0D94: MOVF 20,W
1853 0D95: BSF 03.5
1854 0D96: MOVWF 07
1855 0D97: NOP
1856 .................... i2c_start();
1857 0D98: BCF 03.5
1858 0D99: BSF 20.4
1859 0D9A: MOVF 20,W
1860 0D9B: BSF 03.5
1861 0D9C: MOVWF 07
1862 0D9D: NOP
1863 0D9E: BCF 03.5
1864 0D9F: BSF 20.3
1865 0DA0: MOVF 20,W
1866 0DA1: BSF 03.5
1867 0DA2: MOVWF 07
1868 0DA3: NOP
1869 0DA4: BCF 03.5
1870 0DA5: BCF 07.4
1871 0DA6: BCF 20.4
1872 0DA7: MOVF 20,W
1873 0DA8: BSF 03.5
1874 0DA9: MOVWF 07
1875 0DAA: NOP
1876 0DAB: BCF 03.5
1877 0DAC: BCF 07.3
1878 0DAD: BCF 20.3
1879 0DAE: MOVF 20,W
1880 0DAF: BSF 03.5
1881 0DB0: MOVWF 07
1882 .................... I2C_Write(0xAB);
1883 0DB1: MOVLW AB
1884 0DB2: BCF 03.5
1885 0DB3: MOVWF 3B
1886 0DB4: BCF 0A.3
1887 0DB5: CALL 0D1
1888 0DB6: BSF 0A.3
1889 .................... KAPC1=i2c_read(0);
1890 0DB7: CLRF 77
1891 0DB8: BCF 0A.3
1892 0DB9: CALL 11B
1893 0DBA: BSF 0A.3
1894 0DBB: MOVF 78,W
1895 0DBC: MOVWF 2A
1896 .................... i2c_stop();
1897 0DBD: BCF 20.4
1898 0DBE: MOVF 20,W
1899 0DBF: BSF 03.5
1900 0DC0: MOVWF 07
1901 0DC1: NOP
1902 0DC2: BCF 03.5
1903 0DC3: BSF 20.3
1904 0DC4: MOVF 20,W
1905 0DC5: BSF 03.5
1906 0DC6: MOVWF 07
1907 0DC7: BCF 03.5
1908 0DC8: BTFSS 07.3
1909 0DC9: GOTO 5C8
1910 0DCA: NOP
1911 0DCB: GOTO 5CC
1912 0DCC: NOP
1913 0DCD: BSF 20.4
1914 0DCE: MOVF 20,W
1915 0DCF: BSF 03.5
1916 0DD0: MOVWF 07
1917 0DD1: NOP
1918 ....................
1919 .................... i2c_start();
1920 0DD2: BCF 03.5
1921 0DD3: BSF 20.4
1922 0DD4: MOVF 20,W
1923 0DD5: BSF 03.5
1924 0DD6: MOVWF 07
1925 0DD7: NOP
1926 0DD8: BCF 03.5
1927 0DD9: BSF 20.3
1928 0DDA: MOVF 20,W
1929 0DDB: BSF 03.5
1930 0DDC: MOVWF 07
1931 0DDD: NOP
1932 0DDE: BCF 03.5
1933 0DDF: BCF 07.4
1934 0DE0: BCF 20.4
1935 0DE1: MOVF 20,W
1936 0DE2: BSF 03.5
1937 0DE3: MOVWF 07
1938 0DE4: NOP
1939 0DE5: BCF 03.5
1940 0DE6: BCF 07.3
1941 0DE7: BCF 20.3
1942 0DE8: MOVF 20,W
1943 0DE9: BSF 03.5
1944 0DEA: MOVWF 07
1945 .................... I2C_Write(0xAA);
1946 0DEB: MOVLW AA
1947 0DEC: BCF 03.5
1948 0DED: MOVWF 3B
1949 0DEE: BCF 0A.3
1950 0DEF: CALL 0D1
1951 0DF0: BSF 0A.3
1952 .................... I2C_write(0x02);
1953 0DF1: MOVLW 02
1954 0DF2: MOVWF 3B
1955 0DF3: BCF 0A.3
1956 0DF4: CALL 0D1
1957 0DF5: BSF 0A.3
1958 .................... i2c_stop();
1959 0DF6: BCF 20.4
1960 0DF7: MOVF 20,W
1961 0DF8: BSF 03.5
1962 0DF9: MOVWF 07
1963 0DFA: NOP
1964 0DFB: BCF 03.5
1965 0DFC: BSF 20.3
1966 0DFD: MOVF 20,W
1967 0DFE: BSF 03.5
1968 0DFF: MOVWF 07
1969 0E00: BCF 03.5
1970 0E01: BTFSS 07.3
1971 0E02: GOTO 601
1972 0E03: NOP
1973 0E04: GOTO 605
1974 0E05: NOP
1975 0E06: BSF 20.4
1976 0E07: MOVF 20,W
1977 0E08: BSF 03.5
1978 0E09: MOVWF 07
1979 0E0A: NOP
1980 .................... i2c_start();
1981 0E0B: BCF 03.5
1982 0E0C: BSF 20.4
1983 0E0D: MOVF 20,W
1984 0E0E: BSF 03.5
1985 0E0F: MOVWF 07
1986 0E10: NOP
1987 0E11: BCF 03.5
1988 0E12: BSF 20.3
1989 0E13: MOVF 20,W
1990 0E14: BSF 03.5
1991 0E15: MOVWF 07
1992 0E16: NOP
1993 0E17: BCF 03.5
1994 0E18: BCF 07.4
1995 0E19: BCF 20.4
1996 0E1A: MOVF 20,W
1997 0E1B: BSF 03.5
1998 0E1C: MOVWF 07
1999 0E1D: NOP
2000 0E1E: BCF 03.5
2001 0E1F: BCF 07.3
2002 0E20: BCF 20.3
2003 0E21: MOVF 20,W
2004 0E22: BSF 03.5
2005 0E23: MOVWF 07
2006 .................... I2C_Write(0xAB);
2007 0E24: MOVLW AB
2008 0E25: BCF 03.5
2009 0E26: MOVWF 3B
2010 0E27: BCF 0A.3
2011 0E28: CALL 0D1
2012 0E29: BSF 0A.3
2013 .................... STAV=i2c_read(0);
2014 0E2A: CLRF 77
2015 0E2B: BCF 0A.3
2016 0E2C: CALL 11B
2017 0E2D: BSF 0A.3
2018 0E2E: MOVF 78,W
2019 0E2F: MOVWF 2B
2020 .................... i2c_stop();
2021 0E30: BCF 20.4
2022 0E31: MOVF 20,W
2023 0E32: BSF 03.5
2024 0E33: MOVWF 07
2025 0E34: NOP
2026 0E35: BCF 03.5
2027 0E36: BSF 20.3
2028 0E37: MOVF 20,W
2029 0E38: BSF 03.5
2030 0E39: MOVWF 07
2031 0E3A: BCF 03.5
2032 0E3B: BTFSS 07.3
2033 0E3C: GOTO 63B
2034 0E3D: NOP
2035 0E3E: GOTO 63F
2036 0E3F: NOP
2037 0E40: BSF 20.4
2038 0E41: MOVF 20,W
2039 0E42: BSF 03.5
2040 0E43: MOVWF 07
2041 0E44: NOP
2042 ....................
2043 .................... i2c_start();
2044 0E45: BCF 03.5
2045 0E46: BSF 20.4
2046 0E47: MOVF 20,W
2047 0E48: BSF 03.5
2048 0E49: MOVWF 07
2049 0E4A: NOP
2050 0E4B: BCF 03.5
2051 0E4C: BSF 20.3
2052 0E4D: MOVF 20,W
2053 0E4E: BSF 03.5
2054 0E4F: MOVWF 07
2055 0E50: NOP
2056 0E51: BCF 03.5
2057 0E52: BCF 07.4
2058 0E53: BCF 20.4
2059 0E54: MOVF 20,W
2060 0E55: BSF 03.5
2061 0E56: MOVWF 07
2062 0E57: NOP
2063 0E58: BCF 03.5
2064 0E59: BCF 07.3
2065 0E5A: BCF 20.3
2066 0E5B: MOVF 20,W
2067 0E5C: BSF 03.5
2068 0E5D: MOVWF 07
2069 .................... I2C_Write(0xAA);
2070 0E5E: MOVLW AA
2071 0E5F: BCF 03.5
2072 0E60: MOVWF 3B
2073 0E61: BCF 0A.3
2074 0E62: CALL 0D1
2075 0E63: BSF 0A.3
2076 .................... I2C_write(0x03);
2077 0E64: MOVLW 03
2078 0E65: MOVWF 3B
2079 0E66: BCF 0A.3
2080 0E67: CALL 0D1
2081 0E68: BSF 0A.3
2082 .................... i2c_stop();
2083 0E69: BCF 20.4
2084 0E6A: MOVF 20,W
2085 0E6B: BSF 03.5
2086 0E6C: MOVWF 07
2087 0E6D: NOP
2088 0E6E: BCF 03.5
2089 0E6F: BSF 20.3
2090 0E70: MOVF 20,W
2091 0E71: BSF 03.5
2092 0E72: MOVWF 07
2093 0E73: BCF 03.5
2094 0E74: BTFSS 07.3
2095 0E75: GOTO 674
2096 0E76: NOP
2097 0E77: GOTO 678
2098 0E78: NOP
2099 0E79: BSF 20.4
2100 0E7A: MOVF 20,W
2101 0E7B: BSF 03.5
2102 0E7C: MOVWF 07
2103 0E7D: NOP
2104 .................... i2c_start();
2105 0E7E: BCF 03.5
2106 0E7F: BSF 20.4
2107 0E80: MOVF 20,W
2108 0E81: BSF 03.5
2109 0E82: MOVWF 07
2110 0E83: NOP
2111 0E84: BCF 03.5
2112 0E85: BSF 20.3
2113 0E86: MOVF 20,W
2114 0E87: BSF 03.5
2115 0E88: MOVWF 07
2116 0E89: NOP
2117 0E8A: BCF 03.5
2118 0E8B: BCF 07.4
2119 0E8C: BCF 20.4
2120 0E8D: MOVF 20,W
2121 0E8E: BSF 03.5
2122 0E8F: MOVWF 07
2123 0E90: NOP
2124 0E91: BCF 03.5
2125 0E92: BCF 07.3
2126 0E93: BCF 20.3
2127 0E94: MOVF 20,W
2128 0E95: BSF 03.5
2129 0E96: MOVWF 07
2130 .................... I2C_Write(0xAB);
2131 0E97: MOVLW AB
2132 0E98: BCF 03.5
2133 0E99: MOVWF 3B
2134 0E9A: BCF 0A.3
2135 0E9B: CALL 0D1
2136 0E9C: BSF 0A.3
2137 .................... STAV1=i2c_read(0);
2138 0E9D: CLRF 77
2139 0E9E: BCF 0A.3
2140 0E9F: CALL 11B
2141 0EA0: BSF 0A.3
2142 0EA1: MOVF 78,W
2143 0EA2: MOVWF 2C
2144 .................... i2c_stop();
2145 0EA3: BCF 20.4
2146 0EA4: MOVF 20,W
2147 0EA5: BSF 03.5
2148 0EA6: MOVWF 07
2149 0EA7: NOP
2150 0EA8: BCF 03.5
2151 0EA9: BSF 20.3
2152 0EAA: MOVF 20,W
2153 0EAB: BSF 03.5
2154 0EAC: MOVWF 07
2155 0EAD: BCF 03.5
2156 0EAE: BTFSS 07.3
2157 0EAF: GOTO 6AE
2158 0EB0: NOP
2159 0EB1: GOTO 6B2
2160 0EB2: NOP
2161 0EB3: BSF 20.4
2162 0EB4: MOVF 20,W
2163 0EB5: BSF 03.5
2164 0EB6: MOVWF 07
2165 0EB7: NOP
2166 ....................
2167 ....................
2168 .................... data4 = (((unsigned int16) INTEP1 << 8) + INTEP );
2169 0EB8: BCF 03.5
2170 0EB9: CLRF 3C
2171 0EBA: MOVF 22,W
2172 0EBB: MOVWF 3B
2173 0EBC: MOVWF 3C
2174 0EBD: CLRF 3B
2175 0EBE: MOVF 21,W
2176 0EBF: ADDWF 3B,W
2177 0EC0: MOVWF 2D
2178 0EC1: MOVF 3C,W
2179 0EC2: MOVWF 2E
2180 0EC3: BTFSC 03.0
2181 0EC4: INCF 2E,F
2182 .................... data4 = (data4/10)-273;
2183 0EC5: MOVF 2E,W
2184 0EC6: MOVWF 3C
2185 0EC7: MOVF 2D,W
2186 0EC8: MOVWF 3B
2187 0EC9: CLRF 3E
2188 0ECA: MOVLW 0A
2189 0ECB: MOVWF 3D
2190 0ECC: BCF 0A.3
2191 0ECD: GOTO 1E6
2192 0ECE: BSF 0A.3
2193 0ECF: MOVF 79,W
2194 0ED0: MOVWF 3C
2195 0ED1: MOVF 78,W
2196 0ED2: MOVWF 3B
2197 0ED3: MOVLW 11
2198 0ED4: SUBWF 3B,W
2199 0ED5: MOVWF 2D
2200 0ED6: MOVF 3C,W
2201 0ED7: MOVWF 2E
2202 0ED8: MOVLW 01
2203 0ED9: BTFSS 03.0
2204 0EDA: MOVLW 02
2205 0EDB: SUBWF 2E,F
2206 .................... data5 = (((unsigned int16) NAP1 << 8) + NAP );
2207 0EDC: CLRF 3C
2208 0EDD: MOVF 24,W
2209 0EDE: MOVWF 3B
2210 0EDF: MOVWF 3C
2211 0EE0: CLRF 3B
2212 0EE1: MOVF 23,W
2213 0EE2: ADDWF 3B,W
2214 0EE3: MOVWF 2F
2215 0EE4: MOVF 3C,W
2216 0EE5: MOVWF 30
2217 0EE6: BTFSC 03.0
2218 0EE7: INCF 30,F
2219 .................... data6 = (((unsigned int16) PROUD1 << 8) + PROUD );
2220 0EE8: CLRF 3C
2221 0EE9: MOVF 26,W
2222 0EEA: MOVWF 3B
2223 0EEB: MOVWF 3C
2224 0EEC: CLRF 3B
2225 0EED: MOVF 25,W
2226 0EEE: ADDWF 3B,W
2227 0EEF: MOVWF 31
2228 0EF0: MOVF 3C,W
2229 0EF1: MOVWF 32
2230 0EF2: BTFSC 03.0
2231 0EF3: INCF 32,F
2232 .................... data7 = (((unsigned int16) KAPZ1 << 8) + KAPZ );
2233 0EF4: CLRF 3C
2234 0EF5: MOVF 28,W
2235 0EF6: MOVWF 3B
2236 0EF7: MOVWF 3C
2237 0EF8: CLRF 3B
2238 0EF9: MOVF 27,W
2239 0EFA: ADDWF 3B,W
2240 0EFB: MOVWF 33
2241 0EFC: MOVF 3C,W
2242 0EFD: MOVWF 34
2243 0EFE: BTFSC 03.0
2244 0EFF: INCF 34,F
2245 .................... data8 = (((unsigned int16) KAPC1 << 8) + KAPC );
2246 0F00: CLRF 3C
2247 0F01: MOVF 2A,W
2248 0F02: MOVWF 3B
2249 0F03: MOVWF 3C
2250 0F04: CLRF 3B
2251 0F05: MOVF 29,W
2252 0F06: ADDWF 3B,W
2253 0F07: MOVWF 35
2254 0F08: MOVF 3C,W
2255 0F09: MOVWF 36
2256 0F0A: BTFSC 03.0
2257 0F0B: INCF 36,F
2258 .................... data9 = (((unsigned int16) STAV1 << 8) + STAV );
2259 0F0C: CLRF 3C
2260 0F0D: MOVF 2C,W
2261 0F0E: MOVWF 3B
2262 0F0F: MOVWF 3C
2263 0F10: CLRF 3B
2264 0F11: MOVF 2B,W
2265 0F12: ADDWF 3B,W
2266 0F13: MOVWF 37
2267 0F14: MOVF 3C,W
2268 0F15: MOVWF 38
2269 0F16: BTFSC 03.0
2270 0F17: INCF 38,F
2271 ....................
2272 ....................
2273 ....................
2274 ....................
2275 ....................
2276 .................... printf("Teplota uvnitr io: %Ld C\r\n", data4);
2277 0F18: MOVLW 1B
2278 0F19: BSF 03.6
2279 0F1A: MOVWF 0D
2280 0F1B: MOVLW 00
2281 0F1C: MOVWF 0F
2282 0F1D: BCF 03.0
2283 0F1E: MOVLW 13
2284 0F1F: BCF 03.6
2285 0F20: MOVWF 3B
2286 0F21: BCF 0A.3
2287 0F22: CALL 174
2288 0F23: BSF 0A.3
2289 0F24: MOVLW 10
2290 0F25: MOVWF 04
2291 0F26: MOVF 2E,W
2292 0F27: MOVWF 3C
2293 0F28: MOVF 2D,W
2294 0F29: MOVWF 3B
2295 0F2A: BCF 0A.3
2296 0F2B: CALL 20D
2297 0F2C: BSF 0A.3
2298 0F2D: MOVLW 26
2299 0F2E: BSF 03.6
2300 0F2F: MOVWF 0D
2301 0F30: MOVLW 00
2302 0F31: MOVWF 0F
2303 0F32: BCF 03.0
2304 0F33: MOVLW 04
2305 0F34: BCF 03.6
2306 0F35: MOVWF 3B
2307 0F36: BCF 0A.3
2308 0F37: CALL 174
2309 0F38: BSF 0A.3
2310 .................... printf("Napeti clanku: %Ld mV \r\n", data5);
2311 0F39: MOVLW 29
2312 0F3A: BSF 03.6
2313 0F3B: MOVWF 0D
2314 0F3C: MOVLW 00
2315 0F3D: MOVWF 0F
2316 0F3E: BCF 03.0
2317 0F3F: MOVLW 0F
2318 0F40: BCF 03.6
2319 0F41: MOVWF 3B
2320 0F42: BCF 0A.3
2321 0F43: CALL 174
2322 0F44: BSF 0A.3
2323 0F45: MOVLW 10
2324 0F46: MOVWF 04
2325 0F47: MOVF 30,W
2326 0F48: MOVWF 3C
2327 0F49: MOVF 2F,W
2328 0F4A: MOVWF 3B
2329 0F4B: BCF 0A.3
2330 0F4C: CALL 20D
2331 0F4D: BSF 0A.3
2332 0F4E: MOVLW 32
2333 0F4F: BSF 03.6
2334 0F50: MOVWF 0D
2335 0F51: MOVLW 00
2336 0F52: MOVWF 0F
2337 0F53: BCF 03.0
2338 0F54: MOVLW 06
2339 0F55: BCF 03.6
2340 0F56: MOVWF 3B
2341 0F57: BCF 0A.3
2342 0F58: CALL 174
2343 0F59: BSF 0A.3
2344 .................... printf("Proud: %Ld mA \r\n", data6);
2345 0F5A: MOVLW 36
2346 0F5B: BSF 03.6
2347 0F5C: MOVWF 0D
2348 0F5D: MOVLW 00
2349 0F5E: MOVWF 0F
2350 0F5F: BCF 03.0
2351 0F60: MOVLW 07
2352 0F61: BCF 03.6
2353 0F62: MOVWF 3B
2354 0F63: BCF 0A.3
2355 0F64: CALL 174
2356 0F65: BSF 0A.3
2357 0F66: MOVLW 10
2358 0F67: MOVWF 04
2359 0F68: MOVF 32,W
2360 0F69: MOVWF 3C
2361 0F6A: MOVF 31,W
2362 0F6B: MOVWF 3B
2363 0F6C: BCF 0A.3
2364 0F6D: CALL 20D
2365 0F6E: BSF 0A.3
2366 0F6F: MOVLW 3B
2367 0F70: BSF 03.6
2368 0F71: MOVWF 0D
2369 0F72: MOVLW 00
2370 0F73: MOVWF 0F
2371 0F74: BCF 03.0
2372 0F75: MOVLW 06
2373 0F76: BCF 03.6
2374 0F77: MOVWF 3B
2375 0F78: BCF 0A.3
2376 0F79: CALL 174
2377 0F7A: BSF 0A.3
2378 .................... printf("Kapacita zbytek: %Ld mAh\r\n", data7);
2379 0F7B: MOVLW 3F
2380 0F7C: BSF 03.6
2381 0F7D: MOVWF 0D
2382 0F7E: MOVLW 00
2383 0F7F: MOVWF 0F
2384 0F80: BCF 03.0
2385 0F81: MOVLW 11
2386 0F82: BCF 03.6
2387 0F83: MOVWF 3B
2388 0F84: BCF 0A.3
2389 0F85: CALL 174
2390 0F86: BSF 0A.3
2391 0F87: MOVLW 10
2392 0F88: MOVWF 04
2393 0F89: MOVF 34,W
2394 0F8A: MOVWF 3C
2395 0F8B: MOVF 33,W
2396 0F8C: MOVWF 3B
2397 0F8D: BCF 0A.3
2398 0F8E: CALL 20D
2399 0F8F: BSF 0A.3
2400 0F90: MOVLW 49
2401 0F91: BSF 03.6
2402 0F92: MOVWF 0D
2403 0F93: MOVLW 00
2404 0F94: MOVWF 0F
2405 0F95: BCF 03.0
2406 0F96: MOVLW 06
2407 0F97: BCF 03.6
2408 0F98: MOVWF 3B
2409 0F99: BCF 0A.3
2410 0F9A: CALL 174
2411 0F9B: BSF 0A.3
2412 .................... printf("Kapacita max: %Ld mAh\r\n", data8);
2413 0F9C: MOVLW 4D
2414 0F9D: BSF 03.6
2415 0F9E: MOVWF 0D
2416 0F9F: MOVLW 00
2417 0FA0: MOVWF 0F
2418 0FA1: BCF 03.0
2419 0FA2: MOVLW 0E
2420 0FA3: BCF 03.6
2421 0FA4: MOVWF 3B
2422 0FA5: BCF 0A.3
2423 0FA6: CALL 174
2424 0FA7: BSF 0A.3
2425 0FA8: MOVLW 10
2426 0FA9: MOVWF 04
2427 0FAA: MOVF 36,W
2428 0FAB: MOVWF 3C
2429 0FAC: MOVF 35,W
2430 0FAD: MOVWF 3B
2431 0FAE: BCF 0A.3
2432 0FAF: CALL 20D
2433 0FB0: BSF 0A.3
2434 0FB1: MOVLW 55
2435 0FB2: BSF 03.6
2436 0FB3: MOVWF 0D
2437 0FB4: MOVLW 00
2438 0FB5: MOVWF 0F
2439 0FB6: BSF 03.0
2440 0FB7: MOVLW 06
2441 0FB8: BCF 03.6
2442 0FB9: MOVWF 3B
2443 0FBA: BCF 0A.3
2444 0FBB: CALL 174
2445 0FBC: BSF 0A.3
2446 .................... printf("Stav: %Ld (procenta)\r\n", data9);
2447 0FBD: MOVLW 59
2448 0FBE: BSF 03.6
2449 0FBF: MOVWF 0D
2450 0FC0: MOVLW 00
2451 0FC1: MOVWF 0F
2452 0FC2: BCF 03.0
2453 0FC3: MOVLW 06
2454 0FC4: BCF 03.6
2455 0FC5: MOVWF 3B
2456 0FC6: BCF 0A.3
2457 0FC7: CALL 174
2458 0FC8: BSF 0A.3
2459 0FC9: MOVLW 10
2460 0FCA: MOVWF 04
2461 0FCB: MOVF 38,W
2462 0FCC: MOVWF 3C
2463 0FCD: MOVF 37,W
2464 0FCE: MOVWF 3B
2465 0FCF: BCF 0A.3
2466 0FD0: CALL 20D
2467 0FD1: BSF 0A.3
2468 0FD2: MOVLW 5D
2469 0FD3: BSF 03.6
2470 0FD4: MOVWF 0D
2471 0FD5: MOVLW 00
2472 0FD6: MOVWF 0F
2473 0FD7: BSF 03.0
2474 0FD8: MOVLW 0D
2475 0FD9: BCF 03.6
2476 0FDA: MOVWF 3B
2477 0FDB: BCF 0A.3
2478 0FDC: CALL 174
2479 0FDD: BSF 0A.3
2480 ....................
2481 ....................
2482 .................... delay_ms (2000);
2483 0FDE: MOVLW 08
2484 0FDF: MOVWF 3B
2485 0FE0: MOVLW FA
2486 0FE1: MOVWF 3C
2487 0FE2: BCF 0A.3
2488 0FE3: CALL 160
2489 0FE4: BSF 0A.3
2490 0FE5: DECFSZ 3B,F
2491 0FE6: GOTO 7E0
2492 ....................
2493 ....................
2494 ....................
2495 .................... }
2496 0FE7: GOTO 06E
2497 .................... }
2498 ....................
2499 0FE8: SLEEP
2500  
2501 Configuration Fuses:
2502 Word 1: 2CF5 INTRC NOWDT NOPUT MCLR NOPROTECT NOCPD NOBROWNOUT IESO FCMEN NOLVP NODEBUG
2503 Word 2: 3FFF NOWRT BORV40