//NOTE: For this example to work you will need to copy 'music.mp3'
//to the media folder at the location where you are running this example.
//The file can be found in your [AGK Install Directory]/Projects/Basic/Examples/Sound/PlayingMusic/media/
Setvirtualresolution(640,480)
ResetTimer()
//Check for required files in media folder
fileok=GetFileExists("music.mp3")
If fileok<>1
Repeat
Print ("music.mp3 needs to be in your media folder")
Sync()
Until Timer()>5
EndIF
If fileok=1
AddVirtualButton(1,200,240,80)
SetVirtualButtonText(1,"Vol+")
AddVirtualButton(2,400,240,80)
SetVirtualButtonText(2,"Vol-")
music = LoadMusic("music.mp3")
PlayMusic(1)
volume=50
Repeat
Print(Volume)
If GetVirtualButtonPressed(1)
volume=volume+1
SetMusicSystemVolume(volume)
EndIf
If GetVirtualButtonPressed(2)
volume=volume-1
SetMusicSystemVolume(volume)
EndIf
Sync()
Until Timer()>30
DeleteMusic(1)
Print ("Music Deleted")
Sync()
Sleep(2000)
EndIf
End
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
//NOTE: For this example to work you will need to copy 'music.mp3' //to the media folder at the location where you are running this example. //The file can be found in your [AGK Install Directory]/Projects/Basic/Examples/Sound/PlayingMusic/media/ Setvirtualresolution(640,480) ResetTimer() //Check for required files in media folder fileok=GetFileExists("music.mp3") If fileok<>1 Repeat Print ("music.mp3 needs to be in your media folder") Sync() Until Timer()>5 EndIF If fileok=1 AddVirtualButton(1,200,240,80) SetVirtualButtonText(1,"Vol+") AddVirtualButton(2,400,240,80) SetVirtualButtonText(2,"Vol-") music = LoadMusic("music.mp3") PlayMusic(1) volume=50 Repeat Print(Volume) If GetVirtualButtonPressed(1) volume=volume+1 SetMusicSystemVolume(volume) EndIf If GetVirtualButtonPressed(2) volume=volume-1 SetMusicSystemVolume(volume) EndIf Sync() Until Timer()>30 DeleteMusic(1) Print ("Music Deleted") Sync() Sleep(2000) EndIf End