// A/Artist/ORIG_DIR/ORIG_FILE
$puts(an,$lower($ascii($replace($swapprefix($trim(%ALBUM ARTIST%)),Ș,S,Ț,T,ș,s,ț,t,æ,ae,°,o,ß,ss))))$if($strcmp($get(an),va),va,$left($get(an),1))/$get(an)/%directoryname%/%filename%


// ################### File Rename:

// #. [Artist - ]Title
[$ifgreater(%TOTALDISCS%,1,$num(%DISCNUMBER%,$len(%TOTALDISCS%)).,)%TRACKNUMBER%. ]$ascii($replace($if(%TRACK ARTIST%,[$if2(%ARTIST_EN%,$if2(%ARTIST_ASCII%,%TRACK ARTIST%)) - ],)$if2(%TITLE_EN%,$if2(%TITLE_ASCII%,%TITLE%))[' ('%SUBTITLE%')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,†, ,ð,d,þ,th,Þ,Th))

// Artist - Title
$ascii($replace([$if2(%ARTIST_EN%,%TRACK ARTIST%) - ]$if2(%TITLE_EN%,%TITLE%)[' ('%SUBTITLE%')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,°,o,ß,ss,ð,d,þ,th,Þ,Th))

// FIXME: Artist - Title [Album]
$ascii($replace([$swapprefix($if2(%ARTIST_EN%,%ARTIST%)) - ]$if2(%TITLE_EN%,%TITLE%)[' ('%SUBTITLE%')'][' ['$if2(%ALBUM_EN%,%ALBUM%)[, %DATE%][, #%TRACKNUMBER%]']'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,°,o,ß,ss))

// ################### File Move:

// ZILLO CD dir. name
VA - Zillo CD $ifgreater($right(%ALBUM%,2),38,19,20)$right(%ALBUM%,2)-$left($right(%ALBUM%,5),2)' ['$upper(%CODEC%)']'

// Library:
$puts(arx,$trim($replace($ascii($replace($trim($if2(%ALBUMARTIST_EN%,$if2(%ALBUMARTIST_ASCII,$if2(%ALBUMARTIST%,%ALBUM ARTIST%)))),Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(art,$ascii($if2(%ALBUMARTISTSORT%,$if2(%ALBUMARTISTSORTORDER%,$swapprefix($get(arx))))))
$puts(asb,$trim($if2(%ALBUM SUBTITLE%,$if2(%ALBUMSUBTITLE%,))))
$puts(oda,$ifequal($left(%DATE%,4),$left($put(_od,$if2(%ORIGINALDATE%,%ORIGINAL RELEASE DATE%)),4),'',$get(_od)))
$iflonger($get(oda),3,$puts(asb,$get(asb)$ifgreater($len($get(asb)),0,', ',rm.)$left(%DATE%,4)),)
$puts(alb,$replace($ascii($replace($swapprefix($trim($if2(%ALBUM_EN%,$if2(%ALBUM_ASCII%,%ALBUM%))))
[', '$trim($if2(%DISC SUBTITLE%,%DISCSUBTITLE%))]$ifgreater($len($get(asb)),0,' ('$get(asb)')',),Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(tarx,$trim($replace($ascii($replace(%TRACK ARTIST%,Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(tart,$if(%TRACK ARTIST%,$if2(%ARTIST_EN%,$if2(%ARTIST_ASCII%,$if2($get(tarx),$if2(%ARTISTSORTORDER%,%ARTISTSORT%)))),))
$puts(tit,$replace($ascii($replace($trim($if2(%TITLE_EN%,$if2(%TITLE_ASCII%,%TITLE%)))[' ('$trim(%SUBTITLE%)')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(cdc,' ['%CODEC%$if($stricmp(%CODEC%,MP3),.$if($stricmp(%__CODEC_PROFILE%,CBR),CBR@%__BITRATE%,$replace(%__CODEC_PROFILE%,' ',.)),)']')
$puts(dbase,$if($stricmp($get(art),va),va,$lower($left($get(art),1))))
$puts(dart,$if($stricmp($get(art),va),,$lower($get(art))))
$puts(dalb,$swapprefix($get(arx)) - $get(alb)[' ('$iflonger($get(oda),3,$get(oda),%DATE%)')']$get(cdc))
$puts(fn,$ifgreater(%TOTALTRACKS%,1,$ifgreater(%TOTALDISCS%,1,$num(%DISCNUMBER%,$len(%TOTALDISCS%)).,)%TRACKNUMBER%. ,)[$get(tart) - ]$get(tit))
[$get(dbase)/][$get(dart)/][%COLLECTION%/]$if2($get(dalb),%directoryname%)/$if2($get(fn),%filename%)

// Discography (“Library” + more bibliographic folder name)
// vezi file-operations-discography.foo

// Album: Dolanescu, Ion - Lizzard on the Big Hill, The (1907) [MP3]
// vezi file-operations-album-biblio.foo

// Soundtracks (Album title is considered most important)
// vezi file-operations-soundtracks.foo

// Album (to be used in mixed up parent folders)
$puts(arx,$trim($replace($ascii($replace($trim($if2(%ALBUMARTIST_EN%,$if2(%ALBUMARTIST%,%ALBUM ARTIST%))),Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(art,$ascii($if2(%ALBUMARTISTSORT%,$swapprefix($get(arx)))))
$puts(alb,$replace($ascii($replace($swapprefix($trim($if2(%ALBUM_EN%,%ALBUM%)))[' ('$trim($if2(%ALBUM SUBTITLE%,%ALBUMSUBTITLE%))')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(tarx,$trim($replace($ascii($replace(%TRACK ARTIST%,Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(tart,$if(%TRACK ARTIST%,$if2(%ARTIST_EN%,$if2($get(tarx),$if2(%ARTISTSORTORDER%,%ARTISTSORT%))),))
$puts(tit,$replace($ascii($replace($trim($if2(%TITLE_EN%,%TITLE%))[' ('$trim(%SUBTITLE%)')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(dalb,$get(art) - $get(alb)[' ('[%ORIGINALDATE% rm.]%DATE%')']' ['$upper(%CODEC%)']')
$puts(fn,$ifgreater(%TOTALTRACKS%,1,$ifgreater(%TOTALDISCS%,1,$num(%DISCNUMBER%,$len(%TOTALDISCS%)).,)%TRACKNUMBER%. ,)[$get(tart) - ]$get(tit))
$if2($get(dalb),%directoryname%)/$if2($get(fn),%filename%)

// Disc based discography: basicly for boxes reissuing (partial) discography
$puts(arx,$trim($replace($ascii($replace($trim($if2(%ALBUMARTIST_EN%,$if2(%ALBUMARTIST%,%ALBUM ARTIST%))),Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(art,$ascii($if2(%ALBUMARTISTSORT%,$swapprefix($get(arx)))))
$puts(asb,$trim($if2(%ALBUM SUBTITLE%,$if2(%ALBUMSUBTITLE%,))))
$if(%ORIGINALDATE%,$puts(asb,$get(asb)$ifgreater($len($get(asb)),0,', ',rm.)$left(%DATE%,4)),)
$puts(alb,$replace($ascii($replace($swapprefix($trim($if2(%DISC SUBTITLE%,%DISCSUBTITLE%)))' ('$stripprefix($trim($if2(%ALBUM_EN%,%ALBUM%)))$ifgreater($len($get(asb)),0,', '$get(asb),)')',Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(tarx,$trim($replace($ascii($replace(%TRACK ARTIST%,Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†,)),?,)))
$puts(tart,$if(%TRACK ARTIST%,$if2(%ARTIST_EN%,$if2($get(tarx),$if2(%ARTISTSORTORDER%,%ARTISTSORT%))),))
$puts(tit,$replace($ascii($replace($trim($if2(%TITLE_EN%,%TITLE%))[' ('$trim(%SUBTITLE%)')'],Ș,S,Ț,T,ș,s,ț,t,æ,ae,Æ,Ae,°,,ß,ss,ð,d,þ,th,Þ,Th,ё,e,†, )),?,))
$puts(dbase,$if($stricmp($get(art),va),va,$lower($left($get(art),1))))
$puts(dart,$if($stricmp($get(art),va),,$lower($get(art))))
$puts(dalb,$swapprefix($get(arx)) -$left($if2(%ORIGINALDATE%,%DATE%),7)- $get(alb)' ['$upper(%CODEC%)']')
$puts(fn,$ifgreater(%TOTALTRACKS%,1,$ifgreater(%TOTALDISCS%,1,$num(%DISCNUMBER%,$len(%TOTALDISCS%)).,)%TRACKNUMBER%. ,)[$get(tart) - ]$get(tit))
[$get(dbase)/][$get(dart)/][%COLLECTION%/]$if2($get(dalb),%directoryname%)/$if2($get(fn),%filename%)