Генерация звука функцией beep

include '%fasm%\win32ax.inc'
section '.code' executable
start:
        ; (Проще говоря вырубить сервис Beep, только зачем не знаю)
        ; On these older systems, muting and volume controls have no effect on Beep; you would still hear the tone.
        ; To silence the tone, you used the following commands:
 
        ; invoke ShellExecute,NULL,NULL,'net','stop beep',NULL,SW_HIDE
        ; invoke ShellExecute,NULL,NULL,'sc','config beep start= disabled',NULL,SW_HIDE
@@:
        invoke Beep,700,300
        invoke Sleep,999
        jmp @r
exit:
        invoke ExitProcess,NULL
 
.end start

include '%fasm%\win32ax.inc'
section '.code' executable
start:
        invoke ExpandEnvironmentStrings,'%ProgramFiles%\CloneCD\Sounds\Success.wav',lpFile,MAX_PATH
        invoke PlaySound,lpFile,NULL,NULL
        invoke Sleep,7000
exit:
        invoke ExitProcess,NULL
 
section '.data' readable writable
 
        lpFile dd ?
 
section '.idata' import readable
        library kernel32,'KERNEL32.DLL',winmm,'WINMM.DLL'
                include '%fasm%\api\kernel32.inc'
                import winmm,PlaySound,'PlaySound'

include '%fasm%\win32ax.inc'
section '.code' executable
start:
        invoke GetCommandLine
        mov ebx,eax
@@:
        cmp byte [ebx],' '
        je @f
        cmp byte [ebx],NULL
        jz exit
        inc ebx
        jmp @r
@@:
        inc ebx
        invoke sndPlaySound,ebx,NULL
exit: 
        invoke ExitProcess,NULL
 
section '.idata' import readable
        library kernel32,'KERNEL32.DLL',winmm,'WINMM.DLL'
        include '%fasm%\api\kernel32.inc'
        import winmm,sndPlaySound,'sndPlaySoundA'