home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / discutils / backup / hdbackup_1 < prev    next >
ArcFS Archive  |  1995-10-01  |  23.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 8c 01 00 00 ec 01 00 00 |Archive.|........|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 48 44 42 61 63 6b | 75 70 00 00 ff ff ff ff |.!HDBack|up......|
|00000070| 44 ff ff ff aa 7c af 19 | 00 00 00 00 ff ff ff ff |D....|..|........|
|00000080| 68 01 00 80 82 21 42 6f | 6f 74 00 00 ff ff ff ff |h....!Bo|ot......|
|00000090| 3c 00 00 00 41 eb ff ff | 83 4f af a3 03 00 3d d0 |<...A...|.O....=.|
|000000a0| 3c 00 00 00 24 00 00 00 | 82 21 48 64 62 5f 76 32 |<...$...|.!Hdb_v2|
|000000b0| 30 30 00 ff f7 24 00 00 | 41 fb ff ff 09 f6 0f f8 |00...$..|A.......|
|000000c0| 03 00 7a 47 f7 24 00 00 | 84 00 00 00 82 21 48 64 |..zG.$..|.....!Hd|
|000000d0| 72 5f 76 32 30 30 00 ff | 8c 13 00 00 41 fb ff ff |r_v200..|....A...|
|000000e0| 48 65 4b a7 03 00 af 3f | 8c 13 00 00 9f 25 00 00 |HeK....?|.....%..|
|000000f0| 82 21 50 61 72 61 6d 65 | 74 65 72 00 12 00 00 00 |.!Parame|ter.....|
|00000100| 41 fd ff ff 85 9e 84 c0 | 03 00 34 3c 12 00 00 00 |A.......|..4<....|
|00000110| 4f 39 00 00 82 21 52 75 | 6e 00 04 00 ff ff ff ff |O9...!Ru|n.......|
|00000120| 5c 00 00 00 41 eb ff ff | d7 c4 a7 a2 03 00 58 d4 |\...A...|......X.|
|00000130| 5c 00 00 00 85 39 00 00 | 82 21 52 75 6e 49 6d 61 |\....9..|.!RunIma|
|00000140| 67 65 00 ff 86 1c 00 00 | 41 fb ff ff de 32 16 c3 |ge......|A....2..|
|00000150| 03 00 9f 68 86 1c 00 00 | 05 3a 00 00 82 21 53 70 |...h....|.:...!Sp|
|00000160| 72 69 74 65 73 00 ff ff | e4 03 00 00 41 f9 ff ff |rites...|....A...|
|00000170| 06 3d b7 a3 03 00 ad c6 | e4 03 00 00 af 56 00 00 |.=......|.....V..|
|00000180| 82 48 44 21 46 6c 70 42 | 6f 6f 74 00 28 00 00 00 |.HD!FlpB|oot.(...|
|00000190| 41 fe ff ff 2f 7f a7 a2 | 03 00 01 91 28 00 00 00 |A.../...|....(...|
|000001a0| b7 5a 00 00 00 00 00 00 | c3 00 04 00 ff ff ff ff |.Z......|........|
|000001b0| 03 00 a3 00 45 fb f3 ff | 76 5d b3 97 18 32 00 00 |....E...|v]...2..|
|000001c0| 03 00 00 00 83 ab 08 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 68 01 00 00 46 69 6c 65 |........|h...File|
|000001f0| 44 61 74 61 82 21 42 6f | 6f 74 00 00 ff ff ff ff |Data.!Bo|ot......|
|00000200| 3c 00 00 00 41 eb ff ff | 83 4f af a3 03 00 3d d0 |<...A...|.O....=.|
|00000210| 53 65 74 20 46 69 6c 65 | 24 54 79 70 65 5f 32 38 |Set File|$Type_28|
|00000220| 38 20 4f 77 6e 42 61 63 | 6b 75 70 0d 49 63 6f 6e |8 OwnBac|kup.Icon|
|00000230| 53 70 72 69 74 65 73 20 | 3c 4f 62 65 79 24 44 69 |Sprites |<Obey$Di|
|00000240| 72 3e 2e 21 53 70 72 69 | 74 65 73 0d 46 69 6c 65 |r>.!Spri|tes.File|
|00000250| 44 61 74 61 82 21 48 64 | 62 5f 76 32 30 30 00 ff |Data.!Hd|b_v200..|
|00000260| f7 24 00 00 41 fb ff ff | 09 f6 0f f8 03 00 7a 47 |.$..A...|......zG|
|00000270| 0d 00 0a 4b f4 20 3e 20 | 24 2e 21 48 44 42 61 63 |...K. > |$.!HDBac|
|00000280| 6b 75 70 2e 21 48 64 62 | 5f 76 32 30 30 20 20 20 |kup.!Hdb|_v200 |
|00000290| 4e 65 65 64 73 20 6d 61 | 63 68 69 6e 65 20 61 74 |Needs ma|chine at|
|000002a0| 20 6c 65 61 73 74 20 31 | 4d 42 20 74 6f 20 72 75 | least 1|MB to ru|
|000002b0| 6e 20 73 65 6e 73 69 62 | 6c 79 2e 0d 00 14 4a f4 |n sensib|ly....J.|
|000002c0| 20 20 20 20 20 54 65 72 | 72 79 20 42 72 6f 6d 69 | Ter|ry Bromi|
|000002d0| 6c 6f 77 2c 20 20 31 37 | 20 4d 61 79 20 31 39 38 |low, 17| May 198|
|000002e0| 38 20 20 76 65 72 73 69 | 6f 6e 20 32 2e 30 30 20 |8 versi|on 2.00 |
|000002f0| 28 52 49 53 43 5f 4f 53 | 29 20 32 38 20 41 70 72 |(RISC_OS|) 28 Apr|
|00000300| 20 31 39 38 39 0d 00 1e | 04 0d 00 28 33 6d 61 78 | 1989...|...(3max|
|00000310| 64 65 70 74 68 3d 32 30 | 20 20 20 20 20 20 20 20 |depth=20| |
|00000320| 20 20 3a 20 f4 20 6e 65 | 73 74 69 6e 67 20 6f 66 | : . ne|sting of|
|00000330| 20 64 69 72 65 63 74 6f | 72 69 65 73 0d 00 32 42 | directo|ries..2B|
|00000340| 66 6c 6f 70 70 79 73 69 | 7a 65 3d 37 35 30 2a 31 |floppysi|ze=750*1|
|00000350| 30 32 34 20 20 3a 20 f4 | 20 38 30 30 4b 20 64 69 |024 : .| 800K di|
|00000360| 73 63 73 2e 20 53 6f 6d | 65 20 72 6f 6f 6d 20 66 |scs. Som|e room f|
|00000370| 6f 72 20 64 69 72 65 63 | 74 6f 72 69 65 73 0d 00 |or direc|tories..|
|00000380| 3c 04 0d 00 46 47 de 20 | 66 64 61 74 61 20 33 32 |<...FG. |fdata 32|
|00000390| 2c 73 74 61 6d 70 20 33 | 30 2c 20 64 69 72 24 28 |,stamp 3|0, dir$(|
|000003a0| 6d 61 78 64 65 70 74 68 | 29 2c 20 63 64 69 72 24 |maxdepth|), cdir$|
|000003b0| 28 6d 61 78 64 65 70 74 | 68 29 2c 20 6f 66 73 28 |(maxdept|h), ofs(|
|000003c0| 6d 61 78 64 65 70 74 68 | 29 0d 00 50 1b 6e 61 6d |maxdepth|)..P.nam|
|000003d0| 65 3d 66 64 61 74 61 2b | 32 30 3a 64 66 3d 30 3a |e=fdata+|20:df=0:|
|000003e0| 73 66 3d 30 0d 00 5a 33 | 62 66 72 73 69 7a 65 3d |sf=0..Z3|bfrsize=|
|000003f0| 28 93 2d b8 50 2d 37 30 | 30 30 29 80 20 26 46 46 |(.-.P-70|00). &FF|
|00000400| 46 46 46 43 30 30 3a e7 | 20 62 66 72 73 69 7a 65 |FFFC00:.| bfrsize|
|00000410| 3c 34 30 39 36 3a fa 0d | 00 64 11 de 20 62 66 72 |<4096:..|.d.. bfr|
|00000420| 20 62 66 72 73 69 7a 65 | 0d 00 6e 0f 48 44 42 24 | bfrsize|..n.HDB$|
|00000430| 3d a4 63 68 65 63 6b 0d | 00 78 0f ee 20 85 20 f2 |=.check.|.x.. . .|
|00000440| 65 6e 64 28 32 29 0d 00 | 82 0b f2 70 61 72 61 6d |end(2)..|...param|
|00000450| 73 0d 00 8c 17 64 69 72 | 24 28 31 29 3d 73 6f 75 |s....dir|$(1)=sou|
|00000460| 72 63 65 73 70 65 63 24 | 0d 00 96 1b 64 64 24 3d |rcespec$|....dd$=|
|00000470| 22 3a 22 2b c3 64 65 73 | 74 64 72 69 76 65 2b 22 |":"+.des|tdrive+"|
|00000480| 2e 24 22 0d 00 a0 04 0d | 00 aa 13 f2 69 6e 69 74 |.$".....|....init|
|00000490| 3a 65 72 61 73 65 69 74 | 3d b9 0d 00 b4 13 eb 30 |:eraseit|=......0|
|000004a0| 3a fb 30 2c 26 37 30 2c | 26 36 30 2c 30 0d 00 be |:.0,&70,|&60,0...|
|000004b0| 24 6e 3d 31 38 2d 28 a9 | 73 6f 75 72 63 65 73 70 |$n=18-(.|sourcesp|
|000004c0| 65 63 24 20 81 32 29 3a | e7 20 6e 3c 30 3a 6e 3d |ec$ .2):|. n<0:n=|
|000004d0| 30 0d 00 c8 3e f1 8a 6e | 2c 31 29 22 54 68 69 73 |0...>..n|,1)"This|
|000004e0| 20 70 72 6f 67 72 61 6d | 20 62 61 63 6b 73 20 75 | program| backs u|
|000004f0| 70 20 61 6c 6c 20 66 69 | 6c 65 73 20 66 72 6f 6d |p all fi|les from|
|00000500| 20 22 3b 73 6f 75 72 63 | 65 73 70 65 63 24 3b 0d | ";sourc|espec$;.|
|00000510| 00 d2 27 f1 8a 36 2c 33 | 29 22 77 69 74 68 20 61 |..'..6,3|)"with a|
|00000520| 20 74 69 6d 65 73 74 61 | 6d 70 20 65 71 75 61 6c | timesta|mp equal|
|00000530| 20 74 6f 20 22 3b 0d 00 | dc 3b f1 22 6f 72 20 6c | to ";..|.;."or l|
|00000540| 61 74 65 72 20 74 68 61 | 6e 20 61 20 67 69 76 65 |ater tha|n a give|
|00000550| 6e 20 64 61 74 65 2f 74 | 69 6d 65 20 74 6f 20 64 |n date/t|ime to d|
|00000560| 72 69 76 65 20 22 3b 64 | 65 73 74 64 72 69 76 65 |rive ";d|estdrive|
|00000570| 3b 0d 00 e6 29 f1 8a 32 | 35 2c 36 29 22 43 75 72 |;...)..2|5,6)"Cur|
|00000580| 72 65 6e 74 20 64 61 74 | 65 20 20 20 22 3b c1 74 |rent dat|e ";.t|
|00000590| 69 6d 65 24 2c 35 2c 31 | 31 29 0d 00 f0 29 f1 8a |ime$,5,1|1)...)..|
|000005a0| 32 35 2c 38 29 22 43 75 | 72 72 65 6e 74 20 74 69 |25,8)"Cu|rrent ti|
|000005b0| 6d 65 20 20 20 22 3b c1 | 74 69 6d 65 24 2c 31 37 |me ";.|time$,17|
|000005c0| 2c 35 29 0d 00 fa 39 f1 | 8a 31 38 2c 31 31 29 22 |,5)...9.|.18,11)"|
|000005d0| 45 6e 74 65 72 20 64 61 | 74 65 20 61 6e 64 20 6f |Enter da|te and o|
|000005e0| 70 74 69 6f 6e 61 6c 6c | 79 20 74 69 6d 65 2c 20 |ptionall|y time, |
|000005f0| 66 6f 72 20 73 65 61 72 | 63 68 2e 22 0d 01 04 4e |for sear|ch."...N|
|00000600| f1 8a 37 2c 31 33 29 22 | 50 72 65 73 73 69 6e 67 |..7,13)"|Pressing|
|00000610| 20 3c 52 45 54 4e 3e 20 | 61 6c 6f 6e 65 20 65 6e | <RETN> |alone en|
|00000620| 74 65 72 73 20 63 75 72 | 72 65 6e 74 20 76 61 6c |ters cur|rent val|
|00000630| 75 65 20 69 6e 20 64 61 | 74 65 2c 20 7a 65 72 6f |ue in da|te, zero|
|00000640| 20 69 6e 20 74 69 6d 65 | 2e 22 0d 01 0e 3c f1 8a | in time|."...<..|
|00000650| 31 37 2c 31 35 29 22 28 | 45 6e 74 65 72 69 6e 67 |17,15)"(|Entering|
|00000660| 20 59 65 61 72 20 61 73 | 20 31 39 30 30 20 69 6e | Year as| 1900 in|
|00000670| 63 6c 75 64 65 73 20 75 | 6e 64 61 74 65 64 20 66 |cludes u|ndated f|
|00000680| 69 6c 65 73 29 22 0d 01 | 18 04 0d 01 22 1f f5 3a |iles)"..|...."..:|
|00000690| ef 32 38 2c 30 2c 33 31 | 2c 37 39 2c 31 38 3a db |.28,0,31|,79,18:.|
|000006a0| 3a 64 6d 28 32 29 3d 32 | 39 0d 01 2c 33 64 61 79 |:dm(2)=2|9..,3day|
|000006b0| 3d a4 69 6e 70 75 74 28 | 30 2c 22 44 61 79 20 6f |=.input(|0,"Day o|
|000006c0| 66 20 6d 6f 6e 74 68 3a | 20 22 2c 31 2c 33 31 2c |f month:| ",1,31,|
|000006d0| c1 74 69 6d 65 24 2c 35 | 2c 32 29 29 0d 01 36 30 |.time$,5|,2))..60|
|000006e0| 6d 6f 6e 74 68 3d a4 69 | 6e 70 75 74 28 32 2c 22 |month=.i|nput(2,"|
|000006f0| 4d 6f 6e 74 68 20 28 31 | 2d 31 32 29 3a 20 22 2c |Month (1|-12): ",|
|00000700| 31 2c 31 32 2c c3 6d 6f | 6e 74 68 29 0d 01 40 46 |1,12,.mo|nth)..@F|
|00000710| e7 20 64 61 79 3e 64 6d | 28 6d 6f 6e 74 68 29 3a |. day>dm|(month):|
|00000720| ef 37 3a 64 61 79 3d a4 | 69 6e 70 75 74 28 30 2c |.7:day=.|input(0,|
|00000730| 22 44 61 79 20 6f 66 20 | 6d 6f 6e 74 68 3a 20 22 |"Day of |month: "|
|00000740| 2c 31 2c 64 6d 28 6d 6f | 6e 74 68 29 2c c3 64 61 |,1,dm(mo|nth),.da|
|00000750| 79 29 0d 01 4a 3a 79 65 | 61 72 3d a4 69 6e 70 75 |y)..J:ye|ar=.inpu|
|00000760| 74 28 34 2c 22 20 20 20 | 20 20 20 20 20 59 65 61 |t(4," | Yea|
|00000770| 72 3a 20 22 2c 31 39 30 | 30 2c 32 30 37 30 2c c1 |r: ",190|0,2070,.|
|00000780| 74 69 6d 65 24 2c 31 32 | 2c 34 29 29 0d 01 54 57 |time$,12|,4))..TW|
|00000790| e7 20 79 65 61 72 20 83 | 34 3e 30 3a 64 6d 28 32 |. year .|4>0:dm(2|
|000007a0| 29 3d 32 38 3a e7 20 6d | 6f 6e 74 68 3d 32 3a e7 |)=28:. m|onth=2:.|
|000007b0| 20 64 61 79 3d 32 39 3a | ef 37 3a 64 61 79 3d a4 | day=29:|.7:day=.|
|000007c0| 69 6e 70 75 74 28 30 2c | 22 44 61 79 20 6f 66 20 |input(0,|"Day of |
|000007d0| 6d 6f 6e 74 68 3a 20 22 | 2c 31 2c 32 38 2c 22 32 |month: "|,1,28,"2|
|000007e0| 39 22 29 0d 01 5e 2d 68 | 6f 75 72 3d a4 69 6e 70 |9")..^-h|our=.inp|
|000007f0| 75 74 28 36 2c 22 20 20 | 20 20 20 20 20 20 48 6f |ut(6," | Ho|
|00000800| 75 72 3a 20 22 2c 30 2c | 32 33 2c 22 30 30 22 29 |ur: ",0,|23,"00")|
|00000810| 0d 01 68 2c 6d 69 6e 3d | a4 69 6e 70 75 74 28 38 |..h,min=|.input(8|
|00000820| 2c 22 20 20 20 20 20 4d | 69 6e 75 74 65 73 3a 20 |," M|inutes: |
|00000830| 22 2c 30 2c 35 39 2c 22 | 30 30 22 29 0d 01 72 24 |",0,59,"|00")..r$|
|00000840| 74 24 3d c3 68 6f 75 72 | 2b 22 3a 22 3a e7 20 68 |t$=.hour|+":":. h|
|00000850| 6f 75 72 3c 31 30 3a 74 | 24 3d 22 30 22 2b 74 24 |our<10:t|$="0"+t$|
|00000860| 0d 01 7c 24 e7 20 6d 69 | 6e 3c 31 30 3a 74 24 2b |..|$. mi|n<10:t$+|
|00000870| 3d 22 30 22 2b c3 6d 69 | 6e 3a 8b 20 74 24 2b 3d |="0"+.mi|n:. t$+=|
|00000880| c3 6d 69 6e 0d 01 86 32 | f1 8a 32 30 2c 31 32 29 |.min...2|..20,12)|
|00000890| 22 44 61 74 65 3a 20 22 | 3b 64 61 79 3b 22 20 22 |"Date: "|;day;" "|
|000008a0| 3b 6d 74 68 24 28 6d 6f | 6e 74 68 29 3b 22 20 22 |;mth$(mo|nth);" "|
|000008b0| 3b 79 65 61 72 3b 0d 01 | 90 22 e7 20 74 24 3c 3e |;year;..|.". t$<>|
|000008c0| 22 30 30 3a 30 30 22 3a | f1 22 20 20 20 54 69 6d |"00:00":|." Tim|
|000008d0| 65 3a 20 22 3b 74 24 3b | 0d 01 9a 1a f1 22 20 20 |e: ";t$;|....." |
|000008e0| 43 6f 72 72 65 63 74 20 | 3f 20 28 59 2f 4e 29 20 |Correct |? (Y/N) |
|000008f0| 22 3b 0d 01 a4 2b 76 3d | 30 3a f5 3a ef 76 3a 76 |";...+v=|0:.:.v:v|
|00000900| 3d 37 3a 6e 3d a5 20 80 | 26 44 46 3a fd 20 6e 3d |=7:n=. .|&DF:. n=|
|00000910| 97 22 59 22 20 84 20 6e | 3d 97 22 4e 22 0d 01 ae |."Y" . n|=."N"...|
|00000920| 0c fd 20 6e 3d 97 22 59 | 22 0d 01 b8 04 0d 01 c2 |.. n=."Y|".......|
|00000930| 09 ef 32 36 3a db 0d 01 | cc 33 74 68 72 65 73 68 |..26:...|.3thresh|
|00000940| 68 6f 6c 64 3d a4 63 6c | 6f 63 6b 28 79 65 61 72 |hold=.cl|ock(year|
|00000950| 2d 31 39 30 30 2c 6d 6f | 6e 74 68 2c 64 61 79 2c |-1900,mo|nth,day,|
|00000960| 68 6f 75 72 2c 6d 69 6e | 29 0d 01 d6 0c f2 6c 69 |hour,min|).....li|
|00000970| 73 74 28 31 29 0d 01 e0 | 38 e7 20 6c 66 69 6c 65 |st(1)...|8. lfile|
|00000980| 73 2b 64 69 73 63 73 3d | 30 3a f1 27 8a 33 32 29 |s+discs=|0:.'.32)|
|00000990| 22 4e 6f 74 68 69 6e 67 | 20 74 6f 20 62 61 63 6b |"Nothing| to back|
|000009a0| 75 70 2e 22 27 3a f2 65 | 6e 64 28 30 29 0d 01 ea |up."':.e|nd(0)...|
|000009b0| 43 e7 20 a4 79 6e 28 22 | 43 6f 70 79 20 74 68 65 |C. .yn("|Copy the|
|000009c0| 20 61 62 6f 76 65 20 6c | 69 73 74 20 74 6f 20 74 | above l|ist to t|
|000009d0| 68 65 20 70 72 69 6e 74 | 65 72 22 29 3d 97 22 59 |he print|er")=."Y|
|000009e0| 22 3a f2 70 72 6f 6e 3a | f2 6c 69 73 74 28 30 29 |":.pron:|.list(0)|
|000009f0| 0d 01 f4 27 e7 20 a4 79 | 6e 28 22 53 74 61 72 74 |...'. .y|n("Start|
|00000a00| 20 62 61 63 6b 75 70 22 | 29 3c 3e 97 22 59 22 3a | backup"|)<>."Y":|
|00000a10| f2 65 6e 64 28 31 29 0d | 01 fe 3e e7 20 6c 66 69 |.end(1).|..>. lfi|
|00000a20| 6c 65 73 3d 30 3a f1 27 | 8a 32 33 29 22 4e 6f 20 |les=0:.'|.23)"No |
|00000a30| 6c 61 72 67 65 20 66 69 | 6c 65 73 20 6e 65 65 64 |large fi|les need|
|00000a40| 69 6e 67 20 6f 77 6e 20 | 64 69 73 63 73 2e 22 3a |ing own |discs.":|
|00000a50| 8b 20 f2 6c 66 0d 02 08 | 0d e7 20 64 69 73 63 73 |. .lf...|.. discs|
|00000a60| 20 8c 0d 02 12 3d 20 20 | f1 27 27 8a 32 30 29 22 | ....= |.''.20)"|
|00000a70| 28 70 72 65 73 73 20 43 | 20 69 6e 73 74 65 61 64 |(press C| instead|
|00000a80| 20 74 6f 20 63 6f 6e 66 | 69 72 6d 20 65 61 63 68 | to conf|irm each|
|00000a90| 20 6f 6e 65 29 22 3b bd | 31 31 3b bd 31 31 3b 0d | one)";.|11;.11;.|
|00000aa0| 02 1c 2e 20 20 6e 3d a4 | 79 6e 28 22 43 6f 6e 74 |... n=.|yn("Cont|
|00000ab0| 69 6e 75 65 20 77 69 74 | 68 20 74 68 65 20 73 6d |inue wit|h the sm|
|00000ac0| 61 6c 6c 65 72 20 66 69 | 6c 65 73 22 29 0d 02 26 |aller fi|les")..&|
|00000ad0| 26 20 20 e7 20 6e 3c 3e | 97 22 4e 22 3a 63 6f 6e |& . n<>|."N":con|
|00000ae0| 66 69 72 6d 3d 28 6e 3d | 97 22 43 22 29 3a f1 3a |firm=(n=|."C"):.:|
|00000af0| f2 73 66 0d 02 30 05 cd | 0d 02 3a 0b f2 65 6e 64 |.sf..0..|..:..end|
|00000b00| 28 31 29 0d 02 44 04 0d | 02 4e 0d dd 20 a4 79 6e |(1)..D..|.N.. .yn|
|00000b10| 28 71 24 29 0d 02 58 25 | f1 27 8a 28 37 30 2d a9 |(q$)..X%|.'.(70-.|
|00000b20| 71 24 29 2f 32 29 71 24 | 3b 22 20 3f 20 28 59 2f |q$)/2)q$|;" ? (Y/|
|00000b30| 4e 29 20 22 3b 3a 76 3d | 30 0d 02 62 30 f5 3a ef |N) ";:v=|0..b0.:.|
|00000b40| 76 3a 76 3d 37 3a 6e 3d | a5 80 26 44 46 3a fd 20 |v:v=7:n=|..&DF:. |
|00000b50| 6e 3d 97 22 59 22 84 20 | 6e 3d 97 22 4e 22 84 6e |n=."Y". |n=."N".n|
|00000b60| 3d 97 22 43 22 3a f1 bd | 6e 0d 02 6c 06 3d 6e 0d |=."C":..|n..l.=n.|
|00000b70| 02 76 04 0d 02 80 23 dd | 20 a4 69 6e 70 75 74 28 |.v....#.| .input(|
|00000b80| 6c 69 6e 65 2c 71 24 2c | 6d 69 6e 2c 6d 61 78 2c |line,q$,|min,max,|
|00000b90| 64 66 6c 74 24 29 0d 02 | 8a 18 ea 20 76 2c 71 3a |dflt$)..|... v,q:|
|00000ba0| 71 3d 32 30 2b a9 71 24 | 3a 2a 46 58 32 31 0d 02 |q=20+.q$|:*FX21..|
|00000bb0| 94 0d f5 3a ef 20 76 3a | 76 3d 37 0d 02 9e 25 20 |...:. v:|v=7...% |
|00000bc0| f1 8a 32 30 2c 6c 69 6e | 65 29 89 35 30 3b 8a 32 |..20,lin|e).50;.2|
|00000bd0| 30 2c 6c 69 6e 65 29 71 | 24 3b 64 66 6c 74 24 3b |0,line)q|$;dflt$;|
|00000be0| 0d 02 a8 1f 20 c8 99 20 | 36 2c 31 33 38 2c 30 2c |.... .. |6,138,0,|
|00000bf0| a5 3a f1 8a 71 2c 6c 69 | 6e 65 29 89 31 30 3b 0d |.:..q,li|ne).10;.|
|00000c00| 02 b2 14 20 e8 8a 71 2c | 6c 69 6e 65 29 3b 22 22 |... ..q,|line);""|
|00000c10| 20 61 24 0d 02 bc 21 20 | e7 20 61 24 3d 22 22 3a | a$...! |. a$="":|
|00000c20| 61 24 3d 64 66 6c 74 24 | 3a f1 8a 71 2c 6c 69 6e |a$=dflt$|:..q,lin|
|00000c30| 65 29 61 24 0d 02 c6 19 | fd 20 bb 61 24 3e 3d 6d |e)a$....|. .a$>=m|
|00000c40| 69 6e 20 80 20 bb 61 24 | 3c 3d 6d 61 78 0d 02 d0 |in . .a$|<=max...|
|00000c50| 09 3d a8 bb 61 24 0d 02 | da 04 0d 02 e4 19 dd 20 |.=..a$..|....... |
|00000c60| a4 63 6c 6f 63 6b 28 79 | 2c 6d 2c 64 2c 68 2c 6d |.clock(y|,m,d,h,m|
|00000c70| 69 6e 29 0d 02 ee 0a ea | 20 6e 2c 74 79 0d 02 f8 |in).....| n,ty...|
|00000c80| 1b e3 20 6e 3d 30 20 b8 | 20 6d 2d 31 3a 74 79 2b |.. n=0 .| m-1:ty+|
|00000c90| 3d 64 6d 28 6e 29 3a ed | 0d 03 02 3c 3d 28 28 28 |=dm(n):.|...<=(((|
|00000ca0| 79 2a 33 36 35 2b 79 20 | 81 34 2b 28 64 6d 28 32 |y*365+y |.4+(dm(2|
|00000cb0| 29 3d 32 39 29 2b 74 79 | 2b 64 2d 31 29 2a 32 34 |)=29)+ty|+d-1)*24|
|00000cc0| 2b 68 29 2a 36 30 2b 6d | 69 6e 29 2f 32 35 36 2a |+h)*60+m|in)/256*|
|00000cd0| 36 30 30 30 0d 03 0c 04 | 0d 03 16 0b dd 20 f2 69 |6000....|..... .i|
|00000ce0| 6e 69 74 0d 03 20 15 de | 20 64 6d 28 31 32 29 2c |nit.. ..| dm(12),|
|00000cf0| 6d 74 68 24 28 31 32 29 | 0d 03 2a 20 e3 20 78 3d |mth$(12)|..* . x=|
|00000d00| 31 20 b8 20 31 32 3a f3 | 20 6d 74 68 24 28 78 29 |1 . 12:.| mth$(x)|
|00000d10| 2c 64 6d 28 78 29 3a ed | 0d 03 34 2f dc 20 4a 61 |,dm(x):.|..4/. Ja|
|00000d20| 6e 2c 33 31 2c 46 65 62 | 2c 32 39 2c 4d 61 72 2c |n,31,Feb|,29,Mar,|
|00000d30| 33 31 2c 41 70 72 2c 33 | 30 2c 4d 61 79 2c 33 31 |31,Apr,3|0,May,31|
|00000d40| 2c 4a 75 6e 2c 33 30 0d | 03 3e 2f dc 20 4a 75 6c |,Jun,30.|.>/. Jul|
|00000d50| 2c 33 31 2c 41 75 67 2c | 33 31 2c 53 65 70 2c 33 |,31,Aug,|31,Sep,3|
|00000d60| 30 2c 4f 63 74 2c 33 31 | 2c 4e 6f 76 2c 33 30 2c |0,Oct,31|,Nov,30,|
|00000d70| 44 65 63 2c 33 31 0d 03 | 48 16 74 69 6d 65 24 3d |Dec,31..|H.time$=|
|00000d80| c0 91 24 2c 32 31 29 3a | 78 3d 31 32 0d 03 52 30 |..$,21):|x=12..R0|
|00000d90| c8 95 20 c1 74 69 6d 65 | 24 2c 38 2c 33 29 3c 3e |.. .time|$,8,3)<>|
|00000da0| 6d 74 68 24 28 78 29 20 | 80 20 78 3e 30 3a 78 2d |mth$(x) |. x>0:x-|
|00000db0| 3d 31 3a ce 3a 6d 6f 6e | 74 68 3d 78 0d 03 5c 05 |=1:.:mon|th=x..\.|
|00000dc0| e1 0d 03 66 04 0d 03 70 | 0f dd 20 f2 6c 69 73 74 |...f...p|.. .list|
|00000dd0| 28 70 67 29 0d 03 7a 3f | 40 25 3d 26 39 30 34 3a |(pg)..z?|@%=&904:|
|00000de0| e7 20 70 67 3a f1 8a 33 | 33 2c 33 31 29 22 3c 20 |. pg:..3|3,31)"< |
|00000df0| 50 72 65 73 73 20 53 68 | 69 66 74 20 3e 22 3b 3a |Press Sh|ift >";:|
|00000e00| ef 32 38 2c 30 2c 32 39 | 2c 37 39 2c 30 2c 31 32 |.28,0,29|,79,0,12|
|00000e10| 2c 31 34 0d 03 84 1f f1 | 27 22 42 61 63 6b 75 70 |,14.....|'"Backup|
|00000e20| 20 6c 69 73 74 20 66 6f | 72 20 22 3b 74 69 6d 65 | list fo|r ";time|
|00000e30| 24 27 0d 03 8e 2a 74 6f | 74 61 6c 3d 30 3a 64 69 |$'...*to|tal=0:di|
|00000e40| 73 63 73 3d 30 3a 6c 66 | 69 6c 65 73 3d 30 3a 64 |scs=0:lf|iles=0:d|
|00000e50| 65 70 74 68 3d 31 3a 66 | 69 6e 3d a3 0d 03 98 05 |epth=1:f|in=.....|
|00000e60| f5 0d 03 a2 16 20 20 e7 | 20 a4 6e 65 78 74 66 69 |..... .| .nextfi|
|00000e70| 6c 65 28 31 29 20 8c 0d | 03 ac 14 20 20 20 f2 70 |le(1) ..|... .p|
|00000e80| 72 69 6e 74 28 a4 74 65 | 73 74 29 0d 03 b6 28 20 |rint(.te|st)...( |
|00000e90| 20 20 e7 20 6c 65 6e 67 | 74 68 3a 74 6f 74 61 6c | . leng|th:total|
|00000ea0| 2b 3d 28 6c 65 6e 67 74 | 68 20 84 20 26 33 46 46 |+=(lengt|h . &3FF|
|00000eb0| 29 2b 31 0d 03 c0 3a 20 | 20 20 e7 20 74 6f 74 61 |)+1...: | . tota|
|00000ec0| 6c 3e 66 6c 6f 70 70 79 | 73 69 7a 65 3a 64 69 73 |l>floppy|size:dis|
|00000ed0| 63 73 2b 3d 31 3a 74 6f | 74 61 6c 3d 28 6c 65 6e |cs+=1:to|tal=(len|
|00000ee0| 67 74 68 20 84 20 26 33 | 46 46 29 2b 31 0d 03 ca |gth . &3|FF)+1...|
|00000ef0| 0e 20 20 20 cc 20 66 69 | 6e 3d b9 0d 03 d4 07 20 |. . fi|n=..... |
|00000f00| 20 cd 0d 03 de 1a fd 20 | 66 69 6e 3a 64 69 73 63 | ...... |fin:disc|
|00000f10| 73 2d 3d 28 74 6f 74 61 | 6c 3e 30 29 0d 03 e8 3b |s-=(tota|l>0)...;|
|00000f20| e7 20 64 69 73 63 73 3a | f1 27 8a 32 33 29 22 44 |. discs:|.'.23)"D|
|00000f30| 69 73 63 73 20 6e 65 65 | 64 65 64 20 66 6f 72 20 |iscs nee|ded for |
|00000f40| 73 6d 61 6c 6c 65 72 20 | 66 69 6c 65 73 3a 20 22 |smaller |files: "|
|00000f50| 3b 64 69 73 63 73 3b 0d | 03 f2 30 e7 20 64 69 73 |;discs;.|..0. dis|
|00000f60| 63 73 3a e7 20 65 72 61 | 73 65 5f 73 66 5f 64 69 |cs:. era|se_sf_di|
|00000f70| 73 63 73 3d a3 3a f1 22 | 20 28 69 66 20 62 6c 61 |scs=.:."| (if bla|
|00000f80| 6e 6b 29 22 20 8b f1 0d | 03 fc 2c 70 67 3d bc 3a |nk)" ...|..,pg=.:|
|00000f90| 40 25 3d 26 39 30 41 3a | ef 32 36 2c 31 35 2c 33 |@%=&90A:|.26,15,3|
|00000fa0| 3a f1 8a 30 2c 33 31 29 | 89 37 39 3b 8a 30 2c 70 |:..0,31)|.79;.0,p|
|00000fb0| 67 29 3b 0d 04 06 05 e1 | 0d 04 10 04 0d 04 1a 0b |g);.....|........|
|00000fc0| dd 20 a4 74 65 73 74 0d | 04 24 15 6c 65 6e 67 74 |. .test.|.$.lengt|
|00000fd0| 68 3d 30 3a 61 63 63 65 | 73 73 3d 30 0d 04 2e 16 |h=0:acce|ss=0....|
|00000fe0| c8 94 20 66 64 61 74 61 | 21 30 2c 66 64 61 74 61 |.. fdata|!0,fdata|
|00000ff0| 21 34 0d 04 38 41 e7 20 | 79 65 61 72 3e 31 39 30 |!4..8A. |year>190|
|00001000| 30 3a e7 28 66 64 61 74 | 61 21 36 20 80 26 46 46 |0:.(fdat|a!6 .&FF|
|00001010| 46 30 29 3c 3e 26 46 46 | 46 30 20 84 20 66 64 61 |F0)<>&FF|F0 . fda|
|00001020| 74 61 21 31 3c 74 68 72 | 65 73 68 68 6f 6c 64 3a |ta!1<thr|eshhold:|
|00001030| 3d 2d 31 0d 04 42 1d 61 | 63 63 65 73 73 3d 28 28 |=-1..B.a|ccess=((|
|00001040| 66 64 61 74 61 3f 31 32 | 20 80 20 31 29 3d 31 29 |fdata?12| . 1)=1)|
|00001050| 0d 04 4c 38 e7 28 66 64 | 61 74 61 21 36 20 80 26 |..L8.(fd|ata!6 .&|
|00001060| 46 46 46 30 29 3d 26 46 | 46 46 30 3a 74 79 70 65 |FFF0)=&F|FF0:type|
|00001070| 3d 28 66 64 61 74 61 21 | 35 29 80 26 46 46 46 3a |=(fdata!|5).&FFF:|
|00001080| 8b 20 74 79 70 65 3d 30 | 0d 04 56 23 e7 20 66 64 |. type=0|..V#. fd|
|00001090| 61 74 61 21 38 3e 6c 69 | 6d 73 69 7a 65 20 84 20 |ata!8>li|msize . |
|000010a0| 74 79 70 65 3d 26 32 38 | 38 20 8c 0d 04 60 2a 20 |type=&28|8 ...`* |
|000010b0| 20 6c 66 69 6c 65 73 2b | 3d 31 3a 6e 3d 28 66 64 | lfiles+|=1:n=(fd|
|000010c0| 61 74 61 21 38 29 81 20 | 66 6c 6f 70 70 79 73 69 |ata!8). |floppysi|
|000010d0| 7a 65 20 2b 31 0d 04 6a | 1a 20 20 cc 20 6c 65 6e |ze +1..j|. . len|
|000010e0| 67 74 68 3d 66 64 61 74 | 61 21 38 3a 6e 3d 30 0d |gth=fdat|a!8:n=0.|
|000010f0| 04 74 05 cd 0d 04 7e 06 | 3d 6e 0d 04 88 04 0d 04 |.t....~.|=n......|
|00001100| 92 0f dd 20 f2 70 72 69 | 6e 74 28 6e 29 0d 04 9c |... .pri|nt(n)...|
|00001110| 0b e7 20 6e 3c 30 3a e1 | 0d 04 a6 3f c8 99 20 22 |.. n<0:.|...?.. "|
|00001120| 4f 53 5f 43 6f 6e 76 65 | 72 74 53 74 61 6e 64 61 |OS_Conve|rtStanda|
|00001130| 72 64 44 61 74 65 41 6e | 64 54 69 6d 65 22 2c 66 |rdDateAn|dTime",f|
|00001140| 64 61 74 61 2c 73 74 61 | 6d 70 2c 33 30 20 b8 2c |data,sta|mp,30 .,|
|00001150| 78 3a 3f 78 3d 31 33 0d | 04 b0 26 e7 20 74 79 70 |x:?x=13.|..&. typ|
|00001160| 65 3d 30 3a 24 73 74 61 | 6d 70 3d 22 20 20 20 20 |e=0:$sta|mp=" |
|00001170| 55 20 20 20 6e 73 74 61 | 6d 70 65 64 22 0d 04 ba |U nsta|mped"...|
|00001180| 37 f1 c6 8e 28 64 69 72 | 24 28 29 29 3b 22 2e 22 |7...(dir|$());"."|
|00001190| 3b 24 6e 61 6d 65 3b 8a | 34 30 29 3b c0 24 73 74 |;$name;.|40);.$st|
|000011a0| 61 6d 70 2c 35 29 3b c1 | 24 73 74 61 6d 70 2c 39 |amp,5);.|$stamp,9|
|000011b0| 2c 38 29 3b 0d 04 c4 31 | f1 20 c1 24 73 74 61 6d |,8);...1|. .$stam|
|000011c0| 70 2c 31 39 2c 32 29 2c | 28 66 64 61 74 61 21 38 |p,19,2),|(fdata!8|
|000011d0| 2b 31 30 32 33 29 81 31 | 30 32 34 3b 22 4b 22 3b |+1023).1|024;"K";|
|000011e0| 8a 36 34 29 3b 0d 04 ce | 34 e7 20 6e 3d 31 3a f1 |.64);...|4. n=1:.|
|000011f0| 22 4f 77 6e 20 64 69 73 | 63 22 3b 3a 8b e7 20 6e |"Own dis|c";:.. n|
|00001200| 3e 31 3a f1 22 4f 77 6e | 20 22 3b 6e 3b 22 2d 64 |>1:."Own| ";n;"-d|
|00001210| 69 73 63 20 73 65 74 22 | 3b 0d 04 d8 07 f1 3a e1 |isc set"|;.....:.|
|00001220| 0d 04 e2 04 0d 04 ec 12 | dd 20 a4 6e 65 78 74 66 |........|. .nextf|
|00001230| 69 6c 65 28 64 29 0d 04 | f6 05 f5 0d 05 00 11 20 |ile(d)..|....... |
|00001240| 20 e7 20 64 65 70 74 68 | 3e 64 20 8c 0d 05 0a 3e | . depth|>d ....>|
|00001250| 20 20 e7 20 a4 6e 65 78 | 74 66 69 6c 65 28 64 2b | . .nex|tfile(d+|
|00001260| 31 29 3a 3d b9 20 8b 20 | 64 69 72 24 28 64 2b 31 |1):=. . |dir$(d+1|
|00001270| 29 3d 22 22 3a 63 64 69 | 72 24 28 64 2b 31 29 3d |)="":cdi|r$(d+1)=|
|00001280| 22 22 3a 64 65 70 74 68 | 3d 64 0d 05 14 07 20 20 |"":depth|=d.... |
|00001290| cd 0d 05 1e 0b 63 68 65 | 63 6b 3d 30 0d 05 28 54 |.....che|ck=0..(T|
|000012a0| e7 20 6f 66 73 28 64 29 | 3e 3d 30 3a c8 99 20 22 |. ofs(d)|>=0:.. "|
|000012b0| 4f 53 5f 47 42 50 42 22 | 2c 31 30 2c c6 8e 28 64 |OS_GBPB"|,10,..(d|
|000012c0| 69 72 24 28 29 29 2b bd | 30 2c 66 64 61 74 61 2c |ir$())+.|0,fdata,|
|000012d0| 31 2c 6f 66 73 28 64 29 | 2c 33 32 2c 22 2a 22 20 |1,ofs(d)|,32,"*" |
|000012e0| b8 2c 2c 2c 63 68 65 63 | 6b 2c 6f 66 73 28 64 29 |.,,,chec|k,ofs(d)|
|000012f0| 0d 05 32 19 e7 20 63 68 | 65 63 6b 3d 30 3a 6f 66 |..2.. ch|eck=0:of|
|00001300| 73 28 64 29 3d 30 3a 3d | a3 0d 05 3c 20 6e 3d 6e |s(d)=0:=|...< n=n|
|00001310| 61 6d 65 2d 31 3a f5 3a | 6e 2b 3d 31 3a fd 20 3f |ame-1:.:|n+=1:. ?|
|00001320| 6e 3d 30 3a 3f 6e 3d 31 | 33 0d 05 46 11 c8 8e 20 |n=0:?n=1|3..F... |
|00001330| 66 64 61 74 61 3f 31 36 | 20 ca 0d 05 50 0c 20 20 |fdata?16| ...P. |
|00001340| c9 20 31 3a 3d b9 0d 05 | 5a 27 20 20 c9 20 32 3a |. 1:=...|Z' . 2:|
|00001350| 64 65 70 74 68 3d 64 2b | 31 3a 64 69 72 24 28 64 |depth=d+|1:dir$(d|
|00001360| 2b 31 29 3d 22 2e 22 2b | 24 6e 61 6d 65 0d 05 64 |+1)="."+|$name..d|
|00001370| 09 20 20 7f 20 fa 0d 05 | 6e 05 cb 0d 05 78 07 fd |. . ...|n....x..|
|00001380| 20 a3 0d 05 82 04 0d 05 | 8c 09 dd 20 f2 6c 66 0d | .......|... .lf.|
|00001390| 05 96 14 64 65 70 74 68 | 3d 31 3a 2a 46 58 32 32 |...depth|=1:*FX22|
|000013a0| 39 20 31 0d 05 a0 3b f1 | 27 22 42 61 63 6b 69 6e |9 1...;.|'"Backin|
|000013b0| 67 20 75 70 20 66 72 6f | 6d 20 22 3b 73 6f 75 72 |g up fro|m ";sour|
|000013c0| 63 65 73 70 65 63 24 3b | 22 20 74 6f 20 64 72 69 |cespec$;|" to dri|
|000013d0| 76 65 20 22 3b 64 65 73 | 74 64 72 69 76 65 0d 05 |ve ";des|tdrive..|
|000013e0| aa 13 c8 95 20 a4 6e 65 | 78 74 66 69 6c 65 28 31 |.... .ne|xtfile(1|
|000013f0| 29 0d 05 b4 1d 20 64 3d | a4 74 65 73 74 3a 72 24 |).... d=|.test:r$|
|00001400| 3d 22 42 61 63 6b 69 6e | 67 20 75 70 20 22 0d 05 |="Backin|g up "..|
|00001410| be 08 20 ea 20 85 0d 05 | c8 32 20 ee 20 85 20 ea |.. . ...|.2 . . .|
|00001420| 3a f2 63 6c 6f 73 65 3a | f1 27 f6 24 3a 72 24 3d |:.close:|.'.$:r$=|
|00001430| 22 52 65 73 74 61 72 74 | 69 6e 67 20 22 3a e7 20 |"Restart|ing ":. |
|00001440| 9f 3d 31 37 3a 64 3d 30 | 0d 05 d2 0d 20 2a 46 58 |.=17:d=0|.... *FX|
|00001450| 32 32 39 20 31 0d 05 dc | 0c 20 e7 20 64 3e 30 20 |229 1...|. . d>0 |
|00001460| 8c 0d 05 e6 2c 20 20 f1 | 27 72 24 3b c6 8e 28 64 |...., .|'r$;..(d|
|00001470| 69 72 24 28 29 29 3b 22 | 2e 22 3b 24 6e 61 6d 65 |ir$());"|.";$name|
|00001480| 3b 22 20 28 74 6f 20 6f | 77 6e 20 22 3b 0d 05 f0 |;" (to o|wn ";...|
|00001490| 28 20 20 e7 20 64 3e 31 | 3a f1 3b 64 3b 22 2d 64 |( . d>1|:.;d;"-d|
|000014a0| 69 73 63 20 73 65 74 29 | 22 20 8b 20 f1 20 22 64 |isc set)|" . . "d|
|000014b0| 69 73 63 29 22 0d 05 fa | 10 20 20 e7 20 61 63 63 |isc)"...|. . acc|
|000014c0| 65 73 73 20 8c 0d 06 04 | 42 20 20 20 20 61 63 63 |ess ....|B acc|
|000014d0| 65 73 73 3d 30 3a 73 66 | 3d 8e 28 c6 8e 28 64 69 |ess=0:sf|=.(..(di|
|000014e0| 72 24 28 29 29 2b 22 2e | 22 2b 24 6e 61 6d 65 29 |r$())+".|"+$name)|
|000014f0| 3a e7 20 73 66 3a 6c 65 | 6e 3d a2 23 73 66 3a 61 |:. sf:le|n=.#sf:a|
|00001500| 63 63 65 73 73 3d 31 0d | 06 0e 2e 20 20 20 20 e7 |ccess=1.|... .|
|00001510| 20 73 66 3d 30 3a 64 3d | 30 3a 85 20 30 2c 22 43 | sf=0:d=|0:. 0,"C|
|00001520| 61 6e 6e 6f 74 20 6f 70 | 65 6e 20 74 68 69 73 20 |annot op|en this |
|00001530| 66 69 6c 65 22 0d 06 18 | 48 20 20 20 20 f1 27 22 |file"...|H .'"|
|00001540| 49 6e 73 65 72 74 20 61 | 20 64 69 73 63 20 61 6e |Insert a| disc an|
|00001550| 64 20 70 72 65 73 73 20 | 61 20 6b 65 79 2e 20 20 |d press |a key. |
|00001560| 3c 45 53 43 41 50 45 3e | 20 74 6f 20 73 6b 69 70 |<ESCAPE>| to skip|
|00001570| 20 74 68 69 73 20 66 69 | 6c 65 20 22 3b 0d 06 22 | this fi|le ";.."|
|00001580| 23 20 20 20 20 ff 22 46 | 58 32 32 39 22 3a 70 3d |# ."F|X229":p=|
|00001590| a5 3a f1 3a 70 61 72 74 | 3d 30 3a 73 61 79 3d a3 |.:.:part|=0:say=.|
|000015a0| 0d 06 2c 09 20 20 20 20 | f5 0d 06 36 2b 20 20 20 |..,. |...6+ |
|000015b0| 20 20 20 70 61 72 74 2b | 3d 31 3a f2 65 72 61 73 | part+|=1:.eras|
|000015c0| 65 28 c2 22 30 30 30 30 | 30 22 2b c3 a2 23 73 66 |e(."0000|0"+..#sf|
|000015d0| 2c 38 29 29 0d 06 40 26 | 20 20 20 20 20 20 64 24 |,8))..@&| d$|
|000015e0| 3d 64 64 24 3a 64 73 69 | 7a 65 3d 28 64 73 69 7a |=dd$:dsi|ze=(dsiz|
|000015f0| 65 2d 31 36 30 29 2a 32 | 35 36 0d 06 4a 2d 20 20 |e-160)*2|56..J- |
|00001600| 20 20 20 20 e7 20 64 73 | 69 7a 65 3e 66 6c 6f 70 | . ds|ize>flop|
|00001610| 70 79 73 69 7a 65 3a 64 | 73 69 7a 65 3d 66 6c 6f |pysize:d|size=flo|
|00001620| 70 70 79 73 69 7a 65 0d | 06 54 1b 20 20 20 20 20 |ppysize.|.T. |
|00001630| 20 e7 20 6c 65 6e 3e 64 | 73 69 7a 65 3a 73 61 79 | . len>d|size:say|
|00001640| 3d b9 0d 06 5e 29 20 20 | 20 20 20 20 70 3d 31 3a |=...^) | p=1:|
|00001650| c8 95 20 64 65 70 74 68 | 3e 70 3a 70 2b 3d 31 3a |.. depth|>p:p+=1:|
|00001660| 64 24 2b 3d 64 69 72 24 | 28 70 29 0d 06 68 4a 20 |d$+=dir$|(p)..hJ |
|00001670| 20 20 20 20 20 20 20 20 | 20 e7 20 63 64 69 72 24 | | . cdir$|
|00001680| 28 70 29 3c 3e 64 69 72 | 24 28 70 29 3a 63 64 69 |(p)<>dir|$(p):cdi|
|00001690| 72 24 28 70 29 3d 64 69 | 72 24 28 70 29 3a c8 99 |r$(p)=di|r$(p):..|
|000016a0| 20 22 4f 53 5f 46 69 6c | 65 22 2c 38 2c 64 24 2c | "OS_Fil|e",8,d$,|
|000016b0| 30 2c 30 2c 30 0d 06 72 | 0f 20 20 20 20 20 20 20 |0,0,0..r|. |
|000016c0| 20 20 20 ce 0d 06 7c 40 | 20 20 20 20 20 20 64 66 | ...|@| df|
|000016d0| 3d ae 28 64 24 2b 22 2e | 22 2b 24 6e 61 6d 65 29 |=.(d$+".|"+$name)|
|000016e0| 3a e7 20 64 66 3d 30 3a | 85 20 30 2c 22 43 61 6e |:. df=0:|. 0,"Can|
|000016f0| 6e 6f 74 20 6f 70 65 6e | 20 64 65 73 74 2e 20 66 |not open| dest. f|
|00001700| 69 6c 65 22 0d 06 86 3e | 20 20 20 20 20 20 e7 20 |ile"...>| . |
|00001710| 6c 65 6e 3e 64 73 69 7a | 65 3a 62 79 74 65 73 3d |len>dsiz|e:bytes=|
|00001720| 64 73 69 7a 65 3a 6c 65 | 6e 2d 3d 62 79 74 65 73 |dsize:le|n-=bytes|
|00001730| 3a 8b 20 62 79 74 65 73 | 3d 6c 65 6e 3a 6c 65 6e |:. bytes|=len:len|
|00001740| 3d 30 0d 06 90 32 20 20 | 20 20 20 20 e7 20 73 61 |=0...2 | . sa|
|00001750| 79 3a f1 22 50 61 72 74 | 20 22 3b bd 28 70 61 72 |y:."Part| ";.(par|
|00001760| 74 2b 36 34 29 2c 62 79 | 74 65 73 3b 22 20 62 79 |t+64),by|tes;" by|
|00001770| 74 65 73 22 0d 06 9a 0b | 20 20 20 20 20 20 f5 0d |tes"....| ..|
|00001780| 06 a4 40 20 20 20 20 20 | 20 20 20 e7 20 62 79 74 |..@ | . byt|
|00001790| 65 73 3e 62 66 72 73 69 | 7a 65 3a 62 3d 62 66 72 |es>bfrsi|ze:b=bfr|
|000017a0| 73 69 7a 65 3a 62 79 74 | 65 73 2d 3d 62 3a 8b 20 |size:byt|es-=b:. |
|000017b0| 62 3d 62 79 74 65 73 3a | 62 79 74 65 73 3d 30 0d |b=bytes:|bytes=0.|
|000017c0| 06 ae 3e 20 20 20 20 20 | 20 20 20 c8 99 20 22 4f |..> | .. "O|
|000017d0| 53 5f 47 42 50 42 22 2c | 34 2c 73 66 2c 62 66 72 |S_GBPB",|4,sf,bfr|
|000017e0| 2c 62 20 b8 2c 2c 2c 78 | 3a e7 20 78 3a 85 20 30 |,b .,,,x|:. x:. 0|
|000017f0| 2c 22 52 65 61 64 20 65 | 72 72 6f 72 22 0d 06 b8 |,"Read e|rror"...|
|00001800| 23 20 20 20 20 20 20 20 | 20 c8 99 20 22 4f 53 5f |# | .. "OS_|
|00001810| 47 42 50 42 22 2c 32 2c | 64 66 2c 62 66 72 2c 62 |GBPB",2,|df,bfr,b|
|00001820| 0d 06 c2 14 20 20 20 20 | 20 20 fd 20 62 79 74 65 |.... | . byte|
|00001830| 73 3c 3d 30 0d 06 cc 13 | 20 20 20 20 20 20 d9 23 |s<=0....| .#|
|00001840| 64 66 3a 64 66 3d 30 0d | 06 d6 40 20 20 20 20 20 |df:df=0.|..@ |
|00001850| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 31 2c | .. "OS_|File",1,|
|00001860| 64 24 2b 22 2e 22 2b 24 | 6e 61 6d 65 2c 66 64 61 |d$+"."+$|name,fda|
|00001870| 74 61 21 34 2c 66 64 61 | 74 61 21 30 2c 30 2c 66 |ta!4,fda|ta!0,0,f|
|00001880| 64 61 74 61 21 31 32 0d | 06 e0 23 20 20 20 20 20 |data!12.|..# |
|00001890| 20 ff 28 22 44 49 53 4d | 4f 55 4e 54 20 22 2b c3 | .("DISM|OUNT "+.|
|000018a0| 64 65 73 74 64 72 69 76 | 65 29 0d 06 ea 3d 20 20 |destdriv|e)...= |
|000018b0| 20 20 20 20 e7 20 6c 65 | 6e 3e 30 3a f1 27 22 49 | . le|n>0:.'"I|
|000018c0| 6e 73 65 72 74 20 6e 65 | 78 74 20 64 69 73 63 20 |nsert ne|xt disc |
|000018d0| 61 6e 64 20 70 72 65 73 | 73 20 61 20 6b 65 79 22 |and pres|s a key"|
|000018e0| 3b 3a 70 3d a5 3a f1 0d | 06 f4 10 20 20 20 20 fd |;:p=.:..|... .|
|000018f0| 20 6c 65 6e 3c 3d 30 0d | 06 fe 13 20 20 20 20 f1 | len<=0.|... .|
|00001900| 22 43 6f 6d 70 6c 65 74 | 65 22 0d 07 08 1a 20 20 |"Complet|e".... |
|00001910| 20 20 d9 23 73 66 3a 73 | 66 3d 30 3a 2a 46 58 32 | .#sf:s|f=0:*FX2|
|00001920| 32 39 20 31 0d 07 12 28 | 20 20 cc 20 f1 27 22 43 |29 1...(| . .'"C|
|00001930| 61 6e 6e 6f 74 20 63 6f | 70 79 2e 20 4e 6f 20 72 |annot co|py. No r|
|00001940| 65 61 64 20 61 63 63 65 | 73 73 2e 22 0d 07 1c 07 |ead acce|ss."....|
|00001950| 20 20 cd 0d 07 26 06 20 | cd 0d 07 30 07 f7 20 85 | ...&. |...0.. .|
|00001960| 0d 07 3a 05 ce 0d 07 44 | 2f f1 27 8a 32 35 29 22 |..:....D|/.'.25)"|
|00001970| 4e 6f 20 6d 6f 72 65 20 | 6f 66 20 74 68 65 20 6c |No more |of the l|
|00001980| 61 72 67 65 72 20 66 69 | 6c 65 73 2e 22 3a 2a 46 |arger fi|les.":*F|
|00001990| 58 32 32 39 0d 07 4e 05 | e1 0d 07 58 04 0d 07 62 |X229..N.|...X...b|
|000019a0| 10 dd 20 f2 65 72 61 73 | 65 28 71 24 29 0d 07 6c |.. .eras|e(q$)..l|
|000019b0| 41 f4 20 20 20 45 72 61 | 73 69 6e 67 20 38 30 30 |A. Era|sing 800|
|000019c0| 20 22 45 22 20 66 6f 72 | 6d 61 74 20 64 69 73 63 | "E" for|mat disc|
|000019d0| 73 20 63 6f 6e 76 65 72 | 74 73 20 74 68 65 6d 20 |s conver|ts them |
|000019e0| 74 6f 20 22 44 22 20 66 | 6f 72 6d 61 74 2e 0d 07 |to "D" f|ormat...|
|000019f0| 76 05 f5 0d 07 80 1d ff | 28 22 44 49 53 4d 4f 55 |v.......|("DISMOU|
|00001a00| 4e 54 20 22 2b c3 64 65 | 73 74 64 72 69 76 65 29 |NT "+.de|stdrive)|
|00001a10| 0d 07 8a 39 c8 99 20 22 | 58 41 44 46 53 5f 44 69 |...9.. "|XADFS_Di|
|00001a20| 73 63 4f 70 22 2c 30 2c | 31 2c 64 65 73 74 64 72 |scOp",0,|1,destdr|
|00001a30| 69 76 65 3c 3c 32 39 2c | 62 66 72 2c 33 30 37 32 |ive<<29,|bfr,3072|
|00001a40| 20 b8 3b 78 3a 6f 6b 3d | a3 0d 07 94 11 e7 20 28 | .;x:ok=|...... (|
|00001a50| 78 20 80 20 31 29 3d 30 | 20 8c 0d 07 9e 3a 20 20 |x . 1)=0| ....: |
|00001a60| 64 73 69 7a 65 3d 62 66 | 72 21 26 46 43 20 80 20 |dsize=bf|r!&FC . |
|00001a70| 26 46 46 46 46 46 46 3a | 6f 6b 3d 28 64 73 69 7a |&FFFFFF:|ok=(dsiz|
|00001a80| 65 3d 26 43 38 30 20 84 | 20 64 73 69 7a 65 3d 26 |e=&C80 .| dsize=&|
|00001a90| 41 30 30 29 0d 07 a8 41 | 20 20 e7 28 62 66 72 21 |A00)...A| .(bfr!|
|00001aa0| 26 31 35 20 80 26 46 46 | 46 46 29 3d 26 43 38 30 |&15 .&FF|FF)=&C80|
|00001ab0| 3a e7 20 62 66 72 21 26 | 38 30 31 3d 26 36 42 36 |:. bfr!&|801=&6B6|
|00001ac0| 33 36 39 34 45 3a 64 73 | 69 7a 65 3d 26 43 38 30 |3694E:ds|ize=&C80|
|00001ad0| 3a 6f 6b 3d b9 0d 07 b2 | 07 20 20 cd 0d 07 bc 3b |:ok=....|. ....;|
|00001ae0| e7 20 ac 20 6f 6b 3a f1 | 27 22 42 61 64 20 64 69 |. . ok:.|'"Bad di|
|00001af0| 73 63 20 73 69 7a 65 2e | 20 52 65 70 6c 61 63 65 |sc size.| Replace|
|00001b00| 20 61 6e 64 20 70 72 65 | 73 73 20 61 20 6b 65 79 | and pre|ss a key|
|00001b10| 22 3b 3a e7 a5 3a f1 0d | 07 c6 08 fd 20 6f 6b 0d |";:..:..|.... ok.|
|00001b20| 07 d0 20 e3 20 78 3d 62 | 66 72 20 b8 20 62 66 72 |.. . x=b|fr . bfr|
|00001b30| 2b 33 30 36 38 20 88 34 | 3a 21 78 3d 30 3a ed 0d |+3068 .4|:!x=0:..|
|00001b40| 07 da 44 62 66 72 3f 30 | 3d 26 43 3a 62 66 72 3f |..Dbfr?0|=&C:bfr?|
|00001b50| 26 46 37 3d 26 34 32 3a | 62 66 72 21 26 46 38 3d |&F7=&42:|bfr!&F8=|
|00001b60| 26 32 30 35 46 35 35 34 | 33 3a 62 66 72 21 26 46 |&205F554|3:bfr!&F|
|00001b70| 43 3d 26 46 32 30 30 30 | 30 30 30 20 84 20 64 73 |C=&F2000|000 . ds|
|00001b80| 69 7a 65 0d 07 e4 43 62 | 66 72 21 26 31 30 30 3d |ize...Cb|fr!&100=|
|00001b90| 26 43 37 34 3a 62 66 72 | 21 26 31 46 36 3d 26 32 |&C74:bfr|!&1F6=&2|
|00001ba0| 30 35 30 34 42 34 31 3a | 62 66 72 3f 26 31 46 41 |0504B41:|bfr?&1FA|
|00001bb0| 3d 26 32 30 3a 62 66 72 | 21 26 31 46 42 3d b3 28 |=&20:bfr|!&1FB=.(|
|00001bc0| 26 46 46 46 46 29 0d 07 | ee 32 e7 20 64 73 69 7a |&FFFF)..|.2. dsiz|
|00001bd0| 65 3d 26 41 30 30 3a 62 | 66 72 3f 30 3d 37 3a 62 |e=&A00:b|fr?0=7:b|
|00001be0| 66 72 3f 26 46 46 3d 26 | 36 42 3a 62 66 72 21 26 |fr?&FF=&|6B:bfr!&|
|00001bf0| 31 30 30 3d 26 39 46 39 | 0d 07 f8 1b e7 20 70 61 |100=&9F9|..... pa|
|00001c00| 72 74 3a 62 66 72 3f 26 | 31 46 39 3d 36 34 2b 70 |rt:bfr?&|1F9=64+p|
|00001c10| 61 72 74 0d 08 02 14 62 | 66 72 3f 26 31 46 45 3d |art....b|fr?&1FE=|
|00001c20| 33 3a 70 3d 26 46 46 0d | 08 0c 52 e3 20 78 3d 62 |3:p=&FF.|..R. x=b|
|00001c30| 66 72 2b 26 31 46 45 20 | b8 20 62 66 72 2b 26 31 |fr+&1FE |. bfr+&1|
|00001c40| 30 31 20 88 2d 31 3a 70 | 2b 3d 3f 78 3a 70 2d 3d |01 .-1:p|+=?x:p-=|
|00001c50| 28 70 3e 32 35 35 29 3a | 70 3d 70 20 80 32 35 35 |(p>255):|p=p .255|
|00001c60| 3a ed 3a 70 2b 3d 62 66 | 72 3f 26 31 30 30 3a 62 |:.:p+=bf|r?&100:b|
|00001c70| 66 72 3f 26 31 46 46 3d | 70 0d 08 16 12 e7 20 64 |fr?&1FF=|p..... d|
|00001c80| 73 69 7a 65 3d 26 43 38 | 30 20 8c 0d 08 20 2b 20 |size=&C8|0 ... + |
|00001c90| 20 62 66 72 21 26 34 30 | 31 3d 26 36 46 36 37 37 | bfr!&40|1=&6F677|
|00001ca0| 35 34 38 3a 62 66 72 21 | 26 42 44 41 3d 26 32 34 |548:bfr!|&BDA=&24|
|00001cb0| 30 30 30 30 30 34 0d 08 | 2a 39 20 20 62 66 72 3f |000004..|*9 bfr?|
|00001cc0| 26 42 46 30 3d 26 32 34 | 3a 62 66 72 3f 26 42 46 |&BF0=&24|:bfr?&BF|
|00001cd0| 42 3d 26 34 38 3a 62 66 | 72 21 26 42 46 43 3d 26 |B=&48:bf|r!&BFC=&|
|00001ce0| 32 43 36 46 36 37 37 35 | 3a 6b 3d 33 30 37 32 0d |2C6F6775|:k=3072.|
|00001cf0| 08 34 07 20 20 cc 0d 08 | 3e 38 20 20 62 66 72 21 |.4. ...|>8 bfr!|
|00001d00| 26 32 30 31 3d 26 36 46 | 36 37 37 35 34 38 3a 62 |&201=&6F|677548:b|
|00001d10| 66 72 21 26 36 44 36 3d | 26 32 34 30 30 30 30 30 |fr!&6D6=|&2400000|
|00001d20| 32 3a 62 66 72 3f 26 36 | 43 43 3d 26 32 34 0d 08 |2:bfr?&6|CC=&24..|
|00001d30| 48 2d 20 20 62 66 72 21 | 26 36 46 42 3d 26 34 38 |H- bfr!|&6FB=&48|
|00001d40| 3a 62 66 72 21 26 36 46 | 43 3d 26 45 46 36 46 36 |:bfr!&6F|C=&EF6F6|
|00001d50| 37 37 35 3a 6b 3d 37 2a | 32 35 36 0d 08 52 07 20 |775:k=7*|256..R. |
|00001d60| 20 cd 0d 08 5c 5c e7 20 | 65 72 61 73 65 69 74 3a | ...\\. |eraseit:|
|00001d70| c8 99 20 22 41 44 46 53 | 5f 44 69 73 63 4f 70 22 |.. "ADFS|_DiscOp"|
|00001d80| 2c 30 2c 32 2c 64 65 73 | 74 64 72 69 76 65 3c 3c |,0,2,des|tdrive<<|
|00001d90| 32 39 2c 62 66 72 2c 6b | 3a 8b 20 ff 28 22 4e 41 |29,bfr,k|:. .("NA|
|00001da0| 4d 45 44 49 53 43 20 22 | 2b c3 64 65 73 74 64 72 |MEDISC "|+.destdr|
|00001db0| 69 76 65 2b 22 20 42 41 | 43 4b 55 50 22 29 0d 08 |ive+" BA|CKUP")..|
|00001dc0| 5d 0d 2a 44 49 53 4d 4f | 55 4e 54 0d 08 66 1a ff |].*DISMO|UNT..f..|
|00001dd0| 28 22 4d 4f 55 4e 54 20 | 22 2b c3 64 65 73 74 64 |("MOUNT |"+.destd|
|00001de0| 72 69 76 65 29 0d 08 70 | 1d ff 28 22 54 49 54 4c |rive)..p|..("TITL|
|00001df0| 45 20 46 69 6c 65 6c 65 | 6e 67 74 68 5f 22 2b 71 |E Filele|ngth_"+q|
|00001e00| 24 29 0d 08 7a 1d ff 28 | 22 44 49 53 4d 4f 55 4e |$)..z..(|"DISMOUN|
|00001e10| 54 20 22 2b c3 64 65 73 | 74 64 72 69 76 65 29 0d |T "+.des|tdrive).|
|00001e20| 08 84 0e 63 64 69 72 24 | 28 29 3d 22 22 0d 08 8e |...cdir$|()=""...|
|00001e30| 05 e1 0d 08 98 04 0d 08 | a2 09 dd 20 f2 73 66 0d |........|... .sf.|
|00001e40| 08 ac 46 e7 20 6c 66 69 | 6c 65 73 3d 30 3a f1 27 |..F. lfi|les=0:.'|
|00001e50| 22 42 61 63 6b 69 6e 67 | 20 75 70 20 66 72 6f 6d |"Backing| up from|
|00001e60| 20 22 3b 73 6f 75 72 63 | 65 73 70 65 63 24 3b 22 | ";sourc|espec$;"|
|00001e70| 20 74 6f 20 64 72 69 76 | 65 20 22 3b 64 65 73 74 | to driv|e ";dest|
|00001e80| 64 72 69 76 65 0d 08 b6 | 07 ea 20 85 0d 08 c0 65 |drive...|.. ....e|
|00001e90| ee 20 85 20 ea 3a f2 63 | 6c 6f 73 65 3a e7 20 9f |. . .:.c|lose:. .|
|00001ea0| 3c 3e 31 37 3a f1 f6 24 | 27 27 22 52 65 73 74 61 |<>17:..$|''"Resta|
|00001eb0| 72 74 69 6e 67 20 74 68 | 69 73 20 67 72 6f 75 70 |rting th|is group|
|00001ec0| 20 77 69 74 68 20 63 6f | 6e 66 69 72 6d 61 74 69 | with co|nfirmati|
|00001ed0| 6f 6e 22 3a 63 6f 6e 66 | 69 72 6d 3d b9 3a 8b 20 |on":conf|irm=.:. |
|00001ee0| f7 20 85 3a 85 20 31 37 | 2c 22 45 73 63 61 70 65 |. .:. 17|,"Escape|
|00001ef0| 22 0d 08 ca 42 f1 27 8a | 31 35 29 22 49 6e 73 65 |"...B.'.|15)"Inse|
|00001f00| 72 74 20 61 20 64 69 73 | 63 20 66 6f 72 20 73 6d |rt a dis|c for sm|
|00001f10| 61 6c 6c 65 72 20 66 69 | 6c 65 73 20 61 6e 64 20 |aller fi|les and |
|00001f20| 70 72 65 73 73 20 61 20 | 6b 65 79 20 22 3b 3a e7 |press a |key ";:.|
|00001f30| a5 3a f1 0d 08 d4 1a 65 | 72 61 73 65 69 74 3d 65 |.:.....e|raseit=e|
|00001f40| 72 61 73 65 5f 73 66 5f | 64 69 73 63 73 0d 08 de |rase_sf_|discs...|
|00001f50| 1c 70 61 72 74 3d 30 3a | f2 65 72 61 73 65 28 22 |.part=0:|.erase("|
|00001f60| 76 61 72 69 6f 75 73 22 | 29 0d 08 e8 47 64 65 70 |various"|)...Gdep|
|00001f70| 74 68 3d 31 3a e3 20 78 | 3d 32 20 b8 20 6d 61 78 |th=1:. x|=2 . max|
|00001f80| 64 65 70 74 68 3a 6f 66 | 73 28 78 29 3d 30 3a 64 |depth:of|s(x)=0:d|
|00001f90| 69 72 24 28 78 29 3d 22 | 22 3a 63 64 69 72 24 28 |ir$(x)="|":cdir$(|
|00001fa0| 78 29 3d 22 22 3a ed 3a | 6f 66 73 28 31 29 3d 30 |x)="":.:|ofs(1)=0|
|00001fb0| 0d 08 f2 13 c8 95 20 a4 | 6e 65 78 74 66 69 6c 65 |...... .|nextfile|
|00001fc0| 28 31 29 0d 08 fc 0c 20 | 64 3d a4 74 65 73 74 0d |(1).... |d=.test.|
|00001fd0| 09 06 0c 20 e7 20 64 3d | 30 20 8c 0d 09 10 29 20 |... . d=|0 ....) |
|00001fe0| 20 f1 22 42 61 63 6b 69 | 6e 67 20 75 70 20 22 3b | ."Backi|ng up ";|
|00001ff0| c6 8e 28 64 69 72 24 28 | 29 29 3b 22 2e 22 3b 24 |..(dir$(|));".";$|
|00002000| 6e 61 6d 65 0d 09 1a 3a | 20 20 e7 20 63 6f 6e 66 |name...:| . conf|
|00002010| 69 72 6d 3a e7 20 a4 79 | 6e 28 22 54 72 61 6e 73 |irm:. .y|n("Trans|
|00002020| 66 65 72 20 74 68 69 73 | 20 66 69 6c 65 22 29 3c |fer this| file")<|
|00002030| 3e 97 22 59 22 3a 61 63 | 63 65 73 73 3d 31 0d 09 |>."Y":ac|cess=1..|
|00002040| 24 12 20 20 e7 20 61 63 | 63 65 73 73 3d b9 20 8c |$. . ac|cess=. .|
|00002050| 0d 09 2e 22 20 20 20 20 | 73 66 3d 8e 28 c6 8e 28 |..." |sf=.(..(|
|00002060| 64 69 72 24 28 29 29 2b | 22 2e 22 2b 24 6e 61 6d |dir$())+|"."+$nam|
|00002070| 65 29 0d 09 38 33 20 20 | 20 20 e7 20 73 66 3a 6c |e)..83 | . sf:l|
|00002080| 65 6e 3d a2 23 73 66 3a | 8b 20 85 20 30 2c 22 43 |en=.#sf:|. . 0,"C|
|00002090| 61 6e 6e 6f 74 20 6f 70 | 65 6e 20 74 68 69 73 20 |annot op|en this |
|000020a0| 66 69 6c 65 22 0d 09 42 | 0b 20 20 20 20 ea 20 85 |file"..B|. . .|
|000020b0| 0d 09 4c 30 20 20 20 20 | ee 20 85 20 ea 3a f2 6e |..L0 |. . .:.n|
|000020c0| 65 78 74 64 69 73 63 3a | e7 20 9f 3d 31 37 3a f7 |extdisc:|. .=17:.|
|000020d0| 20 85 3a 85 20 31 37 2c | 22 45 73 63 61 70 65 22 | .:. 17,|"Escape"|
|000020e0| 0d 09 56 1d 20 20 20 20 | 64 24 3d 64 64 24 3a 64 |..V. |d$=dd$:d|
|000020f0| 66 3d 30 3a 62 79 74 65 | 73 3d 6c 65 6e 0d 09 60 |f=0:byte|s=len..`|
|00002100| 27 20 20 20 20 70 3d 31 | 3a c8 95 20 64 65 70 74 |' p=1|:.. dept|
|00002110| 68 3e 70 3a 70 2b 3d 31 | 3a 64 24 2b 3d 64 69 72 |h>p:p+=1|:d$+=dir|
|00002120| 24 28 70 29 0d 09 6a 48 | 20 20 20 20 20 20 20 20 |$(p)..jH| |
|00002130| e7 20 63 64 69 72 24 28 | 70 29 3c 3e 64 69 72 24 |. cdir$(|p)<>dir$|
|00002140| 28 70 29 3a 63 64 69 72 | 24 28 70 29 3d 64 69 72 |(p):cdir|$(p)=dir|
|00002150| 24 28 70 29 3a c8 99 20 | 22 4f 53 5f 46 69 6c 65 |$(p):.. |"OS_File|
|00002160| 22 2c 38 2c 64 24 2c 30 | 2c 30 2c 30 0d 09 74 0d |",8,d$,0|,0,0..t.|
|00002170| 20 20 20 20 20 20 20 20 | ce 0d 09 7e 2f 20 20 20 | |...~/ |
|00002180| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 37 2c | .. "OS_|File",7,|
|00002190| 64 24 2b 22 2e 22 2b 24 | 6e 61 6d 65 2c 30 2c 30 |d$+"."+$|name,0,0|
|000021a0| 2c 30 2c 62 79 74 65 73 | 0d 09 88 3e 20 20 20 20 |,0,bytes|...> |
|000021b0| 64 66 3d ae 28 64 24 2b | 22 2e 22 2b 24 6e 61 6d |df=.(d$+|"."+$nam|
|000021c0| 65 29 3a e7 20 64 66 3d | 30 3a 85 20 30 2c 22 43 |e):. df=|0:. 0,"C|
|000021d0| 61 6e 6e 6f 74 20 6f 70 | 65 6e 20 64 65 73 74 2e |annot op|en dest.|
|000021e0| 20 66 69 6c 65 22 0d 09 | 92 0b 20 20 20 20 20 20 | file"..|.. |
|000021f0| f5 0d 09 9c 40 20 20 20 | 20 20 20 20 20 e7 20 62 |....@ | . b|
|00002200| 79 74 65 73 3e 62 66 72 | 73 69 7a 65 3a 62 3d 62 |ytes>bfr|size:b=b|
|00002210| 66 72 73 69 7a 65 3a 62 | 79 74 65 73 2d 3d 62 3a |frsize:b|ytes-=b:|
|00002220| 8b 20 62 3d 62 79 74 65 | 73 3a 62 79 74 65 73 3d |. b=byte|s:bytes=|
|00002230| 30 0d 09 a6 3e 20 20 20 | 20 20 20 20 20 c8 99 20 |0...> | .. |
|00002240| 22 4f 53 5f 47 42 50 42 | 22 2c 34 2c 73 66 2c 62 |"OS_GBPB|",4,sf,b|
|00002250| 66 72 2c 62 20 b8 2c 2c | 2c 78 3a e7 20 78 3a 85 |fr,b .,,|,x:. x:.|
|00002260| 20 30 2c 22 52 65 61 64 | 20 65 72 72 6f 72 22 0d | 0,"Read| error".|
|00002270| 09 b0 23 20 20 20 20 20 | 20 20 20 c8 99 20 22 4f |..# | .. "O|
|00002280| 53 5f 47 42 50 42 22 2c | 32 2c 64 66 2c 62 66 72 |S_GBPB",|2,df,bfr|
|00002290| 2c 62 0d 09 ba 13 20 20 | 20 20 20 20 fd 20 62 79 |,b.... | . by|
|000022a0| 74 65 73 3d 30 0d 09 c4 | 0b 20 20 20 20 f7 20 85 |tes=0...|. . .|
|000022b0| 0d 09 ce 11 20 20 20 20 | d9 23 64 66 3a 64 66 3d |.... |.#df:df=|
|000022c0| 30 0d 09 d8 3e 20 20 20 | 20 c8 99 20 22 4f 53 5f |0...> | .. "OS_|
|000022d0| 46 69 6c 65 22 2c 31 2c | 64 24 2b 22 2e 22 2b 24 |File",1,|d$+"."+$|
|000022e0| 6e 61 6d 65 2c 66 64 61 | 74 61 21 34 2c 66 64 61 |name,fda|ta!4,fda|
|000022f0| 74 61 21 30 2c 30 2c 66 | 64 61 74 61 21 31 32 0d |ta!0,0,f|data!12.|
|00002300| 09 e2 11 20 20 20 20 d9 | 23 73 66 3a 73 66 3d 30 |... .|#sf:sf=0|
|00002310| 0d 09 ec 32 20 20 cc 20 | e7 20 61 63 63 65 73 73 |...2 . |. access|
|00002320| 3d 30 3a f1 22 43 61 6e | 6e 6f 74 20 63 6f 70 79 |=0:."Can|not copy|
|00002330| 2e 20 4e 6f 20 72 65 61 | 64 20 61 63 63 65 73 73 |. No rea|d access|
|00002340| 2e 22 0d 09 f6 07 20 20 | cd 0d 0a 00 06 20 cd 0d |.".... |..... ..|
|00002350| 0a 0a 05 ce 0d 0a 14 1d | ff 28 22 44 49 53 4d 4f |........|.("DISMO|
|00002360| 55 4e 54 20 22 2b c3 64 | 65 73 74 64 72 69 76 65 |UNT "+.d|estdrive|
|00002370| 29 0d 0a 1e 07 f7 20 85 | 0d 0a 28 05 e1 0d 0a 32 |)..... .|..(....2|
|00002380| 04 0d 0a 3c 0f dd 20 f2 | 6e 65 78 74 64 69 73 63 |...<.. .|nextdisc|
|00002390| 0d 0a 46 08 f1 27 f6 24 | 0d 0a 50 33 e7 20 64 66 |..F..'.$|..P3. df|
|000023a0| 3a d9 23 64 66 3a 64 66 | 3d 30 3a ff 28 22 52 45 |:.#df:df|=0:.("RE|
|000023b0| 4d 4f 56 45 20 22 2b 64 | 24 2b 22 2e 22 2b 24 6e |MOVE "+d|$+"."+$n|
|000023c0| 61 6d 65 29 3a cf 23 73 | 66 3d 30 0d 0a 5a 0c e7 |ame):.#s|f=0..Z..|
|000023d0| 20 9f 3d 31 37 3a e1 0d | 0a 64 35 f1 27 8a 32 35 | .=17:..|.d5.'.25|
|000023e0| 29 22 49 6e 73 65 72 74 | 20 61 6e 6f 74 68 65 72 |)"Insert| another|
|000023f0| 20 64 69 73 63 20 61 6e | 64 20 70 72 65 73 73 20 | disc an|d press |
|00002400| 61 20 6b 65 79 22 3b 3a | e7 a5 3a f1 0d 0a 6e 15 |a key";:|..:...n.|
|00002410| f2 65 72 61 73 65 28 22 | 76 61 72 69 6f 75 73 22 |.erase("|various"|
|00002420| 29 0d 0a 78 05 e1 0d 0a | 82 04 0d 0a 8c 0d dd 20 |)..x....|....... |
|00002430| f2 70 61 72 61 6d 73 0d | 0a 96 3e 70 66 3d 8e 22 |.params.|..>pf=."|
|00002440| 3c 48 44 42 24 44 69 72 | 3e 2e 21 50 61 72 61 6d |<HDB$Dir|>.!Param|
|00002450| 65 74 65 72 22 3a e7 20 | 70 66 3d 30 3a 85 20 30 |eter":. |pf=0:. 0|
|00002460| 2c 22 4e 6f 20 21 50 61 | 72 61 6d 65 74 65 72 20 |,"No !Pa|rameter |
|00002470| 66 69 6c 65 22 0d 0a a0 | 37 65 72 61 73 65 5f 73 |file"...|7erase_s|
|00002480| 66 5f 64 69 73 63 73 3d | 9a 23 70 66 3a 64 65 73 |f_discs=|.#pf:des|
|00002490| 74 64 72 69 76 65 3d 9a | 23 70 66 3a 73 6f 75 72 |tdrive=.|#pf:sour|
|000024a0| 63 65 73 70 65 63 24 3d | be 23 70 66 0d 0a aa 2f |cespec$=|.#pf.../|
|000024b0| e8 23 70 66 2c 6c 69 6d | 73 69 7a 65 3a 6c 69 6d |.#pf,lim|size:lim|
|000024c0| 73 69 7a 65 3d 6c 69 6d | 73 69 7a 65 2a 31 30 32 |size=lim|size*102|
|000024d0| 34 3a d9 23 70 66 3a 70 | 66 3d 30 0d 0a b4 05 e1 |4:.#pf:p|f=0.....|
|000024e0| 0d 0a be 04 0d 0a c8 0c | dd 20 f2 63 6c 6f 73 65 |........|. .close|
|000024f0| 0d 0a d2 12 e7 20 64 66 | 3a d9 23 64 66 3a 64 66 |..... df|:.#df:df|
|00002500| 3d 30 0d 0a dc 12 e7 20 | 73 66 3a d9 23 73 66 3a |=0..... |sf:.#sf:|
|00002510| 73 66 3d 30 0d 0a e6 12 | e7 20 70 66 3a d9 23 70 |sf=0....|. pf:.#p|
|00002520| 66 3a 70 66 3d 30 0d 0a | f0 05 e1 0d 0a fa 04 0d |f:pf=0..|........|
|00002530| 0b 04 0d dd 20 f2 65 6e | 64 28 66 29 0d 0b 0e 1b |.... .en|d(f)....|
|00002540| f2 63 6c 6f 73 65 3a 40 | 25 3d 26 39 30 41 3a 2a |.close:@|%=&90A:*|
|00002550| 46 58 32 32 39 20 31 0d | 0b 18 1d e7 20 66 3d 31 |FX229 1.|.... f=1|
|00002560| 3a f1 27 8a 32 37 29 22 | 46 69 6e 69 73 68 65 64 |:.'.27)"|Finished|
|00002570| 2e 20 22 3b 0d 0b 22 2a | e7 20 66 3d 32 3a f1 27 |. ";.."*|. f=2:.'|
|00002580| f6 24 3b 3a e7 20 9f 3c | 3e 31 37 3a f1 22 20 20 |.$;:. .<|>17:." |
|00002590| 61 74 20 6c 69 6e 65 20 | 22 3b 9e 20 8b f1 0d 0b |at line |";. ....|
|000025a0| 2c 1d f1 22 50 72 65 73 | 73 20 61 20 6b 65 79 20 |,.."Pres|s a key |
|000025b0| 22 3b 3a e7 a5 3a ef 32 | 36 3a db 0d 0b 36 0e ee |";:..:.2|6:...6..|
|000025c0| 20 85 20 e5 20 8d 44 4a | 4b 0d 0b 40 0d 2a 44 49 | . . .DJ|K..@.*DI|
|000025d0| 53 4d 4f 55 4e 54 0d 0b | 4a 09 ee 20 85 20 87 0d |SMOUNT..|J.. . ..|
|000025e0| 0b 54 30 c8 99 20 22 4f | 53 5f 42 79 74 65 22 2c |.T0.. "O|S_Byte",|
|000025f0| 31 36 31 2c 31 31 20 b8 | 2c 2c 64 3a ff 28 22 44 |161,11 .|,,d:.("D|
|00002600| 52 49 56 45 20 22 2b c3 | 28 64 20 80 37 29 29 0d |RIVE "+.|(d .7)).|
|00002610| 0b 5e 0a 2a 46 58 32 32 | 39 0d 0b 68 05 e0 0d 0b |.^.*FX22|9..h....|
|00002620| 72 04 0d 0b 7c 0c dd 20 | a4 63 68 65 63 6b 0d 0b |r...|.. |.check..|
|00002630| 86 38 c8 99 20 22 58 4f | 53 5f 52 65 61 64 56 61 |.8.. "XO|S_ReadVa|
|00002640| 72 56 61 6c 22 2c 22 48 | 44 42 24 44 69 72 22 2c |rVal","H|DB$Dir",|
|00002650| 62 66 72 2c 39 39 2c 30 | 20 b8 2c 2c 52 32 2c 52 |bfr,99,0| .,,R2,R|
|00002660| 33 3b 66 6c 61 67 0d 0b | 90 54 e7 28 66 6c 61 67 |3;flag..|.T.(flag|
|00002670| 20 80 20 31 29 84 20 52 | 32 3c 31 3a db 3a f1 27 | . 1). R|2<1:.:.'|
|00002680| 27 22 55 73 65 20 74 68 | 69 73 20 70 72 6f 67 72 |'"Use th|is progr|
|00002690| 61 6d 20 6f 6e 6c 79 20 | 76 69 61 20 74 68 65 20 |am only |via the |
|000026a0| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 28 21 48 44 |applicat|ion (!HD|
|000026b0| 42 61 63 6b 75 70 29 22 | 3a e0 0d 0b 9a 0d 62 66 |Backup)"|:.....bf|
|000026c0| 72 21 52 32 3d 31 33 0d | 0b a4 09 3d 24 62 66 72 |r!R2=13.|...=$bfr|
|000026d0| 0d 0b ae 04 0d 0b b8 0b | dd 20 f2 70 72 6f 6e 0d |........|. .pron.|
|000026e0| 0b c2 0e db 3a 87 3a 70 | 62 3d 96 2d 34 0d 0b cc |....:.:p|b=.-4...|
|000026f0| 29 ef 32 2c 31 2c 32 37 | 2c 31 2c 30 2c 31 2c 32 |).2,1,27|,1,0,1,2|
|00002700| 37 2c 31 2c 30 2c 31 2c | 32 37 2c 31 2c 30 2c 33 |7,1,0,1,|27,1,0,3|
|00002710| 3a c8 96 3a c8 96 0d 0b | d6 33 c8 95 20 70 62 3e |:..:....|.3.. pb>|
|00002720| 96 2d 34 3a f1 8a 32 38 | 2c 31 35 29 22 50 6c 65 |.-4:..28|,15)"Ple|
|00002730| 61 73 65 20 73 77 69 74 | 63 68 20 70 72 69 6e 74 |ase swit|ch print|
|00002740| 65 72 20 6f 6e 22 3b 3a | ce 0d 0b e0 0f f1 8a 32 |er on";:|.......2|
|00002750| 38 2c 31 35 29 89 33 30 | 0d 0b ea 08 ee 3a ef 32 |8,15).30|.....:.2|
|00002760| 0d 0b f4 05 e1 0d ff 46 | 69 6c 65 44 61 74 61 82 |.......F|ileData.|
|00002770| 21 48 64 72 5f 76 32 30 | 30 00 ff 8c 13 00 00 41 |!Hdr_v20|0......A|
|00002780| fb ff ff 48 65 4b a7 03 | 00 af 3f 0d 00 0a 3f f4 |...HeK..|..?...?.|
|00002790| 20 3e 20 24 2e 21 48 44 | 42 61 63 6b 75 70 2e 21 | > $.!HD|Backup.!|
|000027a0| 48 64 72 5f 76 32 30 30 | 20 20 20 20 52 65 73 74 |Hdr_v200| Rest|
|000027b0| 6f 72 65 73 20 66 69 6c | 65 73 20 74 6f 20 61 20 |ores fil|es to a |
|000027c0| 68 61 72 64 20 64 69 73 | 63 2e 0d 00 14 4a f4 20 |hard dis|c....J. |
|000027d0| 20 20 20 54 65 72 72 79 | 20 42 72 6f 6d 69 6c 6f | Terry| Bromilo|
|000027e0| 77 2c 20 20 31 37 20 4d | 61 79 20 31 39 38 38 20 |w, 17 M|ay 1988 |
|000027f0| 20 20 76 65 72 73 69 6f | 6e 20 32 2e 30 30 20 28 | versio|n 2.00 (|
|00002800| 52 49 53 43 5f 4f 53 29 | 20 32 38 20 41 70 72 20 |RISC_OS)| 28 Apr |
|00002810| 31 39 38 39 0d 00 1e 26 | f4 20 4e 6f 20 64 69 73 |1989...&|. No dis|
|00002820| 63 2d 65 72 61 73 69 6e | 67 20 69 6e 20 74 68 69 |c-erasin|g in thi|
|00002830| 73 20 70 72 6f 67 72 61 | 6d 21 0d 00 28 04 0d 00 |s progra|m!..(...|
|00002840| 32 33 6d 61 78 64 65 70 | 74 68 3d 32 30 20 20 20 |23maxdep|th=20 |
|00002850| 20 20 20 20 20 20 20 20 | 3a f4 20 6e 65 73 74 69 | |:. nesti|
|00002860| 6e 67 20 6f 66 20 64 69 | 72 65 63 74 6f 72 69 65 |ng of di|rectorie|
|00002870| 73 0d 00 3c 04 0d 00 46 | 3e de 20 66 64 61 74 61 |s..<...F|>. fdata|
|00002880| 20 33 32 2c 20 64 69 72 | 24 28 6d 61 78 64 65 70 | 32, dir|$(maxdep|
|00002890| 74 68 29 2c 20 63 64 69 | 72 24 28 6d 61 78 64 65 |th), cdi|r$(maxde|
|000028a0| 70 74 68 29 2c 20 6f 66 | 73 28 6d 61 78 64 65 70 |pth), of|s(maxdep|
|000028b0| 74 68 29 0d 00 50 1b 6e | 61 6d 65 3d 66 64 61 74 |th)..P.n|ame=fdat|
|000028c0| 61 2b 32 30 3a 64 66 3d | 30 3a 73 66 3d 30 0d 00 |a+20:df=|0:sf=0..|
|000028d0| 5a 33 62 66 72 73 69 7a | 65 3d 28 93 2d b8 50 2d |Z3bfrsiz|e=(.-.P-|
|000028e0| 37 30 30 30 29 80 20 26 | 46 46 46 46 46 43 30 30 |7000). &|FFFFFC00|
|000028f0| 3a e7 20 62 66 72 73 69 | 7a 65 3c 34 30 39 36 3a |:. bfrsi|ze<4096:|
|00002900| fa 0d 00 64 11 de 20 62 | 66 72 20 62 66 72 73 69 |...d.. b|fr bfrsi|
|00002910| 7a 65 0d 00 6e 0f 48 44 | 42 24 3d a4 63 68 65 63 |ze..n.HD|B$=.chec|
|00002920| 6b 0d 00 78 04 0d 00 82 | 0f ee 20 85 20 f2 65 6e |k..x....|.. . .en|
|00002930| 64 28 32 29 0d 00 8c 0b | f2 70 61 72 61 6d 73 0d |d(2)....|.params.|
|00002940| 00 96 14 eb 20 30 3a fb | 30 2c 30 2c 26 38 30 2c |.... 0:.|0,0,&80,|
|00002950| 26 36 30 0d 00 a0 2a 40 | 25 3d 26 39 30 41 3a 6e |&60...*@|%=&90A:n|
|00002960| 3d 31 32 2d 28 a9 64 65 | 73 74 73 70 65 63 24 20 |=12-(.de|stspec$ |
|00002970| 81 32 29 3a e7 20 6e 3c | 30 3a 6e 3d 30 0d 00 aa |.2):. n<|0:n=0...|
|00002980| 34 f1 8a 36 2c 33 29 22 | 54 68 69 73 20 70 72 6f |4..6,3)"|This pro|
|00002990| 67 72 61 6d 20 72 65 73 | 74 6f 72 65 73 20 6c 61 |gram res|tores la|
|000029a0| 72 67 65 20 66 69 6c 65 | 73 20 66 72 6f 6d 20 22 |rge file|s from "|
|000029b0| 3b 0d 00 b4 33 f1 22 73 | 65 74 73 20 6f 66 20 66 |;...3."s|ets of f|
|000029c0| 6c 6f 70 70 79 20 64 69 | 73 63 73 20 28 64 72 69 |loppy di|scs (dri|
|000029d0| 76 65 20 22 3b 73 6f 75 | 72 63 65 64 72 69 76 65 |ve ";sou|rcedrive|
|000029e0| 3b 22 29 22 0d 00 be 2c | f1 8a 6e 2c 35 29 22 74 |;")"...,|..n,5)"t|
|000029f0| 6f 20 61 20 68 61 72 64 | 20 64 69 73 63 20 28 22 |o a hard| disc ("|
|00002a00| 3b 64 65 73 74 73 70 65 | 63 24 3b 22 29 2e 22 3b |;destspe|c$;").";|
|00002a10| 0d 00 c8 34 f1 22 20 43 | 61 6e 20 61 6c 73 6f 20 |...4." C|an also |
|00002a20| 62 65 20 75 73 65 64 20 | 74 6f 20 72 65 73 74 6f |be used |to resto|
|00002a30| 72 65 20 61 6e 79 20 66 | 69 6c 65 73 2e 22 27 27 |re any f|iles."''|
|00002a40| 27 27 27 27 0d 00 d2 04 | 0d 00 dc 05 f5 0d 00 e6 |''''....|........|
|00002a50| 16 20 6d 75 6c 74 69 3d | 30 3a 63 6f 6e 66 69 72 |. multi=|0:confir|
|00002a60| 6d 3d b9 0d 00 f0 2e 20 | f2 67 65 74 64 69 73 63 |m=..... |.getdisc|
|00002a70| 28 31 29 3a e7 20 70 61 | 72 74 3d 2d 31 3a f2 61 |(1):. pa|rt=-1:.a|
|00002a80| 73 6b 28 6d 75 6c 74 69 | 2c 63 6f 6e 66 69 72 6d |sk(multi|,confirm|
|00002a90| 29 0d 00 fa 06 20 f5 0d | 01 04 1c 20 20 e7 20 6d |).... ..|... . m|
|00002aa0| 75 6c 74 69 3a 6e 3d a4 | 6e 65 78 74 66 69 6c 65 |ulti:n=.|nextfile|
|00002ab0| 28 31 29 0d 01 0e 41 20 | 20 6c 64 61 64 64 72 3d |(1)...A | ldaddr=|
|00002ac0| 66 64 61 74 61 21 30 3a | 65 78 61 64 64 72 3d 66 |fdata!0:|exaddr=f|
|00002ad0| 64 61 74 61 21 34 3a 61 | 74 74 72 3d 66 64 61 74 |data!4:a|ttr=fdat|
|00002ae0| 61 21 31 32 3a 72 24 3d | 22 52 65 73 74 6f 72 69 |a!12:r$=|"Restori|
|00002af0| 6e 67 20 22 0d 01 18 09 | 20 20 ea 20 85 0d 01 22 |ng "....| . ..."|
|00002b00| 28 20 20 ee 20 85 20 ea | 3a f2 63 6c 6f 73 65 3a |( . . .|:.close:|
|00002b10| f1 27 f6 24 3a 72 24 3d | 22 52 65 73 74 61 72 74 |.'.$:r$=|"Restart|
|00002b20| 69 6e 67 20 22 0d 01 2c | 34 20 20 73 66 6e 61 6d |ing "..,|4 sfnam|
|00002b30| 65 24 3d c6 8e 28 64 69 | 72 24 28 29 29 2b 22 2e |e$=..(di|r$())+".|
|00002b40| 22 2b 24 6e 61 6d 65 3a | 74 6f 74 6c 65 6e 3d 66 |"+$name:|totlen=f|
|00002b50| 6c 65 6e 3a 73 65 71 3d | 31 0d 01 36 13 20 20 64 |len:seq=|1..6. d|
|00002b60| 64 24 3d 64 65 73 74 73 | 70 65 63 24 0d 01 40 1a |d$=dests|pec$..@.|
|00002b70| 20 20 f1 27 72 24 3b 64 | 64 24 3b c1 73 66 6e 61 | .'r$;d|d$;.sfna|
|00002b80| 6d 65 24 2c 35 29 0d 01 | 4a 34 20 20 e7 20 6d 75 |me$,5)..|J4 . mu|
|00002b90| 6c 74 69 3d 30 3a f1 20 | 66 6c 65 6e 3b 22 20 62 |lti=0:. |flen;" b|
|00002ba0| 79 74 65 73 20 74 6f 20 | 74 72 61 6e 73 66 65 72 |ytes to |transfer|
|00002bb0| 20 69 6e 20 74 6f 74 61 | 6c 22 0d 01 54 40 20 20 | in tota|l"..T@ |
|00002bc0| 64 6f 3d b9 3a e7 20 73 | 65 71 3d 31 3a e7 20 63 |do=.:. s|eq=1:. c|
|00002bd0| 6f 6e 66 69 72 6d 3a 64 | 6f 3d 28 a4 79 6e 28 22 |onfirm:d|o=(.yn("|
|00002be0| 54 72 61 6e 73 66 65 72 | 20 74 68 69 73 20 66 69 |Transfer| this fi|
|00002bf0| 6c 65 22 29 3d 97 22 59 | 22 29 0d 01 5e 0c 20 20 |le")=."Y|")..^. |
|00002c00| e7 20 64 6f 20 8c 0d 01 | 68 27 20 20 20 70 3d 31 |. do ...|h' p=1|
|00002c10| 3a c8 95 20 64 65 70 74 | 68 3e 70 3a 70 2b 3d 31 |:.. dept|h>p:p+=1|
|00002c20| 3a 64 64 24 2b 3d 64 69 | 72 24 28 70 29 0d 01 72 |:dd$+=di|r$(p)..r|
|00002c30| 44 20 20 20 e7 20 63 64 | 69 72 24 28 70 29 3c 3e |D . cd|ir$(p)<>|
|00002c40| 64 69 72 24 28 70 29 3a | 63 64 69 72 24 28 70 29 |dir$(p):|cdir$(p)|
|00002c50| 3d 64 69 72 24 28 70 29 | 3a c8 99 20 22 4f 53 5f |=dir$(p)|:.. "OS_|
|00002c60| 46 69 6c 65 22 2c 38 2c | 64 64 24 2c 30 2c 30 2c |File",8,|dd$,0,0,|
|00002c70| 30 0d 01 7c 08 20 20 20 | ce 0d 01 86 28 20 20 20 |0..|. |....( |
|00002c80| 64 64 24 2b 3d 22 2e 22 | 2b 24 6e 61 6d 65 3a 64 |dd$+="."|+$name:d|
|00002c90| 66 3d 8e 20 64 64 24 3a | e7 20 64 66 3a d9 23 64 |f=. dd$:|. df:.#d|
|00002ca0| 66 0d 01 90 46 20 20 20 | e7 20 64 66 3a e7 20 a4 |f...F |. df:. .|
|00002cb0| 79 6e 28 22 57 61 72 6e | 69 6e 67 20 2d 20 66 69 |yn("Warn|ing - fi|
|00002cc0| 6c 65 20 61 6c 72 65 61 | 64 79 20 65 78 69 73 74 |le alrea|dy exist|
|00002cd0| 73 2e 20 44 65 6c 65 74 | 65 20 69 74 22 29 3d 97 |s. Delet|e it")=.|
|00002ce0| 22 4e 22 3a 70 3d 30 0d | 01 9a 0c 20 20 20 e7 20 |"N":p=0.|... . |
|00002cf0| 70 20 8c 0d 01 a4 23 20 | 20 20 20 ff 28 22 43 52 |p ....# | .("CR|
|00002d00| 45 41 54 45 20 22 2b 64 | 64 24 2b 22 20 22 2b c3 |EATE "+d|d$+" "+.|
|00002d10| 7e 66 6c 65 6e 29 0d 01 | ae 3a 20 20 20 20 64 66 |~flen)..|.: df|
|00002d20| 3d ae 20 64 64 24 3a e7 | 20 64 66 3d 30 3a 85 20 |=. dd$:.| df=0:. |
|00002d30| 30 2c 22 43 61 6e 6e 6f | 74 20 6f 70 65 6e 20 64 |0,"Canno|t open d|
|00002d40| 65 73 74 69 6e 61 74 69 | 6f 6e 20 66 69 6c 65 22 |estinati|on file"|
|00002d50| 0d 01 b8 09 20 20 20 20 | f5 0d 01 c2 28 20 20 20 |.... |....( |
|00002d60| 20 20 20 e7 20 6d 75 6c | 74 69 3d 30 3a f1 22 50 | . mul|ti=0:."P|
|00002d70| 61 72 74 20 22 3b bd 28 | 36 34 2b 70 61 72 74 29 |art ";.(|64+part)|
|00002d80| 3b 0d 01 cc 2f 20 20 20 | 20 20 20 73 66 3d 8e 20 |;.../ | sf=. |
|00002d90| 73 66 6e 61 6d 65 24 3a | e7 20 73 66 3a 6c 65 6e |sfname$:|. sf:len|
|00002da0| 3d a2 23 73 66 3a 6c 65 | 6e 67 74 68 3d 6c 65 6e |=.#sf:le|ngth=len|
|00002db0| 0d 01 d6 2e 20 20 20 20 | 20 20 e7 20 73 66 3d 30 |.... | . sf=0|
|00002dc0| 3a 85 20 30 2c 22 43 61 | 6e 6e 6f 74 20 6f 70 65 |:. 0,"Ca|nnot ope|
|00002dd0| 6e 20 73 6f 75 72 63 65 | 20 66 69 6c 65 22 0d 01 |n source| file"..|
|00002de0| e0 0b 20 20 20 20 20 20 | f5 0d 01 ea 38 20 20 20 |.. |....8 |
|00002df0| 20 20 20 20 20 e7 20 6c | 65 6e 3e 62 66 72 73 69 | . l|en>bfrsi|
|00002e00| 7a 65 3a 62 3d 62 66 72 | 73 69 7a 65 3a 6c 65 6e |ze:b=bfr|size:len|
|00002e10| 2d 3d 62 3a 8b 20 62 3d | 6c 65 6e 3a 6c 65 6e 3d |-=b:. b=|len:len=|
|00002e20| 30 0d 01 f4 3e 20 20 20 | 20 20 20 20 20 c8 99 20 |0...> | .. |
|00002e30| 22 4f 53 5f 47 42 50 42 | 22 2c 34 2c 73 66 2c 62 |"OS_GBPB|",4,sf,b|
|00002e40| 66 72 2c 62 20 b8 2c 2c | 2c 78 3a e7 20 78 3a 85 |fr,b .,,|,x:. x:.|
|00002e50| 20 30 2c 22 52 65 61 64 | 20 65 72 72 6f 72 22 0d | 0,"Read| error".|
|00002e60| 01 fe 23 20 20 20 20 20 | 20 20 20 c8 99 20 22 4f |..# | .. "O|
|00002e70| 53 5f 47 42 50 42 22 2c | 32 2c 64 66 2c 62 66 72 |S_GBPB",|2,df,bfr|
|00002e80| 2c 62 0d 02 08 12 20 20 | 20 20 20 20 fd 20 6c 65 |,b.... | . le|
|00002e90| 6e 3c 3d 30 0d 02 12 32 | 20 20 20 20 20 20 74 6f |n<=0...2| to|
|00002ea0| 74 6c 65 6e 2d 3d 6c 65 | 6e 67 74 68 3a 71 24 3d |tlen-=le|ngth:q$=|
|00002eb0| c2 22 20 20 20 20 20 20 | 20 20 22 2b c3 74 6f 74 |." | "+.tot|
|00002ec0| 6c 65 6e 2c 39 29 0d 02 | 1c 13 20 20 20 20 20 20 |len,9)..|.. |
|00002ed0| d9 23 73 66 3a 73 66 3d | 30 0d 02 26 41 20 20 20 |.#sf:sf=|0..&A |
|00002ee0| 20 20 20 e7 20 6d 75 6c | 74 69 3d 30 3a f1 20 6c | . mul|ti=0:. l|
|00002ef0| 65 6e 67 74 68 3b 22 20 | 62 79 74 65 73 20 74 72 |ength;" |bytes tr|
|00002f00| 61 6e 73 66 65 72 72 65 | 64 20 66 72 6f 6d 20 74 |ansferre|d from t|
|00002f10| 68 69 73 20 64 69 73 63 | 22 3b 0d 02 30 3d 20 20 |his disc|";..0= |
|00002f20| 20 20 20 20 e7 20 74 6f | 74 6c 65 6e 3e 30 3a f1 | . to|tlen>0:.|
|00002f30| 22 2c 20 6d 6f 72 65 20 | 74 6f 20 67 6f 3a 22 3b |", more |to go:";|
|00002f40| 71 24 3a 73 65 71 2b 3d | 31 3a f2 67 65 74 64 69 |q$:seq+=|1:.getdi|
|00002f50| 73 63 28 73 65 71 29 0d | 02 3a 13 20 20 20 20 fd |sc(seq).|.:. .|
|00002f60| 20 74 6f 74 6c 65 6e 3c | 3d 30 0d 02 44 2c 20 20 | totlen<|=0..D, |
|00002f70| 20 20 d9 23 64 66 3a 64 | 66 3d 30 3a e7 20 6d 75 | .#df:d|f=0:. mu|
|00002f80| 6c 74 69 3d 30 3a f1 22 | 20 2d 20 63 6f 6d 70 6c |lti=0:."| - compl|
|00002f90| 65 74 65 64 2e 22 0d 02 | 4e 2f 20 20 20 20 c8 99 |eted."..|N/ ..|
|00002fa0| 20 22 4f 53 5f 46 69 6c | 65 22 2c 31 2c 64 64 24 | "OS_Fil|e",1,dd$|
|00002fb0| 2c 6c 64 61 64 64 72 2c | 65 78 61 64 64 72 2c 30 |,ldaddr,|exaddr,0|
|00002fc0| 2c 61 74 74 72 0d 02 58 | 08 20 20 20 cd 0d 02 62 |,attr..X|. ...b|
|00002fd0| 07 20 20 cd 0d 02 6c 0e | 20 20 6d 75 6c 74 69 2d |. ...l.| multi-|
|00002fe0| 3d 31 0d 02 76 09 20 20 | f7 20 85 0d 02 80 0f 20 |=1..v. |. ..... |
|00002ff0| fd 20 6d 75 6c 74 69 3c | 3d 30 0d 02 8a 20 20 ff |. multi<|=0... .|
|00003000| 28 22 44 49 53 4d 4f 55 | 4e 54 20 22 2b c3 73 6f |("DISMOU|NT "+.so|
|00003010| 75 72 63 65 64 72 69 76 | 65 29 0d 02 94 12 20 ff |urcedriv|e).... .|
|00003020| 28 22 44 49 53 4d 4f 55 | 4e 54 22 29 0d 02 9e 24 |("DISMOU|NT")...$|
|00003030| fd 20 a4 79 6e 28 22 52 | 65 73 74 6f 72 65 20 6d |. .yn("R|estore m|
|00003040| 6f 72 65 20 64 69 73 63 | 73 22 29 3d 97 22 4e 22 |ore disc|s")=."N"|
|00003050| 0d 02 a8 0b f2 65 6e 64 | 28 31 29 0d 02 b2 04 0d |.....end|(1).....|
|00003060| 02 bc 13 dd 20 f2 67 65 | 74 64 69 73 63 28 73 65 |.... .ge|tdisc(se|
|00003070| 71 29 0d 02 c6 07 ea 20 | 85 0d 02 d0 3d ee 20 85 |q)..... |....=. .|
|00003080| 20 ea 3a e7 20 9f 3c 3e | 31 37 3a f1 f6 24 3b 22 | .:. .<>|17:..$;"|
|00003090| 20 61 74 20 6c 69 6e 65 | 20 22 3b 9e 3a 65 72 72 | at line| ";.:err|
|000030a0| 3d 9f 3a 8b 3a f7 20 85 | 3a 85 20 31 37 2c 22 45 |=.:.:. .|:. 17,"E|
|000030b0| 73 63 61 70 65 22 0d 02 | da 26 e7 20 73 65 71 3d |scape"..|.&. seq=|
|000030c0| 31 3a 70 24 3d 22 20 66 | 69 72 73 74 20 22 20 8b |1:p$=" f|irst " .|
|000030d0| 20 70 24 3d 22 20 6e 65 | 78 74 20 22 0d 02 e4 05 | p$=" ne|xt "....|
|000030e0| f5 0d 02 ee 4a f1 27 22 | 49 6e 73 65 72 74 22 3b |....J.'"|Insert";|
|000030f0| 70 24 3b 22 64 69 73 63 | 20 6f 66 20 73 65 74 20 |p$;"disc| of set |
|00003100| 69 6e 20 64 72 69 76 65 | 20 22 3b 73 6f 75 72 63 |in drive| ";sourc|
|00003110| 65 64 72 69 76 65 3b 22 | 20 61 6e 64 20 70 72 65 |edrive;"| and pre|
|00003120| 73 73 20 61 20 6b 65 79 | 20 22 3b 0d 02 f8 08 e7 |ss a key| ";.....|
|00003130| a5 3a f1 0d 03 02 3b f2 | 6e 61 6d 65 74 69 74 6c |.:....;.|nametitl|
|00003140| 65 3a 6f 6b 3d 64 6f 6b | 3a 66 66 3d a3 3a e7 20 |e:ok=dok|:ff=.:. |
|00003150| 6f 6b 3a e7 20 70 61 72 | 74 3c 3d 2d 33 32 3a e7 |ok:. par|t<=-32:.|
|00003160| 20 73 65 71 3d 31 3a 70 | 61 72 74 3d 2d 31 0d 03 | seq=1:p|art=-1..|
|00003170| 0c 3d e7 20 ac 20 6f 6b | 3a f1 22 28 4e 6f 74 20 |.=. . ok|:."(Not |
|00003180| 61 20 64 69 73 63 20 66 | 72 6f 6d 20 48 44 62 61 |a disc f|rom HDba|
|00003190| 63 6b 75 70 29 22 3a e7 | 20 73 65 71 3d 31 3a 70 |ckup)":.| seq=1:p|
|000031a0| 61 72 74 3d 2d 31 3a 6f | 6b 3d b9 0d 03 16 37 e7 |art=-1:o|k=....7.|
|000031b0| 20 6f 6b 3a f2 72 65 73 | 65 74 3a 66 66 3d a4 6e | ok:.res|et:ff=.n|
|000031c0| 65 78 74 66 69 6c 65 28 | 31 29 3a e7 20 ac 20 66 |extfile(|1):. . f|
|000031d0| 66 3a f1 22 4e 6f 20 66 | 69 6c 65 20 66 6f 75 6e |f:."No f|ile foun|
|000031e0| 64 22 0d 03 20 49 e7 20 | 66 66 3a e7 20 73 65 71 |d".. I. |ff:. seq|
|000031f0| 3e 31 3a e7 20 c6 8e 28 | 64 69 72 24 28 29 29 2b |>1:. ..(|dir$())+|
|00003200| 22 2e 22 2b 24 6e 61 6d | 65 3c 3e 73 66 6e 61 6d |"."+$nam|e<>sfnam|
|00003210| 65 24 3a f1 22 4e 6f 74 | 20 74 68 65 20 73 61 6d |e$:."Not| the sam|
|00003220| 65 20 73 65 74 22 3a 66 | 66 3d a3 0d 03 2a 3a e7 |e set":f|f=...*:.|
|00003230| 20 66 66 3a e7 20 94 70 | 61 72 74 3c 3e 73 65 71 | ff:. .p|art<>seq|
|00003240| 3a f1 22 4e 6f 74 20 70 | 61 72 74 20 22 3b bd 28 |:."Not p|art ";.(|
|00003250| 73 65 71 2b 36 34 29 3b | 22 20 6f 66 20 74 68 65 |seq+64);|" of the|
|00003260| 20 73 65 74 22 0d 03 34 | 15 fd 20 66 66 20 80 28 | set"..4|.. ff .(|
|00003270| 94 70 61 72 74 3d 73 65 | 71 29 0d 03 3e 05 e1 0d |.part=se|q)..>...|
|00003280| 03 48 04 0d 03 52 0d dd | 20 a4 79 6e 28 71 24 29 |.H...R..| .yn(q$)|
|00003290| 0d 03 5c 21 f1 27 8a 28 | 37 30 2d a9 71 24 29 2f |..\!.'.(|70-.q$)/|
|000032a0| 32 29 71 24 3b 22 20 3f | 20 28 59 2f 4e 29 20 22 |2)q$;" ?| (Y/N) "|
|000032b0| 3b 0d 03 66 2f 76 3d 30 | 3a f5 3a ef 76 3a 76 3d |;..f/v=0|:.:.v:v=|
|000032c0| 37 3a 6e 3d a5 20 80 26 | 44 46 3a fd 20 6e 3d 97 |7:n=. .&|DF:. n=.|
|000032d0| 22 59 22 20 84 20 6e 3d | 97 22 4e 22 3a f1 bd 6e |"Y" . n=|."N":..n|
|000032e0| 0d 03 70 06 3d 6e 0d 03 | 7a 04 0d 03 84 0c dd 20 |..p.=n..|z...... |
|000032f0| f2 72 65 73 65 74 0d 03 | 8e 3e e3 20 78 3d 31 20 |.reset..|.>. x=1 |
|00003300| b8 20 6d 61 78 64 65 70 | 74 68 3a 6f 66 73 28 78 |. maxdep|th:ofs(x|
|00003310| 29 3d 30 3a 64 69 72 24 | 28 78 29 3d 22 22 3a 63 |)=0:dir$|(x)="":c|
|00003320| 64 69 72 24 28 78 29 3d | 22 22 3a ed 3a 64 65 70 |dir$(x)=|"":.:dep|
|00003330| 74 68 3d 31 0d 03 98 21 | 64 69 72 24 28 31 29 3d |th=1...!|dir$(1)=|
|00003340| 22 3a 22 2b c3 73 6f 75 | 72 63 65 64 72 69 76 65 |":"+.sou|rcedrive|
|00003350| 2b 22 2e 24 22 0d 03 a2 | 05 e1 0d 03 ac 04 0d 03 |+".$"...|........|
|00003360| b6 12 dd 20 a4 6e 65 78 | 74 66 69 6c 65 28 64 29 |... .nex|tfile(d)|
|00003370| 0d 03 c0 05 f5 0d 03 ca | 11 20 20 e7 20 64 65 70 |........|. . dep|
|00003380| 74 68 3e 64 20 8c 0d 03 | d4 3e 20 20 e7 20 a4 6e |th>d ...|.> . .n|
|00003390| 65 78 74 66 69 6c 65 28 | 64 2b 31 29 3a 3d b9 20 |extfile(|d+1):=. |
|000033a0| 8b 20 64 69 72 24 28 64 | 2b 31 29 3d 22 22 3a 63 |. dir$(d|+1)="":c|
|000033b0| 64 69 72 24 28 64 2b 31 | 29 3d 22 22 3a 64 65 70 |dir$(d+1|)="":dep|
|000033c0| 74 68 3d 64 0d 03 de 07 | 20 20 cd 0d 03 e8 0b 63 |th=d....| .....c|
|000033d0| 68 65 63 6b 3d 30 0d 03 | f2 54 e7 20 6f 66 73 28 |heck=0..|.T. ofs(|
|000033e0| 64 29 3e 3d 30 3a c8 99 | 20 22 4f 53 5f 47 42 50 |d)>=0:..| "OS_GBP|
|000033f0| 42 22 2c 31 30 2c c6 8e | 28 64 69 72 24 28 29 29 |B",10,..|(dir$())|
|00003400| 2b bd 30 2c 66 64 61 74 | 61 2c 31 2c 6f 66 73 28 |+.0,fdat|a,1,ofs(|
|00003410| 64 29 2c 33 32 2c 22 2a | 22 20 b8 2c 2c 2c 63 68 |d),32,"*|" .,,,ch|
|00003420| 65 63 6b 2c 6f 66 73 28 | 64 29 0d 03 fc 19 e7 20 |eck,ofs(|d)..... |
|00003430| 63 68 65 63 6b 3d 30 3a | 6f 66 73 28 64 29 3d 30 |check=0:|ofs(d)=0|
|00003440| 3a 3d a3 0d 04 06 20 6e | 3d 6e 61 6d 65 2d 31 3a |:=.... n|=name-1:|
|00003450| f5 3a 6e 2b 3d 31 3a fd | 20 3f 6e 3d 30 3a 3f 6e |.:n+=1:.| ?n=0:?n|
|00003460| 3d 31 33 0d 04 10 11 c8 | 8e 20 66 64 61 74 61 3f |=13.....|. fdata?|
|00003470| 31 36 20 ca 0d 04 1a 0c | 20 20 c9 20 31 3a 3d b9 |16 .....| . 1:=.|
|00003480| 0d 04 24 27 20 20 c9 20 | 32 3a 64 65 70 74 68 3d |..$' . |2:depth=|
|00003490| 64 2b 31 3a 64 69 72 24 | 28 64 2b 31 29 3d 22 2e |d+1:dir$|(d+1)=".|
|000034a0| 22 2b 24 6e 61 6d 65 0d | 04 2e 09 20 20 7f 20 fa |"+$name.|... . .|
|000034b0| 0d 04 38 05 cb 0d 04 42 | 07 fd 20 a3 0d 04 4c 04 |..8....B|.. ...L.|
|000034c0| 0d 04 56 10 dd 20 f2 6e | 61 6d 65 74 69 74 6c 65 |..V.. .n|ametitle|
|000034d0| 0d 04 60 05 f5 0d 04 6a | 1f ff 28 22 44 49 53 4d |..`....j|..("DISM|
|000034e0| 4f 55 4e 54 20 22 2b c3 | 73 6f 75 72 63 65 64 72 |OUNT "+.|sourcedr|
|000034f0| 69 76 65 29 0d 04 74 31 | c8 99 20 22 41 44 46 53 |ive)..t1|.. "ADFS|
|00003500| 5f 44 69 73 63 4f 70 22 | 2c 30 2c 31 2c 73 6f 75 |_DiscOp"|,0,1,sou|
|00003510| 72 63 65 64 72 69 76 65 | 3c 3c 32 39 2c 62 66 72 |rcedrive|<<29,bfr|
|00003520| 2c 34 30 39 36 0d 04 7e | 39 64 73 69 7a 65 3d 62 |,4096..~|9dsize=b|
|00003530| 66 72 21 26 46 43 20 80 | 20 26 46 46 46 46 46 46 |fr!&FC .| &FFFFFF|
|00003540| 3a 64 6f 6b 3d 28 64 73 | 69 7a 65 3d 26 43 38 30 |:dok=(ds|ize=&C80|
|00003550| 20 84 20 64 73 69 7a 65 | 3d 26 41 30 30 29 0d 04 | . dsize|=&A00)..|
|00003560| 88 45 e7 28 62 66 72 21 | 26 31 35 20 80 26 46 46 |.E.(bfr!|&15 .&FF|
|00003570| 46 46 29 3d 26 43 38 30 | 3a e7 62 66 72 21 26 38 |FF)=&C80|:.bfr!&8|
|00003580| 30 31 3d 26 36 42 36 33 | 36 39 34 45 3a 64 73 69 |01=&6B63|694E:dsi|
|00003590| 7a 65 3d 26 45 3a 64 6f | 6b 3d b9 3a f4 22 4e 69 |ze=&E:do|k=.:."Ni|
|000035a0| 63 6b 22 0d 04 92 3c e7 | 20 ac 20 64 6f 6b 3a f1 |ck"...<.| . dok:.|
|000035b0| 27 22 42 61 64 20 64 69 | 73 63 20 73 69 7a 65 2e |'"Bad di|sc size.|
|000035c0| 20 52 65 70 6c 61 63 65 | 20 61 6e 64 20 70 72 65 | Replace| and pre|
|000035d0| 73 73 20 61 20 6b 65 79 | 22 3b 3a e7 a5 3a f1 0d |ss a key|";:..:..|
|000035e0| 04 9c 09 fd 20 64 6f 6b | 0d 04 a6 7c e7 20 64 73 |.... dok|...|. ds|
|000035f0| 69 7a 65 3d 26 45 3a 62 | 66 72 3f 26 46 46 30 3d |ize=&E:b|fr?&FF0=|
|00003600| 31 33 3a 74 69 74 6c 65 | 24 3d 24 28 62 66 72 2b |13:title|$=$(bfr+|
|00003610| 26 46 44 44 29 3a 8b 20 | e7 20 64 73 69 7a 65 3d |&FDD):. |. dsize=|
|00003620| 26 43 38 30 3a 62 66 72 | 3f 26 42 46 30 3d 31 33 |&C80:bfr|?&BF0=13|
|00003630| 3a 74 69 74 6c 65 24 3d | 24 28 62 66 72 2b 26 42 |:title$=|$(bfr+&B|
|00003640| 44 44 29 3a 8b 20 62 66 | 72 3f 26 36 45 43 3d 31 |DD):. bf|r?&6EC=1|
|00003650| 33 3a 74 69 74 6c 65 24 | 3d 24 28 62 66 72 2b 26 |3:title$|=$(bfr+&|
|00003660| 36 44 39 29 0d 04 b0 3d | e7 20 64 73 69 7a 65 3d |6D9)...=|. dsize=|
|00003670| 26 45 3a 62 66 72 3f 26 | 32 32 3d 31 33 3a 64 69 |&E:bfr?&|22=13:di|
|00003680| 73 63 6e 61 6d 65 24 3d | 24 28 62 66 72 2b 26 31 |scname$=|$(bfr+&1|
|00003690| 41 29 20 8b 20 64 69 73 | 63 6e 61 6d 65 24 3d 22 |A) . dis|cname$="|
|000036a0| 22 0d 04 ba 3f e7 20 64 | 73 69 7a 65 3c 3e 26 45 |"...?. d|size<>&E|
|000036b0| 3a e3 20 6e 3d 62 66 72 | 2b 26 46 37 20 b8 20 62 |:. n=bfr|+&F7 . b|
|000036c0| 66 72 2b 26 46 41 3a 64 | 69 73 63 6e 61 6d 65 24 |fr+&FA:d|iscname$|
|000036d0| 2b 3d bd 3f 6e 2b bd 28 | 6e 3f 26 46 46 29 3a ed |+=.?n+.(|n?&FF):.|
|000036e0| 0d 04 c4 3c 64 6f 6b 3d | 28 c0 64 69 73 63 6e 61 |...<dok=|(.discna|
|000036f0| 6d 65 24 2c 36 29 3d 22 | 42 41 43 4b 55 50 22 20 |me$,6)="|BACKUP" |
|00003700| 80 20 c0 74 69 74 6c 65 | 24 2c 31 31 29 3d 22 46 |. .title|$,11)="F|
|00003710| 69 6c 65 6c 65 6e 67 74 | 68 5f 22 29 0d 04 ce 2d |ilelengt|h_")...-|
|00003720| 70 61 72 74 3d 97 c1 64 | 69 73 63 6e 61 6d 65 24 |part=..d|iscname$|
|00003730| 2c 37 2c 31 29 2d 36 34 | 3a 66 6c 65 6e 3d bb c2 |,7,1)-64|:flen=..|
|00003740| 74 69 74 6c 65 24 2c 38 | 29 0d 04 d8 1f ff 28 22 |title$,8|).....("|
|00003750| 44 49 53 4d 4f 55 4e 54 | 20 22 2b c3 73 6f 75 72 |DISMOUNT| "+.sour|
|00003760| 63 65 64 72 69 76 65 29 | 0d 04 e2 05 e1 0d 04 ec |cedrive)|........|
|00003770| 04 0d 04 f6 1a dd 20 f2 | 61 73 6b 28 f8 20 71 79 |...... .|ask(. qy|
|00003780| 2c f8 20 63 6f 6e 66 69 | 72 6d 29 0d 05 00 20 71 |,. confi|rm)... q|
|00003790| 79 3d 31 3a c8 95 20 a4 | 6e 65 78 74 66 69 6c 65 |y=1:.. .|nextfile|
|000037a0| 28 31 29 3a 71 79 2b 3d | 31 3a ce 0d 05 0a 0a f2 |(1):qy+=|1:......|
|000037b0| 72 65 73 65 74 0d 05 14 | 16 e7 20 71 79 3d 31 3a |reset...|.. qy=1:|
|000037c0| 63 6f 6e 66 69 72 6d 3d | b9 3a e1 0d 05 1e 43 e7 |confirm=|.:....C.|
|000037d0| 20 a4 79 6e 28 22 54 68 | 65 72 65 20 61 72 65 20 | .yn("Th|ere are |
|000037e0| 22 2b c3 71 79 2b 22 20 | 66 69 6c 65 73 20 6f 6e |"+.qy+" |files on|
|000037f0| 20 74 68 69 73 20 64 69 | 73 63 2e 20 4c 69 73 74 | this di|sc. List|
|00003800| 20 74 68 65 6d 22 29 3d | 97 22 59 22 20 8c 0d 05 | them")=|."Y" ...|
|00003810| 28 2d 20 20 c8 95 20 a4 | 6e 65 78 74 66 69 6c 65 |(- .. .|nextfile|
|00003820| 28 31 29 3a f1 c6 8e 28 | 64 69 72 24 28 29 29 3b |(1):...(|dir$());|
|00003830| 22 2e 22 3b 24 6e 61 6d | 65 3a ce 0d 05 32 05 cd |".";$nam|e:...2..|
|00003840| 0d 05 3c 41 63 6f 6e 66 | 69 72 6d 3d 28 a4 79 6e |..<Aconf|irm=(.yn|
|00003850| 28 22 44 6f 20 79 6f 75 | 20 77 69 73 68 20 74 6f |("Do you| wish to|
|00003860| 20 63 6f 6e 66 69 72 6d | 2f 72 65 6a 65 63 74 20 | confirm|/reject |
|00003870| 65 61 63 68 20 66 69 6c | 65 22 29 3d 97 22 59 22 |each fil|e")=."Y"|
|00003880| 29 0d 05 46 0a f2 72 65 | 73 65 74 0d 05 50 05 e1 |)..F..re|set..P..|
|00003890| 0d 05 5a 04 0d 05 64 0d | dd 20 f2 65 6e 64 28 66 |..Z...d.|. .end(f|
|000038a0| 29 0d 05 6e 09 ee 20 85 | 20 87 0d 05 78 13 f2 63 |)..n.. .| ...x..c|
|000038b0| 6c 6f 73 65 3a 2a 46 58 | 32 32 39 2c 31 0d 05 82 |lose:*FX|229,1...|
|000038c0| 1d e7 20 66 3d 31 3a f1 | 27 8a 32 37 29 22 46 69 |.. f=1:.|'.27)"Fi|
|000038d0| 6e 69 73 68 65 64 2e 20 | 22 3b 0d 05 8c 2a e7 20 |nished. |";...*. |
|000038e0| 66 3d 32 3a f1 27 f6 24 | 3b 3a e7 20 9f 3c 3e 31 |f=2:.'.$|;:. .<>1|
|000038f0| 37 3a f1 22 20 20 61 74 | 20 6c 69 6e 65 20 22 3b |7:." at| line ";|
|00003900| 9e 20 8b f1 0d 05 96 19 | f1 22 50 72 65 73 73 20 |. ......|."Press |
|00003910| 61 20 6b 65 79 20 22 3b | 3a e7 a5 3a f1 0d 05 a0 |a key ";|:..:....|
|00003920| 0e ee 20 85 20 e5 20 8d | 74 74 45 0d 05 aa 0d 2a |.. . . .|ttE....*|
|00003930| 44 49 53 4d 4f 55 4e 54 | 0d 05 b4 09 ee 20 85 20 |DISMOUNT|..... . |
|00003940| 87 0d 05 be 30 c8 99 20 | 22 4f 53 5f 42 79 74 65 |....0.. |"OS_Byte|
|00003950| 22 2c 31 36 31 2c 31 31 | 20 b8 2c 2c 64 3a ff 28 |",161,11| .,,d:.(|
|00003960| 22 44 52 49 56 45 20 22 | 2b c3 28 64 20 80 37 29 |"DRIVE "|+.(d .7)|
|00003970| 29 0d 05 c8 0a 2a 46 58 | 32 32 39 0d 05 d2 05 e0 |)....*FX|229.....|
|00003980| 0d 05 dc 04 0d 05 e6 0d | dd 20 f2 70 61 72 61 6d |........|. .param|
|00003990| 73 0d 05 f0 3e 70 66 3d | 8e 22 3c 48 44 42 24 44 |s...>pf=|."<HDB$D|
|000039a0| 69 72 3e 2e 21 50 61 72 | 61 6d 65 74 65 72 22 3a |ir>.!Par|ameter":|
|000039b0| e7 20 70 66 3d 30 3a 85 | 20 30 2c 22 4e 6f 20 21 |. pf=0:.| 0,"No !|
|000039c0| 50 61 72 61 6d 65 74 65 | 72 20 66 69 6c 65 22 0d |Paramete|r file".|
|000039d0| 05 fa 37 65 72 61 73 65 | 5f 73 66 5f 64 69 73 63 |..7erase|_sf_disc|
|000039e0| 73 3d 9a 23 70 66 3a 73 | 6f 75 72 63 65 64 72 69 |s=.#pf:s|ourcedri|
|000039f0| 76 65 3d 9a 23 70 66 3a | 64 65 73 74 73 70 65 63 |ve=.#pf:|destspec|
|00003a00| 24 3d be 23 70 66 0d 06 | 04 0d d9 23 70 66 3a 70 |$=.#pf..|...#pf:p|
|00003a10| 66 3d 30 0d 06 0e 05 e1 | 0d 06 18 04 0d 06 22 0c |f=0.....|......".|
|00003a20| dd 20 f2 63 6c 6f 73 65 | 0d 06 2c 12 e7 20 64 66 |. .close|..,.. df|
|00003a30| 3a d9 23 64 66 3a 64 66 | 3d 30 0d 06 36 12 e7 20 |:.#df:df|=0..6.. |
|00003a40| 73 66 3a d9 23 73 66 3a | 73 66 3d 30 0d 06 40 12 |sf:.#sf:|sf=0..@.|
|00003a50| e7 20 70 66 3a d9 23 70 | 66 3a 70 66 3d 30 0d 06 |. pf:.#p|f:pf=0..|
|00003a60| 4a 05 e1 0d 06 54 04 0d | 06 5e 0c dd 20 a4 63 68 |J....T..|.^.. .ch|
|00003a70| 65 63 6b 0d 06 68 38 c8 | 99 20 22 58 4f 53 5f 52 |eck..h8.|. "XOS_R|
|00003a80| 65 61 64 56 61 72 56 61 | 6c 22 2c 22 48 44 42 24 |eadVarVa|l","HDB$|
|00003a90| 44 69 72 22 2c 62 66 72 | 2c 39 39 2c 30 20 b8 2c |Dir",bfr|,99,0 .,|
|00003aa0| 2c 52 32 2c 52 33 3b 66 | 6c 61 67 0d 06 72 54 e7 |,R2,R3;f|lag..rT.|
|00003ab0| 28 66 6c 61 67 20 80 20 | 31 29 84 20 52 32 3c 31 |(flag . |1). R2<1|
|00003ac0| 3a db 3a f1 27 27 22 55 | 73 65 20 74 68 69 73 20 |:.:.''"U|se this |
|00003ad0| 70 72 6f 67 72 61 6d 20 | 6f 6e 6c 79 20 76 69 61 |program |only via|
|00003ae0| 20 74 68 65 20 61 70 70 | 6c 69 63 61 74 69 6f 6e | the app|lication|
|00003af0| 20 28 21 48 44 42 61 63 | 6b 75 70 29 22 3a e0 0d | (!HDBac|kup)":..|
|00003b00| 06 7c 0d 62 66 72 21 52 | 32 3d 31 33 0d 06 86 09 |.|.bfr!R|2=13....|
|00003b10| 3d 24 62 66 72 0d ff 46 | 69 6c 65 44 61 74 61 82 |=$bfr..F|ileData.|
|00003b20| 21 50 61 72 61 6d 65 74 | 65 72 00 12 00 00 00 41 |!Paramet|er.....A|
|00003b30| fd ff ff 85 9e 84 c0 03 | 00 34 3c 01 00 41 44 46 |........|.4<..ADF|
|00003b40| 53 3a 3a 34 2e 24 0a 80 | 00 00 00 48 89 46 69 6c |S::4.$..|...H.Fil|
|00003b50| 65 44 61 74 61 82 21 52 | 75 6e 00 04 00 ff ff ff |eData.!R|un......|
|00003b60| ff 5c 00 00 00 41 eb ff | ff d7 c4 a7 a2 03 00 58 |.\...A..|.......X|
|00003b70| d4 7c 20 56 65 72 73 69 | 6f 6e 20 32 2e 30 30 0d |.| Versi|on 2.00.|
|00003b80| 53 65 74 20 48 44 42 24 | 44 69 72 20 3c 4f 62 65 |Set HDB$|Dir <Obe|
|00003b90| 79 24 44 69 72 3e 0d 57 | 69 6d 70 73 6c 6f 74 20 |y$Dir>.W|impslot |
|00003ba0| 2d 6d 69 6e 20 34 30 30 | 4b 20 2d 6d 61 78 20 38 |-min 400|K -max 8|
|00003bb0| 30 30 4b 0d 52 75 6e 20 | 3c 4f 62 65 79 24 44 69 |00K.Run |<Obey$Di|
|00003bc0| 72 3e 2e 21 52 75 6e 49 | 6d 61 67 65 0d 46 69 6c |r>.!RunI|mage.Fil|
|00003bd0| 65 44 61 74 61 82 21 52 | 75 6e 49 6d 61 67 65 00 |eData.!R|unImage.|
|00003be0| ff 86 1c 00 00 41 fb ff | ff de 32 16 c3 03 00 9f |.....A..|..2.....|
|00003bf0| 68 0d 00 0a 49 f4 20 3e | 20 24 2e 21 48 44 42 61 |h...I. >| $.!HDBa|
|00003c00| 63 6b 75 70 2e 21 52 75 | 6e 49 6d 61 67 65 20 20 |ckup.!Ru|nImage |
|00003c10| 2d 20 20 49 6e 73 74 72 | 75 63 74 69 6f 6e 73 20 |- Instr|uctions |
|00003c20| 66 6f 72 20 48 44 62 61 | 63 6b 75 70 20 61 6e 64 |for HDba|ckup and|
|00003c30| 20 48 44 72 65 73 74 6f | 72 65 0d 00 14 4a f4 20 | HDresto|re...J. |
|00003c40| 20 20 20 20 54 65 72 72 | 79 20 42 72 6f 6d 69 6c | Terr|y Bromil|
|00003c50| 6f 77 2c 20 31 36 20 4d | 61 79 20 31 39 38 38 20 |ow, 16 M|ay 1988 |
|00003c60| 20 20 76 65 72 73 69 6f | 6e 20 32 2e 30 30 20 28 | versio|n 2.00 (|
|00003c70| 52 49 53 43 5f 4f 53 29 | 20 32 38 20 41 70 72 20 |RISC_OS)| 28 Apr |
|00003c80| 31 39 38 39 0d 00 1e 04 | 0d 00 28 0f 48 44 42 24 |1989....|..(.HDB$|
|00003c90| 3d a4 63 68 65 63 6b 0d | 00 32 21 70 66 6c 3d ad |=.check.|.2!pfl=.|
|00003ca0| 28 22 3c 48 44 42 24 44 | 69 72 3e 2e 21 50 61 72 |("<HDB$D|ir>.!Par|
|00003cb0| 61 6d 65 74 65 72 22 29 | 0d 00 3c 36 e7 20 70 66 |ameter")|..<6. pf|
|00003cc0| 6c 3a 65 73 66 3d 9a 23 | 70 66 6c 3a 66 6c 6f 70 |l:esf=.#|pfl:flop|
|00003cd0| 3d 9a 23 70 66 6c 3a 68 | 61 72 64 24 3d be 23 70 |=.#pfl:h|ard$=.#p|
|00003ce0| 66 6c 3a e8 23 70 66 6c | 2c 73 66 6c 69 6d 0d 00 |fl:.#pfl|,sflim..|
|00003cf0| 46 1f e7 20 70 66 6c 3a | d9 23 70 66 6c 3a 70 66 |F.. pfl:|.#pfl:pf|
|00003d00| 6c 3d 30 20 8b 20 f2 6d | 61 6b 65 69 74 0d 00 50 |l=0 . .m|akeit..P|
|00003d10| 04 0d 00 5a 0c ee 20 85 | 3a f2 65 6e 64 0d 00 64 |...Z.. .|:.end..d|
|00003d20| 17 eb 20 30 3a fb 30 2c | 30 2c 26 38 30 2c 26 41 |.. 0:.0,|0,&80,&A|
|00003d30| 30 3a ef 34 0d 00 6e 0b | 40 25 3d 26 39 30 41 0d |0:.4..n.|@%=&90A.|
|00003d40| 00 78 07 f5 3a db 0d 00 | 82 36 20 20 f1 8a 32 32 |.x..:...|.6 ..22|
|00003d50| 2c 31 29 20 22 48 41 52 | 44 20 44 49 53 43 20 42 |,1) "HAR|D DISC B|
|00003d60| 41 43 4b 55 50 20 61 6e | 64 20 52 45 53 54 4f 52 |ACKUP an|d RESTOR|
|00003d70| 45 20 70 72 6f 67 72 61 | 6d 73 22 3b 0d 00 8c 36 |E progra|ms";...6|
|00003d80| 20 20 f1 8a 32 30 2c 36 | 29 20 22 31 20 20 42 61 | ..20,6|) "1 Ba|
|00003d90| 63 6b 75 70 20 66 72 6f | 6d 20 68 61 72 64 20 64 |ckup fro|m hard d|
|00003da0| 69 73 63 20 74 6f 20 66 | 6c 6f 70 70 69 65 73 2e |isc to f|loppies.|
|00003db0| 22 3b 0d 00 96 39 20 20 | f1 8a 32 30 2c 31 30 29 |";...9 |..20,10)|
|00003dc0| 22 32 20 20 52 65 73 74 | 6f 72 65 20 62 61 63 6b |"2 Rest|ore back|
|00003dd0| 65 64 2d 75 70 20 66 69 | 6c 65 73 20 74 6f 20 68 |ed-up fi|les to h|
|00003de0| 61 72 64 20 64 69 73 63 | 2e 22 3b 0d 00 a0 21 20 |ard disc|.";...! |
|00003df0| 20 f1 8a 32 30 2c 31 34 | 29 22 33 20 20 49 6e 73 | ..20,14|)"3 Ins|
|00003e00| 74 72 75 63 74 69 6f 6e | 73 2e 22 3b 0d 00 aa 2c |truction|s.";...,|
|00003e10| 20 20 f1 8a 32 30 2c 31 | 38 29 22 34 20 20 49 6e | ..20,1|8)"4 In|
|00003e20| 73 74 72 75 63 74 69 6f | 6e 73 20 74 6f 20 70 72 |structio|ns to pr|
|00003e30| 69 6e 74 65 72 2e 22 3b | 0d 00 b4 31 20 20 f1 8a |inter.";|...1 ..|
|00003e40| 32 30 2c 32 32 29 22 35 | 20 20 43 68 61 6e 67 65 |20,22)"5| Change|
|00003e50| 20 64 72 69 76 65 73 20 | 6f 72 20 64 69 72 65 63 | drives |or direc|
|00003e60| 74 6f 72 69 65 73 2e 22 | 3b 0d 00 be 19 20 20 f1 |tories."|;.... .|
|00003e70| 8a 32 30 2c 32 36 29 22 | 36 20 20 45 78 69 74 2e |.20,26)"|6 Exit.|
|00003e80| 22 3b 0d 00 c8 3a 20 20 | f1 8a 32 32 2c 33 30 29 |";...: |..22,30)|
|00003e90| 22 50 72 65 73 73 20 61 | 20 6b 65 79 20 31 2d 36 |"Press a| key 1-6|
|00003ea0| 2c 20 20 6f 72 20 75 73 | 65 20 6d 6f 75 73 65 22 |, or us|e mouse"|
|00003eb0| 3b 3a 2a 50 4f 49 4e 54 | 45 52 20 31 0d 00 d2 04 |;:*POINT|ER 1....|
|00003ec0| 0d 00 dc 0a 20 20 f2 67 | 65 74 0d 00 e6 1b 20 20 |.... .g|et.... |
|00003ed0| e7 20 7a 3a 77 3d 28 31 | 30 32 34 2d 79 29 81 31 |. z:w=(1|024-y).1|
|00003ee0| 32 38 2b 34 38 0d 00 f0 | 38 20 20 e7 20 77 3d 34 |28+48...|8 . w=4|
|00003ef0| 39 20 84 20 77 3d 35 30 | 3a ff 28 22 43 41 54 20 |9 . w=50|:.("CAT |
|00003f00| 22 2b 68 61 72 64 24 2b | 22 20 7b 20 3e 20 6e 75 |"+hard$+|" { > nu|
|00003f10| 6c 6c 3a 20 7d 22 29 3a | 2a 41 44 46 53 0d 00 fa |ll: }"):|*ADFS...|
|00003f20| 0c 20 20 c8 8e 20 77 20 | ca 0d 01 04 22 20 20 20 |. .. w |...." |
|00003f30| 20 c9 20 34 39 3a d7 20 | 22 3c 48 44 42 24 44 69 | . 49:. |"<HDB$Di|
|00003f40| 72 3e 2e 21 48 64 62 5f | 76 2a 22 0d 01 0e 22 20 |r>.!Hdb_|v*"..." |
|00003f50| 20 20 20 c9 20 35 30 3a | d7 20 22 3c 48 44 42 24 | . 50:|. "<HDB$|
|00003f60| 44 69 72 3e 2e 21 48 64 | 72 5f 76 2a 22 0d 01 18 |Dir>.!Hd|r_v*"...|
|00003f70| 16 20 20 20 20 c9 20 35 | 31 3a f2 69 6e 73 74 72 |. . 5|1:.instr|
|00003f80| 28 31 29 0d 01 22 1c 20 | 20 20 20 c9 20 35 32 3a |(1)..". | . 52:|
|00003f90| f2 70 72 6f 6e 3a f2 69 | 6e 73 74 72 28 32 29 0d |.pron:.i|nstr(2).|
|00003fa0| 01 2c 14 20 20 20 20 c9 | 20 35 33 3a f2 63 68 61 |.,. .| 53:.cha|
|00003fb0| 6e 67 65 0d 01 36 1d 20 | 20 20 20 c9 20 35 34 3a |nge..6. | . 54:|
|00003fc0| ff 22 50 4f 49 4e 54 45 | 52 20 30 22 3a db 3a e0 |."POINTE|R 0":.:.|
|00003fd0| 0d 01 40 0c 20 20 20 20 | 7f 3a ef 37 0d 01 4a 07 |..@. |.:.7..J.|
|00003fe0| 20 20 cb 0d 01 54 07 fd | 20 30 0d 01 5e 04 0d 01 | ...T..| 0..^...|
|00003ff0| 68 10 dd 20 f2 69 6e 73 | 74 72 28 6f 6b 29 0d 01 |h.. .ins|tr(ok)..|
|00004000| 72 19 ff 22 50 4f 49 4e | 54 45 52 20 30 22 3a e7 |r.."POIN|TER 0":.|
|00004010| 20 6f 6b 3d 31 3a db 0d | 01 7c 1e f1 27 8a 33 30 | ok=1:..|.|..'.30|
|00004020| 29 22 48 41 52 44 20 44 | 49 53 43 20 42 41 43 4b |)"HARD D|ISC BACK|
|00004030| 55 50 22 27 27 0d 01 86 | 8c f1 27 22 54 68 65 20 |UP"''...|..'"The |
|00004040| 62 61 63 6b 75 70 20 70 | 72 6f 67 72 61 6d 20 63 |backup p|rogram c|
|00004050| 6f 70 69 65 73 20 61 6c | 6c 20 66 69 6c 65 73 20 |opies al|l files |
|00004060| 66 72 6f 6d 20 74 68 65 | 20 68 61 72 64 20 64 69 |from the| hard di|
|00004070| 73 63 20 77 68 69 63 68 | 20 68 61 76 65 20 62 65 |sc which| have be|
|00004080| 65 6e 20 61 6c 74 65 72 | 65 64 20 20 73 69 6e 63 |en alter|ed sinc|
|00004090| 65 20 61 20 70 61 72 74 | 69 63 75 6c 61 72 20 64 |e a part|icular d|
|000040a0| 61 74 65 20 74 6f 20 61 | 20 73 65 72 69 65 73 20 |ate to a| series |
|000040b0| 6f 66 20 66 6c 6f 70 70 | 79 20 64 69 73 63 73 2e |of flopp|y discs.|
|000040c0| 22 0d 01 90 b0 f1 27 22 | 4c 61 72 67 65 20 66 69 |".....'"|Large fi|
|000040d0| 6c 65 73 20 65 78 63 65 | 65 64 69 6e 67 20 74 68 |les exce|eding th|
|000040e0| 65 20 63 61 70 61 63 69 | 74 79 20 6f 66 20 61 20 |e capaci|ty of a |
|000040f0| 66 6c 6f 70 70 79 20 77 | 69 6c 6c 20 62 65 20 73 |floppy w|ill be s|
|00004100| 70 6c 69 74 20 6f 76 65 | 72 20 68 6f 77 65 76 65 |plit ove|r howeve|
|00004110| 72 20 6d 61 6e 79 20 20 | 61 72 65 20 6e 65 63 65 |r many |are nece|
|00004120| 73 73 61 72 79 2c 20 61 | 6e 64 20 65 61 63 68 20 |ssary, a|nd each |
|00004130| 73 75 63 68 20 66 69 6c | 65 20 77 69 6c 6c 20 6e |such fil|e will n|
|00004140| 65 65 64 20 61 20 64 65 | 64 69 63 61 74 65 64 20 |eed a de|dicated |
|00004150| 73 65 74 20 6f 66 20 64 | 69 73 63 73 20 66 6f 72 |set of d|iscs for|
|00004160| 20 74 68 65 20 20 20 20 | 70 75 72 70 6f 73 65 2e | the |purpose.|
|00004170| 22 0d 01 9a 75 f1 27 22 | 53 6d 61 6c 6c 65 72 20 |"...u.'"|Smaller |
|00004180| 66 69 6c 65 73 20 77 69 | 6c 6c 20 62 65 20 63 6f |files wi|ll be co|
|00004190| 70 69 65 64 2c 20 61 66 | 74 65 72 20 74 68 65 20 |pied, af|ter the |
|000041a0| 6c 61 72 67 65 20 6f 6e | 65 73 20 68 61 76 65 20 |large on|es have |
|000041b0| 62 65 65 6e 20 64 65 61 | 6c 74 20 77 69 74 68 2c |been dea|lt with,|
|000041c0| 20 74 6f 20 61 20 20 20 | 61 6e 6f 74 68 65 72 20 | to a |another |
|000041d0| 64 69 73 63 20 6f 72 20 | 73 65 74 20 6f 66 20 64 |disc or |set of d|
|000041e0| 69 73 63 73 2e 22 0d 01 | a4 a2 f1 27 22 54 68 65 |iscs."..|...'"The|
|000041f0| 20 70 72 6f 67 72 61 6d | 20 77 61 69 74 73 20 66 | program| waits f|
|00004200| 6f 72 20 70 72 6f 6d 70 | 74 73 20 66 72 6f 6d 20 |or promp|ts from |
|00004210| 74 68 65 20 75 73 65 72 | 20 61 74 20 65 76 65 72 |the user| at ever|
|00004220| 79 20 73 74 61 67 65 2c | 20 73 74 61 72 74 69 6e |y stage,| startin|
|00004230| 67 20 6f 66 66 20 77 69 | 74 68 20 61 20 6c 69 73 |g off wi|th a lis|
|00004240| 74 20 6f 66 20 77 68 61 | 74 20 69 74 20 69 73 20 |t of wha|t it is |
|00004250| 70 72 6f 70 6f 73 69 6e | 67 20 74 6f 20 64 6f 2c |proposin|g to do,|
|00004260| 20 73 6f 20 69 74 20 63 | 61 6e 20 62 65 20 72 75 | so it c|an be ru|
|00004270| 6e 20 66 6f 72 20 69 6e | 66 6f 72 6d 61 74 69 6f |n for in|formatio|
|00004280| 6e 20 6f 6e 6c 79 2e 22 | 0d 01 ae 85 f1 27 22 49 |n only."|.....'"I|
|00004290| 74 73 20 65 73 74 69 6d | 61 74 65 73 20 6f 66 20 |ts estim|ates of |
|000042a0| 74 68 65 20 6e 75 6d 62 | 65 72 73 20 6f 66 20 64 |the numb|ers of d|
|000042b0| 69 73 63 73 20 6e 65 65 | 64 65 64 20 61 73 73 75 |iscs nee|ded assu|
|000042c0| 6d 65 20 74 68 61 74 20 | 38 30 30 4b 20 64 69 73 |me that |800K dis|
|000042d0| 63 73 20 61 72 65 20 62 | 65 69 6e 67 20 20 20 75 |cs are b|eing u|
|000042e0| 73 65 64 2c 20 74 68 6f | 75 67 68 20 74 68 69 73 |sed, tho|ugh this|
|000042f0| 20 69 73 20 6e 6f 74 20 | 6f 74 68 65 72 77 69 73 | is not |otherwis|
|00004300| 65 20 65 73 73 65 6e 74 | 69 61 6c 2e 22 0d 01 b8 |e essent|ial."...|
|00004310| 9d f1 27 22 44 69 73 63 | 73 20 6d 75 73 74 20 62 |..'"Disc|s must b|
|00004320| 65 20 61 6c 72 65 61 64 | 79 20 66 6f 72 6d 61 74 |e alread|y format|
|00004330| 74 65 64 20 62 75 74 20 | 6e 65 65 64 20 6e 6f 74 |ted but |need not|
|00004340| 20 62 65 20 65 6d 70 74 | 79 2e 20 54 68 65 20 70 | be empt|y. The p|
|00004350| 72 6f 67 72 61 6d 20 70 | 65 72 66 6f 72 6d 73 20 |rogram p|erforms |
|00004360| 61 6e 20 20 22 22 69 6e | 73 74 61 6e 74 20 65 72 |an ""in|stant er|
|00004370| 61 73 65 22 22 20 6f 6e | 20 65 61 63 68 20 64 69 |ase"" on| each di|
|00004380| 73 63 20 69 6e 73 65 72 | 74 65 64 2c 20 61 73 20 |sc inser|ted, as |
|00004390| 73 6f 6f 6e 20 61 73 20 | 61 20 6b 65 79 20 69 73 |soon as |a key is|
|000043a0| 20 70 72 65 73 73 65 64 | 2e 22 0d 01 c2 ef f1 27 | pressed|.".....'|
|000043b0| 22 46 69 6c 65 73 20 6f | 6e 20 74 68 65 20 66 6c |"Files o|n the fl|
|000043c0| 6f 70 70 69 65 73 20 61 | 72 65 20 67 69 76 65 6e |oppies a|re given|
|000043d0| 20 74 68 65 20 66 75 6c | 6c 20 70 61 74 68 2f 66 | the ful|l path/f|
|000043e0| 69 6c 65 6e 61 6d 65 20 | 74 68 61 74 20 74 68 65 |ilename |that the|
|000043f0| 79 20 68 61 76 65 20 6f | 6e 20 74 68 65 20 20 20 |y have o|n the |
|00004400| 20 68 61 72 64 20 64 69 | 73 63 2c 20 63 72 65 61 | hard di|sc, crea|
|00004410| 74 69 6e 67 20 61 6c 6c | 20 74 68 65 20 73 75 62 |ting all| the sub|
|00004420| 2d 64 69 72 65 63 74 6f | 72 69 65 73 20 6e 65 63 |-directo|ries nec|
|00004430| 65 73 73 61 72 79 2e 20 | 54 68 69 73 20 61 76 6f |essary. |This avo|
|00004440| 69 64 73 20 63 6c 61 73 | 68 65 73 20 61 6e 64 20 |ids clas|hes and |
|00004450| 20 65 6e 73 75 72 65 73 | 20 74 68 61 74 20 74 68 | ensures| that th|
|00004460| 65 20 52 65 73 74 6f 72 | 65 20 70 72 6f 67 72 61 |e Restor|e progra|
|00004470| 6d 20 77 69 6c 6c 20 70 | 75 74 20 74 68 65 6d 20 |m will p|ut them |
|00004480| 62 61 63 6b 20 69 6e 20 | 74 68 65 20 72 69 67 68 |back in |the righ|
|00004490| 74 20 70 6c 61 63 65 2e | 22 0d 01 cc 94 f1 22 46 |t place.|"....."F|
|000044a0| 69 6c 65 73 20 77 68 69 | 63 68 20 68 61 76 65 20 |iles whi|ch have |
|000044b0| 6e 6f 20 74 69 6d 65 73 | 74 61 6d 70 20 77 69 6c |no times|tamp wil|
|000044c0| 6c 20 61 6c 77 61 79 73 | 20 62 65 20 65 78 63 6c |l always| be excl|
|000044d0| 75 64 65 64 2c 20 61 73 | 20 77 69 6c 6c 20 66 69 |uded, as| will fi|
|000044e0| 6c 65 73 20 77 69 74 68 | 20 6e 6f 20 20 20 20 72 |les with| no r|
|000044f0| 65 61 64 20 61 63 63 65 | 73 73 2e 20 42 6f 74 68 |ead acce|ss. Both|
|00004500| 20 6f 66 20 74 68 65 73 | 65 20 61 74 74 72 69 62 | of thes|e attrib|
|00004510| 75 74 65 73 20 63 61 6e | 20 62 65 20 73 65 74 20 |utes can| be set |
|00004520| 62 79 20 74 68 65 20 75 | 73 65 72 2e 22 0d 01 d6 |by the u|ser."...|
|00004530| 2d e7 20 6f 6b 3d 31 3a | f1 27 8a 33 33 29 22 50 |-. ok=1:|.'.33)"P|
|00004540| 72 65 73 73 20 61 20 6b | 65 79 20 22 3b 3a f2 67 |ress a k|ey ";:.g|
|00004550| 65 74 3a db 3a 8b f1 27 | 27 27 0d 01 e0 1f f1 27 |et:.:..'|''.....'|
|00004560| 8a 33 30 29 22 48 41 52 | 44 20 44 49 53 43 20 52 |.30)"HAR|D DISC R|
|00004570| 45 53 54 4f 52 45 22 27 | 27 0d 01 ea 82 f1 27 22 |ESTORE"'|'.....'"|
|00004580| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 69 73 20 |This pro|gram is |
|00004590| 70 72 6f 76 69 64 65 64 | 20 70 72 69 6d 61 72 69 |provided| primari|
|000045a0| 6c 79 20 74 6f 20 72 65 | 73 74 6f 72 65 20 74 6f |ly to re|store to|
|000045b0| 20 74 68 65 20 68 61 72 | 64 20 64 69 73 63 20 74 | the har|d disc t|
|000045c0| 68 6f 73 65 20 6c 61 72 | 67 65 20 66 69 6c 65 73 |hose lar|ge files|
|000045d0| 77 68 69 63 68 20 68 61 | 76 65 20 62 65 65 6e 20 |which ha|ve been |
|000045e0| 73 70 6c 69 74 20 6f 76 | 65 72 20 61 20 73 65 74 |split ov|er a set|
|000045f0| 20 6f 66 20 64 69 73 63 | 73 2e 22 0d 01 f4 e2 f1 | of disc|s.".....|
|00004600| 27 22 49 74 20 63 61 6e | 20 68 6f 77 65 76 65 72 |'"It can| however|
|00004610| 20 63 6f 70 79 20 74 68 | 65 20 63 6f 6e 74 65 6e | copy th|e conten|
|00004620| 74 73 20 6f 66 20 61 6e | 79 20 66 6c 6f 70 70 79 |ts of an|y floppy|
|00004630| 20 74 6f 20 74 68 65 20 | 68 61 72 64 20 64 69 73 | to the |hard dis|
|00004640| 63 20 74 68 6f 75 67 68 | 20 69 66 20 74 68 65 20 |c though| if the |
|00004650| 20 20 66 6c 6f 70 70 79 | 20 77 61 73 20 6e 6f 74 | floppy| was not|
|00004660| 20 63 72 65 61 74 65 64 | 20 62 79 20 74 68 65 20 | created| by the |
|00004670| 42 61 63 6b 75 70 20 70 | 72 6f 67 72 61 6d 2c 20 |Backup p|rogram, |
|00004680| 69 74 20 73 68 6f 75 6c | 64 20 62 65 20 72 65 6d |it shoul|d be rem|
|00004690| 65 6d 62 65 72 65 64 20 | 74 68 61 74 20 74 68 65 |embered |that the|
|000046a0| 20 20 66 69 6c 65 73 20 | 77 69 6c 6c 20 68 61 76 | files |will hav|
|000046b0| 65 20 74 68 65 20 73 61 | 6d 65 20 70 61 74 68 2f |e the sa|me path/|
|000046c0| 66 69 6c 65 6e 61 6d 65 | 73 20 61 73 20 6f 6e 20 |filename|s as on |
|000046d0| 74 68 65 20 66 6c 6f 70 | 70 79 2e 22 3b 0d 01 fe |the flop|py.";...|
|000046e0| 8a f1 27 22 49 74 20 77 | 69 6c 6c 20 6f 66 66 65 |..'"It w|ill offe|
|000046f0| 72 20 74 68 65 20 6f 70 | 74 69 6f 6e 20 74 6f 20 |r the op|tion to |
|00004700| 63 6f 70 79 20 66 6f 72 | 20 65 61 63 68 20 66 69 |copy for| each fi|
|00004710| 6c 65 20 69 74 20 66 69 | 6e 64 73 20 6f 6e 20 74 |le it fi|nds on t|
|00004720| 68 65 20 66 6c 6f 70 70 | 79 2c 20 61 6e 64 20 77 |he flopp|y, and w|
|00004730| 61 72 6e 20 69 66 20 69 | 74 20 69 73 20 6e 6f 74 |arn if i|t is not|
|00004740| 20 61 20 64 69 73 63 20 | 63 72 65 61 74 65 64 20 | a disc |created |
|00004750| 62 79 20 74 68 65 20 42 | 61 63 6b 75 70 20 70 72 |by the B|ackup pr|
|00004760| 6f 67 72 61 6d 2e 22 0d | 02 08 77 f1 27 22 4c 69 |ogram.".|..w.'"Li|
|00004770| 6b 65 20 42 61 63 6b 75 | 70 2c 20 74 68 69 73 20 |ke Backu|p, this |
|00004780| 70 72 6f 67 72 61 6d 20 | 77 69 6c 6c 20 61 6c 73 |program |will als|
|00004790| 6f 20 63 72 65 61 74 65 | 20 77 68 61 74 65 76 65 |o create| whateve|
|000047a0| 72 20 64 69 72 65 63 74 | 6f 72 69 65 73 20 61 72 |r direct|ories ar|
|000047b0| 65 20 6e 65 63 65 73 73 | 61 72 79 2c 20 20 77 68 |e necess|ary, wh|
|000047c0| 65 6e 20 74 68 65 79 20 | 64 6f 20 6e 6f 74 20 61 |en they |do not a|
|000047d0| 6c 72 65 61 64 79 20 65 | 78 69 73 74 2e 22 0d 02 |lready e|xist."..|
|000047e0| 12 80 f1 27 22 46 6f 72 | 20 6f 74 68 65 72 20 74 |...'"For| other t|
|000047f0| 68 61 6e 20 74 68 65 20 | 73 70 6c 69 74 20 6c 61 |han the |split la|
|00004800| 72 67 65 20 66 69 6c 65 | 73 2c 20 74 68 65 20 2a |rge file|s, the *|
|00004810| 43 4f 50 59 20 63 6f 6d | 6d 61 6e 64 20 63 61 6e |COPY com|mand can|
|00004820| 20 62 65 20 75 73 65 64 | 20 69 6e 73 74 65 61 64 | be used| instead|
|00004830| 2c 20 69 66 20 70 72 65 | 66 65 72 72 65 64 2c 20 |, if pre|ferred, |
|00004840| 6f 72 20 74 68 65 20 44 | 65 73 6b 74 6f 70 20 63 |or the D|esktop c|
|00004850| 6f 70 79 20 66 61 63 69 | 6c 69 74 79 2e 22 0d 02 |opy faci|lity."..|
|00004860| 1c 5e f1 27 27 22 4e 6f | 74 65 73 3a 22 27 27 22 |.^.''"No|tes:"''"|
|00004870| 49 66 20 74 68 65 20 70 | 72 6f 67 72 61 6d 73 20 |If the p|rograms |
|00004880| 61 72 65 20 72 75 6e 20 | 66 72 6f 6d 20 44 65 73 |are run |from Des|
|00004890| 6b 74 6f 70 2c 20 74 68 | 65 79 20 72 65 74 75 72 |ktop, th|ey retur|
|000048a0| 6e 20 74 6f 20 44 65 73 | 6b 74 6f 70 20 6f 6e 20 |n to Des|ktop on |
|000048b0| 63 6f 6d 70 6c 65 74 69 | 6f 6e 2e 22 0d 02 26 5e |completi|on."..&^|
|000048c0| f1 27 22 49 66 20 74 68 | 65 20 42 61 63 6b 75 70 |.'"If th|e Backup|
|000048d0| 20 70 72 6f 67 72 61 6d | 20 69 73 20 72 75 6e 20 | program| is run |
|000048e0| 77 69 74 68 20 79 65 61 | 72 3d 31 39 30 30 20 69 |with yea|r=1900 i|
|000048f0| 74 20 74 68 65 6e 20 69 | 6e 63 6c 75 64 65 73 20 |t then i|ncludes |
|00004900| 74 68 65 20 75 6e 2d 74 | 69 6d 65 73 74 61 6d 70 |the un-t|imestamp|
|00004910| 65 64 20 66 69 6c 65 73 | 2e 22 0d 02 30 7b f1 22 |ed files|."..0{."|
|00004920| 54 68 69 73 20 63 61 6e | 20 62 65 20 75 73 65 64 |This can| be used|
|00004930| 20 74 6f 20 63 72 65 61 | 74 65 20 61 20 62 61 63 | to crea|te a bac|
|00004940| 6b 75 70 20 66 6f 72 20 | 61 6c 6c 20 74 68 65 20 |kup for |all the |
|00004950| 70 72 6f 67 72 61 6d 20 | 61 6e 64 20 6d 69 73 63 |program |and misc|
|00004960| 65 6c 6c 61 6e 65 6f 75 | 73 20 66 69 6c 65 73 2c |ellaneou|s files,|
|00004970| 63 6f 72 72 65 63 74 6c | 79 20 6e 65 73 74 65 64 |correctl|y nested|
|00004980| 20 69 6e 20 73 75 62 2d | 64 69 72 65 63 74 6f 72 | in sub-|director|
|00004990| 69 65 73 2e 22 0d 02 3a | 30 e7 20 6f 6b 3d 31 3a |ies."..:|0. ok=1:|
|000049a0| f1 27 8a 33 33 2c 33 30 | 29 22 50 72 65 73 73 20 |.'.33,30|)"Press |
|000049b0| 61 20 6b 65 79 20 22 3b | 3a f2 67 65 74 3a db 3a |a key ";|:.get:.:|
|000049c0| 8b f1 27 27 27 0d 02 44 | 19 f1 27 8a 33 33 29 22 |..'''..D|..'.33)"|
|000049d0| 46 55 52 54 48 45 52 20 | 4e 4f 54 45 53 22 0d 02 |FURTHER |NOTES"..|
|000049e0| 4e cb f1 27 22 54 68 65 | 20 70 72 6f 67 72 61 6d |N..'"The| program|
|000049f0| 73 20 61 72 65 20 77 72 | 69 74 74 65 6e 20 61 73 |s are wr|itten as|
|00004a00| 73 75 6d 69 6e 67 20 74 | 68 61 74 20 74 68 65 20 |suming t|hat the |
|00004a10| 68 61 72 64 20 64 69 73 | 63 20 69 73 20 64 72 69 |hard dis|c is dri|
|00004a20| 76 65 20 34 20 61 6e 64 | 20 74 68 65 20 66 6c 6f |ve 4 and| the flo|
|00004a30| 70 70 69 65 73 77 69 6c | 6c 20 62 65 20 75 73 65 |ppieswil|l be use|
|00004a40| 64 20 69 6e 20 64 72 69 | 76 65 20 30 3b 20 61 6c |d in dri|ve 0; al|
|00004a50| 73 6f 20 74 68 61 74 20 | 61 20 66 69 6c 65 20 77 |so that |a file w|
|00004a60| 69 6c 6c 20 62 65 20 74 | 72 65 61 74 65 64 20 61 |ill be t|reated a|
|00004a70| 73 20 6c 61 72 67 65 2c | 20 6e 65 65 64 69 6e 67 |s large,| needing|
|00004a80| 20 69 74 73 20 6f 77 6e | 20 64 69 73 63 2c 20 69 | its own| disc, i|
|00004a90| 66 20 69 74 20 65 78 63 | 65 65 64 73 20 34 30 30 |f it exc|eeds 400|
|00004aa0| 20 4b 62 79 74 65 73 2e | 22 0d 02 58 77 f1 27 22 | Kbytes.|"..Xw.'"|
|00004ab0| 54 68 65 73 65 20 66 69 | 67 75 72 65 73 20 63 61 |These fi|gures ca|
|00004ac0| 6e 20 62 65 20 61 6d 65 | 6e 64 65 64 20 62 79 20 |n be ame|nded by |
|00004ad0| 75 73 69 6e 67 20 6f 70 | 74 69 6f 6e 20 35 2e 22 |using op|tion 5."|
|00004ae0| 27 22 54 6f 20 75 73 65 | 20 61 20 22 22 4e 45 54 |'"To use| a ""NET|
|00004af0| 22 22 20 73 70 65 63 69 | 66 69 63 61 74 69 6f 6e |"" speci|fication|
|00004b00| 20 79 6f 75 20 6d 75 73 | 74 20 62 65 20 61 6c 72 | you mus|t be alr|
|00004b10| 65 61 64 79 20 6c 6f 67 | 67 65 64 20 6f 6e 2e 22 |eady log|ged on."|
|00004b20| 0d 02 62 4c f1 22 59 6f | 75 20 63 61 6e 6e 6f 74 |..bL."Yo|u cannot|
|00004b30| 20 73 65 74 20 64 72 69 | 76 65 73 20 74 6f 20 61 | set dri|ves to a|
|00004b40| 6e 79 74 68 69 6e 67 20 | 6e 6f 74 20 65 78 69 73 |nything |not exis|
|00004b50| 74 69 6e 67 20 6f 6e 20 | 74 68 65 20 6d 61 63 68 |ting on |the mach|
|00004b60| 69 6e 65 20 69 6e 20 75 | 73 65 2e 22 0d 02 6c f0 |ine in u|se."..l.|
|00004b70| f1 27 22 41 64 64 69 74 | 69 6f 6e 61 6c 6c 79 20 |.'"Addit|ionally |
|00004b80| 74 68 65 20 22 22 65 72 | 61 73 65 22 22 20 66 75 |the ""er|ase"" fu|
|00004b90| 6e 63 74 69 6f 6e 28 6f | 6e 20 73 6d 61 6c 6c 65 |nction(o|n smalle|
|00004ba0| 72 2d 66 69 6c 65 73 20 | 64 69 73 63 73 20 6f 6e |r-files |discs on|
|00004bb0| 6c 79 29 20 63 61 6e 20 | 62 65 20 73 75 70 70 72 |ly) can |be suppr|
|00004bc0| 65 73 73 65 64 69 66 20 | 70 72 65 66 65 72 72 65 |essedif |preferre|
|00004bd0| 64 2c 20 73 6f 20 74 68 | 61 74 20 74 68 65 20 62 |d, so th|at the b|
|00004be0| 61 63 6b 75 70 73 20 61 | 63 63 75 6d 75 6c 61 74 |ackups a|ccumulat|
|00004bf0| 65 20 6f 6e 20 74 68 65 | 20 6f 6e 65 20 64 69 73 |e on the| one dis|
|00004c00| 63 2e 54 68 69 73 20 69 | 73 20 72 65 63 6f 6d 6d |c.This i|s recomm|
|00004c10| 65 6e 64 65 64 6f 6e 6c | 79 20 69 66 20 74 68 65 |endedonl|y if the|
|00004c20| 20 73 6d 61 6c 6c 65 72 | 20 66 69 6c 65 73 20 63 | smaller| files c|
|00004c30| 61 6e 20 61 6c 77 61 79 | 73 20 62 65 20 61 63 63 |an alway|s be acc|
|00004c40| 6f 6d 6d 6f 64 61 74 65 | 64 20 6f 6e 20 61 20 73 |ommodate|d on a s|
|00004c50| 69 6e 67 6c 65 20 64 69 | 73 63 2e 22 0d 02 76 9f |ingle di|sc."..v.|
|00004c60| f1 27 22 50 72 65 73 73 | 69 6e 67 20 45 73 63 61 |.'"Press|ing Esca|
|00004c70| 70 65 20 28 65 78 63 65 | 70 74 20 77 68 65 6e 20 |pe (exce|pt when |
|00004c80| 69 6e 76 69 74 65 64 29 | 20 77 69 6c 6c 20 6a 75 |invited)| will ju|
|00004c90| 73 74 20 61 62 6f 72 74 | 20 74 68 65 20 70 72 6f |st abort| the pro|
|00004ca0| 67 72 61 6d 2e 20 49 6e | 20 74 68 65 20 65 76 65 |gram. In| the eve|
|00004cb0| 6e 74 20 74 68 65 20 70 | 72 6f 67 72 61 6d 20 73 |nt the p|rogram s|
|00004cc0| 74 69 63 6b 73 20 6f 6e | 20 61 20 66 61 75 6c 74 |ticks on| a fault|
|00004cd0| 79 20 66 69 6c 65 2c 20 | 72 65 2d 72 75 6e 20 77 |y file, |re-run w|
|00004ce0| 69 74 68 20 63 6f 6e 66 | 69 72 6d 2f 72 65 6a 65 |ith conf|irm/reje|
|00004cf0| 63 74 20 6f 70 74 69 6f | 6e 2e 22 0d 02 80 47 f1 |ct optio|n."...G.|
|00004d00| 27 27 22 41 20 66 69 6c | 65 20 63 61 6e 20 62 65 |''"A fil|e can be|
|00004d10| 20 67 69 76 65 6e 20 61 | 20 63 75 72 72 65 6e 74 | given a| current|
|00004d20| 20 74 69 6d 65 73 74 61 | 6d 70 20 77 69 74 68 20 | timesta|mp with |
|00004d30| 2a 53 54 41 4d 50 20 3c | 66 69 6c 65 6e 61 6d 65 |*STAMP <|filename|
|00004d40| 3e 22 0d 02 8a 93 f1 27 | 27 22 41 20 66 69 6c 65 |>".....'|'"A file|
|00004d50| 20 6f 66 20 74 79 70 65 | 20 32 38 38 20 77 69 6c | of type| 288 wil|
|00004d60| 6c 20 62 65 20 74 72 65 | 61 74 65 64 20 61 73 20 |l be tre|ated as |
|00004d70| 6c 61 72 67 65 2c 20 77 | 69 74 68 20 69 74 73 20 |large, w|ith its |
|00004d80| 6f 77 6e 20 64 69 73 63 | 20 69 2e 65 2e 22 27 22 |own disc| i.e."'"|
|00004d90| 2a 53 45 54 54 59 50 45 | 20 3c 66 69 6c 65 6e 61 |*SETTYPE| <filena|
|00004da0| 6d 65 3e 20 32 38 38 20 | 20 20 20 20 28 69 66 20 |me> 288 | (if |
|00004db0| 74 68 69 73 20 64 6f 65 | 73 20 6e 6f 74 20 61 66 |this doe|s not af|
|00004dc0| 66 65 63 74 20 69 74 73 | 20 6e 6f 72 6d 61 6c 20 |fect its| normal |
|00004dd0| 75 73 65 29 22 0d 02 94 | 65 f1 27 27 22 46 6f 72 |use)"...|e.''"For|
|00004de0| 20 74 6f 74 61 6c 20 73 | 65 63 75 72 69 74 79 2c | total s|ecurity,|
|00004df0| 20 65 61 63 68 20 73 65 | 74 20 6f 66 20 64 69 73 | each se|t of dis|
|00004e00| 63 73 20 72 65 66 65 72 | 72 65 64 20 74 6f 20 73 |cs refer|red to s|
|00004e10| 68 6f 75 6c 64 20 62 65 | 20 74 77 6f 20 73 65 74 |hould be| two set|
|00004e20| 73 2c 20 75 73 65 64 20 | 20 20 20 20 20 61 6c 74 |s, used | alt|
|00004e30| 65 72 6e 61 74 65 6c 79 | 2e 22 0d 02 9e 28 e7 20 |ernately|."...(. |
|00004e40| 6f 6b 3d 31 3a f1 27 8a | 33 33 2c 33 30 29 22 50 |ok=1:.'.|33,30)"P|
|00004e50| 72 65 73 73 20 61 20 6b | 65 79 20 22 3b 3a f2 67 |ress a k|ey ";:.g|
|00004e60| 65 74 0d 02 a8 08 ef 33 | 3a e1 0d 02 b2 04 0d 02 |et.....3|:.......|
|00004e70| bc 0a dd 20 f2 67 65 74 | 0d 02 c6 1a f5 3a c8 97 |... .get|.....:..|
|00004e80| 20 78 2c 79 2c 7a 3a fd | 20 7a 3d 30 3a 2a 46 58 | x,y,z:.| z=0:*FX|
|00004e90| 32 31 0d 02 d0 20 f5 3a | 77 3d a6 30 3a c8 97 20 |21... .:|w=.0:.. |
|00004ea0| 78 2c 79 2c 7a 3a fd 20 | 77 3e 2d 31 20 84 20 7a |x,y,z:. |w>-1 . z|
|00004eb0| 3e 30 0d 02 da 05 e1 0d | 02 e4 04 0d 02 ee 0a dd |>0......|........|
|00004ec0| 20 f2 65 6e 64 0d 02 f8 | 0f e7 20 70 66 6c 3a d9 | .end...|.. pfl:.|
|00004ed0| 23 70 66 6c 0d 03 02 38 | e7 28 9f 20 80 26 46 46 |#pfl...8|.(. .&FF|
|00004ee0| 29 3d 26 41 43 3a 58 24 | 3d 22 20 28 22 2b 68 61 |)=&AC:X$|=" ("+ha|
|00004ef0| 72 64 24 2b 22 29 22 20 | 8b 20 58 24 3d 22 20 20 |rd$+")" |. X$=" |
|00004f00| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 0d 03 0c 23 |at line |"+.....#|
|00004f10| f1 8a 30 29 f6 24 3b 3a | e7 20 9f 3d 31 37 20 84 |..0).$;:|. .=17 .|
|00004f20| 20 9f 3d 26 46 38 3a f1 | 20 8b 20 f1 20 58 24 0d | .=&F8:.| . . X$.|
|00004f30| 03 16 08 ef 33 3a e0 0d | 03 20 04 0d 03 2a 0d dd |....3:..|. ...*..|
|00004f40| 20 f2 63 68 61 6e 67 65 | 0d 03 34 21 70 66 6c 3d | .change|..4!pfl=|
|00004f50| ad 28 22 3c 48 44 42 24 | 44 69 72 3e 2e 21 50 61 |.("<HDB$|Dir>.!Pa|
|00004f60| 72 61 6d 65 74 65 72 22 | 29 0d 03 3e 0e 2a 50 4f |rameter"|)..>.*PO|
|00004f70| 49 4e 54 45 52 20 30 0d | 03 48 07 f5 3a db 0d 03 |INTER 0.|.H..:...|
|00004f80| 52 20 f1 8a 33 31 2c 33 | 29 22 44 52 49 56 45 53 |R ..31,3|)"DRIVES|
|00004f90| 20 61 6e 64 20 4f 50 54 | 49 4f 4e 53 22 3b 0d 03 | and OPT|IONS";..|
|00004fa0| 5c 44 f1 8a 31 32 2c 36 | 29 22 54 68 65 20 70 61 |\D..12,6|)"The pa|
|00004fb0| 74 68 20 73 70 65 63 69 | 66 69 63 61 74 69 6f 6e |th speci|fication|
|00004fc0| 20 66 6f 72 20 74 68 65 | 20 68 61 72 64 20 64 69 | for the| hard di|
|00004fd0| 73 63 20 69 73 20 63 75 | 72 72 65 6e 74 6c 79 3a |sc is cu|rrently:|
|00004fe0| 22 3b 0d 03 66 19 f1 8a | 34 30 2d a9 68 61 72 64 |";..f...|40-.hard|
|00004ff0| 24 2f 32 2c 38 29 68 61 | 72 64 24 0d 03 70 52 f1 |$/2,8)ha|rd$..pR.|
|00005000| 8a 35 2c 31 30 29 22 28 | 20 45 78 61 6d 70 6c 65 |.5,10)"(| Example|
|00005010| 73 2d 20 20 20 41 44 46 | 53 3a 3a 34 2e 24 20 20 |s- ADF|S::4.$ |
|00005020| 20 41 44 46 53 3a 3a 35 | 2e 24 2e 44 69 72 6e 61 | ADFS::5|.$.Dirna|
|00005030| 6d 65 20 20 20 4e 45 54 | 3a 26 20 20 20 4e 45 54 |me NET|:& NET|
|00005040| 3a 24 2e 44 69 72 6e 61 | 6d 65 20 29 22 0d 03 7a |:$.Dirna|me )"..z|
|00005050| 52 f1 8a 35 2c 31 31 29 | 22 28 20 41 6c 77 61 79 |R..5,11)|"( Alway|
|00005060| 73 20 62 65 67 69 6e 6e | 69 6e 67 20 77 69 74 68 |s beginn|ing with|
|00005070| 20 61 20 66 69 6c 69 6e | 67 20 73 79 73 74 65 6d | a filin|g system|
|00005080| 20 61 6e 64 20 65 6e 64 | 69 6e 67 20 77 69 74 68 | and end|ing with|
|00005090| 20 61 20 64 69 72 65 63 | 74 6f 72 79 20 29 22 0d | a direc|tory )".|
|000050a0| 03 84 3f f1 8a 31 37 2c | 31 33 29 22 54 68 65 20 |..?..17,|13)"The |
|000050b0| 66 6c 6f 70 70 79 20 64 | 69 73 63 20 64 72 69 76 |floppy d|isc driv|
|000050c0| 65 20 74 6f 20 62 65 20 | 75 73 65 64 20 69 73 20 |e to be |used is |
|000050d0| 73 65 74 20 74 6f 20 22 | 3b 66 6c 6f 70 3b 0d 03 |set to "|;flop;..|
|000050e0| 8e 1b e7 20 65 73 66 3a | 58 24 3d 22 22 20 8b 20 |... esf:|X$="" . |
|000050f0| 58 24 3d 22 6e 6f 74 20 | 22 0d 03 98 4c f1 8a 31 |X$="not |"...L..1|
|00005100| 31 2c 31 35 29 22 53 6d | 61 6c 6c 2d 66 69 6c 65 |1,15)"Sm|all-file|
|00005110| 20 64 69 73 63 73 20 77 | 69 6c 6c 20 22 3b 58 24 | discs w|ill ";X$|
|00005120| 3b 22 62 65 20 65 72 61 | 73 65 64 20 62 65 66 6f |;"be era|sed befo|
|00005130| 72 65 20 62 65 69 6e 67 | 20 63 6f 70 69 65 64 20 |re being| copied |
|00005140| 74 6f 2e 22 3b 0d 03 a2 | 42 f1 8a 31 37 2c 31 37 |to.";...|B..17,17|
|00005150| 29 22 46 69 6c 65 73 20 | 77 69 6c 6c 20 62 65 20 |)"Files |will be |
|00005160| 74 72 65 61 74 65 64 20 | 61 73 20 6c 61 72 67 65 |treated |as large|
|00005170| 20 77 68 65 6e 20 6f 76 | 65 72 20 22 3b 73 66 6c | when ov|er ";sfl|
|00005180| 69 6d 3b 22 4b 22 3b 0d | 03 ac 3e f1 8a 31 39 2c |im;"K";.|..>..19,|
|00005190| 32 30 29 22 44 6f 20 79 | 6f 75 20 77 69 73 68 20 |20)"Do y|ou wish |
|000051a0| 74 6f 20 63 68 61 6e 67 | 65 20 61 6e 79 20 6f 66 |to chang|e any of|
|000051b0| 20 74 68 65 73 65 20 3f | 20 28 59 2f 4e 29 20 22 | these ?| (Y/N) "|
|000051c0| 3b 3a 58 3d a5 0d 03 b6 | 29 e7 28 58 20 80 26 44 |;:X=....|).(X .&D|
|000051d0| 46 29 3c 3e 37 38 3a f1 | 22 59 65 73 22 3b 20 8b |F)<>78:.|"Yes"; .|
|000051e0| 20 d9 23 70 66 6c 3a 70 | 66 6c 3d 30 3a e1 0d 03 | .#pfl:p|fl=0:...|
|000051f0| c0 3f f1 8a 35 2c 32 32 | 29 22 45 6e 74 65 72 20 |.?..5,22|)"Enter |
|00005200| 6e 65 77 20 76 61 6c 75 | 65 73 20 6f 72 20 70 72 |new valu|es or pr|
|00005210| 65 73 73 20 3c 52 45 54 | 55 52 4e 3e 20 66 6f 72 |ess <RET|URN> for|
|00005220| 20 6e 6f 20 63 68 61 6e | 67 65 3a 22 3b 0d 03 ca | no chan|ge:";...|
|00005230| 2e c8 99 20 22 41 44 46 | 53 5f 44 72 69 76 65 73 |... "ADF|S_Drives|
|00005240| 22 20 b8 2c 66 6c 6f 70 | 73 3a 6d 61 78 66 6c 24 |" .,flop|s:maxfl$|
|00005250| 3d c3 28 66 6c 6f 70 73 | 2d 31 29 0d 03 d4 07 ea |=.(flops|-1).....|
|00005260| 20 85 0d 03 de 21 ee 20 | 85 20 ea 3a e7 20 9f 3d | ....!. |. .:. .=|
|00005270| 31 37 3a d9 23 70 66 6c | 3a f7 20 85 3a f9 20 8b |17:.#pfl|:. .:. .|
|00005280| 20 ef 37 0d 03 e8 0b ef | 31 3a f5 3a ef 37 0d 03 | .7.....|1:.:.7..|
|00005290| f2 0f f1 8a 35 2c 32 34 | 29 89 37 33 3b 0d 03 fc |....5,24|).73;...|
|000052a0| 24 e8 8a 35 2c 32 34 29 | 22 48 61 72 64 20 64 69 |$..5,24)|"Hard di|
|000052b0| 73 63 20 70 61 74 68 20 | 73 70 65 63 3a 20 22 58 |sc path |spec: "X|
|000052c0| 24 0d 04 06 25 e7 20 58 | 24 3d 22 22 3a f1 8a 32 |$...%. X|$="":..2|
|000052d0| 36 2c 32 34 29 68 61 72 | 64 24 3b 20 8b 20 68 61 |6,24)har|d$; . ha|
|000052e0| 72 64 24 3d 58 24 0d 04 | 10 21 fd 20 a7 68 61 72 |rd$=X$..|.!. .har|
|000052f0| 64 24 2c 22 3a 22 29 20 | 84 20 a7 68 61 72 64 24 |d$,":") |. .hard$|
|00005300| 2c 22 4e 45 54 22 29 0d | 04 1a 22 ff 28 22 43 41 |,"NET").|..".("CA|
|00005310| 54 20 22 2b 68 61 72 64 | 24 2b 22 20 7b 20 3e 20 |T "+hard|$+" { > |
|00005320| 6e 75 6c 6c 3a 20 7d 22 | 29 0d 04 24 2a 58 3d a7 |null: }"|)..$*X=.|
|00005330| 68 61 72 64 24 2c 22 3a | 3a 22 29 2b 32 3a e7 20 |hard$,":|:")+2:. |
|00005340| 58 3c 33 3a 58 3d a7 68 | 61 72 64 24 2c 22 3a 22 |X<3:X=.h|ard$,":"|
|00005350| 29 2b 31 0d 04 2e 2c e7 | 20 a7 68 61 72 64 24 2c |)+1...,.| .hard$,|
|00005360| 22 4e 45 54 22 29 3a 68 | 64 72 3d 39 20 8b 20 68 |"NET"):h|dr=9 . h|
|00005370| 64 72 3d bb c1 68 61 72 | 64 24 2c 58 2c 31 29 0d |dr=..har|d$,X,1).|
|00005380| 04 38 1c e7 20 66 6c 6f | 70 73 3d 31 20 80 20 68 |.8.. flo|ps=1 . h|
|00005390| 64 72 3d 30 3a 85 20 30 | 2c 22 22 0d 04 42 22 e7 |dr=0:. 0|,""..B".|
|000053a0| 20 66 6c 6f 70 73 3e 32 | 20 84 28 66 6c 6f 70 73 | flops>2| .(flops|
|000053b0| 3e 31 20 80 20 68 64 72 | 3e 31 29 20 8c 0d 04 4c |>1 . hdr|>1) ...L|
|000053c0| 0b ef 31 3a f5 3a ef 37 | 0d 04 56 26 f1 8a 35 2c |..1:.:.7|..V&..5,|
|000053d0| 32 36 29 22 46 6c 6f 70 | 70 79 20 64 72 69 76 65 |26)"Flop|py drive|
|000053e0| 20 20 28 30 2d 22 3b 6d | 61 78 66 6c 24 3b 0d 04 | (0-";m|axfl$;..|
|000053f0| 60 21 e8 22 29 3a 20 22 | 58 24 3a 58 3d bb 58 24 |`!."): "|X$:X=.X$|
|00005400| 3a e7 20 58 24 3d 22 22 | 3a 58 3d 66 6c 6f 70 0d |:. X$=""|:X=flop.|
|00005410| 04 6a 36 e7 94 58 3c 66 | 6c 6f 70 73 20 80 20 58 |.j6..X<f|lops . X|
|00005420| 3c 3e 68 64 72 3a 66 6c | 6f 70 3d 58 3a f1 8a 32 |<>hdr:fl|op=X:..2|
|00005430| 36 2c 32 36 29 3b 58 3b | 8b f1 8a 32 36 2c 32 36 |6,26);X;|...26,26|
|00005440| 29 89 35 30 3b 0d 04 74 | 15 fd 20 66 6c 6f 70 3d |).50;..t|.. flop=|
|00005450| 58 20 80 20 58 3c 3e 68 | 64 72 0d 04 7e 05 cc 0d |X . X<>h|dr..~...|
|00005460| 04 88 21 e7 20 66 6c 6f | 70 73 3d 31 3a 66 6c 6f |..!. flo|ps=1:flo|
|00005470| 70 3d 30 20 8b 20 66 6c | 6f 70 3d 31 2d 68 64 72 |p=0 . fl|op=1-hdr|
|00005480| 0d 04 92 23 f1 8a 35 2c | 32 36 29 22 46 6c 6f 70 |...#..5,|26)"Flop|
|00005490| 70 79 20 64 72 69 76 65 | 20 20 20 20 22 3b 66 6c |py drive| ";fl|
|000054a0| 6f 70 3b 0d 04 9c 05 cd | 0d 04 a6 0b ef 31 3a f5 |op;.....|.....1:.|
|000054b0| 3a ef 37 0d 04 b0 37 f1 | 8a 35 2c 32 38 29 22 53 |:.7...7.|.5,28)"S|
|000054c0| 6d 61 6c 6c 2d 66 69 6c | 65 20 64 69 73 63 73 20 |mall-fil|e discs |
|000054d0| 74 6f 20 62 65 20 65 72 | 61 73 65 64 3f 20 28 59 |to be er|ased? (Y|
|000054e0| 2f 4e 29 20 22 3b 3a 58 | 3d a5 0d 04 ba 29 fd 20 |/N) ";:X|=....). |
|000054f0| 58 3d 31 33 20 84 28 58 | 20 80 26 44 46 29 3d 97 |X=13 .(X| .&DF)=.|
|00005500| 22 59 22 20 84 20 28 58 | 20 80 26 44 46 29 3d 97 |"Y" . (X| .&DF)=.|
|00005510| 22 4e 22 0d 04 c4 2b e7 | 20 58 3d 31 33 3a 20 8b |"N"...+.| X=13: .|
|00005520| 20 e7 20 28 58 20 80 26 | 44 46 29 3d 97 22 59 22 | . (X .&|DF)=."Y"|
|00005530| 3a 65 73 66 3d b9 20 8b | 20 65 73 66 3d a3 0d 04 |:esf=. .| esf=...|
|00005540| ce 28 e7 20 65 73 66 3a | f1 8a 34 32 2c 32 38 29 |.(. esf:|..42,28)|
|00005550| 22 59 65 73 22 3b 20 8b | 20 f1 8a 34 32 2c 32 38 |"Yes"; .| ..42,28|
|00005560| 29 22 4e 6f 22 3b 0d 04 | d8 0b ef 31 3a f5 3a ef |)"No";..|...1:.:.|
|00005570| 37 0d 04 e2 41 e8 8a 35 | 2c 33 30 29 22 54 72 65 |7...A..5|,30)"Tre|
|00005580| 61 74 20 66 69 6c 65 73 | 20 61 73 20 6c 61 72 67 |at files| as larg|
|00005590| 65 20 77 68 65 6e 20 6f | 76 65 72 20 28 65 6e 74 |e when o|ver (ent|
|000055a0| 65 72 20 2e 2e 2e 4b 29 | 20 22 58 24 3a 58 3d bb |er ...K)| "X$:X=.|
|000055b0| 58 24 0d 04 ec 32 e7 20 | 58 3e 31 30 20 80 20 c2 |X$...2. |X>10 . .|
|000055c0| 58 24 2c 31 29 3d 22 4b | 22 3a 73 66 6c 69 6d 3d |X$,1)="K|":sflim=|
|000055d0| 58 20 8b 20 58 3d 30 3a | f1 8a 34 39 2c 33 30 29 |X . X=0:|..49,30)|
|000055e0| 89 33 30 3b 0d 04 f6 23 | e7 20 58 24 3d 22 22 3a |.30;...#|. X$="":|
|000055f0| 58 3d 73 66 6c 69 6d 3a | f1 8a 34 39 2c 33 30 29 |X=sflim:|..49,30)|
|00005600| 3b 58 3b 22 4b 22 3b 0d | 05 00 0d fd 20 58 3d 73 |;X;"K";.|.... X=s|
|00005610| 66 6c 69 6d 0d 05 0a 20 | f1 8a 33 36 2c 33 31 29 |flim... |..36,31)|
|00005620| 22 50 72 65 73 73 20 61 | 20 6b 65 79 20 22 3b 3a |"Press a| key ";:|
|00005630| f2 67 65 74 0d 05 14 38 | cf 23 70 66 6c 3d 30 3a |.get...8|.#pfl=0:|
|00005640| d5 23 70 66 6c 2c 65 73 | 66 3a d5 23 70 66 6c 2c |.#pfl,es|f:.#pfl,|
|00005650| 66 6c 6f 70 3a d5 23 70 | 66 6c 2c 68 61 72 64 24 |flop:.#p|fl,hard$|
|00005660| 3a f1 23 70 66 6c 2c 73 | 66 6c 69 6d 0d 05 1e 07 |:.#pfl,s|flim....|
|00005670| f7 20 85 0d 05 28 07 fd | 20 30 0d 05 32 05 e1 0d |. ...(..| 0..2...|
|00005680| 05 3c 04 0d 05 46 0d dd | 20 f2 6d 61 6b 65 69 74 |.<...F..| .makeit|
|00005690| 0d 05 50 21 70 66 6c 3d | ae 28 22 3c 48 44 42 24 |..P!pfl=|.("<HDB$|
|000056a0| 44 69 72 3e 2e 21 50 61 | 72 61 6d 65 74 65 72 22 |Dir>.!Pa|rameter"|
|000056b0| 29 0d 05 5a 2c 65 73 66 | 3d 31 3a 66 6c 6f 70 3d |)..Z,esf|=1:flop=|
|000056c0| 30 3a 68 61 72 64 24 3d | 22 41 44 46 53 3a 3a 34 |0:hard$=|"ADFS::4|
|000056d0| 2e 24 22 3a 73 66 6c 69 | 6d 3d 34 30 30 0d 05 64 |.$":sfli|m=400..d|
|000056e0| 30 d5 23 70 66 6c 2c 65 | 73 66 3a d5 23 70 66 6c |0.#pfl,e|sf:.#pfl|
|000056f0| 2c 66 6c 6f 70 3a d5 23 | 70 66 6c 2c 68 61 72 64 |,flop:.#|pfl,hard|
|00005700| 24 3a f1 23 70 66 6c 2c | 73 66 6c 69 6d 0d 05 6e |$:.#pfl,|sflim..n|
|00005710| 0f d9 23 70 66 6c 3a 70 | 66 6c 3d 30 0d 05 78 05 |..#pfl:p|fl=0..x.|
|00005720| e1 0d 05 82 04 0d 05 8c | 0c dd 20 a4 63 68 65 63 |........|.. .chec|
|00005730| 6b 0d 05 96 0d de 20 62 | 66 72 20 31 30 30 0d 05 |k..... b|fr 100..|
|00005740| a0 38 c8 99 20 22 58 4f | 53 5f 52 65 61 64 56 61 |.8.. "XO|S_ReadVa|
|00005750| 72 56 61 6c 22 2c 22 48 | 44 42 24 44 69 72 22 2c |rVal","H|DB$Dir",|
|00005760| 62 66 72 2c 39 39 2c 30 | 20 b8 2c 2c 52 32 2c 52 |bfr,99,0| .,,R2,R|
|00005770| 33 3b 66 6c 61 67 0d 05 | aa 54 e7 28 66 6c 61 67 |3;flag..|.T.(flag|
|00005780| 20 80 20 31 29 84 20 52 | 32 3c 31 3a db 3a f1 27 | . 1). R|2<1:.:.'|
|00005790| 27 22 55 73 65 20 74 68 | 69 73 20 70 72 6f 67 72 |'"Use th|is progr|
|000057a0| 61 6d 20 6f 6e 6c 79 20 | 76 69 61 20 74 68 65 20 |am only |via the |
|000057b0| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 28 21 48 44 |applicat|ion (!HD|
|000057c0| 42 61 63 6b 75 70 29 22 | 3a e0 0d 05 b4 0d 62 66 |Backup)"|:.....bf|
|000057d0| 72 21 52 32 3d 31 33 0d | 05 be 09 3d 24 62 66 72 |r!R2=13.|...=$bfr|
|000057e0| 0d 05 c8 04 0d 05 d2 0b | dd 20 f2 70 72 6f 6e 0d |........|. .pron.|
|000057f0| 05 dc 0e db 3a 87 3a 70 | 62 3d 96 2d 34 0d 05 e6 |....:.:p|b=.-4...|
|00005800| 29 ef 32 2c 31 2c 32 37 | 2c 31 2c 30 2c 31 2c 32 |).2,1,27|,1,0,1,2|
|00005810| 37 2c 31 2c 30 2c 31 2c | 32 37 2c 31 2c 30 2c 33 |7,1,0,1,|27,1,0,3|
|00005820| 3a c8 96 3a c8 96 0d 05 | f0 33 c8 95 20 70 62 3e |:..:....|.3.. pb>|
|00005830| 96 2d 34 3a f1 8a 32 38 | 2c 31 35 29 22 50 6c 65 |.-4:..28|,15)"Ple|
|00005840| 61 73 65 20 73 77 69 74 | 63 68 20 70 72 69 6e 74 |ase swit|ch print|
|00005850| 65 72 20 6f 6e 22 3b 3a | ce 0d 05 fa 0f f1 8a 32 |er on";:|.......2|
|00005860| 38 2c 31 35 29 89 33 30 | 0d 06 04 08 ee 3a ef 32 |8,15).30|.....:.2|
|00005870| 0d 06 0e 05 e1 0d ff 46 | 69 6c 65 44 61 74 61 82 |.......F|ileData.|
|00005880| 21 53 70 72 69 74 65 73 | 00 ff ff e4 03 00 00 41 |!Sprites|.......A|
|00005890| f9 ff ff 06 3d b7 a3 03 | 00 ad c6 02 00 00 00 10 |....=...|........|
|000058a0| 00 00 00 e8 03 00 00 d4 | 02 00 00 21 68 64 62 61 |........|...!hdba|
|000058b0| 63 6b 75 70 00 00 00 04 | 00 00 00 10 00 00 00 00 |ckup....|........|
|000058c0| 00 00 00 07 00 00 00 2c | 00 00 00 80 01 00 00 0c |.......,|........|
|000058d0| 00 00 00 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |...wwwww|wwwwwwww|
|000058e0| 77 77 77 77 00 00 00 c7 | cc cc cc cc cc cc cc cc |wwww....|........|
|000058f0| cc cc cc cc cc cc cc 7c | 00 00 00 c7 7c c7 7c c7 |.......||....|.|.|
|00005900| 7c c7 cc cc cc cc cc cc | cc cc cc 7c 00 00 00 c7 ||.......|...|....|
|00005910| 7c c7 7c c7 7c c7 cc cc | cc cc bc bb cb cc cc 7c ||.|.|...|.......||
|00005920| 00 00 00 c7 7c c7 7c c7 | 7c c7 cc cc cc cc cc cc |....|.|.||.......|
|00005930| cc cc cc 7c 00 00 00 c7 | cc cc cc cc cc cc cc cc |...|....|........|
|00005940| cc cc cc cc cc cc cc 7c | 00 00 00 77 77 77 77 77 |.......||...wwwww|
|00005950| 77 77 77 77 77 77 77 77 | 77 77 77 77 00 00 00 00 |wwwwwwww|wwww....|
|00005960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005980| 00 00 00 00 00 00 00 00 | 00 00 00 00 dd 00 00 dd |........|........|
|00005990| 00 00 dd 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000059a0| 00 dd 00 00 dd 00 00 dd | 00 00 00 00 00 00 00 00 |........|........|
|000059b0| 00 00 00 00 00 00 dd 00 | 00 dd 00 00 dd 00 00 00 |........|........|
|000059c0| 00 00 00 00 d0 dd dd dd | dd dd 00 dd 00 00 dd 00 |........|........|
|000059d0| 00 dd 00 00 00 00 00 00 | 00 00 00 00 00 00 dd 00 |........|........|
|000059e0| 00 dd 00 00 dd 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000059f0| 00 dd 00 00 dd 00 00 dd | 00 00 00 00 00 00 00 00 |........|........|
|00005a00| 00 00 00 00 dd 00 00 dd | 00 00 dd 00 00 00 00 00 |........|........|
|00005a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a20| 00 00 00 00 00 00 00 ff | ff ff ff ff ff ff ff ff |........|........|
|00005a30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005a90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005aa0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005ab0| ff ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005ac0| 00 00 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005ad0| 00 00 00 00 00 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00005ae0| ff 00 00 ff 00 00 ff 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00005af0| 00 00 00 00 00 ff 00 00 | ff 00 00 ff 00 00 00 00 |........|........|
|00005b00| ff ff ff 00 00 00 00 00 | 00 00 ff 00 00 ff 00 00 |........|........|
|00005b10| ff 00 00 00 ff ff ff 00 | f0 ff ff ff ff ff 00 ff |........|........|
|00005b20| 00 00 ff 00 00 ff 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00005b30| 00 00 ff 00 00 ff 00 00 | ff 00 00 00 ff ff ff 00 |........|........|
|00005b40| 00 00 00 00 00 ff 00 00 | ff 00 00 ff 00 00 00 00 |........|........|
|00005b50| ff ff ff 00 00 00 00 00 | ff 00 00 ff 00 00 ff 00 |........|........|
|00005b60| 00 00 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005b70| 00 00 00 00 00 00 00 00 | ff ff ff 04 01 00 00 73 |........|.......s|
|00005b80| 6d 21 68 64 62 61 63 6b | 75 70 00 02 00 00 00 08 |m!hdback|up......|
|00005b90| 00 00 00 00 00 00 00 0b | 00 00 00 2c 00 00 00 98 |........|...,....|
|00005ba0| 00 00 00 0c 00 00 00 77 | 77 77 77 77 77 77 77 77 |.......w|wwwwwwww|
|00005bb0| 07 00 00 c7 cc cc cc cc | cc cc cc cc 07 00 00 c7 |........|........|
|00005bc0| 7c c7 7c c7 cc bb bb cc | 07 00 00 c7 7c c7 7c c7 ||.|.....|....|.|.|
|00005bd0| cc cc cc cc 07 00 00 c7 | cc cc cc cc cc cc cc cc |........|........|
|00005be0| 07 00 00 77 77 77 77 77 | 77 77 77 77 07 00 00 00 |...wwwww|wwww....|
|00005bf0| 00 70 77 70 77 77 07 00 | 00 00 00 77 77 07 77 07 |.pwpww..|...ww.w.|
|00005c00| 77 77 77 00 00 00 00 00 | 00 70 77 70 77 77 07 00 |www.....|.pwpww..|
|00005c10| 00 00 00 ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005c20| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005c30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005c40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00005c50| ff ff ff ff ff ff ff ff | ff ff ff 00 00 f0 0f f0 |........|........|
|00005c60| 0f f0 0f 00 f0 ff ff ff | ff 0f ff 00 ff 00 ff 00 |........|........|
|00005c70| f0 ff ff 00 00 f0 0f f0 | 0f f0 0f 00 f0 ff ff 46 |........|.......F|
|00005c80| 69 6c 65 44 61 74 61 82 | 48 44 21 46 6c 70 42 6f |ileData.|HD!FlpBo|
|00005c90| 6f 74 00 28 00 00 00 41 | fe ff ff 2f 7f a7 a2 03 |ot.(...A|.../....|
|00005ca0| 00 01 91 2a 7c 20 3e 20 | 21 42 6f 6f 74 20 66 6f |...*| > |!Boot fo|
|00005cb0| 72 20 66 6c 6f 70 70 79 | 20 6f 6e 6c 79 0d 2a 24 |r floppy| only.*$|
|00005cc0| 2e 21 48 44 42 61 63 6b | 75 70 0d |.!HDBack|up. |
+--------+-------------------------+-------------------------+--------+--------+