来自「静音琴的源码,有兴趣的拼音可以下载下来看看,这个是可以生产的程序.」· 代码 · 共 16 行

;********************************
;       第3板1组上程序片断
;********************************
D3B1ZS:
        ;     采样:
        MOV   P1,#00110111B      ;第1组允许位
        MOV   B,P2               ;上比较点键状态
        ;     处理琴键:
        MOV   A,JP9S             ;前次上标志
        XRL   A,B                ;键变化?
        JZ    D3B1ZS_END         ;没变
        ;     琴键有变化:
        LCALL LY9SCL             ;录音上处理
D3B1ZS_END:
;********************************