Tento skript vám umožňuje dávkově přejmenovat umělce "Jméno Příjmení" na "Příjmení, Jméno". To samozřejmě funguje s prostředními jmény: "Firstname Middlename Lastname" -> "Lastname, Firstname Middlename". Umožňuje vypsat tři druhy výjimek, celé umělce, předpony a přípony. Opačný postup je také možný změnou proměnné mode, i když to ignoruje předpony a přípony.

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
Autor trixmoto
Aktualizováno 03/02/2012

Hromadné přejmenování názvů vybraných skladeb ze schránky

Bulk renaming of titles of the selected songs from the clipboard

Hide original

By Oleg Chervyakov
Autor cholv
Aktualizováno 02/06/2016

Tento skript vymaže jediné pole (jak je zadáno uživatelem) pro všechny vybrané stopy. Tento název pole musí být hodnoty vlastnosti SongData, které lze nalézt v souboru nápovědy pro skriptování – ty se obvykle shodují se záhlavími sloupců. Tento skript je užitečný při vyklízení pole pro velké množství stop, protože funguje na pozadí.

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
Autor trixmoto
Aktualizováno 26/07/2014

Tento skript hledá řetězec, který používáte k reprezentaci čísla disku v názvu alba " (CD1)" a odstraňuje " (CD1)" a převádí číslo stopy z 1 na 101 (atd.). Nyní existují také procesy pro převod " (CD1)" na "" a disku na 1 a také pro převod stopy "101" na disk=1 a stopu=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
Autor trixmoto
Aktualizováno 26/12/2012

Zkontroluje všechny vybrané skladby pro umělce, kteří nemají The vpředu, ale měli by (např. The Beatles) a přidá předponu. Uživatelsky definovatelný seznam umožňuje mezinárodní umělce. Najde neshody ve vaší knihovně a před ovlivněním databáze zobrazí potvrzovací pole.

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
Autor trixmoto
Aktualizováno 03/02/2012

Zkontroluje všechny vybrané stopy na ..., The a opraví na The .... Užitečné pro ty, kteří se snažili obejít problém řazení před MM2.5 a nyní chtějí opravit svou sbírku. Spustí se potvrzovací pole, takže změny lze zobrazit dříve, než se projeví. Umožňuje zadat seznam slov „The“, což umožňuje mezinárodním uživatelům.

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
Autor trixmoto
Aktualizováno 03/02/2012

Tento skript čte textovou značku přehrávané písně a umožňuje snadno přidávat základní časová razítka. Zvýrazňuje aktuálně hrající linii, aby bylo snadné vidět dosavadní pokrok a podle toho upravit časy.

Zobrazí se na dokovatelném panelu, který se aktualizuje podle aktuálně přehrávané stopy. Součástí je funkce smyčky pro usnadnění zdokonalování časových razítek.

Je nyní plnohodnotným editorem s možnostmi přidávat, upravovat a mazat také textové řádky. Texty jsou také importovány z EvilLyrics automaticky.

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
Autor trixmoto
Aktualizováno 03/08/2014

Zkontroluje všechny vybrané stopy na The ... a opraví na ..., The. Požadováno provést opak původního skriptu (Fix Trailing The). Spustí se potvrzovací pole, takže změny lze zobrazit dříve, než se projeví. Umožňuje zadat seznam slov „The“, což umožňuje mezinárodním uživatelům.

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
Autor trixmoto
Aktualizováno 03/02/2012

Vytvořil jsem tento skript, abych vám jedním kliknutím umožnil přístup k více náladám.
Funguje pouze pro aktuálně PŘEHRÁVAJÍCÍ skladbu.
Musíte jej uložit v sekci Automatické skripty jako soubor .vbs a znovu načíst mediální opici. Vytvoří dokovatelný panel. Pokud panel zavřete, můžete jej znovu otevřít tak, že přejdete do nabídky Zobrazit, přejděte dolů a je to „Panel nastavení nálady“

Když kliknete na jedno ze zaškrtávacích políček nálady, přidá se to k náladě skladby, pokud tam ještě není. Přidá také středníky pro více nálad.

Úpravou níže uvedeného kódu na místech, která jsem označil, můžete změnit polohu a počet zaškrtávacích políček a také žánry, které chcete nastavit.

Mělo by být dost snadné upravit kód tak, aby se vytvořil další panel, který vám umožní dělat to samé s příležitostmi nebo jakýmkoli jiným textovým polem.

Sotva se vyznám v programování VBScript nebo Mediamonkey, takže jakékoliv požadavky na to nezvládnu, někdo, kdo má více času a chuti, to za vás vyzdvihne!
Užijte si to

Rád bych poděkoval vývojářskému týmu Mediamonkey za vytvoření tak úžasného produktu, který vám umožňuje tolik dělat sám o sobě a poté jej rozšířit pomocí kódu. Beats Itunes snadno.


[kód]



Dim Mnu, Pnl, Lbl, Lbl2

Sub OnStartup
Nastavit UI = SDB.UI

Set Pnl = UI.NewDockablePersistentPanel("TestingPanel")
pokud Pnl.IsNew pak
Pnl.DockedTo = 2
Pnl.Common.Width = 250
konec pokud
Pnl.Caption = "Panel nastavení nálady"
Script.RegisterEvent Pnl, "OnClose", "PnlClose"

Nastavit 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

"Neměňte nic nad tímto řádkem."


' TUTO ČÁST POUŽÍVEJTE K ÚPRAVĚ ZAŠKRTOVACÍCH POLÍČEK ŽÁNR a pozice
'Změňte titulky zaškrtávacích políček na žánry, které chcete
'Pomocí "SetRect" změňte polohu každého zaškrtávacího políčka
'Zkopírujte a vložte 6 řádků kódu zaškrtávacího políčka a přidejte nové zaškrtávací políčko
'Všechna kliknutí na zaškrtávací políčka jsou zpracována obslužnou rutinou události 1 ve spodní části
'který se dívá na titulek ovládacího prvku, který jej volá



Nastavit ChB = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 0, 100, 20
'vlevo, nahoře, šířka, výška
ChB.Caption = "Epic"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


Nastavit ChB = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 0, 100, 20
ChB.Caption = "Určeno"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


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


Nastavit ChB = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 20, 100, 20
ChB.Caption = "Šťastný"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


Nastavit Chb = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 40, 100, 20
ChB.Caption = "Éterický"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


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


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


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


Nastavit Chb = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 80, 100, 20
ChB.Caption = "Naštvaný"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


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

Nastavit Chb = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 3, 100, 100, 20
ChB.Caption = "Dobrodružný"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


Nastavit ChB = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 100, 100, 20
ChB.Caption = "Populární"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"


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


Nastavit ChB = UI.NewCheckBox(Pnl)
ChB.Common.ControlName = "ChB"
ChB.Common.SetRect 123, 120, 100, 20
ChB.Caption = "Zábava"
Script.RegisterEvent ChB.Common, "OnClick", "ChBClick"







''pod tímto řádkem nic neměňte


' Přidat položku nabídky, která zobrazí panel po jeho zavření
Nastavit září = SDB.UI.AddMenuItemSep(SDB.UI.Menu_View,0,0)
Set Mnu = SDB.UI.AddMenuItem(SDB.UI.Menu_View,0,0)
Mnu.Caption = "Panel nastavení nálady"
Mnu.Checked = Pnl.Common.Visible
Script.RegisterEvent Mnu, "OnClick", "ShowPanel"

Script.RegisterEvent SDB, "OnChangedSelection", "OnSelection"
End Sub

Sub ShowPanel (Item)
Pnl.Common.Visible = není Pnl.Common.Visible
Mnu.Checked = Pnl.Common.Visible
End Sub

Sub PnlClose (položka)
Mnu.Checked = false
End Sub

Sub OnSelection

End Sub


Sub ChBClick( ChB)



Dim objSongList , objSongData
Nastavit objSongList = SDB.NewSongList

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

Ztlumit StringMood, StringNewMood, StringAddMood
StringMood = objSongData.Mood

StringAddMood = ";" & ChB.Titulek


If InStr(StringMood,ChB.Caption) = 0 Pak
„Old Mood neobsahuje tu, kterou jste zaškrtli.
StringNewMood = StringMood & StringAddMood

objSongData.Mood = StringNewMood
objSonglist.UpdateAll

End If ' Pokud Old Mood obsahuje New Mood, neprovede se žádná akce.
ChB.Checked = false

End Sub





[/kód]

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
Autor mutronbiphase
Aktualizováno 31/05/2012

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

By roguesdt
Autor roguesdt
Aktualizováno 01/02/2012

Tento skript lze použít k odstranění předpon a přípon. Nejprve vyberte stopy, které chcete opravit, a poté spusťte skript z nabídky. Zobrazí se obrazovka, kde můžete zadat předpony a přípony, které chcete odstranit. Dále se zobrazí potvrzovací obrazovka zobrazující změny, které budou provedeny - kliknutím na OK se změny použijí.

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
Autor trixmoto
Aktualizováno 03/02/2012

Některé soubory MP3, zejména soubory ze sbírek „Various Artists“, mají bohužel umělce a název sloučený do pole Název ("Beatles - Yes It Is"), zatímco pole Artist obvykle obsahuje pouze slovo "Various". Spuštěním tohoto skriptu na vybraných souborech vám zůstane „Beatles“ pro umělce a „Ano, je to“ pro název.

Poznámka: Tento soubor je textový soubor a musí být přidán ručně jako doplněk.

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
Autor rhand
Aktualizováno 14/11/2013