📄 fm8032.dt
字号:
ORG 00
JMP L0048
ORG 01
L0001:
DISI
MOV 008H,A
SWAP 008H
MOV A,0X03
MOV 009H,A
FMOVFA 0X04,00AH
RBANK0
ROMPAGE0
JMP L0004
ORG 10H
L0002:
L0003:
ADD 0X02,A
RETL 00000011B
RETL 00000100B
RETL 00000101B
RETL 00000110B
RETL 00000111B
RETL 00001110B
RETL 00001101B
RETL 00001100B
RETL 00001011B
L0004:
L0005:
JBS 0X3F,0
JMP L0044
BC 0X3F,0
WDTC
LMOVFA 256-195,0X01
JB 1EH,6,L0044
DJNZ 38H,L0044
LMOVFA 100/50,38H
DJNZ 36H,L0006
BS 1DH,2
L0006:
JNB 1EH,5,L0010
DJNZ 30H,L0009
JNB 0X06,0,L0008
L0007:
BC 0X06,0
LMOVFA 04H,0X05
LMOVFA 1000/50/2,30H
JMP L0009
L0008:
BS 0X06,0
LMOVFA 00DH,0X05
LMOVFA 500/50/2,30H
L0009:
JMP L0044
L0010:
JNB 1CH,3,L0014
DJNZ 30H,L0013
JNB 0X06,0,L0012
L0011:
BC 0X06,0
LMOVFA 04H,0X05
LMOVFA 2000/50/2,30H
JMP L0013
L0012:
BS 0X06,0
LMOVFA 00DH,0X05
LMOVFA 500/50/2,30H
L0013:
JMP L0044
L0014:
L0015:
DJNZ 39H,L0016
BS 1CH,7
L0016:
L0017:
JB 1EH,2,L0018
JB 1EH,1,L0018
JNB 1EH,7,L0019
DJNZ 3AH,L0043
LMOVFA 256-4,00BH
LMOVFA 256-4,00CH
BC 1EH,7
BC 1FH,5
BC 1FH,6
JMP L0043
L0018:
L0019:
JNB 1CH,4,L0025
JB 0X07,6,L0023
BC 0X06,0
BC 0X05,3
BC 0X05,1
BS 0X05,2
DJNZ 30H,L0022
JNB 0X05,0,L0021
L0020:
BC 0X06,0
LMOVFA 04H,0X05
LMOVFA 500/50/2,30H
JMP L0022
L0021:
BC 0X06,0
LMOVFA 05H,0X05
LMOVFA 500/50/2,30H
L0022:
JMP L0024
L0023:
BS 0X06,0
LMOVFA 0X0D,0X05
L0024:
JMP L0042
L0025:
L0026:
JNB 1CH,5,L0030
BS 0X05,2
BC 0X05,1
DJNZ 30H,L0029
JNB 0X06,0,L0028
L0027:
BC 0X05,0
BC 0X06,0
BC 0X05,3
LMOVFA 2000/50/2,30H
JMP L0029
L0028:
BS 0X05,0
BS 0X06,0
BS 0X05,3
LMOVFA 200/50/2,30H
L0029:
JMP L0042
L0030:
L0031:
JNB 1CH,6,L0041
JB 1EH,2,L0032
JNB 1EH,1,L0036
L0032:
BC 0X06,0
BC 0X05,3
BC 0X05,1
BS 0X05,2
DJNZ 30H,L0035
JNB 0X05,0,L0034
L0033:
BC 0X06,0
LMOVFA 04H,0X05
LMOVFA 300/50/2,30H
JMP L0035
L0034:
BC 0X06,0
LMOVFA 05H,0X05
LMOVFA 200/50/2,30H
L0035:
JMP L0041
L0036:
JNB 1BH,0,L0037
BC 0X06,0
LMOVFA 05H,0X05
JMP L0041
L0037:
BS 0X05,0
BS 0X06,0
BS 0X05,3
BC 0X05,1
DJNZ 30H,L0040
JNB 0X05,2,L0039
L0038:
BC 0X05,2
LMOVFA 1000/50/2,30H
JMP L0040
L0039:
BS 0X05,2
LMOVFA 500/50/2,30H
L0040:
JMP L0042
L0041:
L0042:
L0043:
L0044:
L0045:
JBS 0X3F,3
JMP L0046
BC 0X3F,3
BS 1EH,3
L0046:
L0047:
FMOVFA 00AH,0X04
MOV A,009H
MOV 0X03,A
SWAPA 008H
RETI
L0048:
WDTC
DISI
ROMPAGE2
CALL L0306
CALL L0310
RBANK0
CALL L0306
CALL L0319
CALL L0406
ROMPAGE1
LMOVFA 00,00DH
LMOVFA 00,32H
LMOVFA 04,34H
LMOVFA 04,33H
LMOVFA 03FH,31H
CALL L0239
CLR 0X3F
LMOVFA 0CH,31H
L0049:
ROMPAGE1
BS 1EH,6
BC 1EH,7
BC 1FH,5
BC 1EH,5
CALL L0274
CALL L0132
CALL L0300
ROMPAGE2
CALL L0306
LMOVFA 0FFH,20H+3
L0050:
ROMPAGE0
NOP
JNB 0X06,1,L0050
CALL L0069
L0051:
L0052:
L0053:
ROMPAGE0
JNB 1EH,3,L0054
DISI
ROMPAGE1
CALL L0133
ROMPAGE0
ENI
ENI
JNB 1EH,4,L0054
BC 1EH,4
MOV A,20H+3
CJNZ 08H,L0056
L0054:
ENI
NOP
L0055:
JB 0X06,1,L0052
CALL L0074
JB 0X06,1,L0052
L0056:
BC 1EH,6
LMOVFA 04H,0X05
MOV A,@7
CONTW
ROMPAGE1
DISABLEREPEAT
ENABLE5106A14
CALL L0228
CALL L0229
CALL L0242
CALL L0275
CALL L0289
ROMPAGE0
L0057:
NOP
NOP
JNB 0X06,1,L0057
BC 1EH,6
L0058:
CALL L0075
CALL L0075
L0059:
L0060:
ROMPAGE0
LMOVFA 00,00EH
JNB 1EH,3,L0061
DISI
ROMPAGE1
CALL L0133
ENI
CALL L0131
L0061:
ENI
ROMPAGE1
CALL L0167
ROMPAGE0
NOP
ENI
NOP
JNB 1CH,6,L0066
JB 1EH,1,L0062
JNB 1FH,0,L0063
JNB 1DH,2,L0063
BS 1EH,0
L0062:
LMOVFA 16,00EH
JMP L0066
L0063:
JB 1EH,2,L0064
JNB 1FH,1,L0065
JNB 1DH,2,L0065
BS 1EH,0
L0064:
LMOVFA 15,00EH
L0065:
L0066:
ENI
ROMPAGE1
NOP
JMP L0080
NOP
NOP
L0067:
NOP
JNB 1DH,3,L0068
BC 1EH,0
ROMPAGE2
CALL L0364
CALL L0357
BC 1DH,3
ROMPAGE1
CALL L0275
L0068:
ROMPAGE0
NOP
JNB 1EH,6,L0060
JMP L0049
L0069:
CALL L0070
L0070:
CALL L0072
L0071:
CALL L0072
CALL L0073
RET
L0072:
MOV A,@200
JMP L0076
L0073:
MOV A,@100
JMP L0076
L0074:
MOV A,@10
JMP L0076
L0075:
MOV A,@20
L0076:
MOV 3DH,A
L0077:
LMOVFA 200,3EH
L0078:
WDTC
NOP
DJNZ 3EH,L0078
DJNZ 3DH,L0077
RET
L0079:
NOP
RET
ORG 0X400
L0080:
MOV A,00EH
CJNZ 00,L0130
L0081:
MOV A,00EH
CJNE 01,L0085
JB 1EH,5,L0083
L0082:
BS 1EH,5
CALL L0274
BS 0X06,0
LMOVFA 00DH,0X05
LMOVFA 500/50/2,30H
JMP L0084
L0083:
BC 1EH,5
CALL L0275
L0084:
CALL L0298
JMP L0130
L0085:
MOV A,00EH
CJNE 02,L0090
CALL L0232
L0086:
MOV A,00DH
CJNE 00,L0087
CALL L0289
CALL L0274
DISABLEREPEAT
ENABLE5106A14
CALL L0132
CALL L0229
CALL L0243
CALL L0275
CALL L0228
JMP L0089
L0087:
MOV A,00DH
CJNE 01,L0088
CALL L0132
CALL L0241
CALL L0275
CALL L0289
LMOVFA 200/50/2,30H
CALL L0225
JMP L0089
L0088:
CALL L0274
CALL L0240
CALL L0289
LMOVFA 500/50/2,30H
CALL L0226
BS 1DH,3
L0089:
JMP L0130
L0090:
MOV A,00EH
CJNE 03,L0091
CALL L0291
JMP L0130
L0091:
MOV A,00EH
CJNE 04,L0093
JNB 1CH,4,L0092
BS 0X07,2
CALL L0291
BC 0X07,2
CALL L0298
L0092:
JMP L0130
L0093:
MOV A,00EH
CJNE 05,L0100
JNB 1CH,4,L0099
JB 0X07,7,L0095
L0094:
CALL L0274
DISABLEREPEAT
ENABLE5106A14
CALL L0228
BC 1CH,3
CALL L0291
CALL L0298
CALL L0242
CALL L0275
CALL L0289
JMP L0099
L0095:
BS 0X07,0
CALL L0291
JB 1CH,3,L0097
L0096:
BS 1CH,3
BS 0X06,0
LMOVFA 00DH,0X05
LMOVFA 500/50/2,30H
JMP L0098
L0097:
BC 1CH,3
L0098:
BC 0X07,0
L0099:
JMP L0130
L0100:
MOV A,00EH
CJNE 06,L0102
JNB 1CH,4,L0101
BS 0X07,1
CALL L0291
BC 0X07,1
CALL L0298
L0101:
JMP L0130
L0102:
MOV A,00EH
CJNE 07,L0104
JNB 1CH,4,L0103
DISABLEREPEAT
DISABLE5106A14
CALL L0291
CALL L0298
L0103:
JMP L0130
L0104:
MOV A,00EH
CJNE 08,L0106
JNB 1CH,4,L0105
JNB 0X07,6,L0105
ENABLEREPEAT
CALL L0292
LMOVFA 500/50/2,30H
CALL L0293
L0105:
JMP L0130
L0106:
MOV A,00EH
CJNE 09,L0107
JB 1DH,4,L0110
CALL L0252
JMP L0108
L0107:
MOV A,00EH
CJNE 10,L0112
JB 1DH,5,L0109
CALL L0248
L0108:
CALL L0235
CALL L0294
JMP L0111
L0109:
L0110:
CALL L0295
L0111:
CALL L0203
JMP L0130
L0112:
MOV A,00EH
CJNE 11,L0113
JB 1DH,6,L0116
CALL L0260
JMP L0114
L0113:
MOV A,00EH
CJNE 12,L0118
JB 1DH,7,L0115
CALL L0256
L0114:
CALL L0236
CALL L0296
JMP L0117
L0115:
L0116:
CALL L0297
L0117:
CALL L0203
JMP L0130
L0118:
MOV A,00EH
CJNE 13,L0119
JB 1DH,0,L0122
BC 1EH,5
CALL L0263
CALL L0263
JMP L0120
L0119:
MOV A,00EH
CJNE 14,L0124
JB 1DH,1,L0121
BC 1EH,5
CALL L0269
CALL L0269
L0120:
CALL L0275
CALL L0291
JMP L0123
L0121:
L0122:
CALL L0289
L0123:
CALL L0203
JMP L0130
L0124:
MOV A,00EH
CJNE 15,L0125
CALL L0293
LMOVFA 200/50/2,30H
CALL L0274
ROMPAGE2
CALL L0349
CALL L0346
CALL L0348
ROMPAGE1
CALL L0275
CALL L0293
BS 1BH,0
JMP L0130
L0125:
MOV A,00EH
CJNE 16,L0126
CALL L0293
LMOVFA 200/50/2,30H
CALL L0274
ROMPAGE2
CALL L0354
CALL L0346
CALL L0348
ROMPAGE1
CALL L0293
CALL L0275
BS 1BH,0
JMP L0130
L0126:
L0127:
MOV A,00EH
CJNE 18,L0129
JNB 1CH,4,L0128
JB 0X07,6,L0128
DISABLEREPEAT
CALL L0292
CALL L0293
L0128:
L0129:
L0130:
ROMPAGE0
NOP
JMP L0067
L0131:
ROMPAGE2
CALL L0320
ROMPAGE1
RET
L0132:
ROMPAGE2
CALL L0361
CALL L0365
ROMPAGE1
RET
L0133:
BC 1EH,4
CLR 20H+0
CLR 20H+1
JB 0X06,5,L0150
LIOCF 0XF1,0X0F
LMOVFA 8,25H
L0134:
CALL L0151
JB 0X06,5,L0150
DJNZ 25H,L0134
L0135:
NOP
JNB 0X06,5,L0135
CALL L0161
JNB 0X03,0,L0137
L0136:
INC 20H+2
BS 1EH,4
JMP L0149
L0137:
CALL L0154
CLR 20H+2
LMOVFA 16,25H
L0138:
L0139:
JNB 0X06,5,L0139
CALL L0151
JNB 0X06,5,L0141
L0140:
CALL L0158
L0141:
DJNZ 25H,L0138
LMOVFA 20H,0X04
LMOVFA 02,26H
L0142:
LMOVFA 08,25H
L0143:
L0144:
L0145:
JNB 0X06,5,L0145
CALL L0151
JNB 0X06,5,L0147
L0146:
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -