汇编语言编写歌曲稻香的代码

汇编语言是一种底层语言，不太适合编写复杂的歌曲。但是可以通过汇编语言来编写一些简单的音乐或者音效。

下面是用汇编语言编写的“稻香”音乐的示例代码：

; 稻香.asm
ORG 0x100
MOV AX,0x4F02
MOV BX,0x0003
MOV CX,0x8000
MOV DX,0x0000
INT 0x10

MOV DX,0x0000
MOV AL,0x03
OUT 0x43,AL
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

MOV DX,0x0B60
MOV CX,0x05DC
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

MOV DX,0x1660
MOV CX,0x064F
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

MOV DX,0x22C0
MOV CX,0x07F2
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

MOV DX,0x2D60
MOV CX,0x064F
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

MOV DX,0x38C0
MOV CX,0x07F2
MOV BX,0x50C7
MOV AL,BL
OUT 0x42,AL
MOV AL,BH
OUT 0x42,AL

; 延迟函数，用于控制节奏和速度
DELAY PROC NEAR
PUSH AX
PUSH BX
PUSH CX

MOV BX, 200 ; 循环次数，可控制延迟时间和节奏感
L1:
DEC BX ; 循环计数器减1
CMP BX, 00 ; 判断计数器是否为零，循环结束条件，可根据需要调整
JNZ L1

POP CX
POP BX
POP AX

RET ; 返回延迟函数调用处，继续执行后续代码

DELAY ENDP

; 播放音乐函数，根据输入的频率和时长播放相应的音符
PLAY PROC NEAR FREQUENCY:WORD,DURATION:WORD

PUSH AX ; 保存寄存器状态

MOV CX,DURATION ; 设置播放时长，可根据需要调整

; 计算频率对应的分频数，并输出到端口0x42中，实现音乐播放功能
MOV AX,FREQUENCY ; 频率值存储在AX中，可根据需要调整，注意值不能超过16位宽度。
MOV BX,1193181 ; 系统时钟频率值，用于计算分频数。
DIV BX ; 将系统时钟频率值除以频率值，得到频率对应的分频数。
MOV BX,DX ; 将分频数存储在BX中。
MOV AL,BL ; 将分频数低8位存储在AL中。
OUT 0x42,AL ; 将分频数低8位输出到端口0x42中。
MOV AL,BH ; 将分频数高8位存储在AL中。
OUT 0x42,AL ; 将分频数高8位输出到端口0x42中。

CALL DELAY ; 调用延迟函数，控制音符节奏和速度。

POP AX ; 恢复寄存器状态

RET ; 返回播放函数调用处，继续执行后续代码

PLAY ENDP

START:
CALL PLAY,261,800 ; 播放DO音符，时长800毫秒，可根据需要调整。
CALL PLAY,294,800 ; 播放RE音符，时长800毫秒，可根据需要调整。
CALL PLAY,329,800 ; 播放MI音符，时长800毫秒，可根据需要调整。
CALL PLAY,349,800 ; 播放FA音符，时长800毫秒，可根据需要调整。
CALL PLAY,392,800 ; 播放SO音符，时长800毫秒，可根据需要调整。
CALL PLAY,440,800 ; 播放LA音符，时长800毫秒，可根据需要调整。
CALL PLAY,494,800 ; 播放SI音符，时长800毫秒，可根据需要调整。
CALL PLAY,523,1200 ; 播放DO音符，时长1200毫秒，可根据需要调整。

RET ; 结束程序并返回操作系统。

请注意这只是示例代码，并不完整或准确。由于汇编语言不太适合编写复杂的歌曲或音乐。如果您需要编写高质量的歌曲或音乐，请考虑使用专业的音乐编写工具。