/ APDL Public Domain 1 / APDL_PD1A.iso / discutils / _a_l / fileaid / !FileAid / Libraries / Directory

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 3a f4 20 3e 20 | 44 69 72 65 63 74 6f 72 |...:. > |Director|
|00000010| 79 20 76 65 72 73 69 6f | 6e 20 32 2e 30 30 20 28 |y versio|n 2.00 (|
|00000020| 32 39 2d 4a 75 6c 2d 31 | 39 39 31 29 20 62 79 20 |29-Jul-1|991) by |
|00000030| 53 20 4d 63 44 6f 6e 61 | 6c 64 0d 00 14 05 f4 0d |S McDona|ld......|
|00000040| 00 1e 3c f4 20 52 65 63 | 75 72 73 69 76 65 20 64 |..<. Rec|ursive d|
|00000050| 69 72 65 63 74 6f 72 79 | 2d 72 65 61 64 69 6e 67 |irectory|-reading|
|00000060| 20 6c 69 62 72 61 72 79 | 20 61 6e 64 20 66 69 6c | library| and fil|
|00000070| 65 20 75 74 69 6c 69 74 | 69 65 73 0d 00 28 05 f4 |e utilit|ies..(..|
|00000080| 0d 00 32 04 0d 00 3c 05 | e0 0d 00 46 04 0d 00 50 |..2...<.|...F...P|
|00000090| 04 0d 00 5a 04 0d 00 64 | 19 dd a4 70 61 74 68 6e |...Z...d|...pathn|
|000000a0| 61 6d 65 28 66 75 6c 6c | 6e 61 6d 65 24 29 0d 00 |ame(full|name$)..|
|000000b0| 6e 17 6c 65 74 74 65 72 | 25 3d a9 20 66 75 6c 6c |n.letter|%=. full|
|000000c0| 6e 61 6d 65 24 0d 00 78 | 04 0d 00 82 05 f5 0d 00 |name$..x|........|
|000000d0| 8c 25 70 6f 73 69 74 69 | 6f 6e 25 3d a7 66 75 6c |.%positi|on%=.ful|
|000000e0| 6c 6e 61 6d 65 24 2c 22 | 2e 22 2c 6c 65 74 74 65 |lname$,"|.",lette|
|000000f0| 72 25 29 0d 00 96 15 6c | 65 74 74 65 72 25 3d 6c |r%)....l|etter%=l|
|00000100| 65 74 74 65 72 25 2d 31 | 0d 00 a0 1d fd 20 70 6f |etter%-1|..... po|
|00000110| 73 69 74 69 6f 6e 25 3e | 30 20 84 20 6c 65 74 74 |sition%>|0 . lett|
|00000120| 65 72 25 3d 30 0d 00 aa | 04 0d 00 b4 25 70 61 74 |er%=0...|....%pat|
|00000130| 68 6e 61 6d 65 24 3d c0 | 66 75 6c 6c 6e 61 6d 65 |hname$=.|fullname|
|00000140| 24 2c 70 6f 73 69 74 69 | 6f 6e 25 2d 31 29 0d 00 |$,positi|on%-1)..|
|00000150| be 0e 3d 70 61 74 68 6e | 61 6d 65 24 0d 00 c8 04 |..=pathn|ame$....|
|00000160| 0d 00 d2 04 0d 00 dc 04 | 0d 00 e6 19 dd a4 6c 65 |........|......le|
|00000170| 61 66 6e 61 6d 65 28 66 | 75 6c 6c 6e 61 6d 65 24 |afname(f|ullname$|
|00000180| 29 0d 00 f0 17 6c 65 74 | 74 65 72 25 3d a9 20 66 |)....let|ter%=. f|
|00000190| 75 6c 6c 6e 61 6d 65 24 | 0d 00 fa 04 0d 01 04 05 |ullname$|........|
|000001a0| f5 0d 01 0e 25 70 6f 73 | 69 74 69 6f 6e 25 3d a7 |....%pos|ition%=.|
|000001b0| 66 75 6c 6c 6e 61 6d 65 | 24 2c 22 2e 22 2c 6c 65 |fullname|$,".",le|
|000001c0| 74 74 65 72 25 29 0d 01 | 18 15 6c 65 74 74 65 72 |tter%)..|..letter|
|000001d0| 25 3d 6c 65 74 74 65 72 | 25 2d 31 0d 01 22 1d fd |%=letter|%-1.."..|
|000001e0| 20 70 6f 73 69 74 69 6f | 6e 25 3e 30 20 84 20 6c | positio|n%>0 . l|
|000001f0| 65 74 74 65 72 25 3d 30 | 0d 01 2c 04 0d 01 36 25 |etter%=0|..,...6%|
|00000200| 6c 65 61 66 6e 61 6d 65 | 24 3d c1 66 75 6c 6c 6e |leafname|$=.fulln|
|00000210| 61 6d 65 24 2c 70 6f 73 | 69 74 69 6f 6e 25 2b 31 |ame$,pos|ition%+1|
|00000220| 29 0d 01 40 0e 3d 6c 65 | 61 66 6e 61 6d 65 24 0d |)..@.=le|afname$.|
|00000230| 01 4a 04 0d 01 54 04 0d | 01 5e 04 0d 01 68 1d dd |.J...T..|.^...h..|
|00000240| a4 6f 62 6a 65 63 74 74 | 79 70 65 28 6f 62 6a 65 |.objectt|ype(obje|
|00000250| 63 74 66 69 6c 65 24 29 | 0d 01 72 28 70 61 74 68 |ctfile$)|..r(path|
|00000260| 6e 61 6d 65 24 3d a4 70 | 61 74 68 6e 61 6d 65 28 |name$=.p|athname(|
|00000270| 6f 62 6a 65 63 74 66 69 | 6c 65 24 29 2b 22 2e 22 |objectfi|le$)+"."|
|00000280| 0d 01 7c 24 6c 65 61 66 | 6e 61 6d 65 24 3d a4 6c |..|$leaf|name$=.l|
|00000290| 65 61 66 6e 61 6d 65 28 | 6f 62 6a 65 63 74 66 69 |eafname(|objectfi|
|000002a0| 6c 65 24 29 0d 01 86 04 | 0d 01 90 36 c8 99 22 4f |le$)....|...6.."O|
|000002b0| 53 5f 46 69 6c 65 22 2c | 31 33 2c 6c 65 61 66 6e |S_File",|13,leafn|
|000002c0| 61 6d 65 24 2c 2c 2c 70 | 61 74 68 6e 61 6d 65 24 |ame$,,,p|athname$|
|000002d0| 20 b8 20 6f 62 6a 65 63 | 74 74 79 70 65 25 0d 01 | . objec|ttype%..|
|000002e0| 9a 10 3d 6f 62 6a 65 63 | 74 74 79 70 65 25 0d 01 |..=objec|ttype%..|
|000002f0| a4 04 0d 01 ae 04 0d 01 | b8 04 0d 01 c2 25 dd a4 |........|.....%..|
|00000300| 73 74 72 69 6e 67 66 72 | 6f 6d 6d 65 6d 6f 72 79 |stringfr|ommemory|
|00000310| 28 6d 65 6d 6f 72 79 62 | 75 66 66 65 72 25 29 0d |(memoryb|uffer%).|
|00000320| 01 cc 14 73 74 72 69 6e | 67 73 74 72 69 6e 67 24 |...strin|gstring$|
|00000330| 3d 22 22 0d 01 d6 04 0d | 01 e0 18 c8 95 20 3f 6d |="".....|..... ?m|
|00000340| 65 6d 6f 72 79 62 75 66 | 66 65 72 25 3e 33 31 0d |emorybuf|fer%>31.|
|00000350| 01 ea 31 73 74 72 69 6e | 67 73 74 72 69 6e 67 24 |..1strin|gstring$|
|00000360| 3d 73 74 72 69 6e 67 73 | 74 72 69 6e 67 24 2b bd |=strings|tring$+.|
|00000370| 28 3f 6d 65 6d 6f 72 79 | 62 75 66 66 65 72 25 29 |(?memory|buffer%)|
|00000380| 0d 01 f4 21 6d 65 6d 6f | 72 79 62 75 66 66 65 72 |...!memo|rybuffer|
|00000390| 25 3d 6d 65 6d 6f 72 79 | 62 75 66 66 65 72 25 2b |%=memory|buffer%+|
|000003a0| 31 0d 01 fe 05 ce 0d 02 | 08 04 0d 02 12 12 3d 73 |1.......|......=s|
|000003b0| 74 72 69 6e 67 73 74 72 | 69 6e 67 24 0d 02 1c 04 |tringstr|ing$....|
|000003c0| 0d 02 26 04 0d 02 30 04 | 0d 02 3a 19 dd f2 69 6e |..&...0.|..:...in|
|000003d0| 69 74 69 61 6c 69 73 65 | 64 69 72 65 63 74 6f 72 |itialise|director|
|000003e0| 79 0d 02 44 1a 6d 61 78 | 64 69 72 65 63 74 6f 72 |y..D.max|director|
|000003f0| 79 6c 65 76 65 6c 73 25 | 3d 31 30 0d 02 4e 15 64 |ylevels%|=10..N.d|
|00000400| 69 72 65 63 74 6f 72 79 | 6c 65 76 65 6c 25 3d 30 |irectory|level%=0|
|00000410| 0d 02 58 04 0d 02 62 1d | 64 69 72 65 63 74 6f 72 |..X...b.|director|
|00000420| 79 62 75 66 66 65 72 6c | 65 6e 67 74 68 25 3d 33 |ybufferl|ength%=3|
|00000430| 35 0d 02 6c 04 0d 02 76 | 26 de 20 66 69 6c 65 6e |5..l...v|&. filen|
|00000440| 75 6d 62 65 72 25 28 6d | 61 78 64 69 72 65 63 74 |umber%(m|axdirect|
|00000450| 6f 72 79 6c 65 76 65 6c | 73 25 29 0d 02 80 31 de |orylevel|s%)...1.|
|00000460| 20 64 69 72 65 63 74 6f | 72 79 72 65 61 64 62 75 | directo|ryreadbu|
|00000470| 66 66 65 72 25 20 64 69 | 72 65 63 74 6f 72 79 62 |ffer% di|rectoryb|
|00000480| 75 66 66 65 72 6c 65 6e | 67 74 68 25 0d 02 8a 05 |ufferlen|gth%....|
|00000490| e1 0d 02 94 04 0d 02 9e | 04 0d 02 a8 04 0d 02 b2 |........|........|
|000004a0| 24 dd f2 61 63 74 6f 6e | 64 69 72 65 63 74 6f 72 |$..acton|director|
|000004b0| 79 28 64 69 72 65 63 74 | 6f 72 79 6e 61 6d 65 24 |y(direct|oryname$|
|000004c0| 29 0d 02 bc a8 e7 20 64 | 69 72 65 63 74 6f 72 79 |)..... d|irectory|
|000004d0| 6c 65 76 65 6c 25 3e 3d | 6d 61 78 64 69 72 65 63 |level%>=|maxdirec|
|000004e0| 74 6f 72 79 6c 65 76 65 | 6c 73 25 20 8c 20 f2 72 |toryleve|ls% . .r|
|000004f0| 65 70 6f 72 74 65 72 72 | 6f 72 28 30 2c 22 44 69 |eporterr|or(0,"Di|
|00000500| 72 65 63 74 6f 72 79 20 | 6c 65 76 65 6c 20 74 6f |rectory |level to|
|00000510| 6f 20 64 65 65 70 3a 20 | 73 6b 69 70 70 69 6e 67 |o deep: |skipping|
|00000520| 20 64 65 65 70 65 72 20 | 66 69 6c 65 73 22 2c a3 | deeper |files",.|
|00000530| 29 3a f2 72 65 70 6f 72 | 74 65 72 72 6f 72 28 30 |):.repor|terror(0|
|00000540| 2c 22 43 75 72 72 65 6e | 74 20 6f 62 6a 65 63 74 |,"Curren|t object|
|00000550| 20 69 73 20 22 2b 64 69 | 72 65 63 74 6f 72 79 6e | is "+di|rectoryn|
|00000560| 61 6d 65 24 2c a3 29 3a | e1 0d 02 c6 25 64 69 72 |ame$,.):|....%dir|
|00000570| 65 63 74 6f 72 79 6c 65 | 76 65 6c 25 3d 64 69 72 |ectoryle|vel%=dir|
|00000580| 65 63 74 6f 72 79 6c 65 | 76 65 6c 25 2b 31 0d 02 |ectoryle|vel%+1..|
|00000590| d0 04 0d 02 da 22 66 69 | 6c 65 6e 75 6d 62 65 72 |....."fi|lenumber|
|000005a0| 25 28 64 69 72 65 63 74 | 6f 72 79 6c 65 76 65 6c |%(direct|orylevel|
|000005b0| 25 29 3d 30 0d 02 e4 04 | 0d 02 ee 05 f5 0d 02 f8 |%)=0....|........|
|000005c0| 93 c8 99 22 4f 53 5f 47 | 42 50 42 22 2c 31 30 2c |..."OS_G|BPB",10,|
|000005d0| 64 69 72 65 63 74 6f 72 | 79 6e 61 6d 65 24 2c 64 |director|yname$,d|
|000005e0| 69 72 65 63 74 6f 72 79 | 72 65 61 64 62 75 66 66 |irectory|readbuff|
|000005f0| 65 72 25 2c 31 2c 66 69 | 6c 65 6e 75 6d 62 65 72 |er%,1,fi|lenumber|
|00000600| 25 28 64 69 72 65 63 74 | 6f 72 79 6c 65 76 65 6c |%(direct|orylevel|
|00000610| 25 29 2c 64 69 72 65 63 | 74 6f 72 79 62 75 66 66 |%),direc|torybuff|
|00000620| 65 72 6c 65 6e 67 74 68 | 25 2c 22 2a 22 20 b8 20 |erlength|%,"*" . |
|00000630| 2c 2c 2c 2c 66 69 6c 65 | 6e 75 6d 62 65 72 25 28 |,,,,file|number%(|
|00000640| 64 69 72 65 63 74 6f 72 | 79 6c 65 76 65 6c 25 29 |director|ylevel%)|
|00000650| 0d 03 02 73 e7 20 66 69 | 6c 65 6e 75 6d 62 65 72 |...s. fi|lenumber|
|00000660| 25 28 64 69 72 65 63 74 | 6f 72 79 6c 65 76 65 6c |%(direct|orylevel|
|00000670| 25 29 3e 30 20 8c 20 f2 | 77 65 72 65 61 64 61 6e |%)>0 . .|wereadan|
|00000680| 69 74 65 6d 28 64 69 72 | 65 63 74 6f 72 79 6e 61 |item(dir|ectoryna|
|00000690| 6d 65 24 2b 22 2e 22 2b | a4 73 74 72 69 6e 67 66 |me$+"."+|.stringf|
|000006a0| 72 6f 6d 6d 65 6d 6f 72 | 79 28 64 69 72 65 63 74 |rommemor|y(direct|
|000006b0| 6f 72 79 72 65 61 64 62 | 75 66 66 65 72 25 2b 32 |oryreadb|uffer%+2|
|000006c0| 30 29 29 0d 03 0c 25 fd | 20 66 69 6c 65 6e 75 6d |0))...%.| filenum|
|000006d0| 62 65 72 25 28 64 69 72 | 65 63 74 6f 72 79 6c 65 |ber%(dir|ectoryle|
|000006e0| 76 65 6c 25 29 3d 2d 31 | 0d 03 16 04 0d 03 20 25 |vel%)=-1|...... %|
|000006f0| 64 69 72 65 63 74 6f 72 | 79 6c 65 76 65 6c 25 3d |director|ylevel%=|
|00000700| 64 69 72 65 63 74 6f 72 | 79 6c 65 76 65 6c 25 2d |director|ylevel%-|
|00000710| 31 0d 03 2a 05 e1 0d 03 | 34 04 0d 03 3e 04 0d 03 |1..*....|4...>...|
|00000720| 48 04 0d 03 52 1c dd f2 | 77 65 72 65 61 64 61 6e |H...R...|wereadan|
|00000730| 69 74 65 6d 28 77 65 67 | 6f 74 69 74 24 29 0d 03 |item(weg|otit$)..|
|00000740| 5c 1a f2 61 63 74 6f 6e | 6f 62 6a 65 63 74 28 77 |\..acton|object(w|
|00000750| 65 67 6f 74 69 74 24 29 | 0d 03 66 05 e1 0d ff    |egotit$)|..f.... |
+--------+-------------------------+-------------------------+--------+--------+