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

;********************************
;       脚踏板上程序片断
;********************************
JTBS:
        MOV   C,VK89             ;脚踏板状态
        JC    JTBS1              
        ;-----脚踏板=0------------
        JNB   BZ_JTBS,JTBS_END   ;脚踏板变化?
        ;脚踏板有变化:
        CLR   BZ_JTBS            ;脚踏板上标志,0=踏下
        LJMP  JTBS2
        include "软件陷阱.asm" 
JTBS1:  ;-----脚踏板=1------------
        JB    BZ_JTBS,JTBS_END   ;脚踏板变化?
        ;脚踏板有变化:
        SETB  BZ_JTBS            ;脚踏板上标志,1=没踏下
JTBS2:
        JB    BZ_JTBH,JTBS_END   ;脚踏板回过位?
        ;脚踏板未回过位:
        SETB  BZ_JTBH            ;1=回位
        LCALL SYJTBCL            ;收音脚踏板处理
JTBS_END:
;********************************