$if(
$or($meta_test(composer-iso3166),$meta_test(lyricist-iso3166),$meta_test(artist-iso3166),$meta_test(group-iso3166),$meta_test(producer-iso3166)),
$if($meta_test(composer-iso3166),$puts(cxa0,$meta(composer-iso3166,1)))
$if($meta_test(composer-iso3166-b),$puts(cxb0,$meta(composer-iso3166-b,1)))
$if($meta_test(lyricist-iso3166),$puts(lxa0,$meta(lyricist-iso3166,1)))
$if($meta_test(lyricist-iso3166-b),$puts(lxb0,$meta(lyricist-iso3166-b,1)))
$if($meta_test(artist-iso3166),$puts(axa0,$meta(artist-iso3166,1)))
$if($meta_test(artist-iso3166-b),$puts(axb0,$meta(artist-iso3166-b,1)))
$if($meta_test(group-iso3166),$puts(gxa0,$meta(group-iso3166,1)))
$if($meta_test(group-iso3166-b),$puts(gxb0,$meta(group-iso3166-b,1)))
$if($meta_test(producer-iso3166),$puts(pxa0,$meta(producer-iso3166,1)))
$if($meta_test(producer-iso3166-b),$puts(pxb0,$meta(producer-iso3166-b,1))),
$puts(rest,$nodisplay{ﬡ}'[Mainstream/Not Tagged]')
)
$puts(nodx0,[¦$get(cxa0)][¦$get(cxb0)][¦$get(lxa0)][¦$get(lxb0)][¦$get(axa0)][¦$get(axb0)][¦$get(gxa0)][¦$get(gxb0)][¦$get(pxa0)][¦$get(pxb0)][¦$get(rest)])
$put(node0,$trim($right($get(nodx0),$sub($len($get(nodx0)),1))))
|
$puts(cal,$ifgreater($add($strstr($get(node0),$get(cxa0)),$strstr($get(node0),$get(cxb0)),$strstr($get(node0),$get(lxa0)),$strstr($get(node0),$get(lxb0))),0,'Composers & Lyricists',))
$puts(pap,$ifgreater($add($strstr($get(node0),$get(axa0)),$strstr($get(node0),$get(axb0)),$strstr($get(node0),$get(gxa0)),$strstr($get(node0),$get(gxb0)),$strstr($get(node0),$get(pxa0)),$strstr($get(node0),$get(pxb0))),0,'Performers & Producers',))
$puts(nodx1,[¦$get(cal)][¦$get(pap)])
$put(node1,$trim($right($get(nodx1),$sub($len($get(nodx1)),1))))
|
$puts(bbp,$ifgreater($add($strstr($get(node0),$get(cxa0)),$strstr($get(node0),$get(lxa0)),$strstr($get(node0),$get(axa0)),$strstr($get(node0),$get(gxa0)),$strstr($get(node0),$get(pxa0))),0,'By Their Birthplace',))
$puts(bbg,$ifgreater($add($strstr($get(node0),$get(cxb0)),$strstr($get(node0),$get(lxb0)),$strstr($get(node0),$get(axb0)),$strstr($get(node0),$get(gxb0)),$strstr($get(node0),$get(pxb0))),0,'By Their Background',))
$puts(nodx2,[¦$get(bbp)][¦$get(bbg)])
$put(node2,$trim($right($get(nodx2),$sub($len($get(nodx2)),1))))
|
$puts(cname,$ifgreater($add($strstr($get(node0),$get(cxa0)),$strstr($get(node0),$get(cxb0)),$strstr($get(node0),$get(lxa0)),$strstr($get(node0),$get(lxb0))),0,$if3($trim($right(%composer-evolution%,$sub($len(%composer-evolution%),$strstr(%composer-evolution%, )))),$meta(composer,0),'[Composer Not Tagged]')¦$if2(%lyricist%,'[Lyricist Not Tagged]'),))
$puts(pname,$ifgreater($add($strstr($get(node0),$get(axa0)),$strstr($get(node0),$get(axb0)),$strstr($get(node0),$get(gxa0)),$strstr($get(node0),$get(gxb0)),$strstr($get(node0),$get(pxa0)),$strstr($get(node0),$get(pxb0))),0,$if3(%artist-main%,$meta(album artist,0),'[Artist Not Tagged]')¦$if2(%producer%,'[Producer Not Tagged]'),))
$puts(nodx4,[¦$get(cname)][¦$get(pname)])
$put(node4,$trim($right($get(nodx4),$sub($len($get(nodx4)),1))))
|
$nodisplay{$mod(3000,$year(%date%)) %album% %album artist%}[$year(%date%)': '][%album%][' (by '%album artist%')']|$nodisplay{[%discnumber%-]%tracknumber%}• %title%[' (by '%track artist%')']