AOM File Rename w/ subdir

set('atitle', at('x-jat'))
if(length(atitle)=0, set('atitle', at('en')))
if(length(atitle)=0, set('atitle', A.Name))
set('atitle', replace(atitle, '\', ' '))
set('etitle', et('en'))
if(length(etitle)=0, set('etitle', et('x-jat')))
if(length(etitle)=0, set('etitle', et('ja')))
if(length(etitle)=0, set('etitle', E.Name))
set('etitle', replace(etitle, '\', ' '))
set('version', if(F.Version>1, 'v'+F.Version, ''))
set('mepno', max(A.TotalEpisodeCount, E.EpisodeTypeCount))
set('epno', padl(E.EpisodeNo, max(1, length(mepno)), '0') + version)
if(length(E.EpisodeStrPadded)>0, set('epno', E.EpisodeStrPadded))
if(E.TypeId=2, set('epno', 'S'+epno))
if(E.TypeId=3, set('epno', 'C'+epno))
if(E.TypeId=4, set('epno', 'T'+epno))
if(E.TypeId=5, set('epno', 'P'+epno))
if(E.TypeId=6, set('epno', 'O'+epno))
if(length(E.EpisodeStrPadded)>0, set('epno', E.EpisodeStrPadded))
set('groupname', if(G, if(length(G.Shortname)>0, G.Shortname, G.Name), 'no group'))
set('groupname', if(length(groupname)>0, '['+groupname+']'))
set('groupname', replace(groupname, '\', ' '))
set('yeardash', if(length(year)>0, '['+limit(year,4)+']' + ' - '))
set('year', if(length(year)>0, '['+limit(year,4)+']'))
set('crc', if(H, H.Crc32, F.Crc))
if(length(crc)>0, set('crc', '('+uc(crc)+')'))
set('releasetype', if(length(categorystr)>0, categorystr, 'Misc Release'))
set('filename', limit(epno + ' - ' + limit(atitle, 90) + ' - ' + limit(etitle, 20) + ' - ' + year + groupname, 156) + '.' + F.FileType)
set('dirAnime', limit(atitle, 90))
if(numeric(dirAnime) or (dirAnime='.'), set('dirAnime', '0-9'))
set('dirAnime', dirAnime + '\')
set('dirAnimeRelease', yeardash + limit(releasetype, 20) + if(length(atitle)>30, '', ' - ' + atitle) + '\')
set('filename', dirAnime + dirAnimeRelease + filename)
set('filename', replace(filename, '*', ' '))
set('filename', replace(filename, '/', ' '))
set('filename', replace(filename, '?', ' '))
set('filename', replace(filename, ':', ' '))
set('filename', replace(filename, ';', ' '))
set('filename', replace(filename, '"', ' '))
set('filename', replace(filename, '<', ' '))
set('filename', replace(filename, '>', ' '))
set('filename', replace(filename, '|', ' '))
set('filename', replace(filename, '`', ""))
set('filename', replace(filename, ',', ' '))
set('filename', replace(filename, '!', ''))
set('filename', replace(filename, '  ', ' '))
set('filename', replace(filename, '  ', ' '))
filename