/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsc / computils / !CompUtils / Resources / Expand / Example

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1f f4 20 3e 20 | 3c 42 61 73 69 63 53 61 |..... > |<BasicSa|
|00000010| 76 65 24 44 69 72 3e 2e | 45 78 61 6d 70 6c 65 0d |ve$Dir>.|Example.|
|00000020| 00 14 04 0d 00 1e 16 69 | 6e 24 3d 22 52 41 4d 3a |.......i|n$="RAM:|
|00000030| 24 2e 49 6e 46 69 6c 65 | 22 0d 00 28 18 6f 75 74 |$.InFile|"..(.out|
|00000040| 24 3d 22 52 41 4d 3a 24 | 2e 4f 75 74 46 69 6c 65 |$="RAM:$|.OutFile|
|00000050| 22 0d 00 32 26 63 6f 64 | 65 24 3d 22 43 6f 6d 70 |"..2&cod|e$="Comp|
|00000060| 55 74 69 6c 73 3a 45 78 | 70 61 6e 64 2e 55 6e 69 |Utils:Ex|pand.Uni|
|00000070| 76 65 72 73 61 6c 22 0d | 00 3c 04 0d 00 46 1a f4 |versal".|.<...F..|
|00000080| 20 2d 2d 2d 20 6c 6f 61 | 64 20 75 74 69 6c 69 74 | --- loa|d utilit|
|00000090| 79 20 2d 2d 2d 0d 00 50 | 25 c8 99 20 22 4f 53 5f |y ---..P|%.. "OS_|
|000000a0| 46 69 6c 65 22 2c 35 2c | 63 6f 64 65 24 20 b8 20 |File",5,|code$ . |
|000000b0| 2c 2c 2c 2c 6c 25 20 3b | 66 25 0d 00 5a 0e de 20 |,,,,l% ;|f%..Z.. |
|000000c0| 63 6f 64 65 25 20 6c 25 | 0d 00 64 28 c8 99 20 22 |code% l%|..d(.. "|
|000000d0| 4f 53 5f 46 69 6c 65 22 | 2c 32 35 35 2c 63 6f 64 |OS_File"|,255,cod|
|000000e0| 65 24 2c 63 6f 64 65 25 | 2c 30 20 b8 20 3b 66 25 |e$,code%|,0 . ;f%|
|000000f0| 0d 00 6e 04 0d 00 78 22 | f4 20 2d 2d 2d 20 73 65 |..n...x"|. --- se|
|00000100| 74 20 75 70 20 73 6f 75 | 72 63 65 20 62 75 66 66 |t up sou|rce buff|
|00000110| 65 72 20 2d 2d 2d 0d 00 | 82 16 73 6f 75 72 63 65 |er ---..|..source|
|00000120| 6c 65 6e 25 3d 31 30 32 | 34 2a 31 30 0d 00 8c 1e |len%=102|4*10....|
|00000130| de 20 73 6f 75 72 63 65 | 62 75 66 66 65 72 25 20 |. source|buffer% |
|00000140| 73 6f 75 72 63 65 6c 65 | 6e 25 0d 00 96 04 0d 00 |sourcele|n%......|
|00000150| a0 27 f4 20 2d 2d 2d 20 | 73 65 74 20 75 70 20 64 |.'. --- |set up d|
|00000160| 65 73 74 69 6e 61 74 69 | 6f 6e 20 62 75 66 66 65 |estinati|on buffe|
|00000170| 72 20 2d 2d 2d 0d 00 aa | 14 64 65 73 74 6c 65 6e |r ---...|.destlen|
|00000180| 25 3d 31 30 32 34 2a 31 | 30 0d 00 b4 1a de 20 64 |%=1024*1|0..... d|
|00000190| 65 73 74 62 75 66 66 65 | 72 25 20 64 65 73 74 6c |estbuffe|r% destl|
|000001a0| 65 6e 25 0d 00 be 04 0d | 00 c8 1d f4 20 2d 2d 2d |en%.....|.... ---|
|000001b0| 20 73 65 74 20 75 70 20 | 70 6f 69 6e 74 65 72 73 | set up |pointers|
|000001c0| 20 2d 2d 2d 0d 00 d2 1a | 63 6f 64 65 25 21 31 32 | ---....|code%!12|
|000001d0| 3d 73 6f 75 72 63 65 62 | 75 66 66 65 72 25 0d 00 |=sourceb|uffer%..|
|000001e0| dc 17 63 6f 64 65 25 21 | 31 36 3d 73 6f 75 72 63 |..code%!|16=sourc|
|000001f0| 65 6c 65 6e 25 0d 00 e6 | 18 63 6f 64 65 25 21 32 |elen%...|.code%!2|
|00000200| 30 3d 64 65 73 74 62 75 | 66 66 65 72 25 0d 00 f0 |0=destbu|ffer%...|
|00000210| 15 63 6f 64 65 25 21 32 | 34 3d 64 65 73 74 6c 65 |.code%!2|4=destle|
|00000220| 6e 25 0d 00 fa 04 0d 01 | 04 34 f4 20 2d 2d 2d 20 |n%......|.4. --- |
|00000230| 72 65 73 65 74 20 72 65 | 61 73 6f 6e 20 63 6f 64 |reset re|ason cod|
|00000240| 65 20 61 6e 64 20 73 65 | 74 20 6f 75 74 70 75 74 |e and se|t output|
|00000250| 20 66 6c 61 67 73 20 2d | 2d 2d 0d 01 0e 0e 63 6f | flags -|--....co|
|00000260| 64 65 25 21 33 32 3d 30 | 0d 01 18 11 63 6f 64 65 |de%!32=0|....code|
|00000270| 25 21 33 36 3d 25 30 30 | 31 0d 01 22 2d f4 20 69 |%!36=%00|1.."-. i|
|00000280| 65 2e 20 6c 69 6e 65 61 | 72 20 38 2d 62 69 74 20 |e. linea|r 8-bit |
|00000290| 66 6f 72 6d 61 74 2c 20 | 6e 6f 20 65 6e 68 61 6e |format, |no enhan|
|000002a0| 63 65 6d 65 6e 74 0d 01 | 2c 04 0d 01 36 28 f4 20 |cement..|,...6(. |
|000002b0| 2d 2d 2d 20 6f 70 65 6e | 20 73 6f 75 72 63 65 20 |--- open| source |
|000002c0| 61 6e 64 20 64 65 73 74 | 20 66 69 6c 65 73 20 2d |and dest| files -|
|000002d0| 2d 2d 0d 01 4a 14 69 6e | 68 61 6e 64 6c 65 25 3d |--..J.in|handle%=|
|000002e0| 8e 28 69 6e 24 29 0d 01 | 54 2f e7 20 69 6e 68 61 |.(in$)..|T/. inha|
|000002f0| 6e 64 6c 65 25 3d 30 20 | 8c 20 85 20 31 2c 22 43 |ndle%=0 |. . 1,"C|
|00000300| 61 6e 27 74 20 6f 70 65 | 6e 20 69 6e 70 75 74 20 |an't ope|n input |
|00000310| 66 69 6c 65 22 0d 01 5e | 16 6f 75 74 68 61 6e 64 |file"..^|.outhand|
|00000320| 6c 65 25 3d ae 28 6f 75 | 74 24 29 0d 01 68 3d e7 |le%=.(ou|t$)..h=.|
|00000330| 20 6f 75 74 68 61 6e 64 | 6c 65 25 3d 30 20 8c 20 | outhand|le%=0 . |
|00000340| d9 23 69 6e 68 61 6e 64 | 6c 65 25 3a 85 20 31 2c |.#inhand|le%:. 1,|
|00000350| 22 43 61 6e 27 74 20 6f | 70 65 6e 20 6f 75 74 70 |"Can't o|pen outp|
|00000360| 75 74 20 66 69 6c 65 22 | 0d 01 69 19 d1 3d 30 3a |ut file"|..i..=0:|
|00000370| f4 20 46 6f 72 20 74 69 | 6d 69 6e 67 20 69 6e 66 |. For ti|ming inf|
|00000380| 6f 0d 01 72 04 0d 01 7c | 0f 66 69 6e 69 73 68 65 |o..r...||.finishe|
|00000390| 64 25 3d a3 0d 01 86 05 | f5 0d 01 90 0b d6 20 63 |d%=.....|...... c|
|000003a0| 6f 64 65 25 0d 01 9a 18 | 72 65 61 73 6f 6e 63 6f |ode%....|reasonco|
|000003b0| 64 65 25 3d 63 6f 64 65 | 25 21 33 32 0d 01 a4 14 |de%=code|%!32....|
|000003c0| c8 8e 20 72 65 61 73 6f | 6e 63 6f 64 65 25 20 ca |.. reaso|ncode% .|
|000003d0| 0d 01 ae 0a 20 20 20 c9 | 20 30 0d 01 b8 1a 20 20 |....   .| 0....  |
|000003e0| 20 20 20 20 f4 20 20 20 | 61 6c 6c 20 66 69 6e 69 |    .   |all fini|
|000003f0| 73 68 65 64 0d 01 c2 15 | 20 20 20 20 20 20 66 69 |shed....|      fi|
|00000400| 6e 69 73 68 65 64 25 3d | b9 0d 01 cc 0a 20 20 20 |nished%=|.....   |
|00000410| c9 20 31 0d 01 d6 25 20 | 20 20 20 20 20 f4 20 20 |. 1...% |     .  |
|00000420| 20 6d 6f 72 65 20 73 6f | 75 72 63 65 20 64 61 74 | more so|urce dat|
|00000430| 61 20 6e 65 65 64 65 64 | 0d 01 e0 3b 20 20 20 20 |a needed|...;    |
|00000440| 20 20 c8 99 20 22 4f 53 | 5f 47 42 50 42 22 2c 34 |  .. "OS|_GBPB",4|
|00000450| 2c 69 6e 68 61 6e 64 6c | 65 25 2c 73 6f 75 72 63 |,inhandl|e%,sourc|
|00000460| 65 62 75 66 66 65 72 25 | 2c 73 6f 75 72 63 65 6c |ebuffer%|,sourcel|
|00000470| 65 6e 25 0d 01 ea 44 20 | 20 20 20 20 20 f4 20 20 |en%...D |     .  |
|00000480| 20 6e 6f 20 6e 65 65 64 | 20 74 6f 20 61 6c 74 65 | no need| to alte|
|00000490| 72 20 62 75 66 66 65 72 | 20 70 6f 69 6e 74 65 72 |r buffer| pointer|
|000004a0| 73 20 69 6e 20 68 65 61 | 64 65 72 20 61 73 20 62 |s in hea|der as b|
|000004b0| 75 66 66 65 72 27 73 0d | 01 f4 2e 20 20 20 20 20 |uffer's.|...     |
|000004c0| 20 f4 20 20 20 70 6f 73 | 69 74 69 6f 6e 20 61 6e | .   pos|ition an|
|000004d0| 64 20 6c 65 6e 67 74 68 | 20 69 73 20 75 6e 63 68 |d length| is unch|
|000004e0| 61 6e 67 65 64 0d 01 fe | 44 20 20 20 20 20 20 f4 |anged...|D      .|
|000004f0| 20 20 20 4f 6e 6c 79 20 | 6c 61 73 74 20 62 75 66 |   Only |last buf|
|00000500| 66 65 72 20 63 6f 75 6c | 64 20 62 65 20 61 6e 79 |fer coul|d be any|
|00000510| 74 68 69 6e 67 20 62 75 | 74 20 63 6f 6d 70 6c 65 |thing bu|t comple|
|00000520| 74 65 6c 79 20 66 75 6c | 6c 0d 02 08 0a 20 20 20 |tely ful|l....   |
|00000530| c9 20 32 0d 02 12 25 20 | 20 20 20 20 20 f4 20 20 |. 2...% |     .  |
|00000540| 20 64 65 73 74 69 6e 61 | 74 69 6f 6e 20 62 75 66 | destina|tion buf|
|00000550| 66 65 72 20 66 75 6c 6c | 0d 02 26 38 20 20 20 20 |fer full|..&8    |
|00000560| 20 20 c8 99 20 22 4f 53 | 5f 47 42 50 42 22 2c 32 |  .. "OS|_GBPB",2|
|00000570| 2c 6f 75 74 68 61 6e 64 | 6c 65 25 2c 64 65 73 74 |,outhand|le%,dest|
|00000580| 62 75 66 66 65 72 25 2c | 63 6f 64 65 25 21 32 38 |buffer%,|code%!28|
|00000590| 0d 02 30 0a 20 20 20 c9 | 20 33 0d 02 3a 25 20 20 |..0.   .| 3..:%  |
|000005a0| 20 20 20 20 f4 20 20 20 | 69 6e 69 74 69 61 6c 69 |    .   |initiali|
|000005b0| 73 61 74 69 6f 6e 20 63 | 6f 6d 70 6c 65 74 65 0d |sation c|omplete.|
|000005c0| 02 44 2c 20 20 20 20 20 | 20 f4 20 20 20 6a 75 73 |.D,     | .   jus|
|000005d0| 74 20 6f 75 74 70 75 74 | 20 73 61 6d 70 6c 65 20 |t output| sample |
|000005e0| 70 65 72 69 6f 64 20 62 | 79 74 65 0d 02 4e 20 20 |period b|yte..N  |
|000005f0| 20 20 20 20 20 d5 20 23 | 6f 75 74 68 61 6e 64 6c |     . #|outhandl|
|00000600| 65 25 2c 63 6f 64 65 25 | 21 34 38 0d 02 58 05 7f |e%,code%|!48..X..|
|00000610| 0d 02 62 2d 20 20 20 f1 | 22 41 6e 20 65 72 72 6f |..b-   .|"An erro|
|00000620| 72 20 68 61 73 20 6f 63 | 63 75 72 65 64 20 2d 20 |r has oc|cured - |
|00000630| 22 3b 72 65 61 73 6f 6e | 63 6f 64 65 25 0d 02 6c |";reason|code%..l|
|00000640| 13 20 20 20 d9 20 23 69 | 6e 68 61 6e 64 6c 65 25 |.   . #i|nhandle%|
|00000650| 0d 02 76 14 20 20 20 d9 | 20 23 6f 75 74 68 61 6e |..v.   .| #outhan|
|00000660| 64 6c 65 25 0d 02 80 08 | 20 20 20 e0 0d 02 8a 05 |dle%....|   .....|
|00000670| cb 0d 02 94 0f fd 20 66 | 69 6e 69 73 68 65 64 25 |...... f|inished%|
|00000680| 0d 02 9e 21 f1 22 54 69 | 6d 65 20 74 61 6b 65 6e |...!."Ti|me taken|
|00000690| 3a 20 22 3b 91 2f 31 30 | 30 3b 22 20 73 65 63 73 |: ";./10|0;" secs|
|000006a0| 22 0d 02 a8 0f d9 23 69 | 6e 68 61 6e 64 6c 65 25 |".....#i|nhandle%|
|000006b0| 0d 02 b2 10 d9 23 6f 75 | 74 68 61 6e 64 6c 65 25 |.....#ou|thandle%|
|000006c0| 0d 02 bc 04 0d 02 c6 18 | f4 20 20 20 41 6c 6c 20 |........|.   All |
|000006d0| 64 6f 6e 65 2c 20 73 6f | 20 65 6e 64 0d 02 d0 04 |done, so| end....|
|000006e0| 0d 02 da 34 f4 20 20 20 | 49 66 20 79 6f 75 20 77 |...4.   |If you w|
|000006f0| 61 6e 74 20 74 6f 20 63 | 68 65 63 6b 20 74 68 65 |ant to c|heck the|
|00000700| 20 6f 75 74 70 75 74 20 | 66 69 6c 65 20 6c 6f 61 | output |file loa|
|00000710| 64 20 69 74 0d 02 e4 25 | f4 20 20 20 69 6e 74 6f |d it...%|.   into|
|00000720| 20 61 6e 20 65 64 69 74 | 6f 72 20 61 73 20 6c 69 | an edit|or as li|
|00000730| 6e 65 61 72 20 64 61 74 | 61 0d 02 ee 04 0d 02 f8 |near dat|a.......|
|00000740| 1b f4 20 20 20 54 68 61 | 74 27 73 20 61 6c 6c 20 |..   Tha|t's all |
|00000750| 66 6f 6c 6b 73 21 21 21 | 0d 03 02 05 e0 0d ff    |folks!!!|....... |
+--------+-------------------------+-------------------------+--------+--------+