// Project Example: SeekMusic()
// Created: 2015-01-20
//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)
//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,"Rewind"+Chr(10)+"Start")
AddVirtualButton(2,400,240,80)
SetVirtualButtonText(2,"Skip"+Chr(10)+"Fwd")
AddVirtualButton(3,600,440,80)
SetVirtualButtonText(3,"Quit")
Id=LoadMusic("music.mp3")
PlayMusic(Id)
Repeat
Print("Current Music Position: "+Str(GetMusicPosition(),1)+" Seconds")
If GetVirtualButtonPressed(1)
//Seek back to 0 seconds, absolute (the beginning)
SeekMusic(0,0)
EndIf
If GetVirtualButtonPressed(2)
//Seek forward 10 seconds, relative (skip forward)
SeekMusic(10,1)
EndIf
Sync()
Until GetVirtualButtonPressed(3)
DeleteMusic(Id)
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)