/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities / _resources / !Resources / Coder

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 ee 20 85 20 | f2 65 72 72 6f 72 3a e0 |..... . |.error:.|
|00000010| 0d 00 0f 1d 70 74 72 3d | 30 3a 6b 3d 30 3a 64 6f |....ptr=|0:k=0:do|
|00000020| 6e 65 3d 30 3a 67 65 6d | 75 73 68 3d 30 0d 00 14 |ne=0:gem|ush=0...|
|00000030| 1c 64 61 74 61 3d 8e 28 | 22 3c 52 65 73 24 44 69 |.data=.(|"<Res$Di|
|00000040| 72 3e 2e 44 61 74 61 22 | 29 0d 00 1e 4e e8 23 64 |r>.Data"|)...N.#d|
|00000050| 61 74 61 2c 70 61 74 68 | 31 24 2c 70 61 74 68 32 |ata,path|1$,path2|
|00000060| 24 2c 70 61 74 68 33 24 | 2c 70 61 74 68 34 24 2c |$,path3$|,path4$,|
|00000070| 64 65 73 74 31 24 2c 64 | 65 73 74 32 24 2c 64 65 |dest1$,d|est2$,de|
|00000080| 73 74 33 24 2c 64 65 73 | 74 34 24 2c 73 61 76 65 |st3$,des|t4$,save|
|00000090| 24 2c 6d 6f 64 6e 24 0d | 00 28 0a d9 23 64 61 74 |$,modn$.|.(..#dat|
|000000a0| 61 0d 00 3c 0e de 20 62 | 6c 6f 63 6b 20 36 34 0d |a..<.. b|lock 64.|
|000000b0| 00 3d 09 f2 63 6f 64 65 | 0d 00 41 0c f2 67 65 6e |.=..code|..A..gen|
|000000c0| 65 73 69 73 0d 00 42 04 | 0d 00 46 0d dd f2 67 65 |esis..B.|..F...ge|
|000000d0| 6e 65 73 69 73 0d 00 50 | 05 3a 0d 00 5a 0f e3 20 |nesis..P|.:..Z.. |
|000000e0| 63 75 72 3d 31 20 b8 20 | 34 0d 00 64 18 e7 20 63 |cur=1 . |4..d.. c|
|000000f0| 75 72 3d 31 20 70 61 74 | 68 24 3d 70 61 74 68 31 |ur=1 pat|h$=path1|
|00000100| 24 0d 00 6e 18 e7 20 63 | 75 72 3d 32 20 70 61 74 |$..n.. c|ur=2 pat|
|00000110| 68 24 3d 70 61 74 68 32 | 24 0d 00 78 18 e7 20 63 |h$=path2|$..x.. c|
|00000120| 75 72 3d 33 20 70 61 74 | 68 24 3d 70 61 74 68 33 |ur=3 pat|h$=path3|
|00000130| 24 0d 00 82 18 e7 20 63 | 75 72 3d 34 20 70 61 74 |$..... c|ur=4 pat|
|00000140| 68 24 3d 70 61 74 68 34 | 24 0d 00 87 13 e7 20 63 |h$=path4|$..... c|
|00000150| 75 72 3d 35 20 f2 64 6f | 6e 65 3a e0 0d 00 8c 1e |ur=5 .do|ne:.....|
|00000160| e7 20 70 61 74 68 24 3d | 22 22 20 8c 20 63 75 72 |. path$=|"" . cur|
|00000170| 2b 3d 31 3a e5 20 8d 44 | 64 40 0d 00 96 3c 66 69 |+=1:. .D|d@...<fi|
|00000180| 6c 65 24 3d a4 66 69 6c | 65 6e 61 6d 65 28 70 61 |le$=.fil|ename(pa|
|00000190| 74 68 24 29 3a 70 61 74 | 68 24 3d c0 70 61 74 68 |th$):pat|h$=.path|
|000001a0| 24 2c a9 28 70 61 74 68 | 24 29 2d a9 28 66 69 6c |$,.(path|$)-.(fil|
|000001b0| 65 24 29 2d 31 29 0d 00 | a0 18 e7 20 63 75 72 3d |e$)-1)..|... cur=|
|000001c0| 31 20 64 65 73 74 24 3d | 64 65 73 74 31 24 0d 00 |1 dest$=|dest1$..|
|000001d0| aa 18 e7 20 63 75 72 3d | 32 20 64 65 73 74 24 3d |... cur=|2 dest$=|
|000001e0| 64 65 73 74 32 24 0d 00 | b4 18 e7 20 63 75 72 3d |dest2$..|... cur=|
|000001f0| 33 20 64 65 73 74 24 3d | 64 65 73 74 33 24 0d 00 |3 dest$=|dest3$..|
|00000200| be 18 e7 20 63 75 72 3d | 34 20 64 65 73 74 24 3d |... cur=|4 dest$=|
|00000210| 64 65 73 74 34 24 0d 00 | c8 1e e7 20 64 65 73 74 |dest4$..|... dest|
|00000220| 24 3d 22 22 20 8c 20 63 | 75 72 2b 3d 31 3a e5 20 |$="" . c|ur+=1:. |
|00000230| 8d 44 64 40 0d 00 d2 1d | 64 65 73 74 24 3d c2 64 |.Dd@....|dest$=.d|
|00000240| 65 73 74 24 2c a9 28 64 | 65 73 74 24 29 2d 31 30 |est$,.(d|est$)-10|
|00000250| 29 0d 00 e6 11 72 65 64 | 65 73 74 24 3d 64 65 73 |)....red|est$=des|
|00000260| 74 24 0d 00 f0 20 f2 72 | 65 67 69 73 74 65 72 28 |t$... .r|egister(|
|00000270| 66 69 6c 65 24 2c 70 61 | 74 68 24 2c 64 65 73 74 |file$,pa|th$,dest|
|00000280| 24 29 0d 00 fa 05 ed 0d | 01 04 27 c8 99 20 22 4f |$)......|..'.. "O|
|00000290| 53 5f 46 69 6c 65 22 2c | 31 30 2c 73 61 76 65 24 |S_File",|10,save$|
|000002a0| 2c 26 46 46 41 2c 2c 63 | 6f 64 65 2c 4f 25 0d 01 |,&FFA,,c|ode,O%..|
|000002b0| 0e 07 6b 3d 30 0d 01 18 | 05 e0 0d 01 22 21 dd f2 |..k=0...|...."!..|
|000002c0| 72 65 67 69 73 74 65 72 | 28 66 69 6c 65 24 2c 70 |register|(file$,p|
|000002d0| 61 74 68 24 2c 64 65 73 | 74 24 29 0d 01 2c 0b 64 |ath$,des|t$)..,.d|
|000002e0| 6f 6e 65 3d 31 3a 0d 01 | 36 28 c8 99 22 4f 53 5f |one=1:..|6(.."OS_|
|000002f0| 46 69 6c 65 22 2c 35 2c | 70 61 74 68 24 2b 22 2e |File",5,|path$+".|
|00000300| 22 2b 66 69 6c 65 24 20 | b8 20 74 79 70 65 0d 01 |"+file$ |. type..|
|00000310| 3c 36 e7 20 74 79 70 65 | 3d 31 20 8c 20 f2 73 74 |<6. type|=1 . .st|
|00000320| 6f 72 65 28 70 61 74 68 | 24 2b 22 2e 22 2b 66 69 |ore(path|$+"."+fi|
|00000330| 6c 65 24 2c 64 65 73 74 | 24 2b 22 2e 22 2b 66 69 |le$,dest|$+"."+fi|
|00000340| 6c 65 24 29 0d 01 40 3b | e7 20 74 79 70 65 3c 3e |le$)..@;|. type<>|
|00000350| 31 20 8c 20 f2 64 69 72 | 65 63 74 6f 72 79 28 70 |1 . .dir|ectory(p|
|00000360| 61 74 68 24 2b 22 2e 22 | 2b 66 69 6c 65 24 2c 64 |ath$+"."|+file$,d|
|00000370| 65 73 74 24 2b 22 2e 22 | 2b 66 69 6c 65 24 29 0d |est$+"."|+file$).|
|00000380| 01 4a 13 e7 20 67 65 6d | 75 73 68 3d 2d 31 20 8c |.J.. gem|ush=-1 .|
|00000390| 20 e1 0d 01 4b 05 e1 0d | 01 53 18 dd f2 73 74 6f | ...K...|.S...sto|
|000003a0| 72 65 28 73 6f 75 72 63 | 65 24 2c 61 73 24 29 0d |re(sourc|e$,as$).|
|000003b0| 01 54 32 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c |.T2.. "O|S_File",|
|000003c0| 35 2c 73 6f 75 72 63 65 | 24 20 b8 20 2c 2c 6c 6f |5,source|$ . ,,lo|
|000003d0| 61 64 2c 65 78 65 63 2c | 73 69 7a 65 2c 61 74 74 |ad,exec,|size,att|
|000003e0| 72 0d 01 5e 70 6b 2b 3d | 73 69 7a 65 3a e7 20 6b |r..^pk+=|size:. k|
|000003f0| 2b 32 30 30 30 30 3e 73 | 70 61 63 65 20 8c 20 f1 |+20000>s|pace . .|
|00000400| 22 4e 6f 74 20 65 6e 6f | 75 67 68 20 6d 65 6d 6f |"Not eno|ugh memo|
|00000410| 72 79 20 74 6f 20 63 72 | 65 61 74 65 20 6d 6f 64 |ry to cr|eate mod|
|00000420| 75 6c 65 2e 20 53 61 76 | 69 6e 67 20 77 68 61 74 |ule. Sav|ing what|
|00000430| 20 74 68 65 72 65 20 69 | 73 20 6f 66 20 6d 6f 64 | there i|s of mod|
|00000440| 75 6c 65 20 6e 6f 77 2e | 22 3a f2 64 6f 6e 65 3a |ule now.|":.done:|
|00000450| e0 0d 01 68 0a 5b 4f 50 | 54 20 34 0d 01 72 0b 2e |...h.[OP|T 4..r..|
|00000460| 6f 66 66 73 65 74 0d 01 | 7c 10 45 51 55 44 20 20 |offset..||.EQUD  |
|00000470| 20 20 6c 6f 61 64 0d 01 | 86 10 45 51 55 44 20 20 |  load..|..EQUD  |
|00000480| 20 20 65 78 65 63 0d 01 | 90 10 45 51 55 44 20 20 |  exec..|..EQUD  |
|00000490| 20 20 73 69 7a 65 0d 01 | 9a 10 45 51 55 44 20 20 |  size..|..EQUD  |
|000004a0| 20 20 61 74 74 72 0d 01 | a4 13 45 51 55 53 20 20 |  attr..|..EQUS  |
|000004b0| 20 20 c1 61 73 24 2c 33 | 29 0d 01 ae 0d 45 51 55 |  .as$,3|)....EQU|
|000004c0| 42 20 20 20 20 30 0d 01 | b8 09 41 4c 49 47 4e 0d |B    0..|..ALIGN.|
|000004d0| 01 c2 12 45 51 55 44 20 | 20 20 20 73 69 7a 65 2b |...EQUD |   size+|
|000004e0| 34 0d 01 cc 12 a4 6c 6f | 61 64 28 73 6f 75 72 63 |4.....lo|ad(sourc|
|000004f0| 65 24 29 0d 01 d6 09 41 | 4c 49 47 4e 0d 01 e0 15 |e$)....A|LIGN....|
|00000500| 2e 6e 65 78 74 20 20 20 | 45 51 55 44 20 20 20 20 |.next   |EQUD    |
|00000510| 30 0d 01 ea 05 5d 0d 01 | f4 22 21 28 63 6f 64 65 |0....]..|."!(code|
|00000520| 2b 6f 66 66 73 65 74 2d | 34 29 3d 6e 65 78 74 2d |+offset-|4)=next-|
|00000530| 6f 66 66 73 65 74 2b 34 | 0d 01 fe 05 e1 0d 02 08 |offset+4|........|
|00000540| 0a dd f2 63 6f 64 65 0d | 02 12 15 73 70 61 63 65 |...code.|...space|
|00000550| 3d 93 2d e0 2d 33 32 2a | 31 30 32 34 0d 02 1c 10 |=.-.-32*|1024....|
|00000560| de 20 63 6f 64 65 20 73 | 70 61 63 65 0d 02 26 1d |. code s|pace..&.|
|00000570| 77 70 3d 31 32 3a 73 70 | 3d 31 33 3a 6c 69 6e 6b |wp=12:sp|=13:link|
|00000580| 3d 31 34 3a 70 63 3d 31 | 35 0d 02 30 21 e3 20 70 |=14:pc=1|5..0!. p|
|00000590| 61 73 73 3d 34 20 b8 20 | 36 20 88 20 32 3a 50 25 |ass=4 . |6 . 2:P%|
|000005a0| 3d 30 3a 4f 25 3d 63 6f | 64 65 0d 02 3a 0d 5b 4f |=0:O%=co|de..:.[O|
|000005b0| 50 54 20 70 61 73 73 0d | 02 44 0d 45 51 55 44 20 |PT pass.|.D.EQUD |
|000005c0| 20 20 20 30 0d 02 4e 15 | 45 51 55 44 20 20 20 20 |   0..N.|EQUD    |
|000005d0| 49 6e 69 74 5f 43 6f 64 | 65 0d 02 58 16 45 51 55 |Init_Cod|e..X.EQU|
|000005e0| 44 20 20 20 20 46 69 6e | 61 6c 5f 43 6f 64 65 0d |D    Fin|al_Code.|
|000005f0| 02 62 0d 45 51 55 44 20 | 20 20 20 30 0d 02 6c 18 |.b.EQUD |   0..l.|
|00000600| 45 51 55 44 20 20 20 20 | 54 69 74 6c 65 5f 53 74 |EQUD    |Title_St|
|00000610| 72 69 6e 67 0d 02 76 17 | 45 51 55 44 20 20 20 20 |ring..v.|EQUD    |
|00000620| 48 65 6c 70 5f 53 74 72 | 69 6e 67 0d 02 80 14 45 |Help_Str|ing....E|
|00000630| 51 55 44 20 20 20 20 6b | 65 79 77 6f 72 64 73 0d |QUD    k|eywords.|
|00000640| 02 8a 0d 45 51 55 44 20 | 20 20 20 30 0d 02 94 0d |...EQUD |   0....|
|00000650| 45 51 55 44 20 20 20 20 | 30 0d 02 9e 0d 45 51 55 |EQUD    |0....EQU|
|00000660| 44 20 20 20 20 30 0d 02 | a8 0d 45 51 55 44 20 20 |D    0..|..EQUD  |
|00000670| 20 20 30 0d 02 b2 11 2e | 54 69 74 6c 65 5f 53 74 |  0.....|Title_St|
|00000680| 72 69 6e 67 0d 02 bc 11 | 45 51 55 53 20 20 20 20 |ring....|EQUS    |
|00000690| 6d 6f 64 6e 24 0d 02 c6 | 0d 45 51 55 42 20 20 20 |modn$...|.EQUB   |
|000006a0| 20 30 0d 02 d0 09 41 4c | 49 47 4e 0d 02 da 10 2e | 0....AL|IGN.....|
|000006b0| 48 65 6c 70 5f 53 74 72 | 69 6e 67 0d 02 e4 1a 45 |Help_Str|ing....E|
|000006c0| 51 55 53 20 20 20 20 6d | 6f 64 6e 24 2b 22 5f 52 |QUS    m|odn$+"_R|
|000006d0| 65 73 46 53 22 0d 02 ee | 0d 45 51 55 42 20 20 20 |esFS"...|.EQUB   |
|000006e0| 20 39 0d 02 f8 20 45 51 | 55 53 20 20 20 20 22 31 | 9... EQ|US    "1|
|000006f0| 2e 30 30 20 28 32 38 20 | 4a 75 6c 20 31 39 39 32 |.00 (28 |Jul 1992|
|00000700| 29 22 0d 03 02 0d 45 51 | 55 42 20 20 20 20 39 0d |)"....EQ|UB    9.|
|00000710| 03 0c 18 45 51 55 53 20 | 20 20 20 22 43 6f 64 65 |...EQUS |   "Code|
|00000720| 20 a9 20 42 41 55 22 0d | 03 16 0d 45 51 55 42 20 | . BAU".|...EQUB |
|00000730| 20 20 20 30 0d 03 20 09 | 41 4c 49 47 4e 0d 03 2a |   0.. .|ALIGN..*|
|00000740| 0d 2e 6b 65 79 77 6f 72 | 64 73 0d 03 34 11 45 51 |..keywor|ds..4.EQ|
|00000750| 55 53 20 20 20 20 6d 6f | 64 6e 24 0d 03 3e 0d 45 |US    mo|dn$..>.E|
|00000760| 51 55 42 20 20 20 20 30 | 0d 03 48 09 41 4c 49 47 |QUB    0|..H.ALIG|
|00000770| 4e 0d 03 52 0d 45 51 55 | 44 20 20 20 20 30 0d 03 |N..R.EQU|D    0..|
|00000780| 5c 0d 45 51 55 44 20 20 | 20 20 30 0d 03 66 0d 45 |\.EQUD  |  0..f.E|
|00000790| 51 55 44 20 20 20 20 30 | 0d 03 70 1b 45 51 55 44 |QUD    0|..p.EQUD|
|000007a0| 20 20 20 20 4d 6f 72 65 | 48 65 6c 70 5f 53 74 72 |    More|Help_Str|
|000007b0| 69 6e 67 0d 03 7a 0d 45 | 51 55 44 20 20 20 20 30 |ing..z.E|QUD    0|
|000007c0| 0d 03 84 0e 2e 49 6e 69 | 74 5f 43 6f 64 65 0d 03 |.....Ini|t_Code..|
|000007d0| 8e 1b 53 54 4d 46 44 20 | 20 20 28 73 70 29 21 2c |..STMFD |  (sp)!,|
|000007e0| 7b 52 30 2c 6c 69 6e 6b | 7d 0d 03 98 14 41 44 52 |{R0,link|}....ADR|
|000007f0| 20 20 20 20 20 52 30 2c | 46 69 6c 65 73 0d 03 a2 |     R0,|Files...|
|00000800| 27 53 57 49 20 20 20 20 | 20 22 58 52 65 73 6f 75 |'SWI    | "XResou|
|00000810| 72 63 65 46 53 5f 52 65 | 67 69 73 74 65 72 46 69 |rceFS_Re|gisterFi|
|00000820| 6c 65 73 22 0d 03 ac 19 | 4c 44 4d 46 44 20 20 20 |les"....|LDMFD   |
|00000830| 28 73 70 29 21 2c 7b 52 | 30 2c 70 63 7d 0d 03 b6 |(sp)!,{R|0,pc}...|
|00000840| 0f 2e 46 69 6e 61 6c 5f | 43 6f 64 65 0d 03 c0 1b |..Final_|Code....|
|00000850| 53 54 4d 46 44 20 20 20 | 28 73 70 29 21 2c 7b 52 |STMFD   |(sp)!,{R|
|00000860| 30 2c 6c 69 6e 6b 7d 0d | 03 ca 14 41 44 52 20 20 |0,link}.|...ADR  |
|00000870| 20 20 20 52 30 2c 46 69 | 6c 65 73 0d 03 d4 29 53 |   R0,Fi|les...)S|
|00000880| 57 49 20 20 20 20 20 22 | 58 52 65 73 6f 75 72 63 |WI     "|XResourc|
|00000890| 65 46 53 5f 44 65 72 65 | 67 69 73 74 65 72 46 69 |eFS_Dere|gisterFi|
|000008a0| 6c 65 73 22 0d 03 de 19 | 4c 44 4d 46 44 20 20 20 |les"....|LDMFD   |
|000008b0| 28 73 70 29 21 2c 7b 52 | 30 2c 70 63 7d 0d 03 e8 |(sp)!,{R|0,pc}...|
|000008c0| 14 2e 4d 6f 72 65 48 65 | 6c 70 5f 53 74 72 69 6e |..MoreHe|lp_Strin|
|000008d0| 67 0d 03 f2 4a 45 51 55 | 53 20 20 20 20 22 41 64 |g...JEQU|S    "Ad|
|000008e0| 64 73 20 66 69 6c 65 73 | 20 74 6f 20 74 68 65 20 |ds files| to the |
|000008f0| 52 65 73 6f 75 72 63 65 | 20 66 69 6c 65 72 20 6f |Resource| filer o|
|00000900| 6e 20 52 69 73 63 4f 53 | 20 33 20 6d 61 63 68 69 |n RiscOS| 3 machi|
|00000910| 6e 65 73 2e 22 2b bd 28 | 31 33 29 0d 03 fc 50 45 |nes."+.(|13)...PE|
|00000920| 51 55 53 20 20 20 20 22 | 4d 6f 64 75 6c 65 20 63 |QUS    "|Module c|
|00000930| 72 65 61 74 65 64 20 62 | 79 20 21 52 65 73 6f 75 |reated b|y !Resou|
|00000940| 72 63 65 73 20 61 70 70 | 6c 69 63 61 74 69 6f 6e |rces app|lication|
|00000950| 20 6f 6e 20 22 2b c0 91 | 24 2c a7 91 24 2c 22 2e | on "+..|$,..$,".|
|00000960| 22 29 2d 31 29 2b bd 28 | 31 33 29 0d 04 06 45 45 |")-1)+.(|13)...EE|
|00000970| 51 55 53 20 20 20 20 22 | 21 52 65 73 6f 75 72 63 |QUS    "|!Resourc|
|00000980| 65 73 20 61 70 70 6c 69 | 63 61 74 69 6f 6e 20 a9 |es appli|cation .|
|00000990| 20 4a 2e 20 52 6f 62 62 | 69 6e 73 20 28 46 65 62 | J. Robb|ins (Feb|
|000009a0| 20 31 32 20 31 39 39 33 | 29 22 2b bd 28 31 33 29 | 12 1993|)"+.(13)|
|000009b0| 0d 04 10 39 45 51 55 53 | 20 20 20 20 22 4d 6f 64 |...9EQUS|    "Mod|
|000009c0| 75 6c 65 20 63 6f 64 65 | 20 a9 20 42 41 55 20 28 |ule code| . BAU (|
|000009d0| 32 38 20 4a 75 6c 20 31 | 39 39 32 29 22 2b bd 28 |28 Jul 1|992)"+.(|
|000009e0| 31 33 29 2b bd 28 31 33 | 29 0d 04 11 31 45 51 55 |13)+.(13|)...1EQU|
|000009f0| 53 20 20 20 20 22 49 6e | 66 6f 72 6d 61 74 69 6f |S    "In|formatio|
|00000a00| 6e 20 6f 6e 20 66 69 6c | 65 73 20 3a 2d 22 2b bd |n on fil|es :-"+.|
|00000a10| 28 31 33 29 2b bd 28 31 | 33 29 0d 04 12 2b 45 51 |(13)+.(1|3)...+EQ|
|00000a20| 55 53 20 20 20 20 70 61 | 74 68 31 24 2b bd 28 39 |US    pa|th1$+.(9|
|00000a30| 29 2b 22 20 2d 3e 20 22 | 2b 64 65 73 74 31 24 2b |)+" -> "|+dest1$+|
|00000a40| bd 28 31 33 29 0d 04 13 | 2b 45 51 55 53 20 20 20 |.(13)...|+EQUS   |
|00000a50| 20 70 61 74 68 32 24 2b | bd 28 39 29 2b 22 20 2d | path2$+|.(9)+" -|
|00000a60| 3e 20 22 2b 64 65 73 74 | 32 24 2b bd 28 31 33 29 |> "+dest|2$+.(13)|
|00000a70| 0d 04 14 2b 45 51 55 53 | 20 20 20 20 70 61 74 68 |...+EQUS|    path|
|00000a80| 33 24 2b bd 28 39 29 2b | 22 20 2d 3e 20 22 2b 64 |3$+.(9)+|" -> "+d|
|00000a90| 65 73 74 33 24 2b bd 28 | 31 33 29 0d 04 14 30 45 |est3$+.(|13)...0E|
|00000aa0| 51 55 53 20 20 20 20 70 | 61 74 68 34 24 2b bd 28 |QUS    p|ath4$+.(|
|00000ab0| 39 29 2b 22 20 2d 3e 20 | 22 2b 64 65 73 74 34 24 |9)+" -> |"+dest4$|
|00000ac0| 2b bd 28 31 33 29 2b bd | 28 30 29 0d 04 1a 09 41 |+.(13)+.|(0)....A|
|00000ad0| 4c 49 47 4e 0d 04 24 15 | 2e 46 69 6c 65 73 20 20 |LIGN..$.|.Files  |
|00000ae0| 45 51 55 44 20 20 20 20 | 30 0d 04 2e 06 5d ed 0d |EQUD    |0....]..|
|00000af0| 04 38 05 e1 0d 04 42 0f | dd 20 a4 6c 6f 61 64 28 |.8....B.|. .load(|
|00000b00| 66 24 29 0d 04 4c 24 c8 | 99 20 22 4f 53 5f 46 69 |f$)..L$.|. "OS_Fi|
|00000b10| 6c 65 22 2c 26 46 46 2c | 66 24 2c 4f 25 20 b8 20 |le",&FF,|f$,O% . |
|00000b20| 2c 2c 2c 2c 6c 65 6e 0d | 04 56 13 50 25 2b 3d 6c |,,,,len.|.V.P%+=l|
|00000b30| 65 6e 3a 4f 25 2b 3d 6c | 65 6e 0d 04 60 07 3d 22 |en:O%+=l|en..`.="|
|00000b40| 22 0d 04 6a 15 dd a4 66 | 69 6c 65 6e 61 6d 65 28 |"..j...f|ilename(|
|00000b50| 6c 65 61 66 24 29 0d 04 | 74 12 c8 95 20 a7 6c 65 |leaf$)..|t... .le|
|00000b60| 61 66 24 2c 22 2e 22 29 | 0d 04 7e 1f 6c 65 61 66 |af$,".")|..~.leaf|
|00000b70| 24 3d c1 6c 65 61 66 24 | 2c a7 6c 65 61 66 24 2c |$=.leaf$|,.leaf$,|
|00000b80| 22 2e 22 29 2b 31 29 0d | 04 88 0c ce 3a 3d 6c 65 |".")+1).|....:=le|
|00000b90| 61 66 24 0d 04 92 0a dd | f2 64 6f 6e 65 0d 04 9c |af$.....|.done...|
|00000ba0| 3f e7 20 64 6f 6e 65 3d | 31 20 8c 20 64 6f 6e 65 |?. done=|1 . done|
|00000bb0| 3d 30 3a c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c |=0:.. "O|S_File",|
|00000bc0| 31 30 2c 73 61 76 65 24 | 2c 26 46 46 41 2c 2c 63 |10,save$|,&FFA,,c|
|00000bd0| 6f 64 65 2c 4f 25 3a 6b | 3d 30 3a e1 0d 04 a6 05 |ode,O%:k|=0:.....|
|00000be0| e1 0d 04 b0 17 dd 20 f2 | 64 69 72 65 63 74 6f 72 |...... .|director|
|00000bf0| 79 28 61 24 2c 62 24 29 | 0d 04 ba 09 ea 20 70 74 |y(a$,b$)|..... pt|
|00000c00| 72 0d 04 c4 09 70 74 72 | 3d 30 0d 04 ce 05 f5 0d |r....ptr|=0......|
|00000c10| 04 d8 40 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |..@ .. "|OS_GBPB"|
|00000c20| 2c 39 2c 70 61 74 68 24 | 2b 22 2e 22 2b 66 69 6c |,9,path$|+"."+fil|
|00000c30| 65 24 2c 62 6c 6f 63 6b | 2c 31 2c 70 74 72 2c 36 |e$,block|,1,ptr,6|
|00000c40| 34 20 b8 20 2c 2c 2c 72 | 65 61 64 2c 70 74 72 0d |4 . ,,,r|ead,ptr.|
|00000c50| 04 e2 0f 20 e7 20 72 65 | 61 64 3d 31 20 8c 0d 04 |... . re|ad=1 ...|
|00000c60| ec 0b 20 20 66 24 3d 22 | 22 0d 04 f6 09 20 20 69 |..  f$="|"....  i|
|00000c70| 3d 30 0d 05 00 07 20 20 | f5 0d 05 0a 15 20 20 20 |=0....  |.....   |
|00000c80| 66 24 2b 3d bd 28 62 6c | 6f 63 6b 3f 69 29 0d 05 |f$+=.(bl|ock?i)..|
|00000c90| 14 0b 20 20 20 69 2b 3d | 31 0d 05 1e 11 20 20 fd |..   i+=|1....  .|
|00000ca0| 20 62 6c 6f 63 6b 3f 69 | 3d 30 0d 05 28 10 20 20 | block?i|=0..(.  |
|00000cb0| 67 65 6d 75 73 68 3d 70 | 74 72 0d 05 32 19 20 20 |gemush=p|tr..2.  |
|00000cc0| f2 72 65 67 69 73 74 65 | 72 28 66 24 2c 61 24 2c |.registe|r(f$,a$,|
|00000cd0| 62 24 29 0d 05 3c 06 20 | cd 0d 05 46 0c fd 20 70 |b$)..<. |...F.. p|
|00000ce0| 74 72 3d 2d 31 0d 05 50 | 05 e1 0d 05 5a 0b dd f2 |tr=-1..P|....Z...|
|00000cf0| 65 72 72 6f 72 0d 05 64 | 21 f1 20 f6 24 2b 22 20 |error..d|!. .$+" |
|00000d00| 3a 61 74 20 6c 69 6e 65 | 20 22 2b c3 9e 2b 22 20 |:at line| "+..+" |
|00000d10| 22 2b c3 9f 3a e0 0d 05 | 6e 05 e1 0d ff          |"+..:...|n....   |
+--------+-------------------------+-------------------------+--------+--------+