📄 remotest.lst
字号:
00C9 7A32 219 MOV R2,#50 ;50MS延时
00CB 8006 220 SJMP DELAY_1MS
00CD 221 DELAY_20MS:
00CD 7A14 222 MOV R2,#20 ;20MS延时
00CF 8002 223 SJMP DELAY_1MS
00D1 224 DELAY_10MS:
00D1 7A0A 225 MOV R2,#10 ;10MS延时
226
00D3 227 DELAY_1MS: ;1MS延时R2赋值0
00D3 7BFA 228 MOV R3,#250
00D5 DBFE 229 DJNZ R3,$
00D7 DBFE 230 DJNZ R3,$ ;FOR 12M ;1+2X250+2X250+1 US
00D9 DAF8 231 DJNZ R2,DELAY_1MS
00DB 22 232 RET
233
234 ;//////////////////////////////////////////////////////////////////////////////////////////
00DC 235 SELECT_CH:
00DC E533 236 MOV A , SELECT_TIME
00DE 7016 237 JNZ SELECT_CH_END
00E0 75330A 238 MOV SELECT_TIME, #10
239
00E3 E532 240 MOV A,CH_NUMBER
00E5 04 241 INC A
00E6 F532 242 MOV CH_NUMBER, A
00E8 B4410B 243 CJNE A, #65, SELECT_CH_END
00EB 118F 244 CALL BEEP ;哔哔,提示结束!
00ED 118F 245 CALL BEEP
246
247
00EF D202 248 SETB GO_OF_FLAG
00F1 C200 249 CLR START_FLAG
00F3 753200 250 MOV CH_NUMBER,#00H
251
252
00F6 22 253 SELECT_CH_END: RET
254
255
A51 MACRO ASSEMBLER REMOTEST 08/05/2008 20:09:46 PAGE 5
256 ;//////////////////////////////////////////////////////////////////////////////////////////
00F7 257 CH_WORK: ;入口数据CH_NUM:1~64
258
00F7 E532 259 MOV A, CH_NUMBER
260
261 ;CD4067 NUMBER1 1~16
00F9 B40110 262 CH_1: CJNE A, #1 , CH_2
00FC C2A2 263 CLR CD_1INH
00FE D2B5 264 SETB CD_2INH
0100 D297 265 SETB CD_3INH
0102 D292 266 SETB CD_4INH
0104 C2A3 267 CLR CD_1A ;A B C D
0106 C2A4 268 CLR CD_1B ;0 0 0 0
0108 C2A5 269 CLR CD_1C
010A C2A6 270 CLR CD_1D
271
010C B40210 272 CH_2: CJNE A, #2,CH_3
010F C2A2 273 CLR CD_1INH
0111 D2B5 274 SETB CD_2INH
0113 D297 275 SETB CD_3INH
0115 D292 276 SETB CD_4INH
0117 D2A3 277 SETB CD_1A ;A B C D
0119 C2A4 278 CLR CD_1B ;1 0 0 0
011B C2A5 279 CLR CD_1C
011D C2A6 280 CLR CD_1D
281
011F B40310 282 CH_3: CJNE A, #3,CH_4
0122 C2A2 283 CLR CD_1INH
0124 D2B5 284 SETB CD_2INH
0126 D297 285 SETB CD_3INH
0128 D292 286 SETB CD_4INH
012A C2A3 287 CLR CD_1A ;A B C D
012C D2A4 288 SETB CD_1B ;0 1 0 0
012E C2A5 289 CLR CD_1C
0130 C2A6 290 CLR CD_1D
291
0132 B40410 292 CH_4: CJNE A, #4,CH_5
0135 C2A2 293 CLR CD_1INH
0137 D2B5 294 SETB CD_2INH
0139 D297 295 SETB CD_3INH
013B D292 296 SETB CD_4INH
013D D2A3 297 SETB CD_1A ;A B C D
013F D2A4 298 SETB CD_1B ;1 1 0 0
0141 C2A5 299 CLR CD_1C
0143 C2A6 300 CLR CD_1D
301
0145 B40510 302 CH_5: CJNE A, #5,CH_6
0148 C2A2 303 CLR CD_1INH
014A D2B5 304 SETB CD_2INH
014C D297 305 SETB CD_3INH
014E D292 306 SETB CD_4INH
0150 C2A3 307 CLR CD_1A ;A B C D
0152 C2A4 308 CLR CD_1B ;0 0 1 0
0154 D2A5 309 SETB CD_1C
0156 C2A6 310 CLR CD_1D
311
0158 B40610 312 CH_6: CJNE A, #6,CH_7
015B C2A2 313 CLR CD_1INH
015D D2B5 314 SETB CD_2INH
015F D297 315 SETB CD_3INH
0161 D292 316 SETB CD_4INH
0163 D2A3 317 SETB CD_1A ;A B C D
0165 C2A4 318 CLR CD_1B ;1 0 1 0
0167 D2A5 319 SETB CD_1C
0169 C2A6 320 CLR CD_1D
321
A51 MACRO ASSEMBLER REMOTEST 08/05/2008 20:09:46 PAGE 6
016B B40710 322 CH_7: CJNE A, #7,CH_8
016E C2A2 323 CLR CD_1INH
0170 D2B5 324 SETB CD_2INH
0172 D297 325 SETB CD_3INH
0174 D292 326 SETB CD_4INH
0176 C2A3 327 CLR CD_1A ;A B C D
0178 D2A4 328 SETB CD_1B ;0 1 1 0
017A D2A5 329 SETB CD_1C
017C C2A6 330 CLR CD_1D
331
017E B40810 332 CH_8: CJNE A, #8,CH_9
0181 C2A2 333 CLR CD_1INH
0183 D2B5 334 SETB CD_2INH
0185 D297 335 SETB CD_3INH
0187 D292 336 SETB CD_4INH
0189 D2A3 337 SETB CD_1A ;A B C D
018B D2A4 338 SETB CD_1B ;1 1 1 0
018D D2A5 339 SETB CD_1C
018F C2A6 340 CLR CD_1D
341
0191 B40910 342 CH_9: CJNE A, #9,CH_10
0194 C2A2 343 CLR CD_1INH
0196 D2B5 344 SETB CD_2INH
0198 D297 345 SETB CD_3INH
019A D292 346 SETB CD_4INH
019C C2A3 347 CLR CD_1A ;A B C D
019E C2A4 348 CLR CD_1B ;0 0 0 1
01A0 C2A5 349 CLR CD_1C
01A2 D2A6 350 SETB CD_1D
351
01A4 B40A10 352 CH_10: CJNE A, #10,CH_11
01A7 C2A2 353 CLR CD_1INH
01A9 D2B5 354 SETB CD_2INH
01AB D297 355 SETB CD_3INH
01AD D292 356 SETB CD_4INH
01AF D2A3 357 SETB CD_1A ;A B C D
01B1 C2A4 358 CLR CD_1B ;1 0 0 1
01B3 C2A5 359 CLR CD_1C
01B5 D2A6 360 SETB CD_1D
361
01B7 B40B10 362 CH_11: CJNE A, #11,CH_12
01BA C2A2 363 CLR CD_1INH
01BC D2B5 364 SETB CD_2INH
01BE D297 365 SETB CD_3INH
01C0 D292 366 SETB CD_4INH
01C2 C2A3 367 CLR CD_1A ;A B C D
01C4 D2A4 368 SETB CD_1B ;0 1 0 1
01C6 C2A5 369 CLR CD_1C
01C8 D2A6 370 SETB CD_1D
371
01CA B40C10 372 CH_12: CJNE A, #12,CH_13
01CD C2A2 373 CLR CD_1INH
01CF D2B5 374 SETB CD_2INH
01D1 D297 375 SETB CD_3INH
01D3 D292 376 SETB CD_4INH
01D5 D2A3 377 SETB CD_1A ;A B C D
01D7 D2A4 378 SETB CD_1B ;1 1 0 1
01D9 C2A5 379 CLR CD_1C
01DB D2A6 380 SETB CD_1D
381
01DD B40D10 382 CH_13: CJNE A, #13,CH_14
01E0 C2A2 383 CLR CD_1INH
01E2 D2B5 384 SETB CD_2INH
01E4 D297 385 SETB CD_3INH
01E6 D292 386 SETB CD_4INH
01E8 C2A3 387 CLR CD_1A ;A B C D
A51 MACRO ASSEMBLER REMOTEST 08/05/2008 20:09:46 PAGE 7
01EA C2A4 388 CLR CD_1B ;0 0 1 1
01EC D2A5 389 SETB CD_1C
01EE D2A6 390 SETB CD_1D
391
01F0 B40E10 392 CH_14: CJNE A, #14,CH_15
01F3 C2A2 393 CLR CD_1INH
01F5 D2B5 394 SETB CD_2INH
01F7 D297 395 SETB CD_3INH
01F9 D292 396 SETB CD_4INH
01FB D2A3 397 SETB CD_1A ;A B C D
01FD C2A4 398 CLR CD_1B ;1 0 1 1
01FF D2A5 399 SETB CD_1C
0201 D2A6 400 SETB CD_1D
401
0203 B40F10 402 CH_15: CJNE A, #15,CH_16
0206 C2A2 403 CLR CD_1INH
0208 D2B5 404 SETB CD_2INH
020A D297 405 SETB CD_3INH
020C D292 406 SETB CD_4INH
020E C2A3 407 CLR CD_1A ;A B C D
0210 D2A4 408 SETB CD_1B ;0 1 1 1
0212 D2A5 409 SETB CD_1C
0214 D2A6 410 SETB CD_1D
411
0216 B41010 412 CH_16: CJNE A, #16,CH_17
0219 C2A2 413 CLR CD_1INH
021B D2B5 414 SETB CD_2INH
021D D297 415 SETB CD_3INH
021F D292 416 SETB CD_4INH
0221 D2A3 417 SETB CD_1A ;A B C D
0223 D2A4 418 SETB CD_1B ;1 1 1 1
0225 D2A5 419 SETB CD_1C
0227 D2A6 420 SETB CD_1D
421 ;//////////////////////////////////////////////////////////////////////////////////
422 ;CD4067 NUMBER2 17~32
0229 B41110 423 CH_17: CJNE A, #17 , CH_18
022C D2A2 424 SETB CD_1INH
022E C2B5 425 CLR CD_2INH
0230 D297 426 SETB CD_3INH
0232 D292 427 SETB CD_4INH
0234 C2B6 428 CLR CD_2A ;A B C D
0236 C2B7 429 CLR CD_2B ;0 0 0 0
0238 C2A0 430 CLR CD_2C
023A C2A1 431 CLR CD_2D
432
023C B41210 433 CH_18: CJNE A, #18,CH_19
023F D2A2 434 SETB CD_1INH
0241 C2B5 435 CLR CD_2INH
0243 D297 436 SETB CD_3INH
0245 D292 437 SETB CD_4INH
0247 D2B6 438 SETB CD_2A ;A B C D
0249 C2B7 439 CLR CD_2B ;1 0 0 0
024B C2A0 440 CLR CD_2C
024D C2A1 441 CLR CD_2D
442
024F B41310 443 CH_19: CJNE A, #19,CH_20
0252 D2A2 444 SETB CD_1INH
0254 C2B5 445 CLR CD_2INH
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -