MediaMonkey forum

This script is REBORN for Windows 8/8.1. (tested only in 8.1 but should work in 8.0).

I want to personally give a BIG thank you to folks over at The Old Timers Guild for taking the time to dissect and fix this VB script so it will work correctly in Windows 8.1. I also want to thank the folks over at DSLReports for attempting to fix this VB script.

I am no VB script person at all, but I do know it was no simple task. Several hours were spent by folks reprogramming the script, then them giving it to me to test in MediaMonkey. Our time was worth it, so enjoy this script once again!

I also want to give thanks to PolarisMail for hosting the file for us so people can once again down load it.

Last, but not least, I want to thank the original poster, spitzer, for creating the original file so folks had a template to work from.

Download the new file here.

Included is a screen shot of my full desktop to give an idea of the aspect ratio of the BigNowPlaying script in relation to MediaMonkey running at full screen. In this screenshot my screen is running at 1920 x 1080, but I also loaded this script up on another computer running 1680 x 1050, and it auto scaled. ENJOY!

I figured out how to turn this thang on and off.

To setup:

1. Navigate to your Media Monkey scripts (program files \ mediamonkey \ scripts)
2. Cut the BigNowPlaying.VBS from your Auto folder and put it in the scripts folder. we don't want it to auto run anymore.
3. open the BigNowPlaying.VBS and find the Sub handlerDocumentOnClick
a) see the line objNowPlayingForm.Common.Visible = False?
b) on the next line add this: " shutDown" . make it look like the code section A below.
c) what that does is terminates the form/script when you click it.
d) save the file and close

4. In the same folder (scripts folder) edit the Scripts.INI
a) copy the code in Code Section B below and paste it in there.
b) I put it in after the Auto Increment script but I don't think the order matters
c) save the file. what this does is add the "BIg Now Playing" Script as an item on your Tools->Scripts menu.

5. Close Media monkey and restart.


Now, play a song. The Big Now playing doesn't come up. This is fine for when you are working on the PC and don't want that big gorram window in your face.
But now you are going across the room (or going to bed in my case) and you want to see the Big Titles. So go to your Tools->Scripts and click your Big Now Playing.
Now on the next song you go to the Big Now playing window will popup. It will stay open as you skip through songs.
To get rid of it just click the big now playing window like you did before. It will go away and stay away. Then when you want it back just go to the TOols->Scripts and click it again.


//CODE SECTION A: BIGNOWPLAYING.VBS FILE

Sub handlerDocumentOnClick

'MsgBox "handlerNowPlayingFormOnClick called."


objNowPlayingForm.Common.Visible = False
shutDown

End Sub



//CODE SECTION B: SCRIPTS.INI

[bigNowPlaying]
FileName=bigNowPlaying1.4.vbs
ProcName=OnStartup
Order=11
DisplayName=Big Now Playing
Description=Big Now Playing
Language=VBScript
ScriptType=0

oh and i decided i wanted the window to pop up for the song i am listening to when i hit big now playing. instead of waiting for the next song to play before coming up.

to do that:

open the bignowplaying.vbs and paste this line

createNowPlayingWindow

at the bottom of the OnStartup sub. like code section C below.
What this does is create the window as soon as the script starts.

Sub OnStartup

'MsgBox "OnStartup called."

'Register needed events
Script.RegisterEvent SDB, "OnPlay", "handlerOnPlay"

'Get screen size
Dim objWMIService, colItems, objItem
Dim intHorizontal, intVertical
Set objWMIService = GetObject("Winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_VideoController")
For Each objItem in colItems
intHorizontal = objItem.CurrentHorizontalResolution
intVertical = objItem.CurrentVerticalResolution
Next

'Set screen size - test
'Dim intHorizontal, intVertical

'intHorizontal = 1024
'intVertical = 768

NowPlayingWindowWidth = intHorizontal - 2 * SCREEN_MARGIN
NowPlayingWindowHeight = intVertical - 2 * SCREEN_MARGIN

createNowPlayingWindow

End Sub

I have been looking, literally for years for something like this. It seems like such a basic thing that many people would want or need. Thank you to all who created or worked on this script. It works perfectly on my Windows 10 machine.

SammyDog wrote:I have been looking, literally for years for something like this. It seems like such a basic thing that many people would want or need. Thank you to all who created or worked on this script. It works perfectly on my Windows 10 machine.

Thanks for letting us know it works on Windows 10 too

The download link is down.
Has anybody a copy?

It works for me. Have you tried it in the last 30 minutes?

cyd wrote:The download link is down.
Has anybody a copy?

Thanks for letting me know. I have updated the link with a new download location.

The link now works again.

Perfect! Thank you

cyd wrote:Perfect! Thank you

You are welcome.

EvilPeppard wrote:This script is REBORN for Windows 8/8.1. [...]

Download the new file here.

I appreciate all the work that went into the script. However, it is in vain if it cannot be used because unfortunately the link does not work anymore.
Would it not be possible to host it at MediaMonkey?
Thanks,
Gábor

Just to confirm, the link is dead with me too. Site says something like "File cannot be found on the server"

MMFrLife wrote:Just to confirm, the link is dead with me too. Site says something like "File cannot be found on the server"

Yeah, I am no longer using that hosting service.

I will see about getting a new link up. In the meantime, if you are interested in the file, you can PM me your email address and I can email you a ZIP file of the script.

Peke can host it if you want. You can contact him via PM.

Hi,
Certainly if it ok with you I can host it without problems. Log on or send me PM with DL link.