Mit diesem Skript können Sie die Namen von Künstlern stapelweise in „Nachname, Vorname“ umbenennen. Dies funktioniert natürlich auch mit Zweitnamen: „Vorname Zweitname Nachname“ -> „Nachname, Vorname Zweitname“. Sie können damit drei Arten von Ausnahmen auflisten: ganze Künstler, Präfixe und Postfixe. Der umgekehrte Weg ist auch möglich, indem Sie die Modusvariable ändern, obwohl dabei die Präfixe und Postfixe ignoriert werden.

This script allows you to batch rename artists "Firstname Lastname" to "Lastname, Firstname". This of course works with middlenames: "Firstname Middlename Lastname" -> "Lastname, Firstname Middlename". It allows you to list three kinds of exception, whole artists, prefixes and postfixes. The reverse is also possible by changing the mode variable, although this ignores the prefixes and postfixes.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 03/02/2012

Massenumbenennung von Titeln der ausgewählten Songs aus der Zwischenablage

Bulk renaming of titles of the selected songs from the clipboard

Hide original

By Oleg Chervyakov
Erstellt von cholv
Aktualisiert 02/06/2016

Dieses Skript löscht ein einzelnes Feld (wie vom Benutzer angegeben) für alle ausgewählten Titel. Dieser Feldname muss die SongData-Eigenschaftswerte enthalten, die in der Skript-Hilfedatei zu finden sind – diese stimmen normalerweise mit den Spaltenüberschriften überein. Dieses Skript ist nützlich, wenn ein Feld für eine große Anzahl von Titeln gelöscht wird, da es im Hintergrund arbeitet.

This script clears out a single field (as specified by the user) for all the selected tracks. This field name must be the SongData property values which can be found in the scripting helpfile - these normally match the column headings. This script is useful when clearing out a field for a large number of tracks as it works in the background.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 26/07/2014

Dieses Skript sucht nach der Zeichenfolge, die Sie zur Darstellung der CD-Nummer im Albumnamen "(CD1)" verwenden, entfernt "(CD1)" und konvertiert die Titelnummer von 1 in 101 (usw.). Es gibt jetzt auch Prozesse zum Konvertieren von "(CD1)" in "" und von CD in 1 sowie zum Konvertieren von Titel "101" in CD=1 und Titel=1.

This script looks for the string you use to represent disc number in the album name " (CD1)" and removes " (CD1)" and converts the track number from 1 to 101 (etc). There are now also processes to convert " (CD1)" into "" and disk to 1, and also to convert track "101" to disk=1 and track=1.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 26/12/2012

Überprüft alle ausgewählten Titel auf Künstler, die nicht mit „The“ beginnen, aber beginnen sollten (z. B. The Beatles) und fügt das Präfix hinzu. Die benutzerdefinierte Liste ermöglicht internationale Künstler. Findet Nichtübereinstimmungen in Ihrer Bibliothek und zeigt ein Bestätigungsfeld an, bevor Ihre Datenbank beeinflusst wird.

Checks all selected tracks for artists that do not have The in front but should (ie. The Beatles) and adds the prefix. User definable list allows for international artists. Finds mismatches in your library and shows a confirmation box before affecting your database.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 03/02/2012

Überprüft alle ausgewählten Titel auf ..., The und korrigiert auf The .... Nützlich für diejenigen, die versucht haben, das Sortierproblem vor MM2.5 zu umgehen und nun ihre Sammlung korrigieren möchten. Ein Bestätigungsfenster wird angezeigt, damit Änderungen angezeigt werden können, bevor sie wirksam werden. Ermöglicht Ihnen die Eingabe einer Liste mit „The“-Wörtern, was internationale Benutzer berücksichtigt.

Checks all selected tracks for ..., The and corrects to The .... Useful for those who tried to get around the sort issue before MM2.5 and now wish to correct their collection. Confirmation box is launched so changes can be viewed before they take effect. Allows you to enter a list of "The" words, allowing for international users.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 03/02/2012

Dieses Skript liest den Songtext-Tag des abgespielten Lieds und ermöglicht Ihnen das einfache Hinzufügen grundlegender Zeitstempel. Es hebt die aktuell abgespielte Zeile hervor, damit Sie den bisherigen Fortschritt leicht erkennen und die Zeiten entsprechend anpassen können.

Wird in einem andockbaren Panel angezeigt, das mit dem aktuell wiedergegebenen Titel aktualisiert wird. Loop-Funktion enthalten, um das Optimieren von Zeitstempeln zu erleichtern.

Ist jetzt ein vollwertiger Editor mit Optionen zum Hinzufügen, Bearbeiten und Löschen der Liedtextzeilen. Liedtexte werden auch automatisch aus EvilLyrics importiert.

This script reads the lyrics tag for the playing song and allows you to easily add basic timestamps. It highlights the currently playing line to make it easy to see progress so far and adjust times accordingly.

Displays in a dockable panel which updates with the currently playing track. Loop feature included to ease perfecting timestamps.

Is now a full editor with options to add, edit and delete the lyric lines as well. Lyrics are also imported from EvilLyrics automatically.

Hide original

By trixmoto
Erstellt von trixmoto
Aktualisiert 03/08/2014

Überprüft alle ausgewählten Titel auf „The ...“ und korrigiert sie auf „..., The“. Es wird darum gebeten, das Gegenteil des Originalskripts zu tun (nachgestelltes „The“ korrigieren). Ein Bestätigungsfenster wird angezeigt, damit die Änderungen angezeigt werden können, bevor sie wirksam werden. Ermöglicht Ihnen die Eingabe einer Liste mit „The“-Wörtern, was internationale Benutzer ermöglicht.

Checks all selected tracks for The ... and corrects to ..., The. Requested to do the opposite of the original script (Fix Trailing The). Confirmation box is launched so changes can be viewed before they take effect. Allows you to enter a list of "The" words, allowing for international users.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 03/02/2012

Ich habe dieses Skript erstellt, um Ihnen mit nur einem Klick Zugriff auf mehrere Stimmungen zu geben.
Es funktioniert nur für das aktuell wiedergegebene Lied.
Sie müssen es im Abschnitt „Automatische Skripte“ als VBS-Datei speichern und Media Monkey neu laden. Es wird ein andockbares Panel erstellt. Wenn Sie das Panel schließen, können Sie es wieder öffnen, indem Sie zum Menü „Ansicht“ gehen, nach unten gehen und dort „Mood Setting Panel“ aufrufen.

Wenn Sie eines der Stimmungs-Kontrollkästchen anklicken, wird diese zur Stimmung des Songs hinzugefügt, sofern sie nicht bereits dort steht. Außerdem werden Semikolons für mehrere Stimmungen hinzugefügt.

Indem Sie den folgenden Code an den von mir markierten Stellen bearbeiten, können Sie die Position und Anzahl der Kontrollkästchen sowie die Genres ändern, die sie festlegen sollen.

Es sollte einfach genug sein, den Code zu ändern, um ein weiteres Fenster zu erstellen, in dem Sie dasselbe mit Anlässen oder anderen Textfeldern tun können.

Ich kenne mich kaum mit VBScript- oder Mediamonkey-Programmierung aus, daher kann ich diesbezüglich keine Anfragen erfüllen. Jemand mit mehr Zeit und Lust kann das für Sie übernehmen!
Genießen

Ich möchte dem Entwicklerteam von Mediamonkey dafür danken, dass sie ein so fantastisches Produkt entwickelt haben, mit dem man so viel selbst machen und es dann mit Code erweitern kann. Einfach besser als iTunes.


[Code]



Dim Mnu, Pnl, Lbl, Lbl2

Sub beim Start
UI festlegen = SDB.UI

Setzen Sie Pnl = UI.NewDockablePersistentPanel("TestingPanel")
wenn Pnl.IsNew dann
Pnl.Angedockt = 2
Pnl.Gemeinsame.Breite = 250
Ende, wenn
Pnl.Caption = "Stimmungseinstellungsfeld"
Script.RegisterEvent Pnl, "BeimSchließen", "PnlSchließen"

Setze Lbl = UI.NewLabel(Pnl)
Lbl.Autosize = false
Lbl.Multiline = true
Lbl.Common.SetRect 10, 10, Pnl.Common.Breite-20, Pnl.Common.Höhe-20
Lbl.Common.Anchors = 15 '1+2+4+8

'ändere nichts oberhalb dieser Zeile


' VERWENDEN SIE DIESEN TEIL, UM Kontrollkästchen GENRE und Position zu bearbeiten
'Ändern Sie die Kontrollkästchenbeschriftungen in die gewünschten Genres
'Verwenden Sie "SetRect", um die Position jedes Kontrollkästchens zu ändern
'Kopieren Sie 6 Zeilen Kontrollkästchencode, um ein neues Kontrollkästchen hinzuzufügen
'Alle Klicks auf Kontrollkästchen werden vom 1 Eventhandler unten verarbeitet.
', das sich die Überschrift des Steuerelements ansieht, das es aufruft



Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 0, 100, 20
'links, oben, Breite, Höhe
ChB.Caption = "Episch"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 0, 100, 20
ChB.Caption = "Entschlossen"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 20, 100, 20
ChB.Caption = "Traurig"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 20, 100, 20
ChB.Caption = "Glücklich"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 40, 100, 20
ChB.Caption = "Ätherisch"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 40, 100, 20
ChB.Caption = "Friedlich"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 60, 100, 20
ChB.Caption = "Doof"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 60, 100, 20
ChB.Caption = "Gruselig"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 80, 100, 20
ChB.Caption = "Wütend"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 80, 100, 20
ChB.Caption = "Romantisch"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"

Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 100, 100, 20
ChB.Caption = "Abenteuerlich"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 100, 100, 20
ChB.Caption = "Beliebt"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze Chb = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 120, 100, 20
ChB.Caption = "Cool"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"


Setze ChB = UI.NewCheckBox( Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 120, 100, 20
ChB.Caption = "Spaß"
Script.RegisterEvent ChB.Common, "BeimKlick", "ChBClick"







''ändern Sie nichts unterhalb dieser Zeile


' Menüelement hinzufügen, das das Panel anzeigt, nachdem es geschlossen wurde
Setze Sep = SDB.UI.AddMenuItemSep(SDB.UI.Menu_View,0,0)
Setze Mnu = SDB.UI.AddMenuItem(SDB.UI.Menu_View,0,0)
Mnu.Caption = "Stimmungseinstellungsfeld"
Mnu.Checked = Pnl.Common.Visible
Script.RegisterEvent Mnu, „Beim Klicken“, „Panel anzeigen“

Script.RegisterEvent SDB, „OnChangedSelection“, „OnSelection“
Ende Sub

Untergeordnetes ShowPanel (Element)
Pnl.Common.Visible = nicht Pnl.Common.Visible
Mnu.Checked = Pnl.Common.Visible
Ende Sub

Sub PnlClose(Artikel)
Mnu.Checked = false
Ende Sub

Sub bei Auswahl

Ende Sub


Sub ChBClick( ChB)



Dim objSongList, objSongData
Setzen Sie objSongList = SDB.NewSongList

Setzen Sie objSongData = SDB.Player.CurrentSong
objSongList.Add(objSongData)

Dimmen Sie StringMood, StringNewMood, StringAddMood
StringMood = objSongData.Mood

StringAddMood = ";" & ChB.Caption


Wenn InStr(StringMood,ChB.Caption) = 0, dann
„Old Mood enthält nicht das, was Sie überprüft haben.“
StringNewMood = StringMood & StringAddMood

objSongData.Mood = StringNewMood
objSonglist.UpdateAll

End If ' Falls Old Mood New Mood enthält, wird keine Aktion ausgeführt.
ChB.Checked = false

Ende Sub





[/Code]

I made this script to give you one-click access to multiple moods.
It only works for the currently PLAYING song.
You need to save it in the Auto scripts section as a .vbs file, and reload media monkey.  It will create a dockable panel.  If you close the panel you can reopen it by going to the View menu, go to the bottom, and it's "Mood Setting Panel"

When you click one of the mood checkboxes, it adds that to the mood for the song if it's not already on there.  It also adds the semicolons for multiple moods.

By editing the below code in the places I marked out, you can change the position and number of the checkboxes as well as the genres you want them to set.

It should be easy enough to modify the code to make another panel that lets you do the same thing with Occasions or any other text field. 

I hardly know VBScript or Mediamonkey programming so any requests on this I will not be able to do, someone with more time and inclination can pick that up for you!
Enjoy

I would like to thank Mediamonkey's dev team for making such an awesome product that allows you to do so much on its own, and then expand it using code.  Beats Itunes easy.


[code]

 
 
Dim Mnu, Pnl, Lbl, Lbl2
 
Sub OnStartup
  Set UI = SDB.UI
 
  Set Pnl = UI.NewDockablePersistentPanel("TestingPanel")
  if Pnl.IsNew then
    Pnl.DockedTo = 2
    Pnl.Common.Width = 250
  end if
  Pnl.Caption = "Mood Setting Panel"
  Script.RegisterEvent Pnl, "OnClose", "PnlClose"
 
  Set Lbl = UI.NewLabel(Pnl)
  Lbl.Autosize = false
  Lbl.Multiline = true
  Lbl.Common.SetRect 10, 10, Pnl.Common.Width-20, Pnl.Common.Height-20
  Lbl.Common.Anchors = 15  '1+2+4+8

'don't change anything above this line


' USE THIS PART TO EDIT CHECK BOXES GENRE and position
'Change Checkbox Captions to Genres you want
'Use "SetRect" to change position of each checkbox
'Copy paste 6 lines of checkbox code to add a new checkbox
'All clicks to checkboxes are handled by the 1 event handler at the bottom
'which looks at the caption of the control that calls it



 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 0, 100, 20
'left, top, width, height
  ChB.Caption = "Epic"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 0, 100, 20
  ChB.Caption = "Determined"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 20, 100, 20
  ChB.Caption = "Sad"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 20, 100, 20
  ChB.Caption = "Happy"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 40, 100, 20
  ChB.Caption = "Ethereal"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 40, 100, 20
  ChB.Caption = "Peaceful"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 60, 100, 20
  ChB.Caption = "Goofy"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 60, 100, 20
  ChB.Caption = "Scary"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 80, 100, 20
  ChB.Caption = "Angry"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 80, 100, 20
  ChB.Caption = "Romantic"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"

 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 100, 100, 20
  ChB.Caption = "Adventurous"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 100, 100, 20
  ChB.Caption = "Popular"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set Chb = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 3, 120, 100, 20
  ChB.Caption = "Cool"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


 Set ChB = UI.NewCheckBox( Pnl)
  ChB.Common.ControlName = "ChB"
 ChB.Common.SetRect 123, 120, 100, 20
  ChB.Caption = "Fun"
  Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"







''don't change anything below this line

 
  ' Add menu item that shows panel after it is closed
  Set Sep = SDB.UI.AddMenuItemSep(SDB.UI.Menu_View,0,0)
  Set Mnu = SDB.UI.AddMenuItem(SDB.UI.Menu_View,0,0)
  Mnu.Caption = "Mood Setting Panel"
  Mnu.Checked = Pnl.Common.Visible
  Script.RegisterEvent Mnu, "OnClick", "ShowPanel"
 
  Script.RegisterEvent SDB, "OnChangedSelection", "OnSelection"
End Sub
 
Sub ShowPanel(Item)
  Pnl.Common.Visible = not Pnl.Common.Visible
  Mnu.Checked = Pnl.Common.Visible
End Sub
 
Sub PnlClose( Item)
  Mnu.Checked = false
End Sub
 
Sub OnSelection
 
End Sub


Sub ChBClick( ChB)



Dim objSongList   , objSongData
 Set objSongList = SDB.NewSongList  

 Set objSongData = SDB.Player.CurrentSong
 objSongList.Add(objSongData)   

Dim StringMood, StringNewMood, StringAddMood
 StringMood = objSongData.Mood

StringAddMood =  ";" & ChB.Caption


If InStr(StringMood,ChB.Caption) = 0 Then
'Old Mood does not contain the one you checked.
StringNewMood = StringMood & StringAddMood

objSongData.Mood = StringNewMood
objSonglist.UpdateAll          

End If '   If Old Mood contains New Mood, no action is taken.
ChB.Checked = false
                       
End Sub





[/code]

Hide original

By mutronbiphase
Erstellt von mutronbiphase
Aktualisiert 31/05/2012

Adds 2 tools that let users automatically or manually download and manage genres, moods and themes.Hide original

By roguesdt
Erstellt von roguesdt
Aktualisiert 01/02/2012

Mit diesem Skript können Präfixe und Suffixe entfernt werden. Wählen Sie zunächst die Titel aus, die Sie reparieren möchten, und führen Sie dann das Skript über das Menü aus. Sie erhalten einen Bildschirm, auf dem Sie die Präfixe und Suffixe angeben können, die entfernt werden sollen. Als Nächstes wird ein Bestätigungsbildschirm angezeigt, in dem die vorgenommenen Änderungen angezeigt werden. Wenn Sie auf „OK“ klicken, werden die Änderungen übernommen.

This script can be used to remove prefixes and suffixes. First select the tracks you want to fix, then run the script from the menu. You are presented with a screen where you can specify the prefixes and suffixes you wish to be removed. Next you will be presented with a confirmation screen showing the changes that will be made - clicking Ok will apply the changes.

Hide original

By Rik Lewis
Erstellt von trixmoto
Aktualisiert 03/02/2012

Bei manchen MP3-Dateien, insbesondere bei denen aus „Various Artists“-Sammlungen, sind Künstler und Titel leider im Titelfeld zusammengefasst („Beatles – Yes It Is“), während das Künstlerfeld normalerweise nur das Wort „Various“ enthält. Wenn Sie dieses Skript auf ausgewählte Dateien anwenden, erhalten Sie „Beatles“ als Künstler und „Yes It Is“ als Titel.

Hinweis: Diese Datei ist eine Textdatei und muss manuell als Add-on hinzugefügt werden.

Some MP3 files, particularly those from 'Various Artists' collections, unfortunately have the artist and title combined into the Title field, ("Beatles - Yes It Is") while the Artist field typically just has the word "Various". Running this script on selected files will leave you with "Beatles" for Artist and "Yes It Is" for Title.

Note: this file is a text file and must be manually added as an addon.

Hide original

By rhand
Erstellt von rhand
Aktualisiert 14/11/2013