~set('day_array',~mb_split(',','dim,lun,mar,mer,jeu,ven,sam')) ~set('month_array',~mb_split(',',',janvier,février,mars,avril,mai,juin,juillet,août,septembre,octobre,novembre,décembre')) ~set('day',~get_filenamevar(1)) ~set('month',~get_filenamevar(2)) ~set('year',~get_filenamevar(3)) ~cal(~get('day'),~get('month'),~get('year'), 'HD','', 'FT','
~get('month_array[~cal_fld('curmonth')]') ~cal_fld('curyear')
', 'TH','~get('day_array[~cal_fld('day_idx')]')', 'THB','','THE','', 'TDB','','TDE','', 'TD','~if(~cal_fld('curmonth')==~cal_fld('month'), '', '' ) ~if(~cal_fld('current_day'), '~cal_fld('d2')', ' ~cal_fld('d2') ' ) ' )