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

📄 parfpm.lst

📁 msc1201 编程4
💻 LST
📖 第 1 页 / 共 5 页
字号:
0173 120000  R      LCALL  _sfpm
                                           ; SOURCE LINE # 128 
0176 7F07           MOV    R7,#007H
0178 0D             INC    R5
0179 7BBF           MOV    R3,#0BFH
017B 120000  R      LCALL  _sfpm
                                           ; SOURCE LINE # 129 
017E 7F07           MOV    R7,#007H
0180 0D             INC    R5
0181 7B5D           MOV    R3,#05DH
0183 120000  R      LCALL  _sfpm
                                           ; SOURCE LINE # 130 
0186 7F06           MOV    R7,#006H
0188 E4             CLR    A
0189 FB             MOV    R3,A
018A 7DEA           MOV    R5,#0EAH
018C 120000  R      LCALL  _sfpm
018F 8F00    R      MOV    target+01H,R7
                                           ; SOURCE LINE # 131 
0191 7F06           MOV    R7,#006H
0193 1D             DEC    R5
0194 120000  R      LCALL  _sfpm
0197 8F00    R      MOV    target+02H,R7
                                           ; SOURCE LINE # 132 
0199 7F06           MOV    R7,#006H
019B 7DEB           MOV    R5,#0EBH
019D 120000  R      LCALL  _sfpm
01A0 8F00    R      MOV    target+03H,R7
                                           ; SOURCE LINE # 133 
01A2 E4             CLR    A
01A3 FF             MOV    R7,A
01A4 7C80           MOV    R4,#080H
01A6 7D7F           MOV    R5,#07FH
01A8 120000  R      LCALL  _sfpm
01AB EF             MOV    A,R7
01AC 7E00           MOV    R6,#000H
01AE 5480           ANL    A,#080H
01B0 FF             MOV    R7,A
01B1 7004           JNZ    ?ELSE84
01B3 7A01           MOV    R2,#001H
01B5 8002           SJMP   ?NXT118
01B7         ?ELSE84:
01B7 E4             CLR    A
01B8 FA             MOV    R2,A
01B9         ?NXT118:
01B9 8A00    R      MOV    target+07H,R2
                                           ; SOURCE LINE # 134 
01BB E500    R      MOV    A,target+01H
01BD 7040           JNZ    ?ELSE85
01BF E500    R      MOV    A,target+02H
01C1 20E73B         JB     ACC.7,?ELSE85
                                           ; SOURCE LINE # 135 
01C4 750001  R      MOV    target,#001H
                                           ; SOURCE LINE # 136 
01C7 750000  R      MOV    target+05H,#000H
                                           ; SOURCE LINE # 137 
01CA E500    R      MOV    A,target+02H
01CC 5403           ANL    A,#003H
01CE 7006           JNZ    ?NXT120
01D0 750004  R      MOV    target+04H,#004H
01D3 750002  R      MOV    target+06H,#002H
01D6         ?NXT120:
                                           ; SOURCE LINE # 138 
01D6 E500    R      MOV    A,target+02H
01D8 5403           ANL    A,#003H
01DA B40106         CJNE   A,#001H,?NXT122
01DD 750008  R      MOV    target+04H,#008H
01E0 750003  R      MOV    target+06H,#003H
01E3         ?NXT122:
                                           ; SOURCE LINE # 139 
01E3 E500    R      MOV    A,target+02H
01E5 5403           ANL    A,#003H
01E7 B40206         CJNE   A,#002H,?NXT123
01EA 750010  R      MOV    target+04H,#010H
01ED 750004  R      MOV    target+06H,#004H
01F0         ?NXT123:
                                           ; SOURCE LINE # 140 
01F0 E500    R      MOV    A,target+02H
01F2 5403           ANL    A,#003H
01F4 B4035A         CJNE   A,#003H,?NXT119
01F7 750020  R      MOV    target+04H,#020H
01FA 750005  R      MOV    target+06H,#005H
01FD 8052           SJMP   ?NXT117
01FF         ?ELSE85:
                                           ; SOURCE LINE # 142 
01FF E500    R      MOV    A,target+01H
0201 B4084A         CJNE   A,#008H,?ELSE90
0204 E500    R      MOV    A,target+02H
0206 20E745         JB     ACC.7,?ELSE90
                                           ; SOURCE LINE # 143 
0209 750001  R      MOV    target,#001H
                                           ; SOURCE LINE # 144 
020C E500    R      MOV    A,target+02H
020E 20E205         JB     ACC.2,?ELSE91
0211 750002  R      MOV    target+05H,#002H
0214 8003           SJMP   ?NXT126
0216         ?ELSE91:
0216 750001  R      MOV    target+05H,#001H
0219         ?NXT126:
                                           ; SOURCE LINE # 145 
0219 E500    R      MOV    A,target+02H
021B 5403           ANL    A,#003H
021D 7006           JNZ    ?NXT127
021F 750004  R      MOV    target+04H,#004H
0222 750002  R      MOV    target+06H,#002H
0225         ?NXT127:
                                           ; SOURCE LINE # 146 
0225 E500    R      MOV    A,target+02H
0227 5403           ANL    A,#003H
0229 B40106         CJNE   A,#001H,?NXT129
022C 750008  R      MOV    target+04H,#008H
022F 750003  R      MOV    target+06H,#003H
0232         ?NXT129:
                                           ; SOURCE LINE # 147 
0232 E500    R      MOV    A,target+02H
0234 5403           ANL    A,#003H
0236 B40206         CJNE   A,#002H,?NXT130
0239 750010  R      MOV    target+04H,#010H
023C 750004  R      MOV    target+06H,#004H
023F         ?NXT130:
                                           ; SOURCE LINE # 148 
023F E500    R      MOV    A,target+02H
0241 5403           ANL    A,#003H
0243 B4030B         CJNE   A,#003H,?NXT125
0246 750020  R      MOV    target+04H,#020H
0249 750005  R      MOV    target+06H,#005H
024C 8003           SJMP   ?NXT117
024E         ?ELSE90:
                                           ; SOURCE LINE # 149 
024E 750000  R      MOV    target,#000H
0251         ?NXT125:

0251         ?NXT119:

0251         ?NXT117:
                                           ; SOURCE LINE # 151 
0251 AF00    R      MOV    R7,err
0253 22             RET    

            ; FUNCTION resetpfpm (END)

            ; FUNCTION _blackout (BEGIN)
              ; Register R6R7 is assigned to parameter i
              ; R3 is assigned to c
                                           ; SOURCE LINE # 155 
0000 EE             MOV    A,R6
0001 6480           XRL    A,#080H
0003 701B           JNZ    ?ELSE98
                                           ; SOURCE LINE # 156 
0005 EF             MOV    A,R7
0006 FB             MOV    R3,A
                                           ; SOURCE LINE # 157 
0007 6011           JZ     ?LAB95
0009 6401           XRL    A,#001H
000B 600D           JZ     ?LAB95
000D EB             MOV    A,R3
000E B47000         CJNE   A,#070H,?LAB99
0011         ?LAB99:
0011 400A           JC     ?ELSE99
0013 EB             MOV    A,R3
0014 B47D01         CJNE   A,#07DH,?LAB101
0017 D3             SETB   C
0018         ?LAB101:
0018 5003           JNC    ?ELSE99
001A         ?LAB95:
001A 7F01           MOV    R7,#001H
001C 22             RET    
001D         ?ELSE99:
001D E4             CLR    A
001E FF             MOV    R7,A
001F 22             RET    
0020         ?ELSE98:
                                           ; SOURCE LINE # 158 
0020 E4             CLR    A
0021 FF             MOV    R7,A
0022 22             RET    

            ; FUNCTION _blackout (END)

            ; FUNCTION _march (BEGIN)
                                           ; SOURCE LINE # 171 
0000 8F00    R      MOV    cpu,R7
              ; R4R5R6R7 is assigned to li
                                           ; SOURCE LINE # 172 
0002 E4             CLR    A
0003 FF             MOV    R7,A
0004 FC             MOV    R4,A
0005 FD             MOV    R5,A
0006 FE             MOV    R6,A
                                           ; SOURCE LINE # 184 
0007 8C00    R      MOV    trial,R4
                                           ; SOURCE LINE # 185 
0009 0F             INC    R7
000A 04             INC    A
000B 7007           SJMP   ?LAB122
000D 7005           JNZ    ?LAB122
000F 0D             INC    R5
0010 ED             MOV    A,R5
0011 7001           JNZ    ?LAB122
0013 0C             INC    R4
0014         ?LAB122:
                                           ; SOURCE LINE # 186 
0014 E4             CLR    A
0015 F500    R      MOV    result,A
                                           ; SOURCE LINE # 187 
0017 F500    R      MOV    mn,A
0019 F500    R      MOV    mn_done,A
001B         ?WHILE35:
                                           ; SOURCE LINE # 188 
001B E500    R      MOV    A,mn_done
001D 6003           JZ     $ + 5
001F 020000  R      LJMP   ?NXT158
                                           ; SOURCE LINE # 189 
0022 E500    R      MOV    A,mn
0024 2430           ADD    A,#030H
0026 FF             MOV    R7,A
0027 120000  R      LCALL  _tx_byte
                                           ; SOURCE LINE # 190 
002A E500    R      MOV    A,mn
002C 75F007         MOV    B,#007H
002F A4             MUL    AB
0030 2400    R      ADD    A,#LOW m+006H
0032 F582           MOV    DPL,A
0034 E4             CLR    A
0035 3400    R      ADDC   A,#HIGH m+006H
0037 F583           MOV    DPH,A
0039 E4             CLR    A
003A 93             MOVC   A,@A+DPTR
003B F500    R      MOV    c,A
                                           ; SOURCE LINE # 191 
003D B45510         CJNE   A,#055H,?ELSE117
0040 E4             CLR    A
0041 F500    R      MOV    b,A
0043 7500FF  R      MOV    e,#0FFH
0046 750001  R      MOV    inc,#001H
0049 F500    R      MOV    bi,A
004B 75007F  R      MOV    ei,#07FH
004E 800E           SJMP   ?NXT159
0050         ?ELSE117:
                                           ; SOURCE LINE # 192 
0050 7500FF  R      MOV    b,#0FFH
0053 E4             CLR    A
0054 F500    R      MOV    e,A
0056 7500FF  R      MOV    inc,#0FFH
0059 75007F  R      MOV    bi,#07FH
005C F500    R      MOV    ei,A
005E         ?NXT159:
                                           ; SOURCE LINE # 193 
005E 850000  R      MOV    p,b
0061 E4             CLR    A
0062 F500    R      MOV    pg_done,A
0064         ?WHILE36:
                                           ; SOURCE LINE # 194 
0064 E500    R      MOV    A,pg_done
0066 6003           JZ     $ + 5
0068 020000  R      LJMP   ?NXT160
                                           ; SOURCE LINE # 195 
006B 120000  R      LCALL  resetpfpm
                                           ; SOURCE LINE # 196 
006E AF00    R      MOV    R7,p
0070 7E00           MOV    R6,#000H
0072 E4             CLR    A
0073 FC             MOV    R4,A
0074 7D80           MOV    R5,#080H
0076 120000  R      LCALL  ?C_IMUL
0079 8E00    R      MOV    pa,R6
007B 8F00    R      MOV    pa+01H,R7
007D E4             CLR    A
007E F500    R      MOV    me,A
0080 F500    R      MOV    me_done,A
                                           ; SOURCE LINE # 197 
0082 E500    R      MOV    A,p
0084 5401           ANL    A,#001H
0086 B40107         CJNE   A,#001H,?NXT161
0089 7F52           MOV    R7,#052H
008B 7D31           MOV    R5,#031H
008D 120000  R      LCALL  _led
0090         ?NXT161:
                                           ; SOURCE LINE # 198 
0090 E500    R      MOV    A,p
0092 20E007         JB     ACC.0,?WHILE37
0095 7F52           MOV    R7,#052H
0097 7D30           MOV    R5,#030H
0099 120000  R      LCALL  _led
009C         ?WHILE37:
                                           ; SOURCE LINE # 199 
009C E500    R      MOV    A,me_done
009E 6003           JZ     $ + 5
00A0 020000  R      LJMP   ?NXT163
                                           ; SOURCE LINE # 200 
00A3 E500    R      MOV    A,mn
00A5 75F007         MOV    B,#007H
00A8 A4             MUL    AB
00A9 2400    R      ADD    A,#LOW m
00AB F582           MOV    DPL,A
00AD E4             CLR    A
00AE 3400    R      ADDC   A,#HIGH m
00B0 F583           MOV    DPH,A
00B2 E500    R      MOV    A,me
00B4 2582           ADD    A,DPL
00B6 F582           MOV    DPL,A
00B8 E4             CLR    A
00B9 3583           ADDC   A,DPH
00BB F583           MOV    DPH,A
00BD E4             CLR    A
00BE 93             MOVC   A,@A+DPTR
00BF F500    R      MOV    op,A
                                           ; SOURCE LINE # 201 
00C1 E500    R      MOV    A,op
00C3 600B           JZ     ?LAB125
00C5 E500    R      MOV    A,op
00C7 6455           XRL    A,#055H
00C9 6005           JZ     ?LAB125
00CB E500    R      MOV    A,op
00CD B44403         CJNE   A,#044H,?NXT164
00D0         ?LAB125:
00D0 750001  R      MOV    me_done,#001H
00D3         ?NXT164:
                                           ; SOURCE LINE # 202 
00D3 E500    R    

⌨️ 快捷键说明

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