skip 10 or 20 seconds forward in a track?
Moderator: Gurus
skip 10 or 20 seconds forward in a track?
I know of the keyboard shortcut to skip 5 seconds forward in a track, but sometimes it's not far enough when going through a ton of tracks to prepare for a dj set. 10 or 20 seconds isn't already an option I'm missing right?
Seems like a lazy thing to want, but my wrists are starting to ache clicking forward with the mouse in track!
If there are no plans to implement this soon, I'm open to any workarounds people can think of. thanks
Seems like a lazy thing to want, but my wrists are starting to ache clicking forward with the mouse in track!
If there are no plans to implement this soon, I'm open to any workarounds people can think of. thanks
Re: skip 10 or 20 seconds forward in a track?
One of benefits of MediaMonkey you can easily add new feature if you want
Save this Code to Scripts\Auto under name fwdrewbuttons.vbs and restart MM you will get two buttons that will fwd rew on entered number seconds (10 By default)
Save this Code to Scripts\Auto under name fwdrewbuttons.vbs and restart MM you will get two buttons that will fwd rew on entered number seconds (10 By default)
Code: Select all
Dim pltime
'time in seconds
pltime = 10
Sub OnStartup
Dim rew10
Set rew10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0)
SDB.Objects("rew10") = rew10
rew10.Caption = "Rewind "&pltime&" seconds"
rew10.OnClickFunc = "Rewind"
rew10.UseScript = Script.ScriptPath
rew10.IconIndex = 0
rew10.Hint = "Clicking on this will rewind playing track "&pltime&" seconds"
Dim fwd10
Set fwd10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0)
SDB.Objects("fwd10") = fwd10
fwd10.Caption = "Forward "&pltime&" seconds"
fwd10.OnClickFunc = "Forward"
fwd10.UseScript = Script.ScriptPath
fwd10.IconIndex = 4
fwd10.Hint = "Clicking on this will forward playing track "&pltime&" seconds"
End Sub
Sub Forward(arg)
Script.Reload(Script.ScriptPath)
if (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then
If Not (SDB.Player.PlaybackTime+(pltime*1000) > SDB.Player.CurrentSongLength) Then
SDB.Player.PlaybackTime = SDB.Player.PlaybackTime+(pltime*1000)
end If
End If
End Sub
Sub Rewind(arg)
Script.Reload(Script.ScriptPath)
If (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then
If Not (SDB.Player.PlaybackTime-(pltime*1000) < 0) Then
SDB.Player.PlaybackTime = SDB.Player.PlaybackTime-(pltime*1000)
end if
End if
End sub
Best regards,
Peke
MediaMonkey Team lead QA/Tech Support guru
Admin of Free MediaMonkey addon Site HappyMonkeying
How to attach PICTURE/SCREENSHOTS to forum posts
Peke
MediaMonkey Team lead QA/Tech Support guru
Admin of Free MediaMonkey addon Site HappyMonkeying
How to attach PICTURE/SCREENSHOTS to forum posts
Re: skip 10 or 20 seconds forward in a track?
Thanks for your reply! I'm down with a lot of scripts, and I appreciate you suggesting that one. What I was referring to is a slightly taller progress bar, and not the whole playback area. Not longer even drastically taller, at that. In other skins I just hit a spot that I want and it's there but your bar is so thin that I always miss, lol. But you know what? Your skin is so badass that I use it, anyway. The only I've liked anywhere near yours is the "MMultimate." I used that for what seems like ever, but the I like how elegant/minimal this one is. I have my MM set up with a minimal of icons and clutter, and the skin really accentuates the clean look. Thanks again!Peke wrote:One of benefits of MediaMonkey you can easily add new feature if you want
Save this Code to Scripts\Auto under name fwdrewbuttons.vbs and restart MM you will get two buttons that will fwd rew on entered number seconds (10 By default)Code: Select all
Dim pltime 'time in seconds pltime = 10 Sub OnStartup Dim rew10 Set rew10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("rew10") = rew10 rew10.Caption = "Rewind "&pltime&" seconds" rew10.OnClickFunc = "Rewind" rew10.UseScript = Script.ScriptPath rew10.IconIndex = 0 rew10.Hint = "Clicking on this will rewind playing track "&pltime&" seconds" Dim fwd10 Set fwd10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("fwd10") = fwd10 fwd10.Caption = "Forward "&pltime&" seconds" fwd10.OnClickFunc = "Forward" fwd10.UseScript = Script.ScriptPath fwd10.IconIndex = 4 fwd10.Hint = "Clicking on this will forward playing track "&pltime&" seconds" End Sub Sub Forward(arg) Script.Reload(Script.ScriptPath) if (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime+(pltime*1000) > SDB.Player.CurrentSongLength) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime+(pltime*1000) end If End If End Sub Sub Rewind(arg) Script.Reload(Script.ScriptPath) If (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime-(pltime*1000) < 0) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime-(pltime*1000) end if End if End sub
Re: skip 10 or 20 seconds forward in a track?
Either I posted this in the wrong forum, or it was moved incorrectly!. I was referring to a specific skin, in a thread about that specific skin.
Re: skip 10 or 20 seconds forward in a track?
@nolabar you'd be better to register the forum, it's free! You will be notified of replies (by email), you can edit/delete your posts, and much more...
Re: skip 10 or 20 seconds forward in a track?
You replied to redirected post No Problem.
Best regards,
Peke
MediaMonkey Team lead QA/Tech Support guru
Admin of Free MediaMonkey addon Site HappyMonkeying
How to attach PICTURE/SCREENSHOTS to forum posts
Peke
MediaMonkey Team lead QA/Tech Support guru
Admin of Free MediaMonkey addon Site HappyMonkeying
How to attach PICTURE/SCREENSHOTS to forum posts
Re: skip 10 or 20 seconds forward in a track?
Hi, this is something I've been looking for quite a while.
I have three questions: Would it be possible to have the buttons near the play button? Any possibility to have the buttons on the mini version, and most importantly can the 10/20 seconds be linked to a keyboard shorcut? thanks
I have three questions: Would it be possible to have the buttons near the play button? Any possibility to have the buttons on the mini version, and most importantly can the 10/20 seconds be linked to a keyboard shorcut? thanks
Re: skip 10 or 20 seconds forward in a track?
I know it's not a normal use of MM, but I have to go through about 10,000 tracks and select a few from them. A keyboard shortcut tied to skip forward would SERIOUSLY help out that task. Is this possible? thanks!
Re: skip 10 or 20 seconds forward in a track?
Bumpity for this old one. Is it possible now?
My laptop doesnt have any physical buttons for "Media Fast Forward" and "Media Rewind"... which are the global hotkeys set stock for the 10s skip fuction in MediaMonkey.
I can whip out the laptops remote to send this command .. but I really need a way to do it with the keyboard AS WELL (not excluding the original hotkey). Apologetic if this is covered somewhere already ..
My laptop doesnt have any physical buttons for "Media Fast Forward" and "Media Rewind"... which are the global hotkeys set stock for the 10s skip fuction in MediaMonkey.
I can whip out the laptops remote to send this command .. but I really need a way to do it with the keyboard AS WELL (not excluding the original hotkey). Apologetic if this is covered somewhere already ..
-
- Posts: 23640
- Joined: Wed Aug 09, 2006 10:20 am
- Location: NJ, USA
- Contact:
Re: skip 10 or 20 seconds forward in a track?
Just make your own new hotkey at Options > Hotkeys.bumper wrote:Bumpity for this old one. Is it possible now?
My laptop doesnt have any physical buttons for "Media Fast Forward" and "Media Rewind"... which are the global hotkeys set stock for the 10s skip fuction in MediaMonkey.
I can whip out the laptops remote to send this command .. but I really need a way to do it with the keyboard AS WELL (not excluding the original hotkey). Apologetic if this is covered somewhere already ..
MediaMonkey user since 2006
Need help? Got a suggestion? Can't find something?
Please no PMs in reply to a post. Just reply in the thread.
Need help? Got a suggestion? Can't find something?
Please no PMs in reply to a post. Just reply in the thread.
Re: skip 10 or 20 seconds forward in a track?
Peke wrote:One of benefits of MediaMonkey you can easily add new feature if you want
Save this Code to Scripts\Auto under name fwdrewbuttons.vbs and restart MM you will get two buttons that will fwd rew on entered number seconds (10 By default)Code: Select all
Dim pltime 'time in seconds pltime = 10 Sub OnStartup Dim rew10 Set rew10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("rew10") = rew10 rew10.Caption = "Rewind "&pltime&" seconds" rew10.OnClickFunc = "Rewind" rew10.UseScript = Script.ScriptPath rew10.IconIndex = 0 rew10.Hint = "Clicking on this will rewind playing track "&pltime&" seconds" Dim fwd10 Set fwd10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("fwd10") = fwd10 fwd10.Caption = "Forward "&pltime&" seconds" fwd10.OnClickFunc = "Forward" fwd10.UseScript = Script.ScriptPath fwd10.IconIndex = 4 fwd10.Hint = "Clicking on this will forward playing track "&pltime&" seconds" End Sub Sub Forward(arg) Script.Reload(Script.ScriptPath) if (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime+(pltime*1000) > SDB.Player.CurrentSongLength) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime+(pltime*1000) end If End If End Sub Sub Rewind(arg) Script.Reload(Script.ScriptPath) If (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime-(pltime*1000) < 0) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime-(pltime*1000) end if End if End sub
Hey Peke,
Thanks for this. Can this be made into a function I can bind to hotkeys? If so, how?
Thanks much.
J.
Re: skip 10 or 20 seconds forward in a track?
Hi
Just want to revive this thread, as the script is awesome, cant believe i lived without it for so long
Would it be possible to link those buttons to hot keys? I tried in the configuration/options area, but only standard functions can be linked there. So it looks like the script might need to be edited, which I unfortunately do not know how to do.
Thanks!
MediaMonkey rocks!!!!!!!
Just want to revive this thread, as the script is awesome, cant believe i lived without it for so long
Would it be possible to link those buttons to hot keys? I tried in the configuration/options area, but only standard functions can be linked there. So it looks like the script might need to be edited, which I unfortunately do not know how to do.
Thanks!
MediaMonkey rocks!!!!!!!
Re: skip 10 or 20 seconds forward in a track?
Super gadget ! Thanks. I often use MediaMonkey for running foreign language podcasts. If I don't immediately understand a word I can zip back 5 seconds with this "5-second rewind" button. The perfect solution.Peke wrote:One of benefits of MediaMonkey you can easily add new feature if you want
Save this Code to Scripts\Auto under name fwdrewbuttons.vbs and restart MM you will get two buttons that will fwd rew on entered number seconds (10 By default)Code: Select all
Dim pltime 'time in seconds pltime = 10 Sub OnStartup Dim rew10 Set rew10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("rew10") = rew10 rew10.Caption = "Rewind "&pltime&" seconds" rew10.OnClickFunc = "Rewind" rew10.UseScript = Script.ScriptPath rew10.IconIndex = 0 rew10.Hint = "Clicking on this will rewind playing track "&pltime&" seconds" Dim fwd10 Set fwd10 = SDB.UI.AddMenuItem(SDB.UI.Menu_TbStandard, 0, 0) SDB.Objects("fwd10") = fwd10 fwd10.Caption = "Forward "&pltime&" seconds" fwd10.OnClickFunc = "Forward" fwd10.UseScript = Script.ScriptPath fwd10.IconIndex = 4 fwd10.Hint = "Clicking on this will forward playing track "&pltime&" seconds" End Sub Sub Forward(arg) Script.Reload(Script.ScriptPath) if (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime+(pltime*1000) > SDB.Player.CurrentSongLength) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime+(pltime*1000) end If End If End Sub Sub Rewind(arg) Script.Reload(Script.ScriptPath) If (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then If Not (SDB.Player.PlaybackTime-(pltime*1000) < 0) Then SDB.Player.PlaybackTime = SDB.Player.PlaybackTime-(pltime*1000) end if End if End sub
Re: skip 10 or 20 seconds forward in a track?
For those wanting shortcuts instead of buttons, this works for me:
Store this in a file 'fastforward.vbs' in /Scripts, not in /Scripts/Auto
Then add 2 shortcuts by adding the following code at the end of /Scripts/Scripts.ini:
Now you can fast forward 20 seconds with . and rewind 10 seconds with ,
Change the Shortcut= to your own preferences. See http://www.mediamonkey.com/wiki/index.p ... _scripting for more info on the Shortcut=
Thank you all for the original script!
Store this in a file 'fastforward.vbs' in /Scripts, not in /Scripts/Auto
Code: Select all
Sub Forward
Dim pltime
'ffwd time in seconds
pltime = 20
'Script.Reload(Script.ScriptPath)
if (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then
If Not (SDB.Player.PlaybackTime+(pltime*1000) > SDB.Player.CurrentSongLength) Then
SDB.Player.PlaybackTime = SDB.Player.PlaybackTime+(pltime*1000)
end If
End If
End Sub
Sub Rewind
Dim pltime
'rewind time in seconds
pltime = 10
'Script.Reload(Script.ScriptPath)
If (SDB.Player.isPlaying) And (Not SDB.Player.isStartingPlayback) Then
If Not (SDB.Player.PlaybackTime-(pltime*1000) < 0) Then
SDB.Player.PlaybackTime = SDB.Player.PlaybackTime-(pltime*1000)
end if
End if
End sub
Code: Select all
[FastForward]
FileName=fastforward.vbs
ProcName=Forward
Order=60
DisplayName=Fast Forward 20
Description=Fast Forwards 20 seconds
Language=VBScript
ScriptType=0
Shortcut=.
[FastRewind]
FileName=fastforward.vbs
ProcName=Rewind
Order=61
DisplayName=Fast Rewind 10
Description=Fast Rewinds 10 seconds
Language=VBScript
ScriptType=0
Shortcut=,
Change the Shortcut= to your own preferences. See http://www.mediamonkey.com/wiki/index.p ... _scripting for more info on the Shortcut=
Thank you all for the original script!
-
- Posts: 67
- Joined: Mon Feb 11, 2008 4:24 pm
- Location: Seattle, WA
Re: skip 10 or 20 seconds forward in a track?
Thank you both! I needed these scripts.
For the hotkey script: FYI, you can set additional hotkeys for them in the Options>>Hotkeys dialog. They are under the heading "General: Execute Script:" in the new hotkey dropdown. I set them to Right and Left arrow keys. Then I made them Global. My mouse's scroll wheel happens to use the same shortcuts when I "tilt" it left or right. Very convenient as a remote control for audiobooks, videos and podcasts. The arrow keys no longer work normally while MM is open though, so I might try something else later.
As an aside, all of the "CODE:" text here copied 4 spaces in front of each line into the scripts in notepad. Caused a problem when pasting the text into the Scripts.ini file so I edited them out. The other .vbs files had no problem with the spaces. Weird that the CODE: wrapper did that?
For the hotkey script: FYI, you can set additional hotkeys for them in the Options>>Hotkeys dialog. They are under the heading "General: Execute Script:" in the new hotkey dropdown. I set them to Right and Left arrow keys. Then I made them Global. My mouse's scroll wheel happens to use the same shortcuts when I "tilt" it left or right. Very convenient as a remote control for audiobooks, videos and podcasts. The arrow keys no longer work normally while MM is open though, so I might try something else later.
As an aside, all of the "CODE:" text here copied 4 spaces in front of each line into the scripts in notepad. Caused a problem when pasting the text into the Scripts.ini file so I edited them out. The other .vbs files had no problem with the spaces. Weird that the CODE: wrapper did that?
My current favorite software: MediaMonkey Gold!