softus.lst

Software UART asm code for microchip

MPASM  5.13                        SOFTUS.ASM   9-14-2007  10:38:05         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 ;---------------------------------------
0000                  00008         ORG             0X00
0000   2838           00009         GOTO    START           
                      00010 ;       ORG             0X04
                      00011 ;       GOTO    ISR
                      00012 ;---------------------------------------
                      00013         #DEFINE DSPIN   PORTB, 0
                      00014         #DEFINE TXPIN   PORTB, 1
                      00015         #DEFINE RXPIN   PORTB, 2                
                      00016 ;---------------------------------------
  00000020            00017 DELAY1  EQU     0X20
  00000021            00018 TEMP1   EQU     0X21
  00000021            00019 TEMP2   EQU     0X21
  00000022            00020 KOMUT   EQU     0X22
  00000023            00021 DELAY2  EQU     0X23
  00000024            00022 DELAY3  EQU     0X24
  00000025            00023 SAYAC   EQU     0X25
  00000026            00024 BTX             EQU     0X26
  00000027            00025 BRX             EQU     0X27
  00000028            00026 SAYAC1  EQU     0X28
                      00027 ;---------------------------------------
                      00028 ; KATSAYI = (((1/istenilen Baundrate)/(KCS)-5)/4)
                      00029 ; KCS --> 4X(1/XTAL)
                      00030 ;  9600 baundrate 4   Mhz KATSAYI --> KATSAYI = 25   
                      00031 ;  9600 baundrate 8   Mhz KATSAYI --> KATSAYI = 50
                      00032 ;  9600 baundrate 16  Mhz KATSAYI --> KATSAYI = 103   
                      00033 ; (4XKATSAYI + 5
                      00034                 ;-------------------------------
                      00035 DELAYSU MACRO   KATSAYI         ; DELAYSU macrosu
                      00036         MOVLW   KATSAYI                 ; W = KATSAYI
                      00037         CALL    DELAY_2                 ; DELAY_2 ui 鏰瘕r
                      00038         ENDM                                    ; Macroyu sonland齬.
                      00039 ;---------------------------------------
0001                  00040 DELAY_2:                                        ; 2 祍
0001   00A4           00041         MOVWF   DELAY3                  ; 1 礢  
0002   0000           00042         NOP                                             ; DELAY3
Message[305]: Using default destination of 1 (file).
0003   0BA4           00043         DECFSZ  DELAY3                  ; DELAY3 + 1 祍
0004   2802           00044         GOTO    $ - 2                   ; 2XDELAY3
0005   0008           00045         RETURN                                  ; 2 祍  
                      00046 ;---------------------------------------
                      00047 TXLOAD  MACRO
                      00048         BSF             STATUS, 5
                      00049         BCF             TRISB,  1
MPASM  5.13                        SOFTUS.ASM   9-14-2007  10:38:05         PAGE  2


LOC  OBJECT CODE     LINE SOURCE TEXT
  VALUE

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