Т > BLib.FInfo v1.00 Т Read and write file info : (+Т FNf_info - find full file information 2+Т ------------------------------------- <<щєf_info(A$):Й F%,L%,E%,S%,T%,U%:F%=єfile(A$,5):ГF%=0:=0 F'X%!17=0:X%!21=0:X%!25=0:Гєfs<>5:=F% P%L%=X%!2:E%=X%!6:S%=X%!10:T%=X%!14 Z#ГєNetFS_Op(18,Ґ65+A$)=0:U%=X%!5 dmГєNetFS_Op(18,Ґ64+A$)=0:X%!15=X%!10:X%?19=X%?14:X%!20=X%!5:X%?24=X%?9 ▀ X%!14=T%:X%!19=T%:X%?19=0:X%!22=0 n2X%!2=L%:X%!6=E%:X%!10=S%:X%?14=T%:X%!25=U%:=F% x: ┌2Т FNf_date - convert date into internal format ▄2Т FNf_time - convert time into internal format √2Т -------------------------------------------- ═Dщєf_date(d%,m%,y%):y%=y%-1981:=d%+m%*256+(y%─15)*4096+(y%│16)*32 ╙*щєf_time(h%,m%,s%):=h%+m%*256+s%*65536 Є: Ў4Т PROCf_date - extract date from internal format х4Т PROCf_time - extract time from internal format р4Т ---------------------------------------------- э0щРf_date(d%):day%=d%─31:month%=(d%─&F00)│256 Ф+year%=(d%─&F000)│4096+(d%─&E0)/2+1981:А П4щРf_time(t%):hour%=t%─255:minute%=(t%─&FF00)│256 З second%=(t%─&FF0000)│65536:А : Ъ