CCS PCM C Compiler, Version 4.059d, 15399               13-II-07 23:16

               Filename: main.lst

               ROM used: 1704 words (83%)
                         Largest free fragment is 344
               RAM used: 32 (9%) at main() level
                         58 (16%) worst case
               Stack:    5 locations

*
0000:  MOVLW  00
0001:  MOVWF  0A
0002:  GOTO   59C
0003:  NOP
.................... #include "C:\Rs\zdrojáky\projekt\Posledni\main.h" 
.................... #include <16F877A.h> 
.................... //////// Standard Header file for the PIC16F877A device //////////////// 
.................... #device PIC16F877A 
.................... #list 
....................  
.................... #device adc=10 
....................  
.................... #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 WRT_50%                     //Lower half of Program Memory is Write Protected 
....................  
.................... #use delay(clock=4000000,RESTART_WDT) 
*
008B:  MOVLW  48
008C:  MOVWF  04
008D:  BCF    03.7
008E:  MOVF   00,W
008F:  BTFSC  03.2
0090:  GOTO   0A2
0091:  MOVLW  01
0092:  MOVWF  78
0093:  MOVLW  BF
0094:  MOVWF  77
0095:  CLRWDT
0096:  DECFSZ 77,F
0097:  GOTO   095
0098:  DECFSZ 78,F
0099:  GOTO   093
009A:  MOVLW  4A
009B:  MOVWF  77
009C:  DECFSZ 77,F
009D:  GOTO   09C
009E:  NOP
009F:  CLRWDT
00A0:  DECFSZ 00,F
00A1:  GOTO   091
00A2:  RETLW  00
....................  
....................  
....................  
.................... #define LCD_RS          PIN_C7      // rizeni registru LCD displeje <lcd.c> 
.................... #define LCD_E           PIN_B7      // enable LCD displeje <lcd.c> 
.................... #define LCD_D0          PIN_B3      // data LCD  <lcd.c> 
.................... #define LCD_D1          PIN_B2 
.................... #define LCD_D2          PIN_B1 
.................... #define LCD_D3          PIN_B0 
....................  
.................... #include "LCD.C"  //pro LCD 
.................... // LCD modul pro ovladani dvouradkoveho LCD modulu se standardnim Hitachi radicem 
.................... // (c)miho 2002,2005 
.................... // 
.................... // Historie: 
.................... // 
.................... // 0.00  Uvodni verze se snadnou definici portu LCD displeje 
.................... // 0.01  Oprava portu (zapomenute stare identifikatory) 
.................... // 0.02  Doplnena moznost pripojeni datoveho portu LCD na libovolne porty 
.................... // 0.03  Doplnena procedura lcd_clr pro smazani 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_clr               smaze displej 
.................... // 
.................... //   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:                     // Datovy port displeje pripojeny na 4 bity za sebou na jeden port 
.................... // 
.................... // #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) 
.................... // 
.................... // 
.................... // Alternativni definice:              // Datovy port displeje pripojeny na libovolne 4 bitove porty (vede na kod delsi asi o 25 slov) 
.................... // 
.................... // #define LCD_RS          PIN_B2      // rizeni registru LCD displeje 
.................... // #define LCD_E           PIN_B1      // enable LCD displeje 
.................... // #define LCD_D0          PIN_C2      // D0 - datove bity pripojene na libovolne porty 
.................... // #define LCD_D1          PIN_C3      // D1 
.................... // #define LCD_D2          PIN_C4      // D2 
.................... // #define LCD_D3          PIN_C5      // D3 
....................  
....................  
....................  
....................  
.................... // Privatni sekce, cist jen v pripade, ze neco nefunguje 
....................  
....................  
....................  
....................  
.................... #ifdef LCD_DATA_LSB 
.................... // 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 datoveho 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 
.................... #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 ) 
.................... { 
....................    #ifdef LCD_DATA_LSB 
....................       // data jsou za sebou na 4 bitech jednoho portu 
....................       *LCD_PORT = (*LCD_PORT & ~LCD_MASK) | ((n << LCD_SHIFT) & LCD_MASK);      // nastav datove bity portu a ostatni zachovej 
....................    #else 
....................       // data jsou na libovolnych 4 bitech libovolnych portu 
....................       output_bit(LCD_D0,bit_test(n,0)); 
*
01FA:  BTFSC  4E.0
01FB:  GOTO   1FE
01FC:  BCF    06.3
01FD:  GOTO   1FF
01FE:  BSF    06.3
01FF:  BSF    03.5
0200:  BCF    06.3
....................       output_bit(LCD_D1,bit_test(n,1)); 
0201:  BCF    03.5
0202:  BTFSC  4E.1
0203:  GOTO   206
0204:  BCF    06.2
0205:  GOTO   207
0206:  BSF    06.2
0207:  BSF    03.5
0208:  BCF    06.2
....................       output_bit(LCD_D2,bit_test(n,2)); 
0209:  BCF    03.5
020A:  BTFSC  4E.2
020B:  GOTO   20E
020C:  BCF    06.1
020D:  GOTO   20F
020E:  BSF    06.1
020F:  BSF    03.5
0210:  BCF    06.1
....................       output_bit(LCD_D3,bit_test(n,3)); 
0211:  BCF    03.5
0212:  BTFSC  4E.3
0213:  GOTO   216
0214:  BCF    06.0
0215:  GOTO   217
0216:  BSF    06.0
0217:  BSF    03.5
0218:  BCF    06.0
....................    #endif 
....................    output_bit(LCD_E,1);       // vzestupna hrana 
0219:  BCF    03.5
021A:  BSF    06.7
021B:  BSF    03.5
021C:  BCF    06.7
....................    delay_us(1);               // pockej alespon 450ns od e nebo alespon 195ns od dat 
021D:  CLRWDT
....................    output_bit(LCD_E,0);       // sestupna hrana (minimalni perioda e je 1us) 
021E:  BCF    03.5
021F:  BCF    06.7
0220:  BSF    03.5
0221:  BCF    06.7
.................... } 
0222:  BCF    03.5
0223:  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 
0224:  MOVF   4C,F
0225:  BTFSS  03.2
0226:  GOTO   229
0227:  BCF    07.7
0228:  GOTO   22A
0229:  BSF    07.7
022A:  BCF    20.7
022B:  MOVF   20,W
022C:  BSF    03.5
022D:  MOVWF  07
*
05A7:  MOVLW  FF
05A8:  BCF    03.5
05A9:  MOVWF  20
....................    swap(n); 
*
022E:  BCF    03.5
022F:  SWAPF  4D,F
....................    lcd_send_nibble(n);        // posli horni pulku bajtu 
0230:  MOVF   4D,W
0231:  MOVWF  4E
0232:  CALL   1FA
....................    swap(n); 
0233:  SWAPF  4D,F
....................    lcd_send_nibble(n);        // posli spodni pulku bajtu 
0234:  MOVF   4D,W
0235:  MOVWF  4E
0236:  CALL   1FA
....................    delay_us(40);              // minimalni doba na provedeni prikazu 
0237:  CLRWDT
0238:  MOVLW  0C
0239:  MOVWF  77
023A:  DECFSZ 77,F
023B:  GOTO   23A
023C:  GOTO   23D
.................... } 
023D:  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 
023E:  MOVLW  14
023F:  MOVWF  48
0240:  CALL   08B
....................  
.................... #ifdef LCD_DATA_LSB 
....................    // data jsou na 4 bitech za sebou, nastav smer pro vsechny dalsi prenosy 
....................    *LCD_TRIS = *LCD_TRIS & ~LCD_MASK;  // nuluj odpovidajici bity tris registru datoveho portu LCD 
.................... #endif 
....................  
....................    output_bit(LCD_RS,0);               // nastav jako vystup a nastav klidovy stav 
0241:  BCF    07.7
0242:  BCF    20.7
0243:  MOVF   20,W
0244:  BSF    03.5
0245:  MOVWF  07
....................    output_bit(LCD_E, 0);               // nastav jako vystup a nastav klidovy stav 
0246:  BCF    03.5
0247:  BCF    06.7
0248:  BSF    03.5
0249:  BCF    06.7
....................  
....................    for (i=0; i<3; i++)                 // nastav lcd do rezimu 8 bitu sbernice 
024A:  BCF    03.5
024B:  CLRF   2D
024C:  MOVF   2D,W
024D:  SUBLW  02
024E:  BTFSS  03.0
024F:  GOTO   258
....................    { 
....................       delay_ms(2);                     // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel 
0250:  MOVLW  02
0251:  MOVWF  48
0252:  CALL   08B
....................       lcd_send_nibble(3);              // rezim 8 bitu 
0253:  MOVLW  03
0254:  MOVWF  4E
0255:  CALL   1FA
....................    } 
0256:  INCF   2D,F
0257:  GOTO   24C
....................  
....................    delay_us(40);                       // cas na zpracovani 
0258:  CLRWDT
0259:  MOVLW  0C
025A:  MOVWF  77
025B:  DECFSZ 77,F
025C:  GOTO   25B
025D:  GOTO   25E
....................    lcd_send_nibble(2);                 // nastav rezim 4 bitu (plati od nasledujiciho prenosu) 
025E:  MOVLW  02
025F:  MOVWF  4E
0260:  CALL   1FA
....................    delay_us(40);                       // cas na zpracovani 
0261:  CLRWDT
0262:  MOVLW  0C
0263:  MOVWF  77
0264:  DECFSZ 77,F
0265:  GOTO   264
0266:  GOTO   267
....................  
....................    for (i=0;i<3;i++)                   // proved inicializaci (nastaveni modu, smazani apod) 
0267:  CLRF   2D
0268:  MOVF   2D,W
0269:  SUBLW  02
026A:  BTFSS  03.0
026B:  GOTO   278
....................    { 
....................       lcd_send_byte(0,LCD_INIT_STRING[i]); 
026C:  MOVF   2D,W
026D:  CALL   004
026E:  MOVWF  2E
026F:  CLRF   4C
0270:  MOVF   2E,W
0271:  MOVWF  4D
0272:  CALL   224
....................       delay_ms(2); 
0273:  MOVLW  02
0274:  MOVWF  48
0275:  CALL   08B
....................    } 
0276:  INCF   2D,F
0277:  GOTO   268
.................... } 
0278:  GOTO   610 (RETURN)
....................  
....................  
.................... // Proved presun kurzoru 
.................... // 
.................... // Pozice 1.1 je domu 
.................... // 
.................... void lcd_gotoxy( BYTE x, BYTE y) 
.................... { 
....................  
....................    BYTE Adr; 
....................  
....................    Adr=x-1; 
0279:  MOVLW  01
027A:  SUBWF  48,W
027B:  MOVWF  4A
....................    if(y==2) 
027C:  MOVF   49,W
027D:  SUBLW  02
027E:  BTFSS  03.2
027F:  GOTO   282
....................      Adr+=LCD_LINE_2; 
0280:  MOVLW  40
0281:  ADDWF  4A,F
....................  
....................    lcd_send_byte(0,0x80|Adr); 
0282:  MOVF   4A,W
0283:  IORLW  80
0284:  MOVWF  4B
0285:  CLRF   4C
0286:  MOVF   4B,W
0287:  MOVWF  4D
0288:  CALL   224
.................... } 
0289:  RETLW  00
....................  
....................  
.................... // Zapis znaku na displej, zpracovani ridicich znaku 
.................... // 
.................... void lcd_putc( char c) 
.................... { 
....................  
....................    switch (c) 
....................    { 
028A:  MOVF   47,W
028B:  XORLW  0C
028C:  BTFSC  03.2
028D:  GOTO   298
028E:  XORLW  06
028F:  BTFSC  03.2
0290:  GOTO   2A0
0291:  XORLW  07
0292:  BTFSC  03.2
0293:  GOTO   2A6
0294:  XORLW  05
0295:  BTFSC  03.2
0296:  GOTO   2AB
0297:  GOTO   2B0
....................       case '\f'   : lcd_send_byte(0,1);            // smaz displej 
0298:  CLRF   4C
0299:  MOVLW  01
029A:  MOVWF  4D
029B:  CALL   224
....................                     delay_ms(2); 
029C:  MOVLW  02
029D:  MOVWF  48
029E:  CALL   08B
....................                                             break; 
029F:  GOTO   2BC
....................       case '\n'   : lcd_gotoxy(1,2);        break; // presun se na 1. znak 2. radky 
02A0:  MOVLW  01
02A1:  MOVWF  48
02A2:  MOVLW  02
02A3:  MOVWF  49
02A4:  CALL   279
02A5:  GOTO   2BC
....................       case '\r'   : lcd_gotoxy(1,1);        break; // presun home 
02A6:  MOVLW  01
02A7:  MOVWF  48
02A8:  MOVWF  49
02A9:  CALL   279
02AA:  GOTO   2BC
....................       case '\b'   : lcd_send_byte(0,0x10);  break; // posun kurzor o 1 zpet 
02AB:  CLRF   4C
02AC:  MOVLW  10
02AD:  MOVWF  4D
02AE:  CALL   224
02AF:  GOTO   2BC
....................       default     : if (c<0x20) c&=0x7;            // preklopeni definovatelnych znaku na rozsah 0 az 0x1F 
02B0:  MOVF   47,W
02B1:  SUBLW  1F
02B2:  BTFSS  03.0
02B3:  GOTO   2B6
02B4:  MOVLW  07
02B5:  ANDWF  47,F
....................                     lcd_send_byte(1,c);     break; // zapis znak 
02B6:  MOVLW  01
02B7:  MOVWF  4C
02B8:  MOVF   47,W
02B9:  MOVWF  4D
02BA:  CALL   224
02BB:  GOTO   2BC
....................    } 
.................... } 
02BC:  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_); 
.................... } 
....................  
....................  
.................... // Smaz displej 
.................... // 
.................... void lcd_clr() 
.................... { 
....................    lcd_putc('\f'); 
.................... } 
....................  
....................  
.................... // 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_UP     "\x80\x04\x0E\x15\x04\x04\x04\x80"      /* symbol sipka nahoru       */ 
.................... #define LCD_CHAR_DOWN   "\x80\x04\x04\x04\x15\x0E\x04\x80"      /* symbol Sipka dolu         */ 
.................... #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); 
.................... //} 
....................  
....................  
.................... #include "1wire.c"   //pro mìøení teploty 
.................... #define ONE_WIRE_PIN       PIN_A1 
....................  
.................... void onewire_reset() 
....................  
....................  
....................  
.................... { 
.................... output_low(ONE_WIRE_PIN); 
*
0032:  BSF    03.5
0033:  BCF    05.1
0034:  BCF    03.5
0035:  BCF    05.1
.................... delay_us(500); 
0036:  CLRWDT
0037:  MOVLW  A6
0038:  MOVWF  77
0039:  DECFSZ 77,F
003A:  GOTO   039
.................... output_float(ONE_WIRE_PIN); 
003B:  BSF    03.5
003C:  BSF    05.1
.................... delay_us(500); 
003D:  CLRWDT
003E:  MOVLW  A6
003F:  MOVWF  77
0040:  DECFSZ 77,F
0041:  GOTO   040
.................... output_float(ONE_WIRE_PIN); 
0042:  BSF    05.1
.................... } 
0043:  BCF    03.5
0044:  RETLW  00
....................  
....................  
.................... void onewire_write(int data) 
.................... { 
.................... int count; 
....................  
.................... for (count=0; count<8; ++count) 
0045:  CLRF   37
0046:  MOVF   37,W
0047:  SUBLW  07
0048:  BTFSS  03.0
0049:  GOTO   065
.................... { 
.................... output_low(ONE_WIRE_PIN); 
004A:  BSF    03.5
004B:  BCF    05.1
004C:  BCF    03.5
004D:  BCF    05.1
.................... delay_us( 2 ); 
004E:  CLRWDT
004F:  NOP
.................... output_bit(ONE_WIRE_PIN, shift_right(&data,1,1)); 
0050:  BSF    03.0
0051:  RRF    36,F
0052:  BTFSC  03.0
0053:  GOTO   056
0054:  BCF    05.1
0055:  GOTO   057
0056:  BSF    05.1
0057:  BSF    03.5
0058:  BCF    05.1
....................  
....................    delay_us( 60 ); 
0059:  CLRWDT
005A:  MOVLW  13
005B:  MOVWF  77
005C:  DECFSZ 77,F
005D:  GOTO   05C
005E:  NOP
....................    output_float(ONE_WIRE_PIN); 
005F:  BSF    05.1
....................    delay_us( 2 ); 
0060:  CLRWDT
0061:  NOP
.................... } 
0062:  BCF    03.5
0063:  INCF   37,F
0064:  GOTO   046
.................... } 
0065:  RETLW  00
....................  
....................  
.................... int onewire_read() 
.................... { 
.................... int count, data; 
....................  
.................... for (count=0; count<8; ++count) 
0066:  CLRF   36
0067:  MOVF   36,W
0068:  SUBLW  07
0069:  BTFSS  03.0
006A:  GOTO   088
.................... { 
.................... output_low(ONE_WIRE_PIN); 
006B:  BSF    03.5
006C:  BCF    05.1
006D:  BCF    03.5
006E:  BCF    05.1
.................... delay_us( 2 ); 
006F:  CLRWDT
0070:  NOP
.................... output_float(ONE_WIRE_PIN); 
0071:  BSF    03.5
0072:  BSF    05.1
.................... delay_us( 8 ); 
0073:  CLRWDT
0074:  MOVLW  02
0075:  MOVWF  77
0076:  DECFSZ 77,F
0077:  GOTO   076
.................... shift_right(&data,1,input(ONE_WIRE_PIN)); 
0078:  BSF    05.1
0079:  BCF    03.5
007A:  BTFSC  05.1
007B:  GOTO   07E
007C:  BCF    03.0
007D:  GOTO   07F
007E:  BSF    03.0
007F:  RRF    37,F
....................      delay_us( 120 ); 
0080:  CLRWDT
0081:  MOVLW  27
0082:  MOVWF  77
0083:  DECFSZ 77,F
0084:  GOTO   083
0085:  NOP
.................... } 
0086:  INCF   36,F
0087:  GOTO   067
....................  
.................... return( data ); 
0088:  MOVF   37,W
0089:  MOVWF  78
.................... } 
008A:  RETLW  00
....................  
.................... #include "ds1820.c"  //pro mìøení teploty 
....................  
.................... float ds1820_read() 
.................... { 
.................... int8 busy=0, temp1, temp2; 
*
00A3:  CLRF   2D
.................... signed int16 temp3; 
.................... float result; 
....................  
.................... onewire_reset(); 
00A4:  CALL   032
.................... onewire_write(0xCC); 
00A5:  MOVLW  CC
00A6:  MOVWF  36
00A7:  CALL   045
.................... onewire_write(0x44); 
00A8:  MOVLW  44
00A9:  MOVWF  36
00AA:  CALL   045
....................  
.................... while (busy == 0) 
....................    busy = onewire_read(); 
00AB:  MOVF   2D,F
00AC:  BTFSS  03.2
00AD:  GOTO   0B2
00AE:  CALL   066
00AF:  MOVF   78,W
00B0:  MOVWF  2D
00B1:  GOTO   0AB
....................  
.................... onewire_reset(); 
00B2:  CALL   032
.................... onewire_write(0xCC); 
00B3:  MOVLW  CC
00B4:  MOVWF  36
00B5:  CALL   045
.................... onewire_write(0xBE); 
00B6:  MOVLW  BE
00B7:  MOVWF  36
00B8:  CALL   045
.................... temp1 = onewire_read(); 
00B9:  CALL   066
00BA:  MOVF   78,W
00BB:  MOVWF  2E
.................... temp2 = onewire_read(); 
00BC:  CALL   066
00BD:  MOVF   78,W
00BE:  MOVWF  2F
.................... temp3 = make16(temp2, temp1); 
00BF:  MOVF   2F,W
00C0:  MOVWF  31
00C1:  MOVF   2E,W
00C2:  MOVWF  30
....................  
.................... result = (float) temp3 / 16.0;  //calculation pro DS18B20 with 0.1 deg C 
00C3:  MOVF   31,W
00C4:  MOVWF  37
00C5:  MOVF   30,W
00C6:  MOVWF  36
*
00EB:  MOVF   77,W
00EC:  MOVWF  36
00ED:  MOVF   78,W
00EE:  MOVWF  37
00EF:  MOVF   79,W
00F0:  MOVWF  38
00F1:  MOVF   7A,W
00F2:  MOVWF  39
00F3:  MOVF   39,W
00F4:  MOVWF  3D
00F5:  MOVF   38,W
00F6:  MOVWF  3C
00F7:  MOVF   37,W
00F8:  MOVWF  3B
00F9:  MOVF   36,W
00FA:  MOVWF  3A
00FB:  CLRF   41
00FC:  CLRF   40
00FD:  CLRF   3F
00FE:  MOVLW  83
00FF:  MOVWF  3E
*
01C9:  MOVF   7A,W
01CA:  MOVWF  35
01CB:  MOVF   79,W
01CC:  MOVWF  34
01CD:  MOVF   78,W
01CE:  MOVWF  33
01CF:  MOVF   77,W
01D0:  MOVWF  32
....................  
....................  
....................    delay_ms(200); 
01D1:  MOVLW  C8
01D2:  MOVWF  48
01D3:  CALL   08B
....................    return(result); 
01D4:  MOVF   32,W
01D5:  MOVWF  77
01D6:  MOVF   33,W
01D7:  MOVWF  78
01D8:  MOVF   34,W
01D9:  MOVWF  79
01DA:  MOVF   35,W
01DB:  MOVWF  7A
....................  
.................... } 
01DC:  GOTO   5EB (RETURN)
....................  
....................  
.................... void main() 
.................... { 
*
059C:  CLRF   04
059D:  BCF    03.7
059E:  MOVLW  1F
059F:  ANDWF  03,F
05A0:  BSF    03.5
05A1:  BSF    1F.0
05A2:  BSF    1F.1
05A3:  BSF    1F.2
05A4:  BCF    1F.3
05A5:  MOVLW  07
05A6:  MOVWF  1C
....................  
.................... double t;     // promena pro hodnotu z A/D pro tlak 
.................... double a;   // konstanta pro vypocet tlaku 
....................  
.................... float temperature; //pro mìøení teploty 
....................  
....................    setup_adc_ports(AN0); 
*
05AA:  BSF    03.5
05AB:  BCF    1F.0
05AC:  BSF    1F.1
05AD:  BSF    1F.2
05AE:  BSF    1F.3
....................    setup_adc(ADC_CLOCK_INTERNAL); 
05AF:  BCF    1F.6
05B0:  BCF    03.5
05B1:  BSF    1F.6
05B2:  BSF    1F.7
05B3:  BSF    03.5
05B4:  BSF    1F.7
05B5:  BCF    03.5
05B6:  BSF    1F.0
....................    setup_psp(PSP_DISABLED); 
05B7:  BSF    03.5
05B8:  BCF    09.4
....................    setup_spi(SPI_SS_DISABLED); 
05B9:  BCF    03.5
05BA:  BCF    14.5
05BB:  BCF    20.5
05BC:  MOVF   20,W
05BD:  BSF    03.5
05BE:  MOVWF  07
05BF:  BCF    03.5
05C0:  BSF    20.4
05C1:  MOVF   20,W
05C2:  BSF    03.5
05C3:  MOVWF  07
05C4:  BCF    03.5
05C5:  BCF    20.3
05C6:  MOVF   20,W
05C7:  BSF    03.5
05C8:  MOVWF  07
05C9:  MOVLW  01
05CA:  BCF    03.5
05CB:  MOVWF  14
05CC:  MOVLW  00
05CD:  BSF    03.5
05CE:  MOVWF  14
....................    setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1); 
05CF:  MOVF   01,W
05D0:  ANDLW  C7
05D1:  IORLW  08
05D2:  MOVWF  01
....................    setup_timer_1(T1_DISABLED); 
05D3:  BCF    03.5
05D4:  CLRF   10
....................    setup_timer_2(T2_DISABLED,0,1); 
05D5:  MOVLW  00
05D6:  MOVWF  78
05D7:  MOVWF  12
05D8:  MOVLW  00
05D9:  BSF    03.5
05DA:  MOVWF  12
....................    setup_comparator(NC_NC_NC_NC); 
05DB:  MOVLW  07
05DC:  MOVWF  1C
05DD:  MOVF   05,W
05DE:  CLRWDT
05DF:  MOVLW  02
05E0:  MOVWF  77
05E1:  DECFSZ 77,F
05E2:  GOTO   5E1
05E3:  GOTO   5E4
05E4:  MOVF   1C,W
05E5:  BCF    03.5
05E6:  BCF    0D.6
....................    setup_vref(FALSE); 
05E7:  BSF    03.5
05E8:  CLRF   1D
....................  
....................    // TODO: USER CODE!! 
....................  
.................... while(true) 
....................    { 
....................       temperature = ds1820_read(); //naètení teploty z èidla 
05E9:  BCF    03.5
05EA:  GOTO   0A3
05EB:  MOVF   7A,W
05EC:  MOVWF  2C
05ED:  MOVF   79,W
05EE:  MOVWF  2B
05EF:  MOVF   78,W
05F0:  MOVWF  2A
05F1:  MOVF   77,W
05F2:  MOVWF  29
....................        
....................       a = 0.10850694;    //konstantak pro tlak 
05F3:  MOVLW  E3
05F4:  MOVWF  28
05F5:  MOVLW  38
05F6:  MOVWF  27
05F7:  MOVLW  5E
05F8:  MOVWF  26
05F9:  MOVLW  7B
05FA:  MOVWF  25
....................       t = read_adc(); //za t dosazení hodnoty z a/d pro tlak 
05FB:  BSF    1F.2
05FC:  BTFSC  1F.2
05FD:  GOTO   5FC
05FE:  MOVF   1E,W
05FF:  MOVWF  7A
0600:  BSF    03.5
0601:  MOVF   1E,W
0602:  BCF    03.5
0603:  MOVWF  2D
0604:  MOVF   1E,W
0605:  MOVWF  2E
0606:  GOTO   1DD
0607:  MOVF   7A,W
0608:  MOVWF  24
0609:  MOVF   79,W
060A:  MOVWF  23
060B:  MOVF   78,W
060C:  MOVWF  22
060D:  MOVF   77,W
060E:  MOVWF  21
....................        
....................        
....................   
....................       lcd_init(); //inicializuje LCD 
060F:  GOTO   23E
....................       LCD_gotoxy(1,1);  //na LCD 1bunka 1øadek 
0610:  MOVLW  01
0611:  MOVWF  48
0612:  MOVWF  49
0613:  CALL   279
....................       printf(lcd_putc,"Temp: %5.3f°C ", temperature); //teplota v °C 
0614:  CLRF   2D
0615:  MOVF   2D,W
0616:  CALL   00C
0617:  INCF   2D,F
0618:  MOVWF  77
0619:  MOVWF  47
061A:  CALL   28A
061B:  MOVLW  06
061C:  SUBWF  2D,W
061D:  BTFSS  03.2
061E:  GOTO   615
061F:  MOVLW  04
0620:  MOVWF  04
0621:  MOVF   2C,W
0622:  MOVWF  3D
0623:  MOVF   2B,W
0624:  MOVWF  3C
0625:  MOVF   2A,W
0626:  MOVWF  3B
0627:  MOVF   29,W
0628:  MOVWF  3A
0629:  MOVLW  03
062A:  MOVWF  3E
062B:  CALL   374
062C:  MOVLW  B0
062D:  MOVWF  47
062E:  CALL   28A
062F:  MOVLW  43
0630:  MOVWF  47
0631:  CALL   28A
0632:  MOVLW  20
0633:  MOVWF  47
0634:  CALL   28A
....................        
....................       LCD_gotoxy(1,2);  //na LCD 1bunka 2øadek 
0635:  MOVLW  01
0636:  MOVWF  48
0637:  MOVLW  02
0638:  MOVWF  49
0639:  CALL   279
....................       printf(lcd_putc,"Tlak: %5.3fkPa", ((t-41)*a)+15 ); //tiska tlaku v kPa 
063A:  BSF    03.1
063B:  MOVF   24,W
063C:  MOVWF  38
063D:  MOVF   23,W
063E:  MOVWF  37
063F:  MOVF   22,W
0640:  MOVWF  36
0641:  MOVF   21,W
0642:  MOVWF  35
0643:  CLRF   3C
0644:  CLRF   3B
0645:  MOVLW  24
0646:  MOVWF  3A
0647:  MOVLW  84
0648:  MOVWF  39
0649:  CALL   45B
064A:  MOVF   77,W
064B:  MOVWF  2D
064C:  MOVF   78,W
064D:  MOVWF  2E
064E:  MOVF   79,W
064F:  MOVWF  2F
0650:  MOVF   7A,W
0651:  MOVWF  30
0652:  MOVWF  4A
0653:  MOVF   79,W
0654:  MOVWF  49
0655:  MOVF   78,W
0656:  MOVWF  48
0657:  MOVF   77,W
0658:  MOVWF  47
0659:  MOVF   28,W
065A:  MOVWF  4E
065B:  MOVF   27,W
065C:  MOVWF  4D
065D:  MOVF   26,W
065E:  MOVWF  4C
065F:  MOVF   25,W
0660:  MOVWF  4B
0661:  CALL   2BD
0662:  MOVF   77,W
0663:  MOVWF  31
0664:  MOVF   78,W
0665:  MOVWF  32
0666:  MOVF   79,W
0667:  MOVWF  33
0668:  MOVF   7A,W
0669:  MOVWF  34
066A:  BCF    03.1
066B:  MOVF   7A,W
066C:  MOVWF  38
066D:  MOVF   79,W
066E:  MOVWF  37
066F:  MOVF   78,W
0670:  MOVWF  36
0671:  MOVF   77,W
0672:  MOVWF  35
0673:  CLRF   3C
0674:  CLRF   3B
0675:  MOVLW  70
0676:  MOVWF  3A
0677:  MOVLW  82
0678:  MOVWF  39
0679:  CALL   45B
067A:  MOVF   77,W
067B:  MOVWF  35
067C:  MOVF   78,W
067D:  MOVWF  36
067E:  MOVF   79,W
067F:  MOVWF  37
0680:  MOVF   7A,W
0681:  MOVWF  38
0682:  CLRF   39
0683:  MOVF   39,W
0684:  CALL   01F
0685:  INCF   39,F
0686:  MOVWF  77
0687:  MOVWF  47
0688:  CALL   28A
0689:  MOVLW  06
068A:  SUBWF  39,W
068B:  BTFSS  03.2
068C:  GOTO   683
068D:  MOVLW  04
068E:  MOVWF  04
068F:  MOVF   38,W
0690:  MOVWF  3D
0691:  MOVF   37,W
0692:  MOVWF  3C
0693:  MOVF   36,W
0694:  MOVWF  3B
0695:  MOVF   35,W
0696:  MOVWF  3A
0697:  MOVLW  03
0698:  MOVWF  3E
0699:  CALL   374
069A:  MOVLW  6B
069B:  MOVWF  47
069C:  CALL   28A
069D:  MOVLW  50
069E:  MOVWF  47
069F:  CALL   28A
06A0:  MOVLW  61
06A1:  MOVWF  47
06A2:  CALL   28A
....................       
....................       Delay_ms(100); 
06A3:  MOVLW  64
06A4:  MOVWF  48
06A5:  CALL   08B
....................    } 
06A6:  GOTO   5EA
....................  
....................  
.................... } 
06A7:  SLEEP

Configuration Fuses:
   Word  1: 3939   XT NOWDT NOPUT NODEBUG NOPROTECT NOBROWNOUT NOLVP NOCPD WRT_50%