ds18b20.lst

Microchip tempratere sonsore source asm code

MPASM  5.13                       DS18B20.ASM   10-15-2007  10:58:43         PAGE  1


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

                      00001 ; XTAL : 16 MHz
                      00002 ; PIC16F877
                      00003 ; DS18B20
                      00004 ;---------------------------------------
                      00005         LIST    P = 16F877, R = HEX
                      00006         INCLUDE "P16F877.INC"
                      00001         LIST
                      00002 ; P16F877.INC  Standard Header File, Version 1.00    Microchip Technology, Inc.
                      00373         LIST
                      00007         ERRORLEVEL      .1
                      00008 ;---------------------------------------
0000                  00009         ORG             0X00
0000   28FC           00010         GOTO    START           
                      00011 ;       ORG             0X04
                      00012 ;       GOTO    ISR
                      00013 ;       goto    KKK
                      00014 ;---------------------------------------
                      00015         #DEFINE DSPIN   PORTB, 0
                      00016         #DEFINE TXPIN   PORTB, 1
                      00017         #DEFINE RXPIN   PORTB, 2                
                      00018 ;---------------------------------------
  00000020            00019 DELAY1  EQU     0X20
  00000021            00020 TEMP1   EQU     0X21
  00000029            00021 TEMP2   EQU     0X29
  00000022            00022 KOMUT   EQU     0X22
  00000023            00023 DELAY2  EQU     0X23
  00000024            00024 DELAY3  EQU     0X24
  00000025            00025 SAYAC   EQU     0X25
  00000026            00026 BTX             EQU     0X26
  00000027            00027 BRX             EQU     0X27
  00000028            00028 SAYAC1  EQU     0X28
  00000030            00029 SAYAC2  EQU     0X30
  00000029            00030 BUFFER  EQU     0X29
                      00031 ;---------------------------------------
                      00032 ; KATSAYI = (((1/istenilen Baundrate)/(KCS)-5)/4)
                      00033 ; KCS --> 4X(1/XTAL)
                      00034 ;  9600 baundrate 4   Mhz KATSAYI --> KATSAYI = 25   
                      00035 ;  9600 baundrate 8   Mhz KATSAYI --> KATSAYI = 50
                      00036 ;  9600 baundrate 16  Mhz KATSAYI --> KATSAYI = 103   
                      00037 ; (4XKATSAYI + 5
                      00038                 ;-------------------------------
                      00039 DELAYSU MACRO   KATSAYI         ; DELAYSU macrosu
                      00040         MOVLW   KATSAYI                 ; W = KATSAYI
                      00041         CALL    DELAY_2                 ; DELAY_2 ui 鏰瘕r
                      00042         ENDM                                    ; Macroyu sonland齬.
                      00043 ;---------------------------------------
0001                  00044 DELAY_2:                                        ; 2 祍
0001   00A4           00045         MOVWF   DELAY3                  ; 1 礢  
0002   0000           00046         NOP                                             ; DELAY3
0003   0BA4           00047         DECFSZ  DELAY3                  ; DELAY3 + 1 祍
0004   2802           00048         GOTO    $ - 2                   ; 2XDELAY3
0005   0008           00049         RETURN                                  ; 2 祍  
                      00050 ;---------------------------------------
MPASM  5.13                       DS18B20.ASM   10-15-2007  10:58:43         PAGE  2


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

                      00051 TXLOAD  MACRO
                      00052         BSF             STATUS, 5
                      00053         BCF             TRISB,  1
                      00054         BCF             STATUS, 5
                      00055         ENDM
                      00056 ;---------------------------------------
                      00057 RXLOAD  MACRO
                      00058         BSF             STATUS, 5
                      00059         BSF             TRISB,  2
                      00060         BCF             STATUS, 5
                      00061         CLRF    BRX
                      00062         ENDM
                      00063 ;---------------------------------------
0006                  00064 TX:                                                     ; G鰊derim altyordam