⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gps.lst

📁 这是用W77E58编写的控制GSM模块
💻 LST
📖 第 1 页 / 共 5 页
字号:
039A         ?C0023:
039A 9200        R     MOV     GPSav,C
                                           ; SOURCE LINE # 168
039C AB00        R     MOV     R3,GprmcBuff
039E AA00        R     MOV     R2,GprmcBuff+01H
03A0 A900        R     MOV     R1,GprmcBuff+02H
03A2 7D05              MOV     R5,#05H
03A4 120000      R     LCALL   _Split
03A7 8E00        R     MOV     i,R6
03A9 8F00        R     MOV     i+01H,R7
                                           ; SOURCE LINE # 169
03AB E500        R     MOV     A,i+01H
03AD 4500        R     ORL     A,i
03AF 7003              JNZ     $ + 5H
03B1 020000      R     LJMP    ?C0013
03B4         ?C0024:
                                           ; SOURCE LINE # 170
03B4 AB00        R     MOV     R3,GprmcBuff
03B6 AA00        R     MOV     R2,GprmcBuff+01H
03B8 A900        R     MOV     R1,GprmcBuff+02H
03BA E500        R     MOV     A,i+01H
03BC 2401              ADD     A,#01H
03BE FF                MOV     R7,A
03BF E4                CLR     A
03C0 3500        R     ADDC    A,i
03C2 8F82              MOV     DPL,R7
03C4 F583              MOV     DPH,A
03C6 120000      E     LCALL   ?C?CLDOPTR
03C9 FF                MOV     R7,A
03CA C3                CLR     C
03CB 9430              SUBB    A,#030H
03CD 5003              JNC     $ + 5H
03CF 020000      R     LJMP    ?C0013
03D2 EF                MOV     A,R7
03D3 D3                SETB    C
03D4 9439              SUBB    A,#039H
03D6 4003              JC      $ + 5H
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 22  

03D8 020000      R     LJMP    ?C0013
03DB E500        R     MOV     A,i+01H
03DD 2402              ADD     A,#02H
03DF FF                MOV     R7,A
03E0 E4                CLR     A
03E1 3500        R     ADDC    A,i
03E3 8F82              MOV     DPL,R7
03E5 F583              MOV     DPH,A
03E7 120000      E     LCALL   ?C?CLDOPTR
03EA FF                MOV     R7,A
03EB C3                CLR     C
03EC 9430              SUBB    A,#030H
03EE 5003              JNC     $ + 5H
03F0 020000      R     LJMP    ?C0013
03F3 EF                MOV     A,R7
03F4 D3                SETB    C
03F5 9439              SUBB    A,#039H
03F7 4003              JC      $ + 5H
03F9 020000      R     LJMP    ?C0013
03FC E500        R     MOV     A,i+01H
03FE 2403              ADD     A,#03H
0400 FF                MOV     R7,A
0401 E4                CLR     A
0402 3500        R     ADDC    A,i
0404 8F82              MOV     DPL,R7
0406 F583              MOV     DPH,A
0408 120000      E     LCALL   ?C?CLDOPTR
040B FF                MOV     R7,A
040C C3                CLR     C
040D 9430              SUBB    A,#030H
040F 5003              JNC     $ + 5H
0411 020000      R     LJMP    ?C0013
0414 EF                MOV     A,R7
0415 D3                SETB    C
0416 9439              SUBB    A,#039H
0418 4003              JC      $ + 5H
041A 020000      R     LJMP    ?C0013
041D E500        R     MOV     A,i+01H
041F 2404              ADD     A,#04H
0421 FF                MOV     R7,A
0422 E4                CLR     A
0423 3500        R     ADDC    A,i
0425 8F82              MOV     DPL,R7
0427 F583              MOV     DPH,A
0429 120000      E     LCALL   ?C?CLDOPTR
042C FF                MOV     R7,A
042D C3                CLR     C
042E 9430              SUBB    A,#030H
0430 5003              JNC     $ + 5H
0432 020000      R     LJMP    ?C0013
0435 EF                MOV     A,R7
0436 D3                SETB    C
0437 9439              SUBB    A,#039H
0439 4003              JC      $ + 5H
043B 020000      R     LJMP    ?C0013
043E E500        R     MOV     A,i+01H
0440 2405              ADD     A,#05H
0442 FF                MOV     R7,A
0443 E4                CLR     A
0444 3500        R     ADDC    A,i
0446 8F82              MOV     DPL,R7
0448 F583              MOV     DPH,A
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 23  

044A 120000      E     LCALL   ?C?CLDOPTR
044D FF                MOV     R7,A
044E C3                CLR     C
044F 9430              SUBB    A,#030H
0451 5003              JNC     $ + 5H
0453 020000      R     LJMP    ?C0013
0456 EF                MOV     A,R7
0457 D3                SETB    C
0458 9439              SUBB    A,#039H
045A 4003              JC      $ + 5H
045C 020000      R     LJMP    ?C0013
045F E500        R     MOV     A,i+01H
0461 2406              ADD     A,#06H
0463 FF                MOV     R7,A
0464 E4                CLR     A
0465 3500        R     ADDC    A,i
0467 8F82              MOV     DPL,R7
0469 F583              MOV     DPH,A
046B 120000      E     LCALL   ?C?CLDOPTR
046E 642E              XRL     A,#02EH
0470 6003              JZ      $ + 5H
0472 020000      R     LJMP    ?C0013
0475 E500        R     MOV     A,i+01H
0477 2407              ADD     A,#07H
0479 FF                MOV     R7,A
047A E4                CLR     A
047B 3500        R     ADDC    A,i
047D 8F82              MOV     DPL,R7
047F F583              MOV     DPH,A
0481 120000      E     LCALL   ?C?CLDOPTR
0484 FF                MOV     R7,A
0485 C3                CLR     C
0486 9430              SUBB    A,#030H
0488 5003              JNC     $ + 5H
048A 020000      R     LJMP    ?C0013
048D EF                MOV     A,R7
048E D3                SETB    C
048F 9439              SUBB    A,#039H
0491 4003              JC      $ + 5H
0493 020000      R     LJMP    ?C0013
0496 E500        R     MOV     A,i+01H
0498 2408              ADD     A,#08H
049A FF                MOV     R7,A
049B E4                CLR     A
049C 3500        R     ADDC    A,i
049E 8F82              MOV     DPL,R7
04A0 F583              MOV     DPH,A
04A2 120000      E     LCALL   ?C?CLDOPTR
04A5 FF                MOV     R7,A
04A6 C3                CLR     C
04A7 9430              SUBB    A,#030H
04A9 5003              JNC     $ + 5H
04AB 020000      R     LJMP    ?C0013
04AE EF                MOV     A,R7
04AF D3                SETB    C
04B0 9439              SUBB    A,#039H
04B2 4003              JC      $ + 5H
04B4 020000      R     LJMP    ?C0013
04B7 E500        R     MOV     A,i+01H
04B9 2409              ADD     A,#09H
04BB FF                MOV     R7,A
04BC E4                CLR     A
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 24  

04BD 3500        R     ADDC    A,i
04BF 8F82              MOV     DPL,R7
04C1 F583              MOV     DPH,A
04C3 120000      E     LCALL   ?C?CLDOPTR
04C6 FF                MOV     R7,A
04C7 C3                CLR     C
04C8 9430              SUBB    A,#030H
04CA 5003              JNC     $ + 5H
04CC 020000      R     LJMP    ?C0013
04CF EF                MOV     A,R7
04D0 D3                SETB    C
04D1 9439              SUBB    A,#039H
04D3 4003              JC      $ + 5H
04D5 020000      R     LJMP    ?C0013
04D8 E500        R     MOV     A,i+01H
04DA 240A              ADD     A,#0AH
04DC FF                MOV     R7,A
04DD E4                CLR     A
04DE 3500        R     ADDC    A,i
04E0 8F82              MOV     DPL,R7
04E2 F583              MOV     DPH,A
04E4 120000      E     LCALL   ?C?CLDOPTR
04E7 FF                MOV     R7,A
04E8 C3                CLR     C
04E9 9430              SUBB    A,#030H
04EB 5003              JNC     $ + 5H
04ED 020000      R     LJMP    ?C0013
04F0 EF                MOV     A,R7
04F1 D3                SETB    C
04F2 9439              SUBB    A,#039H
04F4 4003              JC      $ + 5H
04F6 020000      R     LJMP    ?C0013
04F9         ?C0025:
                                           ; SOURCE LINE # 182
04F9 AB00        R     MOV     R3,GprmcBuff
04FB AA00        R     MOV     R2,GprmcBuff+01H
04FD A900        R     MOV     R1,GprmcBuff+02H
04FF E500        R     MOV     A,i+01H
0501 2402              ADD     A,#02H
0503 FF                MOV     R7,A
0504 E4                CLR     A
0505 3500        R     ADDC    A,i
0507 8F82              MOV     DPL,R7
0509 F583              MOV     DPH,A
050B 120000      E     LCALL   ?C?CLDOPTR
050E FF                MOV     R7,A
050F 7E00              MOV     R6,#00H
0511 7C00              MOV     R4,#00H
0513 7D0A              MOV     R5,#0AH
0515 120000      E     LCALL   ?C?IMUL
0518 C006              PUSH    AR6
051A C007              PUSH    AR7
051C E500        R     MOV     A,i+01H
051E 2401              ADD     A,#01H
0520 FF                MOV     R7,A
0521 E4                CLR     A
0522 3500        R     ADDC    A,i
0524 8F82              MOV     DPL,R7
0526 F583              MOV     DPH,A
0528 120000      E     LCALL   ?C?CLDOPTR
052B FF                MOV     R7,A
052C 7E00              MOV     R6,#00H
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 25  

052E 7D64              MOV     R5,#064H
0530 120000      E     LCALL   ?C?IMUL
0533 D0E0              POP     ACC
0535 2F                ADD     A,R7
0536 FF                MOV     R7,A
0537 D0E0              POP     ACC
0539 3E                ADDC    A,R6
053A FE                MOV     R6,A
053B E500        R     MOV     A,i+01H
053D 2403              ADD     A,#03H
053F FD                MOV     R5,A
0540 E4                CLR     A
0541 3500        R     ADDC    A,i
0543 8D82              MOV     DPL,R5
0545 F583              MOV     DPH,A
0547 120000      E     LCALL   ?C?CLDOPTR
054A 2F                ADD     A,R7
054B FF                MOV     R7,A
054C EC                MOV     A,R4
054D 3E                ADDC    A,R6
054E CF                XCH     A,R7
054F 2430              ADD     A,#030H
0551 CF                XCH     A,R7
0552 34EB              ADDC    A,#0EBH
0554 FE                MOV     R6,A
0555 E4                CLR     A
0556 FD                MOV     R5,A
0557 900000      R     MOV     DPTR,#LonDeg
055A 120000      E     LCALL   ?C?LSTXDATA
                                           ; SOURCE LINE # 185
055D E500        R     MOV     A,i+01H
055F 2404              ADD     A,#04H
0561 FF                MOV     R7,A
0562 E4                CLR     A
0563 3500        R     ADDC    A,i
0565 8F82              MOV     DPL,R7
0567 F583              MOV     DPH,A
0569 120000      E     LCALL   ?C?CLDOPTR
056C FF                MOV     R7,A
056D 7E00              MOV     R6,#00H
056F 7C00              MOV     R4,#00H
0571 7D0A              MOV     R5,#0AH
0573 120000      E     LCALL   ?C?IMUL
0576 E500        R     MOV     A,i+01H
0578 2405              ADD     A,#05H
057A FD                MOV     R5,A
057B E4                CLR     A
057C 3500        R     ADDC    A,i
057E 8D82              MOV     DPL,R5
0580 F583              MOV     DPH,A
0582 120000      E     LCALL   ?C?CLDOPTR
0585 2F                ADD     A,R7
0586 FF                MOV     R7,A
0587 EC                MOV     A,R4
0588 3E                ADDC    A,R6
0589 CF                XCH     A,R7
058A 24F0              ADD     A,#0F0H
058C CF                XCH     A,R7
058D 34FD              ADDC    A,#0FDH
058F FE                MOV     R6,A
0590 E4                CLR     A
0591 FD                MOV     R5,A
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 26  

0592 900000      R     MOV     DPTR,#LonMin1
0595 120000      E     LCALL   ?C?LSTXDATA
                                           ; SOURCE LINE # 187
0598 E500        R     MOV     A,i+01H
059A 2408              ADD     A,#08H
059C FF                MOV     R7,A
059D E4                CLR     A
059E 3500        R     ADDC    A,i
05A0 8F82              MOV     DPL,R7
05A2 F583              MOV     DPH,A
05A4 120000      E     LCALL   ?C?CLDOPTR
05A7 FF                MOV     R7,A
05A8 7E00              MOV     R6,#00H
05AA 7C00              MOV     R4,#00H
05AC 7D64              MOV     R5,#064H
05AE 120000      E     LCALL   ?C?IMUL
05B1 C006              PUSH    AR6
05B3 C007              PUSH    AR7
05B5 E500        R     MOV     A

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -