?? ?
字號:
;********************************
; 錄音2組下處理
;********************************
;入口: A=變化鍵 1=變化 棧頂
; B=鍵狀態 0=過
;--------------------------------
;功能: 鍵盤下標志=0/1
; 鍵回標志=0
; 發音處理
;--------------------------------
PROC LY2XCL
LY2XCL:;9號鍵
JNB ACC.0,LY2XCL0 ;鍵未動
JNB B.0,$+14 ;3字節
ORL JP2X,#00000001B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11111110B ;3字節
JNB JP2H.0,LY2XCL0
CLR JP2H.0
MOV JXH,#29 ;鍵序號
MOV DPTR,#120H ;時間地址
LCALL FYCL ;發音處理
LY2XCL0:;10號鍵
JNB ACC.1,LY2XCL1 ;鍵未動
JNB B.1,$+14 ;3字節
ORL JP2X,#00000010B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11111101B ;3字節
JNB JP2H.1,LY2XCL1
CLR JP2H.1
MOV JXH,#30 ;鍵序號
MOV DPTR,#124H ;時間地址
LCALL FYCL ;發音處理
LY2XCL1:;11號鍵
JNB ACC.2,LY2XCL2 ;鍵未動
JNB B.2,$+14 ;3字節
ORL JP2X,#00000100B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11111011B ;3字節
JNB JP2H.2,LY2XCL2
CLR JP2H.2
MOV JXH,#31 ;鍵序號
MOV DPTR,#128H ;時間地址
LCALL FYCL ;發音處理
LY2XCL2:;12號鍵
JNB ACC.3,LY2XCL3 ;鍵未動
JNB B.3,$+14 ;3字節
ORL JP2X,#00001000B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11110111B ;3字節
JNB JP2H.3,LY2XCL3
CLR JP2H.3
MOV JXH,#32 ;鍵序號
MOV DPTR,#12CH ;時間地址
LCALL FYCL ;發音處理
LY2XCL3:;13號鍵
JNB ACC.4,LY2XCL4 ;鍵未動
JNB B.4,$+14 ;3字節
ORL JP2X,#00010000B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11101111B ;3字節
JNB JP2H.4,LY2XCL4
CLR JP2H.4
MOV JXH,#33 ;鍵序號
MOV DPTR,#130H ;時間地址
LCALL FYCL ;發音處理
LY2XCL4:;14號鍵
JNB ACC.5,LY2XCL5 ;鍵未動
JNB B.5,$+14 ;3字節
ORL JP2X,#00100000B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#11011111B ;3字節
JNB JP2H.5,LY2XCL5
CLR JP2H.5
MOV JXH,#34 ;鍵序號
MOV DPTR,#134H ;時間地址
LCALL FYCL ;發音處理
LY2XCL5:;15號鍵
JNB ACC.6,LY2XCL6 ;鍵未動
JNB B.6,$+14 ;3字節
ORL JP2X,#01000000B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#10111111B ;3字節
JNB JP2H.6,LY2XCL6
CLR JP2H.6
MOV JXH,#35 ;鍵序號
MOV DPTR,#138H ;時間地址
LCALL FYCL ;發音處理
LY2XCL6:;16號鍵
JNB ACC.7,LY2XCL7 ;鍵未動
JNB B.7,$+14 ;3字節
ORL JP2X,#10000000B ;3字節
LJMP $+11 ;3字節
include "軟件陷阱.asm";5字節
ANL JP2X,#01111111B ;3字節
JNB JP2H.7,LY2XCL7
CLR JP2H.7
MOV JXH,#36 ;鍵序號
MOV DPTR,#13CH ;時間地址
LCALL FYCL ;發音處理
LY2XCL7:
RET
include "軟件陷阱.asm"
END
;********************************
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -