Rev Author Line No. Line
152 kapl 1 CCS PCM C Compiler, Version 4.059d, 15399 26-II-07 19:37
2  
3 Filename: main.lst
4  
5 ROM used: 543 words (27%)
6 Largest free fragment is 1505
7 RAM used: 28 (8%) at main() level
8 38 (10%) worst case
9 Stack: 4 locations
10  
11 *
12 0000: MOVLW 00
13 0001: MOVWF 0A
14 0002: GOTO 141
15 0003: NOP
16 .................... #include "C:\RS\projekty\4lcdmob\main.h"
17 .................... #include <16F877A.h>
18 .................... //////// Standard Header file for the PIC16F877A device ////////////////
19 .................... #device PIC16F877A
20 .................... #list
21 ....................
22 .................... #device adc=8
23 ....................
24 .................... #FUSES NOWDT //No Watch Dog Timer
25 .................... #FUSES XT //Crystal osc <= 4mhz
26 .................... #FUSES NOPUT //No Power Up Timer
27 .................... #FUSES NOPROTECT //Code not protected from reading
28 .................... #FUSES NODEBUG //No Debug mode for ICD
29 .................... #FUSES NOBROWNOUT //No brownout reset
30 .................... #FUSES NOLVP //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O
31 .................... #FUSES NOCPD //No EE protection
32 .................... #FUSES NOWRT //Program memory not write protected
33 ....................
34 .................... #use delay(clock=4000000,RESTART_WDT)
35 *
36 0067: MOVLW 37
37 0068: MOVWF 04
38 0069: BCF 03.7
39 006A: MOVF 00,W
40 006B: BTFSC 03.2
41 006C: GOTO 07E
42 006D: MOVLW 01
43 006E: MOVWF 78
44 006F: MOVLW BF
45 0070: MOVWF 77
46 0071: CLRWDT
47 0072: DECFSZ 77,F
48 0073: GOTO 071
49 0074: DECFSZ 78,F
50 0075: GOTO 06F
51 0076: MOVLW 4A
52 0077: MOVWF 77
53 0078: DECFSZ 77,F
54 0079: GOTO 078
55 007A: NOP
56 007B: CLRWDT
57 007C: DECFSZ 00,F
58 007D: GOTO 06D
59 007E: RETLW 00
60 .................... #use rs232(baud=19200,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8)
61 ....................
62 ....................
63 ....................
64 .................... #define LCD_RS PIN_B1 // rizeni registru LCD displeje
65 .................... #define LCD_E PIN_B0 // enable LCD displeje
66 .................... #define LCD_DATA_LSB PIN_C0 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
67 ....................
68 .................... #include "mylcd.c"
69 .................... // LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem
70 .................... // (c)miho 2002
71 .................... //
72 .................... // Historie:
73 .................... //
74 .................... // 0.0 Uvodni verze se snadnou definici portu LCD displeje
75 .................... //
76 .................... //
77 .................... // Funkce:
78 .................... //
79 .................... // lcd_init() inicializuje LCD displej a porty, nutno volat jako prvni
80 .................... //
81 .................... // lcd_putc(c) zapis snaku do lcd displeje, zpracovava nasledujici ridici znaky
82 .................... // \f = \x0C - nova stranka - smazani displeje
83 .................... // \n = \x0A - odradkovani (prechod na druhou radku)
84 .................... // \b = \x08 - backspace - posunuti kurzoru o 1 pozici zpet
85 .................... // \r = \x0D - goto home to position 1,1
86 .................... // \0 .. \7 - definovatelne znaky v pozicich 0 az 7 v CGRAM
87 .................... // \20 .. \27 - alternativne zapsane znaky (oktalove) v pozicich 0 az 7 CGRAM
88 .................... // Pozor na to, ze funkce printf konci tisk pokud narazi na \0 (konec retezce)
89 .................... //
90 .................... // lcd_gotoxy(x,y) presune kurzor na uvedenou adresu
91 .................... // nekontroluje parametry
92 .................... //
93 .................... // lcd_cursor_on zapne kurzor
94 .................... // lcd_cursor_off vypne kurzor
95 .................... //
96 .................... // lcd_define_char(Index, Def) Makro, ktere definuje znaky od pozice Index obsahem definicniho
97 .................... // retezce Def. Kazdych 8 znaku retezce Def definuje dalsi znak v CGRAM.
98 .................... // Kapacita CGRAM je celkem 8 znaku s indexem 0 az 7.
99 .................... // Na konci se provede lcd_gotoxy(1,1).
100 .................... // Na konci teto knihovny je priklad pouziti definovanych znaku
101 .................... //
102 .................... // Definice portu:
103 .................... //
104 .................... // #DEFINE LCD_RS PIN_B2 // rizeni registru LCD displeje
105 .................... // #DEFINE LCD_E PIN_B1 // enable LCD displeje
106 .................... // #DEFINE LCD_DATA_LSB PIN_C2 // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou)
107 ....................
108 ....................
109 ....................
110 ....................
111 .................... // Privatni sekce, cist jen v pripade, ze neco nefunguje
112 ....................
113 ....................
114 ....................
115 ....................
116 .................... // Generovane defince portu pro ucely teto knihovny aby kod generoval spravne IO operace a soucasne
117 .................... // bylo mozne jednoduse deklarovat pripojene piny LCD displeje pri pouziti teto knihovny. Problem spociva
118 .................... // v tom, ze se musi spravne ridit smery portu a soucasne datovy port zabira jen 4 bity ze zadaneho portu
119 .................... //
120 .................... #DEFINE LCD_SHIFT (LCD_DATA_LSB&7) // pocet bitu posuvu dataoveho kanalu v datovem portu
121 .................... #DEFINE LCD_PORT (LCD_DATA_LSB>>3) // adresa LCD datoveho portu
122 .................... #DEFINE LCD_TRIS (LCD_PORT+0x80) // adresa prislusneho TRIS registru
123 .................... #DEFINE LCD_MASK (0xF<<LCD_SHIFT) // maska platnych bitu
124 .................... //
125 .................... #IF LCD_SHIFT>4 // kontrola mezi
126 .................... #ERROR LCD data port LSB bit not in range 0..4
127 .................... #ENDIF
128 ....................
129 ....................
130 .................... // Definice konstant pro LCD display
131 .................... //
132 .................... #define LCD_CURSOR_ON_ 0x0E // kurzor jako blikajici radka pod znakem
133 .................... #define LCD_CURSOR_OFF_ 0x0C // zadny kurzor
134 .................... #define LCD_LINE_2 0x40 // adresa 1. znaku 2. radky
135 ....................
136 ....................
137 .................... // Definice rezimu LCD displeje
138 .................... //
139 .................... BYTE const LCD_INIT_STRING[4] =
140 .................... {
141 .................... 0x28, // intrfejs 4 bity, 2 radky, font 5x7
142 .................... LCD_CURSOR_OFF_, // display on, kurzor off,
143 .................... 0x01, // clear displeje
144 .................... 0x06 // inkrement pozice kurzoru (posun kurzoru doprava)
145 .................... };
146 ....................
147 ....................
148 .................... // Odesle nibble do displeje (posle data a klikne signalem e)
149 .................... //
150 .................... void lcd_send_nibble( BYTE n )
151 .................... {
152 .................... *LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK); // nastav datove bity portu a ostatni zachovej
153 007F: MOVF 07,W
154 0080: ANDLW F0
155 0081: MOVWF 3E
156 0082: MOVF 3D,W
157 0083: ANDLW 0F
158 0084: IORWF 3E,W
159 0085: MOVWF 07
160 .................... output_bit(LCD_E,1); // vzestupna hrana
161 0086: BSF 06.0
162 0087: BSF 03.5
163 0088: BCF 06.0
164 .................... delay_us(100); // pockej alespon 450ns od e nebo alespon 195ns od dat
165 0089: CLRWDT
166 008A: MOVLW 20
167 008B: MOVWF 77
168 008C: DECFSZ 77,F
169 008D: GOTO 08C
170 008E: GOTO 08F
171 .................... output_bit(LCD_E,0); // sestupna hrana (minimalni perioda e je 1us)
172 008F: BCF 03.5
173 0090: BCF 06.0
174 0091: BSF 03.5
175 0092: BCF 06.0
176 .................... }
177 0093: BCF 03.5
178 0094: RETLW 00
179 ....................
180 ....................
181 .................... // Odesle bajt do registru LCD
182 .................... //
183 .................... // Pokud je Adr=0 .. instrukcni registr
184 .................... // Pokud je Adr=1 .. datovy registr
185 .................... //
186 .................... void lcd_send_byte( BOOLEAN Adr, BYTE n )
187 .................... {
188 .................... output_bit(LCD_RS,Adr); // vyber registr
189 0095: MOVF 3B,F
190 0096: BTFSS 03.2
191 0097: GOTO 09A
192 0098: BCF 06.1
193 0099: GOTO 09B
194 009A: BSF 06.1
195 009B: BSF 03.5
196 009C: BCF 06.1
197 .................... swap(n);
198 009D: BCF 03.5
199 009E: SWAPF 3C,F
200 .................... lcd_send_nibble(n); // posli horni pulku bajtu
201 009F: MOVF 3C,W
202 00A0: MOVWF 3D
203 00A1: CALL 07F
204 .................... swap(n);
205 00A2: SWAPF 3C,F
206 .................... lcd_send_nibble(n); // posli spodni pulku bajtu
207 00A3: MOVF 3C,W
208 00A4: MOVWF 3D
209 00A5: CALL 07F
210 .................... delay_us(200); // minimalni doba na provedeni prikazu
211 00A6: CLRWDT
212 00A7: MOVLW 42
213 00A8: MOVWF 77
214 00A9: DECFSZ 77,F
215 00AA: GOTO 0A9
216 .................... }
217 00AB: RETLW 00
218 ....................
219 ....................
220 .................... // Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje
221 .................... //
222 .................... // Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur
223 .................... //
224 .................... void lcd_init()
225 .................... {
226 ....................
227 .................... int i; // pocitadlo cyklu
228 ....................
229 .................... delay_ms(20); // spozdeni pro provedeni startu displeje po zapnuti napajeni
230 00AC: MOVLW 14
231 00AD: MOVWF 37
232 00AE: CALL 067
233 ....................
234 .................... *LCD_TRIS = *LCD_TRIS & ~LCD_MASK; // nuluj odpovidajici bity tris registru datoveho portu LCD
235 00AF: MOVLW F0
236 00B0: BSF 03.5
237 00B1: ANDWF 07,F
238 ....................
239 .................... output_bit(LCD_RS,0); // nastav jako vystup a nastav klidovy stav
240 00B2: BCF 03.5
241 00B3: BCF 06.1
242 00B4: BSF 03.5
243 00B5: BCF 06.1
244 .................... output_bit(LCD_E,0); // nastav jako vystup a nastav klidovy stav
245 00B6: BCF 03.5
246 00B7: BCF 06.0
247 00B8: BSF 03.5
248 00B9: BCF 06.0
249 ....................
250 .................... for (i=0; i<3; i++) // nastav lcd do rezimu 8 bitu sbernice
251 00BA: BCF 03.5
252 00BB: CLRF 35
253 00BC: MOVF 35,W
254 00BD: SUBLW 02
255 00BE: BTFSS 03.0
256 00BF: GOTO 0C8
257 .................... {
258 .................... delay_ms(2); // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
259 00C0: MOVLW 02
260 00C1: MOVWF 37
261 00C2: CALL 067
262 .................... lcd_send_nibble(3); // rezim 8 bitu
263 00C3: MOVLW 03
264 00C4: MOVWF 3D
265 00C5: CALL 07F
266 .................... }
267 00C6: INCF 35,F
268 00C7: GOTO 0BC
269 ....................
270 .................... delay_us(40); // cas na zpracovani
271 00C8: CLRWDT
272 00C9: MOVLW 0C
273 00CA: MOVWF 77
274 00CB: DECFSZ 77,F
275 00CC: GOTO 0CB
276 00CD: GOTO 0CE
277 .................... lcd_send_nibble(2); // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
278 00CE: MOVLW 02
279 00CF: MOVWF 3D
280 00D0: CALL 07F
281 .................... delay_us(40); // cas na zpracovani
282 00D1: CLRWDT
283 00D2: MOVLW 0C
284 00D3: MOVWF 77
285 00D4: DECFSZ 77,F
286 00D5: GOTO 0D4
287 00D6: GOTO 0D7
288 ....................
289 .................... for (i=0;i<3;i++) // proved inicializaci (nastaveni modu, smazani apod)
290 00D7: CLRF 35
291 00D8: MOVF 35,W
292 00D9: SUBLW 02
293 00DA: BTFSS 03.0
294 00DB: GOTO 0E8
295 .................... {
296 .................... lcd_send_byte(0,LCD_INIT_STRING[i]);
297 00DC: MOVF 35,W
298 00DD: CALL 004
299 00DE: MOVWF 36
300 00DF: CLRF 3B
301 00E0: MOVF 36,W
302 00E1: MOVWF 3C
303 00E2: CALL 095
304 .................... delay_ms(2);
305 00E3: MOVLW 02
306 00E4: MOVWF 37
307 00E5: CALL 067
308 .................... }
309 00E6: INCF 35,F
310 00E7: GOTO 0D8
311 .................... }
312 00E8: GOTO 192 (RETURN)
313 ....................
314 ....................
315 .................... // Proved presun kurzoru
316 .................... //
317 .................... // Pozice 1.1 je domu
318 .................... //
319 .................... #separate
320 .................... void lcd_gotoxy( BYTE x, BYTE y)
321 .................... {
322 ....................
323 .................... BYTE Adr;
324 ....................
325 .................... switch(y)
326 .................... {
327 00E9: MOVLW 01
328 00EA: SUBWF 38,W
329 00EB: ADDLW FC
330 00EC: BTFSC 03.0
331 00ED: GOTO 0FB
332 00EE: ADDLW 04
333 00EF: GOTO 106
334 .................... case 1: Adr=0; break;
335 00F0: CLRF 39
336 00F1: GOTO 0FB
337 .................... case 2: Adr=0x40; break;
338 00F2: MOVLW 40
339 00F3: MOVWF 39
340 00F4: GOTO 0FB
341 .................... case 3: Adr=0x14; break;
342 00F5: MOVLW 14
343 00F6: MOVWF 39
344 00F7: GOTO 0FB
345 .................... case 4: Adr=0x54; break;
346 00F8: MOVLW 54
347 00F9: MOVWF 39
348 00FA: GOTO 0FB
349 .................... }
350 .................... Adr+=x-1;
351 00FB: MOVLW 01
352 00FC: SUBWF 37,W
353 00FD: ADDWF 39,F
354 ....................
355 .................... lcd_send_byte(0,0x80|Adr);
356 00FE: MOVF 39,W
357 00FF: IORLW 80
358 0100: MOVWF 3A
359 0101: CLRF 3B
360 0102: MOVF 3A,W
361 0103: MOVWF 3C
362 0104: CALL 095
363 .................... }
364 0105: RETLW 00
365 ....................
366 ....................
367 .................... // Zapis znaku na displej, zpracovani ridicich znaku
368 .................... //
369 .................... #separate
370 .................... void lcd_putc( char c)
371 .................... {
372 ....................
373 .................... switch (c)
374 .................... {
375 *
376 010E: MOVF 36,W
377 010F: XORLW 0C
378 0110: BTFSC 03.2
379 0111: GOTO 11C
380 0112: XORLW 06
381 0113: BTFSC 03.2
382 0114: GOTO 124
383 0115: XORLW 07
384 0116: BTFSC 03.2
385 0117: GOTO 12A
386 0118: XORLW 05
387 0119: BTFSC 03.2
388 011A: GOTO 12F
389 011B: GOTO 134
390 .................... case '\f' : lcd_send_byte(0,1); // smaz displej
391 011C: CLRF 3B
392 011D: MOVLW 01
393 011E: MOVWF 3C
394 011F: CALL 095
395 .................... delay_ms(2);
396 0120: MOVLW 02
397 0121: MOVWF 37
398 0122: CALL 067
399 .................... break;
400 0123: GOTO 140
401 .................... case '\n' : lcd_gotoxy(1,2); break; // presun se na 1. znak 2. radky
402 0124: MOVLW 01
403 0125: MOVWF 37
404 0126: MOVLW 02
405 0127: MOVWF 38
406 0128: CALL 0E9
407 0129: GOTO 140
408 .................... case '\r' : lcd_gotoxy(1,1); break; // presun home
409 012A: MOVLW 01
410 012B: MOVWF 37
411 012C: MOVWF 38
412 012D: CALL 0E9
413 012E: GOTO 140
414 .................... case '\b' : lcd_send_byte(0,0x10); break; // posun kurzor o 1 zpet
415 012F: CLRF 3B
416 0130: MOVLW 10
417 0131: MOVWF 3C
418 0132: CALL 095
419 0133: GOTO 140
420 .................... default : if (c<0x20) c&=0x7; // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
421 0134: MOVF 36,W
422 0135: SUBLW 1F
423 0136: BTFSS 03.0
424 0137: GOTO 13A
425 0138: MOVLW 07
426 0139: ANDWF 36,F
427 .................... lcd_send_byte(1,c); break; // zapis znak
428 013A: MOVLW 01
429 013B: MOVWF 3B
430 013C: MOVF 36,W
431 013D: MOVWF 3C
432 013E: CALL 095
433 013F: GOTO 140
434 .................... }
435 .................... }
436 0140: RETLW 00
437 ....................
438 ....................
439 .................... // Zapni kurzor
440 .................... //
441 .................... void lcd_cursor_on()
442 .................... {
443 .................... lcd_send_byte(0,LCD_CURSOR_ON_);
444 .................... }
445 ....................
446 ....................
447 .................... // Vypni kurzor
448 .................... //
449 .................... void lcd_cursor_off()
450 .................... {
451 .................... lcd_send_byte(0,LCD_CURSOR_OFF_);
452 .................... }
453 ....................
454 ....................
455 .................... // Definice vlastnich fontu
456 .................... //
457 .................... // Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje
458 .................... // Pro snadne definovani jsou pripraveny nasledujici definice a na konci souboru je uveden
459 .................... // priklad pouziti definovanych znaku.
460 ....................
461 ....................
462 .................... // Pomocna procedura pro posilani ridicich dat do radice displeje
463 .................... //
464 .................... void lcd_putc2(int Data)
465 .................... {
466 .................... lcd_send_byte(1,Data);
467 .................... }
468 ....................
469 ....................
470 .................... // Pomocne definice pro programovani obsahu CGRAM
471 .................... //
472 .................... #DEFINE lcd_define_start(Code) lcd_send_byte(0,0x40+(Code<<3)); delay_ms(2)
473 .................... #DEFINE lcd_define_def(String) printf(lcd_putc2,String);
474 .................... #DEFINE lcd_define_end() lcd_send_byte(0,3); delay_ms(2)
475 ....................
476 ....................
477 .................... // Vlastni vykonne makro pro definovani fontu do pozice Index CGRAM s definicnim retezcem Def
478 .................... //
479 .................... #DEFINE lcd_define_char(Index, Def) lcd_define_start(Index); lcd_define_def(Def); lcd_define_end();
480 ....................
481 ....................
482 .................... // Pripravene definice fontu vybranych znaku
483 .................... // V tabulce nesmi byt 00 (konec retezce v printf()), misto toho davame 80
484 .................... //
485 .................... #DEFINE LCD_CHAR_BAT100 "\x0E\x1F\x1F\x1F\x1F\x1F\x1F\x1F" /* symbol plne baterie */
486 .................... #DEFINE LCD_CHAR_BAT50 "\x0E\x1F\x11\x11\x13\x17\x1F\x1F" /* symbol polovicni baterie */
487 .................... #DEFINE LCD_CHAR_BAT0 "\x0E\x1F\x11\x11\x11\x11\x11\x1F" /* symbol vybite baterie */
488 .................... #DEFINE LCD_CHAR_LUA "\x04\x0E\x11\x11\x1F\x11\x11\x80" /* A s carkou */
489 .................... #DEFINE LCD_CHAR_LLA "\x01\x02\x0E\x01\x1F\x11\x0F\x80" /* a s carkou */
490 .................... #DEFINE LCD_CHAR_HUC "\x0A\x0E\x11\x10\x10\x11\x0E\x80" /* C s hackem */
491 .................... #DEFINE LCD_CHAR_HLC "\x0A\x04\x0E\x10\x10\x11\x0E\x80" /* c s hackem */
492 .................... #DEFINE LCD_CHAR_HUD "\x0A\x1C\x12\x11\x11\x12\x1C\x80" /* D s hackem */
493 .................... #DEFINE LCD_CHAR_HLD "\x05\x03\x0D\x13\x11\x11\x0F\x80" /* d s hackem */
494 .................... #DEFINE LCD_CHAR_LUE "\x04\x1F\x10\x10\x1E\x10\x1F\x80" /* E s carkou */
495 .................... #DEFINE LCD_CHAR_LLE "\x01\x02\x0E\x11\x1F\x10\x0E\x80" /* e s carkou */
496 .................... #DEFINE LCD_CHAR_HUE "\x0A\x1F\x10\x1E\x10\x10\x1F\x80" /* E s hackem */
497 .................... #DEFINE LCD_CHAR_HLE "\x0A\x04\x0E\x11\x1F\x10\x0E\x80" /* e s hackem */
498 .................... #DEFINE LCD_CHAR_LUI "\x04\x0E\x04\x04\x04\x04\x0E\x80" /* I s carkou */
499 .................... #DEFINE LCD_CHAR_LLI "\x02\x04\x80\x0C\x04\x04\x0E\x80" /* i s carkou */
500 .................... #DEFINE LCD_CHAR_HUN "\x0A\x15\x11\x19\x15\x13\x11\x80" /* N s hackem */
501 .................... #DEFINE LCD_CHAR_HLN "\x0A\x04\x16\x19\x11\x11\x11\x80" /* n s hackem */
502 .................... #DEFINE LCD_CHAR_LUO "\x04\x0E\x11\x11\x11\x11\x0E\x80" /* O s carkou */
503 .................... #DEFINE LCD_CHAR_LLO "\x02\x04\x0E\x11\x11\x11\x0E\x80" /* o s carkou */
504 .................... #DEFINE LCD_CHAR_HUR "\x0A\x1E\x11\x1E\x14\x12\x11\x80" /* R s hackem */
505 .................... #DEFINE LCD_CHAR_HLR "\x0A\x04\x16\x19\x10\x10\x10\x80" /* r s hackem */
506 .................... #DEFINE LCD_CHAR_HUS "\x0A\x0F\x10\x0E\x01\x01\x1E\x80" /* S s hackem */
507 .................... #DEFINE LCD_CHAR_HLS "\x0A\x04\x0E\x10\x0E\x01\x1E\x80" /* s s hackem */
508 .................... #DEFINE LCD_CHAR_HUT "\x0A\x1F\x04\x04\x04\x04\x04\x80" /* T s hackem */
509 .................... #DEFINE LCD_CHAR_HLT "\x0A\x0C\x1C\x08\x08\x09\x06\x80" /* t s hackem */
510 .................... #DEFINE LCD_CHAR_LUU "\x02\x15\x11\x11\x11\x11\x0E\x80" /* U s carkou */
511 .................... #DEFINE LCD_CHAR_LLU "\x02\x04\x11\x11\x11\x13\x0D\x80" /* u s carkou */
512 .................... #DEFINE LCD_CHAR_CUU "\x06\x17\x11\x11\x11\x11\x0E\x80" /* U s krouzkem */
513 .................... #DEFINE LCD_CHAR_CLU "\x06\x06\x11\x11\x11\x11\x0E\x80" /* u s krouzkem */
514 .................... #DEFINE LCD_CHAR_LUY "\x02\x15\x11\x0A\x04\x04\x04\x80" /* Y s carkou */
515 .................... #DEFINE LCD_CHAR_LLY "\x02\x04\x11\x11\x0F\x01\x0E\x80" /* y s carkou */
516 .................... #DEFINE LCD_CHAR_HUZ "\x0A\x1F\x01\x02\x04\x08\x1F\x80" /* Z s hackem */
517 .................... #DEFINE LCD_CHAR_HLZ "\x0A\x04\x1F\x02\x04\x08\x1F\x80" /* z s hackem */
518 ....................
519 ....................
520 .................... // Priklad pouziti definovanych znaku
521 .................... //
522 .................... //
523 .................... //void lcd_sample()
524 .................... //{
525 .................... // lcd_define_char(0,LCD_CHAR_BAT50); // Priklad definice znaku baterie do pozice 0
526 .................... // lcd_define_char(2,LCD_CHAR_HLE LCD_CHAR_LUI); // Priklad definice znaku e s hackem a I s carkou od pozice 2
527 .................... // // vsimnete si, ze neni carka mezi retezci s definici (oba retezce definuji
528 .................... // // jediny definicni retezec)
529 .................... // printf(lcd_putc,"\fZnaky:\20\22\23"); // priklad vypisu znaku z pozice 0, 2 a 3
530 .................... // delay_ms(1000);
531 .................... // lcd_define_char(0,LCD_CHAR_BAT0); // Predefinovani tvaru znaku v pozici 0
532 .................... // delay_ms(1000);
533 .................... //}
534 ....................
535 ....................
536 .................... int sig[20];
537 ....................
538 .................... void main()
539 .................... {
540 0141: CLRF 04
541 0142: BCF 03.7
542 0143: MOVLW 1F
543 0144: ANDWF 03,F
544 0145: MOVLW 0C
545 0146: BSF 03.5
546 0147: MOVWF 19
547 0148: MOVLW A6
548 0149: MOVWF 18
549 014A: MOVLW 90
550 014B: BCF 03.5
551 014C: MOVWF 18
552 014D: BSF 03.5
553 014E: BSF 1F.0
554 014F: BSF 1F.1
555 0150: BSF 1F.2
556 0151: BCF 1F.3
557 0152: MOVLW 07
558 0153: MOVWF 1C
559 ....................
560 .................... setup_adc_ports(NO_ANALOGS);
561 *
562 0157: BSF 03.5
563 0158: BSF 1F.0
564 0159: BSF 1F.1
565 015A: BSF 1F.2
566 015B: BCF 1F.3
567 .................... setup_adc(ADC_OFF);
568 015C: BCF 03.5
569 015D: BCF 1F.0
570 .................... setup_psp(PSP_DISABLED);
571 015E: BSF 03.5
572 015F: BCF 09.4
573 .................... setup_spi(SPI_SS_DISABLED);
574 *
575 0154: MOVLW FF
576 0155: BCF 03.5
577 0156: MOVWF 34
578 *
579 0160: BCF 03.5
580 0161: BCF 14.5
581 0162: BCF 34.5
582 0163: MOVF 34,W
583 0164: BSF 03.5
584 0165: MOVWF 07
585 0166: BCF 03.5
586 0167: BSF 34.4
587 0168: MOVF 34,W
588 0169: BSF 03.5
589 016A: MOVWF 07
590 016B: BCF 03.5
591 016C: BCF 34.3
592 016D: MOVF 34,W
593 016E: BSF 03.5
594 016F: MOVWF 07
595 0170: MOVLW 01
596 0171: BCF 03.5
597 0172: MOVWF 14
598 0173: MOVLW 00
599 0174: BSF 03.5
600 0175: MOVWF 14
601 .................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
602 0176: MOVF 01,W
603 0177: ANDLW C7
604 0178: IORLW 08
605 0179: MOVWF 01
606 .................... setup_timer_1(T1_DISABLED);
607 017A: BCF 03.5
608 017B: CLRF 10
609 .................... setup_timer_2(T2_DISABLED,0,1);
610 017C: MOVLW 00
611 017D: MOVWF 78
612 017E: MOVWF 12
613 017F: MOVLW 00
614 0180: BSF 03.5
615 0181: MOVWF 12
616 .................... setup_comparator(NC_NC_NC_NC);
617 0182: MOVLW 07
618 0183: MOVWF 1C
619 0184: MOVF 05,W
620 0185: CLRWDT
621 0186: MOVLW 02
622 0187: MOVWF 77
623 0188: DECFSZ 77,F
624 0189: GOTO 188
625 018A: GOTO 18B
626 018B: MOVF 1C,W
627 018C: BCF 03.5
628 018D: BCF 0D.6
629 .................... setup_vref(FALSE);
630 018E: BSF 03.5
631 018F: CLRF 1D
632 ....................
633 .................... lcd_init();
634 0190: BCF 03.5
635 0191: GOTO 0AC
636 .................... delay_ms(150);
637 0192: MOVLW 96
638 0193: MOVWF 37
639 0194: CALL 067
640 ....................
641 .................... printf(lcd_putc,"Baterie je nabita na");
642 0195: CLRF 35
643 0196: MOVF 35,W
644 0197: CALL 00C
645 0198: INCF 35,F
646 0199: MOVWF 77
647 019A: MOVWF 36
648 019B: CALL 10E
649 019C: MOVLW 14
650 019D: SUBWF 35,W
651 019E: BTFSS 03.2
652 019F: GOTO 196
653 .................... lcd_gotoxy(1,3);
654 01A0: MOVLW 01
655 01A1: MOVWF 37
656 01A2: MOVLW 03
657 01A3: MOVWF 38
658 01A4: CALL 0E9
659 .................... printf(lcd_putc,"a napajeni zajistuje");
660 01A5: CLRF 35
661 01A6: MOVF 35,W
662 01A7: CALL 025
663 01A8: INCF 35,F
664 01A9: MOVWF 77
665 01AA: MOVWF 36
666 01AB: CALL 10E
667 01AC: MOVLW 14
668 01AD: SUBWF 35,W
669 01AE: BTFSS 03.2
670 01AF: GOTO 1A6
671 .................... while(TRUE)
672 .................... {
673 .................... printf("AT+CBC\r");
674 01B0: CLRF 35
675 01B1: MOVF 35,W
676 01B2: CALL 03E
677 01B3: INCF 35,F
678 01B4: MOVWF 77
679 01B5: MOVF 77,W
680 01B6: BTFSS 0C.4
681 01B7: GOTO 1B6
682 01B8: MOVWF 19
683 01B9: MOVLW 07
684 01BA: SUBWF 35,W
685 01BB: BTFSS 03.2
686 01BC: GOTO 1B1
687 .................... gets(sig);
688 01BD: MOVLW 20
689 01BE: MOVWF 04
690 01BF: BCF 03.7
691 01C0: DECF 04,F
692 01C1: INCF 04,F
693 01C2: BTFSS 0C.5
694 01C3: GOTO 1C2
695 01C4: MOVF 1A,W
696 01C5: MOVWF 00
697 01C6: MOVLW 0D
698 01C7: SUBWF 00,W
699 01C8: BTFSS 03.2
700 01C9: GOTO 1C1
701 01CA: CLRF 00
702 .................... getc();
703 01CB: BTFSS 0C.5
704 01CC: GOTO 1CB
705 01CD: MOVF 1A,W
706 .................... gets(sig);
707 01CE: MOVLW 20
708 01CF: MOVWF 04
709 01D0: BCF 03.7
710 01D1: DECF 04,F
711 01D2: INCF 04,F
712 01D3: BTFSS 0C.5
713 01D4: GOTO 1D3
714 01D5: MOVF 1A,W
715 01D6: MOVWF 00
716 01D7: MOVLW 0D
717 01D8: SUBWF 00,W
718 01D9: BTFSS 03.2
719 01DA: GOTO 1D2
720 01DB: CLRF 00
721 ....................
722 .................... lcd_gotoxy(6,2);
723 01DC: MOVLW 06
724 01DD: MOVWF 37
725 01DE: MOVLW 02
726 01DF: MOVWF 38
727 01E0: CALL 0E9
728 .................... printf(lcd_putc,"%c%c procent",sig[9],sig[10]);
729 01E1: MOVF 29,W
730 01E2: MOVWF 36
731 01E3: CALL 10E
732 01E4: MOVF 2A,W
733 01E5: MOVWF 36
734 01E6: CALL 10E
735 01E7: MOVLW 04
736 01E8: MOVWF 35
737 01E9: MOVF 35,W
738 01EA: CALL 04A
739 01EB: INCF 35,F
740 01EC: MOVWF 77
741 01ED: MOVWF 36
742 01EE: CALL 10E
743 01EF: MOVLW 0C
744 01F0: SUBWF 35,W
745 01F1: BTFSS 03.2
746 01F2: GOTO 1E9
747 ....................
748 .................... if(sig[7]==48)
749 01F3: MOVF 27,W
750 01F4: SUBLW 30
751 01F5: BTFSS 03.2
752 01F6: GOTO 208
753 .................... {
754 .................... lcd_gotoxy(7,4);
755 01F7: MOVLW 07
756 01F8: MOVWF 37
757 01F9: MOVLW 04
758 01FA: MOVWF 38
759 01FB: CALL 0E9
760 .................... printf(lcd_putc,"baterie");
761 01FC: CLRF 35
762 01FD: MOVF 35,W
763 01FE: CALL 05B
764 01FF: INCF 35,F
765 0200: MOVWF 77
766 0201: MOVWF 36
767 0202: CALL 10E
768 0203: MOVLW 07
769 0204: SUBWF 35,W
770 0205: BTFSS 03.2
771 0206: GOTO 1FD
772 .................... }
773 .................... else
774 0207: GOTO 216
775 .................... {
776 .................... lcd_gotoxy(9,4);
777 0208: MOVLW 09
778 0209: MOVWF 37
779 020A: MOVLW 04
780 020B: MOVWF 38
781 020C: CALL 0E9
782 .................... printf(lcd_putc,"sit");
783 020D: MOVLW 73
784 020E: MOVWF 36
785 020F: CALL 10E
786 0210: MOVLW 69
787 0211: MOVWF 36
788 0212: CALL 10E
789 0213: MOVLW 74
790 0214: MOVWF 36
791 0215: CALL 10E
792 .................... }
793 ....................
794 .................... delay_ms(2500);
795 0216: MOVLW 0A
796 0217: MOVWF 35
797 0218: MOVLW FA
798 0219: MOVWF 37
799 021A: CALL 067
800 021B: DECFSZ 35,F
801 021C: GOTO 218
802 ....................
803 .................... }
804 021D: GOTO 1B0
805 .................... }
806 021E: SLEEP
807  
808 Configuration Fuses:
809 Word 1: 3F39 XT NOWDT NOPUT NODEBUG NOPROTECT NOBROWNOUT NOLVP NOCPD NOWRT