CCS PCM C Compiler, Version 4.059d, 15399               26-II-07 19:37

               Filename: main.lst

               ROM used: 543 words (27%)
                         Largest free fragment is 1505
               RAM used: 28 (8%) at main() level
                         38 (10%) worst case
               Stack:    4 locations

*
0000:  MOVLW  00
0001:  MOVWF  0A
0002:  GOTO   141
0003:  NOP
.................... #include "C:\RS\projekty\4lcdmob\main.h" 
.................... #include <16F877A.h> 
.................... //////// Standard Header file for the PIC16F877A device //////////////// 
.................... #device PIC16F877A 
.................... #list 
....................  
.................... #device adc=8 
....................  
.................... #FUSES NOWDT                       //No Watch Dog Timer 
.................... #FUSES XT                          //Crystal osc <= 4mhz 
.................... #FUSES NOPUT                       //No Power Up Timer 
.................... #FUSES NOPROTECT                   //Code not protected from reading 
.................... #FUSES NODEBUG                     //No Debug mode for ICD 
.................... #FUSES NOBROWNOUT                  //No brownout reset 
.................... #FUSES NOLVP                       //No low voltage prgming, B3(PIC16) or B5(PIC18) used for I/O 
.................... #FUSES NOCPD                       //No EE protection 
.................... #FUSES NOWRT                       //Program memory not write protected 
....................  
.................... #use delay(clock=4000000,RESTART_WDT) 
*
0067:  MOVLW  37
0068:  MOVWF  04
0069:  BCF    03.7
006A:  MOVF   00,W
006B:  BTFSC  03.2
006C:  GOTO   07E
006D:  MOVLW  01
006E:  MOVWF  78
006F:  MOVLW  BF
0070:  MOVWF  77
0071:  CLRWDT
0072:  DECFSZ 77,F
0073:  GOTO   071
0074:  DECFSZ 78,F
0075:  GOTO   06F
0076:  MOVLW  4A
0077:  MOVWF  77
0078:  DECFSZ 77,F
0079:  GOTO   078
007A:  NOP
007B:  CLRWDT
007C:  DECFSZ 00,F
007D:  GOTO   06D
007E:  RETLW  00
.................... #use rs232(baud=19200,parity=N,xmit=PIN_C6,rcv=PIN_C7,bits=8) 
....................  
....................  
....................  
.................... #define LCD_RS          PIN_B1      // rizeni registru LCD displeje 
.................... #define LCD_E           PIN_B0      // enable LCD displeje 
.................... #define LCD_DATA_LSB    PIN_C0     // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou) 
....................  
.................... #include "mylcd.c" 
.................... // LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem 
.................... // (c)miho 2002 
.................... // 
.................... // Historie: 
.................... // 
.................... // 0.0   Uvodni verze se snadnou definici portu LCD displeje 
.................... // 
.................... // 
.................... // Funkce: 
.................... // 
.................... //   lcd_init()            inicializuje LCD displej a porty, nutno volat jako prvni 
.................... // 
.................... //   lcd_putc(c)           zapis snaku do lcd displeje, zpracovava nasledujici ridici znaky 
.................... //                         \f = \x0C   - nova stranka - smazani displeje 
.................... //                         \n = \x0A   - odradkovani (prechod na druhou radku) 
.................... //                         \b = \x08   - backspace - posunuti kurzoru o 1 pozici zpet 
.................... //                         \r = \x0D   - goto home to position 1,1 
.................... //                         \0  .. \7   - definovatelne znaky v pozicich 0 az 7 v CGRAM 
.................... //                         \20 .. \27  - alternativne zapsane znaky (oktalove) v pozicich 0 az 7 CGRAM 
.................... //                         Pozor na to, ze funkce printf konci tisk pokud narazi na \0 (konec retezce) 
.................... // 
.................... //   lcd_gotoxy(x,y)       presune kurzor na uvedenou adresu 
.................... //                         nekontroluje parametry 
.................... // 
.................... //   lcd_cursor_on         zapne kurzor 
.................... //   lcd_cursor_off        vypne kurzor 
.................... // 
.................... //   lcd_define_char(Index, Def)       Makro, ktere definuje znaky od pozice Index obsahem definicniho 
.................... //                                     retezce Def. Kazdych 8 znaku retezce Def definuje dalsi znak v CGRAM. 
.................... //                                     Kapacita CGRAM je celkem 8 znaku s indexem 0 az 7. 
.................... //                                     Na konci se provede lcd_gotoxy(1,1). 
.................... //                                     Na konci teto knihovny je priklad pouziti definovanych znaku 
.................... // 
.................... // Definice portu: 
.................... // 
.................... // #DEFINE LCD_RS          PIN_B2      // rizeni registru LCD displeje 
.................... // #DEFINE LCD_E           PIN_B1      // enable LCD displeje 
.................... // #DEFINE LCD_DATA_LSB    PIN_C2      // pripojeni LSB bitu datoveho portu LCD displeje (celkem 4 bity vzestupne za sebou) 
....................  
....................  
....................  
....................  
.................... // Privatni sekce, cist jen v pripade, ze neco nefunguje 
....................  
....................  
....................  
....................  
.................... // Generovane defince portu pro ucely teto knihovny aby kod generoval spravne IO operace a soucasne 
.................... // bylo mozne jednoduse deklarovat pripojene piny LCD displeje pri pouziti teto knihovny. Problem spociva 
.................... // v tom, ze se musi spravne ridit smery portu a soucasne datovy port zabira jen 4 bity ze zadaneho portu 
.................... // 
.................... #DEFINE LCD_SHIFT (LCD_DATA_LSB&7)                 // pocet bitu posuvu dataoveho kanalu v datovem portu 
.................... #DEFINE LCD_PORT  (LCD_DATA_LSB>>3)                // adresa LCD datoveho portu 
.................... #DEFINE LCD_TRIS  (LCD_PORT+0x80)                  // adresa prislusneho TRIS registru 
.................... #DEFINE LCD_MASK  (0xF<<LCD_SHIFT)                 // maska platnych bitu 
.................... // 
.................... #IF LCD_SHIFT>4                                    // kontrola mezi 
.................... #ERROR LCD data port LSB bit not in range 0..4 
.................... #ENDIF 
....................  
....................  
.................... // Definice konstant pro LCD display 
.................... // 
.................... #define LCD_CURSOR_ON_  0x0E     // kurzor jako blikajici radka pod znakem 
.................... #define LCD_CURSOR_OFF_ 0x0C     // zadny kurzor 
.................... #define LCD_LINE_2      0x40     // adresa 1. znaku 2. radky 
....................  
....................  
.................... // Definice rezimu LCD displeje 
.................... // 
.................... BYTE const LCD_INIT_STRING[4] = 
.................... { 
....................    0x28,                         // intrfejs 4 bity, 2 radky, font 5x7 
....................    LCD_CURSOR_OFF_,              // display on, kurzor off, 
....................    0x01,                         // clear displeje 
....................    0x06                          // inkrement pozice kurzoru (posun kurzoru doprava) 
.................... }; 
....................  
....................  
.................... // Odesle nibble do displeje (posle data a klikne signalem e) 
.................... // 
.................... void lcd_send_nibble( BYTE n ) 
.................... { 
....................    *LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK);      // nastav datove bity portu a ostatni zachovej 
007F:  MOVF   07,W
0080:  ANDLW  F0
0081:  MOVWF  3E
0082:  MOVF   3D,W
0083:  ANDLW  0F
0084:  IORWF  3E,W
0085:  MOVWF  07
....................    output_bit(LCD_E,1);       // vzestupna hrana 
0086:  BSF    06.0
0087:  BSF    03.5
0088:  BCF    06.0
....................    delay_us(100);               // pockej alespon 450ns od e nebo alespon 195ns od dat 
0089:  CLRWDT
008A:  MOVLW  20
008B:  MOVWF  77
008C:  DECFSZ 77,F
008D:  GOTO   08C
008E:  GOTO   08F
....................    output_bit(LCD_E,0);       // sestupna hrana (minimalni perioda e je 1us) 
008F:  BCF    03.5
0090:  BCF    06.0
0091:  BSF    03.5
0092:  BCF    06.0
.................... } 
0093:  BCF    03.5
0094:  RETLW  00
....................  
....................  
.................... // Odesle bajt do registru LCD 
.................... // 
.................... // Pokud je Adr=0 .. instrukcni registr 
.................... // Pokud je Adr=1 .. datovy registr 
.................... // 
.................... void lcd_send_byte( BOOLEAN Adr, BYTE n ) 
.................... { 
....................    output_bit(LCD_RS,Adr);    // vyber registr 
0095:  MOVF   3B,F
0096:  BTFSS  03.2
0097:  GOTO   09A
0098:  BCF    06.1
0099:  GOTO   09B
009A:  BSF    06.1
009B:  BSF    03.5
009C:  BCF    06.1
....................    swap(n); 
009D:  BCF    03.5
009E:  SWAPF  3C,F
....................    lcd_send_nibble(n);        // posli horni pulku bajtu 
009F:  MOVF   3C,W
00A0:  MOVWF  3D
00A1:  CALL   07F
....................    swap(n); 
00A2:  SWAPF  3C,F
....................    lcd_send_nibble(n);        // posli spodni pulku bajtu 
00A3:  MOVF   3C,W
00A4:  MOVWF  3D
00A5:  CALL   07F
....................    delay_us(200);              // minimalni doba na provedeni prikazu 
00A6:  CLRWDT
00A7:  MOVLW  42
00A8:  MOVWF  77
00A9:  DECFSZ 77,F
00AA:  GOTO   0A9
.................... } 
00AB:  RETLW  00
....................  
....................  
.................... // Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje 
.................... // 
.................... // Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur 
.................... // 
.................... void lcd_init() 
.................... { 
....................  
....................    int i;                              // pocitadlo cyklu 
....................  
....................    delay_ms(20);                       // spozdeni pro provedeni startu displeje po zapnuti napajeni 
00AC:  MOVLW  14
00AD:  MOVWF  37
00AE:  CALL   067
....................  
....................    *LCD_TRIS = *LCD_TRIS & ~LCD_MASK;  // nuluj odpovidajici bity tris registru datoveho portu LCD 
00AF:  MOVLW  F0
00B0:  BSF    03.5
00B1:  ANDWF  07,F
....................  
....................    output_bit(LCD_RS,0);               // nastav jako vystup a nastav klidovy stav 
00B2:  BCF    03.5
00B3:  BCF    06.1
00B4:  BSF    03.5
00B5:  BCF    06.1
....................    output_bit(LCD_E,0);               // nastav jako vystup a nastav klidovy stav 
00B6:  BCF    03.5
00B7:  BCF    06.0
00B8:  BSF    03.5
00B9:  BCF    06.0
....................  
....................    for (i=0; i<3; i++)                 // nastav lcd do rezimu 8 bitu sbernice 
00BA:  BCF    03.5
00BB:  CLRF   35
00BC:  MOVF   35,W
00BD:  SUBLW  02
00BE:  BTFSS  03.0
00BF:  GOTO   0C8
....................    { 
....................       delay_ms(2);                     // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel 
00C0:  MOVLW  02
00C1:  MOVWF  37
00C2:  CALL   067
....................       lcd_send_nibble(3);              // rezim 8 bitu 
00C3:  MOVLW  03
00C4:  MOVWF  3D
00C5:  CALL   07F
....................    } 
00C6:  INCF   35,F
00C7:  GOTO   0BC
....................  
....................    delay_us(40);                       // cas na zpracovani 
00C8:  CLRWDT
00C9:  MOVLW  0C
00CA:  MOVWF  77
00CB:  DECFSZ 77,F
00CC:  GOTO   0CB
00CD:  GOTO   0CE
....................    lcd_send_nibble(2);                 // nastav rezim 4 bitu (plati od nasledujiciho prenosu) 
00CE:  MOVLW  02
00CF:  MOVWF  3D
00D0:  CALL   07F
....................    delay_us(40);                       // cas na zpracovani 
00D1:  CLRWDT
00D2:  MOVLW  0C
00D3:  MOVWF  77
00D4:  DECFSZ 77,F
00D5:  GOTO   0D4
00D6:  GOTO   0D7
....................  
....................    for (i=0;i<3;i++)                   // proved inicializaci (nastaveni modu, smazani apod) 
00D7:  CLRF   35
00D8:  MOVF   35,W
00D9:  SUBLW  02
00DA:  BTFSS  03.0
00DB:  GOTO   0E8
....................    { 
....................       lcd_send_byte(0,LCD_INIT_STRING[i]); 
00DC:  MOVF   35,W
00DD:  CALL   004
00DE:  MOVWF  36
00DF:  CLRF   3B
00E0:  MOVF   36,W
00E1:  MOVWF  3C
00E2:  CALL   095
....................       delay_ms(2); 
00E3:  MOVLW  02
00E4:  MOVWF  37
00E5:  CALL   067
....................    } 
00E6:  INCF   35,F
00E7:  GOTO   0D8
.................... } 
00E8:  GOTO   192 (RETURN)
....................  
....................  
.................... // Proved presun kurzoru 
.................... // 
.................... // Pozice 1.1 je domu 
.................... // 
.................... #separate 
.................... void lcd_gotoxy( BYTE x, BYTE y) 
.................... { 
....................  
....................    BYTE Adr; 
....................  
....................    switch(y) 
....................    { 
00E9:  MOVLW  01
00EA:  SUBWF  38,W
00EB:  ADDLW  FC
00EC:  BTFSC  03.0
00ED:  GOTO   0FB
00EE:  ADDLW  04
00EF:  GOTO   106
....................       case 1: Adr=0; break; 
00F0:  CLRF   39
00F1:  GOTO   0FB
....................       case 2: Adr=0x40; break; 
00F2:  MOVLW  40
00F3:  MOVWF  39
00F4:  GOTO   0FB
....................       case 3: Adr=0x14; break; 
00F5:  MOVLW  14
00F6:  MOVWF  39
00F7:  GOTO   0FB
....................       case 4: Adr=0x54; break; 
00F8:  MOVLW  54
00F9:  MOVWF  39
00FA:  GOTO   0FB
....................    } 
....................    Adr+=x-1; 
00FB:  MOVLW  01
00FC:  SUBWF  37,W
00FD:  ADDWF  39,F
....................  
....................    lcd_send_byte(0,0x80|Adr); 
00FE:  MOVF   39,W
00FF:  IORLW  80
0100:  MOVWF  3A
0101:  CLRF   3B
0102:  MOVF   3A,W
0103:  MOVWF  3C
0104:  CALL   095
.................... } 
0105:  RETLW  00
....................  
....................  
.................... // Zapis znaku na displej, zpracovani ridicich znaku 
.................... // 
.................... #separate 
.................... void lcd_putc( char c) 
.................... { 
....................  
....................    switch (c) 
....................    { 
*
010E:  MOVF   36,W
010F:  XORLW  0C
0110:  BTFSC  03.2
0111:  GOTO   11C
0112:  XORLW  06
0113:  BTFSC  03.2
0114:  GOTO   124
0115:  XORLW  07
0116:  BTFSC  03.2
0117:  GOTO   12A
0118:  XORLW  05
0119:  BTFSC  03.2
011A:  GOTO   12F
011B:  GOTO   134
....................       case '\f'   : lcd_send_byte(0,1);            // smaz displej 
011C:  CLRF   3B
011D:  MOVLW  01
011E:  MOVWF  3C
011F:  CALL   095
....................                     delay_ms(2); 
0120:  MOVLW  02
0121:  MOVWF  37
0122:  CALL   067
....................                                             break; 
0123:  GOTO   140
....................       case '\n'   : lcd_gotoxy(1,2);        break; // presun se na 1. znak 2. radky 
0124:  MOVLW  01
0125:  MOVWF  37
0126:  MOVLW  02
0127:  MOVWF  38
0128:  CALL   0E9
0129:  GOTO   140
....................       case '\r'   : lcd_gotoxy(1,1);        break; // presun home 
012A:  MOVLW  01
012B:  MOVWF  37
012C:  MOVWF  38
012D:  CALL   0E9
012E:  GOTO   140
....................       case '\b'   : lcd_send_byte(0,0x10);  break; // posun kurzor o 1 zpet 
012F:  CLRF   3B
0130:  MOVLW  10
0131:  MOVWF  3C
0132:  CALL   095
0133:  GOTO   140
....................       default     : if (c<0x20) c&=0x7;            // preklopeni definovatelnych znaku na rozsah 0 az 0x1F 
0134:  MOVF   36,W
0135:  SUBLW  1F
0136:  BTFSS  03.0
0137:  GOTO   13A
0138:  MOVLW  07
0139:  ANDWF  36,F
....................                     lcd_send_byte(1,c);     break; // zapis znak 
013A:  MOVLW  01
013B:  MOVWF  3B
013C:  MOVF   36,W
013D:  MOVWF  3C
013E:  CALL   095
013F:  GOTO   140
....................    } 
.................... } 
0140:  RETLW  00
....................  
....................  
.................... // Zapni kurzor 
.................... // 
.................... void lcd_cursor_on() 
.................... { 
....................    lcd_send_byte(0,LCD_CURSOR_ON_); 
.................... } 
....................  
....................  
.................... // Vypni kurzor 
.................... // 
.................... void lcd_cursor_off() 
.................... { 
....................    lcd_send_byte(0,LCD_CURSOR_OFF_); 
.................... } 
....................  
....................  
.................... // Definice vlastnich fontu 
.................... // 
.................... // Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje 
.................... // Pro snadne definovani jsou pripraveny nasledujici definice a na konci souboru je uveden 
.................... // priklad pouziti definovanych znaku. 
....................  
....................  
.................... // Pomocna procedura pro posilani ridicich dat do radice displeje 
.................... // 
.................... void lcd_putc2(int Data) 
.................... { 
....................    lcd_send_byte(1,Data); 
.................... } 
....................  
....................  
.................... // Pomocne definice pro programovani obsahu CGRAM 
.................... // 
.................... #DEFINE lcd_define_start(Code)      lcd_send_byte(0,0x40+(Code<<3)); delay_ms(2) 
.................... #DEFINE lcd_define_def(String)      printf(lcd_putc2,String); 
.................... #DEFINE lcd_define_end()            lcd_send_byte(0,3); delay_ms(2) 
....................  
....................  
.................... // Vlastni vykonne makro pro definovani fontu do pozice Index CGRAM s definicnim retezcem Def 
.................... // 
.................... #DEFINE lcd_define_char(Index, Def) lcd_define_start(Index); lcd_define_def(Def); lcd_define_end(); 
....................  
....................  
.................... // Pripravene definice fontu vybranych znaku 
.................... // V tabulce nesmi byt 00 (konec retezce v printf()), misto toho davame 80 
.................... // 
.................... #DEFINE LCD_CHAR_BAT100 "\x0E\x1F\x1F\x1F\x1F\x1F\x1F\x1F"      /* symbol plne baterie       */ 
.................... #DEFINE LCD_CHAR_BAT50  "\x0E\x1F\x11\x11\x13\x17\x1F\x1F"      /* symbol polovicni baterie  */ 
.................... #DEFINE LCD_CHAR_BAT0   "\x0E\x1F\x11\x11\x11\x11\x11\x1F"      /* symbol vybite baterie     */ 
.................... #DEFINE LCD_CHAR_LUA    "\x04\x0E\x11\x11\x1F\x11\x11\x80"      /* A s carkou                */ 
.................... #DEFINE LCD_CHAR_LLA    "\x01\x02\x0E\x01\x1F\x11\x0F\x80"      /* a s carkou                */ 
.................... #DEFINE LCD_CHAR_HUC    "\x0A\x0E\x11\x10\x10\x11\x0E\x80"      /* C s hackem                */ 
.................... #DEFINE LCD_CHAR_HLC    "\x0A\x04\x0E\x10\x10\x11\x0E\x80"      /* c s hackem                */ 
.................... #DEFINE LCD_CHAR_HUD    "\x0A\x1C\x12\x11\x11\x12\x1C\x80"      /* D s hackem                */ 
.................... #DEFINE LCD_CHAR_HLD    "\x05\x03\x0D\x13\x11\x11\x0F\x80"      /* d s hackem                */ 
.................... #DEFINE LCD_CHAR_LUE    "\x04\x1F\x10\x10\x1E\x10\x1F\x80"      /* E s carkou                */ 
.................... #DEFINE LCD_CHAR_LLE    "\x01\x02\x0E\x11\x1F\x10\x0E\x80"      /* e s carkou                */ 
.................... #DEFINE LCD_CHAR_HUE    "\x0A\x1F\x10\x1E\x10\x10\x1F\x80"      /* E s hackem                */ 
.................... #DEFINE LCD_CHAR_HLE    "\x0A\x04\x0E\x11\x1F\x10\x0E\x80"      /* e s hackem                */ 
.................... #DEFINE LCD_CHAR_LUI    "\x04\x0E\x04\x04\x04\x04\x0E\x80"      /* I s carkou                */ 
.................... #DEFINE LCD_CHAR_LLI    "\x02\x04\x80\x0C\x04\x04\x0E\x80"      /* i s carkou                */ 
.................... #DEFINE LCD_CHAR_HUN    "\x0A\x15\x11\x19\x15\x13\x11\x80"      /* N s hackem                */ 
.................... #DEFINE LCD_CHAR_HLN    "\x0A\x04\x16\x19\x11\x11\x11\x80"      /* n s hackem                */ 
.................... #DEFINE LCD_CHAR_LUO    "\x04\x0E\x11\x11\x11\x11\x0E\x80"      /* O s carkou                */ 
.................... #DEFINE LCD_CHAR_LLO    "\x02\x04\x0E\x11\x11\x11\x0E\x80"      /* o s carkou                */ 
.................... #DEFINE LCD_CHAR_HUR    "\x0A\x1E\x11\x1E\x14\x12\x11\x80"      /* R s hackem                */ 
.................... #DEFINE LCD_CHAR_HLR    "\x0A\x04\x16\x19\x10\x10\x10\x80"      /* r s hackem                */ 
.................... #DEFINE LCD_CHAR_HUS    "\x0A\x0F\x10\x0E\x01\x01\x1E\x80"      /* S s hackem                */ 
.................... #DEFINE LCD_CHAR_HLS    "\x0A\x04\x0E\x10\x0E\x01\x1E\x80"      /* s s hackem                */ 
.................... #DEFINE LCD_CHAR_HUT    "\x0A\x1F\x04\x04\x04\x04\x04\x80"      /* T s hackem                */ 
.................... #DEFINE LCD_CHAR_HLT    "\x0A\x0C\x1C\x08\x08\x09\x06\x80"      /* t s hackem                */ 
.................... #DEFINE LCD_CHAR_LUU    "\x02\x15\x11\x11\x11\x11\x0E\x80"      /* U s carkou                */ 
.................... #DEFINE LCD_CHAR_LLU    "\x02\x04\x11\x11\x11\x13\x0D\x80"      /* u s carkou                */ 
.................... #DEFINE LCD_CHAR_CUU    "\x06\x17\x11\x11\x11\x11\x0E\x80"      /* U s krouzkem              */ 
.................... #DEFINE LCD_CHAR_CLU    "\x06\x06\x11\x11\x11\x11\x0E\x80"      /* u s krouzkem              */ 
.................... #DEFINE LCD_CHAR_LUY    "\x02\x15\x11\x0A\x04\x04\x04\x80"      /* Y s carkou                */ 
.................... #DEFINE LCD_CHAR_LLY    "\x02\x04\x11\x11\x0F\x01\x0E\x80"      /* y s carkou                */ 
.................... #DEFINE LCD_CHAR_HUZ    "\x0A\x1F\x01\x02\x04\x08\x1F\x80"      /* Z s hackem                */ 
.................... #DEFINE LCD_CHAR_HLZ    "\x0A\x04\x1F\x02\x04\x08\x1F\x80"      /* z s hackem                */ 
....................  
....................  
.................... // Priklad pouziti definovanych znaku 
.................... // 
.................... // 
.................... //void lcd_sample() 
.................... //{ 
.................... //   lcd_define_char(0,LCD_CHAR_BAT50);                 // Priklad definice znaku baterie do pozice 0 
.................... //   lcd_define_char(2,LCD_CHAR_HLE LCD_CHAR_LUI);      // Priklad definice znaku e s hackem a I s carkou od pozice 2 
.................... //                                                      // vsimnete si, ze neni carka mezi retezci s definici (oba retezce definuji 
.................... //                                                      // jediny definicni retezec) 
.................... //   printf(lcd_putc,"\fZnaky:\20\22\23");              // priklad vypisu znaku z pozice 0, 2 a 3 
.................... //   delay_ms(1000); 
.................... //   lcd_define_char(0,LCD_CHAR_BAT0);                  // Predefinovani tvaru znaku v pozici 0 
.................... //   delay_ms(1000); 
.................... //} 
....................  
....................  
.................... int sig[20]; 
....................  
.................... void main() 
.................... { 
0141:  CLRF   04
0142:  BCF    03.7
0143:  MOVLW  1F
0144:  ANDWF  03,F
0145:  MOVLW  0C
0146:  BSF    03.5
0147:  MOVWF  19
0148:  MOVLW  A6
0149:  MOVWF  18
014A:  MOVLW  90
014B:  BCF    03.5
014C:  MOVWF  18
014D:  BSF    03.5
014E:  BSF    1F.0
014F:  BSF    1F.1
0150:  BSF    1F.2
0151:  BCF    1F.3
0152:  MOVLW  07
0153:  MOVWF  1C
....................  
....................    setup_adc_ports(NO_ANALOGS); 
*
0157:  BSF    03.5
0158:  BSF    1F.0
0159:  BSF    1F.1
015A:  BSF    1F.2
015B:  BCF    1F.3
....................    setup_adc(ADC_OFF); 
015C:  BCF    03.5
015D:  BCF    1F.0
....................    setup_psp(PSP_DISABLED); 
015E:  BSF    03.5
015F:  BCF    09.4
....................    setup_spi(SPI_SS_DISABLED); 
*
0154:  MOVLW  FF
0155:  BCF    03.5
0156:  MOVWF  34
*
0160:  BCF    03.5
0161:  BCF    14.5
0162:  BCF    34.5
0163:  MOVF   34,W
0164:  BSF    03.5
0165:  MOVWF  07
0166:  BCF    03.5
0167:  BSF    34.4
0168:  MOVF   34,W
0169:  BSF    03.5
016A:  MOVWF  07
016B:  BCF    03.5
016C:  BCF    34.3
016D:  MOVF   34,W
016E:  BSF    03.5
016F:  MOVWF  07
0170:  MOVLW  01
0171:  BCF    03.5
0172:  MOVWF  14
0173:  MOVLW  00
0174:  BSF    03.5
0175:  MOVWF  14
....................    setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); 
0176:  MOVF   01,W
0177:  ANDLW  C7
0178:  IORLW  08
0179:  MOVWF  01
....................    setup_timer_1(T1_DISABLED); 
017A:  BCF    03.5
017B:  CLRF   10
....................    setup_timer_2(T2_DISABLED,0,1); 
017C:  MOVLW  00
017D:  MOVWF  78
017E:  MOVWF  12
017F:  MOVLW  00
0180:  BSF    03.5
0181:  MOVWF  12
....................    setup_comparator(NC_NC_NC_NC); 
0182:  MOVLW  07
0183:  MOVWF  1C
0184:  MOVF   05,W
0185:  CLRWDT
0186:  MOVLW  02
0187:  MOVWF  77
0188:  DECFSZ 77,F
0189:  GOTO   188
018A:  GOTO   18B
018B:  MOVF   1C,W
018C:  BCF    03.5
018D:  BCF    0D.6
....................    setup_vref(FALSE); 
018E:  BSF    03.5
018F:  CLRF   1D
....................  
.................... lcd_init(); 
0190:  BCF    03.5
0191:  GOTO   0AC
.................... delay_ms(150); 
0192:  MOVLW  96
0193:  MOVWF  37
0194:  CALL   067
....................  
.................... printf(lcd_putc,"Baterie je nabita na"); 
0195:  CLRF   35
0196:  MOVF   35,W
0197:  CALL   00C
0198:  INCF   35,F
0199:  MOVWF  77
019A:  MOVWF  36
019B:  CALL   10E
019C:  MOVLW  14
019D:  SUBWF  35,W
019E:  BTFSS  03.2
019F:  GOTO   196
.................... lcd_gotoxy(1,3); 
01A0:  MOVLW  01
01A1:  MOVWF  37
01A2:  MOVLW  03
01A3:  MOVWF  38
01A4:  CALL   0E9
.................... printf(lcd_putc,"a napajeni zajistuje"); 
01A5:  CLRF   35
01A6:  MOVF   35,W
01A7:  CALL   025
01A8:  INCF   35,F
01A9:  MOVWF  77
01AA:  MOVWF  36
01AB:  CALL   10E
01AC:  MOVLW  14
01AD:  SUBWF  35,W
01AE:  BTFSS  03.2
01AF:  GOTO   1A6
.................... while(TRUE) 
.................... {   
....................    printf("AT+CBC\r"); 
01B0:  CLRF   35
01B1:  MOVF   35,W
01B2:  CALL   03E
01B3:  INCF   35,F
01B4:  MOVWF  77
01B5:  MOVF   77,W
01B6:  BTFSS  0C.4
01B7:  GOTO   1B6
01B8:  MOVWF  19
01B9:  MOVLW  07
01BA:  SUBWF  35,W
01BB:  BTFSS  03.2
01BC:  GOTO   1B1
....................    gets(sig); 
01BD:  MOVLW  20
01BE:  MOVWF  04
01BF:  BCF    03.7
01C0:  DECF   04,F
01C1:  INCF   04,F
01C2:  BTFSS  0C.5
01C3:  GOTO   1C2
01C4:  MOVF   1A,W
01C5:  MOVWF  00
01C6:  MOVLW  0D
01C7:  SUBWF  00,W
01C8:  BTFSS  03.2
01C9:  GOTO   1C1
01CA:  CLRF   00
....................    getc(); 
01CB:  BTFSS  0C.5
01CC:  GOTO   1CB
01CD:  MOVF   1A,W
....................    gets(sig); 
01CE:  MOVLW  20
01CF:  MOVWF  04
01D0:  BCF    03.7
01D1:  DECF   04,F
01D2:  INCF   04,F
01D3:  BTFSS  0C.5
01D4:  GOTO   1D3
01D5:  MOVF   1A,W
01D6:  MOVWF  00
01D7:  MOVLW  0D
01D8:  SUBWF  00,W
01D9:  BTFSS  03.2
01DA:  GOTO   1D2
01DB:  CLRF   00
....................     
....................    lcd_gotoxy(6,2); 
01DC:  MOVLW  06
01DD:  MOVWF  37
01DE:  MOVLW  02
01DF:  MOVWF  38
01E0:  CALL   0E9
....................    printf(lcd_putc,"%c%c procent",sig[9],sig[10]); 
01E1:  MOVF   29,W
01E2:  MOVWF  36
01E3:  CALL   10E
01E4:  MOVF   2A,W
01E5:  MOVWF  36
01E6:  CALL   10E
01E7:  MOVLW  04
01E8:  MOVWF  35
01E9:  MOVF   35,W
01EA:  CALL   04A
01EB:  INCF   35,F
01EC:  MOVWF  77
01ED:  MOVWF  36
01EE:  CALL   10E
01EF:  MOVLW  0C
01F0:  SUBWF  35,W
01F1:  BTFSS  03.2
01F2:  GOTO   1E9
....................     
....................    if(sig[7]==48) 
01F3:  MOVF   27,W
01F4:  SUBLW  30
01F5:  BTFSS  03.2
01F6:  GOTO   208
....................    { 
....................       lcd_gotoxy(7,4); 
01F7:  MOVLW  07
01F8:  MOVWF  37
01F9:  MOVLW  04
01FA:  MOVWF  38
01FB:  CALL   0E9
....................       printf(lcd_putc,"baterie"); 
01FC:  CLRF   35
01FD:  MOVF   35,W
01FE:  CALL   05B
01FF:  INCF   35,F
0200:  MOVWF  77
0201:  MOVWF  36
0202:  CALL   10E
0203:  MOVLW  07
0204:  SUBWF  35,W
0205:  BTFSS  03.2
0206:  GOTO   1FD
....................    } 
....................    else 
0207:  GOTO   216
....................    { 
....................       lcd_gotoxy(9,4); 
0208:  MOVLW  09
0209:  MOVWF  37
020A:  MOVLW  04
020B:  MOVWF  38
020C:  CALL   0E9
....................       printf(lcd_putc,"sit"); 
020D:  MOVLW  73
020E:  MOVWF  36
020F:  CALL   10E
0210:  MOVLW  69
0211:  MOVWF  36
0212:  CALL   10E
0213:  MOVLW  74
0214:  MOVWF  36
0215:  CALL   10E
....................    } 
....................     
....................    delay_ms(2500); 
0216:  MOVLW  0A
0217:  MOVWF  35
0218:  MOVLW  FA
0219:  MOVWF  37
021A:  CALL   067
021B:  DECFSZ 35,F
021C:  GOTO   218
....................    
.................... } 
021D:  GOTO   1B0
.................... } 
021E:  SLEEP

Configuration Fuses:
   Word  1: 3F39   XT NOWDT NOPUT NODEBUG NOPROTECT NOBROWNOUT NOLVP NOCPD NOWRT