CCS PCM C Compiler, Version 4.059d, 15399 03-I-08 17:43
Filename: C:\RS\projekty\lcdmob2\.\main.lst
ROM used: 1040 words (51%)
Largest free fragment is 1008
RAM used: 165 (45%) at main() level
234 (64%) worst case
Stack: 4 locations
*
0000: MOVLW 00
0001: MOVWF 0A
0002: GOTO 14E
0003: NOP
.................... #include "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)
0062: MOVLW 41
0063: MOVWF 04
0064: BSF 03.7
0065: MOVF 00,W
0066: BTFSC 03.2
0067: GOTO 079
0068: MOVLW 01
0069: MOVWF 78
006A: MOVLW BF
006B: MOVWF 77
006C: CLRWDT
006D: DECFSZ 77,F
006E: GOTO 06C
006F: DECFSZ 78,F
0070: GOTO 06A
0071: MOVLW 4A
0072: MOVWF 77
0073: DECFSZ 77,F
0074: GOTO 073
0075: NOP
0076: CLRWDT
0077: DECFSZ 00,F
0078: GOTO 068
0079: 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 "lcd.c"
.................... // 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
007A: MOVF 07,W
007B: ANDLW F0
007C: BSF 03.6
007D: MOVWF 48
007E: MOVF 47,W
007F: ANDLW 0F
0080: IORWF 48,W
0081: BCF 03.6
0082: MOVWF 07
.................... #else
.................... // data jsou na libovolnych 4 bitech libovolnych portu
.................... output_bit(LCD_D0,bit_test(n,0));
.................... output_bit(LCD_D1,bit_test(n,1));
.................... output_bit(LCD_D2,bit_test(n,2));
.................... output_bit(LCD_D3,bit_test(n,3));
.................... #endif
.................... output_bit(LCD_E,1); // vzestupna hrana
0083: BSF 06.0
0084: BSF 03.5
0085: BCF 06.0
.................... delay_us(1); // pockej alespon 450ns od e nebo alespon 195ns od dat
0086: CLRWDT
.................... output_bit(LCD_E,0); // sestupna hrana (minimalni perioda e je 1us)
0087: BCF 03.5
0088: BCF 06.0
0089: BSF 03.5
008A: BCF 06.0
.................... }
008B: BCF 03.5
008C: 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
008D: BSF 03.6
008E: MOVF 45,F
008F: BTFSS 03.2
0090: GOTO 095
0091: BCF 03.6
0092: BCF 06.1
0093: GOTO 097
0094: BSF 03.6
0095: BCF 03.6
0096: BSF 06.1
0097: BSF 03.5
0098: BCF 06.1
.................... swap(n);
0099: BCF 03.5
009A: BSF 03.6
009B: SWAPF 46,F
.................... lcd_send_nibble(n); // posli horni pulku bajtu
009C: MOVF 46,W
009D: MOVWF 47
009E: BCF 03.6
009F: CALL 07A
.................... swap(n);
00A0: BSF 03.6
00A1: SWAPF 46,F
.................... lcd_send_nibble(n); // posli spodni pulku bajtu
00A2: MOVF 46,W
00A3: MOVWF 47
00A4: BCF 03.6
00A5: CALL 07A
.................... delay_us(40); // minimalni doba na provedeni prikazu
00A6: CLRWDT
00A7: MOVLW 0C
00A8: MOVWF 77
00A9: DECFSZ 77,F
00AA: GOTO 0A9
00AB: GOTO 0AC
.................... }
00AC: 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
00AD: MOVLW 14
00AE: BSF 03.6
00AF: MOVWF 41
00B0: BCF 03.6
00B1: CALL 062
....................
.................... #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
00B2: MOVLW F0
00B3: BSF 03.5
00B4: ANDWF 07,F
.................... #endif
....................
.................... output_bit(LCD_RS,0); // nastav jako vystup a nastav klidovy stav
00B5: BCF 03.5
00B6: BCF 06.1
00B7: BSF 03.5
00B8: BCF 06.1
.................... output_bit(LCD_E, 0); // nastav jako vystup a nastav klidovy stav
00B9: BCF 03.5
00BA: BCF 06.0
00BB: BSF 03.5
00BC: BCF 06.0
....................
.................... for (i=0; i<3; i++) // nastav lcd do rezimu 8 bitu sbernice
00BD: BCF 03.5
00BE: BSF 03.6
00BF: CLRF 3D
00C0: MOVF 3D,W
00C1: SUBLW 02
00C2: BTFSS 03.0
00C3: GOTO 0D0
.................... {
.................... delay_ms(2); // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
00C4: MOVLW 02
00C5: MOVWF 41
00C6: BCF 03.6
00C7: CALL 062
.................... lcd_send_nibble(3); // rezim 8 bitu
00C8: MOVLW 03
00C9: BSF 03.6
00CA: MOVWF 47
00CB: BCF 03.6
00CC: CALL 07A
.................... }
00CD: BSF 03.6
00CE: INCF 3D,F
00CF: GOTO 0C0
....................
.................... delay_us(40); // cas na zpracovani
00D0: CLRWDT
00D1: MOVLW 0C
00D2: MOVWF 77
00D3: DECFSZ 77,F
00D4: GOTO 0D3
00D5: GOTO 0D6
.................... lcd_send_nibble(2); // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
00D6: MOVLW 02
00D7: MOVWF 47
00D8: BCF 03.6
00D9: CALL 07A
.................... delay_us(40); // cas na zpracovani
00DA: CLRWDT
00DB: MOVLW 0C
00DC: MOVWF 77
00DD: DECFSZ 77,F
00DE: GOTO 0DD
00DF: GOTO 0E0
....................
.................... for (i=0;i<3;i++) // proved inicializaci (nastaveni modu, smazani apod)
00E0: BSF 03.6
00E1: CLRF 3D
00E2: MOVF 3D,W
00E3: SUBLW 02
00E4: BTFSS 03.0
00E5: GOTO 0F8
.................... {
.................... lcd_send_byte(0,LCD_INIT_STRING[i]);
00E6: MOVF 3D,W
00E7: BCF 03.6
00E8: CALL 004
00E9: BSF 03.6
00EA: MOVWF 3E
00EB: CLRF 45
00EC: MOVF 3E,W
00ED: MOVWF 46
00EE: BCF 03.6
00EF: CALL 08D
.................... delay_ms(2);
00F0: MOVLW 02
00F1: BSF 03.6
00F2: MOVWF 41
00F3: BCF 03.6
00F4: CALL 062
.................... }
00F5: BSF 03.6
00F6: INCF 3D,F
00F7: GOTO 0E2
.................... }
00F8: BCF 03.6
00F9: GOTO 190 (RETURN)
....................
....................
.................... // Proved presun kurzoru
.................... //
.................... // Pozice 1.1 je domu
.................... //
.................... void lcd_gotoxy( BYTE x, BYTE y)
.................... {
....................
.................... BYTE Adr;
....................
.................... Adr=x-1;
00FA: MOVLW 01
00FB: BSF 03.6
00FC: SUBWF 41,W
00FD: MOVWF 43
.................... if(y==2)
00FE: MOVF 42,W
00FF: SUBLW 02
0100: BTFSS 03.2
0101: GOTO 104
.................... Adr+=LCD_LINE_2;
0102: MOVLW 40
0103: ADDWF 43,F
....................
.................... lcd_send_byte(0,0x80|Adr);
0104: MOVF 43,W
0105: IORLW 80
0106: MOVWF 44
0107: CLRF 45
0108: MOVF 44,W
0109: MOVWF 46
010A: BCF 03.6
010B: CALL 08D
.................... }
010C: RETLW 00
....................
....................
.................... // Zapis znaku na displej, zpracovani ridicich znaku
.................... //
.................... void lcd_putc( char c)
.................... {
....................
.................... switch (c)
.................... {
010D: BSF 03.6
010E: MOVF 40,W
010F: XORLW 0C
0110: BCF 03.6
0111: BTFSC 03.2
0112: GOTO 11D
0113: XORLW 06
0114: BTFSC 03.2
0115: GOTO 129
0116: XORLW 07
0117: BTFSC 03.2
0118: GOTO 131
0119: XORLW 05
011A: BTFSC 03.2
011B: GOTO 138
011C: GOTO 13F
.................... case '\f' : lcd_send_byte(0,1); // smaz displej
011D: BSF 03.6
011E: CLRF 45
011F: MOVLW 01
0120: MOVWF 46
0121: BCF 03.6
0122: CALL 08D
.................... delay_ms(2);
0123: MOVLW 02
0124: BSF 03.6
0125: MOVWF 41
0126: BCF 03.6
0127: CALL 062
.................... break;
0128: GOTO 14D
.................... case '\n' : lcd_gotoxy(1,2); break; // presun se na 1. znak 2. radky
0129: MOVLW 01
012A: BSF 03.6
012B: MOVWF 41
012C: MOVLW 02
012D: MOVWF 42
012E: BCF 03.6
012F: CALL 0FA
0130: GOTO 14D
.................... case '\r' : lcd_gotoxy(1,1); break; // presun home
0131: MOVLW 01
0132: BSF 03.6
0133: MOVWF 41
0134: MOVWF 42
0135: BCF 03.6
0136: CALL 0FA
0137: GOTO 14D
.................... case '\b' : lcd_send_byte(0,0x10); break; // posun kurzor o 1 zpet
0138: BSF 03.6
0139: CLRF 45
013A: MOVLW 10
013B: MOVWF 46
013C: BCF 03.6
013D: CALL 08D
013E: GOTO 14D
.................... default : if (c<0x20) c&=0x7; // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
013F: BSF 03.6
0140: MOVF 40,W
0141: SUBLW 1F
0142: BTFSS 03.0
0143: GOTO 146
0144: MOVLW 07
0145: ANDWF 40,F
.................... lcd_send_byte(1,c); break; // zapis znak
0146: MOVLW 01
0147: MOVWF 45
0148: MOVF 40,W
0149: MOVWF 46
014A: BCF 03.6
014B: CALL 08D
014C: GOTO 14D
.................... }
.................... }
014D: 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);
.................... //}
....................
....................
.................... void main()
.................... {
014E: CLRF 04
014F: BCF 03.7
0150: MOVLW 1F
0151: ANDWF 03,F
0152: MOVLW 0C
0153: BSF 03.5
0154: MOVWF 19
0155: MOVLW A6
0156: MOVWF 18
0157: MOVLW 90
0158: BCF 03.5
0159: MOVWF 18
015A: BSF 03.5
015B: BSF 1F.0
015C: BSF 1F.1
015D: BSF 1F.2
015E: BCF 1F.3
015F: MOVLW 07
0160: MOVWF 1C
.................... char odp1[45];
.................... char odp2[10];
.................... char odp3[45];
.................... char odp4[10];
.................... char odp5[45];
....................
....................
....................
.................... setup_adc_ports(NO_ANALOGS);
*
0164: BSF 03.5
0165: BSF 1F.0
0166: BSF 1F.1
0167: BSF 1F.2
0168: BCF 1F.3
.................... setup_adc(ADC_OFF);
0169: BCF 03.5
016A: BCF 1F.0
.................... setup_psp(PSP_DISABLED);
016B: BSF 03.5
016C: BCF 09.4
.................... setup_spi(FALSE);
*
0161: MOVLW FF
0162: BCF 03.5
0163: MOVWF 20
*
016D: BCF 03.5
016E: BCF 14.5
016F: BCF 20.5
0170: MOVF 20,W
0171: BSF 03.5
0172: MOVWF 07
0173: BCF 03.5
0174: BSF 20.4
0175: MOVF 20,W
0176: BSF 03.5
0177: MOVWF 07
0178: BCF 03.5
0179: BCF 20.3
017A: MOVF 20,W
017B: BSF 03.5
017C: MOVWF 07
017D: MOVLW 00
017E: BCF 03.5
017F: MOVWF 14
0180: BSF 03.5
0181: MOVWF 14
.................... setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
0182: MOVF 01,W
0183: ANDLW C7
0184: IORLW 08
0185: MOVWF 01
.................... setup_timer_1(T1_DISABLED);
0186: BCF 03.5
0187: CLRF 10
.................... setup_timer_2(T2_DISABLED,0,1);
0188: MOVLW 00
0189: MOVWF 78
018A: MOVWF 12
018B: MOVLW 00
018C: BSF 03.5
018D: MOVWF 12
....................
.................... lcd_init();
018E: BCF 03.5
018F: GOTO 0AD
....................
.................... delay_ms(2000);
0190: MOVLW 08
0191: MOVWF 62
0192: MOVLW FA
0193: BSF 03.6
0194: MOVWF 41
0195: BCF 03.6
0196: CALL 062
0197: DECFSZ 62,F
0198: GOTO 192
....................
.................... printf(lcd_putc,"\f Z");
0199: MOVLW 0C
019A: BSF 03.6
019B: MOVWF 40
019C: BCF 03.6
019D: CALL 10D
019E: MOVLW 20
019F: BSF 03.6
01A0: MOVWF 40
01A1: BCF 03.6
01A2: CALL 10D
01A3: MOVLW 5A
01A4: BSF 03.6
01A5: MOVWF 40
01A6: BCF 03.6
01A7: CALL 10D
.................... delay_ms(100);
01A8: MOVLW 64
01A9: BSF 03.6
01AA: MOVWF 41
01AB: BCF 03.6
01AC: CALL 062
.................... printf(lcd_putc,"a");
01AD: MOVLW 61
01AE: BSF 03.6
01AF: MOVWF 40
01B0: BCF 03.6
01B1: CALL 10D
.................... delay_ms(50);
01B2: MOVLW 32
01B3: BSF 03.6
01B4: MOVWF 41
01B5: BCF 03.6
01B6: CALL 062
.................... printf(lcd_putc,"v");
01B7: MOVLW 76
01B8: BSF 03.6
01B9: MOVWF 40
01BA: BCF 03.6
01BB: CALL 10D
.................... delay_ms(50);
01BC: MOVLW 32
01BD: BSF 03.6
01BE: MOVWF 41
01BF: BCF 03.6
01C0: CALL 062
.................... printf(lcd_putc,"a");
01C1: MOVLW 61
01C2: BSF 03.6
01C3: MOVWF 40
01C4: BCF 03.6
01C5: CALL 10D
.................... delay_ms(50);
01C6: MOVLW 32
01C7: BSF 03.6
01C8: MOVWF 41
01C9: BCF 03.6
01CA: CALL 062
.................... printf(lcd_putc,"d");
01CB: MOVLW 64
01CC: BSF 03.6
01CD: MOVWF 40
01CE: BCF 03.6
01CF: CALL 10D
.................... delay_ms(50);
01D0: MOVLW 32
01D1: BSF 03.6
01D2: MOVWF 41
01D3: BCF 03.6
01D4: CALL 062
.................... printf(lcd_putc,"i");
01D5: MOVLW 69
01D6: BSF 03.6
01D7: MOVWF 40
01D8: BCF 03.6
01D9: CALL 10D
.................... delay_ms(50);
01DA: MOVLW 32
01DB: BSF 03.6
01DC: MOVWF 41
01DD: BCF 03.6
01DE: CALL 062
.................... printf(lcd_putc,"m");
01DF: MOVLW 6D
01E0: BSF 03.6
01E1: MOVWF 40
01E2: BCF 03.6
01E3: CALL 10D
.................... delay_ms(50);
01E4: MOVLW 32
01E5: BSF 03.6
01E6: MOVWF 41
01E7: BCF 03.6
01E8: CALL 062
.................... printf(lcd_putc," ");
01E9: MOVLW 20
01EA: BSF 03.6
01EB: MOVWF 40
01EC: BCF 03.6
01ED: CALL 10D
.................... delay_ms(50);
01EE: MOVLW 32
01EF: BSF 03.6
01F0: MOVWF 41
01F1: BCF 03.6
01F2: CALL 062
.................... printf(lcd_putc,"s");
01F3: MOVLW 73
01F4: BSF 03.6
01F5: MOVWF 40
01F6: BCF 03.6
01F7: CALL 10D
.................... delay_ms(50);
01F8: MOVLW 32
01F9: BSF 03.6
01FA: MOVWF 41
01FB: BCF 03.6
01FC: CALL 062
.................... printf(lcd_putc,"y");
01FD: MOVLW 79
01FE: BSF 03.6
01FF: MOVWF 40
0200: BCF 03.6
0201: CALL 10D
.................... delay_ms(50);
0202: MOVLW 32
0203: BSF 03.6
0204: MOVWF 41
0205: BCF 03.6
0206: CALL 062
.................... printf(lcd_putc,"s");
0207: MOVLW 73
0208: BSF 03.6
0209: MOVWF 40
020A: BCF 03.6
020B: CALL 10D
.................... delay_ms(50);
020C: MOVLW 32
020D: BSF 03.6
020E: MOVWF 41
020F: BCF 03.6
0210: CALL 062
.................... printf(lcd_putc,"t");
0211: MOVLW 74
0212: BSF 03.6
0213: MOVWF 40
0214: BCF 03.6
0215: CALL 10D
.................... delay_ms(50);
0216: MOVLW 32
0217: BSF 03.6
0218: MOVWF 41
0219: BCF 03.6
021A: CALL 062
.................... printf(lcd_putc,"e");
021B: MOVLW 65
021C: BSF 03.6
021D: MOVWF 40
021E: BCF 03.6
021F: CALL 10D
.................... delay_ms(50);
0220: MOVLW 32
0221: BSF 03.6
0222: MOVWF 41
0223: BCF 03.6
0224: CALL 062
.................... printf(lcd_putc,"m\n");
0225: MOVLW 6D
0226: BSF 03.6
0227: MOVWF 40
0228: BCF 03.6
0229: CALL 10D
022A: MOVLW 0A
022B: BSF 03.6
022C: MOVWF 40
022D: BCF 03.6
022E: CALL 10D
.................... delay_ms(150);
022F: MOVLW 96
0230: BSF 03.6
0231: MOVWF 41
0232: BCF 03.6
0233: CALL 062
.................... printf(lcd_putc," .");
0234: CLRF 62
0235: MOVF 62,W
0236: CALL 00C
0237: INCF 62,F
0238: MOVWF 77
0239: BSF 03.6
023A: MOVWF 40
023B: BCF 03.6
023C: CALL 10D
023D: MOVLW 04
023E: SUBWF 62,W
023F: BTFSS 03.2
0240: GOTO 235
.................... delay_ms(150);
0241: MOVLW 96
0242: BSF 03.6
0243: MOVWF 41
0244: BCF 03.6
0245: CALL 062
.................... printf(lcd_putc," .");
0246: MOVLW 20
0247: BSF 03.6
0248: MOVWF 40
0249: BCF 03.6
024A: CALL 10D
024B: MOVLW 2E
024C: BSF 03.6
024D: MOVWF 40
024E: BCF 03.6
024F: CALL 10D
.................... delay_ms(175);
0250: MOVLW AF
0251: BSF 03.6
0252: MOVWF 41
0253: BCF 03.6
0254: CALL 062
.................... printf(lcd_putc," .");
0255: MOVLW 20
0256: BSF 03.6
0257: MOVWF 40
0258: BCF 03.6
0259: CALL 10D
025A: MOVLW 2E
025B: BSF 03.6
025C: MOVWF 40
025D: BCF 03.6
025E: CALL 10D
.................... delay_ms(300);
025F: MOVLW 02
0260: MOVWF 62
0261: MOVLW 96
0262: BSF 03.6
0263: MOVWF 41
0264: BCF 03.6
0265: CALL 062
0266: DECFSZ 62,F
0267: GOTO 261
.................... printf(lcd_putc," .");
0268: MOVLW 20
0269: BSF 03.6
026A: MOVWF 40
026B: BCF 03.6
026C: CALL 10D
026D: MOVLW 2E
026E: BSF 03.6
026F: MOVWF 40
0270: BCF 03.6
0271: CALL 10D
.................... delay_ms(400);
0272: MOVLW 02
0273: MOVWF 62
0274: MOVLW C8
0275: BSF 03.6
0276: MOVWF 41
0277: BCF 03.6
0278: CALL 062
0279: DECFSZ 62,F
027A: GOTO 274
.................... printf(lcd_putc," .");
027B: MOVLW 20
027C: BSF 03.6
027D: MOVWF 40
027E: BCF 03.6
027F: CALL 10D
0280: MOVLW 2E
0281: BSF 03.6
0282: MOVWF 40
0283: BCF 03.6
0284: CALL 10D
.................... delay_ms(550);
0285: MOVLW 05
0286: MOVWF 62
0287: MOVLW 6E
0288: BSF 03.6
0289: MOVWF 41
028A: BCF 03.6
028B: CALL 062
028C: DECFSZ 62,F
028D: GOTO 287
....................
.................... while(true)
.................... {
.................... output_low(PIN_A4);
028E: BSF 03.5
028F: BCF 05.4
0290: BCF 03.5
0291: BCF 05.4
.................... delay_ms(1500);
0292: MOVLW 06
0293: MOVWF 62
0294: MOVLW FA
0295: BSF 03.6
0296: MOVWF 41
0297: BCF 03.6
0298: CALL 062
0299: DECFSZ 62,F
029A: GOTO 294
.................... output_high(PIN_A4);
029B: BSF 03.5
029C: BCF 05.4
029D: BCF 03.5
029E: BSF 05.4
....................
.................... printf("AT+CBC\r");
029F: CLRF 62
02A0: MOVF 62,W
02A1: CALL 015
02A2: INCF 62,F
02A3: MOVWF 77
02A4: MOVF 77,W
02A5: BTFSS 0C.4
02A6: GOTO 2A5
02A7: MOVWF 19
02A8: MOVLW 07
02A9: SUBWF 62,W
02AA: BTFSS 03.2
02AB: GOTO 2A0
....................
....................
.................... gets(odp1);
02AC: MOVLW 21
02AD: MOVWF 04
02AE: BCF 03.7
02AF: DECF 04,F
02B0: INCF 04,F
02B1: BTFSS 0C.5
02B2: GOTO 2B1
02B3: MOVF 1A,W
02B4: MOVWF 00
02B5: MOVLW 0D
02B6: SUBWF 00,W
02B7: BTFSS 03.2
02B8: GOTO 2B0
02B9: CLRF 00
.................... gets(odp2);
02BA: MOVLW 4E
02BB: MOVWF 04
02BC: BCF 03.7
02BD: DECF 04,F
02BE: INCF 04,F
02BF: BTFSS 0C.5
02C0: GOTO 2BF
02C1: MOVF 1A,W
02C2: MOVWF 00
02C3: MOVLW 0D
02C4: SUBWF 00,W
02C5: BTFSS 03.2
02C6: GOTO 2BE
02C7: CLRF 00
.................... gets(odp3);
02C8: MOVLW A0
02C9: MOVWF 04
02CA: BCF 03.7
02CB: DECF 04,F
02CC: INCF 04,F
02CD: BTFSS 0C.5
02CE: GOTO 2CD
02CF: MOVF 1A,W
02D0: MOVWF 00
02D1: MOVLW 0D
02D2: SUBWF 00,W
02D3: BTFSS 03.2
02D4: GOTO 2CC
02D5: CLRF 00
.................... gets(odp4);
02D6: MOVLW 58
02D7: MOVWF 04
02D8: BCF 03.7
02D9: DECF 04,F
02DA: INCF 04,F
02DB: BTFSS 0C.5
02DC: GOTO 2DB
02DD: MOVF 1A,W
02DE: MOVWF 00
02DF: MOVLW 0D
02E0: SUBWF 00,W
02E1: BTFSS 03.2
02E2: GOTO 2DA
02E3: CLRF 00
.................... gets(odp5);
02E4: MOVLW 10
02E5: MOVWF 04
02E6: BSF 03.7
02E7: DECF 04,F
02E8: INCF 04,F
02E9: BTFSS 0C.5
02EA: GOTO 2E9
02EB: MOVF 1A,W
02EC: MOVWF 00
02ED: MOVLW 0D
02EE: SUBWF 00,W
02EF: BTFSS 03.2
02F0: GOTO 2E8
02F1: CLRF 00
....................
....................
.................... printf(lcd_putc,"\fODP1:%s",odp1);
02F2: CLRF 62
02F3: MOVF 62,W
02F4: CALL 021
02F5: INCF 62,F
02F6: MOVWF 77
02F7: BSF 03.6
02F8: MOVWF 40
02F9: BCF 03.6
02FA: CALL 10D
02FB: MOVLW 06
02FC: SUBWF 62,W
02FD: BTFSS 03.2
02FE: GOTO 2F3
02FF: MOVLW 21
0300: MOVWF 04
0301: BCF 03.7
0302: MOVLW 00
0303: IORWF 00,W
0304: BTFSC 03.2
0305: GOTO 318
0306: CLRF 64
0307: MOVF 04,W
0308: MOVWF 63
0309: BCF 64.0
030A: BTFSC 03.7
030B: BSF 64.0
030C: MOVF 00,W
030D: BSF 03.6
030E: MOVWF 40
030F: BCF 03.6
0310: CALL 10D
0311: MOVF 63,W
0312: MOVWF 04
0313: BCF 03.7
0314: BTFSC 64.0
0315: BSF 03.7
0316: INCF 04,F
0317: GOTO 302
.................... delay_ms(2000);
0318: MOVLW 08
0319: MOVWF 62
031A: MOVLW FA
031B: BSF 03.6
031C: MOVWF 41
031D: BCF 03.6
031E: CALL 062
031F: DECFSZ 62,F
0320: GOTO 31A
....................
.................... printf(lcd_putc,"\fODP2:%s",odp2);
0321: CLRF 62
0322: MOVF 62,W
0323: CALL 02E
0324: INCF 62,F
0325: MOVWF 77
0326: BSF 03.6
0327: MOVWF 40
0328: BCF 03.6
0329: CALL 10D
032A: MOVLW 06
032B: SUBWF 62,W
032C: BTFSS 03.2
032D: GOTO 322
032E: MOVLW 4E
032F: MOVWF 04
0330: BCF 03.7
0331: MOVLW 00
0332: IORWF 00,W
0333: BTFSC 03.2
0334: GOTO 347
0335: CLRF 64
0336: MOVF 04,W
0337: MOVWF 63
0338: BCF 64.0
0339: BTFSC 03.7
033A: BSF 64.0
033B: MOVF 00,W
033C: BSF 03.6
033D: MOVWF 40
033E: BCF 03.6
033F: CALL 10D
0340: MOVF 63,W
0341: MOVWF 04
0342: BCF 03.7
0343: BTFSC 64.0
0344: BSF 03.7
0345: INCF 04,F
0346: GOTO 331
.................... delay_ms(2000);
0347: MOVLW 08
0348: MOVWF 62
0349: MOVLW FA
034A: BSF 03.6
034B: MOVWF 41
034C: BCF 03.6
034D: CALL 062
034E: DECFSZ 62,F
034F: GOTO 349
....................
.................... printf(lcd_putc,"\fODP3:%s",odp3);
0350: CLRF 62
0351: MOVF 62,W
0352: CALL 03B
0353: INCF 62,F
0354: MOVWF 77
0355: BSF 03.6
0356: MOVWF 40
0357: BCF 03.6
0358: CALL 10D
0359: MOVLW 06
035A: SUBWF 62,W
035B: BTFSS 03.2
035C: GOTO 351
035D: MOVLW A0
035E: MOVWF 04
035F: BCF 03.7
0360: MOVLW 00
0361: IORWF 00,W
0362: BTFSC 03.2
0363: GOTO 376
0364: CLRF 64
0365: MOVF 04,W
0366: MOVWF 63
0367: BCF 64.0
0368: BTFSC 03.7
0369: BSF 64.0
036A: MOVF 00,W
036B: BSF 03.6
036C: MOVWF 40
036D: BCF 03.6
036E: CALL 10D
036F: MOVF 63,W
0370: MOVWF 04
0371: BCF 03.7
0372: BTFSC 64.0
0373: BSF 03.7
0374: INCF 04,F
0375: GOTO 360
.................... delay_ms(2000);
0376: MOVLW 08
0377: MOVWF 62
0378: MOVLW FA
0379: BSF 03.6
037A: MOVWF 41
037B: BCF 03.6
037C: CALL 062
037D: DECFSZ 62,F
037E: GOTO 378
....................
.................... printf(lcd_putc,"\fODP4:%s",odp4);
037F: CLRF 62
0380: MOVF 62,W
0381: CALL 048
0382: INCF 62,F
0383: MOVWF 77
0384: BSF 03.6
0385: MOVWF 40
0386: BCF 03.6
0387: CALL 10D
0388: MOVLW 06
0389: SUBWF 62,W
038A: BTFSS 03.2
038B: GOTO 380
038C: MOVLW 58
038D: MOVWF 04
038E: BCF 03.7
038F: MOVLW 00
0390: IORWF 00,W
0391: BTFSC 03.2
0392: GOTO 3A5
0393: CLRF 64
0394: MOVF 04,W
0395: MOVWF 63
0396: BCF 64.0
0397: BTFSC 03.7
0398: BSF 64.0
0399: MOVF 00,W
039A: BSF 03.6
039B: MOVWF 40
039C: BCF 03.6
039D: CALL 10D
039E: MOVF 63,W
039F: MOVWF 04
03A0: BCF 03.7
03A1: BTFSC 64.0
03A2: BSF 03.7
03A3: INCF 04,F
03A4: GOTO 38F
.................... delay_ms(2000);
03A5: MOVLW 08
03A6: MOVWF 62
03A7: MOVLW FA
03A8: BSF 03.6
03A9: MOVWF 41
03AA: BCF 03.6
03AB: CALL 062
03AC: DECFSZ 62,F
03AD: GOTO 3A7
....................
.................... printf(lcd_putc,"\fODP5:%s",odp5);
03AE: CLRF 62
03AF: MOVF 62,W
03B0: CALL 055
03B1: INCF 62,F
03B2: MOVWF 77
03B3: BSF 03.6
03B4: MOVWF 40
03B5: BCF 03.6
03B6: CALL 10D
03B7: MOVLW 06
03B8: SUBWF 62,W
03B9: BTFSS 03.2
03BA: GOTO 3AF
03BB: MOVLW 10
03BC: MOVWF 04
03BD: BSF 03.7
03BE: MOVLW 00
03BF: IORWF 00,W
03C0: BTFSC 03.2
03C1: GOTO 3D4
03C2: CLRF 64
03C3: MOVF 04,W
03C4: MOVWF 63
03C5: BCF 64.0
03C6: BTFSC 03.7
03C7: BSF 64.0
03C8: MOVF 00,W
03C9: BSF 03.6
03CA: MOVWF 40
03CB: BCF 03.6
03CC: CALL 10D
03CD: MOVF 63,W
03CE: MOVWF 04
03CF: BCF 03.7
03D0: BTFSC 64.0
03D1: BSF 03.7
03D2: INCF 04,F
03D3: GOTO 3BE
....................
....................
.................... output_low(PIN_A4);
03D4: BSF 03.5
03D5: BCF 05.4
03D6: BCF 03.5
03D7: BCF 05.4
.................... delay_ms(150);
03D8: MOVLW 96
03D9: BSF 03.6
03DA: MOVWF 41
03DB: BCF 03.6
03DC: CALL 062
.................... output_high(PIN_A4);
03DD: BSF 03.5
03DE: BCF 05.4
03DF: BCF 03.5
03E0: BSF 05.4
.................... delay_ms(100);
03E1: MOVLW 64
03E2: BSF 03.6
03E3: MOVWF 41
03E4: BCF 03.6
03E5: CALL 062
.................... output_low(PIN_A4);
03E6: BSF 03.5
03E7: BCF 05.4
03E8: BCF 03.5
03E9: BCF 05.4
.................... delay_ms(150);
03EA: MOVLW 96
03EB: BSF 03.6
03EC: MOVWF 41
03ED: BCF 03.6
03EE: CALL 062
.................... output_high(PIN_A4);
03EF: BSF 03.5
03F0: BCF 05.4
03F1: BCF 03.5
03F2: BSF 05.4
.................... delay_ms(100);
03F3: MOVLW 64
03F4: BSF 03.6
03F5: MOVWF 41
03F6: BCF 03.6
03F7: CALL 062
.................... output_low(PIN_A4);
03F8: BSF 03.5
03F9: BCF 05.4
03FA: BCF 03.5
03FB: BCF 05.4
.................... delay_ms(150);
03FC: MOVLW 96
03FD: BSF 03.6
03FE: MOVWF 41
03FF: BCF 03.6
0400: CALL 062
.................... output_high(PIN_A4);
0401: BSF 03.5
0402: BCF 05.4
0403: BCF 03.5
0404: BSF 05.4
.................... delay_ms(1500);
0405: MOVLW 06
0406: MOVWF 62
0407: MOVLW FA
0408: BSF 03.6
0409: MOVWF 41
040A: BCF 03.6
040B: CALL 062
040C: DECFSZ 62,F
040D: GOTO 407
.................... }
040E: GOTO 28E
.................... }
040F: SLEEP
Configuration Fuses:
Word 1: 3F39 XT NOWDT NOPUT NODEBUG NOPROTECT NOBROWNOUT NOLVP NOCPD NOWRT