📄 henhao.lst
字号:
022D F6 370 MOV @R0,A
022E 08 371 INC R0
022F DFFA 372 DJNZ R7,RLC_STORE_LOOP
0231 22 373 RET
374 ;---------------------------------------------------
375 ;The progress to clean buffer
0232 376 CLR_BUFFER:
0232 7F0C 377 MOV R7,#12
0234 E4 378 CLR A
0235 379 CLR_BUFFER_LOOP:
0235 F7 380 MOV @R1,A
0236 09 381 INC R1
0237 DFFC 382 DJNZ R7,CLR_BUFFER_LOOP
0239 22 383 RET
384 ;*******************************************
385 ;The progress to find the scan code
023A 386 FINDSCANCODE:
023A EF 387 MOV A,R7
023B 04 388 INC A
023C 83 389 MOVC A,@A+PC
023D 22 390 RET
391 ; 0 1 2 3 4 5 6 7 8 9 A B C D E F
023E FF43FF3F 392 DB 0FFH,043H,0FFH,03FH,03DH,03BH,03CH,0FFH,0FFH,044H,042H,040H,03EH,00FH,029H,0FFH;0
0242 3D3B3CFF
0246 FF444240
024A 3E0F29FF
024E FF382AFF 393 DB 0FFH,038H,02AH,0FFH,01DH,010H,002H,0FFH,0FFH,0FFH,02CH,01FH,01EH,011H,003H,0FFH;1
0252 1D1002FF
0256 FFFF2C1F
025A 1E1103FF
025E FF2E2D20 394 DB 0FFH,02EH,02DH,020H,012H,005H,004H,0FFH,0FFH,039H,02FH,021H,014H,013H,006H,0FFH;2
0262 120504FF
0266 FF392F21
026A 141306FF
026E FF313023 395 DB 0FFH,031H,030H,023H,022H,015H,007H,0FFH,0FFH,0FFH,032H,024H,016H,008H,009H,0FFH;3
0272 221507FF
0276 FFFF3224
027A 160809FF
027E FF332517 396 DB 0FFH,033H,025H,017H,018H,00BH,00AH,0FFH,0FFH,034H,035H,026H,027H,019H,00CH,0FFH;4
0282 180B0AFF
0286 FF343526
028A 27190CFF
028E FFFF28FF 397 DB 0FFH,0FFH,028H,0FFH,01AH,00DH,0FFH,0FFH,03AH,036H,01CH,01BH,0FFH,02BH,0FFH,0FFH;5
A51 MACRO ASSEMBLER HENHAO 09/25/2008 16:42:26 PAGE 8
0292 1A0DFFFF
0296 3A361C1B
029A FF2BFFFF
029E FFFFFFFF 398 DB 0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,00EH,0FFH,0FFH,04FH,0FFH,04BH,047H,0FFH,0FFH,0FFH;6
02A2 FFFF0EFF
02A6 FF4FFF4B
02AA 47FFFFFF
02AE 5253504C 399 DB 052H,053H,050H,04CH,04DH,048H,001H,045H,0FFH,04EH,051H,04AH,0FFH,049H,046H,0FFH;7
02B2 4D480145
02B6 FF4E514A
02BA FF4946FF
02BE FFFFFF41 400 DB 0FFH,0FFH,0FFH,041H,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH;8
02C2 FFFFFFFF
02C6 FFFFFFFF
02CA FFFFFFFF
401 ;**********************************************
402 ;Change the scan code to ASCII code
02CE 403 CHANGEASCII:
02CE E532 404 MOV A,CodeReg_1
02D0 645B 405 XRL A,#91
02D2 7004 406 JNZ CH1
02D4 753300 407 MOV CodeReg_2,#0
02D7 22 408 RET
02D8 409 CH1:
02D8 E532 410 MOV A,CodeReg_1
02DA 645C 411 XRL A,#92
02DC 7004 412 JNZ CH2
02DE 753300 413 MOV CodeReg_2,#0
02E1 22 414 RET
02E2 415 CH2:
02E2 E532 416 MOV A,CodeReg_1
02E4 645D 417 XRL A,#93
02E6 7004 418 JNZ CH3
02E8 753300 419 MOV CodeReg_2,#0
02EB 22 420 RET
02EC 421 CH3:
02EC E532 422 MOV A,CodeReg_1
02EE B44700 423 CJNE A,#71,CH4
02F1 424 CH4:
02F1 5013 425 JNC CH6
426 ;-------------------------------------
427
02F3 200308 428 JB blnShiftKeyDown,CH5
02F6 900366 429 MOV DPTR,#ASCIITABLE_UP
02F9 E532 430 MOV A,CodeReg_1
02FB 93 431 MOVC A,@A+DPTR
02FC 613C 432 AJMP CH10
02FE 433 CH5:
02FE 9003AD 434 MOV DPTR,#ASCIITABLE_DOWN
0301 E532 435 MOV A,CodeReg_1
0303 93 436 MOVC A,@A+DPTR
0304 613C 437 AJMP CH10
438 ;--------------------------------------
0306 439 CH6:
0306 200119 440 JB blnNumLockKey,ISDIGITAL
0309 441 CH7:
0309 AA32 442 MOV R2,CodeReg_1
030B BA4A04 443 CJNE R2,#74,CH8
030E 742D 444 MOV A,#45
0310 613C 445 AJMP CH10
0312 446 CH8:
0312 AA32 447 MOV R2,CodeReg_1
0314 BA4E04 448 CJNE R2,#78,CH9
0317 742B 449 MOV A,#43
0319 8021 450 SJMP CH10
A51 MACRO ASSEMBLER HENHAO 09/25/2008 16:42:26 PAGE 9
031B 451 CH9:
031B 200307 452 JB blnShiftKeyDown,CH11
031E 7400 453 MOV A,#0
0320 801A 454 SJMP CH10
0322 455 ISDIGITAL:
0322 2003E4 456 JB blnShiftKeyDown,CH7
0325 457 CH11:
0325 E532 458 MOV A,CodeReg_1
0327 C3 459 CLR c
0328 9447 460 SUBB A,#71
032A 04 461 INC A
032B 04 462 INC A
032C 83 463 MOVC A,@A+PC
032D 800D 464 SJMP CH10
032F 3738392D 465 DB 55,56,57,45,52,53,54,43,49,50,51,48,46
0333 3435362B
0337 31323330
033B 2E
466 ;**********************************************
033C 467 CH10:
033C F533 468 MOV CodeReg_2,A
033E 7141 469 ACALL CAPSREVISE
0340 22 470 RET
0341 471 CAPSREVISE:
0341 300221 472 JNB blnCapsLockKey, CAP1
0344 E533 473 MOV A,CodeReg_2
0346 B44100 474 CJNE A,#65,CAP2
0349 475 CAP2:
0349 401A 476 JC CAP1
034B B45B00 477 CJNE A,#91,CAP3
034E 478 CAP3:
034E 5006 479 JNC CAP4
480 ;/********
0350 2420 481 ADD A,#32
0352 F533 482 MOV CodeReg_2,A
0354 800F 483 SJMP CAP1
484 ;/********
0356 485 CAP4:
0356 B47B00 486 CJNE A,#123,CAP5
0359 487 CAP5:
0359 500A 488 JNC CAP1
035B B46100 489 CJNE A,#97,CAP6
035E 490 CAP6:
035E 4005 491 JC CAP1
492 ;/********
0360 C3 493 CLR C
0361 9420 494 SUBB A,#32
0363 F533 495 MOV CodeReg_2,A
0365 496 CAP1:
0365 22 497 RET
0366 498 ASCIITABLE_UP:
499 ; 0 1 2 3 4 5 6 7 8 9
0366 001B3132 500 DB 000,027,049,050,051,052,053,054,055,056 ;0
036A 33343536
036E 3738
0370 39302D3D 501 DB 057,048,045,061,008,009,113,119,101,114 ;1
0374 08097177
0378 6572
037A 74797569 502 DB 116,121,117,105,111,112,091,093,013,000 ;2
037E 6F705B5D
0382 0D00
0384 61736466 503 DB 097,115,100,102,103,104,106,107,108,059 ;3
0388 67686A6B
038C 6C3B
038E 2760005C 504 DB 039,096,000,092,122,120,099,118,098,110 ;4
0392 7A786376
A51 MACRO ASSEMBLER HENHAO 09/25/2008 16:42:26 PAGE 10
0396 626E
0398 6D2C2E2F 505 DB 109,044,046,047,000,000,000,032,000,000 ;5
039C 00000020
03A0 0000
03A2 00000000 506 DB 000,000,000,000,000,000,000,000,000,000 ;6
03A6 00000000
03AA 0000
03AC 00 507 DB 000 ;Break
03AD 508 ASCIITABLE_DOWN:
509 ; 0 1 2 3 4 5 6 7 8 9
03AD 001B2140 510 DB 000,027,033,064,035,036,037,094,038,042 ;0 K,ESC,!,@,#,$,%,^,&,*
03B1 2324255E
03B5 262A
03B7 28295F2B 511 DB 040,041,095,043,008,009,081,087,069,082 ;1 (,),_,+,K,TAB,Q,W,E,R
03BB 08095157
03BF 4552
03C1 54595549 512 DB 084,089,085,073,079,080,123,125,013,000 ;2
03C5 4F507B7D
03C9 0D00
03CB 41534446 513 DB 065,083,068,070,071,072,074,075,076,058 ;3
03CF 47484A4B
03D3 4C3A
03D5 227E007C 514 DB 034,126,000,124,090,088,067,086,066,078 ;4
03D9 5A584356
03DD 424E
03DF 4D3C3E3F 515 DB 077,060,062,063,000,000,000,032,000,000 ;5
03E3 00000020
03E7 0000
03E9 00000000 516 DB 000,000,000,000,000,000,000,000,000,000 ;6
03ED 00000000
03F1 0000
03F3 00 517 DB 000 ;Break
518 ;*********************************************
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -