Magic Nodes 4.2 w/ 380 masks & real GUI (2011-07-01)[MM2+]

[spacefish]

I agree, showing appreciation is great and I do it every chance I get.

I don't know, I guess I feel it just means more if I actually say something individual when I do, rather than pasting the same reply into many different threads -- at nearly the same time. That's not in good taste, IMO. Maybe my forum etiquette is just more sensitive since I'd likely shoot myself before I bumped so many threads at once with the SAME reply (bar the name change). But hey, whatever turns you on -- or me off as it were.

[Bex]

Yeah, perhaps a bit mechanic to copy/paste the same message in all threads but the intention behind the action is welcome, and so is your and other users compliments as well!

[sommo]

Hey!
Ok...
Well the reason why I did it was to say thanks - the only way which I can help you out!
I hope it would also show you that it still used and new people are using it, plus how helpfull it is!
Plus I also get a email now when anyone replys (for the reason, when you reply saying - updated, I can update mine!)

Sorry if that was wrong!

but still, a thank you for (updating) magic nodes, and adding new stuff

[spacefish]

sommo, it's great that you express your appreciation. It's just the way you did it that was a little suspect.

And for future reference, you don't need to post in a thread to subscribe to it, you can just hit that Subscribe topic link at the bottom of the page.

[ZvezdanD]

There is a new update (1.7.7) with added most requested options to the Option dialog box.

[onenonymous]

This just keeps getting better and better!

I've modified your code for the skinnedinputbox function to make the edit box for creating or editing the node into a multiline edit. This works for me to make long it easier to read/edit the long nodes - hope you don't mind my suggestion.

Code: Select all

Function SkinnedInputBox(LabelText, Caption, EditText)

    Dim Form, Label, Edt, btnOK, btnCancel, modalResult
    Dim Foot
    Dim lblWarning
    Dim DlgWidth

    DlgWidth = 480
    ' Create the window to be shown
    Set Form = SDB.UI.NewForm
    Form.BorderStyle = 2    ' Resizable
    Form.Common.SetRect 100, 100, DlgWidth, 180
    Form.Common.MinWidth = 350
    Form.Common.MinHeight = 180
    Form.Common.MaxHeight = 350
    Form.FormPosition = 4   ' Screen Center
    Form.Caption = Caption

    ' Create a panel at the bottom of the window
    Set Foot = SDB.UI.NewPanel(Form)
    Foot.Common.Align = 2
    Foot.Common.Height = 35

    ' Create a label
    Set Label = SDB.UI.NewLabel(Form)
    Label.Caption = LabelText
    Label.Common.Left = 5
    Label.Common.Top = 10

    Set Edt = SDB.UI.NewMultiLineEdit(Form)
    Edt.Common.Left = Label.Common.Left
    Edt.Common.Top = Label.Common.Top + Label.Common.Height + 5
    Edt.Common.Width = DlgWidth - 25
    Edt.Common.ControlName = "Edit1"
    Edt.Common.Anchors = 1 + 2 + 4 + 8 'Left+Top+Right
    Edt.Text = EditText
    Script.RegisterEvent Edt, "OnChange", "Edit_OnChange"

    Set lblWarning = SDB.UI.NewLabel(Foot)
    lblWarning.Caption = "The mask is not correct!"
    lblWarning.Common.Left = 10
    lblWarning.Common.Top = 10
    lblWarning.Common.Visible = False
    Set SDB.Objects("lblWarning") = lblWarning

    ' Create a button that closes the window
    Set btnOK = SDB.UI.NewButton(Foot)
    btnOK.Caption = "&OK"
    btnOK.Common.SetRect DlgWidth - 210, 6, 85, 24
    'btnOk.Common.Hint = "OK"
    btnOK.Common.Anchors = 4 + 8 'mmAnchorRight + mmAnchorBottom
    btnOK.UseScript = Script.ScriptPath
    If CurrentVersion() >= 204 Then btnOK.default = True
    btnOK.modalResult = 1
    Set SDB.Objects("btnOK") = btnOK

    Set btnCancel = SDB.UI.NewButton(Foot)
    btnCancel.Caption = "&Cancel"
    btnCancel.Common.SetRect DlgWidth - 110, 6, 85, 24
    'btnCancel.Common.Hint = "Cancel"
    btnCancel.Common.Anchors = 4 + 8 'mmAnchorRight + mmAnchorBottom
    btnCancel.UseScript = Script.ScriptPath
    If CurrentVersion() >= 204 Then btnCancel.Cancel = True
    btnCancel.modalResult = 2

    Form.SavePositionName = "Remember position"
    Edit_OnChange Edt
    modalResult = Form.ShowModal
    Set SDB.Objects("btnOK") = Nothing

    SkinnedInputBox = Cond(modalResult = 1, Edt.Text, "")

End Function

[ZvezdanD]

I've modified your code for the skinnedinputbox function to make the edit box for creating or editing the node into a multiline edit.

http://www.mediamonkey.com/forum/viewto ... 97#p143297

[onenonymous]

forgot I'd suggested it before... - Still - thanks for a great script...

[steelydan]

Forgive me. I know this appears lazy, but I have (briefly) been through the available topics but don't really comprehend what code I am looking for to acquire what I want. I have already installed the script and the included masks are very helpful. However, I have a certain task on mind.

I'd like a mask to specify a genre. After doing so, it would take one song from each album artist within the genre. After doing so, I would like it to play each song for exactly one minute (whether it starts at the beginning or middle of the song is not an issue).

In essence, I am looking for a mask that fulfills a power hour. One minute of a song, followed by another minute of another song, for 60 minutes.

(Genre:Rock | Song from each Album Artist | Play one minute of selected song (middle of song is favored) | 60 times)

Does this make sense? And if so, I am hoping that if someone helps me create this mask, I will gain a better understanding on how to create a script. Sorry if I am being annoying.

[ZvezdanD]

I am looking for a mask that fulfills a power hour. One minute of a song, followed by another minute of another song, for 60 minutes.

(Genre:Rock | Song from each Album Artist | Play one minute of selected song (middle of song is favored) | 60 times)

Sorry but it is not possible with this script. You can filter tracks by genre (Filter:<Genre> = 'Rock'), you can display only one song from each album artist (Filter:Songs.ID IN (SELECT Songs.ID FROM Songs, ArtistsAlbums, Artists WHERE Songs.IDAlbum = ArtistsAlbums.IDAlbum AND ArtistsAlbums.IDArtist = Artists.ID GROUP BY Artists.ID)), but you cannot play songs with this script. This is not its purpose. It is mainly intended for different database displays inside of the tree and the tracklist panels.

I don't know if such script exist which will play just one minute of each song from the tracklist panel. If it exist, you could use it in combination with Magic Nodes and mentioned filter(s).

[michaelarm]

I figured out how to rename moods, but I only see 7 choices of moods and I'd like more moods. How can I add a mood. Will this script help me do that?

[Bex]

Just add a mood of your choice to a track, it will then be added to the tree.

[Seeker]

Hadn't noticed this until today - it may be the way it is, it may be changeable.

My wife (not computer savvy) wanted Genre replaced by a new Genre (showing albums instead of artists).

Magic Nodes to the rescue - thanks to the wonderful work done on this, it was easy to do and is in the main tree [she'd have trouble with new trees - not much, but a little].

However, she also uses the "Track Browser" function a lot. When you click on a tree node (like album, artist, etc,) the track browser allows you to pick from it without opening the tree nodes. But when you click on the "new" Genre, the track browser is empty.

Any way to 'restock' (for lack of a better word) the track browser when you click on the Magic Nodes Genre node?

[Seeker]

The blank track browser also stays blank for all generated subnodes of the Magic Node item. (i.e. if you click on "New Age" in the normal genre node, you get the new age items in the track browser. In the magic nodes genre node, clicking on New Age also has a blank track browser, just like the top level Genre.

Hope that made sense - maybe it's easy to do, and just no one has noticed before, or maybe it's impossible to do.

[ZvezdanD]

The blank track browser also stays blank for all generated subnodes of the Magic Node item.

maybe it's easy to do, and just no one has noticed before, or maybe it's impossible to do.

Yes, this is noticed and reported several times before. Unfortunately, the answer is same as before - there is no possibility to implement this because MM developers didn't exposed necessary API functions for such thing. When/if they decide to do that, I would change the MN script.

BTW, I posted a message about that almost one year ago (http://www.mediamonkey.com/forum/viewto ... =2&t=19234) without any answer from MM developers.