用汇编语言写51单片机八音电子琴程序

下面是一个简单的51单片机八音电子琴程序的汇编代码，用于控制8个按键和一个蜂鸣器：

org 0h

loop:
    mov P1, #0FFh ; 按键扫描
    acall delay
    mov A, P1 ; 获取按键状态
    cjne A, #0FFh, play ; 判断是否有按键按下
    sjmp loop

play:
    mov P2, #0 ; 关闭蜂鸣器
    mov R7, #8 ; 循环8次，分别检测8个按键
    mov A, #0FEh ; 开始检测第一个按键
    djnz R7, $
    sjmp loop

$:
    jnc next ; 如果按键没按下，跳过
    mov A, R7 ; 获取当前循环计数器的值
    subb A, #1 ; 将其转换为音符编号
    add A, #12 ; 将其转换为音符频率
    mov R6, A ; 将音符频率存入R6
    mov P2, #01h ; 打开蜂鸣器
    acall tone ; 发出音符
next:
    inc A ; 检测下一个按键
    djnz R7, $ ; 循环检测8个按键
    sjmp loop

delay:
    mov R0, #255
    mov R1, #255
    djnz R0, $
    djnz R1, $
    ret

tone:
    mov R5, R6 ; 将音符频率存入R5
    mov R4, #20h ; 计算定时器初值
    mov R3, #0 ; 计数器清零
    mov TMOD, #01h ; 设置定时器0为16位自动重载模式
    mov TH0, R4 ; 设置定时器初值
    mov TL0, R4
    setb TR0 ; 启动定时器0
    tone_loop:
        djnz R3, tone_loop ; 等待计数器溢出
        clr TR0 ; 停止定时器0
        ret

这个程序的实现思路是，通过循环扫描8个按键的状态，判断是否有按键按下，如果有按键按下，则发出对应的音符。程序中使用了定时器0来生成音符频率的方波信号，通过改变定时器0的初值，可以改变方波的频率，从而发出不同的音符。

需要注意的是，由于51单片机的IO口电平是高电平有效的，因此在程序中需要通过取反操作来获取按键状态。此外，由于定时器0的计时精度受到系统时钟频率的影响，因此需要根据具体的硬件环境来调整定时器初值，以使发出的音符频率更加准确。