win32 汇编语言 播放歌曲的小程序 完整



STACK SEGMENT

DB 200 DUP ( STACK )

STACK ENDS

CODE SEGMENT

ASSUME DS:DATA,SS:STACK,CS:CODE

START:

MOV AX,DATA

MOV DS,AX

MOV aH, 0

MOV AL,00

INT 10H

********** 定义一个宏显示

waitf proc near

push ax

waitf1:

in al,61h

and al,10h

cmp al,ah

je waitf1

mov ah,al

loop waitf1

pop ax

ret

waitf endp

********************************************* 音乐播放

DISPLAY MACRO b

LEA DX,b

MOV AH,9

INT 21H

ENDM

**********************音乐地址宏 -win32　a small assembly language program playing a full song

STACK　　 SEGMENT

　　　　　DB 200 DUP ( STACK )

STACK　　 ENDS

CODE　　　SEGMENT

　　　　　ASSUME DS:DATA,SS:STACK,CS:CODE

START:

　　　　　MOV AX,DATA

　　　　　MOV DS,AX

　　　　　MOV aH, 0

　　　　　MOV AL,00

　　　　　INT 10H　　　　　

********** waitf proc near

　　　push ax

waitf1:

　　　in al,61h

　　　and al,10h

　　　cmp al,ah

　　　je waitf1

　　　mov ah,al

　　　loop waitf1

　　　pop ax

　　　ret

waitf endp

********************************************* DISPLAY　　　MACRO b

　　　　　LEA DX,b

　　　　　MOV AH,9

　　　　　INT 21H

　　　　　ENDM

**********************