¼

静音琴的源码,有兴趣的拼音可以下载下来看看,这个是可以生产的程序.

;********************************
;       录音11组下处理
;********************************
;入口:  A=变化键  1=变化     栈顶
;       B=键状态  0=过
;--------------------------------
;功能:  键盘下标志=0/1
;       键回标志=0
;       发音处理
;--------------------------------
        PROC  LY11XCL
LY11XCL:;81号键
        JNB   ACC.0,LY11XCL0   ;键未动
        JNB   B.0,$+14         ;3字节
        ORL   JP11X,#00000001B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11111110B ;3字节
        JNB   JP11H.0,LY11XCL0
        CLR   JP11H.0
        MOV   JXH,#101         ;键序号
        MOV   DPTR,#240H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL0:;82号键
        JNB   ACC.1,LY11XCL1   ;键未动
        JNB   B.1,$+14         ;3字节
        ORL   JP11X,#00000010B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11111101B ;3字节
        JNB   JP11H.1,LY11XCL1
        CLR   JP11H.1
        MOV   JXH,#102         ;键序号
        MOV   DPTR,#244H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL1:;83号键
        JNB   ACC.2,LY11XCL2   ;键未动
        JNB   B.2,$+14         ;3字节
        ORL   JP11X,#00000100B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11111011B ;3字节
        JNB   JP11H.2,LY11XCL2
        CLR   JP11H.2
        MOV   JXH,#103         ;键序号
        MOV   DPTR,#248H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL2:;84号键
        JNB   ACC.3,LY11XCL3   ;键未动
        JNB   B.3,$+14         ;3字节
        ORL   JP11X,#00001000B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11110111B ;3字节
        JNB   JP11H.3,LY11XCL3
        CLR   JP11H.3
        MOV   JXH,#104         ;键序号
        MOV   DPTR,#24CH       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL3:;85号键
        JNB   ACC.4,LY11XCL4   ;键未动
        JNB   B.4,$+14         ;3字节
        ORL   JP11X,#00010000B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11101111B ;3字节
        JNB   JP11H.4,LY11XCL4
        CLR   JP11H.4
        MOV   JXH,#105         ;键序号
        MOV   DPTR,#250H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL4:;86号键
        JNB   ACC.5,LY11XCL5   ;键未动
        JNB   B.5,$+14         ;3字节
        ORL   JP11X,#00100000B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#11011111B ;3字节
        JNB   JP11H.5,LY11XCL5
        CLR   JP11H.5
        MOV   JXH,#106         ;键序号
        MOV   DPTR,#254H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL5:;87号键
        JNB   ACC.6,LY11XCL6   ;键未动
        JNB   B.6,$+14         ;3字节
        ORL   JP11X,#01000000B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#10111111B ;3字节
        JNB   JP11H.6,LY11XCL6
        CLR   JP11H.6
        MOV   JXH,#107         ;键序号
        MOV   DPTR,#258H       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL6:;88号键
        JNB   ACC.7,LY11XCL7   ;键未动
        JNB   B.7,$+14         ;3字节
        ORL   JP11X,#10000000B ;3字节
        LJMP  $+11             ;3字节
        include "软件陷阱.asm" ;5字节
        ANL   JP11X,#01111111B ;3字节
        JNB   JP11H.7,LY11XCL7
        CLR   JP11H.7
        MOV   JXH,#108         ;键序号
        MOV   DPTR,#25CH       ;时间地址
        LCALL FYCL             ;发音处理
LY11XCL7:
        RET
        include "软件陷阱.asm"
        END
;********************************