home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1997-01-25 | 5.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 43 f4 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...C. **|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000040| 2a 2a 2a 0d 00 14 43 f4 | 20 2a 20 46 69 6c 65 20 |***...C.| * File |
|00000050| 54 72 61 6e 73 66 65 72 | 20 50 72 6f 67 72 61 6d |Transfer| Program|
|00000060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000080| 20 20 20 20 20 2a 0d 00 | 1e 43 f4 20 2a 20 42 42 | *..|.C. * BB|
|00000090| 43 20 3c 2d 3e 20 52 69 | 73 63 20 50 43 20 20 20 |C <-> Ri|sc PC |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000c0| 20 20 20 20 20 20 20 20 | 2a 0d 00 28 43 f4 20 2a | |*..(C. *|
|000000d0| 20 42 79 20 50 61 75 6c | 20 54 68 65 6f 62 61 6c | By Paul| Theobal|
|000000e0| 64 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |d | |
|000000f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000100| 20 20 20 20 20 20 20 20 | 20 20 20 2a 0d 00 32 43 | | *..2C|
|00000110| f4 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |. ******|********|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0d |********|*******.|
|00000150| 00 3c 04 0d 00 46 1a f4 | 20 53 65 74 20 75 70 20 |.<...F..| Set up |
|00000160| 65 72 72 6f 72 20 68 61 | 6e 64 6c 65 72 0d 00 50 |error ha|ndler..P|
|00000170| 22 ee 20 85 20 f2 72 65 | 73 65 74 3a f6 3a f1 20 |". . .re|set:.:. |
|00000180| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 3a e0 0d |" at lin|e ";.:..|
|00000190| 00 5a 04 0d 00 64 0f f4 | 20 4d 61 69 6e 20 6c 6f |.Z...d..| Main lo|
|000001a0| 6f 70 0d 00 6e 09 f2 69 | 6e 69 74 0d 00 78 05 f5 |op..n..i|nit..x..|
|000001b0| 0d 00 82 30 f1 20 22 28 | 53 29 65 6e 64 2c 20 28 |...0. "(|S)end, (|
|000001c0| 52 29 65 63 65 69 76 65 | 2c 20 28 2a 29 20 63 6f |R)eceive|, (*) co|
|000001d0| 6d 6d 61 6e 64 2c 20 28 | 51 29 75 69 74 3f 22 3b |mmand, (|Q)uit?";|
|000001e0| 0d 00 8c 05 f5 0d 00 96 | 0f 6f 70 74 69 6f 6e 24 |........|.option$|
|000001f0| 20 3d 20 be 0d 00 a0 32 | e7 20 6f 70 74 69 6f 6e | = ....2|. option|
|00000200| 24 20 3c 3e 20 22 2a 22 | 20 8c 20 6f 70 74 69 6f |$ <> "*"| . optio|
|00000210| 6e 24 3d bd 28 97 28 6f | 70 74 69 6f 6e 24 29 20 |n$=.(.(o|ption$) |
|00000220| 80 20 26 44 46 29 0d 00 | aa 3b fd 20 6f 70 74 69 |. &DF)..|.;. opti|
|00000230| 6f 6e 24 3d 22 53 22 20 | 84 20 6f 70 74 69 6f 6e |on$="S" |. option|
|00000240| 24 3d 22 52 22 20 84 20 | 6f 70 74 69 6f 6e 24 3d |$="R" . |option$=|
|00000250| 22 2a 22 20 84 20 6f 70 | 74 69 6f 6e 24 3d 22 51 |"*" . op|tion$="Q|
|00000260| 22 0d 00 b4 0d f1 20 6f | 70 74 69 6f 6e 24 0d 00 |"..... o|ption$..|
|00000270| be 1b e7 20 6f 70 74 69 | 6f 6e 24 20 3d 20 22 53 |... opti|on$ = "S|
|00000280| 22 20 8c 20 f2 73 65 6e | 64 0d 00 c8 1e e7 20 6f |" . .sen|d..... o|
|00000290| 70 74 69 6f 6e 24 20 3d | 20 22 52 22 20 8c 20 f2 |ption$ =| "R" . .|
|000002a0| 72 65 63 65 69 76 65 0d | 00 d2 30 e7 20 6f 70 74 |receive.|..0. opt|
|000002b0| 69 6f 6e 24 20 3d 20 22 | 2a 22 20 8c 20 e8 20 22 |ion$ = "|*" . . "|
|000002c0| 2a 22 20 63 6f 6d 6d 61 | 6e 64 24 3a ff 28 63 6f |*" comma|nd$:.(co|
|000002d0| 6d 6d 61 6e 64 24 29 0d | 00 dc 0a f2 72 65 73 65 |mmand$).|....rese|
|000002e0| 74 0d 00 dd 13 fd 20 6f | 70 74 69 6f 6e 24 20 3d |t..... o|ption$ =|
|000002f0| 20 22 51 22 0d 00 f0 05 | e0 0d 00 fa 04 0d 01 04 | "Q"....|........|
|00000300| 43 f4 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |C. *****|********|
|00000310| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000340| 0d 01 0e 43 f4 20 2a 20 | 49 6e 69 74 69 61 6c 69 |...C. * |Initiali|
|00000350| 73 65 20 76 61 72 69 61 | 62 6c 65 73 20 20 20 20 |se varia|bles |
|00000360| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000380| 20 20 2a 0d 01 18 43 f4 | 20 2a 2a 2a 2a 2a 2a 2a | *...C.| *******|
|00000390| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000003c0| 2a 2a 2a 2a 2a 2a 0d 01 | 22 0b dd 20 f2 69 6e 69 |******..|".. .ini|
|000003d0| 74 0d 01 2c 39 62 61 75 | 64 5f 72 61 74 65 25 20 |t..,9bau|d_rate% |
|000003e0| 20 20 20 20 20 20 20 3d | 20 37 20 20 20 20 20 3a | =| 7 :|
|000003f0| 20 f4 20 39 36 30 30 20 | 62 61 75 64 20 74 72 61 | . 9600 |baud tra|
|00000400| 6e 73 66 65 72 20 72 61 | 74 65 0d 01 36 43 66 69 |nsfer ra|te..6Cfi|
|00000410| 6c 65 5f 6e 61 6d 65 5f | 6c 65 6e 67 74 68 25 20 |le_name_|length% |
|00000420| 3d 20 37 20 20 20 20 20 | 3a 20 f4 20 4d 61 78 20 |= 7 |: . Max |
|00000430| 73 69 7a 65 20 6f 66 20 | 66 69 6c 65 20 6e 61 6d |size of |file nam|
|00000440| 65 20 66 6f 72 20 42 42 | 43 20 44 46 53 0d 01 40 |e for BB|C DFS..@|
|00000450| 3f 66 69 6c 65 5f 73 69 | 7a 65 5f 6c 65 6e 67 74 |?file_si|ze_lengt|
|00000460| 68 25 20 3d 20 34 20 20 | 20 20 20 3a 20 f4 20 4d |h% = 4 | : . M|
|00000470| 61 78 20 73 69 7a 65 20 | 6f 66 20 66 69 6c 65 20 |ax size |of file |
|00000480| 69 73 20 26 46 46 46 46 | 46 46 46 46 0d 01 4a 35 |is &FFFF|FFFF..J5|
|00000490| 6f 73 62 79 74 65 25 20 | 20 20 20 20 20 20 20 20 |osbyte% | |
|000004a0| 20 20 3d 20 26 46 46 46 | 34 20 3a 20 f4 20 4f 53 | = &FFF|4 : . OS|
|000004b0| 42 59 54 45 20 63 61 6c | 6c 20 61 64 64 72 65 73 |BYTE cal|l addres|
|000004c0| 73 0d 01 54 44 73 79 6e | 63 5f 74 65 78 74 24 20 |s..TDsyn|c_text$ |
|000004d0| 3d 20 22 42 42 43 3c 2d | 3e 52 50 43 22 20 20 3a |= "BBC<-|>RPC" :|
|000004e0| 20 f4 20 54 65 78 74 20 | 69 6e 64 69 63 61 74 69 | . Text |indicati|
|000004f0| 6e 67 20 73 74 61 72 74 | 20 6f 66 20 74 72 61 6e |ng start| of tran|
|00000500| 73 66 65 72 20 0d 01 5e | 05 e1 0d 01 68 04 0d 01 |sfer ..^|....h...|
|00000510| 72 43 f4 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |rC. ****|********|
|00000520| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000530| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000540| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000550| 2a 0d 01 7c 43 f4 20 2a | 20 52 65 63 65 69 76 65 |*..|C. *| Receive|
|00000560| 20 61 20 66 69 6c 65 20 | 20 20 20 20 20 20 20 20 | a file | |
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000580| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000590| 20 20 20 2a 0d 01 86 43 | f4 20 2a 2a 2a 2a 2a 2a | *...C|. ******|
|000005a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005d0| 2a 2a 2a 2a 2a 2a 2a 0d | 01 90 0e dd 20 f2 72 65 |*******.|.... .re|
|000005e0| 63 65 69 76 65 0d 01 9a | 21 f1 20 22 57 61 69 74 |ceive...|!. "Wait|
|000005f0| 69 6e 67 20 66 6f 72 20 | 72 65 6d 6f 74 65 20 65 |ing for |remote e|
|00000600| 6e 64 2e 2e 2e 22 0d 01 | a4 1b f4 20 53 65 74 20 |nd..."..|... Set |
|00000610| 72 65 63 65 69 76 65 20 | 62 61 75 64 20 72 61 74 |receive |baud rat|
|00000620| 65 0d 01 ae 24 41 25 20 | 3d 20 37 3a 58 25 20 3d |e...$A% |= 7:X% =|
|00000630| 20 62 61 75 64 5f 72 61 | 74 65 25 3a d6 20 6f 73 | baud_ra|te%:. os|
|00000640| 62 79 74 65 25 0d 01 b8 | 24 f4 20 4f 70 65 6e 20 |byte%...|$. Open |
|00000650| 74 68 65 20 73 65 72 69 | 61 6c 20 70 6f 72 74 20 |the seri|al port |
|00000660| 66 6f 72 20 69 6e 70 75 | 74 0d 01 c2 0b 2a 46 58 |for inpu|t....*FX|
|00000670| 20 32 2c 31 0d 01 cc 28 | f4 20 46 6c 75 73 68 20 | 2,1...(|. Flush |
|00000680| 74 68 65 20 73 65 72 69 | 61 6c 20 70 6f 72 74 20 |the seri|al port |
|00000690| 69 6e 70 75 74 20 62 75 | 66 66 65 72 0d 01 d6 0c |input bu|ffer....|
|000006a0| 2a 46 58 20 32 31 2c 31 | 0d 01 e0 3f f4 20 52 65 |*FX 21,1|...?. Re|
|000006b0| 61 64 20 69 6e 20 74 68 | 65 20 73 79 6e 63 20 74 |ad in th|e sync t|
|000006c0| 65 78 74 20 74 6f 20 63 | 68 65 63 6b 20 77 65 27 |ext to c|heck we'|
|000006d0| 72 65 20 72 65 63 65 69 | 76 69 6e 67 20 76 61 6c |re recei|ving val|
|000006e0| 69 64 20 64 61 74 61 0d | 01 ea 2c 74 68 69 73 5f |id data.|..,this_|
|000006f0| 74 65 78 74 24 20 3d 20 | a4 72 65 61 64 5f 73 74 |text$ = |.read_st|
|00000700| 72 69 6e 67 28 a9 28 73 | 79 6e 63 5f 74 65 78 74 |ring(.(s|ync_text|
|00000710| 24 29 29 0d 01 f4 4f e7 | 20 74 68 69 73 5f 74 65 |$))...O.| this_te|
|00000720| 78 74 24 20 3c 3e 20 73 | 79 6e 63 5f 74 65 78 74 |xt$ <> s|ync_text|
|00000730| 24 20 8c 20 f1 20 22 49 | 6e 76 61 6c 69 64 20 64 |$ . . "I|nvalid d|
|00000740| 61 74 61 20 72 65 63 65 | 69 76 65 64 2c 20 70 6c |ata rece|ived, pl|
|00000750| 65 61 73 65 20 74 72 79 | 20 61 67 61 69 6e 2e 22 |ease try| again."|
|00000760| 3a e1 0d 01 fe 1b f4 20 | 52 65 61 64 20 69 6e 20 |:...... |Read in |
|00000770| 74 68 65 20 66 69 6c 65 | 20 6e 61 6d 65 0d 02 08 |the file| name...|
|00000780| 30 66 69 6c 65 5f 6e 61 | 6d 65 24 20 3d 20 a4 72 |0file_na|me$ = .r|
|00000790| 65 61 64 5f 73 74 72 69 | 6e 67 28 66 69 6c 65 5f |ead_stri|ng(file_|
|000007a0| 6e 61 6d 65 5f 6c 65 6e | 67 74 68 25 29 0d 02 12 |name_len|gth%)...|
|000007b0| 1d f4 20 52 65 61 64 20 | 69 6e 20 74 68 65 20 66 |.. Read |in the f|
|000007c0| 69 6c 65 20 6c 65 6e 67 | 74 68 0d 02 1c 31 66 69 |ile leng|th...1fi|
|000007d0| 6c 65 5f 73 69 7a 65 25 | 20 3d 20 a4 72 65 61 64 |le_size%| = .read|
|000007e0| 5f 69 6e 74 65 67 65 72 | 28 66 69 6c 65 5f 73 69 |_integer|(file_si|
|000007f0| 7a 65 5f 6c 65 6e 67 74 | 68 25 29 0d 02 26 1a f4 |ze_lengt|h%)..&..|
|00000800| 20 44 69 73 70 6c 61 79 | 20 66 69 6c 65 20 64 65 | Display| file de|
|00000810| 74 61 69 6c 73 0d 02 30 | 12 f1 20 22 52 65 63 65 |tails..0|.. "Rece|
|00000820| 69 76 69 6e 67 3a 22 0d | 02 3a 21 f1 20 22 46 69 |iving:".|.:!. "Fi|
|00000830| 6c 65 20 6e 61 6d 65 20 | 20 20 3d 20 22 3b 66 69 |le name | = ";fi|
|00000840| 6c 65 5f 6e 61 6d 65 24 | 0d 02 44 21 f1 20 22 46 |le_name$|..D!. "F|
|00000850| 69 6c 65 20 6c 65 6e 67 | 74 68 20 3d 20 22 3b 66 |ile leng|th = ";f|
|00000860| 69 6c 65 5f 73 69 7a 65 | 25 0d 02 4e 2a f4 20 43 |ile_size|%..N*. C|
|00000870| 72 65 61 74 65 20 61 20 | 6c 6f 63 61 6c 20 66 69 |reate a |local fi|
|00000880| 6c 65 20 6f 66 20 74 68 | 65 20 73 61 6d 65 20 6e |le of th|e same n|
|00000890| 61 6d 65 0d 02 58 20 66 | 69 6c 65 5f 68 61 6e 64 |ame..X f|ile_hand|
|000008a0| 6c 65 25 20 3d 20 ae 28 | 66 69 6c 65 5f 6e 61 6d |le% = .(|file_nam|
|000008b0| 65 24 29 0d 02 62 1f f4 | 20 43 6f 70 79 20 69 6e |e$)..b..| Copy in|
|000008c0| 20 74 68 65 20 66 69 6c | 65 20 63 6f 6e 74 65 6e | the fil|e conten|
|000008d0| 74 73 0d 02 6c 28 f2 72 | 65 61 64 5f 64 61 74 61 |ts..l(.r|ead_data|
|000008e0| 28 66 69 6c 65 5f 68 61 | 6e 64 6c 65 25 2c 20 66 |(file_ha|ndle%, f|
|000008f0| 69 6c 65 5f 73 69 7a 65 | 25 29 0d 02 76 14 f4 20 |ile_size|%)..v.. |
|00000900| 43 6c 6f 73 65 20 74 68 | 65 20 66 69 6c 65 0d 02 |Close th|e file..|
|00000910| 80 12 d9 23 66 69 6c 65 | 5f 68 61 6e 64 6c 65 25 |...#file|_handle%|
|00000920| 0d 02 8a 37 f4 20 43 6c | 6f 73 65 20 74 68 65 20 |...7. Cl|ose the |
|00000930| 73 65 72 69 61 6c 20 70 | 6f 72 74 20 61 6e 64 20 |serial p|ort and |
|00000940| 72 65 73 65 6c 65 63 74 | 20 6b 65 79 62 6f 61 72 |reselect| keyboar|
|00000950| 64 20 69 6e 70 75 74 0d | 02 94 0b 2a 46 58 20 32 |d input.|...*FX 2|
|00000960| 2c 30 0d 02 9e 05 e1 0d | 02 a8 04 0d 02 b2 43 f4 |,0......|......C.|
|00000970| 20 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | *******|********|
|00000980| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000990| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 02 |********|******..|
|000009b0| bc 43 f4 20 2a 20 53 65 | 6e 64 20 61 20 66 69 6c |.C. * Se|nd a fil|
|000009c0| 65 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e | |
|000009d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000009e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000009f0| 2a 0d 02 c6 43 f4 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*...C. *|********|
|00000a00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000a30| 2a 2a 2a 2a 0d 02 d0 0b | dd 20 f2 73 65 6e 64 0d |****....|. .send.|
|00000a40| 02 da 40 f4 20 49 6e 70 | 75 74 20 61 20 66 69 6c |..@. Inp|ut a fil|
|00000a50| 65 20 6e 61 6d 65 20 61 | 6e 64 20 74 72 75 6e 63 |e name a|nd trunc|
|00000a60| 61 74 65 2f 6c 65 6e 67 | 74 68 65 6e 20 74 6f 20 |ate/leng|then to |
|00000a70| 73 74 61 6e 64 61 72 64 | 20 6c 65 6e 67 74 68 0d |standard| length.|
|00000a80| 02 e4 1c e8 22 46 69 6c | 65 6e 61 6d 65 3a 20 22 |...."Fil|ename: "|
|00000a90| 20 66 69 6c 65 5f 6e 61 | 6d 65 24 0d 02 ee 30 66 | file_na|me$...0f|
|00000aa0| 69 6c 65 5f 6e 61 6d 65 | 24 20 3d 20 c0 66 69 6c |ile_name|$ = .fil|
|00000ab0| 65 5f 6e 61 6d 65 24 2c | 20 66 69 6c 65 5f 6e 61 |e_name$,| file_na|
|00000ac0| 6d 65 5f 6c 65 6e 67 74 | 68 25 29 0d 02 f8 41 66 |me_lengt|h%)...Af|
|00000ad0| 69 6c 65 5f 6e 61 6d 65 | 24 20 3d 20 66 69 6c 65 |ile_name|$ = file|
|00000ae0| 5f 6e 61 6d 65 24 2b c4 | 66 69 6c 65 5f 6e 61 6d |_name$+.|file_nam|
|00000af0| 65 5f 6c 65 6e 67 74 68 | 25 2d a9 28 66 69 6c 65 |e_length|%-.(file|
|00000b00| 5f 6e 61 6d 65 24 29 2c | 22 20 22 29 0d 03 02 32 |_name$),|" ")...2|
|00000b10| f4 20 4f 70 65 6e 20 74 | 68 65 20 66 69 6c 65 20 |. Open t|he file |
|00000b20| 6f 72 20 72 65 70 6f 72 | 74 20 61 6e 20 65 72 72 |or repor|t an err|
|00000b30| 6f 72 20 69 66 20 77 65 | 20 63 61 6e 27 74 0d 03 |or if we| can't..|
|00000b40| 0c 20 66 69 6c 65 5f 68 | 61 6e 64 6c 65 25 20 3d |. file_h|andle% =|
|00000b50| 20 8e 28 66 69 6c 65 5f | 6e 61 6d 65 24 29 0d 03 | .(file_|name$)..|
|00000b60| 16 54 e7 20 66 69 6c 65 | 5f 68 61 6e 64 6c 65 25 |.T. file|_handle%|
|00000b70| 20 3d 20 30 20 8c 20 f1 | 20 22 43 61 6e 27 74 20 | = 0 . .| "Can't |
|00000b80| 6f 70 65 6e 20 66 69 6c | 65 20 22 22 22 3b 66 69 |open fil|e """;fi|
|00000b90| 6c 65 5f 6e 61 6d 65 24 | 3b 22 22 22 2c 20 70 6c |le_name$|;""", pl|
|00000ba0| 65 61 73 65 20 74 72 79 | 20 61 67 61 69 6e 2e 22 |ease try| again."|
|00000bb0| 3a e1 0d 03 20 18 f4 20 | 46 69 6e 64 20 74 68 65 |:... .. |Find the|
|00000bc0| 20 66 69 6c 65 20 73 69 | 7a 65 0d 03 2a 1f 66 69 | file si|ze..*.fi|
|00000bd0| 6c 65 5f 73 69 7a 65 25 | 20 3d 20 a2 23 66 69 6c |le_size%| = .#fil|
|00000be0| 65 5f 68 61 6e 64 6c 65 | 25 0d 03 34 1a f4 20 44 |e_handle|%..4.. D|
|00000bf0| 69 73 70 6c 61 79 20 66 | 69 6c 65 20 64 65 74 61 |isplay f|ile deta|
|00000c00| 69 6c 73 0d 03 3e 10 f1 | 20 22 53 65 6e 64 69 6e |ils..>..| "Sendin|
|00000c10| 67 3a 22 0d 03 48 21 f1 | 20 22 46 69 6c 65 20 6e |g:"..H!.| "File n|
|00000c20| 61 6d 65 20 20 20 3d 20 | 22 3b 66 69 6c 65 5f 6e |ame = |";file_n|
|00000c30| 61 6d 65 24 0d 03 52 21 | f1 20 22 46 69 6c 65 20 |ame$..R!|. "File |
|00000c40| 6c 65 6e 67 74 68 20 3d | 20 22 3b 66 69 6c 65 5f |length =| ";file_|
|00000c50| 73 69 7a 65 25 0d 03 5c | 1c f4 20 53 65 74 20 74 |size%..\|.. Set t|
|00000c60| 72 61 6e 73 6d 69 74 20 | 62 61 75 64 20 72 61 74 |ransmit |baud rat|
|00000c70| 65 0d 03 66 24 41 25 20 | 3d 20 38 3a 58 25 20 3d |e..f$A% |= 8:X% =|
|00000c80| 20 62 61 75 64 5f 72 61 | 74 65 25 3a d6 20 6f 73 | baud_ra|te%:. os|
|00000c90| 62 79 74 65 25 0d 03 70 | 27 f4 20 53 65 6c 65 63 |byte%..p|'. Selec|
|00000ca0| 74 20 74 68 65 20 73 65 | 72 69 61 6c 20 70 6f 72 |t the se|rial por|
|00000cb0| 74 20 66 6f 72 20 6f 75 | 74 70 75 74 0d 03 7a 0b |t for ou|tput..z.|
|00000cc0| 2a 46 58 20 33 2c 33 0d | 03 84 29 f4 20 46 6c 75 |*FX 3,3.|..). Flu|
|00000cd0| 73 68 20 74 68 65 20 73 | 65 72 69 61 6c 20 70 6f |sh the s|erial po|
|00000ce0| 72 74 20 6f 75 74 70 75 | 74 20 62 75 66 66 65 72 |rt outpu|t buffer|
|00000cf0| 0d 03 8e 0c 2a 46 58 20 | 32 31 2c 32 0d 03 98 36 |....*FX |21,2...6|
|00000d00| f4 20 53 65 6e 64 20 74 | 68 65 20 73 79 6e 63 20 |. Send t|he sync |
|00000d10| 74 65 78 74 20 74 6f 20 | 69 6e 64 69 63 61 74 65 |text to |indicate|
|00000d20| 20 73 74 61 72 74 20 6f | 66 20 74 72 61 6e 73 66 | start o|f transf|
|00000d30| 65 72 0d 03 a2 2c f2 77 | 72 69 74 65 5f 73 74 72 |er...,.w|rite_str|
|00000d40| 69 6e 67 28 73 79 6e 63 | 5f 74 65 78 74 24 2c 20 |ing(sync|_text$, |
|00000d50| a9 28 73 79 6e 63 5f 74 | 65 78 74 24 29 29 0d 03 |.(sync_t|ext$))..|
|00000d60| c0 18 f4 20 53 65 6e 64 | 20 74 68 65 20 66 69 6c |... Send| the fil|
|00000d70| 65 20 6e 61 6d 65 0d 03 | ca 30 f2 77 72 69 74 65 |e name..|.0.write|
|00000d80| 5f 73 74 72 69 6e 67 28 | 66 69 6c 65 5f 6e 61 6d |_string(|file_nam|
|00000d90| 65 24 2c 20 66 69 6c 65 | 5f 6e 61 6d 65 5f 6c 65 |e$, file|_name_le|
|00000da0| 6e 67 74 68 25 29 0d 03 | d4 18 f4 20 53 65 6e 64 |ngth%)..|... Send|
|00000db0| 20 74 68 65 20 66 69 6c | 65 20 73 69 7a 65 0d 03 | the fil|e size..|
|00000dc0| de 30 f2 77 72 69 74 65 | 5f 69 6e 74 65 67 65 72 |.0.write|_integer|
|00000dd0| 28 66 69 6c 65 5f 73 69 | 7a 65 25 2c 66 69 6c 65 |(file_si|ze%,file|
|00000de0| 5f 73 69 7a 65 5f 6c 65 | 6e 67 74 68 25 29 0d 03 |_size_le|ngth%)..|
|00000df0| e8 20 f4 20 43 6f 70 79 | 20 6f 75 74 20 74 68 65 |. . Copy| out the|
|00000e00| 20 66 69 6c 65 20 63 6f | 6e 74 65 6e 74 73 0d 03 | file co|ntents..|
|00000e10| f2 29 f2 77 72 69 74 65 | 5f 64 61 74 61 28 66 69 |.).write|_data(fi|
|00000e20| 6c 65 5f 68 61 6e 64 6c | 65 25 2c 20 66 69 6c 65 |le_handl|e%, file|
|00000e30| 5f 73 69 7a 65 25 29 0d | 03 fc 14 f4 20 43 6c 6f |_size%).|.... Clo|
|00000e40| 73 65 20 74 68 65 20 66 | 69 6c 65 0d 04 06 12 d9 |se the f|ile.....|
|00000e50| 23 66 69 6c 65 5f 68 61 | 6e 64 6c 65 25 0d 04 10 |#file_ha|ndle%...|
|00000e60| 19 f4 20 52 65 73 65 6c | 65 63 74 20 56 44 55 20 |.. Resel|ect VDU |
|00000e70| 6f 75 74 70 75 74 0d 04 | 1a 0b 2a 46 58 20 33 2c |output..|..*FX 3,|
|00000e80| 30 0d 04 24 05 e1 0d 04 | 2e 04 0d 04 38 43 f4 20 |0..$....|....8C. |
|00000e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ea0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ec0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 04 42 |********|*****..B|
|00000ed0| 43 f4 20 2a 20 52 65 73 | 65 74 20 63 6f 6e 66 69 |C. * Res|et confi|
|00000ee0| 67 75 72 61 74 69 6f 6e | 20 20 20 20 20 20 20 20 |guration| |
|00000ef0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a | | *|
|00000f10| 0d 04 4c 43 f4 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..LC. **|********|
|00000f20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000f50| 2a 2a 2a 0d 04 56 0c dd | 20 f2 72 65 73 65 74 0d |***..V..| .reset.|
|00000f60| 04 60 37 f4 20 43 6c 6f | 73 65 20 74 68 65 20 73 |.`7. Clo|se the s|
|00000f70| 65 72 69 61 6c 20 70 6f | 72 74 20 61 6e 64 20 72 |erial po|rt and r|
|00000f80| 65 73 65 6c 65 63 74 20 | 6b 65 79 62 6f 61 72 64 |eselect |keyboard|
|00000f90| 20 69 6e 70 75 74 0d 04 | 6a 0b 2a 46 58 20 32 2c | input..|j.*FX 2,|
|00000fa0| 30 0d 04 74 19 f4 20 52 | 65 73 65 6c 65 63 74 20 |0..t.. R|eselect |
|00000fb0| 56 44 55 20 6f 75 74 70 | 75 74 0d 04 7e 0b 2a 46 |VDU outp|ut..~.*F|
|00000fc0| 58 20 33 2c 30 0d 04 88 | 24 f4 20 43 6c 6f 73 65 |X 3,0...|$. Close|
|00000fd0| 20 61 6e 79 20 72 65 6d | 61 69 6e 69 6e 67 20 6f | any rem|aining o|
|00000fe0| 70 65 6e 20 66 69 6c 65 | 73 0d 04 92 07 d9 23 30 |pen file|s.....#0|
|00000ff0| 0d 04 9c 05 e1 0d 04 a6 | 04 0d 04 b0 43 f4 20 2a |........|....C. *|
|00001000| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 04 ba 43 |********|****...C|
|00001040| f4 20 2a 20 52 65 61 64 | 20 69 6e 20 61 20 73 74 |. * Read| in a st|
|00001050| 72 69 6e 67 20 6f 66 20 | 73 70 65 63 69 66 69 65 |ring of |specifie|
|00001060| 64 20 6c 65 6e 67 74 68 | 20 20 20 20 20 20 20 20 |d length| |
|00001070| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 0d | | *.|
|00001080| 04 c4 43 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..C. ***|********|
|00001090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000010c0| 2a 2a 0d 04 ce 1b dd 20 | a4 72 65 61 64 5f 73 74 |**..... |.read_st|
|000010d0| 72 69 6e 67 28 6c 65 6e | 67 74 68 25 29 0d 04 d8 |ring(len|gth%)...|
|000010e0| 14 ea 20 6c 6f 6f 70 25 | 2c 20 73 74 72 69 6e 67 |.. loop%|, string|
|000010f0| 24 0d 04 e2 10 73 74 72 | 69 6e 67 24 20 3d 20 22 |$....str|ing$ = "|
|00001100| 22 0d 04 ec 19 e3 20 6c | 6f 6f 70 25 20 3d 20 31 |"..... l|oop% = 1|
|00001110| 20 b8 20 6c 65 6e 67 74 | 68 25 0d 04 f6 19 73 74 | . lengt|h%....st|
|00001120| 72 69 6e 67 24 20 3d 20 | 73 74 72 69 6e 67 24 20 |ring$ = |string$ |
|00001130| 2b 20 be 0d 05 00 05 ed | 0d 05 0a 0d 3d 20 73 74 |+ ......|....= st|
|00001140| 72 69 6e 67 24 0d 05 14 | 04 0d 05 1e 43 f4 20 2a |ring$...|....C. *|
|00001150| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001160| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001170| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 05 28 43 |********|****..(C|
|00001190| f4 20 2a 20 52 65 61 64 | 20 69 6e 20 61 6e 20 69 |. * Read| in an i|
|000011a0| 6e 74 65 67 65 72 20 6f | 66 20 73 70 65 63 69 66 |nteger o|f specif|
|000011b0| 69 65 64 20 6c 65 6e 67 | 74 68 20 20 20 20 20 20 |ied leng|th |
|000011c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 0d | | *.|
|000011d0| 05 32 43 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.2C. ***|********|
|000011e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001200| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001210| 2a 2a 0d 05 3c 1c dd 20 | a4 72 65 61 64 5f 69 6e |**..<.. |.read_in|
|00001220| 74 65 67 65 72 28 6c 65 | 6e 67 74 68 25 29 0d 05 |teger(le|ngth%)..|
|00001230| 46 15 ea 20 6c 6f 6f 70 | 25 2c 20 69 6e 74 65 67 |F.. loop|%, integ|
|00001240| 65 72 25 0d 05 50 10 69 | 6e 74 65 67 65 72 25 20 |er%..P.i|nteger% |
|00001250| 3d 20 30 0d 05 5a 19 e3 | 20 6c 6f 6f 70 25 20 3d |= 0..Z..| loop% =|
|00001260| 20 31 20 b8 20 6c 65 6e | 67 74 68 25 0d 05 64 21 | 1 . len|gth%..d!|
|00001270| 69 6e 74 65 67 65 72 25 | 20 3d 20 69 6e 74 65 67 |integer%| = integ|
|00001280| 65 72 25 20 2a 20 32 35 | 36 20 2b 20 a5 0d 05 6e |er% * 25|6 + ...n|
|00001290| 05 ed 0d 05 78 0e 3d 20 | 69 6e 74 65 67 65 72 25 |....x.= |integer%|
|000012a0| 0d 05 82 04 0d 05 8c 43 | f4 20 2a 2a 2a 2a 2a 2a |.......C|. ******|
|000012b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000012e0| 2a 2a 2a 2a 2a 2a 2a 0d | 05 96 43 f4 20 2a 20 52 |*******.|..C. * R|
|000012f0| 65 61 64 20 69 6e 20 64 | 61 74 61 20 6f 66 20 73 |ead in d|ata of s|
|00001300| 70 65 63 69 66 69 65 64 | 20 6c 65 6e 67 74 68 20 |pecified| length |
|00001310| 74 6f 20 61 20 66 69 6c | 65 20 20 20 20 20 20 20 |to a fil|e |
|00001320| 20 20 20 20 20 20 20 20 | 20 2a 0d 05 a0 43 f4 20 | | *...C. |
|00001330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001340| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001350| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001360| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 05 aa |********|*****...|
|00001370| 26 dd 20 f2 72 65 61 64 | 5f 64 61 74 61 28 66 69 |&. .read|_data(fi|
|00001380| 6c 65 5f 68 61 6e 64 6c | 65 25 2c 6c 65 6e 67 74 |le_handl|e%,lengt|
|00001390| 68 25 29 0d 05 b4 0b ea | 20 6c 6f 6f 70 25 0d 05 |h%).....| loop%..|
|000013a0| be 19 e3 20 6c 6f 6f 70 | 25 20 3d 20 31 20 b8 20 |... loop|% = 1 . |
|000013b0| 6c 65 6e 67 74 68 25 0d | 05 c8 14 d5 23 66 69 6c |length%.|....#fil|
|000013c0| 65 5f 68 61 6e 64 6c 65 | 25 2c a5 0d 05 d2 05 ed |e_handle|%,......|
|000013d0| 0d 05 dc 05 e1 0d 05 e6 | 04 0d 05 f0 43 f4 20 2a |........|....C. *|
|000013e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000013f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001400| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001410| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 05 fa 43 |********|****...C|
|00001420| f4 20 2a 20 57 72 69 74 | 65 20 6f 75 74 20 61 20 |. * Writ|e out a |
|00001430| 73 74 72 69 6e 67 20 6f | 66 20 73 70 65 63 69 66 |string o|f specif|
|00001440| 69 65 64 20 6c 65 6e 67 | 74 68 20 20 20 20 20 20 |ied leng|th |
|00001450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 0d | | *.|
|00001460| 06 04 43 f4 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..C. ***|********|
|00001470| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001480| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001490| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000014a0| 2a 2a 0d 06 0e 24 dd 20 | f2 77 72 69 74 65 5f 73 |**...$. |.write_s|
|000014b0| 74 72 69 6e 67 28 73 74 | 72 69 6e 67 24 2c 6c 65 |tring(st|ring$,le|
|000014c0| 6e 67 74 68 25 29 0d 06 | 18 18 f1 20 c0 73 74 72 |ngth%)..|... .str|
|000014d0| 69 6e 67 24 2c 6c 65 6e | 67 74 68 25 29 3b 0d 06 |ing$,len|gth%);..|
|000014e0| 22 05 e1 0d 06 2c 04 0d | 06 36 43 f4 20 2a 2a 2a |"....,..|.6C. ***|
|000014f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001500| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001510| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001520| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 06 40 43 f4 20 |********|**..@C. |
|00001530| 2a 20 57 72 69 74 65 20 | 6f 75 74 20 61 6e 20 69 |* Write |out an i|
|00001540| 6e 74 65 67 65 72 20 6f | 66 20 73 70 65 63 69 66 |nteger o|f specif|
|00001550| 69 65 64 20 6c 65 6e 67 | 74 68 20 20 20 20 20 20 |ied leng|th |
|00001560| 20 20 20 20 20 20 20 20 | 20 20 20 20 2a 0d 06 4a | | *..J|
|00001570| 43 f4 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |C. *****|********|
|00001580| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001590| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000015a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000015b0| 0d 06 54 26 dd 20 f2 77 | 72 69 74 65 5f 69 6e 74 |..T&. .w|rite_int|
|000015c0| 65 67 65 72 28 69 6e 74 | 65 67 65 72 25 2c 6c 65 |eger(int|eger%,le|
|000015d0| 6e 67 74 68 25 29 0d 06 | 5e 0b ea 20 6c 6f 6f 70 |ngth%)..|^.. loop|
|000015e0| 25 0d 06 68 19 e3 20 6c | 6f 6f 70 25 20 3d 20 31 |%..h.. l|oop% = 1|
|000015f0| 20 b8 20 6c 65 6e 67 74 | 68 25 0d 06 72 28 ef 20 | . lengt|h%..r(. |
|00001600| 69 6e 74 65 67 65 72 25 | 20 81 20 28 32 35 36 20 |integer%| . (256 |
|00001610| 5e 20 28 34 2d 6c 6f 6f | 70 25 29 29 20 83 20 32 |^ (4-loo|p%)) . 2|
|00001620| 35 36 0d 06 7c 05 ed 0d | 06 86 05 e1 0d 06 90 04 |56..|...|........|
|00001630| 0d 06 9a 43 f4 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...C. **|********|
|00001640| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001650| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001660| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001670| 2a 2a 2a 0d 06 a4 43 f4 | 20 2a 20 57 72 69 74 65 |***...C.| * Write|
|00001680| 20 6f 75 74 20 64 61 74 | 61 20 6f 66 20 73 70 65 | out dat|a of spe|
|00001690| 63 69 66 69 65 64 20 6c | 65 6e 67 74 68 20 66 72 |cified l|ength fr|
|000016a0| 6f 6d 20 61 20 66 69 6c | 65 20 20 20 20 20 20 20 |om a fil|e |
|000016b0| 20 20 20 20 20 2a 0d 06 | ae 43 f4 20 2a 2a 2a 2a | *..|.C. ****|
|000016c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0d 06 b8 27 dd 20 f2 |********|*...'. .|
|00001700| 77 72 69 74 65 5f 64 61 | 74 61 28 66 69 6c 65 5f |write_da|ta(file_|
|00001710| 68 61 6e 64 6c 65 25 2c | 6c 65 6e 67 74 68 25 29 |handle%,|length%)|
|00001720| 0d 06 c2 0b ea 20 6c 6f | 6f 70 25 0d 06 cc 19 e3 |..... lo|op%.....|
|00001730| 20 6c 6f 6f 70 25 20 3d | 20 31 20 b8 20 6c 65 6e | loop% =| 1 . len|
|00001740| 67 74 68 25 0d 06 d6 14 | ef 20 9a 23 66 69 6c 65 |gth%....|. .#file|
|00001750| 5f 68 61 6e 64 6c 65 25 | 0d 06 e0 05 ed 0d 06 ea |_handle%|........|
|00001760| 05 e1 0d 06 f4 04 0d ff | |........| |
+--------+-------------------------+-------------------------+--------+--------+
