Будильник - Assembler - Ответ 10606769

include '%fasm%/win64ax.inc'
 
Interval = 3  ; нужный интервал в секундах, 30 мин = 30*60
 
INFINITE = -1
SND_ASYNC = 1
SND_NODEFAULT = 2
SND_MEMORY = 4
SND_LOOP = 8
 
section '.code' executable
start:
        sub rsp,8
 
        invoke SetTimer,0,0,Interval*1000,Play
await:
        invoke GetMessageA,msg,NULL,0,0
        test rax,rax
        jz exit
        invoke TranslateMessage,msg
        invoke DispatchMessageA,msg
        jmp await
exit:
        invoke ExitProcess,NULL
Play:
        sub rsp,8
        invoke PlaySound,amp,NULL,SND_MEMORY+SND_NODEFAULT
        ret
 
section '.data' readable
 
        amp file '80.wav'
 
section '.data' readable writeable
 
        msg MSG
 
section '.idata' import readable
 
        library kernel32,'KERNEL32.DLL',winmm,'WINMM.DLL',user32,'USER32.DLL'
        include '%fasm%/api/kernel32.inc'
        import winmm,PlaySound,'PlaySound'
        include '%fasm%/api/user32.inc'