📄 define data struct.lst
字号:
; SOURCE LINE # 101
0028 0500 R INC i
002A E500 R MOV A,i
002C B406D4 CJNE A,#006H,?FOR7
; SOURCE LINE # 105
002F 7F06 MOV R7,#006H
0031 120000 R LCALL _tlc1543
0034 8E04 MOV AR4,R6
0036 8F05 MOV AR5,R7
0038 900000 R MOV DPTR,#crate+04H
003B E0 MOVX A,@DPTR
003C FE MOV R6,A
003D A3 INC DPTR
003E E0 MOVX A,@DPTR
003F FF MOV R7,A
0040 120000 R LCALL ?C_IMUL
0043 EE MOV A,R6
0044 900000 R MOV DPTR,#adin+0CH
0047 F0 MOVX @DPTR,A
0048 A3 INC DPTR
0049 EF MOV A,R7
004A F0 MOVX @DPTR,A
; SOURCE LINE # 106
004B 7F08 MOV R7,#008H
004D 120000 R LCALL _tlc1543
0050 8E04 MOV AR4,R6
0052 8F05 MOV AR5,R7
0054 900000 R MOV DPTR,#crate+02H
0057 E0 MOVX A,@DPTR
0058 FE MOV R6,A
0059 A3 INC DPTR
005A E0 MOVX A,@DPTR
005B FF MOV R7,A
005C 120000 R LCALL ?C_IMUL
005F EE MOV A,R6
0060 900000 R MOV DPTR,#adin+0EH
0063 F0 MOVX @DPTR,A
0064 A3 INC DPTR
0065 EF MOV A,R7
0066 F0 MOVX @DPTR,A
; SOURCE LINE # 107
0067 7F09 MOV R7,#009H
0069 120000 R LCALL _tlc1543
006C 8E04 MOV AR4,R6
006E 8F05 MOV AR5,R7
0070 900000 R MOV DPTR,#crate
0073 E0 MOVX A,@DPTR
0074 FE MOV R6,A
0075 A3 INC DPTR
0076 E0 MOVX A,@DPTR
0077 FF MOV R7,A
0078 120000 R LCALL ?C_IMUL
007B EE MOV A,R6
007C 900000 R MOV DPTR,#adin+010H
007F F0 MOVX @DPTR,A
0080 A3 INC DPTR
0081 EF MOV A,R7
0082 F0 MOVX @DPTR,A
0083 22 RET
; FUNCTION getadin (END)
; FUNCTION account (BEGIN)
; SOURCE LINE # 115
0000 AE00 R MOV R6,tlong
0002 AF00 R MOV R7,tlong+01H
0004 E4 CLR A
0005 FC MOV R4,A
0006 7D3C MOV R5,#03CH
0008 120000 R LCALL ?C_UIDIV
000B EC MOV A,R4
000C 4D ORL A,R5
000D 6003 JZ $ + 5
000F 020000 R LJMP ?NXT28
; SOURCE LINE # 118
0012 750000 R MOV i,#000H
0015 ?FOR9:
; SOURCE LINE # 120
0015 E500 R MOV A,i
0017 6480 XRL A,#080H
0019 B48700 CJNE A,#087H,?LAB33
001C ?LAB33:
001C 5073 JNC ?ELSE10
; SOURCE LINE # 122
001E 75F002 MOV B,#002H
0021 E500 R MOV A,i
0023 33 RLC A
0024 95E0 SUBB A,ACC
0026 E500 R MOV A,i
0028 A4 MUL AB
0029 23 RL A
002A 2400 R ADD A,#LOW (today)+005H
002C F582 MOV DPL,A
002E E4 CLR A
002F 3400 R ADDC A,#HIGH (today)+005H
0031 F583 MOV DPH,A
0033 C0E0 PUSH ACC
0035 C082 PUSH DPL
0037 E0 MOVX A,@DPTR
0038 C0E0 PUSH ACC
003A A3 INC DPTR
003B E0 MOVX A,@DPTR
003C C0E0 PUSH ACC
003E E500 R MOV A,i
0040 33 RLC A
0041 E500 R MOV A,i
0043 C3 CLR C
0044 33 RLC A
0045 2400 R ADD A,#LOW (adin)
0047 F582 MOV DPL,A
0049 E4 CLR A
004A 3400 R ADDC A,#HIGH (adin)
004C F583 MOV DPH,A
004E E0 MOVX A,@DPTR
004F C0E0 PUSH ACC
0051 A3 INC DPTR
0052 E0 MOVX A,@DPTR
0053 C0E0 PUSH ACC
0055 75F002 MOV B,#002H
0058 E500 R MOV A,i
005A 33 RLC A
005B 95E0 SUBB A,ACC
005D E500 R MOV A,i
005F A4 MUL AB
0060 23 RL A
0061 2400 R ADD A,#LOW (today)+005H
0063 F582 MOV DPL,A
0065 E4 CLR A
0066 3400 R ADDC A,#HIGH (today)+005H
0068 F583 MOV DPH,A
006A D002 POP AR2
006C A3 INC DPTR
006D E0 MOVX A,@DPTR
006E 2A ADD A,R2
006F FF MOV R7,A
0070 D005 POP AR5
0072 120000 R LCALL ?C_DECDPTR
0075 E0 MOVX A,@DPTR
0076 3D ADDC A,R5
0077 FE MOV R6,A
0078 E4 CLR A
0079 FC MOV R4,A
007A 7D78 MOV R5,#078H
007C 120000 R LCALL ?C_UIDIV
007F D0E0 POP ACC
0081 2F ADD A,R7
0082 FF MOV R7,A
0083 D0E0 POP ACC
0085 3E ADDC A,R6
0086 D082 POP DPL
0088 D083 POP DPH
008A F0 MOVX @DPTR,A
008B A3 INC DPTR
008C EF MOV A,R7
008D F0 MOVX @DPTR,A
008E 020000 R LJMP ?NXT32
0091 ?ELSE10:
; SOURCE LINE # 126
0091 75F002 MOV B,#002H
0094 E500 R MOV A,i
0096 33 RLC A
0097 95E0 SUBB A,ACC
0099 E500 R MOV A,i
009B A4 MUL AB
009C 23 RL A
009D 2400 R ADD A,#LOW (today)+005H
009F F582 MOV DPL,A
00A1 E4 CLR A
00A2 3400 R ADDC A,#HIGH (today)+005H
00A4 F583 MOV DPH,A
00A6 E0 MOVX A,@DPTR
00A7 C0E0 PUSH ACC
00A9 A3 INC DPTR
00AA E0 MOVX A,@DPTR
00AB C0E0 PUSH ACC
00AD E500 R MOV A,i
00AF 33 RLC A
00B0 E500 R MOV A,i
00B2 C3 CLR C
00B3 33 RLC A
00B4 2400 R ADD A,#LOW (adin)
00B6 F582 MOV DPL,A
00B8 E4 CLR A
00B9 3400 R ADDC A,#HIGH (adin)
00BB F583 MOV DPH,A
00BD D007 POP AR7
00BF D0F0 POP B
00C1 E0 MOVX A,@DPTR
00C2 B5F008 CJNE A,B,?LAB35
00C5 8FF0 MOV B,R7
00C7 A3 INC DPTR
00C8 E0 MOVX A,@DPTR
00C9 B50701 CJNE A,AR7,?LAB35
00CC D3 SETB C
00CD ?LAB35:
00CD 4038 JC ?ELSE11
00CF E500 R MOV A,i
00D1 33 RLC A
00D2 E500 R MOV A,i
00D4 C3 CLR C
00D5 33 RLC A
00D6 2400 R ADD A,#LOW (adin)
00D8 F582 MOV DPL,A
00DA E4 CLR A
00DB 3400 R ADDC A,#HIGH (adin)
00DD F583 MOV DPH,A
00DF E0 MOVX A,@DPTR
00E0 C0E0 PUSH ACC
00E2 A3 INC DPTR
00E3 E0 MOVX A,@DPTR
00E4 C0E0 PUSH ACC
00E6 75F002 MOV B,#002H
00E9 E500 R MOV A,i
00EB 33 RLC A
00EC 95E0 SUBB A,ACC
00EE E500 R MOV A,i
00F0 A4 MUL AB
00F1 23 RL A
00F2 2400 R ADD A,#LOW (today)+005H
00F4 F582 MOV DPL,A
00F6 E4 CLR A
00F7 3400 R ADDC A,#HIGH (today)+005H
00F9 F583 MOV DPH,A
00FB A3 INC DPTR
00FC D0E0 POP ACC
00FE F0 MOVX @DPTR,A
00FF 120000 R LCALL ?C_DECDPTR
0102 D0E0 POP ACC
0104 F0 MOVX @DPTR,A
0105 8071 SJMP ?NXT32
0107 ?ELSE11:
; SOURCE LINE # 127
0107 75F002 MOV B,#002H
010A E500 R MOV A,i
010C 33 RLC A
010D E500 R MOV A,i
010F A4 MUL AB
0110 C3 CLR C
0111 33 RLC A
0112 2400 R ADD A,#LOW (today)+003H
0114 F582 MOV DPL,A
0116 E4 CLR A
0117 3400 R ADDC A,#HIGH (today)+003H
0119 F583 MOV DPH,A
011B E0 MOVX A,@DPTR
011C C0E0 PUSH ACC
011E A3 INC DPTR
011F E0 MOVX A,@DPTR
0120 C0E0 PUSH ACC
0122 E500 R MOV A,i
0124 33 RLC A
0125 E500 R MOV A,i
0127 C3 CLR C
0128 33 RLC A
0129 2400 R ADD A,#LOW (adin)
012B F582 MOV DPL,A
012D E4 CLR A
012E 3400 R ADDC A,#HIGH (adin)
0130 F583 MOV DPH,A
0132 D007 POP AR7
0134 D0F0 POP B
0136 E0 MOVX A,@DPTR
0137 B5F007 CJNE A,B,?LAB37
013A 8FF0 MOV B,R7
013C A3 INC DPTR
013D E0 MOVX A,@DPTR
013E B50700 CJNE A,AR7,?LAB37
0141 ?LAB37:
0141 5035 JNC ?NXT32
0143 E500 R MOV A,i
0145 33 RLC A
0146 E500 R MOV A,i
0148 C3 CLR C
0149 33 RLC A
014A 2400 R ADD A,#LOW (adin)
014C F582 MOV DPL,A
014E E4 CLR A
014F 3400 R ADDC A,#HIGH (adin)
0151 F583 MOV DPH,A
0153 E0 MOVX A,@DPTR
0154 C0E0 PUSH ACC
0156 A3 INC DPTR
0157 E0 MOVX A,@DPTR
0158 C0E0 PUSH ACC
015A 75F002 MOV B,#002H
015D E500 R MOV A,i
015F 33 RLC A
0160 E500 R MOV A,i
0162 A4 MUL AB
0163 C3 CLR C
0164 33 RLC A
0165 2400 R ADD A,#LOW (today)+003H
0167 F582 MOV DPL,A
0169 E4 CLR A
016A 3400 R ADDC A,#HIGH (today)+003H
016C F583 MOV DPH,A
016E A3 INC DPTR
016F D0E0 POP ACC
0171 F0 MOVX @DPTR,A
0172 120000 R LCALL ?C_DECDPTR
0175 D0E0 POP ACC
0177 F0 MOVX @DPTR,A
0178 ?NXT32:
; SOURCE LINE # 130
0178 75F002 MOV B,#002H
017B E500 R MOV A,i
017D 33 RLC A
017E E500 R MOV A,i
0180 A4 MUL AB
0181 C3 CLR C
0182 33 RLC A
0183 2400 R ADD A,#LOW (today)+003H
0185 F582 MOV DPL,A
0187 E4 CLR A
0188 3400 R ADDC A,#HIGH (today)+003H
018A F583 MOV DPH,A
018C E0 MOVX A,@DPTR
018D C0E0 PUSH ACC
018F A3 INC DPTR
0190 E0 MOVX A,@DPTR
0191 C0E0 PUSH ACC
0193 E500 R MOV A,i
0195 33 RLC A
0196 E500 R MOV A,i
0198 C3 CLR C
0199 33 RLC A
019A 2400 R ADD A,#LOW (adin)
019C F582 MOV DPL,A
019E E4 CLR A
019F 3400 R ADDC A,#HIGH (adin)
01A1 F583 MOV DPH,A
01A3 D007 POP AR7
01A5 D0F0 POP B
01A7 E0 MOVX A,@DPTR
01A8 B5F008 CJNE A,B,?LAB39
01AB 8FF0 MOV B,R7
01AD A3 INC DPTR
01AE E0 MOVX A,@DPTR
01AF B50701 CJNE A,AR7,?LAB39
01B2 D3 SETB C
01B3 ?LAB39:
01B3 4035 JC ?NXT31
01B5 E500 R MOV A,i
01B7 33 RLC A
01B8 E500 R MOV A,i
01BA C3 CLR C
01BB 33 RLC A
01BC 2400 R ADD A,#LOW (adin)
01BE F582 MOV DPL,A
01C0 E4 CLR A
01C1 3400 R ADDC A,#HIGH (adin)
01C3 F583 MOV DPH,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -