#include <Sound.au3>

HotKeySet("{ESC}", "ende")
HotKeySet("^p", "PAUSE")

Global $pause = False
$snd = _SoundOpen("F:\Sound\Normale MP3\Diverses\Ike & Tina Turner - Nutbush City Limits.mp3")


F_Sound()


While 1
	Sleep(4000)
	If _SoundStatus($snd) = "stopped" Then F_Sound()
WEnd


Func F_Sound()
	_SoundPlay($snd)
	Return 1
EndFunc   ;==>F_Sound


Func PAUSE()
	If Not $pause Then
		_SoundPause($snd)
	Else
		_SoundResume($snd)
	EndIf
	$pause = Not $pause
EndFunc   ;==>PAUSE



Func ende()
	_SoundClose($snd)
	Exit
EndFunc   ;==>ende