skip 10 or 20 seconds forward in a track?

Post a reply

Smilies
:D :) :( :o :-? 8) :lol: :x :P :oops: :cry: :evil: :roll: :wink:

BBCode is ON
[img] is ON
[url] is ON
Smilies are ON

Topic review
   

Expand view Topic review: skip 10 or 20 seconds forward in a track?

Re: skip 10 or 20 seconds forward in a track?

by Erwin Hanzl » Thu Mar 05, 2020 7:43 am

I If you work with the two shortcuts: the two buttons "." and "," cannot be used for tag editing.
I have included this script in my toolbar.


Please add code.
I received error messages after selection from column browser

Code: Select all

Sub Forward
     on error resume next

Code: Select all

Sub Rewind
     on error resume next

Re: skip 10 or 20 seconds forward in a track?

by UpliftingPills » Tue Mar 03, 2020 5:12 pm

THANK YOU SOOOOOO MUCH!
Escay wrote: Tue Sep 20, 2011 3:57 pm For those wanting shortcuts instead of buttons, this works for me:

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
Then add 2 shortcuts by adding the following code at the end of /Scripts/Scripts.ini:

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=,
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!

Re: skip 10 or 20 seconds forward in a track?

by Peke » Thu Nov 01, 2018 6:25 pm

Have you tried Arrow keys in Full screen?

Re: skip 10 or 20 seconds forward in a track?

by gggirlgeek » Mon May 21, 2012 9:02 am

For the button script: the buttons worked well but when playing videos they are hidden no matter where I move them. It doesn't matter whether I'm in Fullscreen or simply maximized, there is no way to move the buttons beside the player module, or up to the menu bar (which are the only two "modules" shown while videos are playing). I tried skinned and unskinned modes too.

Fortunately, I have the mouse tilt button set to the shortcut key mentioned above, so this is a workaround for now.

I am thinking of using MM for more serious video watching because the sound is so much better than VLC. These buttons would be important in that case.

Suggestions?

Re: skip 10 or 20 seconds forward in a track?

by gggirlgeek » Mon May 21, 2012 8:46 am

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?

Re: skip 10 or 20 seconds forward in a track?

by Escay » Tue Sep 20, 2011 3:57 pm

For those wanting shortcuts instead of buttons, this works for me:

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
Then add 2 shortcuts by adding the following code at the end of /Scripts/Scripts.ini:

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=,
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!

Re: skip 10 or 20 seconds forward in a track?

by pacman10 » Fri Aug 19, 2011 6:06 am

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
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.

Re: skip 10 or 20 seconds forward in a track?

by fdiak » Fri Jun 03, 2011 3:38 pm

Hi
Just want to revive this thread, as the script is awesome, cant believe i lived without it for so long :D

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?

by JackFrost » Sun Oct 31, 2010 4:10 pm

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?

by nohitter151 » Fri Jul 09, 2010 8:10 am

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 ..
Just make your own new hotkey at Options > Hotkeys.

Re: skip 10 or 20 seconds forward in a track?

by bumper » Fri Jul 09, 2010 12:10 am

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 ..

Re: skip 10 or 20 seconds forward in a track?

by debu » Sun Sep 13, 2009 6:05 pm

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?

by debu » Mon Aug 31, 2009 1:58 pm

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

Re: skip 10 or 20 seconds forward in a track?

by Peke » Sun Aug 23, 2009 6:45 pm

You replied to redirected post ;) No Problem.

Re: skip 10 or 20 seconds forward in a track?

by Eyal » Sun Aug 23, 2009 5:40 pm

@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...

Top