Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
USBFm.LST
Package: USBFM.zip [view]
Upload User: wang202020
Upload Date: 2021-02-07
Package Size: 182k
Code Size: 427k
Category:
SCM
Development Platform:
HTML/CSS
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 72
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 0009BC EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00105 LCDOUT?C 072h
- M MOVE?CA 072h
- 0009C0 0E72 M movlw low (072h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 0009C2 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00106 LCDOUT?C 020h
- M MOVE?CA 020h
- 0009C6 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 73
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 0009C8 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00107 LCDOUT?C 046h
- M MOVE?CA 046h
- 0009CC 0E46 M movlw low (046h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 0009CE EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00108 LCDOUT?C 06Dh
- M MOVE?CA 06Dh
- 0009D2 0E6D M movlw low (06Dh)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 74
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 0009D4 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00109
- 00110 LABEL?L _ProgramStart
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M _ProgramStart
- M XALL
- M else
- 0009D8 M _ProgramStart
- M endif
- 00111 USBSERVICE?
- M ; local Label1
- M L?CALL USBCheckBusStatus ; Must use polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < 1)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) > $)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < ($ - 3ffh))
- M call USBCheckBusStatus
- M else
- 0009D8 DE59 M rcall USBCheckBusStatus
- M endif
- M endif
- M endif
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 75
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M ; BIT?GOTO 1, UCFG, UTEYE, Label1
- M L?CALL USBDriverService ; Interrupt or polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBDriverService
- M else
- M if ((USBDriverService) < 1)
- M call USBDriverService
- M else
- M if ((USBDriverService) > $)
- M call USBDriverService
- M else
- M if ((USBDriverService) < ($ - 3ffh))
- M call USBDriverService
- M else
- 0009DA DE73 M rcall USBDriverService
- M endif
- M endif
- M endif
- M endif
- M ;Label1
- M L?CALL DUNN ; Do our cleanup
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call DUNN
- M else
- M if ((DUNN) < 1)
- M call DUNN
- M else
- M if ((DUNN) > $)
- M call DUNN
- M else
- M if ((DUNN) < ($ - 3ffh))
- 0009DC ECD4 F000 M call DUNN
- M else
- M rcall DUNN
- M endif
- M endif
- M endif
- M endif
- 00112 GOSUB?L _DoUSBOut
- 0000 M local dlabel
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 76
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M ifdef DEBUG_STACK
- M CHK?RP DEBUG_STACK
- M ifdef DEBUG_STACK_ADDR
- M bcf STATUS, C
- M rlcf DEBUG_STACK, W
- M addlw DEBUG_STACK_ADDR
- M movwf FSR0L
- M clrf FSR0H
- M movlw low (dlabel)
- M movwf POSTINC0
- M movlw high (dlabel)
- M movwf INDF0
- M endif
- M incf DEBUG_STACK, F
- M endif
- M L?CALL _DoUSBOut
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call _DoUSBOut
- M else
- M if ((_DoUSBOut) < 1)
- M call _DoUSBOut
- M else
- M if ((_DoUSBOut) > $)
- 0009E0 EC97 F005 M call _DoUSBOut
- M else
- M if ((_DoUSBOut) < ($ - 3ffh))
- M call _DoUSBOut
- M else
- M rcall _DoUSBOut
- M endif
- M endif
- M endif
- M endif
- 0009E4 M dlabel
- 00113 GOSUB?L _DoUSBIn
- 0000 M local dlabel
- M ifdef DEBUG_STACK
- M CHK?RP DEBUG_STACK
- M ifdef DEBUG_STACK_ADDR
- M bcf STATUS, C
- M rlcf DEBUG_STACK, W
- M addlw DEBUG_STACK_ADDR
- M movwf FSR0L
- M clrf FSR0H
- M movlw low (dlabel)
- M movwf POSTINC0
- M movlw high (dlabel)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 77
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M movwf INDF0
- M endif
- M incf DEBUG_STACK, F
- M endif
- M L?CALL _DoUSBIn
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call _DoUSBIn
- M else
- M if ((_DoUSBIn) < 1)
- M call _DoUSBIn
- M else
- M if ((_DoUSBIn) > $)
- 0009E4 EC7E F005 M call _DoUSBIn
- M else
- M if ((_DoUSBIn) < ($ - 3ffh))
- M call _DoUSBIn
- M else
- M rcall _DoUSBIn
- M endif
- M endif
- M endif
- M endif
- 0009E8 M dlabel
- 00114 CMPNE?TCL _incr, 000h, L00001
- M if (000h == 0)
- M CLRWDT?
- M ifndef NO_CLRWDT
- 0009E8 0004 M clrwdt
- M endif
- M BIT?GOTO 1, PORTC, 000h, L00001
- M ifdef USE_LINKER
- M CLRWDT?
- M else
- M if ($ == (L00001))
- M CLRWDT?
- M endif
- M endif
- M
- M if (((PORTC) > BANKA_END) & ((PORTC) < (0f01h + BANKA_END)))
- M bcf STATUS, OV
- M CHK?RP PORTC
- M if (1 == 0)
- M btfss PORTC, 000h
- M else
- M btfsc PORTC, 000h
- M endif
- M bsf STATUS, OV
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 78
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M RST?RP
- M ifdef USE_LINKER
- M btfsc STATUS, OV
- M goto L00001
- M else
- M if ((L00001) < 1)
- M btfsc STATUS, OV
- M goto L00001
- M else
- M if ((L00001) > $)
- M btfsc STATUS, OV
- M goto L00001
- M else
- M if ((L00001) < ($ - 7fh))
- M btfsc STATUS, OV
- M goto L00001
- M else
- M bov L00001
- M endif
- M endif
- M endif
- M endif
- M else
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M if (1 == 0)
- M btfss PORTC, 000h
- M else
- 0009EA B082 M btfsc PORTC, 000h
- M endif
- M ifdef USE_LINKER
- M goto L00001
- M else
- M if ((L00001) < 1)
- M goto L00001
- M else
- M if ((L00001) > $)
- 0009EC EF06 F005 M goto L00001
- M else
- M if ((L00001) < ($ - 3ffh))
- M goto L00001
- M else
- M bra L00001
- M endif
- M endif
- M endif
- M endif
- M endif
- M else
- M if (000h == 1)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 79
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M CLRWDT?
- M BIT?GOTO 0, PORTC, 000h, L00001
- M else
- M L?GOTO L00001
- M endif
- M endif
- 00115 PAUSE?C 0C8h
- M if (high (0C8h) == 0)
- M MOVE?CA 0C8h
- 0009F0 0EC8 M movlw low (0C8h)
- M L?CALL PAUSE
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call PAUSE
- M else
- M if ((PAUSE) < 1)
- M call PAUSE
- M else
- M if ((PAUSE) > $)
- M call PAUSE
- M else
- M if ((PAUSE) < ($ - 3ffh))
- 0009F2 EC80 F000 M call PAUSE
- M else
- M rcall PAUSE
- M endif
- M endif
- M endif
- M endif
- M else
- M MOVE?CB high (0C8h), R1 + 1
- M MOVE?CA low (0C8h)
- M L?CALL PAUSEL
- M endif
- 00116 ADD?BCB _Frecuencia, 001h, _Frecuencia
- M if (_Frecuencia == _Frecuencia)
- M if (001h == 1)
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- 0009F6 2A1E M incf _Frecuencia, F
- M else
- M movlw 001h
- M CHK?RP _Frecuencia
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 80
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M addwf _Frecuencia, F
- M endif
- M else
- M if (001h == 1)
- M CHK?RP _Frecuencia
- M incf _Frecuencia, W
- M MOVE?AB _Frecuencia
- M else
- M movlw 001h
- M CHK?RP _Frecuencia
- M addwf _Frecuencia, W
- M MOVE?AB _Frecuencia
- M endif
- M endif
- 00117 CMPLT?BCL _Frecuencia, 0FEh, L00003
- M if (0FEh < 100h)
- M CLRWDT?
- M ifndef NO_CLRWDT
- 0009F8 0004 M clrwdt
- M endif
- M MOVE?CA 0FEh
- 0009FA 0EFE M movlw low (0FEh)
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- 0009FC 5C1E M subwf _Frecuencia, W
- M BIT?GOTO 0, STATUS, C, L00003
- M ifdef USE_LINKER
- M CLRWDT?
- M else
- M if ($ == (L00003))
- M CLRWDT?
- M endif
- M endif
- M
- M if (((STATUS) > BANKA_END) & ((STATUS) < (0f01h + BANKA_END)))
- M bcf STATUS, OV
- M CHK?RP STATUS
- M if (0 == 0)
- M btfss STATUS, C
- M else
- M btfsc STATUS, C
- M endif
- M bsf STATUS, OV
- M RST?RP
- M ifdef USE_LINKER
- M btfsc STATUS, OV
- M goto L00003
- M else
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 81
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if ((L00003) < 1)
- M btfsc STATUS, OV
- M goto L00003
- M else
- M if ((L00003) > $)
- M btfsc STATUS, OV
- M goto L00003
- M else
- M if ((L00003) < ($ - 7fh))
- M btfsc STATUS, OV
- M goto L00003
- M else
- M bov L00003
- M endif
- M endif
- M endif
- M endif
- M else
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M if (0 == 0)
- 0009FE A0D8 M btfss STATUS, C
- M else
- M btfsc STATUS, C
- M endif
- M ifdef USE_LINKER
- M goto L00003
- M else
- M if ((L00003) < 1)
- M goto L00003
- M else
- M if ((L00003) > $)
- 000A00 EF04 F005 M goto L00003
- M else
- M if ((L00003) < ($ - 3ffh))
- M goto L00003
- M else
- M bra L00003
- M endif
- M endif
- M endif
- M endif
- M endif
- M else
- M L?GOTO L00003
- M endif
- 00118 MOVE?CB 0FDh, _Frecuencia
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 82
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- M if (low (0FDh) == 0)
- M clrf _Frecuencia
- M else
- 000A04 0EFD M movlw low (0FDh)
- 000A06 6E1E M movwf _Frecuencia
- M endif
- 00119 LABEL?L L00003
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M L00003
- M XALL
- M else
- 000A08 M L00003
- M endif
- 00120 MOVE?BB _Frecuencia, PORTB
- 000A08 C01E FF81 M movff _Frecuencia, PORTB
- 00121 LABEL?L L00001
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M L00001
- M XALL
- M else
- 000A0C M L00001
- M endif
- 00122 CMPNE?TCL _decr, 000h, L00005
- M if (000h == 0)
- M CLRWDT?
- M ifndef NO_CLRWDT
- 000A0C 0004 M clrwdt
- M endif
- M BIT?GOTO 1, PORTC, 001h, L00005
- M ifdef USE_LINKER
- M CLRWDT?
- M else
- M if ($ == (L00005))
- M CLRWDT?
- M endif
- M endif
- M
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 83
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if (((PORTC) > BANKA_END) & ((PORTC) < (0f01h + BANKA_END)))
- M bcf STATUS, OV
- M CHK?RP PORTC
- M if (1 == 0)
- M btfss PORTC, 001h
- M else
- M btfsc PORTC, 001h
- M endif
- M bsf STATUS, OV
- M RST?RP
- M ifdef USE_LINKER
- M btfsc STATUS, OV
- M goto L00005
- M else
- M if ((L00005) < 1)
- M btfsc STATUS, OV
- M goto L00005
- M else
- M if ((L00005) > $)
- M btfsc STATUS, OV
- M goto L00005
- M else
- M if ((L00005) < ($ - 7fh))
- M btfsc STATUS, OV
- M goto L00005
- M else
- M bov L00005
- M endif
- M endif
- M endif
- M endif
- M else
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M if (1 == 0)
- M btfss PORTC, 001h
- M else
- 000A0E B282 M btfsc PORTC, 001h
- M endif
- M ifdef USE_LINKER
- M goto L00005
- M else
- M if ((L00005) < 1)
- M goto L00005
- M else
- M if ((L00005) > $)
- 000A10 EF18 F005 M goto L00005
- M else
- M if ((L00005) < ($ - 3ffh))
- M goto L00005
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 84
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M bra L00005
- M endif
- M endif
- M endif
- M endif
- M endif
- M else
- M if (000h == 1)
- M CLRWDT?
- M BIT?GOTO 0, PORTC, 001h, L00005
- M else
- M L?GOTO L00005
- M endif
- M endif
- 00123 PAUSE?C 0C8h
- M if (high (0C8h) == 0)
- M MOVE?CA 0C8h
- 000A14 0EC8 M movlw low (0C8h)
- M L?CALL PAUSE
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call PAUSE
- M else
- M if ((PAUSE) < 1)
- M call PAUSE
- M else
- M if ((PAUSE) > $)
- M call PAUSE
- M else
- M if ((PAUSE) < ($ - 3ffh))
- 000A16 EC80 F000 M call PAUSE
- M else
- M rcall PAUSE
- M endif
- M endif
- M endif
- M endif
- M else
- M MOVE?CB high (0C8h), R1 + 1
- M MOVE?CA low (0C8h)
- M L?CALL PAUSEL
- M endif
- 00124 SUB?BCB _Frecuencia, 001h, _Frecuencia
- M if (_Frecuencia == _Frecuencia)
- M if (001h == 1)
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 85
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- 000A1A 061E M decf _Frecuencia, F
- M else
- M movlw 001h
- M CHK?RP _Frecuencia
- M subwf _Frecuencia, F
- M endif
- M else
- M if (001h == 1)
- M CHK?RP _Frecuencia
- M decf _Frecuencia, W
- M MOVE?AB _Frecuencia
- M else
- M movlw 001h
- M CHK?RP _Frecuencia
- M subwf _Frecuencia, W
- M MOVE?AB _Frecuencia
- M endif
- M endif
- 00125 CMPNE?BCL _Frecuencia, 009h, L00007
- M if (009h < 100h)
- M CLRWDT?
- M ifndef NO_CLRWDT
- 000A1C 0004 M clrwdt
- M endif
- M MOVE?BA _Frecuencia
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- 000A1E 501E M movf _Frecuencia, W
- 000A20 0809 M sublw 009h
- M BIT?GOTO 0, STATUS, Z, L00007
- M ifdef USE_LINKER
- M CLRWDT?
- M else
- M if ($ == (L00007))
- M CLRWDT?
- M endif
- M endif
- M
- M if (((STATUS) > BANKA_END) & ((STATUS) < (0f01h + BANKA_END)))
- M bcf STATUS, OV
- M CHK?RP STATUS
- M if (0 == 0)
- M btfss STATUS, Z
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 86
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M btfsc STATUS, Z
- M endif
- M bsf STATUS, OV
- M RST?RP
- M ifdef USE_LINKER
- M btfsc STATUS, OV
- M goto L00007
- M else
- M if ((L00007) < 1)
- M btfsc STATUS, OV
- M goto L00007
- M else
- M if ((L00007) > $)
- M btfsc STATUS, OV
- M goto L00007
- M else
- M if ((L00007) < ($ - 7fh))
- M btfsc STATUS, OV
- M goto L00007
- M else
- M bov L00007
- M endif
- M endif
- M endif
- M endif
- M else
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M if (0 == 0)
- 000A22 A4D8 M btfss STATUS, Z
- M else
- M btfsc STATUS, Z
- M endif
- M ifdef USE_LINKER
- M goto L00007
- M else
- M if ((L00007) < 1)
- M goto L00007
- M else
- M if ((L00007) > $)
- 000A24 EF16 F005 M goto L00007
- M else
- M if ((L00007) < ($ - 3ffh))
- M goto L00007
- M else
- M bra L00007
- M endif
- M endif
- M endif
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 87
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M endif
- M else
- M L?GOTO L00007
- M endif
- 00126 MOVE?CB _FreqMin, _Frecuencia
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- M if (low (_FreqMin) == 0)
- M clrf _Frecuencia
- M else
- 000A28 0E0A M movlw low (_FreqMin)
- 000A2A 6E1E M movwf _Frecuencia
- M endif
- 00127 LABEL?L L00007
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M L00007
- M XALL
- M else
- 000A2C M L00007
- M endif
- 00128 MOVE?BB _Frecuencia, PORTB
- 000A2C C01E FF81 M movff _Frecuencia, PORTB
- 00129 LABEL?L L00005
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M L00005
- M XALL
- M else
- 000A30 M L00005
- M endif
- 00130 DIV?BCW _Frecuencia, 021h, _Modulante
- M if (021h == 2)
- M bcf STATUS, C
- M CHK?RP _Frecuencia
- M rrcf _Frecuencia, W
- M MOVE?AW _Modulante
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 88
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M MOVE?BW _Frecuencia, R0
- 000A30 C01E F001 M movff _Frecuencia, R0
- M CHK?RP R0
- M if (((R0) > BANKA_END) & ((R0) < (0f01h + BANKA_END)))
- M if (((R0) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R0)
- M PREV_BANK = high (R0)
- M endif
- M endif
- 000A34 6A02 M clrf (R0) + 1
- M MOVE?CW 021h, R1
- M CHK?RP R1
- M if (((R1) > BANKA_END) & ((R1) < (0f01h + BANKA_END)))
- M if (((R1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R1)
- M PREV_BANK = high (R1)
- M endif
- M endif
- M ifdef USE_LINKER
- M movlw low (021h)
- M movwf R1
- M movlw high (021h)
- M movwf (R1) + 1
- M else
- M if (low (021h) == 0)
- M clrf R1
- M else
- 000A36 0E21 M movlw low (021h)
- 000A38 6E03 M movwf R1
- M endif
- M if ((high (021h)) == 0)
- 000A3A 6A04 M clrf (R1) + 1
- M else
- M movlw high (021h)
- M movwf (R1) + 1
- M endif
- M endif
- M L?CALL DIV
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call DIV
- M else
- M if ((DIV) < 1)
- M call DIV
- M else
- M if ((DIV) > $)
- M call DIV
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 89
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M if ((DIV) < ($ - 3ffh))
- 000A3C EC9D F000 M call DIV
- M else
- M rcall DIV
- M endif
- M endif
- M endif
- M endif
- M MOVE?AWW R0, _Modulante
- M MOVE?AB _Modulante
- M CHK?RP _Modulante
- M if (((_Modulante) > BANKA_END) & ((_Modulante) < (0f01h + BANKA_END)))
- M if (((_Modulante) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Modulante)
- M PREV_BANK = high (_Modulante)
- M endif
- M endif
- 000A40 6E1C M movwf _Modulante
- M MOVE?BB (R0) + 1, (_Modulante) + 1
- 000A42 C002 F01D M movff (R0) + 1, (_Modulante) + 1
- M endif
- 00131 MUL?WCW _Modulante, 021h, T1
- M MOVE?WW _Modulante, R3
- M MOVE?BB _Modulante, R3
- 000A46 C01C F007 M movff _Modulante, R3
- M MOVE?BB (_Modulante) + 1, (R3) + 1
- 000A4A C01D F008 M movff (_Modulante) + 1, (R3) + 1
- M MOVE?CW 021h, R1
- M CHK?RP R1
- M if (((R1) > BANKA_END) & ((R1) < (0f01h + BANKA_END)))
- M if (((R1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R1)
- M PREV_BANK = high (R1)
- M endif
- M endif
- M ifdef USE_LINKER
- M movlw low (021h)
- M movwf R1
- M movlw high (021h)
- M movwf (R1) + 1
- M else
- M if (low (021h) == 0)
- M clrf R1
- M else
- 000A4E 0E21 M movlw low (021h)
- 000A50 6E03 M movwf R1
- M endif
- M if ((high (021h)) == 0)
- 000A52 6A04 M clrf (R1) + 1
- M else
- M movlw high (021h)
- M movwf (R1) + 1
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 90
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M endif
- M L?CALL MUL
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call MUL
- M else
- M if ((MUL) < 1)
- M call MUL
- M else
- M if ((MUL) > $)
- M call MUL
- M else
- M if ((MUL) < ($ - 3ffh))
- 000A54 ECB5 F000 M call MUL
- M else
- M rcall MUL
- M endif
- M endif
- M endif
- M endif
- M MOVE?AWW R2, T1
- M MOVE?AB T1
- M CHK?RP T1
- M if (((T1) > BANKA_END) & ((T1) < (0f01h + BANKA_END)))
- M if (((T1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (T1)
- M PREV_BANK = high (T1)
- M endif
- M endif
- 000A58 6E13 M movwf T1
- M MOVE?BB (R2) + 1, (T1) + 1
- 000A5A C006 F014 M movff (R2) + 1, (T1) + 1
- 00132 SUB?BWB _Frecuencia, T1, _Residuo
- M if (_Residuo == _Frecuencia)
- M MOVE?BA T1
- M CHK?RP _Residuo
- M subwf _Residuo, F
- M else
- M MOVE?BA T1
- M CHK?RP T1
- M if (((T1) > BANKA_END) & ((T1) < (0f01h + BANKA_END)))
- M if (((T1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (T1)
- M PREV_BANK = high (T1)
- M endif
- M endif
- 000A5E 5013 M movf T1, W
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 91
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M CHK?RP _Frecuencia
- M if (((_Frecuencia) > BANKA_END) & ((_Frecuencia) < (0f01h + BANKA_END)))
- M if (((_Frecuencia) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Frecuencia)
- M PREV_BANK = high (_Frecuencia)
- M endif
- M endif
- 000A60 5C1E M subwf _Frecuencia, W
- M MOVE?AB _Residuo
- M CHK?RP _Residuo
- M if (((_Residuo) > BANKA_END) & ((_Residuo) < (0f01h + BANKA_END)))
- M if (((_Residuo) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Residuo)
- M PREV_BANK = high (_Residuo)
- M endif
- M endif
- 000A62 6E1F M movwf _Residuo
- M endif
- 00133 MUL?BCB _Residuo, 00Ah, _Residuo
- M MOVE?BW _Residuo, R3
- 000A64 C01F F007 M movff _Residuo, R3
- M CHK?RP R3
- M if (((R3) > BANKA_END) & ((R3) < (0f01h + BANKA_END)))
- M if (((R3) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R3)
- M PREV_BANK = high (R3)
- M endif
- M endif
- 000A68 6A08 M clrf (R3) + 1
- M MOVE?CW 00Ah, R1
- M CHK?RP R1
- M if (((R1) > BANKA_END) & ((R1) < (0f01h + BANKA_END)))
- M if (((R1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R1)
- M PREV_BANK = high (R1)
- M endif
- M endif
- M ifdef USE_LINKER
- M movlw low (00Ah)
- M movwf R1
- M movlw high (00Ah)
- M movwf (R1) + 1
- M else
- M if (low (00Ah) == 0)
- M clrf R1
- M else
- 000A6A 0E0A M movlw low (00Ah)
- 000A6C 6E03 M movwf R1
- M endif
- M if ((high (00Ah)) == 0)
- 000A6E 6A04 M clrf (R1) + 1
- M else
- M movlw high (00Ah)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 92
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M movwf (R1) + 1
- M endif
- M endif
- M L?CALL MUL
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call MUL
- M else
- M if ((MUL) < 1)
- M call MUL
- M else
- M if ((MUL) > $)
- M call MUL
- M else
- M if ((MUL) < ($ - 3ffh))
- 000A70 ECB5 F000 M call MUL
- M else
- M rcall MUL
- M endif
- M endif
- M endif
- M endif
- M MOVE?AB _Residuo
- M CHK?RP _Residuo
- M if (((_Residuo) > BANKA_END) & ((_Residuo) < (0f01h + BANKA_END)))
- M if (((_Residuo) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Residuo)
- M PREV_BANK = high (_Residuo)
- M endif
- M endif
- 000A74 6E1F M movwf _Residuo
- 00134 DIV?BCB _Residuo, 021h, _Residuo
- M if (021h == 2)
- M bcf STATUS, C
- M if (_Residuo == _Residuo)
- M CHK?RP _Residuo
- M rrcf _Residuo, F
- M else
- M CHK?RP _Residuo
- M rrcf _Residuo, W
- M MOVE?AB _Residuo
- M endif
- M else
- M MOVE?BW _Residuo, R0
- 000A76 C01F F001 M movff _Residuo, R0
- M CHK?RP R0
- M if (((R0) > BANKA_END) & ((R0) < (0f01h + BANKA_END)))
- M if (((R0) & 0f00h) != (PREV_BANK << 8))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 93
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M movlb high (R0)
- M PREV_BANK = high (R0)
- M endif
- M endif
- 000A7A 6A02 M clrf (R0) + 1
- M MOVE?CW 021h, R1
- M CHK?RP R1
- M if (((R1) > BANKA_END) & ((R1) < (0f01h + BANKA_END)))
- M if (((R1) & 0f00h) != (PREV_BANK << 8))
- M movlb high (R1)
- M PREV_BANK = high (R1)
- M endif
- M endif
- M ifdef USE_LINKER
- M movlw low (021h)
- M movwf R1
- M movlw high (021h)
- M movwf (R1) + 1
- M else
- M if (low (021h) == 0)
- M clrf R1
- M else
- 000A7C 0E21 M movlw low (021h)
- 000A7E 6E03 M movwf R1
- M endif
- M if ((high (021h)) == 0)
- 000A80 6A04 M clrf (R1) + 1
- M else
- M movlw high (021h)
- M movwf (R1) + 1
- M endif
- M endif
- M L?CALL DIV
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call DIV
- M else
- M if ((DIV) < 1)
- M call DIV
- M else
- M if ((DIV) > $)
- M call DIV
- M else
- M if ((DIV) < ($ - 3ffh))
- 000A82 EC9D F000 M call DIV
- M else
- M rcall DIV
- M endif
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 94
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M endif
- M endif
- M MOVE?AB _Residuo
- M CHK?RP _Residuo
- M if (((_Residuo) > BANKA_END) & ((_Residuo) < (0f01h + BANKA_END)))
- M if (((_Residuo) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Residuo)
- M PREV_BANK = high (_Residuo)
- M endif
- M endif
- 000A86 6E1F M movwf _Residuo
- M endif
- 00135 USBSERVICE?
- M ; local Label1
- M L?CALL USBCheckBusStatus ; Must use polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < 1)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) > $)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < ($ - 3ffh))
- M call USBCheckBusStatus
- M else
- 000A88 DE01 M rcall USBCheckBusStatus
- M endif
- M endif
- M endif
- M endif
- M ; BIT?GOTO 1, UCFG, UTEYE, Label1
- M L?CALL USBDriverService ; Interrupt or polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBDriverService
- M else
- M if ((USBDriverService) < 1)
- M call USBDriverService
- M else
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 95
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if ((USBDriverService) > $)
- M call USBDriverService
- M else
- M if ((USBDriverService) < ($ - 3ffh))
- M call USBDriverService
- M else
- 000A8A DE1B M rcall USBDriverService
- M endif
- M endif
- M endif
- M endif
- M ;Label1
- M L?CALL DUNN ; Do our cleanup
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call DUNN
- M else
- M if ((DUNN) < 1)
- M call DUNN
- M else
- M if ((DUNN) > $)
- M call DUNN
- M else
- M if ((DUNN) < ($ - 3ffh))
- 000A8C ECD4 F000 M call DUNN
- M else
- M rcall DUNN
- M endif
- M endif
- M endif
- M endif
- 00136 LCDOUT?C 0FEh
- M MOVE?CA 0FEh
- 000A90 0EFE M movlw low (0FEh)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 96
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000A92 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00137 LCDOUT?C 0C0h
- M MOVE?CA 0C0h
- 000A96 0EC0 M movlw low (0C0h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000A98 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00138 LCDOUT?C 046h
- M MOVE?CA 046h
- 000A9C 0E46 M movlw low (046h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 97
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000A9E EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00139 LCDOUT?C 03Dh
- M MOVE?CA 03Dh
- 000AA2 0E3D M movlw low (03Dh)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AA4 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00140 LCDOUTD?W _Modulante
- M MOVE?WWA _Modulante, R2
- M MOVE?BB (_Modulante) + 1, (R2) + 1
- 000AA8 C01D F006 M movff (_Modulante) + 1, (R2) + 1
- M MOVE?BA _Modulante
- M CHK?RP _Modulante
- M if (((_Modulante) > BANKA_END) & ((_Modulante) < (0f01h + BANKA_END)))
- M if (((_Modulante) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Modulante)
- M PREV_BANK = high (_Modulante)
- M endif
- M endif
- 000AAC 501C M movf _Modulante, W
- M L?CALL LCDOUTDECL
- M RST?RP
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 98
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUTDECL
- M else
- M if ((LCDOUTDECL) < 1)
- M call LCDOUTDECL
- M else
- M if ((LCDOUTDECL) > $)
- M call LCDOUTDECL
- M else
- M if ((LCDOUTDECL) < ($ - 3ffh))
- 000AAE EC05 F000 M call LCDOUTDECL
- M else
- M rcall LCDOUTDECL
- M endif
- M endif
- M endif
- M endif
- 00141 LCDOUT?C 02Eh
- M MOVE?CA 02Eh
- 000AB2 0E2E M movlw low (02Eh)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AB4 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00142 LCDOUTD?B _Residuo
- M MOVE?BA _Residuo
- M CHK?RP _Residuo
- M if (((_Residuo) > BANKA_END) & ((_Residuo) < (0f01h + BANKA_END)))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 99
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if (((_Residuo) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_Residuo)
- M PREV_BANK = high (_Residuo)
- M endif
- M endif
- 000AB8 501F M movf _Residuo, W
- M L?CALL LCDOUTDEC
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUTDEC
- M else
- M if ((LCDOUTDEC) < 1)
- M call LCDOUTDEC
- M else
- M if ((LCDOUTDEC) > $)
- M call LCDOUTDEC
- M else
- M if ((LCDOUTDEC) < ($ - 3ffh))
- 000ABA EC04 F000 M call LCDOUTDEC
- M else
- M rcall LCDOUTDEC
- M endif
- M endif
- M endif
- M endif
- 00143 LCDOUT?C 020h
- M MOVE?CA 020h
- 000ABE 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AC0 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 100
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M endif
- M endif
- M endif
- 00144 LCDOUT?C 04Dh
- M MOVE?CA 04Dh
- 000AC4 0E4D M movlw low (04Dh)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AC6 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00145 LCDOUT?C 068h
- M MOVE?CA 068h
- 000ACA 0E68 M movlw low (068h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000ACC EC23 F000 M call LCDOUT
- M else
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 101
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00146 LCDOUT?C 07Ah
- M MOVE?CA 07Ah
- 000AD0 0E7A M movlw low (07Ah)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AD2 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00147 LCDOUT?C 020h
- M MOVE?CA 020h
- 000AD6 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AD8 EC23 F000 M call LCDOUT
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 102
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00148 LCDOUT?C 020h
- M MOVE?CA 020h
- 000ADC 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000ADE EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00149 LCDOUT?C 020h
- M MOVE?CA 020h
- 000AE2 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 103
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- 000AE4 EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00150 LCDOUT?C 020h
- M MOVE?CA 020h
- 000AE8 0E20 M movlw low (020h)
- M L?CALL LCDOUT
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call LCDOUT
- M else
- M if ((LCDOUT) < 1)
- M call LCDOUT
- M else
- M if ((LCDOUT) > $)
- M call LCDOUT
- M else
- M if ((LCDOUT) < ($ - 3ffh))
- 000AEA EC23 F000 M call LCDOUT
- M else
- M rcall LCDOUT
- M endif
- M endif
- M endif
- M endif
- 00151 USBSERVICE?
- M ; local Label1
- M L?CALL USBCheckBusStatus ; Must use polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < 1)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) > $)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < ($ - 3ffh))
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 104
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- 000AEE EC46 F003 M call USBCheckBusStatus
- M else
- M rcall USBCheckBusStatus
- M endif
- M endif
- M endif
- M endif
- M ; BIT?GOTO 1, UCFG, UTEYE, Label1
- M L?CALL USBDriverService ; Interrupt or polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBDriverService
- M else
- M if ((USBDriverService) < 1)
- M call USBDriverService
- M else
- M if ((USBDriverService) > $)
- M call USBDriverService
- M else
- M if ((USBDriverService) < ($ - 3ffh))
- 000AF2 EC61 F003 M call USBDriverService
- M else
- M rcall USBDriverService
- M endif
- M endif
- M endif
- M endif
- M ;Label1
- M L?CALL DUNN ; Do our cleanup
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call DUNN
- M else
- M if ((DUNN) < 1)
- M call DUNN
- M else
- M if ((DUNN) > $)
- M call DUNN
- M else
- M if ((DUNN) < ($ - 3ffh))
- 000AF6 ECD4 F000 M call DUNN
- M else
- M rcall DUNN
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 105
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M endif
- M endif
- M endif
- M endif
- 00152 GOTO?L _ProgramStart
- M L?GOTO _ProgramStart
- M ifdef USE_LINKER
- M CLRWDT?
- M else
- M if ($ == (_ProgramStart))
- M CLRWDT?
- M endif
- M endif
- M
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M goto _ProgramStart
- M else
- M if ((_ProgramStart) < 1)
- M goto _ProgramStart
- M else
- M if ((_ProgramStart) > $)
- M goto _ProgramStart
- M else
- M if ((_ProgramStart) < ($ - 3ffh))
- M goto _ProgramStart
- M else
- 000AFA D76E M bra _ProgramStart
- M endif
- M endif
- M endif
- M endif
- 00153
- 00154 LABEL?L _DoUSBIn
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M ifdef PM_USED
- M LALL
- M _DoUSBIn
- M XALL
- M else
- 000AFC M _DoUSBIn
- M endif
- 00155 MOVE?CB _USBBufferSizeRX, _USBBufferCount
- M CHK?RP _USBBufferCount
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 106
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M if (((_USBBufferCount) > BANKA_END) & ((_USBBufferCount) < (0f01h + BANKA_END)))
- M if (((_USBBufferCount) & 0f00h) != (PREV_BANK << 8))
- M movlb high (_USBBufferCount)
- M PREV_BANK = high (_USBBufferCount)
- M endif
- M endif
- M if (low (_USBBufferSizeRX) == 0)
- M clrf _USBBufferCount
- M else
- 000AFC 0E10 M movlw low (_USBBufferSizeRX)
- 000AFE 6E20 M movwf _USBBufferCount
- M endif
- 00156 USBSERVICE?
- M ; local Label1
- M L?CALL USBCheckBusStatus ; Must use polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < 1)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) > $)
- M call USBCheckBusStatus
- M else
- M if ((USBCheckBusStatus) < ($ - 3ffh))
- 000B00 EC46 F003 M call USBCheckBusStatus
- M else
- M rcall USBCheckBusStatus
- M endif
- M endif
- M endif
- M endif
- M ; BIT?GOTO 1, UCFG, UTEYE, Label1
- M L?CALL USBDriverService ; Interrupt or polling method
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER
- M call USBDriverService
- M else
- M if ((USBDriverService) < 1)
- M call USBDriverService
- M else
- M if ((USBDriverService) > $)
- MPASM 5.22 USBFM.ASM 1-25-2010 15:59:32 PAGE 107
- LOC OBJECT CODE LINE SOURCE TEXT
- VALUE
- M call USBDriverService
- M else
- M if ((USBDriverService) < ($ - 3ffh))
- 000B04 EC61 F003 M call USBDriverService
- M else
- M rcall USBDriverService
- M endif
- M endif
- M endif
- M endif
- M ;Label1
- M L?CALL DUNN ; Do our cleanup
- M RST?RP
- M if (PREV_BANK != 0)
- M movlb 0
- M PREV_BANK = 0
- M endif
- M
- M ifdef USE_LINKER