📄 mag.asm
字号:
LCALL L?0266
CJNE A,#0EH,?C0050
?C0051:
MOV R0,#LOW (inv_tmp_day)
MOV R4,#HIGH (inv_tmp_day)
MOV R2,#HIGH (declare_tmp_data+0CH)
MOV R1,#LOW (declare_tmp_data+0CH)
MOV R7,#04H
LCALL L?0243
MOV R0,#LOW (inv_tmp_day+06H)
MOV R4,#HIGH (inv_tmp_day+06H)
MOV R2,#HIGH (declare_tmp_data+014H)
MOV R1,#LOW (declare_tmp_data+014H)
MOV R7,#050H
LCALL L?0243
CLR A
MOV i?357,A
?C0053:
MOV A,i?357
MOV B,#04H
MUL AB
ADD A,#LOW (declare_tmp_data+01EH)
MOV R1,A
MOV A,#HIGH (declare_tmp_data+01EH)
ADDC A,B
MOV R2,A
MOV R3,#01H
PUSH AR1
LCALL L?0291
ADD A,#LOW (inv_tmp_day+010H)
MOV R1,A
MOV A,#HIGH (inv_tmp_day+010H)
ADDC A,B
MOV R0,AR1
MOV R4,A
MOV R5,#01H
POP AR1
MOV R6,#00H
MOV R7,#04H
LCALL ?C?COPY
MOV A,i?357
MOV B,#04H
MUL AB
ADD A,#LOW (declare_tmp_data+036H)
MOV R1,A
MOV A,#HIGH (declare_tmp_data+036H)
ADDC A,B
MOV R2,A
MOV R3,#01H
PUSH AR1
LCALL L?0291
ADD A,#LOW (inv_tmp_day+014H)
MOV R1,A
MOV A,#HIGH (inv_tmp_day+014H)
ADDC A,B
MOV R0,AR1
MOV R4,A
MOV R5,#01H
POP AR1
MOV R6,#00H
MOV R7,#04H
LCALL ?C?COPY
INC i?357
MOV A,i?357
CJNE A,#06H,?C0053
?C0054:
MOV R3,#01H
MOV R2,#HIGH (declare_tmp_data+08H)
MOV R1,#LOW (declare_tmp_data+08H)
LCALL _BcdToAsc
CLR A
MOV i?357,A
?C0056:
LCALL L?0284
MOV A,#LOW (prn_page_buf+057H)
ADD A,i?357
MOV DPL,A
CLR A
ADDC A,#HIGH (prn_page_buf+057H)
LCALL L?0267
CJNE A,#08H,?C0056
?C0046:
MOV R3,#01H
MOV R2,#HIGH (inv_tmp_day)
MOV R1,#LOW (inv_tmp_day)
LCALL _BcdToAsc
CLR A
MOV i?357,A
?C0059:
LCALL L?0284
MOV A,#LOW (prn_page_buf+07BH)
ADD A,i?357
MOV DPL,A
CLR A
ADDC A,#HIGH (prn_page_buf+07BH)
LCALL L?0267
CJNE A,#08H,?C0059
?C0060:
MOV DPTR,#prn_page_buf+082H
MOVX A,@DPTR
MOV DPTR,#prn_page_buf+084H
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+081H
MOVX A,@DPTR
MOV DPTR,#prn_page_buf+083H
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+082H
MOV A,#02DH
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+080H
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+07FH
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+07FH
MOV A,#02DH
MOVX @DPTR,A
CLR A
MOV i?357,A
?C0062:
MOV A,i?357
MOV B,#090H
MUL AB
ADD A,#LOW (prn_page_buf+018CH)
MOV R1,A
MOV A,#HIGH (prn_page_buf+018CH)
ADDC A,B
MOV R0,AR1
MOV R4,A
MOV R2,#HIGH (prn_page_buf+0FCH)
MOV R1,#LOW (prn_page_buf+0FCH)
LCALL L?0251
INC i?357
MOV A,i?357
CJNE A,#05H,?C0062
?C0063:
MOV i?357,#015H
?C0065:
MOV j?358,#04H
?C0068:
LCALL L?0256
LCALL L?0242
MOV A,#020H
MOVX @DPTR,A
INC j?358
MOV A,j?358
CJNE A,#022H,?C0068
?C0067:
INC i?357
MOV A,i?357
CJNE A,#024H,?C0065
?C0066:
MOV i?357,#01H
?C0071:
LCALL L?0261
MOV R7,A
SETB C
SUBB A,#09H
JNC ?C0074
MOV A,R7
ADD A,#030H
LCALL L?0246
ADD A,#LOW (prn_page_buf+076H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+076H)
SJMP ?C0225
?C0074:
LCALL L?0261
MOV B,#0AH
DIV AB
ADD A,#030H
LCALL L?0246
ADD A,#LOW (prn_page_buf+076H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+076H)
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0262
MOV B,#0AH
DIV AB
MOV A,B
ADD A,#030H
LCALL L?0246
ADD A,#LOW (prn_page_buf+077H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+077H)
?C0225:
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
?C0075:
LCALL L?0292
ADD A,#LOW (inv_tmp_day+08H)
MOV R1,A
MOV A,#HIGH (inv_tmp_day+08H)
LCALL L?0255
CLR A
MOV j?358,A
?C0076:
LCALL L?0244
ADD A,#LOW (prn_page_buf+0A0H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0A0H)
MOV DPH,A
MOV A,DPL
ADD A,j?358
LCALL L?0242
MOV A,R7
MOVX @DPTR,A
INC j?358
MOV A,j?358
CJNE A,#0AH,?C0076
?C0077:
LCALL L?0247
ADD A,#LOW (prn_page_buf+0A9H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0A9H)
LCALL L?0245
ADD A,#LOW (prn_page_buf+0AAH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0AAH)
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0247
ADD A,#LOW (prn_page_buf+0A8H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0A8H)
LCALL L?0245
ADD A,#LOW (prn_page_buf+0A9H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0A9H)
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0247
ADD A,#LOW (prn_page_buf+0A8H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0A8H)
MOV DPH,A
MOV A,#02EH
MOVX @DPTR,A
LCALL L?0292
ADD A,#LOW (inv_tmp_day+0CH)
MOV R1,A
MOV A,#HIGH (inv_tmp_day+0CH)
LCALL L?0255
CLR A
MOV j?358,A
?C0079:
LCALL L?0244
ADD A,#LOW (prn_page_buf+0C4H)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0C4H)
MOV DPH,A
MOV A,DPL
ADD A,j?358
LCALL L?0242
MOV A,R7
MOVX @DPTR,A
INC j?358
MOV A,j?358
CJNE A,#0AH,?C0079
?C0080:
LCALL L?0247
ADD A,#LOW (prn_page_buf+0CDH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0CDH)
LCALL L?0245
ADD A,#LOW (prn_page_buf+0CEH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0CEH)
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0247
ADD A,#LOW (prn_page_buf+0CCH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0CCH)
LCALL L?0245
ADD A,#LOW (prn_page_buf+0CDH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0CDH)
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0247
ADD A,#LOW (prn_page_buf+0CCH)
MOV DPL,A
MOV A,B
ADDC A,#HIGH (prn_page_buf+0CCH)
MOV DPH,A
MOV A,#02EH
MOVX @DPTR,A
INC i?357
MOV A,i?357
CLR C
SUBB A,#07H
JNC $ + 5H
LJMP ?C0071
?C0072:
MOV A,n?356
CJNE A,#01H,?C0082
MOV DPTR,#inv_tmp_day+04H
MOVX A,@DPTR
MOV R6,A
INC DPTR
MOVX A,@DPTR
MOV R7,A
CLR A
MOV ttt?359+03H,R7
MOV ttt?359+02H,R6
MOV ttt?359+01H,A
MOV ttt?359,A
MOV ?_long_to_asc?BYTE+04H,A
SJMP ?C0226
?C0082:
MOV DPTR,#declare_tmp_data+010H
LCALL L?0232
LCALL L?0294
?C0226:
LCALL L?0259
MOV R2,#HIGH (prn_page_buf+0A0H)
MOV R1,#LOW (prn_page_buf+0A0H)
MOV R5,#0AH
LCALL _long_to_asc
CLR A
MOV j?358,A
?C0084:
LCALL L?0295
MOVX A,@DPTR
CJNE A,#030H,?C0085
?C0087:
LCALL L?0295
MOV A,#020H
MOVX @DPTR,A
INC j?358
MOV A,j?358
CJNE A,#0AH,?C0084
?C0085:
MOV DPTR,#inv_tmp_day+06H
LCALL L?0258
MOV R2,#HIGH (prn_page_buf+0C4H)
MOV R1,#LOW (prn_page_buf+0C4H)
MOV R5,#0AH
LCALL _long_to_asc
MOV DPTR,#inv_tmp_day+08H
LCALL L?0258
MOV R2,#HIGH (prn_page_buf+0E8H)
MOV R1,#LOW (prn_page_buf+0E8H)
MOV R5,#0AH
LCALL _long_to_asc
MOV A,n?356
XRL A,#01H
JNZ $ + 5H
LJMP ?C0088
MOV DPTR,#declare_tmp_data+04EH
LCALL L?0232
LCALL L?0294
LCALL L?0259
MOV R2,#HIGH (prn_page_buf+0448H)
MOV R1,#LOW (prn_page_buf+0448H)
MOV R5,#0AH
LCALL _long_to_asc
MOV i?357,#010H
?C0089:
LCALL L?0296
MOVX A,@DPTR
CJNE A,#030H,?C0090
?C0092:
LCALL L?0296
MOV A,#020H
MOVX @DPTR,A
?C0091:
INC i?357
MOV A,i?357
CJNE A,#01CH,?C0089
?C0090:
MOV DPTR,#prn_page_buf+0451H
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+0450H
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+0450H
MOV A,#02EH
MOVX @DPTR,A
MOV R0,#LOW (prn_page_buf+090H)
MOV R4,#HIGH (prn_page_buf+090H)
MOV R2,#HIGH (declare+095H)
MOV R1,#LOW (declare+095H)
MOV R7,#013H
LCALL L?0236
MOV ?_long_to_asc?BYTE+04H,#01H
MOV ?_long_to_asc?BYTE+05H,#HIGH (declare_tmp_data+052H)
MOV ?_long_to_asc?BYTE+06H,#LOW (declare_tmp_data+052H)
MOV R3,#01H
MOV R2,#HIGH (prn_page_buf+046CH)
MOV R1,#LOW (prn_page_buf+046CH)
MOV R5,#0AH
LCALL _long_to_asc
MOV i?357,#010H
?C0094:
LCALL L?0297
MOVX A,@DPTR
CJNE A,#030H,?C0095
?C0097:
LCALL L?0297
MOV A,#020H
MOVX @DPTR,A
?C0096:
INC i?357
MOV A,i?357
CJNE A,#01CH,?C0094
?C0095:
MOV DPTR,#prn_page_buf+0475H
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+0474H
MOVX A,@DPTR
INC DPTR
MOVX @DPTR,A
MOV DPTR,#prn_page_buf+0474H
MOV A,#02EH
MOVX @DPTR,A
MOV R0,#LOW (prn_page_buf+045CH)
MOV R4,#HIGH (prn_page_buf+045CH)
MOV R3,#0FFH
MOV R2,#HIGH (declare+0A8H)
MOV R1,#LOW (declare+0A8H)
MOV R7,#011H
LCALL L?0269
MOV R0,#LOW (prn_page_buf+0438H)
MOV R4,#HIGH (prn_page_buf+0438H)
MOV R2,#HIGH (declare+0A8H)
MOV R1,#LOW (declare+0A8H)
MOV R7,#011H
LCALL L?0299
MOV DPTR,#prn_page_buf+043EH
MOV A,#0D5H
MOVX @DPTR,A
INC DPTR
MOV A,#0FDH
MOVX @DPTR,A
CLR A
MOV i?357,A
?C0099:
LCALL L?0300
MOV DPH,A
MOVX A,@DPTR
SWAP A
ANL A,#0FH
ADD A,#030H
MOV R7,A
MOV A,i?357
LCALL L?0278
MOV A,#LOW (prn_page_buf+034H)
ADD A,R5
MOV DPL,A
MOV A,#HIGH (prn_page_buf+034H)
ADDC A,R4
MOV DPH,A
MOV A,R7
MOVX @DPTR,A
LCALL L?0300
LCALL L?0287
MOV A,#LOW (prn_page_buf+035H)
ADD A,R5
MOV DPL,A
MOV A,#HIGH (prn_page_buf+035H)
ADDC A,R4
LCALL L?0267
CJNE A,#08H,?C0099
?C0100:
MOV R7,#06H
MOV R2,#HIGH (prn_page_buf+09CH)
MOV R1,#LOW (prn_page_buf+09CH)
LCALL L?0260
?C0088:
MOV A,n?356
CJNE A,#02H,?C0102
MOV R0,#LOW (prn_page_buf+014H)
MOV R4,#HIGH (prn_page_buf+014H)
SJMP ?C0227
?C0102:
MOV R0,#LOW (prn_page_buf+038H)
MOV R4,#HIGH (prn_page_buf+038H)
?C0227:
LCALL L?0235
?C0103:
MOV j?358,#04H
?C0104:
MOV i?357,#010H
?C0107:
LCALL L?0256
LCALL L?0242
MOVX A,@DPTR
CJNE A,#030H,?C0106
?C0110:
LCALL L?0257
LCALL L?0242
MOV A,#020H
MOVX @DPTR,A
?C0109:
INC i?357
MOV A,i?357
CJNE A,#017H,?C0107
?C0106:
INC j?358
MOV A,j?358
CJNE A,#020H,?C0104
?C0112:
RET
L?0255:
ADDC A,B
MOV ?_long_to_asc?BYTE+04H,#01H
MOV ?_long_to_asc?BYTE+05H,A
MOV ?_long_to_asc?BYTE+06H,R1
MOV R3,#01H
MOV R2,#HIGH (databuf)
MOV R1,#LOW (databuf)
MOV R5,#0AH
LCALL _long_to_asc
RET
RSEG ?PR?DailyCHK?MAG
DailyCHK:
USING 0
MOV DPTR,#tt0?462
LCALL ?C?LSTKXDATA
DB 00H
DB 00H
DB 00H
DB 00H
MOV DPTR,#tt1?461
LCALL ?C?LSTKXDATA
DB 00H
DB 00H
DB 00H
DB 00H
LCALL cls
MOV R2,#HIGH (?SC_0)
MOV R1,#LOW (?SC_0)
LCALL L?0289
MOV R2,#HIGH (?SC_22)
MOV R1,#LOW (?SC_22)
MOV R5,#0BAH
LCALL _DisHzLinYm
; 1.打印日交易电子存根,Col1
MOV R3,#0FFH
MOV R2,#HIGH (?SC_40)
MOV R1,#LOW (?SC_40)
MOV R5,#0BCH
LCALL _DisHzLinYm
; 2.显示日交易内容,Col2
MOV R7,#0C0H
MOV R2,#HIGH (inv_tmp_day1)
MOV R1,#LOW (inv_tmp_day1)
LCALL L?0301
; 3.日交易累计,Col3
LCALL GetKey
MOV n?464,keyc
CLR A
MOV DPTR,#F_rs232
MOVX @DPTR,A
LCALL cls
MOV R7,#02H
LCALL _fiscal_check_getadr
MOV A,R7
JZ $ + 5H
LJMP ?C0114
?C0113:
LCALL cls
MOV R3,#0FFH
MOV R2,#HIGH (?SC_54)
MOV R1,#LOW (?SC_54)
MOV R5,#0BAH
LCALL _DisHzLinYm
LCALL L?0230
MOV R7,A
LCALL _rd_buf
MOV R0,#LOW (Hz_Record)
MOV R4,#HIGH (Hz_Record)
MOV R7,#04H
LCALL L?0233
LCALL L?0230
MOV R7,A
LJMP ?C0228
?C0115:
MOV DPTR,#fiscal_ck_index+04H
LCALL L?0232
MOV R7,A
MOV DPTR,#ii?460
MOVX A,@DPTR
MOV R0,A
INC DPTR
MOVX A,@DPTR
MOV R1,A
INC DPTR
MOVX A,@DPTR
MOV R2,A
INC DPTR
MOVX A,@DPTR
MOV R3,A
SETB C
LCALL ?C?ULCMP
JC $ + 5H
LJMP ?C0116
MOV DPTR,#ii?460
LCALL L?0232
MOV R7,A
LCALL _rd_buf
MOV R0,#LOW (inv_tmp_day)
MOV R4,#HIGH (inv_tmp_day)
MOV R7,#051H
LCALL L?0233
MOV DPTR,#inv_tmp_day
MOVX A,@DPTR
XRL A,#020H
JZ ?C0118
MOV DPTR,#ii?460
LCALL L?0232
MOV R3,A
MOV A,R6
MOV R2,A
MOV DPTR,#ii?460
INC DPTR
INC DPTR
INC DPTR
MOVX A,@DPTR
ADD A,#00H
MOV R7,A
CLR A
ADDC A,R6
MOV R6,A
MOV A,R5
ADDC A,#01H
MOV R5,A
CLR A
ADDC A,R4
MOV R4,A
CLR C
MOV A,R7
SUBB A,R3
MOV R7,A
MOV A,R6
SUBB A,R2
MOV R6,A
MOV A,R5
SUBB A,#00H
MOV R5,A
MOV A,R4
SUBB A,#00H
MOV R4,A
MOV DPTR,#ii?460
LCALL ?C?LSTXDATA
LJMP ?C0117
?C0118:
MOV A,n?464
CJNE A,#01H,?C0120
MOV R7,#01H
LCALL _DailyCollectOrDeclareDuty
MOV R7,#022H
LCALL _Prn_Paper1
LCALL FfLine
LCALL FfLine
?C0120:
MOV A,n?464
XRL A,#02H
JNZ ?C0121
MOV R7,#01H
LCALL _DailyCollectOrDeclareDuty
LCALL cls
CLR A
MOV k?465,A
?C0122:
LCALL L?0249
LCALL L?0281
LCALL _DisHzLinYm
MOV A,k?465
ANL A,#03H
JNZ ?C0125
LCALL GetKey
?C0125:
MOV A,keyc
XRL A,#01BH
JNZ $ + 5H
LJMP ?C0114
?C0124:
INC k?465
MOV A,k?465
CLR C
SUBB A,#020H
JC ?C0122
?C0121:
MOV A,n?464
XRL A,#03H
JZ $ + 5H
LJMP ?C0117
MOV DPTR,#inv_tmp_day+06H
MOVX A,@DPTR
MOV R6,A
INC DPTR
MOVX A,@DPTR
MOV R7,A
MOV DPTR,#inv_tmp_day1+07H
MOVX A,@DPTR
ADD A,R7
MOVX @DPTR,A
MOV DPTR,#inv_tmp_day1+06H
MOVX A,@DPTR
ADDC A,R6
MOVX @DPTR,A
MOV DPTR,#inv_tmp_day+04H
MOVX A,@DPTR
MOV R6,A
INC DPTR
MOVX A,@DPTR
MOV R7,A
MOV DPTR,#inv_tmp_day1+05H
MOVX A,@DPTR
ADD A,R7
MOVX @DPTR,A
MOV DPTR,#inv_tmp_day1+04H
MOVX A,@DPTR
ADDC A,R6
MOVX @DPTR,A
MOV DPTR,#inv_tmp_day+08H
MOVX A,@DPTR
MOV R6,A
INC DPTR
MOVX A,@DPTR
MOV R7,A
MOV DPTR,#inv_tmp_day1+09H
MOVX A,@DPTR
ADD A,R7
MOVX @DPTR,A
MOV DPTR,#inv_tmp_day1+08H
MOVX A,@DPTR
ADDC A,R6
MOVX @DPTR,A
CLR A
MOV i?463,A
?C0128:
LCALL L?0276
ADD A,#LOW (inv_tmp_day1+010H)
MOV DPL,A
CLR A
ADDC A,#HIGH (inv_tmp_day1+010H)
MOV DPH,A
PUSH DPH
PUSH DPL
LCALL L?0232
LCALL L?0274
ADD A,#LOW (inv_tmp_day+010H)
MOV DPL,A
CLR A
ADDC A,#HIGH (inv_tmp_day+010H)
LCALL L?0237
POP DPL
POP DPH
LCALL ?C?LSTXDATA
LCALL L?0276
ADD A,#LOW (inv_tmp_day1+014H)
MOV DPL,A
CLR A
ADDC A,#HIGH (inv_tmp_day1+014H)
MOV DPH,A
PUSH DPH
PUSH DPL
LCALL L?0232
LCALL L?0274
ADD A,#LOW (inv_tmp_day+014H)
MOV DPL,A
CLR A
ADDC A,#HIGH (inv_tmp_day+014H)
LCALL L?0237
POP DPL
POP DPH
LCALL L?0302
JNZ ?C0128
?C0117:
MOV DPTR,#ii?460
LCALL L?0232
ADD A,#00H
MOV R7,A
MOV A,R6
ADDC A,#01H
MOV R6,A
CLR A
ADDC A,R5
MOV R5,A
CLR A
ADDC A,R4
MOV R4,A
?C0228:
MOV DPTR,#ii?460
LCALL ?C?LSTXDATA
LJMP ?C0115
?C0116:
MOV A,n?464
XRL A,#03H
JZ $ + 5H
LJMP ?C0114
LCALL cls
MOV R2,#HIGH (?SC_76)
MOV R1,#LOW (?SC_76)
LCALL L?0289
MOV R2,#HIGH (?SC_102)
MOV R1,#LOW (?SC_102)
MOV R5,#0BAH
LCALL _DisHzLinYm
; 1.打印日交易汇总电子存根,Col1
; 2.显示日交易汇总内容,Col2
MOV DPTR,#tt0?462
LCALL ?C?LSTKXDATA
DB 00H
DB 00H
DB 00H
DB 00H
MOV DPTR,#tt1?461
LCALL ?C?LSTKXDATA
DB 00H
DB 00H
DB 00H
DB 00H
CLR A
MOV i?463,A
?C0132:
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -