📄 test_sim.lst
字号:
00134
00135 ;------------------------------------------------
Message[305]: Using default destination of 1 (file).
0067 08A1 00136 MOVF CARD_FLAG
00137 JNZ CL_INS
0068 1D03 M BTFSS 3H,2
0069 288B M GOTO CL_INS
00138
00139 CMP CLA,0A0H
006A 30A0 M MOVLW 0A0H
006B 020C M SUBWF CLA,W
00140 JNZ BAD_CLA
MPASM 02.13 Released TEST_SIM.ASM 6-15-1999 11:47:43 PAGE 11
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
006C 1D03 M BTFSS 3H,2
006D 28AE M GOTO BAD_CLA
00141
00142 ;================================= CLA A0
00143 CMP INS,0A4H
006E 30A4 M MOVLW 0A4H
006F 020D M SUBWF INS,W
00144 JE SELECT_FILE
0070 1903 M BTFSC 3H,2
0071 2935 M GOTO SELECT_FILE
00145
00146 CMP INS,20H
0072 3020 M MOVLW 20H
0073 020D M SUBWF INS,W
00147 JE VERIFY_PIN
0074 1903 M BTFSC 3H,2
0075 29F0 M GOTO VERIFY_PIN
00148
00149 CMP INS,0B0H
0076 30B0 M MOVLW 0B0H
0077 020D M SUBWF INS,W
00150 JE READ_BIN
0078 1903 M BTFSC 3H,2
0079 29CF M GOTO READ_BIN
00151
00152 CMP INS,0C0H
007A 30C0 M MOVLW 0C0H
007B 020D M SUBWF INS,W
00153 JE SEND_RESPONSE
007C 1903 M BTFSC 3H,2
007D 297F M GOTO SEND_RESPONSE
00154
00155 CMP INS,0D6H
007E 30D6 M MOVLW 0D6H
007F 020D M SUBWF INS,W
00156 JE DUMB_READ
0080 1903 M BTFSC 3H,2
0081 2897 M GOTO DUMB_READ
00157
00158 CMP INS,0DCH
0082 30DC M MOVLW 0DCH
0083 020D M SUBWF INS,W
00159 JE DUMB_READ
0084 1903 M BTFSC 3H,2
0085 2897 M GOTO DUMB_READ
00160
00161 CMP INS,0FAH ;sleep
0086 30FA M MOVLW 0FAH
0087 020D M SUBWF INS,W
00162 JE OK_END
0088 1903 M BTFSC 3H,2
0089 28B2 M GOTO OK_END
00163
MPASM 02.13 Released TEST_SIM.ASM 6-15-1999 11:47:43 PAGE 12
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00164 JMP BAD_INS
008A 28B0 M GOTO BAD_INS
00165
00166 ;======================================
00167
00168 CL_INS CMP INS,20H
008B 3020 M MOVLW 20H
008C 020D M SUBWF INS,W
00169 JE VERIFY_PIN
008D 1903 M BTFSC 3H,2
008E 29F0 M GOTO VERIFY_PIN
00170
00171 CMP INS,0B0H
008F 30B0 M MOVLW 0B0H
0090 020D M SUBWF INS,W
00172 JE CL_READ_BIN
0091 1903 M BTFSC 3H,2
0092 2A2D M GOTO CL_READ_BIN
00173
00174 CMP INS,0D0H
0093 30D0 M MOVLW 0D0H
0094 020D M SUBWF INS,W
00175 JNE BAD_INS
0095 1D03 M BTFSS 3H,2
0096 28B0 M GOTO BAD_INS
00176
00177 ;======================================
0097 209C 00178 DUMB_READ CALL SEND_INS
00179
0098 20BB 00180 NEX_CLWR CALL GET_BYTE
00181 DJNZ P3,NEX_CLWR
0099 0B90 M DECFSZ P3,1
009A 2898 M GOTO NEX_CLWR
00182
00183 JMP OK_END
009B 28B2 M GOTO OK_END
00184 ;======================================
00185
009C 2132 00186 SEND_INS CALL WAIT
009D 080D 00187 MOVF INS,W
00188 JMP SEND_BYTE
009E 28EB M GOTO SEND_BYTE
00189
00190 ;======================================
00191
00192
00193
00194 ;======================================
00195 ; d1=data bafer
00196 ; r7=count
00197 ;--------------------------------------
00198 READ_DATA MOVLF FSR,D1
009F 3030 M MOVLW D1
MPASM 02.13 Released TEST_SIM.ASM 6-15-1999 11:47:43 PAGE 13
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00A0 0084 M MOVWF FSR
00199 ;--------------------------------------
00200 ; fsr=addr
00201 ; r7=count
00202 ;--------------------------------------
00A1 20BB 00203 READ__DATA CALL GET_BYTE
00A2 0080 00204 MOVWF 0
Message[305]: Using default destination of 1 (file).
00A3 0A84 00205 INCF FSR
00206 DJNZ R7,READ__DATA
00A4 0B93 M DECFSZ R7,1
00A5 28A1 M GOTO READ__DATA
00207 RET
00A6 0008 M RETURN
00208 ;--------------------------------------
00209
00210
00A7 306B 00211 BAD_P1P2 MOVLW 6BH ;6b00h
00212 JMP SEND_ANS0
00A8 28B3 M GOTO SEND_ANS0
00213
00A9 3067 00214 BAD_P3 MOVLW 67H ;6700h
00215 JMP SEND_ANS0
00AA 28B3 M GOTO SEND_ANS0
00216
00217 ERR_9408 MOVLF R0,8
00AB 3008 M MOVLW 8
00AC 008C M MOVWF R0
00218 JMP SEND_94
00AD 2970 M GOTO SEND_94
00219
00AE 306E 00220 BAD_CLA MOVLW 6EH
00221 JMP SEND_ANS0
00AF 28B3 M GOTO SEND_ANS0
00222
00B0 306D 00223 BAD_INS MOVLW 6DH
00224 JMP SEND_ANS0
00B1 28B3 M GOTO SEND_ANS0
00225
00B2 00226 OK_END
00B2 3090 00227 SEND_OK MOVLW 90H
00228 SEND_ANS0 CLR R0
M IF R0==1000
M CLRW
M ELSE
00B3 018C M CLRF R0
M ENDIF
00229
00B4 009D 00230 SEND_ANSWER MOVWF TEMP_TX
00B5 2132 00231 CALL WAIT
00B6 081D 00232 MOVF TEMP_TX,W
00B7 20EB 00233 CALL SEND_BYTE
00B8 080C 00234 MOVF R0,W
MPASM 02.13 Released TEST_SIM.ASM 6-15-1999 11:47:43 PAGE 14
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00B9 20EB 00235 CALL SEND_BYTE
00236 JMP MAIN
00BA 2860 M GOTO MAIN
00237
00238
00239
00240
00241
00242
00243
00244
00245
00246 ;***************************************
00247 ; RET w=char
00248 ;---------------------------------------
00249 GET_BYTE BANK1
00BB 1683 M BSF STATUS,RP0
Message[302]: Register in operand not in bank 0. Ensure that bank bits are correct.
00BC 1786 00250 BSF TRIS_B,7 ;in
00251 BANK0
00BD 1283 M BCF STATUS,RP0
00252
00253
00254 L_LEV JNB PORT_B,7,L_LEV ;wait for H
00BE 1F86 M BTFSS PORT_B,7
00BF 28BE M GOTO L_LEV
00255 H_LEV JB PORT_B,7,H_LEV ;wait for L (start impuls)
00C0 1B86 M BTFSC PORT_B,7
00C1 28C0 M GOTO H_LEV
00256
00257 MOVLF RXTX_COUNT,9
00C2 3009 M MOVLW 9
00C3 009B M MOVWF RXTX_COUNT
00C4 109A 00258 BCF ISO_FLEG,1 ;reset parity fleg
00259 JB PORT_B,7,H_LEV ;wait for L
00C5 1B86 M BTFSC PORT_B,7
00C6 28C0 M GOTO H_LEV
00260
00C7 2124 00261 CALL WAIT05 ;[372/4/2-9] wait to midle of start impuls
00262
00C8 181A 00263 NEX_RX_BIT BTFSC ISO_FLEG,0 ;1(2)
Message[305]: Using default destination of 1 (file).
00C9 0D9C 00264 RLF RX_REG ;1(0)
00CA 1C1A 00265 BTFSS ISO_FLEG,0 ;2(1)
Message[305]: Using default destination of 1 (file).
00CB 0C9C 00266 RRF RX_REG ;0(1)
00267
00CC 212A 00268 CALL WAIT1 ;2 [372/4-15]
00269
00270 JNB PORT_B,7,LOW_L ;2(3)
00CD 1F86 M BTFSS PORT_B,7
00CE 28DE M GOTO LOW_L
00271 ;--------------------------
MPASM 02.13 Released TEST_SIM.ASM 6-15-1999 11:47:43 PAGE 15
LOC OBJECT CODE LINE SOURCE TEXT
VALUE
00CF 3002 00272 MOVLW 2 ;1
Message[305]: Using default destination of 1 (file).
00D0 069A 00273 XORWF ISO_FLEG ;1 ;parity
00274
00D1 0000 00275 NOP ;1
00276 STC ;1
00D2 1403 M BSF 3,0
00277 LOW_E DJNZ RXTX_COUNT,NEX_RX_BIT ;3
00D3 0B9B M DECFSZ RXTX_COUNT,1
00D4 28C8 M GOTO NEX_RX_BIT
00278
00D5 0C1A 00279 RRF ISO_FLEG,W
00D6 061A 00280 XORWF ISO_FLEG,W
00D7 3901 00281 ANDLW 1
00282 JNZ BAD_PARITY
00D8 1D03 M BTFSS 3H,2
00D9 28E0 M GOTO BAD_PARITY
00283
00DA 181A 00284 BTFSC ISO_FLEG,0
Message[305]: Using default destination of 1 (file).
00DB 099C 00285 COMF RX_REG
00DC 081C 00286 MOVF RX_REG,W
00287 RET
00DD 0008 M RETURN
00288
00289 LOW_L CLC ;1
00DE 1003 M BCF 3,0
00290 JMP LOW_E ;2
00DF 28D3 M GOTO LOW_E
00291
00292
00E0 212A 00293 BAD_PARITY CALL WAIT1
00294
00295 BANK1
00E1 1683 M BSF STATUS,RP0
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -