WebSVN – svnkaklik – Diff – /programy/PIC_C/mereni/gmetr/gmetr.LST

-CCS PCM C Compiler, Version 3.221, 27853               18-VI-05 19:21
+CCS PCM C Compiler, Version 3.245, 27853               27-VI-07 00:22
-               Filename: D:\KAKLIK\programy\PIC_C\mereni\gmetr\gmetr.LST
+               Filename: D:\KAKLIK\projekty\programy\PIC_C\mereni\gmetr\gmetr.lst
-               ROM used: 497 words (12%)
+               ROM used: 669 words (16%)
                          Largest free fragment is 2048
-               RAM used: 12 (6%) at main() level
+               RAM used: 13 (7%) at main() level
-(15%) worst case
+(16%) worst case
                Stack:    5 locations
+*
 :  MOVLW  00
 :  MOVWF  0A
-:  GOTO   134
+:  GOTO   184
 :  NOP
-....................  #include "D:\KAKLIK\programy\PIC_C\mereni\gmetr\gmetr.h"
+.................... #include ".\gmetr.h"
-....................  #include <16F873.h>
+.................... #include <16F873.h>
-....................  //////// Standard Header file for the PIC16F873 device ////////////////
+.................... //////// Standard Header file for the PIC16F873 device ////////////////
 .................... #device PIC16F873
 .................... #list
 ....................
 .................... #device adc=10
 .................... #fuses NOWDT,XT, NOPUT, NOPROTECT, NOBROWNOUT, NOLVP, NOCPD, NOWRT, NODEBUG
 .................... #use delay(clock=4000000)
+*
-C:  MOVLW  33
+C:  MOVLW  36
 D:  MOVWF  04
 E:  MOVF   00,W
 F:  BTFSC  03.2
-:  GOTO   020
+:  GOTO   060
 :  MOVLW  01
 :  MOVWF  21
 :  CLRF   20
 :  DECFSZ 20,F
-:  GOTO   014
+:  GOTO   054
 :  DECFSZ 21,F
-:  GOTO   013
+:  GOTO   053
 :  MOVLW  4A
 :  MOVWF  20
 A:  DECFSZ 20,F
-B:  GOTO   01A
+B:  GOTO   05A
 C:  NOP
 D:  NOP
 E:  DECFSZ 00,F
-F:  GOTO   011
+F:  GOTO   051
 :  RETLW  00
 ....................
 ....................
 ....................
 .................... #define LCD_RS          PIN_B1      // rizeni registru LCD displeje
 .................... #define LCD_E           PIN_B0      // enable LCD displeje
 .................... 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
 :  MOVF   07,W
 :  ANDLW  0F
-:  MOVWF  3A
+:  MOVWF  3D
-:  SWAPF  39,W
+:  SWAPF  3C,W
 :  MOVWF  20
 :  MOVLW  F0
 :  ANDWF  20,F
 :  MOVF   20,W
 :  ANDLW  F0
-A:  IORWF  3A,W
+A:  IORWF  3D,W
 B:  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
 C:  BSF    06.0
 D:  BSF    03.5
 E:  BCF    06.0
 ....................    delay_us(1);               // pockej alespon 450ns od e nebo alespon 195ns od dat
 F:  NOP
 ....................    output_bit(LCD_E,0);       // sestupna hrana (minimalni perioda e je 1us)
 :  BCF    03.5
 :  BCF    06.0
 :  BSF    03.5
 :  BCF    06.0
 .................... }
 :  BCF    03.5
 :  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
-:  MOVF   37,F
+:  MOVF   3A,F
 :  BTFSS  03.2
-:  GOTO   03B
+:  GOTO   07B
 :  BCF    06.1
-A:  GOTO   03C
+A:  GOTO   07C
 B:  BSF    06.1
 C:  BSF    03.5
 D:  BCF    06.1
 ....................    swap(n);
 E:  BCF    03.5
-F:  SWAPF  38,F
+F:  SWAPF  3B,F
 ....................    lcd_send_nibble(n);        // posli horni pulku bajtu
-:  MOVF   38,W
+:  MOVF   3B,W
-:  MOVWF  39
+:  MOVWF  3C
-:  CALL   021
+:  CALL   061
 ....................    swap(n);
-:  SWAPF  38,F
+:  SWAPF  3B,F
 ....................    lcd_send_nibble(n);        // posli spodni pulku bajtu
-:  MOVF   38,W
+:  MOVF   3B,W
-:  MOVWF  39
+:  MOVWF  3C
-:  CALL   021
+:  CALL   061
 ....................    delay_us(40);              // minimalni doba na provedeni prikazu
 :  MOVLW  0D
 :  MOVWF  20
 :  DECFSZ 20,F
-A:  GOTO   049
+A:  GOTO   089
 .................... }
 B:  RETLW  00
 ....................
 ....................
 .................... // Provede inicializaci LCD displeje, smaze obsah a nastavi mod displeje
 .................... //
 .................... // Tato procedura se musi volat pred pouzitim ostatnich lcd_ procedur
 .................... {
 ....................
 ....................    int i;                              // pocitadlo cyklu
 ....................
 ....................    delay_ms(20);                       // spozdeni pro provedeni startu displeje po zapnuti napajeni
 C:  MOVLW  14
-D:  MOVWF  33
+D:  MOVWF  36
-E:  CALL   00C
+E:  CALL   04C
 ....................
 .................... #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
 F:  MOVLW  0F
 :  BSF    03.5
 :  ANDWF  07,F
 .................... #endif
 ....................
 ....................    output_bit(LCD_RS,0);               // nastav jako vystup a nastav klidovy stav
 :  BCF    03.5
 :  BCF    06.1
 :  BSF    03.5
 :  BCF    06.1
 ....................    output_bit(LCD_E, 0);               // nastav jako vystup a nastav klidovy stav
 :  BCF    03.5
 :  BCF    06.0
 :  BSF    03.5
 :  BCF    06.0
 ....................
 ....................    for (i=0; i<3; i++)                 // nastav lcd do rezimu 8 bitu sbernice
 A:  BCF    03.5
-B:  CLRF   2A
+B:  CLRF   2B
-C:  MOVF   2A,W
+C:  MOVF   2B,W
 D:  SUBLW  02
 E:  BTFSS  03.0
-F:  GOTO   068
+F:  GOTO   0A8
 ....................    {
 ....................       delay_ms(2);                     // muze byt rozdelany prenos dat (2x 4 bity) nebo pomaly povel
-:  MOVLW  02
+A0:  MOVLW  02
-:  MOVWF  33
+A1:  MOVWF  36
-:  CALL   00C
+A2:  CALL   04C
 ....................       lcd_send_nibble(3);              // rezim 8 bitu
-:  MOVLW  03
+A3:  MOVLW  03
-:  MOVWF  39
+A4:  MOVWF  3C
-:  CALL   021
+A5:  CALL   061
 ....................    }
-:  INCF   2A,F
+A6:  INCF   2B,F
-:  GOTO   05C
+A7:  GOTO   09C
 ....................
 ....................    delay_us(40);                       // cas na zpracovani
-:  MOVLW  0D
+A8:  MOVLW  0D
-:  MOVWF  20
+A9:  MOVWF  20
-A:  DECFSZ 20,F
+AA:  DECFSZ 20,F
-B:  GOTO   06A
+AB:  GOTO   0AA
 ....................    lcd_send_nibble(2);                 // nastav rezim 4 bitu (plati od nasledujiciho prenosu)
-C:  MOVLW  02
+AC:  MOVLW  02
-D:  MOVWF  39
+AD:  MOVWF  3C
-E:  CALL   021
+AE:  CALL   061
 ....................    delay_us(40);                       // cas na zpracovani
-F:  MOVLW  0D
+AF:  MOVLW  0D
-:  MOVWF  20
+B0:  MOVWF  20
-:  DECFSZ 20,F
+B1:  DECFSZ 20,F
-:  GOTO   071
+B2:  GOTO   0B1
 ....................
 ....................    for (i=0;i<3;i++)                   // proved inicializaci (nastaveni modu, smazani apod)
-:  CLRF   2A
+B3:  CLRF   2B
-:  MOVF   2A,W
+B4:  MOVF   2B,W
-:  SUBLW  02
+B5:  SUBLW  02
-:  BTFSS  03.0
+B6:  BTFSS  03.0
-:  GOTO   084
+B7:  GOTO   0C4
 ....................    {
 ....................       lcd_send_byte(0,LCD_INIT_STRING[i]);
-:  MOVF   2A,W
+B8:  MOVF   2B,W
-:  CALL   004
+B9:  CALL   004
-A:  MOVWF  2B
+BA:  MOVWF  2C
-B:  CLRF   37
+BB:  CLRF   3A
-C:  MOVF   2B,W
+BC:  MOVF   2C,W
-D:  MOVWF  38
+BD:  MOVWF  3B
-E:  CALL   036
+BE:  CALL   076
 ....................       delay_ms(2);
-F:  MOVLW  02
+BF:  MOVLW  02
-:  MOVWF  33
+C0:  MOVWF  36
-:  CALL   00C
+C1:  CALL   04C
 ....................    }
-:  INCF   2A,F
+C2:  INCF   2B,F
-:  GOTO   074
+C3:  GOTO   0B4
 .................... }
-:  BCF    0A.3
+C4:  BCF    0A.3
-:  GOTO   16D (RETURN)
+C5:  GOTO   1BD (RETURN)
 ....................
 ....................
 .................... // Proved presun kurzoru
 .................... //
 .................... // Pozice 1.1 je domu
 .................... {
 ....................
 ....................    BYTE Adr;
 ....................
 ....................    Adr=x-1;
-:  MOVLW  01
+C6:  MOVLW  01
-:  SUBWF  33,W
+C7:  SUBWF  36,W
-:  MOVWF  35
+C8:  MOVWF  38
 ....................    if(y==2)
-:  MOVF   34,W
+C9:  MOVF   37,W
-A:  SUBLW  02
+CA:  SUBLW  02
-B:  BTFSS  03.2
+CB:  BTFSS  03.2
-C:  GOTO   08F
+CC:  GOTO   0CF
 ....................      Adr+=LCD_LINE_2;
-D:  MOVLW  40
+CD:  MOVLW  40
-E:  ADDWF  35,F
+CE:  ADDWF  38,F
 ....................
 ....................    lcd_send_byte(0,0x80|Adr);
-F:  MOVF   35,W
+CF:  MOVF   38,W
-:  IORLW  80
+D0:  IORLW  80
-:  MOVWF  36
+D1:  MOVWF  39
-:  CLRF   37
+D2:  CLRF   3A
-:  MOVF   36,W
+D3:  MOVF   39,W
-:  MOVWF  38
+D4:  MOVWF  3B
-:  CALL   036
+D5:  CALL   076
 .................... }
-:  RETLW  00
+D6:  RETLW  00
 ....................
 ....................
 .................... // Zapis znaku na displej, zpracovani ridicich znaku
 .................... //
 .................... void lcd_putc( char c)
 .................... {
 ....................
 ....................    switch (c)
 ....................    {
-:  MOVF   32,W
+D7:  MOVF   35,W
-:  XORLW  0C
+D8:  XORLW  0C
-:  BTFSC  03.2
+D9:  BTFSC  03.2
-A:  GOTO   0A5
+DA:  GOTO   0E5
-B:  XORLW  06
+DB:  XORLW  06
-C:  BTFSC  03.2
+DC:  BTFSC  03.2
-D:  GOTO   0AD
+DD:  GOTO   0ED
-E:  XORLW  07
+DE:  XORLW  07
-F:  BTFSC  03.2
+DF:  BTFSC  03.2
-A0:  GOTO   0B3
+E0:  GOTO   0F3
-A1:  XORLW  05
+E1:  XORLW  05
-A2:  BTFSC  03.2
+E2:  BTFSC  03.2
-A3:  GOTO   0B8
+E3:  GOTO   0F8
-A4:  GOTO   0BD
+E4:  GOTO   0FD
 ....................       case '\f'   : lcd_send_byte(0,1);            // smaz displej
-A5:  CLRF   37
+E5:  CLRF   3A
-A6:  MOVLW  01
+E6:  MOVLW  01
-A7:  MOVWF  38
+E7:  MOVWF  3B
-A8:  CALL   036
+E8:  CALL   076
 ....................                     delay_ms(2);
-A9:  MOVLW  02
+E9:  MOVLW  02
-AA:  MOVWF  33
+EA:  MOVWF  36
-AB:  CALL   00C
+EB:  CALL   04C
 ....................                                             break;
-AC:  GOTO   0C9
+EC:  GOTO   109
 ....................       case '\n'   : lcd_gotoxy(1,2);        break; // presun se na 1. znak 2. radky
-AD:  MOVLW  01
+ED:  MOVLW  01
-AE:  MOVWF  33
+EE:  MOVWF  36
-AF:  MOVLW  02
+EF:  MOVLW  02
-B0:  MOVWF  34
+F0:  MOVWF  37
-B1:  CALL   086
+F1:  CALL   0C6
-B2:  GOTO   0C9
+F2:  GOTO   109
 ....................       case '\r'   : lcd_gotoxy(1,1);        break; // presun home
-B3:  MOVLW  01
+F3:  MOVLW  01
-B4:  MOVWF  33
+F4:  MOVWF  36
-B5:  MOVWF  34
+F5:  MOVWF  37
-B6:  CALL   086
+F6:  CALL   0C6
-B7:  GOTO   0C9
+F7:  GOTO   109
 ....................       case '\b'   : lcd_send_byte(0,0x10);  break; // posun kurzor o 1 zpet
-B8:  CLRF   37
+F8:  CLRF   3A
-B9:  MOVLW  10
+F9:  MOVLW  10
-BA:  MOVWF  38
+FA:  MOVWF  3B
-BB:  CALL   036
+FB:  CALL   076
-BC:  GOTO   0C9
+FC:  GOTO   109
 ....................       default     : if (c<0x20) c&=0x7;            // preklopeni definovatelnych znaku na rozsah 0 az 0x1F
-BD:  MOVF   32,W
+FD:  MOVF   35,W
-BE:  SUBLW  1F
+FE:  SUBLW  1F
-BF:  BTFSS  03.0
+FF:  BTFSS  03.0
-C0:  GOTO   0C3
+:  GOTO   103
-C1:  MOVLW  07
+:  MOVLW  07
-C2:  ANDWF  32,F
+:  ANDWF  35,F
 ....................                     lcd_send_byte(1,c);     break; // zapis znak
-C3:  MOVLW  01
+:  MOVLW  01
-C4:  MOVWF  37
+:  MOVWF  3A
-C5:  MOVF   32,W
+:  MOVF   35,W
-C6:  MOVWF  38
+:  MOVWF  3B
-C7:  CALL   036
+:  CALL   076
-C8:  GOTO   0C9
+:  GOTO   109
 ....................    }
 .................... }
-C9:  RETLW  00
+:  RETLW  00
 ....................
 ....................
 .................... // Zapni kurzor
 .................... //
 .................... void lcd_cursor_on()
 .................... // Smaz displej
 .................... //
 .................... void lcd_clr()
 .................... {
 ....................    lcd_putc('\f');
+A:  MOVLW  0C
+B:  MOVWF  35
+C:  CALL   0D7
 .................... }
+D:  RETLW  00
 ....................
 ....................
 .................... // Definice vlastnich fontu
 .................... //
 .................... // Vlastnich definic muze byt jen 8 do pozic 0 az 7 pameti CGRAM radice lcd displeje
 ....................
 ....................
 .................... void main()
 .................... {
+*
 :  CLRF   04
 :  MOVLW  1F
 :  ANDWF  03,F
 :  BSF    03.5
 :  BSF    1F.0
 :  BSF    1F.1
 A:  BSF    1F.2
 B:  BCF    1F.3
-....................    signed int16 stred;
+.................... signed int16 stred;
-....................    signed int16 hodnota;
+.................... signed int8 hodnota;
+.................... unsigned int8 i, offset;
 ....................
 ....................    setup_adc_ports(ALL_ANALOG);
+*
 F:  BSF    03.5
 :  BCF    1F.0
 :  BCF    1F.1
 :  BCF    1F.2
 :  BCF    1F.3
 ....................    setup_adc(ADC_CLOCK_DIV_2);
 :  BCF    03.5
 :  BCF    1F.6
 :  BCF    1F.7
 :  BSF    03.5
 :  BSF    1F.7
 :  BCF    03.5
 A:  BSF    1F.0
 ....................    setup_spi(FALSE);
+*
 C:  MOVLW  FF
 D:  BCF    03.5
 E:  MOVWF  25
+*
 B:  BCF    14.5
 C:  BCF    25.5
 D:  MOVF   25,W
 E:  BSF    03.5
 F:  MOVWF  07
-:  BCF    03.5
+A0:  BCF    03.5
-:  BSF    25.4
+A1:  BSF    25.4
-:  MOVF   25,W
+A2:  MOVF   25,W
-:  BSF    03.5
+A3:  BSF    03.5
-:  MOVWF  07
+A4:  MOVWF  07
-:  BCF    03.5
+A5:  BCF    03.5
-:  BCF    25.3
+A6:  BCF    25.3
-:  MOVF   25,W
+A7:  MOVF   25,W
-:  BSF    03.5
+A8:  BSF    03.5
-:  MOVWF  07
+A9:  MOVWF  07
-A:  MOVLW  00
+AA:  MOVLW  00
-B:  BCF    03.5
+AB:  BCF    03.5
-C:  MOVWF  14
+AC:  MOVWF  14
-D:  BSF    03.5
+AD:  BSF    03.5
-E:  MOVWF  14
+AE:  MOVWF  14
 ....................    setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
-F:  MOVF   01,W
+AF:  MOVF   01,W
-:  ANDLW  C7
+B0:  ANDLW  C7
-:  IORLW  08
+B1:  IORLW  08
-:  MOVWF  01
+B2:  MOVWF  01
 ....................    setup_timer_1(T1_DISABLED);
-:  BCF    03.5
+B3:  BCF    03.5
-:  CLRF   10
+B4:  CLRF   10
 ....................    setup_timer_2(T2_DISABLED,0,1);
-:  MOVLW  00
+B5:  MOVLW  00
-:  MOVWF  21
+B6:  MOVWF  21
-:  MOVWF  12
+B7:  MOVWF  12
-:  MOVLW  00
+B8:  MOVLW  00
-:  BSF    03.5
+B9:  BSF    03.5
-A:  MOVWF  12
+BA:  MOVWF  12
 ....................
 ....................    lcd_init();
-B:  BCF    03.5
+BB:  BCF    03.5
-C:  GOTO   04C
+BC:  GOTO   08C
 ....................    Delay_ms(100);
-D:  MOVLW  64
+BD:  MOVLW  64
-E:  MOVWF  33
+BE:  MOVWF  36
-F:  CALL   00C
+BF:  CALL   04C
 ....................    set_adc_channel(1);
-:  MOVLW  08
+C0:  MOVLW  08
-:  MOVWF  21
+C1:  MOVWF  21
-:  MOVF   1F,W
+C2:  MOVF   1F,W
-:  ANDLW  C7
+C3:  ANDLW  C7
-:  IORWF  21,W
+C4:  IORWF  21,W
-:  MOVWF  1F
+C5:  MOVWF  1F
+....................
+....................    LCD_gotoxy(1,1);
+C6:  MOVLW  01
+C7:  MOVWF  36
+C8:  MOVWF  37
+C9:  CALL   0C6
+....................    printf(lcd_putc,"Gmetr 0.1.2 Beta");
+CA:  CLRF   2B
+CB:  MOVF   2B,W
+CC:  CALL   00C
+CD:  IORLW  00
+CE:  BTFSC  03.2
+CF:  GOTO   1D4
+D0:  INCF   2B,F
+D1:  MOVWF  35
+D2:  CALL   0D7
+D3:  GOTO   1CB
+....................    LCD_gotoxy(1,2);
+D4:  MOVLW  01
+D5:  MOVWF  36
+D6:  MOVLW  02
+D7:  MOVWF  37
+D8:  CALL   0C6
+....................    printf(lcd_putc,"Kaklik@mlab.cz");
+D9:  CLRF   2B
+DA:  MOVF   2B,W
+DB:  CALL   021
+DC:  IORLW  00
+DD:  BTFSC  03.2
+DE:  GOTO   1E3
+DF:  INCF   2B,F
+E0:  MOVWF  35
+E1:  CALL   0D7
+E2:  GOTO   1DA
 ....................    Delay_ms(500);
-:  MOVLW  02
+E3:  MOVLW  02
-:  MOVWF  2A
+E4:  MOVWF  2B
-:  MOVLW  FA
+E5:  MOVLW  FA
-:  MOVWF  33
+E6:  MOVWF  36
-A:  CALL   00C
+E7:  CALL   04C
-B:  DECFSZ 2A,F
+E8:  DECFSZ 2B,F
+E9:  GOTO   1E5
+....................
+....................    LCD_clr();
+EA:  CALL   10A
+....................    LCD_gotoxy(1,1);
+EB:  MOVLW  01
+EC:  MOVWF  36
+ED:  MOVWF  37
+EE:  CALL   0C6
+....................    printf(lcd_putc,"Clibration...");
+EF:  CLRF   2B
+F0:  MOVF   2B,W
+F1:  CALL   034
+F2:  IORLW  00
+F3:  BTFSC  03.2
+F4:  GOTO   1F9
+F5:  INCF   2B,F
+F6:  MOVWF  35
+F7:  CALL   0D7
-C:  GOTO   178
+F8:  GOTO   1F0
+....................
+....................    stred = 0;
+F9:  CLRF   27
+FA:  CLRF   26
+....................    for(i=0;i<=127;i++)
+FB:  CLRF   29
+FC:  MOVF   29,W
+FD:  SUBLW  7F
+FE:  BTFSS  03.0
+FF:  GOTO   210
+....................    {
+....................      Delay_ms(10);
+:  MOVLW  0A
+:  MOVWF  36
+:  CALL   04C
-....................    stred = read_adc();
+....................      stred = stred + read_adc();
-D:  BSF    1F.2
+:  BSF    1F.2
-E:  BTFSC  1F.2
+:  BTFSC  1F.2
-F:  GOTO   17E
+:  GOTO   204
 :  BSF    03.5
 :  MOVF   1E,W
 :  BCF    03.5
-:  MOVWF  26
+:  ADDWF  26,F
+A:  BTFSC  03.0
+B:  INCF   27,F
-:  MOVF   1E,W
+C:  MOVF   1E,W
+D:  ADDWF  27,F
+....................    }
+E:  INCF   29,F
+F:  GOTO   1FC
+....................    stred = stred >> 7;
+:  RRF    27,F
+:  RRF    26,F
+:  RRF    27,F
+:  RRF    26,F
+:  RRF    27,F
+:  RRF    26,F
+:  RRF    27,F
+:  RRF    26,F
+:  RRF    27,F
+:  RRF    26,F
+A:  RRF    27,F
+B:  RRF    26,F
+C:  RRF    27,F
+D:  RRF    26,F
-:  MOVWF  27
+E:  MOVLW  01
+F:  ANDWF  27,F
 ....................
 ....................    while(true)
 ....................    {
-....................       hodnota = stred - read_adc();
+....................       hodnota = read_adc();
 :  BSF    1F.2
 :  BTFSC  1F.2
-:  GOTO   187
+:  GOTO   221
 :  BSF    03.5
-A:  MOVF   1E,W
+:  MOVF   1E,W
-B:  BCF    03.5
+:  BCF    03.5
-C:  SUBWF  26,W
+:  MOVWF  28
+....................       Delay_ms(50);
+:  MOVLW  32
-D:  MOVWF  28
+:  MOVWF  36
+:  CALL   04C
+....................       LCD_clr();
-E:  MOVF   27,W
+A:  CALL   10A
+....................       LCD_gotoxy(6,1);
-F:  MOVWF  29
+B:  MOVLW  06
-:  MOVF   1E,W
+C:  MOVWF  36
-:  BTFSS  03.0
+D:  MOVLW  01
-:  INCFSZ 1E,W
+E:  MOVWF  37
-:  SUBWF  29,F
+F:  CALL   0C6
-....................       Delay_ms(100);
+....................       printf(lcd_putc," %03ld ",(stred - hodnota));
+:  CLRF   23
-:  MOVLW  64
+:  MOVF   28,W
-:  MOVWF  33
+:  MOVWF  20
+:  BTFSC  28.7
-:  CALL   00C
+:  DECF   23,F
-....................       LCD_gotoxy(1,1);
+:  SUBWF  26,W
-:  MOVLW  01
+:  MOVWF  2B
+:  MOVF   27,W
-:  MOVWF  33
+:  MOVWF  2C
-:  MOVWF  34
+:  MOVF   23,W
-A:  CALL   086
+A:  BTFSS  03.0
-....................       printf(lcd_putc,"                ");
-B:  MOVLW  10
+B:  INCFSZ 23,W
-C:  MOVWF  2A
+C:  SUBWF  2C,F
 D:  MOVLW  20
-E:  MOVWF  32
+E:  MOVWF  35
-F:  CALL   097
+F:  CALL   0D7
-A0:  DECFSZ 2A,F
+:  MOVLW  0B
-A1:  GOTO   19D
+:  MOVWF  04
-....................       if (hodnota<0)
-A2:  BTFSS  29.7
+:  MOVF   2C,W
-A3:  GOTO   1CA
+:  MOVWF  2E
-....................       {
+:  MOVF   2B,W
-....................          LCD_gotoxy(5,2);
-A4:  MOVLW  05
+:  MOVWF  2D
-A5:  MOVWF  33
+:  GOTO   10E
-A6:  MOVLW  02
+:  MOVLW  20
-A7:  MOVWF  34
+:  MOVWF  35
-A8:  CALL   086
+:  CALL   0D7
-....................          printf(lcd_putc," %03ld  ",hodnota);
+....................       if (hodnota >= stred)
+A:  CLRF   23
-A9:  MOVLW  20
+B:  MOVF   28,W
-AA:  MOVWF  32
+C:  MOVWF  20
-AB:  CALL   097
+D:  BTFSC  20.7
-AC:  MOVLW  0A
+E:  DECF   23,F
-AD:  MOVWF  04
+F:  MOVWF  21
+:  BTFSS  27.7
+:  GOTO   255
+:  BTFSS  23.7
+:  GOTO   261
-AE:  MOVF   29,W
+:  GOTO   257
+:  BTFSC  23.7
-AF:  MOVWF  2B
+:  GOTO   278
-B0:  MOVF   28,W
+:  MOVF   27,W
-B1:  MOVWF  2A
+:  SUBWF  23,W
-B2:  CALL   0CA
+:  BTFSS  03.0
-B3:  MOVLW  20
+A:  GOTO   278
-B4:  MOVWF  32
+B:  BTFSS  03.2
-B5:  CALL   097
+C:  GOTO   261
-B6:  MOVLW  20
+D:  MOVF   26,W
-B7:  MOVWF  32
+E:  SUBWF  21,W
+F:  BTFSS  03.0
-B8:  CALL   097
+:  GOTO   278
+....................       {
-....................          LCD_gotoxy(8-hodnota,1);
+....................         offset = hodnota - stred;
+:  CLRF   23
-B9:  MOVF   28,W
+:  MOVF   28,W
-BA:  SUBLW  08
+:  BTFSC  28.7
+:  DECF   23,F
-BB:  MOVWF  2A
+:  MOVWF  21
-BC:  CLRF   2B
+:  MOVF   26,W
+:  SUBWF  21,W
+:  MOVWF  20
-BD:  MOVF   29,W
+:  MOVF   27,W
-BE:  BTFSS  03.0
+A:  BTFSS  03.0
-BF:  INCFSZ 29,W
+B:  INCFSZ 27,W
-C0:  SUBWF  2B,F
+C:  SUBWF  23,F
-C1:  MOVF   2A,W
+D:  MOVF   20,W
-C2:  MOVWF  33
+E:  MOVWF  2A
+....................         offset = (offset >> 5) + 8;
-C3:  MOVLW  01
+F:  SWAPF  2A,W
-C4:  MOVWF  34
+:  MOVWF  20
-C5:  CALL   086
+:  RRF    20,F
-....................          printf(lcd_putc,"*",hodnota);
-C6:  MOVLW  2A
+:  MOVLW  07
+:  ANDWF  20,F
-C7:  MOVWF  32
+:  MOVF   20,W
-C8:  CALL   097
+:  ADDLW  08
+:  MOVWF  2A
 ....................       }
 ....................       else
-C9:  GOTO   1EF
+:  GOTO   28C
 ....................       {
-....................          LCD_gotoxy(6,2);
+....................         offset = stred - hodnota;
-CA:  MOVLW  06
+:  CLRF   23
-CB:  MOVWF  33
+:  MOVF   28,W
-CC:  MOVLW  02
+A:  BTFSC  28.7
-CD:  MOVWF  34
+B:  DECF   23,F
-CE:  CALL   086
+C:  SUBWF  26,W
-....................          printf(lcd_putc," %03ld  ",hodnota);
-CF:  MOVLW  20
+D:  MOVWF  20
-D0:  MOVWF  32
+E:  MOVF   23,W
-D1:  CALL   097
+F:  BTFSS  03.0
-D2:  MOVLW  0A
+:  INCFSZ 23,W
-D3:  MOVWF  04
+:  GOTO   284
-D4:  MOVF   29,W
+:  MOVF   27,W
-D5:  MOVWF  2B
+:  GOTO   285
-D6:  MOVF   28,W
+:  SUBWF  27,W
-D7:  MOVWF  2A
+:  MOVWF  23
-D8:  CALL   0CA
+:  MOVF   20,W
-D9:  MOVLW  20
+:  MOVWF  2A
+....................         offset = offset >> 5;
-DA:  MOVWF  32
+:  SWAPF  2A,F
-DB:  CALL   097
+:  RRF    2A,F
-DC:  MOVLW  20
+A:  MOVLW  07
-DD:  MOVWF  32
+B:  ANDWF  2A,F
-DE:  CALL   097
+....................       }
-....................          LCD_gotoxy(8-hodnota,1);
+....................       LCD_gotoxy(offset,2);
-DF:  MOVF   28,W
+C:  MOVF   2A,W
-E0:  SUBLW  08
-E1:  MOVWF  2A
+D:  MOVWF  36
-E2:  CLRF   2B
+E:  MOVLW  02
-E3:  MOVF   29,W
+F:  MOVWF  37
-E4:  BTFSS  03.0
+:  CALL   0C6
-E5:  INCFSZ 29,W
+....................       printf(lcd_putc,"*");
-E6:  SUBWF  2B,F
+:  CLRF   2B
-E7:  MOVF   2A,W
+:  MOVF   2B,W
-E8:  MOVWF  33
+:  CALL   046
-E9:  MOVLW  01
+:  IORLW  00
-EA:  MOVWF  34
+:  BTFSC  03.2
-EB:  CALL   086
+:  GOTO   29B
-....................          printf(lcd_putc,"*",hodnota);
-EC:  MOVLW  2A
+:  INCF   2B,F
-ED:  MOVWF  32
+:  MOVWF  35
-EE:  CALL   097
+:  CALL   0D7
+A:  GOTO   292
-....................       }
+....................    }
+B:  GOTO   220
-....................    }
+.................... }
-EF:  GOTO   186
-.................... }
-....................
-F0:  SLEEP
+C:  SLEEP
 Configuration Fuses:
    Word  1: 3F39   XT NOWDT NOPUT NOPROTECT NOBROWNOUT NOLVP NOCPD NOWRT NODEBUG

Subversion Repositories svnkaklik

(root)/programy/PIC_C/mereni/gmetr/gmetr.LST – Rev 6 → 328