ô >Examine 2.15 x3Þ ctrl% 39,name% 79:X%=ctrl%:Y%=X%256:total%=0 ‚raw%=¦-2:fs%=¤fs:òscan:à –Ýòscan:ê idx%,type%,f$  -õ:f$=¤gbpb8(idx%):idx%=X%!9:çf$<>"":òfile ª ý f$="":á ¾4Ýòfile:X%!14=0:X%!18=0:X%!22=0:type%=¤file(f$,5) È0ld%=X%!2:ex%=X%!6:ln%=X%!10:at%=X%!14:acc%=0 Ò,çfs%=5:ç¤NetFS_Op(18,½65+f$)=0:acc%=X%!5 Ümçfs%=5:ç¤NetFS_Op(18,½64+f$)=0:X%!15=X%!10:X%!17=X%!12:X%!20=X%!5:X%!22=X%!7:X%?14=at%:X%!25=acc%:X%!29=0 æhçfs%=16:type%=¤file(f$,&FD):A%=X%!14:X%!14=at%:X%!17=X%!6:X%!20=X%!9:X%!22=X%!11:X%!25=X%!2:X%!29=A% ð9total%=total%+ln%:ç(ln%€255):total%=(total%€-256)+256 ú6ñ f$;Š13);¤h0(ld%,8)" "¤h0(ex%,8)" "¤h0(ln%,8)" "; açraw%:ñ ¤h0(X%?14,2);" ";¤h0(X%!15,4);" ";¤h0(X%!17,6);" ";¤h0(X%!20,4);" ";¤h0(X%!22,6);" "; Eç¬raw%:ñ ¤acc(X%?14,type%);" ";¤date(X%!15);" ";¤time(X%!17);" "; Sç type%=1:ñ"File" ‹ ç type%=2:ñ"Dir." ‹ ç type%=&FF:ñ"Run " ‹ ñ"&";¤h0(type%,2) "òLongDateToShort ,vñ ‰11;¤d0(day%,2)"/"¤d0(month%,2)"/"¤d0(year%,4)" "¤d0(hour%,2)":"¤d0(minute%,2)":"¤d0(second%,2)"."¤d0(centi%,2); 6añ ‰6;¤h0(X%!25,4)" ("¤h0(X%!27,4)") "¤date(X%!20)" "¤time(X%!22)" "¤drv(X%?32)":"¤h0(X%!29,6) @á Tݤacc(a%,b%):ê a$ ^ç b%=2:a$="D" ‹ a$="-" h#ç(a%€128):a$=a$+"P" ‹ a$=a$+"-" r!ç(a%€8):a$=a$+"L" ‹ a$=a$+"-" |!ç(a%€4):a$=a$+"E" ‹ a$=a$+"-" †!ç(a%€2):a$=a$+"W" ‹ a$=a$+"-" !ç(a%€1):a$=a$+"R" ‹ a$=a$+"-" š a$=a$+"/" ¤"ç(a%€64):a$=a$+"E" ‹ a$=a$+"-" ®"ç(a%€32):a$=a$+"W" ‹ a$=a$+"-" ¸"ç(a%€16):a$=a$+"R" ‹ a$=a$+"-" Â=Àa$+" ",10) Öݤdate(a%):a%=a%€&FFFF àJ=¤d0(a%€31,2)+"/"+¤d0((a%256)€15,2)+"/"+Ã(1981+(a%&1000)+(a%€&E0)/2) êUݤtime(a%):=¤d0(a%€&FF,2)+":"+¤d0((a%€&FF00)256,2)+":"+¤d0((a%€&FF0000)65536,2) þÝòLongDateToShort &!X%=ex%:X%!4=ld%:òDate_ToOrd(X%):á #ݤh0(A%,N%)=Â"0000000"+Ã~A%,N%) &#ݤd0(A%,N%)=Â"0000000"+à A%,N%) 0%ݤdrv(A%):çA%<10:=ÃA% ‹ =½(A%+55) DBݤfile(f$,A%):$name%=f$:?X%=name%:X%?1=name%256:=(º&FFDD)€&FF NEݤgbpb8(ptr%):X%!1=name%:X%!5=1:X%!9=ptr%:A%=8:Ö&FFD1:çX%!5=1:="" X7A%=name%+1:A%!(A%?-1)=&D20:A%?(§$A%," ")-1)=13:=$A% b ݤfs:êA%,Y%,E%:=(º&FFDA)€&FF v$ÝòDate_ToOrd(mem%):ê A%,B%,C%,D% €@year%=0:month%=0:day%=0:hour%=0:minute%=0:second%=0:centi%=0 Šçmem%!1<0:á ”FD%=mem%!1&83D6+2447065:C%=mem%?0+256*(mem%!1ƒ&83D6):centi%=C%ƒ100 ž>C%=C%100:second%=C%ƒ60:C%=C%60:minute%=C%ƒ60:hour%=C%60 ¨8B%=((D%*4+3)ƒ146097€-4)+3:C%=B%ƒ14614*5+2:D%=D%*4+3 ².A%=C%153+2:day%=C%ƒ1535+1:month%=A%ƒ12+1 ¼*year%=D%146097*100+B%1461+A%12-4800 Æá ÚNݤNetFS_Op(A%,A$):!X%=0:X%?1=8+© A$:X%!3=A%:$(X%+7)=A$:A%=&14:Ö&FFF1:=X%?3 ÿ