This is what onenonymous suggested I change in order to get the functionality I wanted:
AndCode: Select all
Sub StartNextSong(Timer) UnregisterTimer Call WriteToLog("Timer event handling unregistered in StartNextSong") SDB.Player.Next End Sub
to look like this:
Code: Select all
Sub StartNextSong(Timer) UnregisterTimer SDB.Player.PlaybackTime = SDB.Player.CurrentSongLength - 20 * 1000 Call WriteToLog("Timer event handling unregistered in StartNextSong") End Sub
thanks a bunch for starting off with some great code!try commenting out (or deleting) two lines in the StartPlaying procedure:Code: Select all
SDB.Player.PlaybackTime = StartTime