For others who might come looking and not want to click elsewhere to find them, here are those other two scripts. I haven’t personally tried them yet.
Script E: Clean genres
$noop(___Script E: Clean genres___)
$setmulti(_genre,$title(%genre%))
$setmulti(_genre,$map(%_genre%,$upper($substr(%_loop_value%,0,1))$substr(%_loop_value%,1,)))
$replacemulti(%_genre%,Aor,AOR)
$replacemulti(%_genre%,Eai,EAI)
$replacemulti(%_genre%,Ebm,EBM)
$replacemulti(%_genre%,Edm,EDM)
$replacemulti(%_genre%,Funk de bh,Funk de BH)
$replacemulti(%_genre%,Idm,IDM)
$replacemulti(%_genre%,Midi music,MIDI music)
$replacemulti(%_genre%,Mpb,MPB)
$replacemulti(%_genre%,Nwobhm,NWoBHM)
$replacemulti(%_genre%,R&b,R&B)
$replacemulti(%_genre%,Uk bass,UK Bass)
$replacemulti(%_genre%,Uk drill,UK Drill)
$replacemulti(%_genre%,Uk funky,UK Funky)
$replacemulti(%_genre%,Uk garage,UK Garage)
$replacemulti(%_genre%,Uk hard house,UK Hard House)
$replacemulti(%_genre%,Uk hardcore,UK Hardcore)
$replacemulti(%_genre%,Uk hip hop,UK Hip Hop)
$replacemulti(%_genre%,Uk jackin',UK Jackin')
$replacemulti(%_genre%,Uk street soul,UK Street Soul)
$replacemulti(%_genre%,Us power metal,US Power Metal)
$replacemulti(%_genre%,Afoxê,Afoxé)
$replacemulti(%_genre%,Afro rock,Afro-rock)
$replacemulti(%_genre%,Afro-zouk,Zouk)
$replacemulti(%_genre%,Alternative country,Alt-country)
$replacemulti(%_genre%,American primitivism,American Primitive Guitar)
$replacemulti(%_genre%,Andean music,Andean Folk Music)
$replacemulti(%_genre%,Andean,Andean Folk Music)
$replacemulti(%_genre%,Appalachian folk,Appalachian Folk Music)
$replacemulti(%_genre%,Appalachian music,Appalachian Folk Music)
$replacemulti(%_genre%,Arabesque rap,Arabesk Rap)
$replacemulti(%_genre%,Avtorskaya pesnya,Bard Song)
$replacemulti(%_genre%,Azonto,Afrobeats)
$replacemulti(%_genre%,Baggy,Madchester)
$replacemulti(%_genre%,Balearic trance,Ibiza Trance)
$replacemulti(%_genre%,Ballroom house,Ballroom)
$replacemulti(%_genre%,Baroque era,Baroque)
$replacemulti(%_genre%,Beatdown,Beatdown Hardcore)
$replacemulti(%_genre%,Beijing opera,Peking Opera)
$replacemulti(%_genre%,Bele,Bélé)
$replacemulti(%_genre%,Bleep,Bleep Techno)
$replacemulti(%_genre%,Brass and military,Brass & Military)
$replacemulti(%_genre%,Breaks,Breakbeat)
$replacemulti(%_genre%,Brit funk,Britfunk)
$replacemulti(%_genre%,Bubblegum,Bubblegum Pop)
$replacemulti(%_genre%,Cabo zouk,Cabo-zouk)
$replacemulti(%_genre%,CCM,Contemporary Christian)
$replacemulti(%_genre%,Chanson française,Chanson)
$replacemulti(%_genre%,Christian black metal,Unblack Metal)
$replacemulti(%_genre%,Christmas,Christmas Music)
$replacemulti(%_genre%,Classical period,Classical Era)
$replacemulti(%_genre%,Club,Club-house)
$replacemulti(%_genre%,Colinde,Colindă)
$replacemulti(%_genre%,Comedy hip hop,Comedy Rap)
$replacemulti(%_genre%,Country and irish,Country & Irish)
$replacemulti(%_genre%,Cretan,Cretan Folk Music)
$replacemulti(%_genre%,Crust,Crust Punk)
$replacemulti(%_genre%,Cuban charanga,Charanga)
$replacemulti(%_genre%,Cubaton,Cubatón)
$replacemulti(%_genre%,Dangak,Dang-ak)
$replacemulti(%_genre%,Dansband,Dansbandsmusik)
$replacemulti(%_genre%,Danzon,Danzón)
$replacemulti(%_genre%,Dark country,Gothic Country)
$replacemulti(%_genre%,Dark wave,Darkwave)
$replacemulti(%_genre%,Darkcore,Darkside)
$replacemulti(%_genre%,Death-doom metal,Death Doom Metal)
$replacemulti(%_genre%,Dimotiko,Dimotika)
$replacemulti(%_genre%,Doina,Doină)
$replacemulti(%_genre%,Donosti sound,Sonido Donosti)
$replacemulti(%_genre%,Drumless hip hop,Drumless)
$replacemulti(%_genre%,Dubwise,Dubwise Drum and Bass)
$replacemulti(%_genre%,Educational,Educational music)
$replacemulti(%_genre%,Electroacoustic improvisation,EAI)
$replacemulti(%_genre%,Electro-funk,Electro)
$replacemulti(%_genre%,Electropunk,Synth Punk)
$replacemulti(%_genre%,Emo pop,Emo-pop)
$replacemulti(%_genre%,Éntekhno,Entechna)
$replacemulti(%_genre%,Estrada,Soviet Estrada)
$replacemulti(%_genre%,Favela funk,Funk Carioca)
$replacemulti(%_genre%,Field recordings,Field Recording)
$replacemulti(%_genre%,Fife and drum,Fife and Drum Corps)
$replacemulti(%_genre%,Forro,Forró)
$replacemulti(%_genre%,Free tekno,Freetekno)
$replacemulti(%_genre%,Full-on,Full-on Psytrance)
$replacemulti(%_genre%,Funaná,Funaná)
$replacemulti(%_genre%,Funk brasileiro,Funk Carioca)
$replacemulti(%_genre%,Gamelan joged bumbung,Gamelan Jegog)
$replacemulti(%_genre%,Gamelan selunding,Gamelan Selonding)
$replacemulti(%_genre%,Género grande,Zarzuela Grande)
$replacemulti(%_genre%,Glam,Glam Rock)
$replacemulti(%_genre%,Glitch hop edm,Glitch Hop [EDM])
$replacemulti(%_genre%,Goth rock,Gothic Rock)
$replacemulti(%_genre%,Gothic,Gothic Rock)
$replacemulti(%_genre%,Grand opéra,Grand Opera)
$replacemulti(%_genre%,Greenlandic music,Inuit)
$replacemulti(%_genre%,Guaracha edm,Guaracha [EDM])
$replacemulti(%_genre%,Guoyue,Minyue)
$replacemulti(%_genre%,Hard nrg,NRG)
$replacemulti(%_genre%,Hardcore [edm],Hardcore Techno)
$replacemulti(%_genre%,Hi-tech,Hi-tech Psytrance)
$replacemulti(%_genre%,Hyangak,Hyang-ak)
$replacemulti(%_genre%,Impressionist,Impressionism)
$replacemulti(%_genre%,Indigenous andean music,Andean Folk Music)
$replacemulti(%_genre%,Indo jazz,Indian Jazz Fusion)
$replacemulti(%_genre%,Irish folk,Irish Folk Music)
$replacemulti(%_genre%,Izvorna,Izvorna Bosanska Muzika)
$replacemulti(%_genre%,Jackin house,Jackin' House)
$replacemulti(%_genre%,Javanese gamelan,Gamelan Jawa)
$replacemulti(%_genre%,Jazz manouche,Gypsy Jazz)
$replacemulti(%_genre%,Jazz rock,Jazz-rock)
$replacemulti(%_genre%,Jeongak,Jeong-ak)
$replacemulti(%_genre%,Jump up,Jump-up)
$replacemulti(%_genre%,Kasékò,Kaseko)
$replacemulti(%_genre%,khmer music,Khmer Folk Music)
$replacemulti(%_genre%,Koplo,Dangdut Koplo)
$replacemulti(%_genre%,Korean court music,Korean Classical)
$replacemulti(%_genre%,Kuda kepang,Kuda Lumping)
$replacemulti(%_genre%,Kumi-daiko,Taiko)
$replacemulti(%_genre%,Laiko,Laika)
$replacemulti(%_genre%,Laïkó,Laika)
$replacemulti(%_genre%,Lao music,Lao Folk Music)
$replacemulti(%_genre%,Lectures,Lecture)
$replacemulti(%_genre%,Liquid funk,Liquid Drum and Bass)
$replacemulti(%_genre%,Lute song,Elizabethan Song)
$replacemulti(%_genre%,Mangue beat,Manguebeat)
$replacemulti(%_genre%,Maskanda,Maskandi)
$replacemulti(%_genre%,Medieval classical music,Medieval)
$replacemulti(%_genre%,Melodic trance,Uplifting Trance)
$replacemulti(%_genre%,Menzuma,Manzuma)
$replacemulti(%_genre%,Mittelalter-metal,Medieval Metal)
$replacemulti(%_genre%,Mo lam,Mor Lam)
$replacemulti(%_genre%,Modern electric blues,Electric Blues)
$replacemulti(%_genre%,Modern hardtek,Hardtek)
$replacemulti(%_genre%,Modern laiko,Modern Laika)
$replacemulti(%_genre%,Molam sing,Mor Lam Sing)
$replacemulti(%_genre%,Molam,Mor Lam)
$replacemulti(%_genre%,Motown,Motown Sound)
$replacemulti(%_genre%,Movie soundtrack,Film Soundtrack)
$replacemulti(%_genre%,Mugham,Azerbaijani Mugham)
$replacemulti(%_genre%,Música criolla,Música Criolla Peruana)
$replacemulti(%_genre%,Narodnozabavna glasba,Narodno Zabavna Glasba)
$replacemulti(%_genre%,Nature sounds,Nature Recordings)
$replacemulti(%_genre%,Néo kyma,Neo Kyma)
$replacemulti(%_genre%,Neoclassical dark wave,Neoclassical Darkwave)
$replacemulti(%_genre%,Neo-trad,Néo-trad)
$replacemulti(%_genre%,Neo-traditionalist country,Neo-traditional Country)
$replacemulti(%_genre%,Nerdcore,Nerdcore Hip Hop)
$replacemulti(%_genre%,New wave of british heavy metal,NWoBHM)
$replacemulti(%_genre%,No melody,No Melody Trap)
$replacemulti(%_genre%,Nu disco,Nu-disco)
$replacemulti(%_genre%,Nueva cancion,Nueva Canción)
$replacemulti(%_genre%,Nuevo flamenco,Flamenco Nuevo)
$replacemulti(%_genre%,Nuevo tango,Tango Nuevo)
$replacemulti(%_genre%,Nyū myūjikku,New Music)
$replacemulti(%_genre%,Occitan,Occitan Folk Music)
$replacemulti(%_genre%,Oi,Oi!)
$replacemulti(%_genre%,Old school hip hop,Disco Rap)
$replacemulti(%_genre%,Opéra comique,Opéra-comique)
$replacemulti(%_genre%,Opera-ballet,Opéra-ballet)
$replacemulti(%_genre%,Original pilipino music,OPM)
$replacemulti(%_genre%,Palm wine music,Palm-wine)
$replacemulti(%_genre%,Phonk,Rare Phonk)
$replacemulti(%_genre%,Pinpeat,Cambodian Classical)
$replacemulti(%_genre%,Piobaireachd,Pìobaireachd)
$replacemulti(%_genre%,Plainsong,Plainchant)
$replacemulti(%_genre%,Ragga hip-hop,Ragga)
$replacemulti(%_genre%,Rapcore,Rap Rock)
$replacemulti(%_genre%,Rasqueado cuiabano,Rasqueado)
$replacemulti(%_genre%,Rave,Breakbeat Hardcore)
$replacemulti(%_genre%,Reggaeton,Reggaetón)
$replacemulti(%_genre%,Rembetika,Rebetiko)
$replacemulti(%_genre%,Revolutionary opera,Chinese Revolutionary Opera)
$replacemulti(%_genre%,Rhythmic noise,Power Noise)
$replacemulti(%_genre%,Riddim dubstep,Riddim)
$replacemulti(%_genre%,Rock and roll,Rock & Roll)
$replacemulti(%_genre%,Rock andaluz,Andalusian Rock)
$replacemulti(%_genre%,Rock urbano,Rock Urbano Español)
$replacemulti(%_genre%,Romantic classical,Romanticism)
$replacemulti(%_genre%,Romantic,Romanticism)
$replacemulti(%_genre%,Rune singing,Runolaulu)
$replacemulti(%_genre%,Runo song,Runolaulu)
$replacemulti(%_genre%,Saya,Saya Afroboliviana)
$replacemulti(%_genre%,Score,Film Score)
$replacemulti(%_genre%,Scouse house,Donk)
$replacemulti(%_genre%,Sea shanties,Sea Shanty)
$replacemulti(%_genre%,Sertanejo raiz,Sertanejo de Raiz)
$replacemulti(%_genre%,Shan’ge,Shan'ge)
$replacemulti(%_genre%,Shima-uta,Amami Shimauta)
$replacemulti(%_genre%,Skiladiko,Skiladika)
$replacemulti(%_genre%,Song,Lied)
$replacemulti(%_genre%,Song-cycle,Song Cycle)
$replacemulti(%_genre%,Sundanese pop,Pop Sunda)
$replacemulti(%_genre%,Synth-pop,Synthpop)
$replacemulti(%_genre%,Tearout brostep,Tearout [Brostep])
$replacemulti(%_genre%,Technobanda,Tecnobanda)
$replacemulti(%_genre%,Television music,Television)
$replacemulti(%_genre%,Tembang sunda cianjuran,Tembang Cianjuran)
$replacemulti(%_genre%,Tishoumaren,Desert Blues)
$replacemulti(%_genre%,Tone poem,Symphonic Poem)
$replacemulti(%_genre%,Trap edm,Trap [EDM])
$replacemulti(%_genre%,Tsugaru-jamisen,Tsugaru Shamisen)
$replacemulti(%_genre%,UK jackin,UK Jackin')
$replacemulti(%_genre%,Urtiin duu,Mongolian Long Song)
$replacemulti(%_genre%,Vgm,Video Game Music)
$replacemulti(%_genre%,Vikingarock,Viking Rock)
$replacemulti(%_genre%,Waulking song,Òrain Luaidh)
$replacemulti(%_genre%,Western classical music,Classical)
$replacemulti(%_genre%,Western classical,Classical)
$replacemulti(%_genre%,Western,Western Country)
$replacemulti(%_genre%,Whistling,Siffleur)
$replacemulti(%_genre%,Work songs,Work Wong)
$replacemulti(%_genre%,Yue opera,Shaoxing Opera)
$replacemulti(%_genre%,Ancient music,Ancient mmmmm)
$replacemulti(%_genre%,Arabic bellydance music,Arabic bellydance mmmmm)
$replacemulti(%_genre%,Armenian church music,Armenian church mmmmm)
$replacemulti(%_genre%,Background music,Background mmmmm)
$replacemulti(%_genre%,Bass music,Bass mmmmm)
$replacemulti(%_genre%,Beat music,Beat mmmmm)
$replacemulti(%_genre%,Big music,Big mmmmm)
$replacemulti(%_genre%,Bit music,Bit mmmmm)
$replacemulti(%_genre%,Capoeira music,Capoeira mmmmm)
$replacemulti(%_genre%,Cartoon music,Cartoon mmmmm)
$replacemulti(%_genre%,Chamber music,Chamber mmmmm)
$replacemulti(%_genre%,Christmas music,Christmas mmmmm)
$replacemulti(%_genre%,Early music,Early mmmmm)
$replacemulti(%_genre%,Educational music,Educational mmmmm)
$replacemulti(%_genre%,Epic music,Epic mmmmm)
$replacemulti(%_genre%,Ethiopian church music,Ethiopian church mmmmm)
$replacemulti(%_genre%,Flex dance music,Flex dance mmmmm)
$replacemulti(%_genre%,Furniture music,Furniture mmmmm)
$replacemulti(%_genre%,Halloween music,Halloween mmmmm)
$replacemulti(%_genre%,Hill tribe music,Hill tribe mmmmm)
$replacemulti(%_genre%,Holiday music,Holiday mmmmm)
$replacemulti(%_genre%,Incidental music,Incidental mmmmm)
$replacemulti(%_genre%,Islamic modal music,Islamic modal mmmmm)
$replacemulti(%_genre%,Kitchen dance music,Kitchen dance mmmmm)
$replacemulti(%_genre%,Library music,Library mmmmm)
$replacemulti(%_genre%,Light music,Light mmmmm)
$replacemulti(%_genre%,Louisiana music,Louisiana mmmmm)
$replacemulti(%_genre%,Mechanical music,Mechanical mmmmm)
$replacemulti(%_genre%,Mobb music,Mobb mmmmm)
$replacemulti(%_genre%,Mouth music,Mouth mmmmm)
$replacemulti(%_genre%,Nervous music,Nervous mmmmm)
$replacemulti(%_genre%,New music,New mmmmm)
$replacemulti(%_genre%,Nordic old time dance music,Nordic old time dance mmmmm)
$replacemulti(%_genre%,Ottoman military music,Ottoman military mmmmm)
$replacemulti(%_genre%,Outsider music,Outsider mmmmm)
$replacemulti(%_genre%,Production music,Production mmmmm)
$replacemulti(%_genre%,Program music,Program mmmmm)
$replacemulti(%_genre%,Ratchet music,Ratchet mmmmm)
$replacemulti(%_genre%,Regional music,Regional mmmmm)
$replacemulti(%_genre%,Spy music,Spy mmmmm)
$replacemulti(%_genre%,Tamil film music,Tamil film mmmmm)
$replacemulti(%_genre%,Tape music,Tape mmmmm)
$replacemulti(%_genre%,Turntable music,Turntable mmmmm)
$replacemulti(%_genre%,Video game music,Video game mmmmm)
$setmulti(_genre,$rreplace($rreplace(%_genre%,\( folk music;\), fffff;),\( folk music\)\$, fffff))
$setmulti(_genre,$rreplace($rreplace(%_genre%,\( traditional music;\), ttttt;),\( traditional music\)\$, ttttt))
$setmulti(_genre,$rreplace($rreplace(%_genre%,\( music;\),;),\( music\)\$,))
$setmulti(_genre,$replace(%_genre%,mmmmm,Music))
$setmulti(_genre,$replace(%_genre%,fffff,Folk Music))
$setmulti(_genre,$replace(%_genre%,ttttt,Traditional Music))
$setmulti(_genres,$unique(%_genre%))
$setmulti(_genre,$unique(%_genres%))
$setmulti(genre,%_genre%; %period%)
$cleanmulti(genre)
Script F: Sort genres
$noop(___Script F: Sort genres___)
$noop(___Add primary genres and place at end of genre multivariable___)
$noop(___Make a copy of the original genre for reference___)
$set(genreOLD,%genre%__________DELETE ME___________)
$if($inmulti(%genre%,Classic Rock),
$replacemulti(%genre%,Classic Rock,)
$cleanmulti(genre)
)
$if($or($inmulti(%genre%,Ambient Americana),$inmulti(%genre%,Space Ambient),$inmulti(%genre%,Tribal Ambient)),$set(_lastgenre,Ambient))
$if($inmulti(%genre%,Ambient),$replacemulti(%genre%,Ambient,))
$if($eq(%_lastgenre%,Ambient),$copymerge(genre,_lastgenre))
$if($find(%genre%,Blues),$set(_lastgenre,Blues))
$if($inmulti(%genre%,Blues),$replacemulti(%genre%,Blues,))
$if($eq(%_lastgenre%,Blues),$copymerge(genre,_lastgenre))
$if($and($find(%genre%, Soul),$not($inmulti(%genre%,Soul Jazz))),$set(_lastgenre,Soul))
$if($inmulti(%genre%,Soul),$replacemulti(%genre%,Soul,))
$if($eq(%_lastgenre%,Soul),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Blue-Eyed Soul),$find(%genre%,R&B),$inmulti(%genre%,Doo-Wop),$inmulti(%genre%,Quiet Storm),$inmulti(%genre%,Swamp Pop)),$set(_lastgenre,R&B))
$if($inmulti(%genre%,R&B),$replacemulti(%genre%,R&B,))
$if($eq(%_lastgenre%,R&B),$copymerge(genre,_lastgenre))
$if($or($find(%genre%,Ska),$inmulti(%genre%,2 Tone)),$set(_lastgenre,Ska))
$if($inmulti(%genre%,Ska),$replacemulti(%genre%,Ska,))
$if($eq(%_lastgenre%,Ska),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Dancehall),$inmulti(%genre%,Dub),$inmulti(%genre%,Lovers Rock),$inmulti(%genre%,Mento),$find(%genre%,Reggae),$inmulti(%genre%,Rocksteady)),$set(_lastgenre,Reggae))
$if($inmulti(%genre%,Reggae),$replacemulti(%genre%,Reggae,))
$if($eq(%_lastgenre%,Reggae),$copymerge(genre,_lastgenre))
$if($find(%genre%,Christmas),$set(_lastgenre,Christmas Music))
$if($inmulti(%genre%,Christmas Music),$replacemulti(%genre%,Christmas Music,))
$if($eq(%_lastgenre%,Christmas Music),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Ballet),$inmulti(%genre%,Baroque),$inmulti(%genre%,Classical Period),$inmulti(%genre%,Contata),$inmulti(%genre%,Concerto),$inmulti(%genre%,Fantasia),$inmulti(%genre%,Impressionism),$inmulti(%genre%,Nocturne),$inmulti(%genre%,Opera),$inmulti(%genre%,Sonata),$inmulti(%genre%,Symphony),$inmulti(%genre%,Toccata)),$set(_lastgenre,Classical))
$if($find(%genre%,Classical),$set(_lastgenre,Classical))
$if($inmulti(%genre%,Classical),$replacemulti(%genre%,Classical,))
$if($eq(%_lastgenre%,Classical),$copymerge(genre,_lastgenre))
$if($inmulti(%genre%,Country),$set(_lastgenre,Country))
$if($inmulti(%genre%,Country),$replacemulti(%genre%,Country,))
$if($eq(%_lastgenre%,Country),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Club),$inmulti(%genre%,Downtempo),$inmulti(%genre%,EDM),$inmulti(%genre%,House),$inmulti(%genre%,Glitch),$inmulti(%genre%,IDM),$inmulti(%genre%,Techno)),$set(_lastgenre,Electronic))
$if($or($find(%genre%,synth),$find(%genre%,Synth),$find(%genre%,tronica),$and($find(%genre%,Wave),$not($inmulti(%genre%,New Wave))),$find(%genre%,wave),$find(%genre%,house),$find(%genre%, House)),$set(_lastgenre,Electronic))
$if($eq(%_lastgenre%,Electronic),
$if($inmulti(%genre%,Electronic),
$replacemulti(%genre%,Electronic,)
$copymerge(genre,_lastgenre)
)
)
$if($or($inmulti(%genre%,Appalachian Folk),$inmulti(%genre%,Celtic),$inmulti(%genre%,Contemporary Folk),$inmulti(%genre%,Old-Time),$inmulti(%genre%,Talking Blues),$inmulti(%genre%,Work Song)),$set(_lastgenre,Folk))
$if($inmulti(%genre%,Folk),$replacemulti(%genre%,Folk,))
$if($eq(%_lastgenre%,Folk),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Afro Trap),$inmulti(%genre%,Afroswing),$inmulti(%genre%,Battle Rap),$inmulti(%genre%,Boom Bap),$inmulti(%genre%,Bounce),$inmulti(%genre%,Crunk),$inmulti(%genre%,Digicore),$inmulti(%genre%,G-Funk),$inmulti(%genre%,Trap)),$set(_lastgenre,Hip Hop))
$if($or($find(%genre%,Hip Hop),$find(%genre%,Rap)),$set(_lastgenre,Hip Hop))
$if($inmulti(%genre%,Hip Hop),$replacemulti(%genre%,Hip Hop,))
$if($eq(%_lastgenre%,Hip Hop),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Bebop),$inmulti(%genre%,Big Band),$inmulti(%genre%,Dixieland),$inmulti(%genre%,Hard Bop),$inmulti(%genre%,Stride),$inmulti(%genre%,Swing)),$set(_lastgenre,Jazz))
$if($find(%genre%,Jazz),$set(_lastgenre,Jazz))
$if($inmulti(%genre%,Jazz),$replacemulti(%genre%,Jazz,))
$if($eq(%_lastgenre%,Jazz),$copymerge(genre,_lastgenre))
$if($or($find(%genre%,rock),$find(%genre%, Rock),$find(%genre%,Metal),$inmulti(%genre%,AOR),$inmulti(%genre%,Mod),$inmulti(%genre%,New Wave),$inmulti(%genre%,Surf),$find(%genre%,Punk),$find(%genre%,punk)),$set(_lastgenre,Rock))
$if($and($inmulti(%genre%,Rock),$eq($get(_lastgenre),Rock)),$replacemulti(%genre%,Rock,))
$if($eq(%_lastgenre%,Rock),$copymerge(genre,_lastgenre))
$if($or($inmulti(%genre%,Production Music),$inmulti(%genre%,Musical)),$set(_lastgenre,Production Music))
$if($inmulti(%genre%,Production Music),$replacemulti(%genre%,Production Music,))
$if($eq(%_lastgenre%,Production Music),$copymerge(genre,_lastgenre))
$setmulti(genre,%genre%)
$cleanmulti(genre)
$set(_lastgenre,$getmulti(%genre%,-1))
$if(%sortgenre%,,$if($find(%_lastgenre%,Christmas Music),$set(sortgenre,Christmas)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Classical),$set(sortgenre,Classical)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Country),$set(sortgenre,Country & Folk)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Bluegrass),$set(sortgenre,Country & Folk)))
$if(%sortgenre%,,$if($find(%_lastgenre%,mbient),$set(sortgenre,Ambient)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Folk),$set(sortgenre,Country & Folk)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Hip),$set(sortgenre,Hip Hop)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Rock),$set(sortgenre,Rock & Pop)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Reggae),$set(sortgenre,Reggae & Ska)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Ska),$set(sortgenre,Reggae & Ska)))
$if(%sortgenre%,,$if($find(%_lastgenre%,R&B),$set(sortgenre,R&B\, Blues\, Funk & Soul)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Blues),$set(sortgenre,R&B\, Blues\, Funk & Soul)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Funk),$set(sortgenre,R&B\, Blues\, Funk & Soul)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Soul),$set(sortgenre,R&B\, Blues\, Funk & Soul)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Jazz),$set(sortgenre,Jazz & Fusion)))
$if(%sortgenre%,,$if($find(%_lastgenre%,Production Music),$set(sortgenre,Production Music)))
$if(%sortgenre%,,$if($find(%_lastgenre%,lectroni),$set(sortgenre,Electronic)))
===
Note that scripts A-F were carried over from this original thread, with only some minor comment and typo fixes: