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

📄 gps.lst

📁 这是用W77E58编写的控制GSM模块
💻 LST
📖 第 1 页 / 共 5 页
字号:
005F         ?C0009:
                                           ; SOURCE LINE # 103
005F E4                CLR     A
0060 7F10              MOV     R7,#010H
0062 7E27              MOV     R6,#027H
0064 FD                MOV     R5,A
0065 FC                MOV     R4,A
0066 AB00        R     MOV     R3,minute1+03H
0068 AA00        R     MOV     R2,minute1+02H
006A A900        R     MOV     R1,minute1+01H
006C A800        R     MOV     R0,minute1
006E 120000      E     LCALL   ?C?LMUL
0071 C004              PUSH    AR4
0073 C005              PUSH    AR5
0075 C006              PUSH    AR6
0077 C007              PUSH    AR7
0079 7FC0              MOV     R7,#0C0H
007B 7E27              MOV     R6,#027H
007D 7D09              MOV     R5,#09H
007F 7C00              MOV     R4,#00H
0081 AB00        R     MOV     R3,degree+03H
0083 AA00        R     MOV     R2,degree+02H
0085 A900        R     MOV     R1,degree+01H
0087 A800        R     MOV     R0,degree
0089 120000      E     LCALL   ?C?LMUL
008C D003              POP     AR3
008E D002              POP     AR2
0090 D001              POP     AR1
0092 D000              POP     AR0
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 12  

0094 EF                MOV     A,R7
0095 2B                ADD     A,R3
0096 FF                MOV     R7,A
0097 EE                MOV     A,R6
0098 3A                ADDC    A,R2
0099 FE                MOV     R6,A
009A ED                MOV     A,R5
009B 39                ADDC    A,R1
009C FD                MOV     R5,A
009D EC                MOV     A,R4
009E 38                ADDC    A,R0
009F FC                MOV     R4,A
00A0 C004              PUSH    AR4
00A2 C005              PUSH    AR5
00A4 C006              PUSH    AR6
00A6 C007              PUSH    AR7
00A8 E4                CLR     A
00A9 7F10              MOV     R7,#010H
00AB 7E27              MOV     R6,#027H
00AD FD                MOV     R5,A
00AE FC                MOV     R4,A
00AF AB00        R     MOV     R3,minute2+03H
00B1 AA00        R     MOV     R2,minute2+02H
00B3 A900        R     MOV     R1,minute2+01H
00B5 A800        R     MOV     R0,minute2
00B7 120000      E     LCALL   ?C?LMUL
00BA E4                CLR     A
00BB 7B3C              MOV     R3,#03CH
00BD FA                MOV     R2,A
00BE F9                MOV     R1,A
00BF F8                MOV     R0,A
00C0 120000      E     LCALL   ?C?ULDIV
00C3 D003              POP     AR3
00C5 D002              POP     AR2
00C7 D001              POP     AR1
00C9 D000              POP     AR0
00CB EF                MOV     A,R7
00CC 2B                ADD     A,R3
00CD FF                MOV     R7,A
00CE EE                MOV     A,R6
00CF 3A                ADDC    A,R2
00D0 FE                MOV     R6,A
00D1 ED                MOV     A,R5
00D2 39                ADDC    A,R1
00D3 FD                MOV     R5,A
00D4 EC                MOV     A,R4
00D5 38                ADDC    A,R0
00D6 FC                MOV     R4,A
                                           ; SOURCE LINE # 105
00D7         ?C0010:
00D7 22                RET     
             ; FUNCTION _GetGpsInfoDmm (END)

             ; FUNCTION _ParseGPRMC (BEGIN)
                                           ; SOURCE LINE # 110
0000 8B00        R     MOV     GprmcBuff,R3
0002 8A00        R     MOV     GprmcBuff+01H,R2
0004 8900        R     MOV     GprmcBuff+02H,R1
                                           ; SOURCE LINE # 111
                                           ; SOURCE LINE # 117
0006 7D01              MOV     R5,#01H
0008 120000      R     LCALL   _Split
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 13  

000B 8E00        R     MOV     i,R6
000D 8F00        R     MOV     i+01H,R7
                                           ; SOURCE LINE # 118
000F E500        R     MOV     A,i+01H
0011 4500        R     ORL     A,i
0013 7003              JNZ     $ + 5H
0015 020000      R     LJMP    ?C0013
0018         ?C0012:
                                           ; SOURCE LINE # 121
0018 AB00        R     MOV     R3,GprmcBuff
001A AA00        R     MOV     R2,GprmcBuff+01H
001C A900        R     MOV     R1,GprmcBuff+02H
001E E500        R     MOV     A,i+01H
0020 240A              ADD     A,#0AH
0022 FF                MOV     R7,A
0023 E4                CLR     A
0024 3500        R     ADDC    A,i
0026 8F82              MOV     DPL,R7
0028 F583              MOV     DPH,A
002A 120000      E     LCALL   ?C?CLDOPTR
002D 642C              XRL     A,#02CH
002F 6003              JZ      $ + 5H
0031 020000      R     LJMP    ?C0014
                                           ; SOURCE LINE # 122
                                           ; SOURCE LINE # 124
0034 E500        R     MOV     A,i+01H
0036 2401              ADD     A,#01H
0038 FF                MOV     R7,A
0039 E4                CLR     A
003A 3500        R     ADDC    A,i
003C 8F82              MOV     DPL,R7
003E F583              MOV     DPH,A
0040 120000      E     LCALL   ?C?CLDOPTR
0043 FF                MOV     R7,A
0044 C3                CLR     C
0045 9430              SUBB    A,#030H
0047 5003              JNC     $ + 5H
0049 020000      R     LJMP    ?C0013
004C EF                MOV     A,R7
004D D3                SETB    C
004E 9439              SUBB    A,#039H
0050 4003              JC      $ + 5H
0052 020000      R     LJMP    ?C0013
0055 E500        R     MOV     A,i+01H
0057 2402              ADD     A,#02H
0059 FF                MOV     R7,A
005A E4                CLR     A
005B 3500        R     ADDC    A,i
005D 8F82              MOV     DPL,R7
005F F583              MOV     DPH,A
0061 120000      E     LCALL   ?C?CLDOPTR
0064 FF                MOV     R7,A
0065 C3                CLR     C
0066 9430              SUBB    A,#030H
0068 5003              JNC     $ + 5H
006A 020000      R     LJMP    ?C0013
006D EF                MOV     A,R7
006E D3                SETB    C
006F 9439              SUBB    A,#039H
0071 4003              JC      $ + 5H
0073 020000      R     LJMP    ?C0013
0076 E500        R     MOV     A,i+01H
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 14  

0078 2403              ADD     A,#03H
007A FF                MOV     R7,A
007B E4                CLR     A
007C 3500        R     ADDC    A,i
007E 8F82              MOV     DPL,R7
0080 F583              MOV     DPH,A
0082 120000      E     LCALL   ?C?CLDOPTR
0085 FF                MOV     R7,A
0086 C3                CLR     C
0087 9430              SUBB    A,#030H
0089 5003              JNC     $ + 5H
008B 020000      R     LJMP    ?C0013
008E EF                MOV     A,R7
008F D3                SETB    C
0090 9439              SUBB    A,#039H
0092 4003              JC      $ + 5H
0094 020000      R     LJMP    ?C0013
0097 E500        R     MOV     A,i+01H
0099 2404              ADD     A,#04H
009B FF                MOV     R7,A
009C E4                CLR     A
009D 3500        R     ADDC    A,i
009F 8F82              MOV     DPL,R7
00A1 F583              MOV     DPH,A
00A3 120000      E     LCALL   ?C?CLDOPTR
00A6 FF                MOV     R7,A
00A7 C3                CLR     C
00A8 9430              SUBB    A,#030H
00AA 5003              JNC     $ + 5H
00AC 020000      R     LJMP    ?C0013
00AF EF                MOV     A,R7
00B0 D3                SETB    C
00B1 9439              SUBB    A,#039H
00B3 4003              JC      $ + 5H
00B5 020000      R     LJMP    ?C0013
00B8 E500        R     MOV     A,i+01H
00BA 2405              ADD     A,#05H
00BC FF                MOV     R7,A
00BD E4                CLR     A
00BE 3500        R     ADDC    A,i
00C0 8F82              MOV     DPL,R7
00C2 F583              MOV     DPH,A
00C4 120000      E     LCALL   ?C?CLDOPTR
00C7 FF                MOV     R7,A
00C8 C3                CLR     C
00C9 9430              SUBB    A,#030H
00CB 5003              JNC     $ + 5H
00CD 020000      R     LJMP    ?C0013
00D0 EF                MOV     A,R7
00D1 D3                SETB    C
00D2 9439              SUBB    A,#039H
00D4 4003              JC      $ + 5H
00D6 020000      R     LJMP    ?C0013
00D9 E500        R     MOV     A,i+01H
00DB 2406              ADD     A,#06H
00DD FF                MOV     R7,A
00DE E4                CLR     A
00DF 3500        R     ADDC    A,i
00E1 8F82              MOV     DPL,R7
00E3 F583              MOV     DPH,A
00E5 120000      E     LCALL   ?C?CLDOPTR
00E8 FF                MOV     R7,A
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 15  

00E9 C3                CLR     C
00EA 9430              SUBB    A,#030H
00EC 5003              JNC     $ + 5H
00EE 020000      R     LJMP    ?C0013
00F1 EF                MOV     A,R7
00F2 D3                SETB    C
00F3 9439              SUBB    A,#039H
00F5 4003              JC      $ + 5H
00F7 020000      R     LJMP    ?C0013
00FA E500        R     MOV     A,i+01H
00FC 2407              ADD     A,#07H
00FE FF                MOV     R7,A
00FF E4                CLR     A
0100 3500        R     ADDC    A,i
0102 8F82              MOV     DPL,R7
0104 F583              MOV     DPH,A
0106 120000      E     LCALL   ?C?CLDOPTR
0109 642E              XRL     A,#02EH
010B 6003              JZ      $ + 5H
010D 020000      R     LJMP    ?C0013
0110 E500        R     MOV     A,i+01H
0112 2408              ADD     A,#08H
0114 FF                MOV     R7,A
0115 E4                CLR     A
0116 3500        R     ADDC    A,i
0118 8F82              MOV     DPL,R7
011A F583              MOV     DPH,A
011C 120000      E     LCALL   ?C?CLDOPTR
011F FF                MOV     R7,A
0120 C3                CLR     C
0121 9430              SUBB    A,#030H
0123 5003              JNC     $ + 5H
0125 020000      R     LJMP    ?C0013
0128 EF                MOV     A,R7
0129 D3                SETB    C
012A 9439              SUBB    A,#039H
012C 4003              JC      $ + 5H
012E 020000      R     LJMP    ?C0013
0131 E500        R     MOV     A,i+01H
0133 2409              ADD     A,#09H
0135 FF                MOV     R7,A
0136 E4                CLR     A
0137 3500        R     ADDC    A,i
0139 8F82              MOV     DPL,R7
013B F583              MOV     DPH,A
013D 120000      E     LCALL   ?C?CLDOPTR
0140 FF                MOV     R7,A
0141 C3                CLR     C
0142 9430              SUBB    A,#030H
0144 5003              JNC     $ + 5H
0146 020000      R     LJMP    ?C0013
0149 EF                MOV     A,R7
014A D3                SETB    C
014B 9439              SUBB    A,#039H
014D 5003              JNC     $ + 5H
014F 020000      R     LJMP    ?C0017
0152 22                RET     
                                           ; SOURCE LINE # 136
0153         ?C0014:
                                           ; SOURCE LINE # 138
                                           ; SOURCE LINE # 139
0153 AB00        R     MOV     R3,GprmcBuff
C51 COMPILER V7.50   GPS                                                                   04/04/2007 15:49:17 PAGE 16  

0155 AA00        R     MOV     R2,GprmcBuff+01H
0157 A900        R     MOV     R1,GprmcBuff+02H
0159 E500        R     MOV     A,i+01H
015B 2401              ADD     A,#01H
015D FF                MOV     R7,A
015E E4                CLR     A
015F 3500        R     ADDC    A,i
0161 8F82              MOV     DPL,R7
0163 F583              MOV     DPH,A
0165 120000      E     LCALL   ?C?CLDOPTR
0168 FF                MOV     R7,A
0169 C3                CLR     C
016A 9430              SUBB    A,#030H
016C 5003              JNC     $ + 5H
016E 020000      R     LJMP    ?C0013
0171 EF                MOV     A,R7
0172 D3                SETB    C
0173 9439              SUBB    A,#039H
0175 4003              JC      $ + 5H
0177 020000      R     LJMP    ?C0013
017A E500        R     MOV     A,i+01H
017C 2402              ADD     A,#02H
017E FF                MOV     R7,A
017F E4                CLR     A
0180 3500        R     ADDC    A,i
0182 8F82              MOV     DPL,R7
0184 F583              MOV     DPH,A
0186 120000      E     LCALL   ?C?CLDOPTR
0189 FF                MOV     R7,A

⌨️ 快捷键说明

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