/ The Datafile PD-CD 2 / DATAFILE_PDCD2.iso / utilities / _diskcopy

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | f8 01 00 00 58 02 00 00 |Archive.|....X...|
|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 44 69 73 6b 43 6f | 70 79 00 00 ff ff ff ff |.!DiskCo|py......|
|00000070| 45 fd ff ff f5 3e e4 99 | 30 00 00 00 ff ff ff ff |E....>..|0.......|
|00000080| d4 01 00 80 82 21 42 6f | 6f 74 00 00 8e 00 00 00 |.....!Bo|ot......|
|00000090| 38 00 00 00 43 eb ff ff | 1e f2 01 c0 33 00 d0 da |8...C...|....3...|
|000000a0| 38 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 00 |8...$...|.!Help..|
|000000b0| 8e 00 00 00 cb 00 00 00 | 45 fb ff ff 8d 1e 04 7f |........|E.......|
|000000c0| 03 00 19 4a cb 00 00 00 | 80 00 00 00 82 21 52 75 |...J....|.....!Ru|
|000000d0| 6e 00 04 00 8e 00 00 00 | 6b 00 00 00 40 eb ff ff |n.......|k...@...|
|000000e0| bd c6 43 f7 33 00 a0 94 | 6b 00 00 00 6f 01 00 00 |..C.3...|k...o...|
|000000f0| 82 21 52 75 6e 42 75 66 | 66 00 00 00 fd 05 00 00 |.!RunBuf|f.......|
|00000100| 43 fb ff ff 91 da 01 ad | 33 00 a5 be fd 05 00 00 |C.......|3.......|
|00000110| fe 01 00 00 82 21 52 75 | 6e 49 6d 00 8e 00 00 00 |.....!Ru|nIm.....|
|00000120| 9a 1f 00 00 43 fb ff ff | 43 19 5a f0 33 00 e1 28 |....C...|C.Z.3..(|
|00000130| 9a 1f 00 00 1f 08 00 00 | 82 21 52 75 6e 49 6d 61 |........|.!RunIma|
|00000140| 67 65 00 00 72 1f 00 00 | 44 fb ff ff fd 29 c3 db |ge..r...|D....)..|
|00000150| 33 00 ff 7f 72 1f 00 00 | dd 27 00 00 82 21 53 70 |3...r...|.'...!Sp|
|00000160| 72 69 74 65 73 00 00 00 | ec 02 00 00 43 f9 ff ff |rites...|....C...|
|00000170| 08 67 e5 be 33 00 46 86 | ec 02 00 00 73 47 00 00 |.g..3.F.|....sG..|
|00000180| 82 48 65 6c 70 00 04 00 | 8e 00 00 00 dd 08 00 00 |.Help...|........|
|00000190| 45 ff ff ff 54 6d c2 85 | 03 00 1f b2 dd 08 00 00 |E...Tm..|........|
|000001a0| 83 4a 00 00 82 50 72 69 | 6e 74 00 00 8e 00 00 00 |.J...Pri|nt......|
|000001b0| c0 00 00 00 45 fb ff ff | 37 2d 04 7f 03 00 6d 0f |....E...|7-....m.|
|000001c0| c0 00 00 00 84 53 00 00 | 82 52 65 61 64 00 04 00 |.....S..|.Read...|
|000001d0| 8e 00 00 00 d1 00 00 00 | 45 fb ff ff 94 28 04 7f |........|E....(..|
|000001e0| 03 00 4b 72 d1 00 00 00 | 68 54 00 00 82 54 65 6d |..Kr....|hT...Tem|
|000001f0| 70 6c 61 74 65 73 00 00 | ce 09 00 00 40 ec ff ff |plates..|....@...|
|00000200| 79 79 41 f7 33 00 3a 27 | ce 09 00 00 5d 55 00 00 |yyA.3.:'|....]U..|
|00000210| 00 00 00 00 c3 00 04 00 | 8e 00 00 00 e3 00 00 00 |........|........|
|00000220| 44 eb ff ff 07 8b bf 5e | 03 00 7f e6 e3 00 00 00 |D......^|........|
|00000230| 20 01 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | .......|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 fc 00 00 00 | 46 69 6c 65 44 61 74 61 |........|FileData|
|00000260| 82 21 42 6f 6f 74 00 00 | 8e 00 00 00 38 00 00 00 |.!Boot..|....8...|
|00000270| 43 eb ff ff 1e f2 01 c0 | 03 00 d0 da 53 65 74 20 |C.......|....Set |
|00000280| 43 6f 70 79 24 44 69 72 | 20 3c 4f 62 65 79 24 44 |Copy$Dir| <Obey$D|
|00000290| 69 72 3e 0a 49 63 6f 6e | 53 70 72 69 74 65 73 20 |ir>.Icon|Sprites |
|000002a0| 3c 43 6f 70 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Copy$Di|r>.!Spri|
|000002b0| 74 65 73 0a 46 69 6c 65 | 44 61 74 61 82 21 48 65 |tes.File|Data.!He|
|000002c0| 6c 70 00 00 8e 00 00 00 | cb 00 00 00 45 fb ff ff |lp......|....E...|
|000002d0| 8d 1e 04 7f 03 00 19 4a | 0d 00 0a 11 20 f1 22 4f |.......J|.... ."O|
|000002e0| 70 74 69 6f 6e 73 3a 2d | 22 0d 00 14 1b 20 f1 22 |ptions:-|".... ."|
|000002f0| 31 2e 20 20 50 72 69 6e | 74 20 48 65 6c 70 20 46 |1.  Prin|t Help F|
|00000300| 69 6c 65 22 0d 00 1e 1a | 20 f1 22 32 2e 20 20 52 |ile"....| ."2.  R|
|00000310| 65 61 64 20 48 65 6c 70 | 20 46 69 6c 65 22 0d 00 |ead Help| File"..|
|00000320| 28 17 20 e8 22 59 6f 75 | 72 20 43 68 6f 69 63 65 |(. ."You|r Choice|
|00000330| 2e 2e 22 61 24 0d 00 32 | 16 20 e7 20 61 24 3d 22 |.."a$..2|. . a$="|
|00000340| 31 22 20 8c 20 e5 20 8d | 44 5a 40 0d 00 3c 16 20 |1" . . .|DZ@..<. |
|00000350| e7 20 61 24 3d 22 32 22 | 20 8c 20 e5 20 8d 44 64 |. a$="2"| . . .Dd|
|00000360| 40 0d 00 46 06 20 db 0d | 00 50 0b 20 e5 20 8d 54 |@..F. ..|.P. . .T|
|00000370| 4a 40 0d 00 5a 18 20 d7 | 22 3c 43 6f 70 79 24 44 |J@..Z. .|"<Copy$D|
|00000380| 69 72 3e 2e 50 52 49 4e | 54 22 0d 00 64 17 20 d7 |ir>.PRIN|T"..d. .|
|00000390| 22 3c 43 6f 70 79 24 44 | 69 72 3e 2e 52 65 61 64 |"<Copy$D|ir>.Read|
|000003a0| 22 0d ff 46 69 6c 65 44 | 61 74 61 82 21 52 75 6e |"..FileD|ata.!Run|
|000003b0| 00 04 00 8e 00 00 00 6b | 00 00 00 40 eb ff ff bd |.......k|...@....|
|000003c0| c6 43 f7 03 00 a0 94 53 | 65 74 20 43 6f 70 79 24 |.C.....S|et Copy$|
|000003d0| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 49 |Dir <Obe|y$Dir>.I|
|000003e0| 63 6f 6e 53 70 72 69 74 | 65 73 20 3c 43 6f 70 79 |conSprit|es <Copy|
|000003f0| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 0a 57 |$Dir>.!S|prites.W|
|00000400| 69 6d 70 53 6c 6f 74 20 | 2d 6d 69 6e 20 33 32 6b |impSlot |-min 32k|
|00000410| 20 2d 6d 61 78 20 33 32 | 6b 0a 52 75 6e 20 3c 43 | -max 32|k.Run <C|
|00000420| 6f 70 79 24 44 69 72 3e | 2e 21 52 75 6e 42 75 66 |opy$Dir>|.!RunBuf|
|00000430| 66 0a 46 69 6c 65 44 61 | 74 61 82 21 52 75 6e 42 |f.FileDa|ta.!RunB|
|00000440| 75 66 66 00 00 00 fd 05 | 00 00 43 fb ff ff 91 da |uff.....|..C.....|
|00000450| 01 ad 03 00 a5 be 0d 00 | 0a 1a ee 20 85 20 eb 20 |........|... . . |
|00000460| 31 32 3a f1 20 9e 20 f6 | 24 3a 2a 44 45 53 4b 2e |12:. . .|$:*DESK.|
|00000470| 0d 00 14 25 f4 20 2a 2a | 2a 42 75 66 66 65 72 20 |...%. **|*Buffer |
|00000480| 50 72 6f 67 72 61 6d 20 | 66 6f 72 20 21 44 69 73 |Program |for !Dis|
|00000490| 6b 43 6f 70 79 0d 00 1e | 16 f4 20 2a 2a 2a 20 a9 |kCopy...|.. *** .|
|000004a0| 20 4a 2e 20 52 6f 62 62 | 69 6e 73 0d 00 28 3a de | J. Robb|ins..(:.|
|000004b0| 20 62 6c 6f 63 6b 20 26 | 31 30 30 30 2c 20 6d 65 | block &|1000, me|
|000004c0| 6e 75 25 20 31 30 32 34 | 2c 20 63 75 72 62 75 66 |nu% 1024|, curbuf|
|000004d0| 25 20 20 26 31 30 30 30 | 2c 20 69 63 6f 6e 64 20 |%  &1000|, icond |
|000004e0| 26 31 30 30 30 0d 00 32 | 19 65 6e 64 62 75 66 25 |&1000..2|.endbuf%|
|000004f0| 3d 63 75 72 62 75 66 25 | 2b 26 36 30 30 30 0d 00 |=curbuf%|+&6000..|
|00000500| 3c 4c c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |<L.. "Wi|mp_Initi|
|00000510| 61 6c 69 73 65 22 2c 32 | 30 30 2c 26 34 42 35 33 |alise",2|00,&4B53|
|00000520| 34 31 35 34 2c 22 43 6f | 70 79 20 42 75 66 66 65 |4154,"Co|py Buffe|
|00000530| 72 20 53 69 7a 65 22 20 | b8 20 76 65 72 73 69 6f |r Size" |. versio|
|00000540| 6e 25 2c 6d 79 74 61 73 | 6b 25 0d 00 46 0d f2 74 |n%,mytas|k%..F..t|
|00000550| 65 6d 70 6c 61 74 65 0d | 00 50 39 65 6e 64 25 3d |emplate.|.P9end%=|
|00000560| a3 3a 64 72 61 67 25 3d | 30 3a 73 61 76 69 6e 67 |.:drag%=|0:saving|
|00000570| 25 3d 30 3a 61 63 6b 25 | 3d a3 3a 6b 65 79 70 6f |%=0:ack%|=.:keypo|
|00000580| 73 3d 2d 31 3a 6b 65 79 | 74 6f 75 73 65 3d 2d 31 |s=-1:key|touse=-1|
|00000590| 0d 00 5a 18 f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |..Z..ope|nwindow(|
|000005a0| 62 75 66 77 69 6e 25 29 | 0d 00 64 05 f5 0d 00 6e |bufwin%)|..d....n|
|000005b0| 26 20 c8 99 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c |& .."Wim|p_Poll",|
|000005c0| 30 2c 62 6c 6f 63 6b 20 | b8 20 65 76 65 6e 74 63 |0,block |. eventc|
|000005d0| 6f 64 65 0d 00 78 12 c8 | 8e 20 65 76 65 6e 74 63 |ode..x..|. eventc|
|000005e0| 6f 64 65 20 ca 0d 00 82 | 08 c9 20 30 3a 0d 00 8c |ode ....|.. 0:...|
|000005f0| 2d c9 20 31 3a c8 99 20 | 22 57 69 6d 70 5f 52 65 |-. 1:.. |"Wimp_Re|
|00000600| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |drawWind|ow",,blo|
|00000610| 63 6b 20 b8 20 6d 6f 72 | 65 25 0d 00 96 23 c9 20 |ck . mor|e%...#. |
|00000620| 32 3a c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |2:.. "Wi|mp_OpenW|
|00000630| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 0d 00 a0 |indow",,|block...|
|00000640| 39 c9 20 33 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c |9. 3:.. |"Wimp_Cl|
|00000650| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000660| 6b 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |k:.."Wim|p_CloseD|
|00000670| 6f 77 6e 22 3a e0 0d 00 | aa 15 c9 20 36 3a f2 63 |own":...|... 6:.c|
|00000680| 6c 69 63 6b 28 62 6c 6f | 63 6b 29 0d 00 b4 09 20 |lick(blo|ck).... |
|00000690| c9 20 37 3a 0d 00 be 07 | c9 20 38 0d 00 c8 08 c9 |. 7:....|. 8.....|
|000006a0| 20 39 3a 0d 00 d2 05 cb | 0d 00 dc 0a fd 20 65 6e | 9:.....|..... en|
|000006b0| 64 25 0d 00 e6 0e dd f2 | 74 65 6d 70 6c 61 74 65 |d%......|template|
|000006c0| 0d 00 f0 31 c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |...1.."W|imp_Open|
|000006d0| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 22 3c 43 6f 70 |Template|",,"<Cop|
|000006e0| 79 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 73 |y$Dir>.T|emplates|
|000006f0| 22 0d 00 fa 11 69 6e 64 | 69 72 3d 63 75 72 62 75 |"....ind|ir=curbu|
|00000700| 66 25 0d 01 04 21 62 75 | 66 77 69 6e 25 3d a4 74 |f%...!bu|fwin%=.t|
|00000710| 65 6d 70 6c 61 74 65 28 | 22 42 75 66 66 53 69 7a |emplate(|"BuffSiz|
|00000720| 65 22 29 0d 01 0e 1b c8 | 99 20 22 57 69 6d 70 5f |e").....|. "Wimp_|
|00000730| 43 6c 6f 73 65 54 65 6d | 70 6c 61 74 65 22 0d 01 |CloseTem|plate"..|
|00000740| 18 05 e1 0d 01 22 12 dd | a4 74 65 6d 70 6c 61 74 |....."..|.templat|
|00000750| 65 28 61 24 29 0d 01 2c | 46 c8 99 22 57 69 6d 70 |e(a$)..,|F.."Wimp|
|00000760| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00000770| 62 6c 6f 63 6b 2c 69 6e | 64 69 72 2c 65 6e 64 62 |block,in|dir,endb|
|00000780| 75 66 25 2c 2d 31 2c 61 | 24 2c 30 20 b8 20 2c 2c |uf%,-1,a|$,0 . ,,|
|00000790| 69 6e 64 69 72 2c 2c 2c | 2c 63 25 0d 01 36 32 e7 |indir,,,|,c%..62.|
|000007a0| 20 63 25 3d 30 20 8c 20 | f2 6d 65 73 73 28 22 54 | c%=0 . |.mess("T|
|000007b0| 65 6d 70 6c 61 74 65 20 | 22 3b 61 24 3b 22 20 6e |emplate |";a$;" n|
|000007c0| 6f 74 20 66 6f 75 6e 64 | 2e 22 29 3a e0 0d 01 40 |ot found|."):...@|
|000007d0| 0e 62 6c 6f 63 6b 21 36 | 34 3d 31 0d 01 4a 29 c8 |.block!6|4=1..J).|
|000007e0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e |."Wimp_C|reateWin|
|000007f0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 20 b8 20 68 61 |dow",,bl|ock . ha|
|00000800| 6e 64 6c 65 0d 01 54 0b | 3d 68 61 6e 64 6c 65 0d |ndle..T.|=handle.|
|00000810| 01 5e 17 dd a4 69 6e 66 | 6f 28 68 61 6e 64 6c 65 |.^...inf|o(handle|
|00000820| 2c 69 63 6f 6e 29 0d 01 | 68 15 f2 67 65 65 28 68 |,icon)..|h..gee(h|
|00000830| 61 6e 64 6c 65 2c 69 63 | 6f 6e 29 0d 01 72 0d 3d |andle,ic|on)..r.=|
|00000840| 69 63 6f 6e 64 21 32 38 | 0d 01 7c 16 dd f2 67 65 |icond!28|..|...ge|
|00000850| 65 28 68 61 6e 64 6c 65 | 2c 69 63 6f 6e 29 0d 01 |e(handle|,icon)..|
|00000860| 86 1e 21 69 63 6f 6e 64 | 3d 68 61 6e 64 6c 65 3a |..!icond|=handle:|
|00000870| 69 63 6f 6e 64 21 34 3d | 69 63 6f 6e 0d 01 90 20 |icond!4=|icon... |
|00000880| c8 99 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |.."Wimp_|GetIconS|
|00000890| 74 61 74 65 22 2c 2c 69 | 63 6f 6e 64 0d 01 9a 05 |tate",,i|cond....|
|000008a0| e1 0d 01 a4 12 dd f2 63 | 6c 69 63 6b 28 62 6c 6f |.......c|lick(blo|
|000008b0| 63 6b 29 0d 01 ae 2c e7 | 20 62 6c 6f 63 6b 21 31 |ck)...,.| block!1|
|000008c0| 32 3d 62 75 66 77 69 6e | 25 20 80 20 62 6c 6f 63 |2=bufwin|% . bloc|
|000008d0| 6b 21 31 36 3d 35 20 f2 | 67 6f 28 32 30 30 29 0d |k!16=5 .|go(200).|
|000008e0| 01 b8 2c e7 20 62 6c 6f | 63 6b 21 31 32 3d 62 75 |..,. blo|ck!12=bu|
|000008f0| 66 77 69 6e 25 20 80 20 | 62 6c 6f 63 6b 21 31 36 |fwin% . |block!16|
|00000900| 3d 38 20 f2 67 6f 28 34 | 30 30 29 0d 01 c2 2d e7 |=8 .go(4|00)...-.|
|00000910| 20 62 6c 6f 63 6b 21 31 | 32 3d 62 75 66 77 69 6e | block!1|2=bufwin|
|00000920| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 31 31 20 |% . bloc|k!16=11 |
|00000930| f2 67 6f 28 38 30 30 29 | 0d 01 cc 05 e1 0d 01 d6 |.go(800)|........|
|00000940| 0e dd f2 67 6f 28 62 75 | 66 66 29 0d 01 e0 12 21 |...go(bu|ff)....!|
|00000950| 62 6c 6f 63 6b 3d 62 75 | 66 77 69 6e 25 0d 01 ea |block=bu|fwin%...|
|00000960| 1f c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |..."Wimp|_CloseWi|
|00000970| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 0d 01 f4 0c |ndow",,b|lock....|
|00000980| 20 43 25 3d 62 75 66 66 | 0d 01 fe 3c 20 ff 28 22 | C%=buff|...< .("|
|00000990| 57 49 4d 50 53 4c 4f 54 | 20 2d 6d 69 6e 20 22 2b |WIMPSLOT| -min "+|
|000009a0| c3 28 62 75 66 66 2b 33 | 36 29 2b 22 6b 20 2d 6d |.(buff+3|6)+"k -m|
|000009b0| 61 78 20 22 2b c3 28 62 | 75 66 66 2b 33 36 29 2b |ax "+.(b|uff+36)+|
|000009c0| 22 6b 22 29 0d 02 08 1a | 20 2a 3c 43 6f 70 79 24 |"k")....| *<Copy$|
|000009d0| 64 69 72 3e 2e 21 52 75 | 6e 49 6d 61 67 65 0d 02 |dir>.!Ru|nImage..|
|000009e0| 12 06 20 e0 0d 02 1c 17 | dd f2 6f 70 65 6e 77 69 |.. .....|..openwi|
|000009f0| 6e 64 6f 77 28 69 63 6f | 6e 64 29 0d 02 26 10 21 |ndow(ico|nd)..&.!|
|00000a00| 62 6c 6f 63 6b 3d 69 63 | 6f 6e 64 0d 02 30 22 c8 |block=ic|ond..0".|
|00000a10| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00000a20| 77 49 6e 66 6f 22 2c 2c | 62 6c 6f 63 6b 0d 02 3a |wInfo",,|block..:|
|00000a30| 1f c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |... "Wim|p_OpenWi|
|00000a40| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 0d 02 44 05 |ndow",,b|lock..D.|
|00000a50| e1 0d ff 46 69 6c 65 44 | 61 74 61 82 21 52 75 6e |...FileD|ata.!Run|
|00000a60| 49 6d 00 8e 00 00 00 9a | 1f 00 00 43 fb ff ff 43 |Im......|...C...C|
|00000a70| 19 5a f0 03 00 e1 28 0d | 00 0a 1c f4 20 3e 24 2e |.Z....(.|.... >$.|
|00000a80| 21 44 69 73 6b 43 6f 70 | 79 2e 21 52 75 6e 49 6d |!DiskCop|y.!RunIm|
|00000a90| 61 67 65 0d 00 14 34 f4 | 20 4d 61 69 6e 20 50 72 |age...4.| Main Pr|
|00000aa0| 6f 67 72 61 6d 20 66 6f | 72 20 22 21 44 69 73 6b |ogram fo|r "!Disk|
|00000ab0| 43 6f 70 79 22 20 44 69 | 73 6b 20 43 6f 70 79 20 |Copy" Di|sk Copy |
|00000ac0| 50 72 6f 67 72 61 6d 0d | 00 1e 2a f4 20 56 65 72 |Program.|..*. Ver|
|00000ad0| 73 69 6f 6e 20 31 2e 30 | 30 20 4c 61 73 74 20 55 |sion 1.0|0 Last U|
|00000ae0| 70 64 61 74 65 64 20 32 | 38 20 4d 61 72 20 27 39 |pdated 2|8 Mar '9|
|00000af0| 32 0d 00 28 1c f4 20 a9 | 20 4a 2e 20 52 4f 42 42 |2..(.. .| J. ROBB|
|00000b00| 49 4e 53 20 2d 20 54 45 | 43 53 4f 46 54 0d 00 32 |INS - TE|CSOFT..2|
|00000b10| 05 3a 0d 00 3c 12 62 75 | 66 66 65 72 73 69 7a 65 |.:..<.bu|ffersize|
|00000b20| 3d 38 30 30 0d 00 46 20 | 63 75 72 72 25 3d 30 3a |=800..F |curr%=0:|
|00000b30| 6a 72 63 68 65 63 6b 65 | 64 3d 30 3a 6a 72 66 6f |jrchecke|d=0:jrfo|
|00000b40| 72 6d 3d 30 0d 00 50 0d | 20 6d 65 6d 25 3d 38 30 |rm=0..P.| mem%=80|
|00000b50| 30 0d 00 5a 37 de 20 62 | 6c 6f 63 6b 20 26 31 30 |0..Z7. b|lock &10|
|00000b60| 30 30 2c 20 6d 65 6e 75 | 25 20 31 30 32 34 2c 63 |00, menu|% 1024,c|
|00000b70| 75 72 62 75 66 25 20 26 | 31 30 30 30 2c 69 63 6f |urbuf% &|1000,ico|
|00000b80| 6e 64 20 26 31 30 30 30 | 0d 00 64 35 de 20 68 65 |nd &1000|..d5. he|
|00000b90| 61 64 28 31 35 39 29 2c | 20 64 65 66 65 63 74 25 |ad(159),| defect%|
|00000ba0| 20 26 34 30 2c 20 6d 65 | 6d 6f 72 79 25 20 62 75 | &40, me|mory% bu|
|00000bb0| 66 66 65 72 73 69 7a 65 | 2a 26 34 30 30 0d 00 6e |ffersize|*&400..n|
|00000bc0| 14 20 e3 20 78 25 3d 30 | 20 b8 20 36 33 20 88 20 |. . x%=0| . 63 . |
|00000bd0| 34 0d 00 78 11 20 64 65 | 66 65 63 74 25 21 78 25 |4..x. de|fect%!x%|
|00000be0| 3d 30 0d 00 82 09 20 ed | 20 78 25 0d 00 8c 11 20 |=0.... .| x%.... |
|00000bf0| ee 85 f2 65 72 72 28 f6 | 24 29 3a e0 0d 00 96 19 |...err(.|$):.....|
|00000c00| 65 6e 64 62 75 66 25 3d | 63 75 72 62 75 66 25 2b |endbuf%=|curbuf%+|
|00000c10| 26 36 30 30 30 0d 00 a0 | 48 c8 99 20 22 57 69 6d |&6000...|H.. "Wim|
|00000c20| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|00000c30| 30 2c 26 34 42 35 33 34 | 31 35 34 2c 22 44 69 73 |0,&4B534|154,"Dis|
|00000c40| 6b 20 43 6f 70 79 69 65 | 72 22 20 b8 20 76 65 72 |k Copyie|r" . ver|
|00000c50| 73 69 6f 6e 25 2c 6d 79 | 74 61 73 6b 25 0d 00 aa |sion%,my|task%...|
|00000c60| 0d f2 74 65 6d 70 6c 61 | 74 65 0d 00 b4 44 69 6e |..templa|te...Din|
|00000c70| 69 74 69 63 3d a4 69 63 | 6f 6e 62 61 72 28 25 31 |itic=.ic|onbar(%1|
|00000c80| 31 30 31 30 2c 2d 31 2c | 37 2c 30 2c 22 21 44 69 |1010,-1,|7,0,"!Di|
|00000c90| 73 6b 43 6f 70 79 22 2b | bd 31 33 2c 30 2c 30 2c |skCopy"+|.13,0,0,|
|00000ca0| 30 2c 33 2c 30 2c 30 2c | 36 38 2c 36 38 29 0d 00 |0,3,0,0,|68,68)..|
|00000cb0| be 44 65 6e 64 25 3d a3 | 3a 64 72 61 67 25 3d 30 |.Dend%=.|:drag%=0|
|00000cc0| 3a 73 61 76 69 6e 67 25 | 3d 30 3a 61 63 6b 25 3d |:saving%|=0:ack%=|
|00000cd0| a3 3a 6b 65 79 70 6f 73 | 3d 2d 31 3a 6b 65 79 74 |.:keypos|=-1:keyt|
|00000ce0| 6f 75 73 65 3d 2d 31 3a | 6d 6f 64 69 66 69 65 64 |ouse=-1:|modified|
|00000cf0| 3d 30 0d 00 c8 05 3a 0d | 00 d2 05 f5 0d 00 dc 5a |=0....:.|.......Z|
|00000d00| e7 20 6b 65 79 70 6f 73 | 3c 3e 2d 31 20 8c 20 c8 |. keypos|<>-1 . .|
|00000d10| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 30 2c |. "Wimp_|Poll",0,|
|00000d20| 62 6c 6f 63 6b 20 b8 20 | 65 76 65 6e 74 63 6f 64 |block . |eventcod|
|00000d30| 65 20 8b 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |e . .. "|Wimp_Pol|
|00000d40| 6c 22 2c 31 2c 62 6c 6f | 63 6b 20 b8 20 65 76 65 |l",1,blo|ck . eve|
|00000d50| 6e 74 63 6f 64 65 0d 00 | e6 1d e7 20 6b 65 79 70 |ntcode..|... keyp|
|00000d60| 6f 73 3c 3e 2d 31 20 8c | 20 f2 61 64 64 6c 65 74 |os<>-1 .| .addlet|
|00000d70| 74 65 72 0d 00 f0 12 c8 | 8e 20 65 76 65 6e 74 63 |ter.....|. eventc|
|00000d80| 6f 64 65 20 ca 0d 00 fa | 08 c9 20 30 3a 0d 01 04 |ode ....|.. 0:...|
|00000d90| 2d c9 20 31 3a c8 99 20 | 22 57 69 6d 70 5f 52 65 |-. 1:.. |"Wimp_Re|
|00000da0| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |drawWind|ow",,blo|
|00000db0| 63 6b 20 b8 20 6d 6f 72 | 65 25 0d 01 0e 23 c9 20 |ck . mor|e%...#. |
|00000dc0| 32 3a c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |2:.. "Wi|mp_OpenW|
|00000dd0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 0d 01 18 |indow",,|block...|
|00000de0| 24 c9 20 33 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c |$. 3:.. |"Wimp_Cl|
|00000df0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000e00| 6b 0d 01 22 17 c9 20 36 | 3a f2 62 75 74 74 6f 6e |k..".. 6|:.button|
|00000e10| 73 28 62 6c 6f 63 6b 29 | 0d 01 2c 08 20 c9 20 37 |s(block)|..,. . 7|
|00000e20| 0d 01 36 13 c9 20 38 3a | f2 70 72 6f 63 65 73 73 |..6.. 8:|.process|
|00000e30| 6b 65 79 0d 01 40 0f c9 | 20 39 3a f2 64 65 63 6f |key..@..| 9:.deco|
|00000e40| 64 65 0d 01 4a 0c 20 c9 | 20 31 37 2c 31 38 0d 01 |de..J. .| 17,18..|
|00000e50| 54 05 cb 0d 01 5e 0a fd | 20 65 6e 64 25 0d 01 68 |T....^..| end%..h|
|00000e60| 05 e0 0d 01 72 34 dd f2 | 6f 70 65 6e 28 68 61 6e |....r4..|open(han|
|00000e70| 64 6c 65 2c 76 6d 69 6e | 78 2c 76 6d 69 6e 79 2c |dle,vmin|x,vminy,|
|00000e80| 76 6d 61 78 78 2c 76 6d | 61 78 79 2c 78 6f 66 66 |vmaxx,vm|axy,xoff|
|00000e90| 2c 79 6f 66 66 29 0d 01 | 7c 3c 21 62 6c 6f 63 6b |,yoff)..||<!block|
|00000ea0| 3d 68 61 6e 64 6c 65 3a | 62 6c 6f 63 6b 21 34 3d |=handle:|block!4=|
|00000eb0| 76 6d 69 6e 78 3a 62 6c | 6f 63 6b 21 38 3d 76 6d |vminx:bl|ock!8=vm|
|00000ec0| 69 6e 79 3a 62 6c 6f 63 | 6b 21 31 32 3d 76 6d 61 |iny:bloc|k!12=vma|
|00000ed0| 78 78 0d 01 86 3a 62 6c | 6f 63 6b 21 31 36 3d 76 |xx...:bl|ock!16=v|
|00000ee0| 6d 61 78 79 3a 62 6c 6f | 63 6b 21 32 30 3d 78 6f |maxy:blo|ck!20=xo|
|00000ef0| 66 66 3a 62 6c 6f 63 6b | 21 32 34 3d 79 6f 66 66 |ff:block|!24=yoff|
|00000f00| 3a 62 6c 6f 63 6b 21 32 | 38 3d 2d 31 0d 01 90 1f |:block!2|8=-1....|
|00000f10| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00000f20| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 0d 01 9a 05 e1 |dow",,bl|ock.....|
|00000f30| 0d 01 a4 4b dd a4 69 63 | 6f 6e 62 61 72 28 66 6c |...K..ic|onbar(fl|
|00000f40| 61 67 73 2c 70 61 72 74 | 2c 66 6f 72 2c 62 61 63 |ags,part|,for,bac|
|00000f50| 2c 64 61 74 61 24 2c 61 | 64 64 2c 61 64 64 32 2c |,data$,a|dd,add2,|
|00000f60| 6c 65 6e 67 74 68 2c 6d | 6f 75 73 65 2c 78 73 31 |length,m|ouse,xs1|
|00000f70| 2c 79 73 31 2c 78 73 2c | 79 73 29 0d 01 ae 0f 21 |,ys1,xs,|ys)....!|
|00000f80| 69 63 6f 6e 64 3d 70 61 | 72 74 0d 01 b8 0f 69 63 |icond=pa|rt....ic|
|00000f90| 6f 6e 64 21 34 3d 78 73 | 31 0d 01 c2 27 69 63 6f |ond!4=xs|1...'ico|
|00000fa0| 6e 64 21 38 3d 79 73 31 | 3a 69 63 6f 6e 64 21 31 |nd!8=ys1|:icond!1|
|00000fb0| 32 3d 78 73 3a 69 63 6f | 6e 64 21 31 36 3d 79 73 |2=xs:ico|nd!16=ys|
|00000fc0| 0d 01 cc 35 69 63 6f 6e | 64 21 32 30 3d 66 6c 61 |...5icon|d!20=fla|
|00000fd0| 67 73 2b 28 28 32 5e 31 | 32 29 2a 6d 6f 75 73 65 |gs+((2^1|2)*mouse|
|00000fe0| 29 3a 69 63 6f 6e 64 3f | 32 33 3d 66 6f 72 2b 62 |):icond?|23=for+b|
|00000ff0| 61 63 2a 31 36 0d 01 d6 | 50 e7 20 64 61 74 61 24 |ac*16...|P. data$|
|00001000| 3c 3e 22 22 20 8c 20 24 | 28 69 63 6f 6e 64 2b 32 |<>"" . $|(icond+2|
|00001010| 34 29 3d 64 61 74 61 24 | 20 8b 20 69 63 6f 6e 64 |4)=data$| . icond|
|00001020| 21 32 34 3d 61 64 64 3a | 69 63 6f 6e 64 21 32 38 |!24=add:|icond!28|
|00001030| 3d 61 64 64 32 3a 69 63 | 6f 6e 64 21 33 32 3d 6c |=add2:ic|ond!32=l|
|00001040| 65 6e 67 74 68 0d 01 e0 | 26 c8 99 20 22 57 69 6d |ength...|&.. "Wim|
|00001050| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 69 |p_Create|Icon",,i|
|00001060| 63 6f 6e 64 20 b8 20 69 | 63 6f 6e 0d 01 ea 09 3d |cond . i|con....=|
|00001070| 69 63 6f 6e 0d 01 f4 12 | dd a4 74 65 6d 70 6c 61 |icon....|..templa|
|00001080| 74 65 28 61 24 29 0d 01 | fe 47 c8 99 20 22 57 69 |te(a$)..|.G.. "Wi|
|00001090| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|000010a0| 2c 2c 62 6c 6f 63 6b 2c | 69 6e 64 69 72 2c 65 6e |,,block,|indir,en|
|000010b0| 64 62 75 66 25 2c 2d 31 | 2c 61 24 2c 30 20 b8 20 |dbuf%,-1|,a$,0 . |
|000010c0| 2c 2c 69 6e 64 69 72 2c | 2c 2c 2c 63 25 0d 02 08 |,,indir,|,,,c%...|
|000010d0| 30 e7 20 63 25 3d 30 20 | 8c 20 ef 34 3a f1 20 22 |0. c%=0 |. .4:. "|
|000010e0| 54 65 6d 70 6c 61 74 65 | 20 22 3b 61 24 3b 22 20 |Template| ";a$;" |
|000010f0| 6e 6f 74 20 66 6f 75 6e | 64 2e 22 3a e0 0d 02 12 |not foun|d.":....|
|00001100| 0e 62 6c 6f 63 6b 21 36 | 34 3d 31 0d 02 1c 2a c8 |.block!6|4=1...*.|
|00001110| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|00001120| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 20 b8 20 68 |ndow",,b|lock . h|
|00001130| 61 6e 64 6c 65 0d 02 26 | 0b 3d 68 61 6e 64 6c 65 |andle..&|.=handle|
|00001140| 0d 02 30 0e dd f2 6d 6f | 61 6e 28 61 24 29 0d 02 |..0...mo|an(a$)..|
|00001150| 3a 1d 21 69 63 6f 6e 64 | 3d 30 3a 24 28 69 63 6f |:.!icond|=0:$(ico|
|00001160| 6e 64 2b 34 29 3d 61 24 | 2b bd 30 0d 02 44 2d c8 |nd+4)=a$|+.0..D-.|
|00001170| 99 20 22 57 69 6d 70 5f | 52 65 70 6f 72 74 45 72 |. "Wimp_|ReportEr|
|00001180| 72 6f 72 22 2c 69 63 6f | 6e 64 2c 31 2c 22 21 44 |ror",ico|nd,1,"!D|
|00001190| 69 73 6b 43 6f 70 79 22 | 0d 02 4e 05 e1 0d 02 58 |iskCopy"|..N....X|
|000011a0| 0d dd a4 73 74 72 28 61 | 25 29 0d 02 62 08 ea 20 |...str(a|%)..b.. |
|000011b0| 62 24 0d 02 6c 0e c8 95 | 20 3f 61 25 3e 3d 33 32 |b$..l...| ?a%>=32|
|000011c0| 0d 02 76 0e 62 24 2b 3d | bd 28 3f 61 25 29 0d 02 |..v.b$+=|.(?a%)..|
|000011d0| 80 09 61 25 2b 3d 31 0d | 02 8a 05 ce 0d 02 94 07 |..a%+=1.|........|
|000011e0| 3d 62 24 0d 02 9e 16 dd | a4 74 61 64 28 68 61 6e |=b$.....|.tad(han|
|000011f0| 64 6c 65 2c 69 63 6f 6e | 29 0d 02 a8 15 f2 67 69 |dle,icon|).....gi|
|00001200| 69 28 68 61 6e 64 6c 65 | 2c 69 63 6f 6e 29 0d 02 |i(handle|,icon)..|
|00001210| b2 0d 3d 69 63 6f 6e 64 | 21 32 38 0d 02 bc 16 dd |..=icond|!28.....|
|00001220| f2 67 69 69 28 68 61 6e | 64 6c 65 2c 69 63 6f 6e |.gii(han|dle,icon|
|00001230| 29 0d 02 c6 1e 21 69 63 | 6f 6e 64 3d 68 61 6e 64 |)....!ic|ond=hand|
|00001240| 6c 65 3a 69 63 6f 6e 64 | 21 34 3d 69 63 6f 6e 0d |le:icond|!4=icon.|
|00001250| 02 d0 21 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |..!.. "W|imp_GetI|
|00001260| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 69 63 6f 6e 64 |conState|",,icond|
|00001270| 0d 02 da 05 e1 0d 02 e4 | 19 dd f2 6f 70 65 6e 77 |........|...openw|
|00001280| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 29 0d 02 |indow(ha|ndle%)..|
|00001290| ee 12 21 69 63 6f 6e 64 | 3d 68 61 6e 64 6c 65 25 |..!icond|=handle%|
|000012a0| 0d 02 f8 22 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |...".. "|Wimp_Get|
|000012b0| 57 69 6e 64 6f 77 49 6e | 66 6f 22 2c 2c 69 63 6f |WindowIn|fo",,ico|
|000012c0| 6e 64 0d 03 02 1f c8 99 | 20 22 57 69 6d 70 5f 4f |nd......| "Wimp_O|
|000012d0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 69 63 6f 6e |penWindo|w",,icon|
|000012e0| 64 0d 03 0c 05 e1 0d 03 | 16 20 dd f2 61 6c 74 65 |d.......|. ..alte|
|000012f0| 72 28 68 61 6e 64 2c 69 | 63 6f 6e 2c 65 6f 72 2c |r(hand,i|con,eor,|
|00001300| 63 6c 65 61 72 29 0d 03 | 20 1c 21 69 63 6f 6e 64 |clear)..| .!icond|
|00001310| 3d 68 61 6e 64 3a 69 63 | 6f 6e 64 21 34 3d 69 63 |=hand:ic|ond!4=ic|
|00001320| 6f 6e 0d 03 2a 1e 69 63 | 6f 6e 64 21 38 3d 65 6f |on..*.ic|ond!8=eo|
|00001330| 72 3a 69 63 6f 6e 64 21 | 31 32 3d 63 6c 65 61 72 |r:icond!|12=clear|
|00001340| 0d 03 34 21 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |..4!.. "|Wimp_Set|
|00001350| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 69 63 6f 6e |IconStat|e",,icon|
|00001360| 64 0d 03 3e 05 e1 0d 03 | 48 12 dd f2 73 74 61 74 |d..>....|H...stat|
|00001370| 65 28 77 69 2c 69 63 29 | 0d 03 52 18 21 62 6c 6f |e(wi,ic)|..R.!blo|
|00001380| 63 6b 3d 77 69 3a 62 6c | 6f 63 6b 21 34 3d 69 63 |ck=wi:bl|ock!4=ic|
|00001390| 0d 03 5c 21 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..\!.. "|Wimp_Get|
|000013a0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|000013b0| 6b 0d 03 66 05 e1 0d 03 | 70 13 dd a4 73 65 6c 65 |k..f....|p...sele|
|000013c0| 63 74 28 77 69 2c 69 63 | 29 0d 03 7a 11 f2 73 74 |ct(wi,ic|)..z..st|
|000013d0| 61 74 65 28 77 69 2c 69 | 63 29 0d 03 84 22 e7 20 |ate(wi,i|c)...". |
|000013e0| 28 28 62 6c 6f 63 6b 21 | 32 34 29 20 80 20 31 3c |((block!|24) . 1<|
|000013f0| 3c 32 31 29 3e 30 20 8c | 20 3d 2d 31 0d 03 8e 06 |<21)>0 .| =-1....|
|00001400| 3d 30 0d 03 98 0d dd a4 | 62 69 74 28 61 24 29 0d |=0......|bit(a$).|
|00001410| 03 a2 11 c8 95 20 a7 61 | 24 2c 22 3a 22 29 3e 30 |..... .a|$,":")>0|
|00001420| 0d 03 ac 16 61 24 3d c1 | 61 24 2c a7 61 24 2c 22 |....a$=.|a$,.a$,"|
|00001430| 3a 22 29 2b 31 29 0d 03 | b6 05 ce 0d 03 c0 11 c8 |:")+1)..|........|
|00001440| 95 20 a7 61 24 2c 22 2e | 22 29 3e 30 0d 03 ca 16 |. .a$,".|")>0....|
|00001450| 61 24 3d c1 61 24 2c a7 | 61 24 2c 22 2e 22 29 2b |a$=.a$,.|a$,".")+|
|00001460| 31 29 0d 03 d4 05 ce 0d | 03 de 07 3d 61 24 0d 03 |1)......|...=a$..|
|00001470| e8 13 dd f2 6f 70 65 6e | 6d 65 6e 75 28 78 2c 79 |....open|menu(x,y|
|00001480| 29 0d 03 f2 26 c8 99 20 | 22 57 69 6d 70 5f 43 72 |)...&.. |"Wimp_Cr|
|00001490| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 74 6f 70 6d 65 |eateMenu|",,topme|
|000014a0| 6e 75 25 2c 78 2c 79 0d | 03 fc 05 e1 0d 04 06 1e |nu%,x,y.|........|
|000014b0| dd a4 6d 65 6e 75 28 74 | 69 74 6c 65 24 2c 77 69 |..menu(t|itle$,wi|
|000014c0| 64 74 68 2c 6d 65 6e 75 | 24 29 0d 04 10 0e 6d 65 |dth,menu|$)....me|
|000014d0| 6e 75 24 2b 3d 22 2c 22 | 0d 04 1a 13 6f 6c 64 6d |nu$+=","|....oldm|
|000014e0| 65 6e 75 3d 6d 65 6e 75 | 70 74 72 0d 04 24 13 24 |enu=menu|ptr..$.$|
|000014f0| 6d 65 6e 75 70 74 72 3d | 74 69 74 6c 65 24 0d 04 |menuptr=|title$..|
|00001500| 2e 10 6d 65 6e 75 70 74 | 72 3f 31 32 3d 37 0d 04 |..menupt|r?12=7..|
|00001510| 38 10 6d 65 6e 75 70 74 | 72 3f 31 33 3d 32 0d 04 |8.menupt|r?13=2..|
|00001520| 42 10 6d 65 6e 75 70 74 | 72 3f 31 34 3d 37 0d 04 |B.menupt|r?14=7..|
|00001530| 4c 10 6d 65 6e 75 70 74 | 72 3f 31 35 3d 30 0d 04 |L.menupt|r?15=0..|
|00001540| 56 14 6d 65 6e 75 70 74 | 72 21 31 36 3d 77 69 64 |V.menupt|r!16=wid|
|00001550| 74 68 0d 04 60 11 6d 65 | 6e 75 70 74 72 21 32 30 |th..`.me|nuptr!20|
|00001560| 3d 34 38 0d 04 6a 10 6d | 65 6e 75 70 74 72 21 32 |=48..j.m|enuptr!2|
|00001570| 34 3d 30 0d 04 74 0f 6d | 65 6e 75 70 74 72 2b 3d |4=0..t.m|enuptr+=|
|00001580| 32 38 0d 04 7e 05 f5 0d | 04 88 10 f2 69 74 65 6d |28..~...|....item|
|00001590| 28 6d 65 6e 75 24 29 0d | 04 92 1f 6d 65 6e 75 24 |(menu$).|...menu$|
|000015a0| 3d c1 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|000015b0| 2c 22 29 2b 31 29 0d 04 | 9c 0f 6d 65 6e 75 70 74 |,")+1)..|..menupt|
|000015c0| 72 2b 3d 32 34 0d 04 a6 | 0e fd 20 6d 65 6e 75 24 |r+=24...|.. menu$|
|000015d0| 3d 22 22 0d 04 b0 29 6d | 65 6e 75 70 74 72 21 2d |=""...)m|enuptr!-|
|000015e0| 32 34 3d 28 6d 65 6e 75 | 70 74 72 21 2d 32 34 29 |24=(menu|ptr!-24)|
|000015f0| 20 84 20 25 31 30 30 30 | 30 30 30 30 0d 04 ba 0c | . %1000|0000....|
|00001600| 3d 6f 6c 64 6d 65 6e 75 | 0d 04 c4 0e dd f2 69 74 |=oldmenu|......it|
|00001610| 65 6d 28 6d 24 29 0d 04 | ce 16 6d 24 3d c0 6d 24 |em(m$)..|..m$=.m$|
|00001620| 2c a7 6d 24 2c 22 2c 22 | 29 2d 31 29 0d 04 d8 0f |,.m$,","|)-1)....|
|00001630| 69 24 3d 22 22 3a 6a 24 | 3d 22 22 0d 04 e2 12 e7 |i$="":j$|="".....|
|00001640| 20 a7 6d 24 2c 22 5b 22 | 29 3e 30 20 8c 0d 04 ec | .m$,"["|)>0 ....|
|00001650| 16 69 24 3d c0 6d 24 2c | a7 6d 24 2c 22 5d 22 29 |.i$=.m$,|.m$,"]")|
|00001660| 2d 31 29 0d 04 f6 16 6d | 24 3d c1 6d 24 2c a7 6d |-1)....m|$=.m$,.m|
|00001670| 24 2c 22 5d 22 29 2b 31 | 29 0d 05 00 16 6a 24 3d |$,"]")+1|)....j$=|
|00001680| c0 69 24 2c a7 69 24 2c | 22 2f 22 29 2d 31 29 0d |.i$,.i$,|"/")-1).|
|00001690| 05 0a 16 69 24 3d c1 69 | 24 2c a7 69 24 2c 22 2f |...i$=.i|$,.i$,"/|
|000016a0| 22 29 2b 31 29 0d 05 14 | 05 cd 0d 05 1e 14 69 66 |")+1)...|......if|
|000016b0| 6c 61 67 73 3d 26 30 37 | 30 30 30 30 32 31 0d 05 |lags=&07|000021..|
|000016c0| 28 0c 6d 66 6c 61 67 73 | 3d 30 0d 05 32 0e 73 75 |(.mflags|=0..2.su|
|000016d0| 62 6d 65 6e 75 3d 2d 31 | 0d 05 3c 20 e7 20 a7 6a |bmenu=-1|..< . .j|
|000016e0| 24 2c 22 77 22 29 3e 30 | 20 8c 20 73 75 62 6d 65 |$,"w")>0| . subme|
|000016f0| 6e 75 3d a0 28 69 24 29 | 0d 05 46 20 e7 20 a7 6a |nu=.(i$)|..F . .j|
|00001700| 24 2c 22 73 22 29 3e 30 | 20 8c 20 73 75 62 6d 65 |$,"s")>0| . subme|
|00001710| 6e 75 3d a0 28 69 24 29 | 0d 05 50 24 e7 20 a7 6a |nu=.(i$)|..P$. .j|
|00001720| 24 2c 22 74 22 29 3e 30 | 20 8c 20 6d 66 6c 61 67 |$,"t")>0| . mflag|
|00001730| 73 3d 6d 66 6c 61 67 73 | 20 84 20 31 0d 05 5a 24 |s=mflags| . 1..Z$|
|00001740| e7 20 a7 6a 24 2c 22 6c | 22 29 3e 30 20 8c 20 6d |. .j$,"l|")>0 . m|
|00001750| 66 6c 61 67 73 3d 6d 66 | 6c 61 67 73 20 84 20 32 |flags=mf|lags . 2|
|00001760| 0d 05 64 13 21 6d 65 6e | 75 70 74 72 3d 6d 66 6c |..d.!men|uptr=mfl|
|00001770| 61 67 73 0d 05 6e 15 6d | 65 6e 75 70 74 72 21 34 |ags..n.m|enuptr!4|
|00001780| 3d 73 75 62 6d 65 6e 75 | 0d 05 78 14 6d 65 6e 75 |=submenu|..x.menu|
|00001790| 70 74 72 21 38 3d 69 66 | 6c 61 67 73 0d 05 82 14 |ptr!8=if|lags....|
|000017a0| 24 28 6d 65 6e 75 70 74 | 72 2b 31 32 29 3d 6d 24 |$(menupt|r+12)=m$|
|000017b0| 0d 05 8c 05 e1 0d 05 96 | 14 dd f2 62 75 74 74 6f |........|...butto|
|000017c0| 6e 73 28 62 6c 6f 63 6b | 29 0d 05 a0 26 e7 20 62 |ns(block|)...&. b|
|000017d0| 6c 6f 63 6b 21 31 32 3d | 2d 32 20 80 20 62 6c 6f |lock!12=|-2 . blo|
|000017e0| 63 6b 21 38 3d 32 20 f2 | 6d 65 6e 75 73 3a e1 0d |ck!8=2 .|menus:..|
|000017f0| 05 aa 34 e7 20 62 6c 6f | 63 6b 21 31 32 3d 2d 32 |..4. blo|ck!12=-2|
|00001800| 20 80 20 62 6c 6f 63 6b | 21 38 3c 3e 32 20 f2 6f | . block|!8<>2 .o|
|00001810| 70 65 6e 77 69 6e 64 6f | 77 28 63 6f 70 79 77 69 |penwindo|w(copywi|
|00001820| 6e 25 29 0d 05 b4 37 e7 | 20 62 6c 6f 63 6b 21 31 |n%)...7.| block!1|
|00001830| 32 3d 63 6f 70 79 77 69 | 6e 25 20 80 20 62 6c 6f |2=copywi|n% . blo|
|00001840| 63 6b 21 31 36 3d 31 31 | 20 8c 20 ff 28 22 46 6f |ck!16=11| . .("Fo|
|00001850| 72 6d 61 74 20 30 20 4c | 22 29 0d 05 be 37 e7 20 |rmat 0 L|")...7. |
|00001860| 62 6c 6f 63 6b 21 31 32 | 3d 63 6f 70 79 77 69 6e |block!12|=copywin|
|00001870| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 31 34 20 |% . bloc|k!16=14 |
|00001880| 8c 20 ff 28 22 46 6f 72 | 6d 61 74 20 30 20 44 22 |. .("For|mat 0 D"|
|00001890| 29 0d 05 c8 37 e7 20 62 | 6c 6f 63 6b 21 31 32 3d |)...7. b|lock!12=|
|000018a0| 63 6f 70 79 77 69 6e 25 | 20 80 20 62 6c 6f 63 6b |copywin%| . block|
|000018b0| 21 31 36 3d 31 36 20 8c | 20 ff 28 22 46 6f 72 6d |!16=16 .| .("Form|
|000018c0| 61 74 20 30 20 45 22 29 | 0d 05 d2 35 e7 20 62 6c |at 0 E")|...5. bl|
|000018d0| 6f 63 6b 21 31 32 3d 63 | 6f 70 79 77 69 6e 25 20 |ock!12=c|opywin% |
|000018e0| 80 20 62 6c 6f 63 6b 21 | 31 36 3d 34 20 8c 20 f2 |. block!|16=4 . .|
|000018f0| 64 65 74 65 72 6d 69 6e | 65 73 69 7a 65 0d 05 dc |determin|esize...|
|00001900| 31 e7 20 62 6c 6f 63 6b | 21 31 32 3d 63 6f 70 79 |1. block|!12=copy|
|00001910| 77 69 6e 25 20 80 20 62 | 6c 6f 63 6b 21 31 36 3d |win% . b|lock!16=|
|00001920| 37 20 8c 20 f2 63 6f 72 | 72 75 70 74 65 64 0d 05 |7 . .cor|rupted..|
|00001930| e6 32 e7 20 62 6c 6f 63 | 6b 21 31 32 3d 63 6f 70 |.2. bloc|k!12=cop|
|00001940| 79 77 69 6e 25 20 80 20 | 62 6c 6f 63 6b 21 31 36 |ywin% . |block!16|
|00001950| 3d 39 20 8c 20 f2 72 75 | 62 62 69 73 68 69 6e 67 |=9 . .ru|bbishing|
|00001960| 0d 05 f0 2c e7 20 62 6c | 6f 63 6b 21 31 32 3d 63 |...,. bl|ock!12=c|
|00001970| 6f 70 79 77 69 6e 25 20 | 80 20 62 6c 6f 63 6b 21 |opywin% |. block!|
|00001980| 31 36 3d 32 20 8c 20 f2 | 63 6f 70 79 0d 05 fa 05 |16=2 . .|copy....|
|00001990| e1 0d 06 04 10 dd f2 70 | 72 6f 63 65 73 73 6b 65 |.......p|rocesske|
|000019a0| 79 0d 06 0e 21 c8 99 20 | 22 57 69 6d 70 5f 50 72 |y...!.. |"Wimp_Pr|
|000019b0| 6f 63 65 73 73 4b 65 79 | 22 2c 62 6c 6f 63 6b 21 |ocessKey|",block!|
|000019c0| 32 34 0d 06 18 05 e1 0d | 06 22 0b dd f2 6d 65 6e |24......|."...men|
|000019d0| 75 73 0d 06 2c 10 6d 65 | 6e 75 6f 70 65 6e 3d 2d |us..,.me|nuopen=-|
|000019e0| 34 34 0d 06 36 11 6d 65 | 6e 75 70 74 72 3d 6d 65 |44..6.me|nuptr=me|
|000019f0| 6e 75 25 0d 06 40 0c c8 | 97 20 78 2c 79 2c 62 0d |nu%..@..|. x,y,b.|
|00001a00| 06 4a 3d 74 6f 70 6d 65 | 6e 75 25 3d a4 6d 65 6e |.J=topme|nu%=.men|
|00001a10| 75 28 22 21 44 69 73 6b | 43 6f 70 79 22 2c 31 31 |u("!Disk|Copy",11|
|00001a20| 30 2c 22 5b 77 2f 69 6e | 66 6f 25 5d 49 6e 66 6f |0,"[w/in|fo%]Info|
|00001a30| 2c 43 6f 70 79 2c 51 75 | 69 74 22 29 0d 06 54 17 |,Copy,Qu|it")..T.|
|00001a40| f2 6f 70 65 6e 6d 65 6e | 75 28 78 2d 37 35 2c 32 |.openmen|u(x-75,2|
|00001a50| 34 30 29 0d 06 5e 05 e1 | 0d 06 68 0c dd f2 64 65 |40)..^..|..h...de|
|00001a60| 63 6f 64 65 0d 06 72 2e | c8 99 20 22 57 69 6d 70 |code..r.|.. "Wimp|
|00001a70| 5f 44 65 63 6f 64 65 4d | 65 6e 75 22 2c 2c 74 6f |_DecodeM|enu",,to|
|00001a80| 70 6d 65 6e 75 25 2c 62 | 6c 6f 63 6b 2c 69 63 6f |pmenu%,b|lock,ico|
|00001a90| 6e 64 0d 06 7c 1f e7 20 | 24 69 63 6f 6e 64 3d 22 |nd..|.. |$icond="|
|00001aa0| 51 75 69 74 22 20 8c 20 | 65 6e 64 25 3d b9 3a ef |Quit" . |end%=.:.|
|00001ab0| 34 0d 06 86 23 c8 99 20 | 22 57 69 6d 70 5f 47 65 |4...#.. |"Wimp_Ge|
|00001ac0| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 22 2c 2c 62 |tPointer|Info",,b|
|00001ad0| 6c 6f 63 6b 0d 06 90 11 | e7 20 62 6c 6f 63 6b 21 |lock....|. block!|
|00001ae0| 38 3d 31 20 8c 0d 06 9a | 1b e7 20 6d 65 6e 75 6f |8=1 ....|.. menuo|
|00001af0| 70 65 6e 3d 2d 34 34 20 | 8c 20 f2 6d 65 6e 75 73 |pen=-44 |. .menus|
|00001b00| 0d 06 a4 22 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...".. "|Wimp_Cre|
|00001b10| 61 74 65 4d 65 6e 75 22 | 2c 2c 74 6f 70 6d 65 6e |ateMenu"|,,topmen|
|00001b20| 75 25 0d 06 ae 05 cc 0d | 06 b8 1c c8 99 20 22 57 |u%......|..... "W|
|00001b30| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001b40| 2c 2d 31 0d 06 c2 05 cd | 0d 06 cc 05 e1 0d 06 d6 |,-1.....|........|
|00001b50| 0e dd f2 74 65 6d 70 6c | 61 74 65 0d 06 e0 32 c8 |...templ|ate...2.|
|00001b60| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |. "Wimp_|OpenTemp|
|00001b70| 6c 61 74 65 22 2c 2c 22 | 3c 43 6f 70 79 24 44 69 |late",,"|<Copy$Di|
|00001b80| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 06 ea |r>.Templ|ates"...|
|00001b90| 11 69 6e 64 69 72 3d 63 | 75 72 62 75 66 25 0d 06 |.indir=c|urbuf%..|
|00001ba0| f4 1f 69 6e 66 6f 25 3d | a4 74 65 6d 70 6c 61 74 |..info%=|.templat|
|00001bb0| 65 28 22 50 72 6f 67 49 | 6e 66 6f 22 29 0d 06 fe |e("ProgI|nfo")...|
|00001bc0| 1e 63 6f 70 79 77 69 6e | 25 3d a4 74 65 6d 70 6c |.copywin|%=.templ|
|00001bd0| 61 74 65 28 22 43 6f 70 | 79 22 29 0d 07 08 1b c8 |ate("Cop|y").....|
|00001be0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 54 65 6d |. "Wimp_|CloseTem|
|00001bf0| 70 6c 61 74 65 22 0d 07 | 12 05 e1 0d 07 1c 05 e1 |plate"..|........|
|00001c00| 0d 07 26 0b dd f2 63 6d | 65 6e 75 0d 07 30 23 c8 |..&...cm|enu..0#.|
|00001c10| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00001c20| 65 72 49 6e 66 6f 22 2c | 2c 69 63 6f 6e 64 0d 07 |erInfo",|,icond..|
|00001c30| 3a 11 e7 20 69 63 6f 6e | 64 21 38 3d 31 20 8c 0d |:.. icon|d!8=1 ..|
|00001c40| 07 44 1a e7 20 6d 65 6e | 75 6f 70 65 6e 3d 2d 34 |.D.. men|uopen=-4|
|00001c50| 34 20 8c 20 f2 6d 65 6e | 75 0d 07 4e 22 c8 99 20 |4 . .men|u..N".. |
|00001c60| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00001c70| 22 2c 2c 74 6f 70 6d 65 | 6e 75 25 0d 07 58 05 cc |",,topme|nu%..X..|
|00001c80| 0d 07 62 1c c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |..b... "|Wimp_Cre|
|00001c90| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 07 6c 05 |ateMenu"|,,-1..l.|
|00001ca0| cd 0d 07 76 05 e1 0d 07 | 80 10 dd f2 6b 65 79 28 |...v....|....key(|
|00001cb0| 6b 65 79 6e 6f 29 0d 07 | 8a 1e 63 6f 6d 24 3d 24 |keyno)..|..com$=$|
|00001cc0| a4 74 61 64 28 6b 65 79 | 73 25 2c 37 39 2b 6b 65 |.tad(key|s%,79+ke|
|00001cd0| 79 6e 6f 29 0d 07 94 11 | e7 20 63 6f 6d 24 3d 22 |yno)....|. com$="|
|00001ce0| 22 20 8c 20 e1 0d 07 9e | 1f e7 20 a4 73 65 6c 65 |" . ....|.. .sele|
|00001cf0| 63 74 28 6b 65 79 73 25 | 2c 33 39 2b 6b 65 79 6e |ct(keys%|,39+keyn|
|00001d00| 6f 29 20 8c 0d 07 a8 17 | ff 28 22 57 69 6d 70 54 |o) .....|.("WimpT|
|00001d10| 61 73 6b 20 22 2b 63 6f | 6d 24 29 0d 07 b2 05 e1 |ask "+co|m$).....|
|00001d20| 0d 07 bc 05 cd 0d 07 c6 | 14 e7 20 6b 65 79 70 6f |........|.. keypo|
|00001d30| 73 3c 3e 2d 31 20 8c 20 | e1 0d 07 d0 1b 6b 65 79 |s<>-1 . |.....key|
|00001d40| 70 6f 73 3d 31 3a 6b 65 | 79 74 6f 75 73 65 3d 6b |pos=1:ke|ytouse=k|
|00001d50| 65 79 6e 6f 0d 07 da 05 | e1 0d 07 e4 0f dd f2 61 |eyno....|.......a|
|00001d60| 64 64 6c 65 74 74 65 72 | 0d 07 ee 21 63 6f 6d 24 |ddletter|...!com$|
|00001d70| 3d 24 a4 74 61 64 28 6b | 65 79 73 25 2c 37 39 2b |=$.tad(k|eys%,79+|
|00001d80| 6b 65 79 74 6f 75 73 65 | 29 0d 07 f8 2b c8 99 20 |keytouse|)...+.. |
|00001d90| 22 57 69 6d 70 5f 50 72 | 6f 63 65 73 73 4b 65 79 |"Wimp_Pr|ocessKey|
|00001da0| 22 2c 97 28 c1 63 6f 6d | 24 2c 6b 65 79 70 6f 73 |",.(.com|$,keypos|
|00001db0| 2c 31 29 29 0d 08 02 0d | 6b 65 79 70 6f 73 2b 3d |,1))....|keypos+=|
|00001dc0| 31 0d 08 0c 20 e7 20 6b | 65 79 70 6f 73 3e a9 28 |1... . k|eypos>.(|
|00001dd0| 63 6f 6d 24 29 20 8c 20 | 6b 65 79 70 6f 73 3d 2d |com$) . |keypos=-|
|00001de0| 31 0d 08 16 05 e1 0d 08 | 20 0e 20 dd f2 65 72 72 |1.......| . ..err|
|00001df0| 28 61 24 29 0d 08 2a 1d | 20 e9 20 61 24 3d 61 24 |(a$)..*.| . a$=a$|
|00001e00| 2b 22 20 3a 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |+" : at |line "+.|
|00001e10| 9e 0d 08 34 0e 20 f2 6d | 6f 61 6e 28 61 24 29 0d |...4. .m|oan(a$).|
|00001e20| 08 3e 06 20 e1 0d 08 48 | 0e dd f2 72 65 64 6f 28 |.>. ...H|...redo(|
|00001e30| 68 25 29 0d 08 52 0d 21 | 62 6c 6f 63 6b 3d 68 25 |h%)..R.!|block=h%|
|00001e40| 0d 08 5c 1f c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |..\..."W|imp_Clos|
|00001e50| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 0d |eWindow"|,,block.|
|00001e60| 08 66 13 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 68 |.f..open|window(h|
|00001e70| 25 29 0d 08 70 05 e1 0d | 08 7a 13 dd f2 64 65 74 |%)..p...|.z...det|
|00001e80| 65 72 6d 69 6e 65 73 69 | 7a 65 0d 08 84 0c 6a 72 |erminesi|ze....jr|
|00001e90| 66 6f 72 6d 3d 31 0d 08 | 8e 26 f2 6d 6f 61 6e 28 |form=1..|.&.moan(|
|00001ea0| 22 50 6c 65 61 73 65 20 | 49 6e 73 65 72 74 20 53 |"Please |Insert S|
|00001eb0| 4f 55 52 43 45 20 64 69 | 73 6b 22 29 0d 08 98 18 |OURCE di|sk")....|
|00001ec0| 20 f4 20 69 73 20 69 74 | 20 38 30 30 6b 20 66 6f | . is it| 800k fo|
|00001ed0| 72 6d 61 74 0d 08 a2 28 | 62 79 74 65 73 3d 31 30 |rmat...(|bytes=10|
|00001ee0| 3a 73 65 63 74 6f 72 73 | 3d 35 3a 68 65 61 64 73 |:sectors|=5:heads|
|00001ef0| 3d 32 3a 64 65 6e 73 69 | 74 79 3d 32 0d 08 ac 2e |=2:densi|ty=2....|
|00001f00| f2 63 72 65 61 74 65 64 | 65 66 65 63 74 28 62 79 |.created|efect(by|
|00001f10| 74 65 73 2c 73 65 63 74 | 6f 72 73 2c 68 65 61 64 |tes,sect|ors,head|
|00001f20| 73 2c 64 65 6e 73 69 74 | 79 29 0d 08 b6 44 f2 64 |s,densit|y)...D.d|
|00001f30| 69 73 63 5f 6f 70 28 30 | 2c 28 32 5e 62 79 74 65 |isc_op(0|,(2^byte|
|00001f40| 73 29 2a 73 65 63 74 6f | 72 73 2a 68 65 61 64 73 |s)*secto|rs*heads|
|00001f50| 2c 68 65 61 64 73 2a 73 | 65 63 74 6f 72 73 2a 28 |,heads*s|ectors*(|
|00001f60| 32 5e 62 79 74 65 73 29 | 2a 37 39 2c 30 29 0d 08 |2^bytes)|*79,0)..|
|00001f70| c0 49 e7 20 28 66 6c 61 | 67 73 20 80 20 31 29 3d |.I. (fla|gs . 1)=|
|00001f80| 30 20 8c 20 73 69 7a 65 | 3d 26 43 38 30 30 30 3a |0 . size|=&C8000:|
|00001f90| 24 a4 74 61 64 28 63 6f | 70 79 77 69 6e 25 2c 36 |$.tad(co|pywin%,6|
|00001fa0| 29 3d 22 45 22 3a f2 72 | 65 64 6f 28 63 6f 70 79 |)="E":.r|edo(copy|
|00001fb0| 77 69 6e 25 29 3a e1 0d | 08 ca 18 20 f4 20 69 73 |win%):..|... . is|
|00001fc0| 20 69 74 20 36 34 30 6b | 20 66 6f 72 6d 61 74 0d | it 640k| format.|
|00001fd0| 08 d4 28 62 79 74 65 73 | 3d 38 3a 73 65 63 74 6f |..(bytes|=8:secto|
|00001fe0| 72 73 3d 31 36 3a 68 65 | 61 64 73 3d 32 3a 64 65 |rs=16:he|ads=2:de|
|00001ff0| 6e 73 69 74 79 3d 32 0d | 08 de 2e f2 63 72 65 61 |nsity=2.|....crea|
|00002000| 74 65 64 65 66 65 63 74 | 28 62 79 74 65 73 2c 73 |tedefect|(bytes,s|
|00002010| 65 63 74 6f 72 73 2c 68 | 65 61 64 73 2c 64 65 6e |ectors,h|eads,den|
|00002020| 73 69 74 79 29 0d 08 e8 | 44 f2 64 69 73 63 5f 6f |sity)...|D.disc_o|
|00002030| 70 28 30 2c 28 32 5e 62 | 79 74 65 73 29 2a 73 65 |p(0,(2^b|ytes)*se|
|00002040| 63 74 6f 72 73 2a 68 65 | 61 64 73 2c 68 65 61 64 |ctors*he|ads,head|
|00002050| 73 2a 73 65 63 74 6f 72 | 73 2a 28 32 5e 62 79 74 |s*sector|s*(2^byt|
|00002060| 65 73 29 2a 37 39 2c 30 | 29 0d 08 f2 49 e7 20 28 |es)*79,0|)...I. (|
|00002070| 66 6c 61 67 73 20 80 20 | 31 29 3d 30 20 8c 20 73 |flags . |1)=0 . s|
|00002080| 69 7a 65 3d 26 41 30 30 | 30 30 3a 24 a4 74 61 64 |ize=&A00|00:$.tad|
|00002090| 28 63 6f 70 79 77 69 6e | 25 2c 36 29 3d 22 4c 22 |(copywin|%,6)="L"|
|000020a0| 3a f2 72 65 64 6f 28 63 | 6f 70 79 77 69 6e 25 29 |:.redo(c|opywin%)|
|000020b0| 3a e1 0d 08 fc 15 20 f4 | 20 73 69 7a 65 20 6e 6f |:..... .| size no|
|000020c0| 74 20 66 6f 75 6e 64 0d | 09 06 36 f2 6d 6f 61 6e |t found.|..6.moan|
|000020d0| 28 22 43 61 6e 27 74 20 | 44 65 74 65 72 6d 69 6e |("Can't |Determin|
|000020e0| 65 20 53 69 7a 65 2c 20 | 70 6c 65 61 73 65 20 69 |e Size, |please i|
|000020f0| 6e 70 75 74 20 28 4c 2f | 44 29 3a 22 29 0d 09 10 |nput (L/|D):")...|
|00002100| 0a e8 73 69 7a 65 24 0d | 09 1a 1d e7 20 73 69 7a |..size$.|.... siz|
|00002110| 65 24 3d 22 4c 22 20 84 | 20 73 69 7a 65 24 3d 22 |e$="L" .| size$="|
|00002120| 6c 22 20 8c 0d 09 24 5a | 62 79 74 65 73 3d 38 3a |l" ...$Z|bytes=8:|
|00002130| 73 65 63 74 6f 72 73 3d | 31 36 3a 68 65 61 64 73 |sectors=|16:heads|
|00002140| 3d 32 3a 64 65 6e 73 69 | 74 79 3d 32 3a 73 69 7a |=2:densi|ty=2:siz|
|00002150| 65 3d 26 41 30 30 30 30 | 3a 24 a4 74 61 64 28 63 |e=&A0000|:$.tad(c|
|00002160| 6f 70 79 77 69 6e 25 2c | 36 29 3d 22 4c 22 3a f2 |opywin%,|6)="L":.|
|00002170| 72 65 64 6f 28 63 6f 70 | 79 77 69 6e 25 29 0d 09 |redo(cop|ywin%)..|
|00002180| 2e 05 cc 0d 09 38 5a 62 | 79 74 65 73 3d 31 30 3a |.....8Zb|ytes=10:|
|00002190| 73 65 63 74 6f 72 73 3d | 35 3a 68 65 61 64 73 3d |sectors=|5:heads=|
|000021a0| 32 3a 64 65 6e 73 69 74 | 79 3d 32 3a 73 69 7a 65 |2:densit|y=2:size|
|000021b0| 3d 26 43 38 30 30 30 3a | 24 a4 74 61 64 28 63 6f |=&C8000:|$.tad(co|
|000021c0| 70 79 77 69 6e 25 2c 36 | 29 3d 22 44 22 3a f2 72 |pywin%,6|)="D":.r|
|000021d0| 65 64 6f 28 63 6f 70 79 | 77 69 6e 25 29 0d 09 42 |edo(copy|win%)..B|
|000021e0| 05 cd 0d 09 4c 2e f2 63 | 72 65 61 74 65 64 65 66 |....L..c|reatedef|
|000021f0| 65 63 74 28 62 79 74 65 | 73 2c 73 65 63 74 6f 72 |ect(byte|s,sector|
|00002200| 73 2c 68 65 61 64 73 2c | 64 65 6e 73 69 74 79 29 |s,heads,|density)|
|00002210| 0d 09 56 17 f1 8a 30 2c | 33 29 3b 89 28 37 39 29 |..V...0,|3);.(79)|
|00002220| 3b 8a 30 2c 32 29 3b 0d | 09 60 05 e1 0d 09 6a 2f |;.0,2);.|.`....j/|
|00002230| dd f2 63 72 65 61 74 65 | 64 65 66 65 63 74 28 62 |..create|defect(b|
|00002240| 79 74 65 73 2c 73 65 63 | 74 6f 72 73 2c 68 65 61 |ytes,sec|tors,hea|
|00002250| 64 73 2c 64 65 6e 73 69 | 74 79 29 0d 09 74 13 64 |ds,densi|ty)..t.d|
|00002260| 65 66 65 63 74 25 3f 30 | 3d 62 79 74 65 73 0d 09 |efect%?0|=bytes..|
|00002270| 7e 15 64 65 66 65 63 74 | 25 3f 31 3d 73 65 63 74 |~.defect|%?1=sect|
|00002280| 6f 72 73 0d 09 88 13 64 | 65 66 65 63 74 25 3f 32 |ors....d|efect%?2|
|00002290| 3d 68 65 61 64 73 0d 09 | 92 15 64 65 66 65 63 74 |=heads..|..defect|
|000022a0| 25 3f 33 3d 64 65 6e 73 | 69 74 79 0d 09 9c 29 64 |%?3=dens|ity...)d|
|000022b0| 65 66 65 63 74 25 21 31 | 36 3d 38 30 2a 68 65 61 |efect%!1|6=80*hea|
|000022c0| 64 73 2a 73 65 63 74 6f | 72 73 2a 28 32 5e 62 79 |ds*secto|rs*(2^by|
|000022d0| 74 65 73 29 0d 09 a6 05 | e1 0d 09 b0 2d dd f2 64 |tes)....|....-..d|
|000022e0| 69 73 63 5f 6f 70 28 63 | 6f 6d 6d 61 6e 64 2c 6c |isc_op(c|ommand,l|
|000022f0| 65 6e 2c 73 65 63 74 6f | 72 73 74 61 72 74 2c 6f |en,secto|rstart,o|
|00002300| 66 66 73 65 74 29 0d 09 | ba 23 42 25 3d 63 6f 6d |ffset)..|.#B%=com|
|00002310| 6d 61 6e 64 20 84 20 28 | 28 64 65 66 65 63 74 25 |mand . (|(defect%|
|00002320| 20 81 20 34 29 3c 3c 38 | 29 0d 09 c4 12 43 25 3d | . 4)<<8|)....C%=|
|00002330| 73 65 63 74 6f 72 73 74 | 61 72 74 0d 09 ce 15 44 |sectorst|art....D|
|00002340| 25 3d 6d 65 6d 6f 72 79 | 25 2b 6f 66 66 73 65 74 |%=memory|%+offset|
|00002350| 0d 09 d8 0a 45 25 3d 6c | 65 6e 0d 09 e2 2b c8 99 |....E%=l|en...+..|
|00002360| 20 22 58 41 44 46 53 5f | 44 69 73 63 4f 70 22 2c | "XADFS_|DiscOp",|
|00002370| 2c 42 25 2c 43 25 2c 44 | 25 2c 45 25 20 b8 20 3b |,B%,C%,D|%,E% . ;|
|00002380| 66 6c 61 67 73 0d 09 ec | 05 e1 0d 09 f6 12 62 75 |flags...|......bu|
|00002390| 66 66 65 72 73 69 7a 65 | 3d 32 30 30 0d 0a 00 0f |ffersize|=200....|
|000023a0| dd f2 63 6f 72 72 75 70 | 74 65 64 0d 0a 0a 48 e7 |..corrup|ted...H.|
|000023b0| 6a 72 66 6f 72 6d 3d 30 | 20 8c 20 f2 6d 6f 61 6e |jrform=0| . .moan|
|000023c0| 28 22 59 6f 75 20 4e 65 | 65 64 20 74 6f 20 66 69 |("You Ne|ed to fi|
|000023d0| 6e 64 20 74 68 65 20 46 | 6f 72 6d 61 74 20 6f 66 |nd the F|ormat of|
|000023e0| 20 74 68 65 20 44 69 73 | 6b 20 46 69 72 73 74 22 | the Dis|k First"|
|000023f0| 29 3a e1 0d 0a 14 26 f2 | 6d 6f 61 6e 28 22 50 6c |):....&.|moan("Pl|
|00002400| 65 61 73 65 20 49 6e 73 | 65 72 74 20 53 4f 55 52 |ease Ins|ert SOUR|
|00002410| 43 45 20 44 69 73 6b 22 | 29 0d 0a 1e 13 74 3d 30 |CE Disk"|)....t=0|
|00002420| 3a 68 3d 30 3a 63 75 72 | 72 25 3d 30 0d 0a 23 2d |:h=0:cur|r%=0..#-|
|00002430| 73 74 61 74 65 3d a4 63 | 68 65 63 6b 68 65 61 64 |state=.c|heckhead|
|00002440| 28 30 2a 32 2b 30 29 3a | 68 65 61 64 28 30 2a 32 |(0*2+0):|head(0*2|
|00002450| 2b 30 29 3d 73 74 61 74 | 65 0d 0a 24 13 74 3d 31 |+0)=stat|e..$.t=1|
|00002460| 3a 68 3d 31 3a 63 75 72 | 72 25 3d 31 0d 0a 28 05 |:h=1:cur|r%=1..(.|
|00002470| f5 0d 0a 32 2d 73 74 61 | 74 65 3d a4 63 68 65 63 |...2-sta|te=.chec|
|00002480| 6b 68 65 61 64 28 74 2a | 32 2b 68 29 3a 68 65 61 |khead(t*|2+h):hea|
|00002490| 64 28 74 2a 32 2b 68 29 | 3d 73 74 61 74 65 0d 0a |d(t*2+h)|=state..|
|000024a0| 3c 2b e7 20 73 74 61 74 | 65 20 8c 20 e9 20 63 75 |<+. stat|e . . cu|
|000024b0| 72 72 25 3d 63 75 72 72 | 25 20 8b 20 63 75 72 72 |rr%=curr|% . curr|
|000024c0| 25 3d 63 75 72 72 25 2b | 31 0d 0a 46 1d 68 2b 3d |%=curr%+|1..F.h+=|
|000024d0| 31 3a e7 20 68 3d 68 65 | 61 64 73 20 8c 20 68 3d |1:. h=he|ads . h=|
|000024e0| 30 3a 74 2b 3d 31 0d 0a | 50 0a fd 20 74 3d 38 30 |0:t+=1..|P.. t=80|
|000024f0| 0d 0a 5a 2e 20 24 a4 74 | 61 64 28 63 6f 70 79 77 |..Z. $.t|ad(copyw|
|00002500| 69 6e 25 2c 31 32 29 3d | c3 63 75 72 72 25 3a f2 |in%,12)=|.curr%:.|
|00002510| 72 65 64 6f 28 63 6f 70 | 79 77 69 6e 25 29 0d 0a |redo(cop|ywin%)..|
|00002520| 64 0f 6a 72 63 68 65 63 | 6b 65 64 3d 31 0d 0a 6e |d.jrchec|ked=1..n|
|00002530| 0c 6a 72 66 6f 72 6d 3d | 31 0d 0a 78 06 20 e1 0d |.jrform=|1..x. ..|
|00002540| 0a 82 12 dd a4 63 68 65 | 63 6b 68 65 61 64 28 68 |.....che|ckhead(h|
|00002550| 29 0d 0a 8c 27 f2 64 69 | 73 63 5f 6f 70 28 30 2c |)...'.di|sc_op(0,|
|00002560| 31 2c 68 2a 73 65 63 74 | 6f 72 73 2a 28 32 5e 62 |1,h*sect|ors*(2^b|
|00002570| 79 74 65 73 29 2c 30 29 | 0d 0a 96 13 3d ac 20 2d |ytes),0)|....=. -|
|00002580| 28 66 6c 61 67 73 20 80 | 20 31 29 0d 0a a0 10 dd |(flags .| 1).....|
|00002590| f2 72 75 62 62 69 73 68 | 28 68 29 0d 0a aa 37 f2 |.rubbish|(h)...7.|
|000025a0| 64 69 73 63 5f 6f 70 28 | 34 2c 73 65 63 74 6f 72 |disc_op(|4,sector|
|000025b0| 73 2a 28 32 5e 62 79 74 | 65 73 29 2c 68 2a 73 65 |s*(2^byt|es),h*se|
|000025c0| 63 74 6f 72 73 2a 28 32 | 5e 62 79 74 65 73 29 2c |ctors*(2|^bytes),|
|000025d0| 30 29 0d 0a b4 05 e1 0d | 0a be 10 dd f2 72 75 62 |0)......|.....rub|
|000025e0| 62 69 73 68 69 6e 67 0d | 0a c8 3c e7 20 6a 72 63 |bishing.|..<. jrc|
|000025f0| 68 65 63 6b 65 64 3d 30 | 20 8c 20 f2 6d 6f 61 6e |hecked=0| . .moan|
|00002600| 28 22 59 6f 75 20 4d 75 | 73 74 20 43 68 65 63 6b |("You Mu|st Check|
|00002610| 20 54 68 65 20 44 69 73 | 6b 20 46 69 72 73 74 22 | The Dis|k First"|
|00002620| 29 3a e1 0d 0a d2 2c f2 | 6d 6f 61 6e 28 22 50 6c |):....,.|moan("Pl|
|00002630| 65 61 73 65 20 49 6e 73 | 65 72 74 20 44 45 53 54 |ease Ins|ert DEST|
|00002640| 49 4e 41 54 49 4f 4e 53 | 20 44 69 73 6b 22 29 0d |INATIONS| Disk").|
|00002650| 0a dc 0b 74 3d 30 3a 68 | 3d 30 0d 0a e6 09 e5 8d |...t=0:h|=0......|
|00002660| 54 7b 4b 0d 0a f0 15 e7 | 20 ac 20 68 65 61 64 28 |T{K.....| . head(|
|00002670| 74 2a 32 2b 68 29 20 8c | 0d 0a fa 13 f2 72 75 62 |t*2+h) .|.....rub|
|00002680| 62 69 73 68 28 74 2a 32 | 2b 68 29 0d 0b 04 07 fb |bish(t*2|+h).....|
|00002690| 20 31 0d 0b 0e 07 fb 20 | 37 0d 0b 18 05 cd 0d 0b | 1..... |7.......|
|000026a0| 22 1d 68 2b 3d 31 3a e7 | 20 68 3d 68 65 61 64 73 |".h+=1:.| h=heads|
|000026b0| 20 8c 20 68 3d 30 3a 74 | 2b 3d 31 0d 0b 2c 0a fd | . h=0:t|+=1..,..|
|000026c0| 20 74 3d 38 30 0d 0b 36 | 05 cd 0d 0b 3b 13 f2 72 | t=80..6|....;..r|
|000026d0| 75 62 62 69 73 68 28 30 | 2a 32 2b 30 29 0d 0b 40 |ubbish(0|*2+0)..@|
|000026e0| 2d 24 a4 74 61 64 28 63 | 6f 70 79 77 69 6e 25 2c |-$.tad(c|opywin%,|
|000026f0| 31 33 29 3d c3 63 75 72 | 72 25 3a f2 72 65 64 6f |13)=.cur|r%:.redo|
|00002700| 28 63 6f 70 79 77 69 6e | 25 29 0d 0b 4a 05 e1 0d |(copywin|%)..J...|
|00002710| 0b 54 0a dd f2 63 6f 70 | 79 0d 0b 5e 3a e7 6a 72 |.T...cop|y..^:.jr|
|00002720| 63 68 65 63 6b 65 64 3d | 30 20 8c 20 f2 6d 6f 61 |checked=|0 . .moa|
|00002730| 6e 28 22 43 68 65 63 6b | 20 74 68 65 20 53 4f 55 |n("Check| the SOU|
|00002740| 52 43 45 20 64 69 73 6b | 20 66 69 72 73 74 21 22 |RCE disk| first!"|
|00002750| 29 3a e1 0d 0b 68 0b 74 | 3d 30 3a 68 3d 30 0d 0b |):...h.t|=0:h=0..|
|00002760| 72 05 f5 0d 0b 7c 12 70 | 6f 69 6e 74 65 72 3d 30 |r....|.p|ointer=0|
|00002770| 3a 68 73 3d 30 0d 0b 86 | 1a f2 72 65 61 64 68 65 |:hs=0...|..readhe|
|00002780| 61 64 73 3a 6e 74 3d 71 | 74 3a 6e 68 3d 71 68 0d |ads:nt=q|t:nh=qh.|
|00002790| 0b a4 05 e1 0d 0b ae 0f | dd f2 72 65 61 64 68 65 |........|..readhe|
|000027a0| 61 64 73 0d 0b b8 3f f2 | 6d 6f 61 6e 28 22 52 65 |ads...?.|moan("Re|
|000027b0| 61 64 20 66 72 6f 6d 20 | 53 6f 75 72 63 65 20 44 |ad from |Source D|
|000027c0| 69 73 6b 20 2d 20 50 6c | 65 61 73 65 20 49 6e 73 |isk - Pl|ease Ins|
|000027d0| 65 72 74 20 53 4f 55 52 | 43 45 20 64 69 73 6b 2e |ert SOUR|CE disk.|
|000027e0| 22 29 0d 0b c2 0d 71 74 | 3d 32 3a 71 68 3d 32 0d |")....qt|=2:qh=2.|
|000027f0| 0b cc 05 f5 0d 0b d6 16 | e7 20 68 65 61 64 28 74 |........|. head(t|
|00002800| 2a 32 2b 68 2b 68 73 29 | 20 8c 0d 0b e0 46 f2 64 |*2+h+hs)| ....F.d|
|00002810| 69 73 63 5f 6f 70 28 31 | 2c 28 32 5e 62 79 74 65 |isc_op(1|,(2^byte|
|00002820| 73 29 2a 73 65 63 74 6f | 72 73 2c 28 74 2a 32 2b |s)*secto|rs,(t*2+|
|00002830| 68 2b 68 73 29 2a 28 32 | 5e 62 79 74 65 73 29 2a |h+hs)*(2|^bytes)*|
|00002840| 73 65 63 74 6f 72 73 2c | 70 6f 69 6e 74 65 72 29 |sectors,|pointer)|
|00002850| 0d 0b ea 1e 70 6f 69 6e | 74 65 72 2b 3d 28 32 5e |....poin|ter+=(2^|
|00002860| 62 79 74 65 73 29 2a 73 | 65 63 74 6f 72 73 0d 0b |bytes)*s|ectors..|
|00002870| f4 05 cd 0d 0b fe 09 68 | 73 2b 3d 31 0d 0c 08 27 |.......h|s+=1...'|
|00002880| 71 74 3d 28 74 2a 32 2b | 68 73 2b 68 29 20 81 20 |qt=(t*2+|hs+h) . |
|00002890| 32 3a 71 68 3d 28 74 2a | 32 2b 68 73 2b 68 29 20 |2:qh=(t*|2+hs+h) |
|000028a0| 83 20 32 0d 0c 12 41 fd | 20 70 6f 69 6e 74 65 72 |. 2...A.| pointer|
|000028b0| 2b 28 32 5e 62 79 74 65 | 73 29 2a 73 65 63 74 6f |+(2^byte|s)*secto|
|000028c0| 72 73 3e 62 75 66 66 65 | 72 73 69 7a 65 2a 26 34 |rs>buffe|rsize*&4|
|000028d0| 30 30 20 84 20 28 74 2a | 32 2b 68 2b 68 73 29 3e |00 . (t*|2+h+hs)>|
|000028e0| 3d 31 36 30 0d 0c 1c 05 | e1 0d 0c 26 04 0d 0c 30 |=160....|...&...0|
|000028f0| 10 dd f2 77 72 69 74 65 | 68 65 61 64 73 0d 0c 3a |...write|heads..:|
|00002900| 49 f2 6d 6f 61 6e 28 22 | 57 72 69 74 69 6e 67 20 |I.moan("|Writing |
|00002910| 74 6f 20 44 65 73 74 69 | 6e 61 74 69 6f 6e 20 44 |to Desti|nation D|
|00002920| 69 73 6b 20 2d 20 50 6c | 65 61 73 65 20 69 6e 73 |isk - Pl|ease ins|
|00002930| 65 72 74 20 44 45 53 54 | 49 4e 41 54 49 4f 4e 20 |ert DEST|INATION |
|00002940| 64 69 73 6b 22 29 0d 0c | 44 12 70 74 3d 30 3a 71 |disk")..|D.pt=0:q|
|00002950| 74 3d 74 3a 71 68 3d 68 | 0d 0c 4e 05 f5 0d 0c 58 |t=t:qh=h|..N....X|
|00002960| 15 e7 20 68 65 61 64 28 | 71 74 2a 32 2b 71 68 29 |.. head(|qt*2+qh)|
|00002970| 20 8c 0d 0c 62 40 f2 64 | 69 73 63 5f 6f 70 28 32 | ...b@.d|isc_op(2|
|00002980| 2c 28 32 5e 62 79 74 65 | 73 29 2a 73 65 63 74 6f |,(2^byte|s)*secto|
|00002990| 72 73 2c 28 71 74 2a 32 | 2b 71 68 29 2a 28 32 5e |rs,(qt*2|+qh)*(2^|
|000029a0| 62 79 74 65 73 29 2a 73 | 65 63 74 6f 72 73 2c 70 |bytes)*s|ectors,p|
|000029b0| 74 29 0d 0c 6c 19 70 74 | 2b 3d 28 32 5e 62 79 74 |t)..l.pt|+=(2^byt|
|000029c0| 65 73 29 2a 73 65 63 74 | 6f 72 73 0d 0c 76 05 cd |es)*sect|ors..v..|
|000029d0| 0d 0c 80 21 71 68 2b 3d | 31 3a e7 20 71 68 3d 68 |...!qh+=|1:. qh=h|
|000029e0| 65 61 64 73 20 8c 20 71 | 68 3d 30 3a 71 74 2b 3d |eads . q|h=0:qt+=|
|000029f0| 31 0d 0c 8a 19 fd 20 28 | 71 74 2a 32 2b 71 68 29 |1..... (|qt*2+qh)|
|00002a00| 3d 28 6e 74 2a 32 2b 6e | 68 29 0d 0c 94 05 e1 0d |=(nt*2+n|h)......|
|00002a10| ff 46 69 6c 65 44 61 74 | 61 82 21 52 75 6e 49 6d |.FileDat|a.!RunIm|
|00002a20| 61 67 65 00 00 72 1f 00 | 00 44 fb ff ff fd 29 c3 |age..r..|.D....).|
|00002a30| db 03 00 ff 7f 0d 00 0a | 1c f4 20 3e 24 2e 21 44 |........|.. >$.!D|
|00002a40| 69 73 6b 43 6f 70 79 2e | 21 52 75 6e 49 6d 61 67 |iskCopy.|!RunImag|
|00002a50| 65 0d 00 14 34 f4 20 4d | 61 69 6e 20 50 72 6f 67 |e...4. M|ain Prog|
|00002a60| 72 61 6d 20 66 6f 72 20 | 22 21 44 69 73 6b 43 6f |ram for |"!DiskCo|
|00002a70| 70 79 22 20 44 69 73 6b | 20 43 6f 70 79 20 50 72 |py" Disk| Copy Pr|
|00002a80| 6f 67 72 61 6d 0d 00 1e | 2a f4 20 56 65 72 73 69 |ogram...|*. Versi|
|00002a90| 6f 6e 20 31 2e 30 30 20 | 4c 61 73 74 20 55 70 64 |on 1.00 |Last Upd|
|00002aa0| 61 74 65 64 20 32 38 20 | 4d 61 72 20 27 39 32 0d |ated 28 |Mar '92.|
|00002ab0| 00 28 1c f4 20 a9 20 4a | 2e 20 52 4f 42 42 49 4e |.(.. . J|. ROBBIN|
|00002ac0| 53 20 2d 20 54 45 43 53 | 4f 46 54 0d 00 32 05 3a |S - TECS|OFT..2.:|
|00002ad0| 0d 00 3c 0d f1 20 8a 30 | 2c 30 29 43 25 0d 00 46 |..<.. .0|,0)C%..F|
|00002ae0| 11 62 75 66 66 65 72 73 | 69 7a 65 3d 43 25 0d 00 |.buffers|ize=C%..|
|00002af0| 50 20 63 75 72 72 25 3d | 30 3a 6a 72 63 68 65 63 |P curr%=|0:jrchec|
|00002b00| 6b 65 64 3d 30 3a 6a 72 | 66 6f 72 6d 3d 30 0d 00 |ked=0:jr|form=0..|
|00002b10| 5a 0c 20 6d 65 6d 25 3d | 43 25 0d 00 64 37 de 20 |Z. mem%=|C%..d7. |
|00002b20| 62 6c 6f 63 6b 20 26 31 | 30 30 30 2c 20 6d 65 6e |block &1|000, men|
|00002b30| 75 25 20 31 30 32 34 2c | 63 75 72 62 75 66 25 20 |u% 1024,|curbuf% |
|00002b40| 26 31 30 30 30 2c 69 63 | 6f 6e 64 20 26 31 30 30 |&1000,ic|ond &100|
|00002b50| 30 0d 00 6e 35 de 20 68 | 65 61 64 28 31 35 39 29 |0..n5. h|ead(159)|
|00002b60| 2c 20 64 65 66 65 63 74 | 25 20 26 34 30 2c 20 6d |, defect|% &40, m|
|00002b70| 65 6d 6f 72 79 25 20 62 | 75 66 66 65 72 73 69 7a |emory% b|uffersiz|
|00002b80| 65 2a 26 34 30 30 0d 00 | 78 14 20 e3 20 78 25 3d |e*&400..|x. . x%=|
|00002b90| 30 20 b8 20 36 33 20 88 | 20 34 0d 00 82 11 20 64 |0 . 63 .| 4.... d|
|00002ba0| 65 66 65 63 74 25 21 78 | 25 3d 30 0d 00 8c 09 20 |efect%!x|%=0.... |
|00002bb0| ed 20 78 25 0d 00 96 11 | 20 ee 85 f2 65 72 72 28 |. x%....| ...err(|
|00002bc0| f6 24 29 3a e0 0d 00 a0 | 19 65 6e 64 62 75 66 25 |.$):....|.endbuf%|
|00002bd0| 3d 63 75 72 62 75 66 25 | 2b 26 36 30 30 30 0d 00 |=curbuf%|+&6000..|
|00002be0| aa 48 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |.H.. "Wi|mp_Initi|
|00002bf0| 61 6c 69 73 65 22 2c 32 | 30 30 2c 26 34 42 35 33 |alise",2|00,&4B53|
|00002c00| 34 31 35 34 2c 22 44 69 | 73 6b 20 43 6f 70 79 69 |4154,"Di|sk Copyi|
|00002c10| 65 72 22 20 b8 20 76 65 | 72 73 69 6f 6e 25 2c 6d |er" . ve|rsion%,m|
|00002c20| 79 74 61 73 6b 25 0d 00 | b4 0d f2 74 65 6d 70 6c |ytask%..|...templ|
|00002c30| 61 74 65 0d 00 be 44 69 | 6e 69 74 69 63 3d a4 69 |ate...Di|nitic=.i|
|00002c40| 63 6f 6e 62 61 72 28 25 | 31 31 30 31 30 2c 2d 31 |conbar(%|11010,-1|
|00002c50| 2c 37 2c 30 2c 22 21 44 | 69 73 6b 43 6f 70 79 22 |,7,0,"!D|iskCopy"|
|00002c60| 2b bd 31 33 2c 30 2c 30 | 2c 30 2c 33 2c 30 2c 30 |+.13,0,0|,0,3,0,0|
|00002c70| 2c 36 38 2c 36 38 29 0d | 00 c8 44 65 6e 64 25 3d |,68,68).|..Dend%=|
|00002c80| a3 3a 64 72 61 67 25 3d | 30 3a 73 61 76 69 6e 67 |.:drag%=|0:saving|
|00002c90| 25 3d 30 3a 61 63 6b 25 | 3d a3 3a 6b 65 79 70 6f |%=0:ack%|=.:keypo|
|00002ca0| 73 3d 2d 31 3a 6b 65 79 | 74 6f 75 73 65 3d 2d 31 |s=-1:key|touse=-1|
|00002cb0| 3a 6d 6f 64 69 66 69 65 | 64 3d 30 0d 00 d2 05 3a |:modifie|d=0....:|
|00002cc0| 0d 00 dc 05 f5 0d 00 e6 | 5a e7 20 6b 65 79 70 6f |........|Z. keypo|
|00002cd0| 73 3c 3e 2d 31 20 8c 20 | c8 99 20 22 57 69 6d 70 |s<>-1 . |.. "Wimp|
|00002ce0| 5f 50 6f 6c 6c 22 2c 30 | 2c 62 6c 6f 63 6b 20 b8 |_Poll",0|,block .|
|00002cf0| 20 65 76 65 6e 74 63 6f | 64 65 20 8b 20 c8 99 20 | eventco|de . .. |
|00002d00| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 2c 31 2c 62 6c |"Wimp_Po|ll",1,bl|
|00002d10| 6f 63 6b 20 b8 20 65 76 | 65 6e 74 63 6f 64 65 0d |ock . ev|entcode.|
|00002d20| 00 f0 1d e7 20 6b 65 79 | 70 6f 73 3c 3e 2d 31 20 |.... key|pos<>-1 |
|00002d30| 8c 20 f2 61 64 64 6c 65 | 74 74 65 72 0d 00 fa 12 |. .addle|tter....|
|00002d40| c8 8e 20 65 76 65 6e 74 | 63 6f 64 65 20 ca 0d 01 |.. event|code ...|
|00002d50| 04 08 c9 20 30 3a 0d 01 | 0e 2d c9 20 31 3a c8 99 |... 0:..|.-. 1:..|
|00002d60| 20 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e | "Wimp_R|edrawWin|
|00002d70| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 20 b8 20 6d 6f |dow",,bl|ock . mo|
|00002d80| 72 65 25 0d 01 18 23 c9 | 20 32 3a c8 99 20 22 57 |re%...#.| 2:.. "W|
|00002d90| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00002da0| 2c 62 6c 6f 63 6b 0d 01 | 22 24 c9 20 33 3a c8 99 |,block..|"$. 3:..|
|00002db0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00002dc0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 0d 01 2c 17 c9 20 |ow",,blo|ck..,.. |
|00002dd0| 36 3a f2 62 75 74 74 6f | 6e 73 28 62 6c 6f 63 6b |6:.butto|ns(block|
|00002de0| 29 0d 01 36 08 20 c9 20 | 37 0d 01 40 13 c9 20 38 |)..6. . |7..@.. 8|
|00002df0| 3a f2 70 72 6f 63 65 73 | 73 6b 65 79 0d 01 4a 0f |:.proces|skey..J.|
|00002e00| c9 20 39 3a f2 64 65 63 | 6f 64 65 0d 01 54 0c 20 |. 9:.dec|ode..T. |
|00002e10| c9 20 31 37 2c 31 38 0d | 01 5e 05 cb 0d 01 68 0a |. 17,18.|.^....h.|
|00002e20| fd 20 65 6e 64 25 0d 01 | 72 05 e0 0d 01 7c 34 dd |. end%..|r....|4.|
|00002e30| f2 6f 70 65 6e 28 68 61 | 6e 64 6c 65 2c 76 6d 69 |.open(ha|ndle,vmi|
|00002e40| 6e 78 2c 76 6d 69 6e 79 | 2c 76 6d 61 78 78 2c 76 |nx,vminy|,vmaxx,v|
|00002e50| 6d 61 78 79 2c 78 6f 66 | 66 2c 79 6f 66 66 29 0d |maxy,xof|f,yoff).|
|00002e60| 01 86 3c 21 62 6c 6f 63 | 6b 3d 68 61 6e 64 6c 65 |..<!bloc|k=handle|
|00002e70| 3a 62 6c 6f 63 6b 21 34 | 3d 76 6d 69 6e 78 3a 62 |:block!4|=vminx:b|
|00002e80| 6c 6f 63 6b 21 38 3d 76 | 6d 69 6e 79 3a 62 6c 6f |lock!8=v|miny:blo|
|00002e90| 63 6b 21 31 32 3d 76 6d | 61 78 78 0d 01 90 3a 62 |ck!12=vm|axx...:b|
|00002ea0| 6c 6f 63 6b 21 31 36 3d | 76 6d 61 78 79 3a 62 6c |lock!16=|vmaxy:bl|
|00002eb0| 6f 63 6b 21 32 30 3d 78 | 6f 66 66 3a 62 6c 6f 63 |ock!20=x|off:bloc|
|00002ec0| 6b 21 32 34 3d 79 6f 66 | 66 3a 62 6c 6f 63 6b 21 |k!24=yof|f:block!|
|00002ed0| 32 38 3d 2d 31 0d 01 9a | 1f c8 99 20 22 57 69 6d |28=-1...|... "Wim|
|00002ee0| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00002ef0| 6c 6f 63 6b 0d 01 a4 05 | e1 0d 01 ae 4b dd a4 69 |lock....|....K..i|
|00002f00| 63 6f 6e 62 61 72 28 66 | 6c 61 67 73 2c 70 61 72 |conbar(f|lags,par|
|00002f10| 74 2c 66 6f 72 2c 62 61 | 63 2c 64 61 74 61 24 2c |t,for,ba|c,data$,|
|00002f20| 61 64 64 2c 61 64 64 32 | 2c 6c 65 6e 67 74 68 2c |add,add2|,length,|
|00002f30| 6d 6f 75 73 65 2c 78 73 | 31 2c 79 73 31 2c 78 73 |mouse,xs|1,ys1,xs|
|00002f40| 2c 79 73 29 0d 01 b8 0f | 21 69 63 6f 6e 64 3d 70 |,ys)....|!icond=p|
|00002f50| 61 72 74 0d 01 c2 0f 69 | 63 6f 6e 64 21 34 3d 78 |art....i|cond!4=x|
|00002f60| 73 31 0d 01 cc 27 69 63 | 6f 6e 64 21 38 3d 79 73 |s1...'ic|ond!8=ys|
|00002f70| 31 3a 69 63 6f 6e 64 21 | 31 32 3d 78 73 3a 69 63 |1:icond!|12=xs:ic|
|00002f80| 6f 6e 64 21 31 36 3d 79 | 73 0d 01 d6 35 69 63 6f |ond!16=y|s...5ico|
|00002f90| 6e 64 21 32 30 3d 66 6c | 61 67 73 2b 28 28 32 5e |nd!20=fl|ags+((2^|
|00002fa0| 31 32 29 2a 6d 6f 75 73 | 65 29 3a 69 63 6f 6e 64 |12)*mous|e):icond|
|00002fb0| 3f 32 33 3d 66 6f 72 2b | 62 61 63 2a 31 36 0d 01 |?23=for+|bac*16..|
|00002fc0| e0 50 e7 20 64 61 74 61 | 24 3c 3e 22 22 20 8c 20 |.P. data|$<>"" . |
|00002fd0| 24 28 69 63 6f 6e 64 2b | 32 34 29 3d 64 61 74 61 |$(icond+|24)=data|
|00002fe0| 24 20 8b 20 69 63 6f 6e | 64 21 32 34 3d 61 64 64 |$ . icon|d!24=add|
|00002ff0| 3a 69 63 6f 6e 64 21 32 | 38 3d 61 64 64 32 3a 69 |:icond!2|8=add2:i|
|00003000| 63 6f 6e 64 21 33 32 3d | 6c 65 6e 67 74 68 0d 01 |cond!32=|length..|
|00003010| ea 26 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.&.. "Wi|mp_Creat|
|00003020| 65 49 63 6f 6e 22 2c 2c | 69 63 6f 6e 64 20 b8 20 |eIcon",,|icond . |
|00003030| 69 63 6f 6e 0d 01 f4 09 | 3d 69 63 6f 6e 0d 01 fe |icon....|=icon...|
|00003040| 12 dd a4 74 65 6d 70 6c | 61 74 65 28 61 24 29 0d |...templ|ate(a$).|
|00003050| 02 08 47 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..G.. "W|imp_Load|
|00003060| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |Template|",,block|
|00003070| 2c 69 6e 64 69 72 2c 65 | 6e 64 62 75 66 25 2c 2d |,indir,e|ndbuf%,-|
|00003080| 31 2c 61 24 2c 30 20 b8 | 20 2c 2c 69 6e 64 69 72 |1,a$,0 .| ,,indir|
|00003090| 2c 2c 2c 2c 63 25 0d 02 | 12 30 e7 20 63 25 3d 30 |,,,,c%..|.0. c%=0|
|000030a0| 20 8c 20 ef 34 3a f1 20 | 22 54 65 6d 70 6c 61 74 | . .4:. |"Templat|
|000030b0| 65 20 22 3b 61 24 3b 22 | 20 6e 6f 74 20 66 6f 75 |e ";a$;"| not fou|
|000030c0| 6e 64 2e 22 3a e0 0d 02 | 1c 0e 62 6c 6f 63 6b 21 |nd.":...|..block!|
|000030d0| 36 34 3d 31 0d 02 26 2a | c8 99 20 22 57 69 6d 70 |64=1..&*|.. "Wimp|
|000030e0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|000030f0| 62 6c 6f 63 6b 20 b8 20 | 68 61 6e 64 6c 65 0d 02 |block . |handle..|
|00003100| 30 0b 3d 68 61 6e 64 6c | 65 0d 02 3a 0e dd f2 6d |0.=handl|e..:...m|
|00003110| 6f 61 6e 28 61 24 29 0d | 02 44 1d 21 69 63 6f 6e |oan(a$).|.D.!icon|
|00003120| 64 3d 30 3a 24 28 69 63 | 6f 6e 64 2b 34 29 3d 61 |d=0:$(ic|ond+4)=a|
|00003130| 24 2b bd 30 0d 02 4e 2d | c8 99 20 22 57 69 6d 70 |$+.0..N-|.. "Wimp|
|00003140| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 69 63 |_ReportE|rror",ic|
|00003150| 6f 6e 64 2c 31 2c 22 21 | 44 69 73 6b 43 6f 70 79 |ond,1,"!|DiskCopy|
|00003160| 22 0d 02 58 05 e1 0d 02 | 62 0d dd a4 73 74 72 28 |"..X....|b...str(|
|00003170| 61 25 29 0d 02 6c 08 ea | 20 62 24 0d 02 76 0e c8 |a%)..l..| b$..v..|
|00003180| 95 20 3f 61 25 3e 3d 33 | 32 0d 02 80 0e 62 24 2b |. ?a%>=3|2....b$+|
|00003190| 3d bd 28 3f 61 25 29 0d | 02 8a 09 61 25 2b 3d 31 |=.(?a%).|...a%+=1|
|000031a0| 0d 02 94 05 ce 0d 02 9e | 07 3d 62 24 0d 02 a8 16 |........|.=b$....|
|000031b0| dd a4 74 61 64 28 68 61 | 6e 64 6c 65 2c 69 63 6f |..tad(ha|ndle,ico|
|000031c0| 6e 29 0d 02 b2 15 f2 67 | 69 69 28 68 61 6e 64 6c |n).....g|ii(handl|
|000031d0| 65 2c 69 63 6f 6e 29 0d | 02 bc 0d 3d 69 63 6f 6e |e,icon).|...=icon|
|000031e0| 64 21 32 38 0d 02 c6 16 | dd f2 67 69 69 28 68 61 |d!28....|..gii(ha|
|000031f0| 6e 64 6c 65 2c 69 63 6f | 6e 29 0d 02 d0 1e 21 69 |ndle,ico|n)....!i|
|00003200| 63 6f 6e 64 3d 68 61 6e | 64 6c 65 3a 69 63 6f 6e |cond=han|dle:icon|
|00003210| 64 21 34 3d 69 63 6f 6e | 0d 02 da 21 c8 99 20 22 |d!4=icon|...!.. "|
|00003220| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00003230| 65 22 2c 2c 69 63 6f 6e | 64 0d 02 e4 05 e1 0d 02 |e",,icon|d.......|
|00003240| ee 19 dd f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 68 |....open|window(h|
|00003250| 61 6e 64 6c 65 25 29 0d | 02 f8 12 21 69 63 6f 6e |andle%).|...!icon|
|00003260| 64 3d 68 61 6e 64 6c 65 | 25 0d 03 02 22 c8 99 20 |d=handle|%...".. |
|00003270| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 49 |"Wimp_Ge|tWindowI|
|00003280| 6e 66 6f 22 2c 2c 69 63 | 6f 6e 64 0d 03 0c 1f c8 |nfo",,ic|ond.....|
|00003290| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|000032a0| 6f 77 22 2c 2c 69 63 6f | 6e 64 0d 03 16 05 e1 0d |ow",,ico|nd......|
|000032b0| 03 20 20 dd f2 61 6c 74 | 65 72 28 68 61 6e 64 2c |.  ..alt|er(hand,|
|000032c0| 69 63 6f 6e 2c 65 6f 72 | 2c 63 6c 65 61 72 29 0d |icon,eor|,clear).|
|000032d0| 03 2a 1c 21 69 63 6f 6e | 64 3d 68 61 6e 64 3a 69 |.*.!icon|d=hand:i|
|000032e0| 63 6f 6e 64 21 34 3d 69 | 63 6f 6e 0d 03 34 1e 69 |cond!4=i|con..4.i|
|000032f0| 63 6f 6e 64 21 38 3d 65 | 6f 72 3a 69 63 6f 6e 64 |cond!8=e|or:icond|
|00003300| 21 31 32 3d 63 6c 65 61 | 72 0d 03 3e 21 c8 99 20 |!12=clea|r..>!.. |
|00003310| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00003320| 74 65 22 2c 2c 69 63 6f | 6e 64 0d 03 48 05 e1 0d |te",,ico|nd..H...|
|00003330| 03 52 12 dd f2 73 74 61 | 74 65 28 77 69 2c 69 63 |.R...sta|te(wi,ic|
|00003340| 29 0d 03 5c 18 21 62 6c | 6f 63 6b 3d 77 69 3a 62 |)..\.!bl|ock=wi:b|
|00003350| 6c 6f 63 6b 21 34 3d 69 | 63 0d 03 66 21 c8 99 20 |lock!4=i|c..f!.. |
|00003360| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00003370| 74 65 22 2c 2c 62 6c 6f | 63 6b 0d 03 70 05 e1 0d |te",,blo|ck..p...|
|00003380| 03 7a 13 dd a4 73 65 6c | 65 63 74 28 77 69 2c 69 |.z...sel|ect(wi,i|
|00003390| 63 29 0d 03 84 11 f2 73 | 74 61 74 65 28 77 69 2c |c).....s|tate(wi,|
|000033a0| 69 63 29 0d 03 8e 22 e7 | 20 28 28 62 6c 6f 63 6b |ic)...".| ((block|
|000033b0| 21 32 34 29 20 80 20 31 | 3c 3c 32 31 29 3e 30 20 |!24) . 1|<<21)>0 |
|000033c0| 8c 20 3d 2d 31 0d 03 98 | 06 3d 30 0d 03 a2 0d dd |. =-1...|.=0.....|
|000033d0| a4 62 69 74 28 61 24 29 | 0d 03 ac 11 c8 95 20 a7 |.bit(a$)|...... .|
|000033e0| 61 24 2c 22 3a 22 29 3e | 30 0d 03 b6 16 61 24 3d |a$,":")>|0....a$=|
|000033f0| c1 61 24 2c a7 61 24 2c | 22 3a 22 29 2b 31 29 0d |.a$,.a$,|":")+1).|
|00003400| 03 c0 05 ce 0d 03 ca 11 | c8 95 20 a7 61 24 2c 22 |........|.. .a$,"|
|00003410| 2e 22 29 3e 30 0d 03 d4 | 16 61 24 3d c1 61 24 2c |.")>0...|.a$=.a$,|
|00003420| a7 61 24 2c 22 2e 22 29 | 2b 31 29 0d 03 de 05 ce |.a$,".")|+1).....|
|00003430| 0d 03 e8 07 3d 61 24 0d | 03 f2 13 dd f2 6f 70 65 |....=a$.|.....ope|
|00003440| 6e 6d 65 6e 75 28 78 2c | 79 29 0d 03 fc 26 c8 99 |nmenu(x,|y)...&..|
|00003450| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00003460| 75 22 2c 2c 74 6f 70 6d | 65 6e 75 25 2c 78 2c 79 |u",,topm|enu%,x,y|
|00003470| 0d 04 06 05 e1 0d 04 10 | 1e dd a4 6d 65 6e 75 28 |........|...menu(|
|00003480| 74 69 74 6c 65 24 2c 77 | 69 64 74 68 2c 6d 65 6e |title$,w|idth,men|
|00003490| 75 24 29 0d 04 1a 0e 6d | 65 6e 75 24 2b 3d 22 2c |u$)....m|enu$+=",|
|000034a0| 22 0d 04 24 13 6f 6c 64 | 6d 65 6e 75 3d 6d 65 6e |"..$.old|menu=men|
|000034b0| 75 70 74 72 0d 04 2e 13 | 24 6d 65 6e 75 70 74 72 |uptr....|$menuptr|
|000034c0| 3d 74 69 74 6c 65 24 0d | 04 38 10 6d 65 6e 75 70 |=title$.|.8.menup|
|000034d0| 74 72 3f 31 32 3d 37 0d | 04 42 10 6d 65 6e 75 70 |tr?12=7.|.B.menup|
|000034e0| 74 72 3f 31 33 3d 32 0d | 04 4c 10 6d 65 6e 75 70 |tr?13=2.|.L.menup|
|000034f0| 74 72 3f 31 34 3d 37 0d | 04 56 10 6d 65 6e 75 70 |tr?14=7.|.V.menup|
|00003500| 74 72 3f 31 35 3d 30 0d | 04 60 14 6d 65 6e 75 70 |tr?15=0.|.`.menup|
|00003510| 74 72 21 31 36 3d 77 69 | 64 74 68 0d 04 6a 11 6d |tr!16=wi|dth..j.m|
|00003520| 65 6e 75 70 74 72 21 32 | 30 3d 34 38 0d 04 74 10 |enuptr!2|0=48..t.|
|00003530| 6d 65 6e 75 70 74 72 21 | 32 34 3d 30 0d 04 7e 0f |menuptr!|24=0..~.|
|00003540| 6d 65 6e 75 70 74 72 2b | 3d 32 38 0d 04 88 05 f5 |menuptr+|=28.....|
|00003550| 0d 04 92 10 f2 69 74 65 | 6d 28 6d 65 6e 75 24 29 |.....ite|m(menu$)|
|00003560| 0d 04 9c 1f 6d 65 6e 75 | 24 3d c1 6d 65 6e 75 24 |....menu|$=.menu$|
|00003570| 2c a7 6d 65 6e 75 24 2c | 22 2c 22 29 2b 31 29 0d |,.menu$,|",")+1).|
|00003580| 04 a6 0f 6d 65 6e 75 70 | 74 72 2b 3d 32 34 0d 04 |...menup|tr+=24..|
|00003590| b0 0e fd 20 6d 65 6e 75 | 24 3d 22 22 0d 04 ba 29 |... menu|$=""...)|
|000035a0| 6d 65 6e 75 70 74 72 21 | 2d 32 34 3d 28 6d 65 6e |menuptr!|-24=(men|
|000035b0| 75 70 74 72 21 2d 32 34 | 29 20 84 20 25 31 30 30 |uptr!-24|) . %100|
|000035c0| 30 30 30 30 30 0d 04 c4 | 0c 3d 6f 6c 64 6d 65 6e |00000...|.=oldmen|
|000035d0| 75 0d 04 ce 0e dd f2 69 | 74 65 6d 28 6d 24 29 0d |u......i|tem(m$).|
|000035e0| 04 d8 16 6d 24 3d c0 6d | 24 2c a7 6d 24 2c 22 2c |...m$=.m|$,.m$,",|
|000035f0| 22 29 2d 31 29 0d 04 e2 | 0f 69 24 3d 22 22 3a 6a |")-1)...|.i$="":j|
|00003600| 24 3d 22 22 0d 04 ec 12 | e7 20 a7 6d 24 2c 22 5b |$=""....|. .m$,"[|
|00003610| 22 29 3e 30 20 8c 0d 04 | f6 16 69 24 3d c0 6d 24 |")>0 ...|..i$=.m$|
|00003620| 2c a7 6d 24 2c 22 5d 22 | 29 2d 31 29 0d 05 00 16 |,.m$,"]"|)-1)....|
|00003630| 6d 24 3d c1 6d 24 2c a7 | 6d 24 2c 22 5d 22 29 2b |m$=.m$,.|m$,"]")+|
|00003640| 31 29 0d 05 0a 16 6a 24 | 3d c0 69 24 2c a7 69 24 |1)....j$|=.i$,.i$|
|00003650| 2c 22 2f 22 29 2d 31 29 | 0d 05 14 16 69 24 3d c1 |,"/")-1)|....i$=.|
|00003660| 69 24 2c a7 69 24 2c 22 | 2f 22 29 2b 31 29 0d 05 |i$,.i$,"|/")+1)..|
|00003670| 1e 05 cd 0d 05 28 14 69 | 66 6c 61 67 73 3d 26 30 |.....(.i|flags=&0|
|00003680| 37 30 30 30 30 32 31 0d | 05 32 0c 6d 66 6c 61 67 |7000021.|.2.mflag|
|00003690| 73 3d 30 0d 05 3c 0e 73 | 75 62 6d 65 6e 75 3d 2d |s=0..<.s|ubmenu=-|
|000036a0| 31 0d 05 46 20 e7 20 a7 | 6a 24 2c 22 77 22 29 3e |1..F . .|j$,"w")>|
|000036b0| 30 20 8c 20 73 75 62 6d | 65 6e 75 3d a0 28 69 24 |0 . subm|enu=.(i$|
|000036c0| 29 0d 05 50 20 e7 20 a7 | 6a 24 2c 22 73 22 29 3e |)..P . .|j$,"s")>|
|000036d0| 30 20 8c 20 73 75 62 6d | 65 6e 75 3d a0 28 69 24 |0 . subm|enu=.(i$|
|000036e0| 29 0d 05 5a 24 e7 20 a7 | 6a 24 2c 22 74 22 29 3e |)..Z$. .|j$,"t")>|
|000036f0| 30 20 8c 20 6d 66 6c 61 | 67 73 3d 6d 66 6c 61 67 |0 . mfla|gs=mflag|
|00003700| 73 20 84 20 31 0d 05 64 | 24 e7 20 a7 6a 24 2c 22 |s . 1..d|$. .j$,"|
|00003710| 6c 22 29 3e 30 20 8c 20 | 6d 66 6c 61 67 73 3d 6d |l")>0 . |mflags=m|
|00003720| 66 6c 61 67 73 20 84 20 | 32 0d 05 6e 13 21 6d 65 |flags . |2..n.!me|
|00003730| 6e 75 70 74 72 3d 6d 66 | 6c 61 67 73 0d 05 78 15 |nuptr=mf|lags..x.|
|00003740| 6d 65 6e 75 70 74 72 21 | 34 3d 73 75 62 6d 65 6e |menuptr!|4=submen|
|00003750| 75 0d 05 82 14 6d 65 6e | 75 70 74 72 21 38 3d 69 |u....men|uptr!8=i|
|00003760| 66 6c 61 67 73 0d 05 8c | 14 24 28 6d 65 6e 75 70 |flags...|.$(menup|
|00003770| 74 72 2b 31 32 29 3d 6d | 24 0d 05 96 05 e1 0d 05 |tr+12)=m|$.......|
|00003780| a0 14 dd f2 62 75 74 74 | 6f 6e 73 28 62 6c 6f 63 |....butt|ons(bloc|
|00003790| 6b 29 0d 05 aa 26 e7 20 | 62 6c 6f 63 6b 21 31 32 |k)...&. |block!12|
|000037a0| 3d 2d 32 20 80 20 62 6c | 6f 63 6b 21 38 3d 32 20 |=-2 . bl|ock!8=2 |
|000037b0| f2 6d 65 6e 75 73 3a e1 | 0d 05 b4 34 e7 20 62 6c |.menus:.|...4. bl|
|000037c0| 6f 63 6b 21 31 32 3d 2d | 32 20 80 20 62 6c 6f 63 |ock!12=-|2 . bloc|
|000037d0| 6b 21 38 3c 3e 32 20 f2 | 6f 70 65 6e 77 69 6e 64 |k!8<>2 .|openwind|
|000037e0| 6f 77 28 63 6f 70 79 77 | 69 6e 25 29 0d 05 be 37 |ow(copyw|in%)...7|
|000037f0| e7 20 62 6c 6f 63 6b 21 | 31 32 3d 63 6f 70 79 77 |. block!|12=copyw|
|00003800| 69 6e 25 20 80 20 62 6c | 6f 63 6b 21 31 36 3d 31 |in% . bl|ock!16=1|
|00003810| 31 20 8c 20 ff 28 22 46 | 6f 72 6d 61 74 20 30 20 |1 . .("F|ormat 0 |
|00003820| 4c 22 29 0d 05 c8 37 e7 | 20 62 6c 6f 63 6b 21 31 |L")...7.| block!1|
|00003830| 32 3d 63 6f 70 79 77 69 | 6e 25 20 80 20 62 6c 6f |2=copywi|n% . blo|
|00003840| 63 6b 21 31 36 3d 31 34 | 20 8c 20 ff 28 22 46 6f |ck!16=14| . .("Fo|
|00003850| 72 6d 61 74 20 30 20 44 | 22 29 0d 05 d2 37 e7 20 |rmat 0 D|")...7. |
|00003860| 62 6c 6f 63 6b 21 31 32 | 3d 63 6f 70 79 77 69 6e |block!12|=copywin|
|00003870| 25 20 80 20 62 6c 6f 63 | 6b 21 31 36 3d 31 36 20 |% . bloc|k!16=16 |
|00003880| 8c 20 ff 28 22 46 6f 72 | 6d 61 74 20 30 20 45 22 |. .("For|mat 0 E"|
|00003890| 29 0d 05 dc 35 e7 20 62 | 6c 6f 63 6b 21 31 32 3d |)...5. b|lock!12=|
|000038a0| 63 6f 70 79 77 69 6e 25 | 20 80 20 62 6c 6f 63 6b |copywin%| . block|
|000038b0| 21 31 36 3d 34 20 8c 20 | f2 64 65 74 65 72 6d 69 |!16=4 . |.determi|
|000038c0| 6e 65 73 69 7a 65 0d 05 | e6 31 e7 20 62 6c 6f 63 |nesize..|.1. bloc|
|000038d0| 6b 21 31 32 3d 63 6f 70 | 79 77 69 6e 25 20 80 20 |k!12=cop|ywin% . |
|000038e0| 62 6c 6f 63 6b 21 31 36 | 3d 37 20 8c 20 f2 63 6f |block!16|=7 . .co|
|000038f0| 72 72 75 70 74 65 64 0d | 05 f0 32 e7 20 62 6c 6f |rrupted.|..2. blo|
|00003900| 63 6b 21 31 32 3d 63 6f | 70 79 77 69 6e 25 20 80 |ck!12=co|pywin% .|
|00003910| 20 62 6c 6f 63 6b 21 31 | 36 3d 39 20 8c 20 f2 72 | block!1|6=9 . .r|
|00003920| 75 62 62 69 73 68 69 6e | 67 0d 05 fa 2c e7 20 62 |ubbishin|g...,. b|
|00003930| 6c 6f 63 6b 21 31 32 3d | 63 6f 70 79 77 69 6e 25 |lock!12=|copywin%|
|00003940| 20 80 20 62 6c 6f 63 6b | 21 31 36 3d 32 20 8c 20 | . block|!16=2 . |
|00003950| f2 63 6f 70 79 0d 06 04 | 05 e1 0d 06 0e 10 dd f2 |.copy...|........|
|00003960| 70 72 6f 63 65 73 73 6b | 65 79 0d 06 18 21 c8 99 |processk|ey...!..|
|00003970| 20 22 57 69 6d 70 5f 50 | 72 6f 63 65 73 73 4b 65 | "Wimp_P|rocessKe|
|00003980| 79 22 2c 62 6c 6f 63 6b | 21 32 34 0d 06 22 05 e1 |y",block|!24.."..|
|00003990| 0d 06 2c 0b dd f2 6d 65 | 6e 75 73 0d 06 36 10 6d |..,...me|nus..6.m|
|000039a0| 65 6e 75 6f 70 65 6e 3d | 2d 34 34 0d 06 40 11 6d |enuopen=|-44..@.m|
|000039b0| 65 6e 75 70 74 72 3d 6d | 65 6e 75 25 0d 06 4a 0c |enuptr=m|enu%..J.|
|000039c0| c8 97 20 78 2c 79 2c 62 | 0d 06 54 3d 74 6f 70 6d |.. x,y,b|..T=topm|
|000039d0| 65 6e 75 25 3d a4 6d 65 | 6e 75 28 22 21 44 69 73 |enu%=.me|nu("!Dis|
|000039e0| 6b 43 6f 70 79 22 2c 31 | 31 30 2c 22 5b 77 2f 69 |kCopy",1|10,"[w/i|
|000039f0| 6e 66 6f 25 5d 49 6e 66 | 6f 2c 43 6f 70 79 2c 51 |nfo%]Inf|o,Copy,Q|
|00003a00| 75 69 74 22 29 0d 06 5e | 17 f2 6f 70 65 6e 6d 65 |uit")..^|..openme|
|00003a10| 6e 75 28 78 2d 37 35 2c | 32 34 30 29 0d 06 68 05 |nu(x-75,|240)..h.|
|00003a20| e1 0d 06 72 0c dd f2 64 | 65 63 6f 64 65 0d 06 7c |...r...d|ecode..||
|00003a30| 2e c8 99 20 22 57 69 6d | 70 5f 44 65 63 6f 64 65 |... "Wim|p_Decode|
|00003a40| 4d 65 6e 75 22 2c 2c 74 | 6f 70 6d 65 6e 75 25 2c |Menu",,t|opmenu%,|
|00003a50| 62 6c 6f 63 6b 2c 69 63 | 6f 6e 64 0d 06 86 1f e7 |block,ic|ond.....|
|00003a60| 20 24 69 63 6f 6e 64 3d | 22 51 75 69 74 22 20 8c | $icond=|"Quit" .|
|00003a70| 20 65 6e 64 25 3d b9 3a | ef 34 0d 06 90 23 c8 99 | end%=.:|.4...#..|
|00003a80| 20 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 | "Wimp_G|etPointe|
|00003a90| 72 49 6e 66 6f 22 2c 2c | 62 6c 6f 63 6b 0d 06 9a |rInfo",,|block...|
|00003aa0| 11 e7 20 62 6c 6f 63 6b | 21 38 3d 31 20 8c 0d 06 |.. block|!8=1 ...|
|00003ab0| a4 1b e7 20 6d 65 6e 75 | 6f 70 65 6e 3d 2d 34 34 |... menu|open=-44|
|00003ac0| 20 8c 20 f2 6d 65 6e 75 | 73 0d 06 ae 22 c8 99 20 | . .menu|s...".. |
|00003ad0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00003ae0| 22 2c 2c 74 6f 70 6d 65 | 6e 75 25 0d 06 b8 05 cc |",,topme|nu%.....|
|00003af0| 0d 06 c2 1c c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...... "|Wimp_Cre|
|00003b00| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 06 cc 05 |ateMenu"|,,-1....|
|00003b10| cd 0d 06 d6 05 e1 0d 06 | e0 0e dd f2 74 65 6d 70 |........|....temp|
|00003b20| 6c 61 74 65 0d 06 ea 32 | c8 99 20 22 57 69 6d 70 |late...2|.. "Wimp|
|00003b30| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00003b40| 22 3c 43 6f 70 79 24 44 | 69 72 3e 2e 54 65 6d 70 |"<Copy$D|ir>.Temp|
|00003b50| 6c 61 74 65 73 22 0d 06 | f4 11 69 6e 64 69 72 3d |lates"..|..indir=|
|00003b60| 63 75 72 62 75 66 25 0d | 06 fe 1f 69 6e 66 6f 25 |curbuf%.|...info%|
|00003b70| 3d a4 74 65 6d 70 6c 61 | 74 65 28 22 50 72 6f 67 |=.templa|te("Prog|
|00003b80| 49 6e 66 6f 22 29 0d 07 | 08 1e 63 6f 70 79 77 69 |Info")..|..copywi|
|00003b90| 6e 25 3d a4 74 65 6d 70 | 6c 61 74 65 28 22 43 6f |n%=.temp|late("Co|
|00003ba0| 70 79 22 29 0d 07 12 1b | c8 99 20 22 57 69 6d 70 |py")....|.. "Wimp|
|00003bb0| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00003bc0| 07 1c 05 e1 0d 07 26 05 | e1 0d 07 30 0b dd f2 63 |......&.|...0...c|
|00003bd0| 6d 65 6e 75 0d 07 3a 23 | c8 99 20 22 57 69 6d 70 |menu..:#|.. "Wimp|
|00003be0| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00003bf0| 2c 2c 69 63 6f 6e 64 0d | 07 44 11 e7 20 69 63 6f |,,icond.|.D.. ico|
|00003c00| 6e 64 21 38 3d 31 20 8c | 0d 07 4e 1a e7 20 6d 65 |nd!8=1 .|..N.. me|
|00003c10| 6e 75 6f 70 65 6e 3d 2d | 34 34 20 8c 20 f2 6d 65 |nuopen=-|44 . .me|
|00003c20| 6e 75 0d 07 58 22 c8 99 | 20 22 57 69 6d 70 5f 43 |nu..X"..| "Wimp_C|
|00003c30| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 74 6f 70 6d |reateMen|u",,topm|
|00003c40| 65 6e 75 25 0d 07 62 05 | cc 0d 07 6c 1c c8 99 20 |enu%..b.|...l... |
|00003c50| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00003c60| 22 2c 2c 2d 31 0d 07 76 | 05 cd 0d 07 80 05 e1 0d |",,-1..v|........|
|00003c70| 07 8a 10 dd f2 6b 65 79 | 28 6b 65 79 6e 6f 29 0d |.....key|(keyno).|
|00003c80| 07 94 1e 63 6f 6d 24 3d | 24 a4 74 61 64 28 6b 65 |...com$=|$.tad(ke|
|00003c90| 79 73 25 2c 37 39 2b 6b | 65 79 6e 6f 29 0d 07 9e |ys%,79+k|eyno)...|
|00003ca0| 11 e7 20 63 6f 6d 24 3d | 22 22 20 8c 20 e1 0d 07 |.. com$=|"" . ...|
|00003cb0| a8 1f e7 20 a4 73 65 6c | 65 63 74 28 6b 65 79 73 |... .sel|ect(keys|
|00003cc0| 25 2c 33 39 2b 6b 65 79 | 6e 6f 29 20 8c 0d 07 b2 |%,39+key|no) ....|
|00003cd0| 17 ff 28 22 57 69 6d 70 | 54 61 73 6b 20 22 2b 63 |..("Wimp|Task "+c|
|00003ce0| 6f 6d 24 29 0d 07 bc 05 | e1 0d 07 c6 05 cd 0d 07 |om$)....|........|
|00003cf0| d0 14 e7 20 6b 65 79 70 | 6f 73 3c 3e 2d 31 20 8c |... keyp|os<>-1 .|
|00003d00| 20 e1 0d 07 da 1b 6b 65 | 79 70 6f 73 3d 31 3a 6b | .....ke|ypos=1:k|
|00003d10| 65 79 74 6f 75 73 65 3d | 6b 65 79 6e 6f 0d 07 e4 |eytouse=|keyno...|
|00003d20| 05 e1 0d 07 ee 0f dd f2 | 61 64 64 6c 65 74 74 65 |........|addlette|
|00003d30| 72 0d 07 f8 21 63 6f 6d | 24 3d 24 a4 74 61 64 28 |r...!com|$=$.tad(|
|00003d40| 6b 65 79 73 25 2c 37 39 | 2b 6b 65 79 74 6f 75 73 |keys%,79|+keytous|
|00003d50| 65 29 0d 08 02 2b c8 99 | 20 22 57 69 6d 70 5f 50 |e)...+..| "Wimp_P|
|00003d60| 72 6f 63 65 73 73 4b 65 | 79 22 2c 97 28 c1 63 6f |rocessKe|y",.(.co|
|00003d70| 6d 24 2c 6b 65 79 70 6f | 73 2c 31 29 29 0d 08 0c |m$,keypo|s,1))...|
|00003d80| 0d 6b 65 79 70 6f 73 2b | 3d 31 0d 08 16 20 e7 20 |.keypos+|=1... . |
|00003d90| 6b 65 79 70 6f 73 3e a9 | 28 63 6f 6d 24 29 20 8c |keypos>.|(com$) .|
|00003da0| 20 6b 65 79 70 6f 73 3d | 2d 31 0d 08 20 05 e1 0d | keypos=|-1.. ...|
|00003db0| 08 2a 0e 20 dd f2 65 72 | 72 28 61 24 29 0d 08 34 |.*. ..er|r(a$)..4|
|00003dc0| 1d 20 e9 20 61 24 3d 61 | 24 2b 22 20 3a 20 61 74 |. . a$=a|$+" : at|
|00003dd0| 20 6c 69 6e 65 20 22 2b | c3 9e 0d 08 3e 0e 20 f2 | line "+|....>. .|
|00003de0| 6d 6f 61 6e 28 61 24 29 | 0d 08 48 06 20 e1 0d 08 |moan(a$)|..H. ...|
|00003df0| 52 0e dd f2 72 65 64 6f | 28 68 25 29 0d 08 5c 0d |R...redo|(h%)..\.|
|00003e00| 21 62 6c 6f 63 6b 3d 68 | 25 0d 08 66 1f c8 99 22 |!block=h|%..f..."|
|00003e10| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00003e20| 22 2c 2c 62 6c 6f 63 6b | 0d 08 70 13 f2 6f 70 65 |",,block|..p..ope|
|00003e30| 6e 77 69 6e 64 6f 77 28 | 68 25 29 0d 08 7a 05 e1 |nwindow(|h%)..z..|
|00003e40| 0d 08 84 13 dd f2 64 65 | 74 65 72 6d 69 6e 65 73 |......de|termines|
|00003e50| 69 7a 65 0d 08 8e 0c 6a | 72 66 6f 72 6d 3d 31 0d |ize....j|rform=1.|
|00003e60| 08 98 26 f2 6d 6f 61 6e | 28 22 50 6c 65 61 73 65 |..&.moan|("Please|
|00003e70| 20 49 6e 73 65 72 74 20 | 53 4f 55 52 43 45 20 64 | Insert |SOURCE d|
|00003e80| 69 73 6b 22 29 0d 08 a2 | 18 20 f4 20 69 73 20 69 |isk")...|. . is i|
|00003e90| 74 20 38 30 30 6b 20 66 | 6f 72 6d 61 74 0d 08 ac |t 800k f|ormat...|
|00003ea0| 28 62 79 74 65 73 3d 31 | 30 3a 73 65 63 74 6f 72 |(bytes=1|0:sector|
|00003eb0| 73 3d 35 3a 68 65 61 64 | 73 3d 32 3a 64 65 6e 73 |s=5:head|s=2:dens|
|00003ec0| 69 74 79 3d 32 0d 08 b6 | 2e f2 63 72 65 61 74 65 |ity=2...|..create|
|00003ed0| 64 65 66 65 63 74 28 62 | 79 74 65 73 2c 73 65 63 |defect(b|ytes,sec|
|00003ee0| 74 6f 72 73 2c 68 65 61 | 64 73 2c 64 65 6e 73 69 |tors,hea|ds,densi|
|00003ef0| 74 79 29 0d 08 c0 44 f2 | 64 69 73 63 5f 6f 70 28 |ty)...D.|disc_op(|
|00003f00| 30 2c 28 32 5e 62 79 74 | 65 73 29 2a 73 65 63 74 |0,(2^byt|es)*sect|
|00003f10| 6f 72 73 2a 68 65 61 64 | 73 2c 68 65 61 64 73 2a |ors*head|s,heads*|
|00003f20| 73 65 63 74 6f 72 73 2a | 28 32 5e 62 79 74 65 73 |sectors*|(2^bytes|
|00003f30| 29 2a 37 39 2c 30 29 0d | 08 ca 49 e7 20 28 66 6c |)*79,0).|..I. (fl|
|00003f40| 61 67 73 20 80 20 31 29 | 3d 30 20 8c 20 73 69 7a |ags . 1)|=0 . siz|
|00003f50| 65 3d 26 43 38 30 30 30 | 3a 24 a4 74 61 64 28 63 |e=&C8000|:$.tad(c|
|00003f60| 6f 70 79 77 69 6e 25 2c | 36 29 3d 22 45 22 3a f2 |opywin%,|6)="E":.|
|00003f70| 72 65 64 6f 28 63 6f 70 | 79 77 69 6e 25 29 3a e1 |redo(cop|ywin%):.|
|00003f80| 0d 08 d4 18 20 f4 20 69 | 73 20 69 74 20 36 34 30 |.... . i|s it 640|
|00003f90| 6b 20 66 6f 72 6d 61 74 | 0d 08 de 28 62 79 74 65 |k format|...(byte|
|00003fa0| 73 3d 38 3a 73 65 63 74 | 6f 72 73 3d 31 36 3a 68 |s=8:sect|ors=16:h|
|00003fb0| 65 61 64 73 3d 32 3a 64 | 65 6e 73 69 74 79 3d 32 |eads=2:d|ensity=2|
|00003fc0| 0d 08 e8 2e f2 63 72 65 | 61 74 65 64 65 66 65 63 |.....cre|atedefec|
|00003fd0| 74 28 62 79 74 65 73 2c | 73 65 63 74 6f 72 73 2c |t(bytes,|sectors,|
|00003fe0| 68 65 61 64 73 2c 64 65 | 6e 73 69 74 79 29 0d 08 |heads,de|nsity)..|
|00003ff0| f2 44 f2 64 69 73 63 5f | 6f 70 28 30 2c 28 32 5e |.D.disc_|op(0,(2^|
|00004000| 62 79 74 65 73 29 2a 73 | 65 63 74 6f 72 73 2a 68 |bytes)*s|ectors*h|
|00004010| 65 61 64 73 2c 68 65 61 | 64 73 2a 73 65 63 74 6f |eads,hea|ds*secto|
|00004020| 72 73 2a 28 32 5e 62 79 | 74 65 73 29 2a 37 39 2c |rs*(2^by|tes)*79,|
|00004030| 30 29 0d 08 fc 49 e7 20 | 28 66 6c 61 67 73 20 80 |0)...I. |(flags .|
|00004040| 20 31 29 3d 30 20 8c 20 | 73 69 7a 65 3d 26 41 30 | 1)=0 . |size=&A0|
|00004050| 30 30 30 3a 24 a4 74 61 | 64 28 63 6f 70 79 77 69 |000:$.ta|d(copywi|
|00004060| 6e 25 2c 36 29 3d 22 4c | 22 3a f2 72 65 64 6f 28 |n%,6)="L|":.redo(|
|00004070| 63 6f 70 79 77 69 6e 25 | 29 3a e1 0d 09 06 15 20 |copywin%|):..... |
|00004080| f4 20 73 69 7a 65 20 6e | 6f 74 20 66 6f 75 6e 64 |. size n|ot found|
|00004090| 0d 09 10 36 f2 6d 6f 61 | 6e 28 22 43 61 6e 27 74 |...6.moa|n("Can't|
|000040a0| 20 44 65 74 65 72 6d 69 | 6e 65 20 53 69 7a 65 2c | Determi|ne Size,|
|000040b0| 20 70 6c 65 61 73 65 20 | 69 6e 70 75 74 20 28 4c | please |input (L|
|000040c0| 2f 44 29 3a 22 29 0d 09 | 1a 0a e8 73 69 7a 65 24 |/D):")..|...size$|
|000040d0| 0d 09 24 1d e7 20 73 69 | 7a 65 24 3d 22 4c 22 20 |..$.. si|ze$="L" |
|000040e0| 84 20 73 69 7a 65 24 3d | 22 6c 22 20 8c 0d 09 2e |. size$=|"l" ....|
|000040f0| 5a 62 79 74 65 73 3d 38 | 3a 73 65 63 74 6f 72 73 |Zbytes=8|:sectors|
|00004100| 3d 31 36 3a 68 65 61 64 | 73 3d 32 3a 64 65 6e 73 |=16:head|s=2:dens|
|00004110| 69 74 79 3d 32 3a 73 69 | 7a 65 3d 26 41 30 30 30 |ity=2:si|ze=&A000|
|00004120| 30 3a 24 a4 74 61 64 28 | 63 6f 70 79 77 69 6e 25 |0:$.tad(|copywin%|
|00004130| 2c 36 29 3d 22 4c 22 3a | f2 72 65 64 6f 28 63 6f |,6)="L":|.redo(co|
|00004140| 70 79 77 69 6e 25 29 0d | 09 38 05 cc 0d 09 42 5a |pywin%).|.8....BZ|
|00004150| 62 79 74 65 73 3d 31 30 | 3a 73 65 63 74 6f 72 73 |bytes=10|:sectors|
|00004160| 3d 35 3a 68 65 61 64 73 | 3d 32 3a 64 65 6e 73 69 |=5:heads|=2:densi|
|00004170| 74 79 3d 32 3a 73 69 7a | 65 3d 26 43 38 30 30 30 |ty=2:siz|e=&C8000|
|00004180| 3a 24 a4 74 61 64 28 63 | 6f 70 79 77 69 6e 25 2c |:$.tad(c|opywin%,|
|00004190| 36 29 3d 22 44 22 3a f2 | 72 65 64 6f 28 63 6f 70 |6)="D":.|redo(cop|
|000041a0| 79 77 69 6e 25 29 0d 09 | 4c 05 cd 0d 09 56 2e f2 |ywin%)..|L....V..|
|000041b0| 63 72 65 61 74 65 64 65 | 66 65 63 74 28 62 79 74 |createde|fect(byt|
|000041c0| 65 73 2c 73 65 63 74 6f | 72 73 2c 68 65 61 64 73 |es,secto|rs,heads|
|000041d0| 2c 64 65 6e 73 69 74 79 | 29 0d 09 60 17 f1 8a 30 |,density|)..`...0|
|000041e0| 2c 33 29 3b 89 28 37 39 | 29 3b 8a 30 2c 32 29 3b |,3);.(79|);.0,2);|
|000041f0| 0d 09 6a 05 e1 0d 09 74 | 2f dd f2 63 72 65 61 74 |..j....t|/..creat|
|00004200| 65 64 65 66 65 63 74 28 | 62 79 74 65 73 2c 73 65 |edefect(|bytes,se|
|00004210| 63 74 6f 72 73 2c 68 65 | 61 64 73 2c 64 65 6e 73 |ctors,he|ads,dens|
|00004220| 69 74 79 29 0d 09 7e 13 | 64 65 66 65 63 74 25 3f |ity)..~.|defect%?|
|00004230| 30 3d 62 79 74 65 73 0d | 09 88 15 64 65 66 65 63 |0=bytes.|...defec|
|00004240| 74 25 3f 31 3d 73 65 63 | 74 6f 72 73 0d 09 92 13 |t%?1=sec|tors....|
|00004250| 64 65 66 65 63 74 25 3f | 32 3d 68 65 61 64 73 0d |defect%?|2=heads.|
|00004260| 09 9c 15 64 65 66 65 63 | 74 25 3f 33 3d 64 65 6e |...defec|t%?3=den|
|00004270| 73 69 74 79 0d 09 a6 29 | 64 65 66 65 63 74 25 21 |sity...)|defect%!|
|00004280| 31 36 3d 38 30 2a 68 65 | 61 64 73 2a 73 65 63 74 |16=80*he|ads*sect|
|00004290| 6f 72 73 2a 28 32 5e 62 | 79 74 65 73 29 0d 09 b0 |ors*(2^b|ytes)...|
|000042a0| 05 e1 0d 09 ba 2d dd f2 | 64 69 73 63 5f 6f 70 28 |.....-..|disc_op(|
|000042b0| 63 6f 6d 6d 61 6e 64 2c | 6c 65 6e 2c 73 65 63 74 |command,|len,sect|
|000042c0| 6f 72 73 74 61 72 74 2c | 6f 66 66 73 65 74 29 0d |orstart,|offset).|
|000042d0| 09 c4 23 42 25 3d 63 6f | 6d 6d 61 6e 64 20 84 20 |..#B%=co|mmand . |
|000042e0| 28 28 64 65 66 65 63 74 | 25 20 81 20 34 29 3c 3c |((defect|% . 4)<<|
|000042f0| 38 29 0d 09 ce 12 43 25 | 3d 73 65 63 74 6f 72 73 |8)....C%|=sectors|
|00004300| 74 61 72 74 0d 09 d8 15 | 44 25 3d 6d 65 6d 6f 72 |tart....|D%=memor|
|00004310| 79 25 2b 6f 66 66 73 65 | 74 0d 09 e2 0a 45 25 3d |y%+offse|t....E%=|
|00004320| 6c 65 6e 0d 09 ec 2b c8 | 99 20 22 58 41 44 46 53 |len...+.|. "XADFS|
|00004330| 5f 44 69 73 63 4f 70 22 | 2c 2c 42 25 2c 43 25 2c |_DiscOp"|,,B%,C%,|
|00004340| 44 25 2c 45 25 20 b8 20 | 3b 66 6c 61 67 73 0d 09 |D%,E% . |;flags..|
|00004350| f6 05 e1 0d 0a 00 12 62 | 75 66 66 65 72 73 69 7a |.......b|uffersiz|
|00004360| 65 3d 32 30 30 0d 0a 0a | 0f dd f2 63 6f 72 72 75 |e=200...|...corru|
|00004370| 70 74 65 64 0d 0a 14 48 | e7 6a 72 66 6f 72 6d 3d |pted...H|.jrform=|
|00004380| 30 20 8c 20 f2 6d 6f 61 | 6e 28 22 59 6f 75 20 4e |0 . .moa|n("You N|
|00004390| 65 65 64 20 74 6f 20 66 | 69 6e 64 20 74 68 65 20 |eed to f|ind the |
|000043a0| 46 6f 72 6d 61 74 20 6f | 66 20 74 68 65 20 44 69 |Format o|f the Di|
|000043b0| 73 6b 20 46 69 72 73 74 | 22 29 3a e1 0d 0a 1e 26 |sk First|"):....&|
|000043c0| f2 6d 6f 61 6e 28 22 50 | 6c 65 61 73 65 20 49 6e |.moan("P|lease In|
|000043d0| 73 65 72 74 20 53 4f 55 | 52 43 45 20 44 69 73 6b |sert SOU|RCE Disk|
|000043e0| 22 29 0d 0a 28 13 74 3d | 30 3a 68 3d 30 3a 63 75 |")..(.t=|0:h=0:cu|
|000043f0| 72 72 25 3d 30 0d 0a 32 | 05 f5 0d 0a 3c 2d 73 74 |rr%=0..2|....<-st|
|00004400| 61 74 65 3d a4 63 68 65 | 63 6b 68 65 61 64 28 74 |ate=.che|ckhead(t|
|00004410| 2a 32 2b 68 29 3a 68 65 | 61 64 28 74 2a 32 2b 68 |*2+h):he|ad(t*2+h|
|00004420| 29 3d 73 74 61 74 65 0d | 0a 46 2b e7 20 73 74 61 |)=state.|.F+. sta|
|00004430| 74 65 20 8c 20 e9 20 63 | 75 72 72 25 3d 63 75 72 |te . . c|urr%=cur|
|00004440| 72 25 20 8b 20 63 75 72 | 72 25 3d 63 75 72 72 25 |r% . cur|r%=curr%|
|00004450| 2b 31 0d 0a 50 1d 68 2b | 3d 31 3a e7 20 68 3d 68 |+1..P.h+|=1:. h=h|
|00004460| 65 61 64 73 20 8c 20 68 | 3d 30 3a 74 2b 3d 31 0d |eads . h|=0:t+=1.|
|00004470| 0a 5a 0a fd 20 74 3d 38 | 30 0d 0a 64 2e 20 24 a4 |.Z.. t=8|0..d. $.|
|00004480| 74 61 64 28 63 6f 70 79 | 77 69 6e 25 2c 31 32 29 |tad(copy|win%,12)|
|00004490| 3d c3 63 75 72 72 25 3a | f2 72 65 64 6f 28 63 6f |=.curr%:|.redo(co|
|000044a0| 70 79 77 69 6e 25 29 0d | 0a 6e 0f 6a 72 63 68 65 |pywin%).|.n.jrche|
|000044b0| 63 6b 65 64 3d 31 0d 0a | 78 0c 6a 72 66 6f 72 6d |cked=1..|x.jrform|
|000044c0| 3d 31 0d 0a 82 06 20 e1 | 0d 0a 8c 12 dd a4 63 68 |=1.... .|......ch|
|000044d0| 65 63 6b 68 65 61 64 28 | 68 29 0d 0a 96 27 f2 64 |eckhead(|h)...'.d|
|000044e0| 69 73 63 5f 6f 70 28 30 | 2c 31 2c 68 2a 73 65 63 |isc_op(0|,1,h*sec|
|000044f0| 74 6f 72 73 2a 28 32 5e | 62 79 74 65 73 29 2c 30 |tors*(2^|bytes),0|
|00004500| 29 0d 0a a0 13 3d ac 20 | 2d 28 66 6c 61 67 73 20 |)....=. |-(flags |
|00004510| 80 20 31 29 0d 0a aa 10 | dd f2 72 75 62 62 69 73 |. 1)....|..rubbis|
|00004520| 68 28 68 29 0d 0a b4 37 | f2 64 69 73 63 5f 6f 70 |h(h)...7|.disc_op|
|00004530| 28 34 2c 73 65 63 74 6f | 72 73 2a 28 32 5e 62 79 |(4,secto|rs*(2^by|
|00004540| 74 65 73 29 2c 68 2a 73 | 65 63 74 6f 72 73 2a 28 |tes),h*s|ectors*(|
|00004550| 32 5e 62 79 74 65 73 29 | 2c 30 29 0d 0a be 05 e1 |2^bytes)|,0).....|
|00004560| 0d 0a c8 10 dd f2 72 75 | 62 62 69 73 68 69 6e 67 |......ru|bbishing|
|00004570| 0d 0a d2 3c e7 20 6a 72 | 63 68 65 63 6b 65 64 3d |...<. jr|checked=|
|00004580| 30 20 8c 20 f2 6d 6f 61 | 6e 28 22 59 6f 75 20 4d |0 . .moa|n("You M|
|00004590| 75 73 74 20 43 68 65 63 | 6b 20 54 68 65 20 44 69 |ust Chec|k The Di|
|000045a0| 73 6b 20 46 69 72 73 74 | 22 29 3a e1 0d 0a dc 2c |sk First|"):....,|
|000045b0| f2 6d 6f 61 6e 28 22 50 | 6c 65 61 73 65 20 49 6e |.moan("P|lease In|
|000045c0| 73 65 72 74 20 44 45 53 | 54 49 4e 41 54 49 4f 4e |sert DES|TINATION|
|000045d0| 53 20 44 69 73 6b 22 29 | 0d 0a e6 0b 74 3d 30 3a |S Disk")|....t=0:|
|000045e0| 68 3d 30 0d 0a f0 05 f5 | 0d 0a fa 15 e7 20 ac 20 |h=0.....|..... . |
|000045f0| 68 65 61 64 28 74 2a 32 | 2b 68 29 20 8c 0d 0b 04 |head(t*2|+h) ....|
|00004600| 13 f2 72 75 62 62 69 73 | 68 28 74 2a 32 2b 68 29 |..rubbis|h(t*2+h)|
|00004610| 0d 0b 0e 07 fb 20 31 0d | 0b 18 07 fb 20 37 0d 0b |..... 1.|.... 7..|
|00004620| 22 05 cd 0d 0b 2c 1d 68 | 2b 3d 31 3a e7 20 68 3d |"....,.h|+=1:. h=|
|00004630| 68 65 61 64 73 20 8c 20 | 68 3d 30 3a 74 2b 3d 31 |heads . |h=0:t+=1|
|00004640| 0d 0b 36 0a fd 20 74 3d | 38 30 0d 0b 40 05 cd 0d |..6.. t=|80..@...|
|00004650| 0b 4a 2d 24 a4 74 61 64 | 28 63 6f 70 79 77 69 6e |.J-$.tad|(copywin|
|00004660| 25 2c 31 33 29 3d c3 63 | 75 72 72 25 3a f2 72 65 |%,13)=.c|urr%:.re|
|00004670| 64 6f 28 63 6f 70 79 77 | 69 6e 25 29 0d 0b 54 05 |do(copyw|in%)..T.|
|00004680| e1 0d 0b 5e 0a dd f2 63 | 6f 70 79 0d 0b 68 3a e7 |...^...c|opy..h:.|
|00004690| 6a 72 63 68 65 63 6b 65 | 64 3d 30 20 8c 20 f2 6d |jrchecke|d=0 . .m|
|000046a0| 6f 61 6e 28 22 43 68 65 | 63 6b 20 74 68 65 20 53 |oan("Che|ck the S|
|000046b0| 4f 55 52 43 45 20 64 69 | 73 6b 20 66 69 72 73 74 |OURCE di|sk first|
|000046c0| 21 22 29 3a e1 0d 0b 72 | 0b 74 3d 30 3a 68 3d 30 |!"):...r|.t=0:h=0|
|000046d0| 0d 0b 7c 05 f5 0d 0b 86 | 12 70 6f 69 6e 74 65 72 |..|.....|.pointer|
|000046e0| 3d 30 3a 68 73 3d 30 0d | 0b 90 1a f2 72 65 61 64 |=0:hs=0.|....read|
|000046f0| 68 65 61 64 73 3a 6e 74 | 3d 71 74 3a 6e 68 3d 71 |heads:nt|=qt:nh=q|
|00004700| 68 0d 0b 9a 19 f2 77 72 | 69 74 65 68 65 61 64 73 |h.....wr|iteheads|
|00004710| 3a 74 3d 6e 74 3a 68 3d | 6e 68 0d 0b a4 0b fd 20 |:t=nt:h=|nh..... |
|00004720| 74 3e 3d 38 30 0d 0b ae | 05 e1 0d 0b b8 0f dd f2 |t>=80...|........|
|00004730| 72 65 61 64 68 65 61 64 | 73 0d 0b c2 3f f2 6d 6f |readhead|s...?.mo|
|00004740| 61 6e 28 22 52 65 61 64 | 20 66 72 6f 6d 20 53 6f |an("Read| from So|
|00004750| 75 72 63 65 20 44 69 73 | 6b 20 2d 20 50 6c 65 61 |urce Dis|k - Plea|
|00004760| 73 65 20 49 6e 73 65 72 | 74 20 53 4f 55 52 43 45 |se Inser|t SOURCE|
|00004770| 20 64 69 73 6b 2e 22 29 | 0d 0b cc 0d 71 74 3d 74 | disk.")|....qt=t|
|00004780| 3a 71 68 3d 68 0d 0b d6 | 05 f5 0d 0b e0 16 e7 20 |:qh=h...|....... |
|00004790| 68 65 61 64 28 74 2a 32 | 2b 68 2b 68 73 29 20 8c |head(t*2|+h+hs) .|
|000047a0| 0d 0b ea 46 f2 64 69 73 | 63 5f 6f 70 28 31 2c 28 |...F.dis|c_op(1,(|
|000047b0| 32 5e 62 79 74 65 73 29 | 2a 73 65 63 74 6f 72 73 |2^bytes)|*sectors|
|000047c0| 2c 28 74 2a 32 2b 68 2b | 68 73 29 2a 28 32 5e 62 |,(t*2+h+|hs)*(2^b|
|000047d0| 79 74 65 73 29 2a 73 65 | 63 74 6f 72 73 2c 70 6f |ytes)*se|ctors,po|
|000047e0| 69 6e 74 65 72 29 0d 0b | f4 1e 70 6f 69 6e 74 65 |inter)..|..pointe|
|000047f0| 72 2b 3d 28 32 5e 62 79 | 74 65 73 29 2a 73 65 63 |r+=(2^by|tes)*sec|
|00004800| 74 6f 72 73 0d 0b fe 05 | cd 0d 0c 08 09 68 73 2b |tors....|.....hs+|
|00004810| 3d 31 0d 0c 12 27 71 74 | 3d 28 74 2a 32 2b 68 73 |=1...'qt|=(t*2+hs|
|00004820| 2b 68 29 20 81 20 32 3a | 71 68 3d 28 74 2a 32 2b |+h) . 2:|qh=(t*2+|
|00004830| 68 73 2b 68 29 20 83 20 | 32 0d 0c 1c 41 fd 20 70 |hs+h) . |2...A. p|
|00004840| 6f 69 6e 74 65 72 2b 28 | 32 5e 62 79 74 65 73 29 |ointer+(|2^bytes)|
|00004850| 2a 73 65 63 74 6f 72 73 | 3e 62 75 66 66 65 72 73 |*sectors|>buffers|
|00004860| 69 7a 65 2a 26 34 30 30 | 20 84 20 28 74 2a 32 2b |ize*&400| . (t*2+|
|00004870| 68 2b 68 73 29 3e 3d 31 | 36 30 0d 0c 26 05 e1 0d |h+hs)>=1|60..&...|
|00004880| 0c 30 04 0d 0c 3a 10 dd | f2 77 72 69 74 65 68 65 |.0...:..|.writehe|
|00004890| 61 64 73 0d 0c 44 49 f2 | 6d 6f 61 6e 28 22 57 72 |ads..DI.|moan("Wr|
|000048a0| 69 74 69 6e 67 20 74 6f | 20 44 65 73 74 69 6e 61 |iting to| Destina|
|000048b0| 74 69 6f 6e 20 44 69 73 | 6b 20 2d 20 50 6c 65 61 |tion Dis|k - Plea|
|000048c0| 73 65 20 69 6e 73 65 72 | 74 20 44 45 53 54 49 4e |se inser|t DESTIN|
|000048d0| 41 54 49 4f 4e 20 64 69 | 73 6b 22 29 0d 0c 4e 12 |ATION di|sk")..N.|
|000048e0| 70 74 3d 30 3a 71 74 3d | 74 3a 71 68 3d 68 0d 0c |pt=0:qt=|t:qh=h..|
|000048f0| 58 05 f5 0d 0c 62 15 e7 | 20 68 65 61 64 28 71 74 |X....b..| head(qt|
|00004900| 2a 32 2b 71 68 29 20 8c | 0d 0c 6c 40 f2 64 69 73 |*2+qh) .|..l@.dis|
|00004910| 63 5f 6f 70 28 32 2c 28 | 32 5e 62 79 74 65 73 29 |c_op(2,(|2^bytes)|
|00004920| 2a 73 65 63 74 6f 72 73 | 2c 28 71 74 2a 32 2b 71 |*sectors|,(qt*2+q|
|00004930| 68 29 2a 28 32 5e 62 79 | 74 65 73 29 2a 73 65 63 |h)*(2^by|tes)*sec|
|00004940| 74 6f 72 73 2c 70 74 29 | 0d 0c 76 19 70 74 2b 3d |tors,pt)|..v.pt+=|
|00004950| 28 32 5e 62 79 74 65 73 | 29 2a 73 65 63 74 6f 72 |(2^bytes|)*sector|
|00004960| 73 0d 0c 80 05 cd 0d 0c | 8a 21 71 68 2b 3d 31 3a |s.......|.!qh+=1:|
|00004970| e7 20 71 68 3d 68 65 61 | 64 73 20 8c 20 71 68 3d |. qh=hea|ds . qh=|
|00004980| 30 3a 71 74 2b 3d 31 0d | 0c 94 19 fd 20 28 71 74 |0:qt+=1.|.... (qt|
|00004990| 2a 32 2b 71 68 29 3d 28 | 6e 74 2a 32 2b 6e 68 29 |*2+qh)=(|nt*2+nh)|
|000049a0| 0d 0c 9e 05 e1 0d ff 46 | 69 6c 65 44 61 74 61 82 |.......F|ileData.|
|000049b0| 21 53 70 72 69 74 65 73 | 00 00 00 ec 02 00 00 43 |!Sprites|.......C|
|000049c0| f9 ff ff 08 67 e5 be 03 | 00 46 86 03 00 00 00 10 |....g...|.F......|
|000049d0| 00 00 00 f0 02 00 00 b0 | 00 00 00 75 70 00 00 00 |........|...up...|
|000049e0| 00 00 00 00 00 00 00 02 | 00 00 00 0a 00 00 00 00 |........|........|
|000049f0| 00 00 00 17 00 00 00 2c | 00 00 00 2c 00 00 00 0c |.......,|...,....|
|00004a00| 00 00 00 77 77 77 77 77 | 77 77 77 77 77 77 00 77 |...wwwww|wwwwww.w|
|00004a10| ff ff ff ff ff ff ff ff | ff 77 00 77 ff ff ff ff |........|.w.w....|
|00004a20| 77 ff ff ff ff 77 00 77 | ff ff ff 7f 00 f7 ff ff |w....w.w|........|
|00004a30| ff 77 00 77 ff ff ff 07 | 00 70 ff ff ff 77 00 77 |.w.w....|.p...w.w|
|00004a40| ff ff 7f 77 00 77 f7 ff | ff 77 00 77 ff ff ff 7f |...w.w..|.w.w....|
|00004a50| 00 f7 ff ff ff 77 00 77 | ff ff ff 7f 00 f7 ff ff |.....w.w|........|
|00004a60| ff 77 00 77 ff ff ff 7f | 77 f7 ff ff ff 77 00 77 |.w.w....|w....w.w|
|00004a70| ff ff ff ff ff ff ff ff | ff 77 00 77 77 77 77 77 |........|.w.wwwww|
|00004a80| 77 77 77 77 77 77 00 b0 | 00 00 00 64 6f 77 6e 00 |wwwwww..|...down.|
|00004a90| 00 00 00 00 00 00 00 02 | 00 00 00 0a 00 00 00 08 |........|........|
|00004aa0| 00 00 00 1f 00 00 00 2c | 00 00 00 2c 00 00 00 0c |.......,|...,....|
|00004ab0| 00 00 00 00 77 77 77 77 | 77 77 77 77 77 77 77 00 |....wwww|wwwwwww.|
|00004ac0| 77 ff ff ff ff ff ff ff | ff ff 77 00 77 ff ff ff |w.......|..w.w...|
|00004ad0| 7f 77 f7 ff ff ff 77 00 | 77 ff ff ff 7f 00 f7 ff |.w....w.|w.......|
|00004ae0| ff ff 77 00 77 ff ff ff | 7f 00 f7 ff ff ff 77 00 |..w.w...|......w.|
|00004af0| 77 ff ff 7f 77 00 77 f7 | ff ff 77 00 77 ff ff ff |w...w.w.|..w.w...|
|00004b00| 07 00 70 ff ff ff 77 00 | 77 ff ff ff 7f 00 f7 ff |..p...w.|w.......|
|00004b10| ff ff 77 00 77 ff ff ff | ff 77 ff ff ff ff 77 00 |..w.w...|.w....w.|
|00004b20| 77 ff ff ff ff ff ff ff | ff ff 77 00 77 77 77 77 |w.......|..w.wwww|
|00004b30| 77 77 77 77 77 77 77 80 | 01 00 00 21 64 69 73 6b |wwwwwww.|...!disk|
|00004b40| 63 6f 70 79 00 00 00 04 | 00 00 00 10 00 00 00 00 |copy....|........|
|00004b50| 00 00 00 07 00 00 00 2c | 00 00 00 2c 00 00 00 0c |.......,|...,....|
|00004b60| 00 00 00 33 33 33 33 33 | 33 33 33 33 33 33 33 33 |...33333|33333333|
|00004b70| 33 33 33 33 00 00 00 00 | 11 11 11 11 11 11 11 11 |3333....|........|
|00004b80| 11 11 11 11 11 11 11 33 | 00 00 00 00 11 11 11 11 |.......3|........|
|00004b90| 11 11 11 11 11 11 11 11 | 11 11 11 33 00 00 00 00 |........|...3....|
|00004ba0| 11 11 00 00 00 00 00 00 | 00 00 00 00 00 11 11 33 |........|.......3|
|00004bb0| 00 00 00 00 11 11 33 11 | 11 11 11 11 11 11 11 11 |......3.|........|
|00004bc0| 00 11 11 33 00 00 00 00 | 11 11 33 71 77 17 11 71 |...3....|..3qw..q|
|00004bd0| 77 17 11 11 00 11 11 33 | 00 00 00 00 11 11 33 11 |w......3|......3.|
|00004be0| 71 77 17 11 71 77 17 11 | 00 11 11 33 00 00 00 00 |qw..qw..|...3....|
|00004bf0| 11 11 33 11 11 71 77 17 | 11 71 77 17 00 11 11 33 |..3..qw.|.qw....3|
|00004c00| 00 00 00 00 11 11 33 11 | 11 11 71 77 11 11 71 77 |......3.|..qw..qw|
|00004c10| 00 11 11 33 00 00 00 00 | 11 11 33 11 11 71 77 17 |...3....|..3..qw.|
|00004c20| 11 71 77 17 00 11 11 33 | 00 00 00 00 11 11 33 11 |.qw....3|......3.|
|00004c30| 71 77 17 11 71 77 17 11 | 00 11 11 33 00 00 00 00 |qw..qw..|...3....|
|00004c40| 11 11 33 71 77 17 11 71 | 77 17 11 11 00 11 11 33 |..3qw..q|w......3|
|00004c50| 00 00 00 00 11 11 33 11 | 11 11 11 11 11 11 11 11 |......3.|........|
|00004c60| 00 11 11 33 00 00 00 00 | 11 11 33 33 33 33 33 33 |...3....|..333333|
|00004c70| 33 33 33 33 00 11 11 33 | 00 00 00 00 11 11 11 11 |3333...3|........|
|00004c80| 11 11 11 11 11 11 11 11 | 11 11 11 33 00 00 00 00 |........|...3....|
|00004c90| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 33 |........|.......3|
|00004ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004cb0| 00 00 00 33 00 00 00 46 | 69 6c 65 44 61 74 61 82 |...3...F|ileData.|
|00004cc0| 48 65 6c 70 00 04 00 8e | 00 00 00 dd 08 00 00 45 |Help....|.......E|
|00004cd0| ff ff ff 54 6d c2 85 03 | 00 1f b2 20 20 20 20 20 |...Tm...|...     |
|00004ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004cf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 44 69 73 |        |     Dis|
|00004d00| 6b 20 43 6f 70 69 65 72 | 0a 0a 20 20 20 20 57 61 |k Copier|..    Wa|
|00004d10| 72 6e 69 6e 67 0a 0a 20 | 20 54 68 69 73 20 70 72 |rning.. | This pr|
|00004d20| 6f 67 72 61 6d 20 73 68 | 6f 75 6c 64 20 6f 6e 6c |ogram sh|ould onl|
|00004d30| 79 20 62 65 20 75 73 65 | 64 20 74 6f 20 63 6f 70 |y be use|d to cop|
|00004d40| 79 20 79 6f 75 72 20 6f | 77 6e 20 73 6f 66 74 77 |y your o|wn softw|
|00004d50| 61 72 65 20 61 6e 64 20 | 74 68 65 20 6f 6e 6c 79 |are and |the only|
|00004d60| 20 61 0a 73 69 6e 67 6c | 65 20 63 6f 70 79 20 6f | a.singl|e copy o|
|00004d70| 66 20 63 6f 70 79 72 69 | 67 68 74 65 64 20 73 6f |f copyri|ghted so|
|00004d80| 66 74 77 61 72 65 20 28 | 66 6f 72 20 79 6f 75 72 |ftware (|for your|
|00004d90| 20 6f 77 6e 20 75 73 65 | 29 20 73 68 6f 75 6c 64 | own use|) should|
|00004da0| 20 62 65 20 6d 61 64 65 | 2e 0a 20 20 54 68 65 20 | be made|..  The |
|00004db0| 61 75 74 68 6f 72 20 61 | 6e 64 20 64 69 73 74 72 |author a|nd distr|
|00004dc0| 69 62 75 74 6f 72 20 63 | 61 6e 20 6e 6f 74 20 62 |ibutor c|an not b|
|00004dd0| 65 20 68 65 6c 64 20 72 | 65 73 70 6f 6e 73 69 62 |e held r|esponsib|
|00004de0| 6c 65 20 66 6f 72 20 79 | 6f 75 72 20 61 63 74 69 |le for y|our acti|
|00004df0| 6f 6e 73 2e 0a 0a 20 20 | 20 20 20 4f 70 65 72 61 |ons...  |   Opera|
|00004e00| 74 69 6e 67 20 20 21 44 | 69 73 6b 43 6f 70 79 0a |ting  !D|iskCopy.|
|00004e10| 0a 20 20 4c 6f 61 64 20 | 69 74 20 75 70 20 62 79 |.  Load |it up by|
|00004e20| 20 64 6f 75 62 6c 65 20 | 63 6c 69 63 6b 69 6e 67 | double |clicking|
|00004e30| 20 6f 6e 20 74 68 65 20 | 21 44 69 73 6b 43 6f 70 | on the |!DiskCop|
|00004e40| 79 20 49 63 6f 6e 2e 20 | 53 65 6c 65 63 74 20 74 |y Icon. |Select t|
|00004e50| 68 65 20 61 70 70 72 6f | 70 72 69 61 74 65 20 62 |he appro|priate b|
|00004e60| 75 66 66 65 72 20 73 65 | 74 74 69 6e 67 3a 2d 0a |uffer se|tting:-.|
|00004e70| 49 66 20 79 6f 75 20 68 | 61 76 65 20 61 20 31 4d |If you h|ave a 1M|
|00004e80| 62 20 6d 61 63 68 69 6e | 65 20 63 68 6f 6f 73 65 |b machin|e choose|
|00004e90| 20 32 30 30 6b 20 28 34 | 20 70 61 73 73 65 73 29 | 200k (4| passes)|
|00004ea0| 20 6f 72 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 | or.    |        |
|00004eb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004ec0| 20 20 20 20 20 34 30 30 | 6b 20 28 32 20 70 61 73 |     400|k (2 pas|
|00004ed0| 73 65 73 29 0a 49 66 20 | 79 6f 75 20 68 61 76 65 |ses).If |you have|
|00004ee0| 20 6d 6f 72 65 20 74 68 | 61 6e 20 31 4d 62 20 63 | more th|an 1Mb c|
|00004ef0| 68 6f 6f 73 65 20 38 30 | 30 6b 20 28 31 20 70 61 |hoose 80|0k (1 pa|
|00004f00| 73 73 29 0a 0a 54 68 65 | 6e 20 79 6f 75 20 6e 65 |ss)..The|n you ne|
|00004f10| 65 64 20 74 6f 20 63 6c | 69 63 6b 20 6c 65 66 74 |ed to cl|ick left|
|00004f20| 20 68 61 6e 64 20 62 75 | 74 74 6f 6e 20 6f 6e 63 | hand bu|tton onc|
|00004f30| 65 20 6f 6e 20 74 68 65 | 20 21 44 69 73 6b 43 6f |e on the| !DiskCo|
|00004f40| 70 79 20 49 63 6f 6e 20 | 6f 6e 20 74 68 65 0a 49 |py Icon |on the.I|
|00004f50| 63 6f 6e 20 42 61 72 2c | 20 61 20 77 69 6e 64 6f |con Bar,| a windo|
|00004f60| 77 20 77 69 6c 6c 20 62 | 65 20 6f 70 65 6e 65 64 |w will b|e opened|
|00004f70| 2e 0a 20 20 54 68 65 6e | 20 79 6f 75 20 6e 65 65 |..  Then| you nee|
|00004f80| 64 20 74 6f 20 63 68 65 | 63 6b 20 74 68 65 20 46 |d to che|ck the F|
|00004f90| 6f 72 6d 61 74 20 6f 66 | 20 74 68 65 20 64 69 73 |ormat of| the dis|
|00004fa0| 6b 20 73 6f 20 63 6c 69 | 63 6b 20 6f 6e 20 27 43 |k so cli|ck on 'C|
|00004fb0| 68 65 63 6b 20 46 6f 72 | 6d 61 74 20 6f 66 0a 44 |heck For|mat of.D|
|00004fc0| 69 73 6b 27 2e 20 49 66 | 20 61 6e 20 65 72 72 6f |isk'. If| an erro|
|00004fd0| 72 20 6d 65 73 73 61 67 | 65 20 61 70 70 65 61 72 |r messag|e appear|
|00004fe0| 73 20 73 61 79 69 6e 67 | 20 27 43 61 6e 27 74 20 |s saying| 'Can't |
|00004ff0| 64 65 74 65 72 6d 69 6e | 65 20 73 69 7a 65 20 2d |determin|e size -|
|00005000| 20 69 6e 70 75 74 20 4c | 2f 44 27 0a 74 68 65 6e | input L|/D'.then|
|00005010| 20 79 6f 75 20 68 61 76 | 65 20 74 6f 20 63 6c 69 | you hav|e to cli|
|00005020| 63 6b 20 6f 6e 20 4f 2e | 4b 2e 20 61 6e 64 20 74 |ck on O.|K. and t|
|00005030| 68 65 6e 20 74 79 70 65 | 20 69 6e 20 4c 20 6f 72 |hen type| in L or|
|00005040| 20 44 2c 20 64 65 70 65 | 6e 64 69 6e 67 20 6f 6e | D, depe|nding on|
|00005050| 20 68 6f 77 0a 74 68 65 | 20 53 6f 75 72 63 65 20 | how.the| Source |
|00005060| 64 69 73 6b 20 77 61 73 | 20 66 6f 72 6d 61 74 65 |disk was| formate|
|00005070| 64 2c 20 61 6e 64 20 74 | 68 65 6e 20 72 65 74 75 |d, and t|hen retu|
|00005080| 72 6e 2e 20 4e 65 78 74 | 20 79 6f 75 20 6e 65 65 |rn. Next| you nee|
|00005090| 64 20 74 6f 20 63 6c 69 | 63 6b 20 6f 6e 0a 27 43 |d to cli|ck on.'C|
|000050a0| 68 65 63 6b 20 66 6f 72 | 20 44 65 66 65 63 74 73 |heck for| Defects|
|000050b0| 27 2e 20 54 68 69 73 20 | 77 69 6c 6c 20 63 68 65 |'. This |will che|
|000050c0| 63 6b 20 66 6f 72 20 64 | 65 66 65 63 74 73 20 6f |ck for d|efects o|
|000050d0| 6e 20 74 68 65 20 53 6f | 75 72 63 65 20 64 69 73 |n the So|urce dis|
|000050e0| 6b 2e 20 4e 6f 77 0a 79 | 6f 75 20 6e 65 65 64 20 |k. Now.y|ou need |
|000050f0| 74 6f 20 63 6c 69 63 6b | 20 6f 6e 20 27 52 75 62 |to click| on 'Rub|
|00005100| 62 69 73 68 20 64 65 66 | 65 63 74 73 20 6f 6e 20 |bish def|ects on |
|00005110| 44 65 73 74 69 6e 61 74 | 69 6f 6e 20 64 69 73 6b |Destinat|ion disk|
|00005120| 27 20 69 66 20 79 6f 75 | 20 68 61 64 20 73 6f 6d |' if you| had som|
|00005130| 65 0a 64 65 66 65 63 74 | 73 20 6f 6e 20 79 6f 75 |e.defect|s on you|
|00005140| 72 20 73 6f 75 72 63 65 | 20 64 69 73 6b 20 28 69 |r source| disk (i|
|00005150| 66 20 74 68 65 20 6e 75 | 6d 62 65 72 20 62 79 20 |f the nu|mber by |
|00005160| 27 4e 6f 2e 20 4f 66 20 | 44 65 66 65 63 74 73 3a |'No. Of |Defects:|
|00005170| 2d 27 20 69 73 20 67 72 | 65 61 74 65 72 0a 74 68 |-' is gr|eater.th|
|00005180| 65 6e 20 30 29 2e 20 54 | 68 65 6e 20 61 6c 6c 20 |en 0). T|hen all |
|00005190| 79 6f 75 20 6e 65 65 64 | 20 74 6f 20 64 6f 20 69 |you need| to do i|
|000051a0| 73 20 63 6c 69 63 6b 20 | 6f 6e 20 74 68 65 20 27 |s click |on the '|
|000051b0| 43 4f 50 59 27 20 69 63 | 6f 6e 20 74 6f 20 73 74 |COPY' ic|on to st|
|000051c0| 61 72 74 20 74 68 65 0a | 63 6f 70 79 69 6e 67 20 |art the.|copying |
|000051d0| 70 72 6f 63 65 73 73 2e | 0a 0a 20 20 20 20 20 46 |process.|..     F|
|000051e0| 6f 72 6d 61 74 20 4f 70 | 74 69 6f 6e 73 2e 0a 20 |ormat Op|tions.. |
|000051f0| 20 54 68 65 20 66 6f 72 | 6d 61 74 20 6f 70 74 69 | The for|mat opti|
|00005200| 6f 6e 73 20 61 72 65 20 | 73 69 6d 70 6c 79 20 61 |ons are |simply a|
|00005210| 6e 20 61 69 64 20 66 6f | 72 20 79 6f 75 2e 20 49 |n aid fo|r you. I|
|00005220| 66 20 79 6f 75 20 77 6f | 75 6c 64 20 6c 69 6b 65 |f you wo|uld like|
|00005230| 20 74 6f 20 66 6f 72 6d | 61 74 0a 61 20 64 69 73 | to form|at.a dis|
|00005240| 6b 20 6a 75 73 74 20 63 | 6c 69 63 6b 20 6f 6e 20 |k just c|lick on |
|00005250| 65 69 74 68 65 72 20 27 | 4c 27 2c 27 44 27 2c 20 |either '|L','D', |
|00005260| 6f 72 20 27 45 27 2e 20 | 54 68 65 6e 20 63 6c 69 |or 'E'. |Then cli|
|00005270| 63 6b 20 6c 65 66 74 20 | 62 75 74 74 6f 6e 20 6f |ck left |button o|
|00005280| 6e 0a 6d 6f 75 73 65 2f | 59 2f 79 20 74 6f 20 73 |n.mouse/|Y/y to s|
|00005290| 74 61 72 74 20 6f 72 20 | 61 6e 79 20 6f 74 68 65 |tart or |any othe|
|000052a0| 72 20 6d 6f 75 73 65 20 | 62 75 74 74 6f 6e 2f 6b |r mouse |button/k|
|000052b0| 65 79 20 74 6f 20 63 61 | 6e 63 65 6c 2e 0a 0a 20 |ey to ca|ncel... |
|000052c0| 20 20 20 20 0a 20 20 20 | 20 20 54 68 69 73 20 70 |    .   |  This p|
|000052d0| 72 6f 67 72 61 6d 20 69 | 73 20 50 44 0a 20 20 20 |rogram i|s PD.   |
|000052e0| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |  ------|--------|
|000052f0| 2d 2d 2d 2d 0a 0a 54 68 | 69 73 20 70 72 6f 67 72 |----..Th|is progr|
|00005300| 61 6d 20 69 73 20 50 75 | 62 6c 69 63 20 44 6f 6d |am is Pu|blic Dom|
|00005310| 61 69 6e 20 28 46 72 65 | 65 77 61 72 65 29 20 61 |ain (Fre|eware) a|
|00005320| 6e 64 20 6d 61 79 20 62 | 65 20 63 6f 70 69 65 64 |nd may b|e copied|
|00005330| 20 66 72 65 65 6c 79 20 | 61 6c 74 68 6f 75 67 68 | freely |although|
|00005340| 0a 69 6e 20 66 75 6c 6c | 2e 20 54 68 69 73 20 70 |.in full|. This p|
|00005350| 72 6f 67 72 61 6d 20 69 | 73 20 63 6f 70 79 72 69 |rogram i|s copyri|
|00005360| 67 68 74 20 74 6f 20 74 | 68 65 20 61 75 74 68 6f |ght to t|he autho|
|00005370| 72 20 61 6e 64 20 6d 61 | 79 20 6e 6f 74 20 62 65 |r and ma|y not be|
|00005380| 20 61 6c 74 65 72 65 64 | 20 77 69 74 68 0a 6f 75 | altered| with.ou|
|00005390| 74 20 63 6f 6e 73 65 6e | 74 2e 20 50 6c 65 61 73 |t consen|t. Pleas|
|000053a0| 65 20 6e 6f 74 65 20 74 | 68 61 74 20 74 68 69 73 |e note t|hat this|
|000053b0| 20 70 72 6f 67 72 61 6d | 20 6d 61 79 20 6e 6f 74 | program| may not|
|000053c0| 20 62 65 20 65 78 63 68 | 61 6e 67 65 64 20 66 6f | be exch|anged fo|
|000053d0| 72 20 6d 6f 6e 65 79 0a | 77 69 74 68 6f 75 74 20 |r money.|without |
|000053e0| 74 68 65 20 61 75 74 68 | 6f 72 73 20 63 6f 6e 73 |the auth|ors cons|
|000053f0| 65 6e 74 2e 20 50 44 20 | 6c 69 62 72 61 72 69 65 |ent. PD |librarie|
|00005400| 73 20 61 6e 64 20 64 69 | 73 74 72 69 62 75 74 6f |s and di|stributo|
|00005410| 72 73 20 6d 61 79 20 6f | 6e 6c 79 20 63 68 61 72 |rs may o|nly char|
|00005420| 67 65 0a 66 6f 72 20 68 | 61 6e 64 6c 69 6e 67 20 |ge.for h|andling |
|00005430| 66 65 65 73 20 65 74 63 | 2e 0a 54 68 65 20 61 75 |fees etc|..The au|
|00005440| 74 68 6f 72 20 69 73 20 | 6e 6f 74 20 72 65 73 70 |thor is |not resp|
|00005450| 6f 6e 73 69 62 6c 65 20 | 66 6f 72 20 6c 6f 73 73 |onsible |for loss|
|00005460| 20 6f 72 20 64 61 6d 61 | 67 65 20 74 6f 20 64 61 | or dama|ge to da|
|00005470| 74 61 20 62 79 20 64 69 | 72 65 63 74 2f 69 6e 64 |ta by di|rect/ind|
|00005480| 69 72 65 63 74 0a 72 65 | 73 75 6c 74 20 6f 66 20 |irect.re|sult of |
|00005490| 74 68 69 73 20 70 72 6f | 67 72 61 6d 2e 20 0a 0a |this pro|gram. ..|
|000054a0| 0a 20 20 20 20 20 46 75 | 72 74 68 65 72 20 49 6e |.     Fu|rther In|
|000054b0| 66 6f 72 6d 61 74 69 6f | 6e 0a 20 20 20 20 20 3d |formatio|n.     =|
|000054c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000054d0| 3d 3d 0a 0a 49 66 20 79 | 6f 75 20 77 69 73 68 20 |==..If y|ou wish |
|000054e0| 74 6f 20 6f 62 74 61 69 | 6e 20 6d 6f 72 65 20 69 |to obtai|n more i|
|000054f0| 6e 66 6f 72 6d 61 74 69 | 6f 6e 2c 20 68 61 76 65 |nformati|on, have|
|00005500| 20 61 6e 79 20 71 75 65 | 72 69 65 73 20 61 62 6f | any que|ries abo|
|00005510| 75 74 20 74 68 69 73 0a | 61 70 70 6c 69 63 61 74 |ut this.|applicat|
|00005520| 69 6f 6e 2c 20 6f 72 20 | 77 6f 75 6c 64 20 6c 69 |ion, or |would li|
|00005530| 6b 65 20 73 6f 6d 65 20 | 70 72 6f 67 72 61 6d 69 |ke some |programi|
|00005540| 6e 67 20 68 65 6c 70 20 | 74 68 65 6e 20 70 6c 65 |ng help |then ple|
|00005550| 61 73 65 20 77 72 69 74 | 65 20 74 6f 20 6d 65 2c |ase writ|e to me,|
|00005560| 20 4d 72 2e 0a 4a 2e 20 | 52 6f 62 62 69 6e 73 2c | Mr..J. |Robbins,|
|00005570| 20 61 74 20 74 68 69 73 | 20 61 64 64 72 65 73 73 | at this| address|
|00005580| 20 3a 2d 0a 0a 20 31 36 | 20 41 6c 6c 65 6e 77 61 | :-.. 16| Allenwa|
|00005590| 74 65 72 20 44 72 69 76 | 65 0a 20 46 6f 72 64 69 |ter Driv|e. Fordi|
|000055a0| 6e 67 62 72 69 64 67 65 | 0a 20 48 61 6e 74 73 0a |ngbridge|. Hants.|
|000055b0| 20 53 50 36 20 31 52 42 | 46 69 6c 65 44 61 74 61 | SP6 1RB|FileData|
|000055c0| 82 50 72 69 6e 74 00 00 | 8e 00 00 00 c0 00 00 00 |.Print..|........|
|000055d0| 45 fb ff ff 37 2d 04 7f | 03 00 6d 0f 0d 00 0a 0b |E...7-..|..m.....|
|000055e0| 20 ef 32 32 2c 31 32 0d | 00 14 1c 20 ef 32 38 2c | .22,12.|... .28,|
|000055f0| 30 2c 33 31 2c 37 39 2c | 30 2c 31 37 2c 31 33 34 |0,31,79,|0,17,134|
|00005600| 2c 31 32 0d 00 1e 2d 20 | 2a 45 43 48 4f 3c 31 37 |,12...- |*ECHO<17|
|00005610| 3e 3c 30 3e 3c 33 31 3e | 3c 33 33 3e 3c 30 3e 53 |><0><31>|<33><0>S|
|00005620| 48 49 46 54 20 54 6f 20 | 43 6f 6e 74 69 6e 75 65 |HIFT To |Continue|
|00005630| 0d 00 28 12 20 ef 32 38 | 2c 31 2c 33 30 2c 37 38 |..(. .28|,1,30,78|
|00005640| 2c 31 0d 00 32 14 20 ef | 31 37 2c 31 33 35 2c 31 |,1..2. .|17,135,1|
|00005650| 37 2c 30 2c 31 32 0d 00 | 3c 08 20 ef 31 34 0d 00 |7,0,12..|<. .14..|
|00005660| 46 0a 2a 46 58 36 2c 30 | 0d 00 50 07 ef 20 32 0d |F.*FX6,0|..P.. 2.|
|00005670| 00 5a 1a 20 2a 54 59 50 | 45 20 3c 43 6f 70 79 24 |.Z. *TYP|E <Copy$|
|00005680| 44 69 72 3e 2e 48 65 6c | 70 0d 00 64 07 ef 20 33 |Dir>.Hel|p..d.. 3|
|00005690| 0d 00 6e 0a 2a 44 45 53 | 4b 2e 0d ff 46 69 6c 65 |..n.*DES|K...File|
|000056a0| 44 61 74 61 82 52 65 61 | 64 00 04 00 8e 00 00 00 |Data.Rea|d.......|
|000056b0| d1 00 00 00 45 fb ff ff | 94 28 04 7f 03 00 4b 72 |....E...|.(....Kr|
|000056c0| 0d 00 0a 0b 20 ef 32 32 | 2c 31 32 0d 00 14 1c 20 |.... .22|,12.... |
|000056d0| ef 32 38 2c 30 2c 33 31 | 2c 37 39 2c 30 2c 31 37 |.28,0,31|,79,0,17|
|000056e0| 2c 31 33 34 2c 31 32 0d | 00 1e 2d 20 2a 45 43 48 |,134,12.|..- *ECH|
|000056f0| 4f 3c 31 37 3e 3c 30 3e | 3c 33 31 3e 3c 33 33 3e |O<17><0>|<31><33>|
|00005700| 3c 30 3e 53 48 49 46 54 | 20 54 6f 20 43 6f 6e 74 |<0>SHIFT| To Cont|
|00005710| 69 6e 75 65 0d 00 28 12 | 20 ef 32 38 2c 31 2c 33 |inue..(.| .28,1,3|
|00005720| 30 2c 37 38 2c 31 0d 00 | 32 14 20 ef 31 37 2c 31 |0,78,1..|2. .17,1|
|00005730| 33 35 2c 31 37 2c 30 2c | 31 32 0d 00 3c 08 20 ef |35,17,0,|12..<. .|
|00005740| 31 34 0d 00 46 1a 20 2a | 54 59 50 45 20 3c 43 6f |14..F. *|TYPE <Co|
|00005750| 70 79 24 44 69 72 3e 2e | 48 65 6c 70 0d 00 50 19 |py$Dir>.|Help..P.|
|00005760| 20 f1 3a f1 3a f1 3a f1 | 22 50 72 65 73 73 20 53 | .:.:.:.|"Press S|
|00005770| 70 61 63 65 22 0d 00 5a | 0f 20 f5 20 fd 20 a6 28 |pace"..Z|. . . .(|
|00005780| 2d 39 39 29 0d 00 64 0b | 20 2a 44 45 53 4b 2e 0d |-99)..d.| *DESK..|
|00005790| ff 46 69 6c 65 44 61 74 | 61 82 54 65 6d 70 6c 61 |.FileDat|a.Templa|
|000057a0| 74 65 73 00 00 ce 09 00 | 00 40 ec ff ff 79 79 41 |tes.....|.@...yyA|
|000057b0| f7 03 00 3a 27 ff ff ff | ff 00 00 00 00 00 00 00 |...:'...|........|
|000057c0| 00 00 00 00 00 5c 00 00 | 00 dc 02 00 00 01 00 00 |.....\..|........|
|000057d0| 00 70 72 6f 67 49 6e 66 | 6f 0d 00 00 00 38 03 00 |.progInf|o....8..|
|000057e0| 00 63 04 00 00 01 00 00 | 00 43 6f 70 79 0d 6e 66 |.c......|.Copy.nf|
|000057f0| 6f 0d 00 00 00 9b 07 00 | 00 33 02 00 00 01 00 00 |o.......|.3......|
|00005800| 00 42 75 66 66 73 69 7a | 65 0d 00 00 00 00 00 00 |.Buffsiz|e.......|
|00005810| 00 94 02 00 00 88 00 00 | 00 fe 04 00 00 5c 01 00 |........|.....\..|
|00005820| 00 00 00 00 00 00 00 00 | 00 30 07 00 00 12 00 05 |........|.0......|
|00005830| 84 07 02 07 01 0c 0e 0c | 00 00 00 00 00 2c ff ff |........|.....,..|
|00005840| ff 6a 02 00 00 00 00 00 | 00 3d 01 00 00 00 30 00 |.j......|.=....0.|
|00005850| 00 01 00 00 00 00 00 00 | 00 58 02 00 00 ff ff ff |........|.X......|
|00005860| ff 13 00 00 00 10 00 00 | 00 9a 00 00 00 cc ff ff |........|........|
|00005870| ff 64 02 00 00 fc ff ff | ff 38 60 00 03 0d 53 54 |.d......|.8`...ST|
|00005880| 72 61 63 6b 65 72 0d 00 | 00 9a 00 00 00 cc ff ff |racker..|........|
|00005890| ff 60 02 00 00 f8 ff ff | ff 38 60 00 37 0d 53 54 |.`......|.8`.7.ST|
|000058a0| 72 61 63 6b 65 72 0d 00 | 00 9a 00 00 00 98 ff ff |racker..|........|
|000058b0| ff 64 02 00 00 c8 ff ff | ff 38 61 00 07 6b 02 00 |.d......|.8a..k..|
|000058c0| 00 ff ff ff ff 1d 00 00 | 00 9a 00 00 00 98 ff ff |........|........|
|000058d0| ff 60 02 00 00 c4 ff ff | ff 38 61 00 37 6c 02 00 |.`......|.8a.7l..|
|000058e0| 00 ff ff ff ff 1d 00 00 | 00 9a 00 00 00 67 ff ff |........|.....g..|
|000058f0| ff 64 02 00 00 94 ff ff | ff 38 61 00 07 6d 02 00 |.d......|.8a..m..|
|00005900| 00 ff ff ff ff 1f 00 00 | 00 9a 00 00 00 66 ff ff |........|.....f..|
|00005910| ff 60 02 00 00 93 ff ff | ff 38 61 00 37 6e 02 00 |.`......|.8a.7n..|
|00005920| 00 ff ff ff ff 1f 00 00 | 00 9a 00 00 00 32 ff ff |........|.....2..|
|00005930| ff 64 02 00 00 63 ff ff | ff 38 61 00 07 6f 02 00 |.d...c..|.8a..o..|
|00005940| 00 ff ff ff ff 20 00 00 | 00 9a 00 00 00 31 ff ff |..... ..|.....1..|
|00005950| ff 60 02 00 00 5e ff ff | ff 38 61 00 32 70 02 00 |.`...^..|.8a.2p..|
|00005960| 00 ff ff ff ff 20 00 00 | 00 0e 00 00 00 34 ff ff |..... ..|.....4..|
|00005970| ff 9a 00 00 00 5c ff ff | ff 19 60 00 17 56 65 72 |.....\..|..`..Ver|
|00005980| 73 69 6f 6e 3a 0d 3e 0d | fe 9e 00 00 00 68 ff ff |sion:.>.|.....h..|
|00005990| ff 60 02 00 00 91 ff ff | ff 39 61 00 17 8e 02 00 |.`......|.9a.....|
|000059a0| 00 ff ff ff ff 1f 00 00 | 00 9e 00 00 00 d0 ff ff |........|........|
|000059b0| ff 60 02 00 00 f8 ff ff | ff 39 61 00 17 a7 02 00 |.`......|.9a.....|
|000059c0| 00 ff ff ff ff 1a 00 00 | 00 9e 00 00 00 9c ff ff |........|........|
|000059d0| ff 60 02 00 00 c4 ff ff | ff 39 61 00 17 b1 02 00 |.`......|.9a.....|
|000059e0| 00 ff ff ff ff 1d 00 00 | 00 9e 00 00 00 37 ff ff |........|.....7..|
|000059f0| ff 60 02 00 00 5c ff ff | ff 39 61 00 17 ca 02 00 |.`...\..|.9a.....|
|00005a00| 00 ff ff ff ff 20 00 00 | 00 0e 00 00 00 9c ff ff |..... ..|........|
|00005a10| ff 9a 00 00 00 c4 ff ff | ff 19 60 00 17 50 75 72 |........|..`..Pur|
|00005a20| 70 6f 73 65 3a 0d 3e 0d | fe 3e 00 00 00 d0 ff ff |pose:.>.|.>......|
|00005a30| ff 9a 00 00 00 f8 ff ff | ff 19 60 00 17 4e 61 6d |........|..`..Nam|
|00005a40| 65 3a 0d 6c 65 64 3e 0d | fe 0e 00 00 00 68 ff ff |e:.led>.|.....h..|
|00005a50| ff 9a 00 00 00 90 ff ff | ff 11 62 00 17 41 75 74 |........|..b..Aut|
|00005a60| 68 6f 72 3a 0d 0d 3e 0d | fe 41 62 6f 75 74 20 74 |hor:..>.|.About t|
|00005a70| 68 69 73 20 70 72 6f 67 | 72 61 6d 0d 0d 0d 0d 0d |his prog|ram.....|
|00005a80| 0d 52 6f 62 62 69 65 20 | 53 74 65 65 6c 65 20 28 |.Robbie |Steele (|
|00005a90| 52 69 73 63 4f 53 20 49 | 2f 46 61 63 65 29 0d 4a |RiscOS I|/Face).J|
|00005aa0| 75 6c 69 61 6e 20 52 6f | 62 62 69 6e 73 20 2d 20 |ulian Ro|bbins - |
|00005ab0| 54 65 63 73 6f 66 74 0d | 21 44 69 73 6b 43 6f 70 |Tecsoft.|!DiskCop|
|00005ac0| 79 0d 4d 61 6b 65 73 20 | 42 61 6b 75 70 73 20 6f |y.Makes |Bakups o|
|00005ad0| 66 20 41 6e 79 20 64 69 | 73 6b 0d 31 2e 30 30 20 |f Any di|sk.1.00 |
|00005ae0| 28 32 38 20 4d 61 72 20 | 27 39 32 29 0d 04 00 00 |(28 Mar |'92)....|
|00005af0| 00 88 01 00 00 4e 03 00 | 00 d4 03 00 00 00 00 00 |.....N..|........|
|00005b00| 00 08 00 00 00 28 07 00 | 00 12 00 05 87 07 02 07 |.....(..|........|
|00005b10| 01 03 01 0c 00 00 00 00 | 00 bc fd ff ff 4a 03 00 |........|.....J..|
|00005b20| 00 08 00 00 00 3d 00 00 | 00 00 30 00 00 01 00 00 |.....=..|..0.....|
|00005b30| 00 00 00 00 00 44 69 73 | 6b 20 43 6f 70 69 65 72 |.....Dis|k Copier|
|00005b40| 0d 16 00 00 00 02 02 00 | 00 b8 fd ff ff 4c 03 00 |........|.....L..|
|00005b50| 00 54 fe ff ff 04 60 00 | c7 20 3a 2d 0d 69 74 6c |.T....`.|. :-.itl|
|00005b60| 65 64 3e 0d 7f 68 00 00 | 00 c4 fd ff ff 90 01 00 |ed>..h..|........|
|00005b70| 00 10 fe ff ff 24 60 00 | b7 3c 55 6e 74 69 74 6c |.....$`.|.<Untitl|
|00005b80| 65 64 3e 0d 7f 8a 00 00 | 00 d0 fd ff ff 74 01 00 |ed>.....|.....t..|
|00005b90| 00 04 fe ff ff 3d 30 00 | a7 43 4f 50 59 0d 74 6c |.....=0.|.COPY.tl|
|00005ba0| 65 64 3e 0d 7f 0a 02 00 | 00 24 fe ff ff a6 02 00 |ed>.....|.$......|
|00005bb0| 00 44 fe ff ff 01 60 00 | c7 46 6f 72 6d 61 74 20 |.D....`.|.Format |
|00005bc0| 3a 2d 0d 0d 7f 12 00 00 | 00 d8 fe ff ff 5e 01 00 |:-......|.....^..|
|00005bd0| 00 08 ff ff ff 3d 91 00 | c7 18 03 00 00 ff ff ff |.....=..|........|
|00005be0| ff 15 00 00 00 0a 00 00 | 00 9c fe ff ff 16 01 00 |........|........|
|00005bf0| 00 bc fe ff ff 01 61 00 | c7 2d 03 00 00 ff ff ff |......a.|.-......|
|00005c00| ff 11 00 00 00 1a 01 00 | 00 94 fe ff ff 64 01 00 |........|.....d..|
|00005c10| 00 c8 fe ff ff 3d 61 00 | 07 3e 03 00 00 ff ff ff |.....=a.|.>......|
|00005c20| ff 05 00 00 00 e4 01 00 | 00 d8 fe ff ff 00 03 00 |........|........|
|00005c30| 00 08 ff ff ff 3d 91 00 | c7 3f 03 00 00 ff ff ff |.....=..|.?......|
|00005c40| ff 12 00 00 00 dc 01 00 | 00 98 fe ff ff e8 02 00 |........|........|
|00005c50| 00 b8 fe ff ff 01 61 00 | c7 51 03 00 00 ff ff ff |......a.|.Q......|
|00005c60| ff 11 00 00 00 0c 00 00 | 00 58 fe ff ff 48 02 00 |........|.X...H..|
|00005c70| 00 88 fe ff ff 3d 91 00 | c7 62 03 00 00 ff ff ff |.....=..|.b......|
|00005c80| ff 24 00 00 00 0a 00 00 | 00 24 fe ff ff c6 00 00 |.$......|.$......|
|00005c90| 00 44 fe ff ff 01 60 00 | c7 52 75 62 62 69 73 68 |.D....`.|.Rubbish|
|00005ca0| 65 64 3a 2d 0d 0e 02 00 | 00 e0 fd ff ff 68 02 00 |ed:-....|.....h..|
|00005cb0| 00 0c fe ff ff 3d 90 00 | c7 4c 0d 6e 74 69 74 6c |.....=..|.L.ntitl|
|00005cc0| 65 64 3e 0d 7f f0 02 00 | 00 94 fe ff ff 3a 03 00 |ed>.....|.....:..|
|00005cd0| 00 c8 fe ff ff 3d 61 00 | 07 86 03 00 00 ff ff ff |.....=a.|........|
|00005ce0| ff 05 00 00 00 ca 00 00 | 00 18 fe ff ff 14 01 00 |........|........|
|00005cf0| 00 4c fe ff ff 3d 61 00 | 07 87 03 00 00 ff ff ff |.L...=a.|........|
|00005d00| ff 05 00 00 00 7a 02 00 | 00 e0 fd ff ff d4 02 00 |.....z..|........|
|00005d10| 00 0c fe ff ff 3d 90 00 | c7 44 0d 6e 74 69 74 6c |.....=..|.D.ntitl|
|00005d20| 65 64 3e 0d 7f 06 00 00 | 00 a8 ff ff ff 42 03 00 |ed>.....|.....B..|
|00005d30| 00 d4 ff ff ff 01 61 00 | c7 88 03 00 00 ff ff ff |......a.|........|
|00005d40| ff 36 00 00 00 e6 02 00 | 00 e0 fd ff ff 40 03 00 |.6......|.....@..|
|00005d50| 00 0c fe ff ff 3d 90 00 | c7 45 0d 6e 74 69 74 6c |.....=..|.E.ntitl|
|00005d60| 65 64 3e 0d 7f 06 00 00 | 00 7c ff ff ff 42 03 00 |ed>.....|.|...B..|
|00005d70| 00 a8 ff ff ff 01 61 00 | c7 bc 03 00 00 ff ff ff |......a.|........|
|00005d80| ff 36 00 00 00 1e 00 00 | 00 40 ff ff ff 5a 03 00 |.6......|.@...Z..|
|00005d90| 00 6c ff ff ff 01 61 00 | c7 e8 03 00 00 ff ff ff |.l....a.|........|
|00005da0| ff 36 00 00 00 0a 00 00 | 00 14 ff ff ff 3a 03 00 |.6......|.....:..|
|00005db0| 00 44 ff ff ff 01 61 00 | c7 13 04 00 00 ff ff ff |.D....a.|........|
|00005dc0| ff 36 00 00 00 22 00 00 | 00 d4 ff ff ff 5e 03 00 |.6..."..|.....^..|
|00005dd0| 00 00 00 00 00 01 61 00 | c7 31 04 00 00 ff ff ff |......a.|.1......|
|00005de0| ff 36 00 00 00 04 00 00 | 00 10 ff ff ff 46 03 00 |.6......|.....F..|
|00005df0| 00 04 00 00 00 04 60 00 | c7 3c 55 6e 74 69 74 6c |......`.|.<Untitl|
|00005e00| 65 64 3e 0d 7f 43 68 65 | 63 6b 20 46 6f 72 6d 61 |ed>..Che|ck Forma|
|00005e10| 74 20 6f 66 20 44 69 73 | 6b 0d 46 6f 72 6d 61 74 |t of Dis|k.Format|
|00005e20| 20 6f 66 20 44 69 73 6b | 3a 2d 0d 0d 43 68 65 63 | of Disk|:-..Chec|
|00005e30| 6b 20 46 6f 72 20 44 65 | 66 65 63 74 73 0d 4e 6f |k For De|fects.No|
|00005e40| 2e 20 4f 66 20 44 65 66 | 65 63 74 73 3a 2d 0d 52 |. Of Def|ects:-.R|
|00005e50| 75 62 62 69 73 68 20 44 | 65 66 65 63 74 73 20 6f |ubbish D|efects o|
|00005e60| 6e 20 44 65 73 74 69 6e | 61 74 69 6f 6e 20 44 69 |n Destin|ation Di|
|00005e70| 73 6b 0d 0d 0d 73 6f 66 | 74 77 61 72 65 20 61 6e |sk...sof|tware an|
|00005e80| 64 20 74 68 65 6e 20 6f | 6e 6c 79 20 61 20 73 69 |d then o|nly a si|
|00005e90| 6e 67 6c 65 20 63 6f 70 | 79 20 6f 66 20 63 6f 70 |ngle cop|y of cop|
|00005ea0| 79 72 69 67 68 74 65 64 | 0d 73 6f 66 74 77 61 72 |yrighted|.softwar|
|00005eb0| 65 20 28 66 6f 72 20 79 | 6f 75 72 20 6f 77 6e 20 |e (for y|our own |
|00005ec0| 75 73 65 29 20 73 68 6f | 75 6c 64 20 62 65 20 6d |use) sho|uld be m|
|00005ed0| 61 64 65 2e 0d 54 68 65 | 20 41 75 74 68 6f 72 20 |ade..The| Author |
|00005ee0| 61 6e 64 20 44 69 73 74 | 72 69 62 75 74 6f 72 20 |and Dist|ributor |
|00005ef0| 63 61 6e 20 6e 6f 74 20 | 62 65 20 68 65 6c 64 0d |can not |be held.|
|00005f00| 72 65 73 70 6f 6e 73 69 | 62 6c 65 20 66 6f 72 20 |responsi|ble for |
|00005f10| 79 6f 75 72 20 61 63 74 | 69 6f 6e 73 2e 0d 54 68 |your act|ions..Th|
|00005f20| 69 73 20 70 72 6f 67 72 | 61 6d 20 73 68 6f 75 6c |is progr|am shoul|
|00005f30| 64 20 6f 6e 6c 79 20 62 | 65 20 75 73 65 64 20 74 |d only b|e used t|
|00005f40| 6f 20 63 6f 70 79 20 79 | 6f 75 72 20 6f 77 6e 0d |o copy y|our own.|
|00005f50| 98 01 00 00 28 02 00 00 | a4 03 00 00 3c 03 00 00 |....(...|....<...|
|00005f60| 00 00 00 00 00 00 00 00 | 34 07 00 00 12 00 03 87 |........|4.......|
|00005f70| 07 02 07 01 03 01 0c 00 | 00 00 00 00 00 fc ff ff |........|........|
|00005f80| 00 05 00 00 00 00 00 00 | 3d 01 00 00 00 30 00 00 |........|=....0..|
|00005f90| 01 00 00 00 00 00 00 00 | d8 01 00 00 ff ff ff ff |........|........|
|00005fa0| 0f 00 00 00 0c 00 00 00 | 1e 00 00 00 c0 ff ff ff |........|........|
|00005fb0| ea 01 00 00 f0 ff ff ff | 19 61 00 c7 e7 01 00 00 |........|.a......|
|00005fc0| ff ff ff ff 4d 00 00 00 | 20 00 00 00 88 ff ff ff |....M...| .......|
|00005fd0| ec 01 00 00 b8 ff ff ff | 19 61 00 c7 04 02 00 00 |........|.a......|
|00005fe0| ff ff ff ff 1d 00 00 00 | 20 00 00 00 50 ff ff ff |........| ...P...|
|00005ff0| 3c 01 00 00 80 ff ff ff | 19 61 00 c7 21 02 00 00 |<.......|.a..!...|
|00006000| ff ff ff ff 15 00 00 00 | 2c 00 00 00 04 ff ff ff |........|,.......|
|00006010| a4 00 00 00 38 ff ff ff | 38 60 00 07 32 30 30 6b |....8...|8`..200k|
|00006020| 0d 74 6c 65 64 3e 0d 7f | 30 00 00 00 0c ff ff ff |.tled>..|0.......|
|00006030| a8 00 00 00 40 ff ff ff | 38 60 00 47 32 30 30 6b |....@...|8`.G200k|
|00006040| 0d 74 6c 65 64 3e 0d 7f | 2e 00 00 00 08 ff ff ff |.tled>..|........|
|00006050| a6 00 00 00 3c ff ff ff | 39 60 00 17 32 30 30 6b |....<...|9`..200k|
|00006060| 0d 74 6c 65 64 3e 0d 7f | c6 00 00 00 04 ff ff ff |.tled>..|........|
|00006070| 3e 01 00 00 38 ff ff ff | 38 60 00 07 34 30 30 6b |>...8...|8`..400k|
|00006080| 0d 74 6c 65 64 3e 0d 7f | ca 00 00 00 0c ff ff ff |.tled>..|........|
|00006090| 42 01 00 00 40 ff ff ff | 38 60 00 44 34 30 30 6b |B...@...|8`.D400k|
|000060a0| 0d 74 6c 65 64 3e 0d 7f | c8 00 00 00 08 ff ff ff |.tled>..|........|
|000060b0| 40 01 00 00 3c ff ff ff | 39 60 00 17 34 30 30 6b |@...<...|9`..400k|
|000060c0| 0d 74 6c 65 64 3e 0d 7f | 64 01 00 00 04 ff ff ff |.tled>..|d.......|
|000060d0| dc 01 00 00 38 ff ff ff | 38 60 00 07 38 30 30 6b |....8...|8`..800k|
|000060e0| 0d 74 6c 65 64 3e 0d 7f | 66 01 00 00 0c ff ff ff |.tled>..|f.......|
|000060f0| de 01 00 00 40 ff ff ff | 38 60 00 47 38 30 30 6b |....@...|8`.G800k|
|00006100| 0d 74 6c 65 64 3e 0d 7f | 64 01 00 00 08 ff ff ff |.tled>..|d.......|
|00006110| dc 01 00 00 3c ff ff ff | 39 60 00 17 38 30 30 6b |....<...|9`..800k|
|00006120| 0d 74 6c 65 64 3e 0d 7f | 42 75 66 66 65 72 20 53 |.tled>..|Buffer S|
|00006130| 69 7a 65 20 3a 2d 0d 48 | 6f 77 20 6d 61 6e 79 20 |ize :-.H|ow many |
|00006140| 6b 69 6c 6f 62 79 74 65 | 73 20 28 6b 29 20 77 6f |kilobyte|s (k) wo|
|00006150| 75 6c 64 0d 79 6f 75 20 | 6c 69 6b 65 20 74 6f 20 |uld.you |like to |
|00006160| 62 65 20 64 65 73 69 67 | 6e 61 74 65 64 20 74 6f |be desig|nated to|
|00006170| 0d 74 68 65 20 63 6f 70 | 79 20 62 75 66 66 65 72 |.the cop|y buffer|
|00006180| 3a 2d 0d                |                         |:-.     |        |
+--------+-------------------------+-------------------------+--------+--------+