CCS PCM C Compiler, Version 4.059d, 15399               29-III-07 21:10

               Filename: main.lst

               ROM used: 627 words (31%)
                         Largest free fragment is 1421
               RAM used: 18 (5%) at main() level
                         28 (8%) worst case
               Stack:    5 locations

*
0000:  MOVLW  00
0001:  MOVWF  0A
0002:  GOTO   13F
0003:  NOP
.................... #include "C:\RS\projekty\project1\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) 
*
001B:  MOVLW  2D
001C:  MOVWF  04
001D:  BCF    03.7
001E:  MOVF   00,W
001F:  BTFSC  03.2
0020:  GOTO   032
0021:  MOVLW  01
0022:  MOVWF  78
0023:  MOVLW  BF
0024:  MOVWF  77
0025:  CLRWDT
0026:  DECFSZ 77,F
0027:  GOTO   025
0028:  DECFSZ 78,F
0029:  GOTO   023
002A:  MOVLW  4A
002B:  MOVWF  77
002C:  DECFSZ 77,F
002D:  GOTO   02C
002E:  NOP
002F:  CLRWDT
0030:  DECFSZ 00,F
0031:  GOTO   021
0032:  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 
0033:  MOVF   07,W
0034:  ANDLW  F0
0035:  MOVWF  34
0036:  MOVF   33,W
0037:  ANDLW  0F
0038:  IORWF  34,W
0039:  MOVWF  07
....................    output_bit(LCD_E,1);       // vzestupna hrana 
003A:  BSF    06.0
003B:  BSF    03.5
003C:  BCF    06.0
....................    delay_us(100);               // pockej alespon 450ns od e nebo alespon 195ns od dat 
003D:  CLRWDT
003E:  MOVLW  20
003F:  MOVWF  77
0040:  DECFSZ 77,F
0041:  GOTO   040
0042:  GOTO   043
....................    output_bit(LCD_E,0);       // sestupna hrana (minimalni perioda e je 1us) 
0043:  BCF    03.5
0044:  BCF    06.0
0045:  BSF    03.5
0046:  BCF    06.0
.................... } 
0047:  BCF    03.5
0048:  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 
0049:  MOVF   31,F
004A:  BTFSS  03.2
004B:  GOTO   04E
004C:  BCF    06.1
004D:  GOTO   04F
004E:  BSF    06.1
004F:  BSF    03.5
0050:  BCF    06.1
....................    swap(n); 
0051:  BCF    03.5
0052:  SWAPF  32,F
....................    lcd_send_nibble(n);        // posli horni pulku bajtu 
0053:  MOVF   32,W
0054:  MOVWF  33
0055:  CALL   033
....................    swap(n); 
0056:  SWAPF  32,F
....................    lcd_send_nibble(n);        // posli spodni pulku bajtu 
0057:  MOVF   32,W
0058:  MOVWF  33
0059:  CALL   033
....................    delay_us(200);              // minimalni doba na provedeni prikazu 
005A:  CLRWDT
005B:  MOVLW  42
005C:  MOVWF  77
005D:  DECFSZ 77,F
005E:  GOTO   05D
.................... } 
005F:  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 
0060:  MOVLW  14
0061:  MOVWF  2D
0062:  CALL   01B
....................  
....................    *LCD_TRIS = *LCD_TRIS & ~LCD_MASK;  // nuluj odpovidajici bity tris registru datoveho portu LCD 
0063:  MOVLW  F0
0064:  BSF    03.5
0065:  ANDWF  07,F
....................  
....................    output_bit(LCD_RS,0);               // nastav jako vystup a nastav klidovy stav 
0066:  BCF    03.5
0067:  BCF    06.1
0068:  BSF    03.5
0069:  BCF    06.1
....................    output_bit(LCD_E,0);               // nastav jako vystup a nastav klidovy stav 
006A:  BCF    03.5
006B:  BCF    06.0
006C:  BSF    03.5
006D:  BCF    06.0
....................  
....................    for (i=0; i<3; i++)                 // nastav lcd do rezimu 8 bitu sbernice 
006E:  BCF    03.5
006F:  CLRF   2A
0070:  MOVF   2A,W
0071:  SUBLW  02
0072:  BTFSS  03.0
0073:  GOTO   07C
....................    { 
....................       delay_ms(2);                     // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel 
0074:  MOVLW  02
0075:  MOVWF  2D
0076:  CALL   01B
....................       lcd_send_nibble(3);              // rezim 8 bitu 
0077:  MOVLW  03
0078:  MOVWF  33
0079:  CALL   033
....................    } 
007A:  INCF   2A,F
007B:  GOTO   070
....................  
....................    delay_us(40);                       // cas na zpracovani 
007C:  CLRWDT
007D:  MOVLW  0C
007E:  MOVWF  77
007F:  DECFSZ 77,F
0080:  GOTO   07F
0081:  GOTO   082
....................    lcd_send_nibble(2);                 // nastav rezim 4 bitu (plati od nasledujiciho prenosu) 
0082:  MOVLW  02
0083:  MOVWF  33
0084:  CALL   033
....................    delay_us(40);                       // cas na zpracovani 
0085:  CLRWDT
0086:  MOVLW  0C
0087:  MOVWF  77
0088:  DECFSZ 77,F
0089:  GOTO   088
008A:  GOTO   08B
....................  
....................    for (i=0;i<3;i++)                   // proved inicializaci (nastaveni modu, smazani apod) 
008B:  CLRF   2A
008C:  MOVF   2A,W
008D:  SUBLW  02
008E:  BTFSS  03.0
008F:  GOTO   09C
....................    { 
....................       lcd_send_byte(0,LCD_INIT_STRING[i]); 
0090:  MOVF   2A,W
0091:  CALL   004
0092:  MOVWF  2B
0093:  CLRF   31
0094:  MOVF   2B,W
0095:  MOVWF  32
0096:  CALL   049
....................       delay_ms(2); 
0097:  MOVLW  02
0098:  MOVWF  2D
0099:  CALL   01B
....................    } 
009A:  INCF   2A,F
009B:  GOTO   08C
.................... } 
009C:  GOTO   190 (RETURN)
....................  
....................  
.................... // Proved presun kurzoru 
.................... // 
.................... // Pozice 1.1 je domu 
.................... // 
.................... #separate 
.................... void lcd_gotoxy( BYTE x, BYTE y) 
.................... { 
....................  
....................    BYTE Adr; 
....................  
....................    switch(y) 
....................    { 
009D:  MOVLW  01
009E:  SUBWF  2E,W
009F:  ADDLW  FC
00A0:  BTFSC  03.0
00A1:  GOTO   0AF
00A2:  ADDLW  04
00A3:  GOTO   0BA
....................       case 1: Adr=0; break; 
00A4:  CLRF   2F
00A5:  GOTO   0AF
....................       case 2: Adr=0x40; break; 
00A6:  MOVLW  40
00A7:  MOVWF  2F
00A8:  GOTO   0AF
....................       case 3: Adr=0x14; break; 
00A9:  MOVLW  14
00AA:  MOVWF  2F
00AB:  GOTO   0AF
....................       case 4: Adr=0x54; break; 
00AC:  MOVLW  54
00AD:  MOVWF  2F
00AE:  GOTO   0AF
....................    } 
....................    Adr+=x-1; 
00AF:  MOVLW  01
00B0:  SUBWF  2D,W
00B1:  ADDWF  2F,F
....................  
....................    lcd_send_byte(0,0x80|Adr); 
00B2:  MOVF   2F,W
00B3:  IORLW  80
00B4:  MOVWF  30
00B5:  CLRF   31
00B6:  MOVF   30,W
00B7:  MOVWF  32
00B8:  CALL   049
.................... } 
00B9:  RETLW  00
....................  
....................  
.................... // Zapis znaku na displej, zpracovani ridicich znaku 
.................... // 
.................... #separate 
.................... void lcd_putc( char c) 
.................... { 
....................  
....................    switch (c) 
....................    { 
*
00C2:  MOVF   2C,W
00C3:  XORLW  0C
00C4:  BTFSC  03.2
00C5:  GOTO   0D0
00C6:  XORLW  06
00C7:  BTFSC  03.2
00C8:  GOTO   0D8
00C9:  XORLW  07
00CA:  BTFSC  03.2
00CB:  GOTO   0DE
00CC:  XORLW  05
00CD:  BTFSC  03.2
00CE:  GOTO   0E3
00CF:  GOTO   0E8
....................       case '\f'   : lcd_send_byte(0,1);            // smaz displej 
00D0:  CLRF   31
00D1:  MOVLW  01
00D2:  MOVWF  32
00D3:  CALL   049
....................                     delay_ms(2); 
00D4:  MOVLW  02
00D5:  MOVWF  2D
00D6:  CALL   01B
....................                                             break; 
00D7:  GOTO   0F4
....................       case '\n'   : lcd_gotoxy(1,2);        break; // presun se na 1. znak 2. radky 
00D8:  MOVLW  01
00D9:  MOVWF  2D
00DA:  MOVLW  02
00DB:  MOVWF  2E
00DC:  CALL   09D
00DD:  GOTO   0F4
....................       case '\r'   : lcd_gotoxy(1,1);        break; // presun home 
00DE:  MOVLW  01
00DF:  MOVWF  2D
00E0:  MOVWF  2E
00E1:  CALL   09D
00E2:  GOTO   0F4
....................       case '\b'   : lcd_send_byte(0,0x10);  break; // posun kurzor o 1 zpet 
00E3:  CLRF   31
00E4:  MOVLW  10
00E5:  MOVWF  32
00E6:  CALL   049
00E7:  GOTO   0F4
....................       default     : if (c<0x20) c&=0x7;            // preklopeni definovatelnych znaku na rozsah 0 az 0x1F 
00E8:  MOVF   2C,W
00E9:  SUBLW  1F
00EA:  BTFSS  03.0
00EB:  GOTO   0EE
00EC:  MOVLW  07
00ED:  ANDWF  2C,F
....................                     lcd_send_byte(1,c);     break; // zapis znak 
00EE:  MOVLW  01
00EF:  MOVWF  31
00F0:  MOVF   2C,W
00F1:  MOVWF  32
00F2:  CALL   049
00F3:  GOTO   0F4
....................    } 
.................... } 
00F4:  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); 
.................... //} 
....................  
....................  
.................... void main() 
.................... { 
*
013F:  CLRF   04
0140:  BCF    03.7
0141:  MOVLW  1F
0142:  ANDWF  03,F
0143:  MOVLW  0C
0144:  BSF    03.5
0145:  MOVWF  19
0146:  MOVLW  A6
0147:  MOVWF  18
0148:  MOVLW  90
0149:  BCF    03.5
014A:  MOVWF  18
014B:  BSF    03.5
014C:  BSF    1F.0
014D:  BSF    1F.1
014E:  BSF    1F.2
014F:  BCF    1F.3
0150:  MOVLW  07
0151:  MOVWF  1C
.................... char odp[8]; 
.................... int i; 
....................    setup_adc_ports(NO_ANALOGS); 
*
0155:  BSF    03.5
0156:  BSF    1F.0
0157:  BSF    1F.1
0158:  BSF    1F.2
0159:  BCF    1F.3
....................    setup_adc(ADC_OFF); 
015A:  BCF    03.5
015B:  BCF    1F.0
....................    setup_psp(PSP_DISABLED); 
015C:  BSF    03.5
015D:  BCF    09.4
....................    setup_spi(SPI_SS_DISABLED); 
*
0152:  MOVLW  FF
0153:  BCF    03.5
0154:  MOVWF  20
*
015E:  BCF    03.5
015F:  BCF    14.5
0160:  BCF    20.5
0161:  MOVF   20,W
0162:  BSF    03.5
0163:  MOVWF  07
0164:  BCF    03.5
0165:  BSF    20.4
0166:  MOVF   20,W
0167:  BSF    03.5
0168:  MOVWF  07
0169:  BCF    03.5
016A:  BCF    20.3
016B:  MOVF   20,W
016C:  BSF    03.5
016D:  MOVWF  07
016E:  MOVLW  01
016F:  BCF    03.5
0170:  MOVWF  14
0171:  MOVLW  00
0172:  BSF    03.5
0173:  MOVWF  14
....................    setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); 
0174:  MOVF   01,W
0175:  ANDLW  C7
0176:  IORLW  08
0177:  MOVWF  01
....................    setup_timer_1(T1_DISABLED); 
0178:  BCF    03.5
0179:  CLRF   10
....................    setup_timer_2(T2_DISABLED,0,1); 
017A:  MOVLW  00
017B:  MOVWF  78
017C:  MOVWF  12
017D:  MOVLW  00
017E:  BSF    03.5
017F:  MOVWF  12
....................    setup_comparator(NC_NC_NC_NC); 
0180:  MOVLW  07
0181:  MOVWF  1C
0182:  MOVF   05,W
0183:  CLRWDT
0184:  MOVLW  02
0185:  MOVWF  77
0186:  DECFSZ 77,F
0187:  GOTO   186
0188:  GOTO   189
0189:  MOVF   1C,W
018A:  BCF    03.5
018B:  BCF    0D.6
....................    setup_vref(FALSE); 
018C:  BSF    03.5
018D:  CLRF   1D
....................    lcd_init(); 
018E:  BCF    03.5
018F:  GOTO   060
....................     
....................    printf("AT+CMGL=1\r");           //vycti prijate SMS 
0190:  CLRF   2A
0191:  MOVF   2A,W
0192:  CALL   00C
0193:  INCF   2A,F
0194:  MOVWF  77
0195:  MOVF   77,W
0196:  BTFSS  0C.4
0197:  GOTO   196
0198:  MOVWF  19
0199:  MOVLW  0A
019A:  SUBWF  2A,W
019B:  BTFSS  03.2
019C:  GOTO   191
....................    gets(odp);                       //uloz odpoved prikazu do odp 
019D:  MOVLW  21
019E:  MOVWF  04
019F:  BCF    03.7
01A0:  DECF   04,F
01A1:  INCF   04,F
01A2:  BTFSS  0C.5
01A3:  GOTO   1A2
01A4:  MOVF   1A,W
01A5:  MOVWF  00
01A6:  MOVLW  0D
01A7:  SUBWF  00,W
01A8:  BTFSS  03.2
01A9:  GOTO   1A1
01AA:  CLRF   00
....................    getc();                          //preskoc 0A 
01AB:  BTFSS  0C.5
01AC:  GOTO   1AB
01AD:  MOVF   1A,W
....................    getc();                          //preskoc 0D 
01AE:  BTFSS  0C.5
01AF:  GOTO   1AE
01B0:  MOVF   1A,W
....................    gets(odp);                       //uloz pocatek odpovedi do odp 
01B1:  MOVLW  21
01B2:  MOVWF  04
01B3:  BCF    03.7
01B4:  DECF   04,F
01B5:  INCF   04,F
01B6:  BTFSS  0C.5
01B7:  GOTO   1B6
01B8:  MOVF   1A,W
01B9:  MOVWF  00
01BA:  MOVLW  0D
01BB:  SUBWF  00,W
01BC:  BTFSS  03.2
01BD:  GOTO   1B5
01BE:  CLRF   00
....................    for(i=0;i<55;i++)                //preskoc nedulezite informace 
01BF:  CLRF   29
01C0:  MOVF   29,W
01C1:  SUBLW  36
01C2:  BTFSS  03.0
01C3:  GOTO   1C9
....................    { 
....................    getc(); 
01C4:  BTFSS  0C.5
01C5:  GOTO   1C4
01C6:  MOVF   1A,W
....................    } 
01C7:  INCF   29,F
01C8:  GOTO   1C0
....................    gets(odp);                       //uloz zakodovany text SMS 
01C9:  MOVLW  21
01CA:  MOVWF  04
01CB:  BCF    03.7
01CC:  DECF   04,F
01CD:  INCF   04,F
01CE:  BTFSS  0C.5
01CF:  GOTO   1CE
01D0:  MOVF   1A,W
01D1:  MOVWF  00
01D2:  MOVLW  0D
01D3:  SUBWF  00,W
01D4:  BTFSS  03.2
01D5:  GOTO   1CD
01D6:  CLRF   00
....................    printf(lcd_putc,"%s\n",odp); 
01D7:  MOVLW  21
01D8:  MOVWF  04
01D9:  BCF    03.7
01DA:  MOVLW  00
01DB:  IORWF  00,W
01DC:  BTFSC  03.2
01DD:  GOTO   1EE
01DE:  CLRF   2B
01DF:  MOVF   04,W
01E0:  MOVWF  2A
01E1:  BCF    2B.0
01E2:  BTFSC  03.7
01E3:  BSF    2B.0
01E4:  MOVF   00,W
01E5:  MOVWF  2C
01E6:  CALL   0C2
01E7:  MOVF   2A,W
01E8:  MOVWF  04
01E9:  BCF    03.7
01EA:  BTFSC  2B.0
01EB:  BSF    03.7
01EC:  INCF   04,F
01ED:  GOTO   1DA
01EE:  MOVLW  0A
01EF:  MOVWF  2C
01F0:  CALL   0C2
....................                                        
....................    if(odp[0]==0) odp[1]='0';        // Prevod z ASCII do DEC  
01F1:  MOVF   21,F
01F2:  BTFSS  03.2
01F3:  GOTO   1F6
01F4:  MOVLW  30
01F5:  MOVWF  22
....................    odp[0]=odp[0] - '0'; 
01F6:  MOVLW  30
01F7:  SUBWF  21,F
....................    odp[1]=odp[1] - '0'; 
01F8:  SUBWF  22,F
....................    if(odp[0]>9) odp[0]=odp[0]-7; 
01F9:  MOVF   21,W
01FA:  SUBLW  09
01FB:  BTFSC  03.0
01FC:  GOTO   1FF
01FD:  MOVLW  07
01FE:  SUBWF  21,F
....................    if(odp[1]>9) odp[1]=odp[1]-7; 
01FF:  MOVF   22,W
0200:  SUBLW  09
0201:  BTFSC  03.0
0202:  GOTO   205
0203:  MOVLW  07
0204:  SUBWF  22,F
....................    odp[0]=odp[0] << 4; 
0205:  SWAPF  21,F
0206:  MOVLW  F0
0207:  ANDWF  21,F
....................    odp[0] |= odp[1]; 
0208:  MOVF   22,W
0209:  IORWF  21,F
....................     
....................    if(odp[2]==0) odp[3]='0'; 
020A:  MOVF   23,F
020B:  BTFSS  03.2
020C:  GOTO   20F
020D:  MOVLW  30
020E:  MOVWF  24
....................    odp[2]=odp[2] - '0'; 
020F:  MOVLW  30
0210:  SUBWF  23,F
....................    odp[3]=odp[3] - '0'; 
0211:  SUBWF  24,F
....................    if(odp[2]>9) odp[2]=odp[2]-7; 
0212:  MOVF   23,W
0213:  SUBLW  09
0214:  BTFSC  03.0
0215:  GOTO   218
0216:  MOVLW  07
0217:  SUBWF  23,F
....................    if(odp[3]>9) odp[3]=odp[3]-7; 
0218:  MOVF   24,W
0219:  SUBLW  09
021A:  BTFSC  03.0
021B:  GOTO   21E
021C:  MOVLW  07
021D:  SUBWF  24,F
....................    odp[2]=odp[2] << 4; 
021E:  SWAPF  23,F
021F:  MOVLW  F0
0220:  ANDWF  23,F
....................    odp[2] |= odp[3]; 
0221:  MOVF   24,W
0222:  IORWF  23,F
....................     
....................    if(odp[4]==0) odp[5]='0'; 
0223:  MOVF   25,F
0224:  BTFSS  03.2
0225:  GOTO   228
0226:  MOVLW  30
0227:  MOVWF  26
....................    odp[4]=odp[4] - '0'; 
0228:  MOVLW  30
0229:  SUBWF  25,F
....................    odp[5]=odp[5] - '0'; 
022A:  SUBWF  26,F
....................    if(odp[4]>9) odp[4]=odp[4]-7; 
022B:  MOVF   25,W
022C:  SUBLW  09
022D:  BTFSC  03.0
022E:  GOTO   231
022F:  MOVLW  07
0230:  SUBWF  25,F
....................    if(odp[5]>9) odp[5]=odp[5]-7; 
0231:  MOVF   26,W
0232:  SUBLW  09
0233:  BTFSC  03.0
0234:  GOTO   237
0235:  MOVLW  07
0236:  SUBWF  26,F
....................    odp[4]=odp[4] << 4; 
0237:  SWAPF  25,F
0238:  MOVLW  F0
0239:  ANDWF  25,F
....................    odp[4] |= odp[5]; 
023A:  MOVF   26,W
023B:  IORWF  25,F
....................     
....................    if(odp[6]==0) odp[7]='0'; 
023C:  MOVF   27,F
023D:  BTFSS  03.2
023E:  GOTO   241
023F:  MOVLW  30
0240:  MOVWF  28
....................    odp[6]=odp[6] - '0'; 
0241:  MOVLW  30
0242:  SUBWF  27,F
....................    odp[7]=odp[7] - '0'; 
0243:  SUBWF  28,F
....................    if(odp[6]>9) odp[6]=odp[6]-7; 
0244:  MOVF   27,W
0245:  SUBLW  09
0246:  BTFSC  03.0
0247:  GOTO   24A
0248:  MOVLW  07
0249:  SUBWF  27,F
....................    if(odp[7]>9) odp[7]=odp[7]-7; 
024A:  MOVF   28,W
024B:  SUBLW  09
024C:  BTFSC  03.0
024D:  GOTO   250
024E:  MOVLW  07
024F:  SUBWF  28,F
....................    odp[6]=odp[6] << 4; 
0250:  SWAPF  27,F
0251:  MOVLW  F0
0252:  ANDWF  27,F
....................    odp[6] |= odp[7]; 
0253:  MOVF   28,W
0254:  IORWF  27,F
....................         
....................    printf(lcd_putc,"%u %u %u %u",odp[0],odp[2],odp[4]odp[6]);    
0255:  MOVF   21,W
0256:  MOVWF  2A
0257:  MOVLW  1B
0258:  MOVWF  2B
0259:  CALL   10A
025A:  MOVLW  20
025B:  MOVWF  2C
025C:  CALL   0C2
025D:  MOVF   23,W
025E:  MOVWF  2A
025F:  MOVLW  1B
0260:  MOVWF  2B
0261:  CALL   10A
0262:  MOVLW  20
0263:  MOVWF  2C
0264:  CALL   0C2
0265:  MOVF   25,W
0266:  MOVWF  2A
0267:  MOVLW  1B
0268:  MOVWF  2B
0269:  CALL   10A
026A:  MOVLW  20
026B:  MOVWF  2C
026C:  CALL   0C2
026D:  MOVF   27,W
026E:  MOVWF  2A
026F:  MOVLW  1B
0270:  MOVWF  2B
0271:  CALL   10A
.................... } 
0272:  SLEEP

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