home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Amiga Disk Format (OFS)
(archive/adfOFS).
You can browse this item here: in.adf
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 4f 53 00 d5 5e 41 6f | 00 00 03 70 43 fa 02 a5 |DOS..^Ao|...pC...|
|00000010| 4e ae ff a0 20 40 20 68 | 00 16 70 00 48 e7 ff fe |N... @ h|..p.H...|
|00000020| 41 fa 02 86 43 fa 02 7a | 22 88 20 3c 00 00 2e e0 |A...C..z|". <....|
|00000030| 22 3c 00 01 00 02 2c 78 | 00 04 4e ae ff 3a 49 fa |"<....,x|..N..:I.|
|00000040| 02 80 28 80 67 00 02 02 | 06 80 00 00 05 dc 29 40 |..(.g...|......)@|
|00000050| 00 04 4e ae ff 7c 22 54 | 32 fc 00 e0 20 2c 00 04 |..N..|"T|2... ,..|
|00000060| 48 40 32 c0 32 fc 00 e2 | 48 40 32 c0 22 fc 01 80 |H@2.2...|H@2."...|
|00000070| 00 00 22 fc 01 82 0f ff | 30 3c 00 3c 32 3c 00 10 |..".....|0<.<2<..|
|00000080| 61 00 01 de 30 3c 00 87 | 32 3c 01 10 61 00 01 d2 |a...0<..|2<..a...|
|00000090| 30 3c 00 d2 32 3c 01 00 | 61 00 01 c6 22 fc ff ff |0<..2<..|a..."...|
|000000a0| ff fe 4b f9 00 df f0 00 | 3b 7c 03 e0 00 96 2b 54 |..K.....|;|....+T|
|000000b0| 00 80 42 6d 00 88 3b 7c | 29 81 00 8e 3b 7c 29 c1 |..Bm..;||)...;|).|
|000000c0| 00 90 33 fc 00 38 00 00 | 00 92 33 fc 00 d0 00 00 |..3..8..|..3.....|
|000000d0| 00 94 42 6d 01 02 42 6d | 01 04 42 6d 01 08 3b 7c |..Bm..Bm|..Bm..;||
|000000e0| 10 00 01 00 3b 7c 83 80 | 00 96 43 fa 01 62 2c 78 |....;|..|..C..b,x|
|000000f0| 00 04 4e ae fe 68 2c 40 | 41 fa 01 a6 4e ae ff b8 |..N..h,@|A...N...|
|00000100| 29 40 00 08 26 6c 00 04 | 70 00 d7 fc 00 00 0a 32 |)@..&l..|p......2|
|00000110| 4b fa 02 9d 24 6c 00 08 | 24 6a 00 22 10 1d 67 00 |K...$l..|$j."..g.|
|00000120| 00 4a b0 3c 00 7f 63 00 | 00 06 04 00 00 20 04 00 |.J.<..c.|..... ..|
|00000130| 00 20 d5 c0 16 92 17 6a | 00 c0 00 50 17 6a 01 80 |. .....j|...P.j..|
|00000140| 00 a0 17 6a 02 40 00 f0 | 17 6a 03 00 01 40 17 6a |...j.@..|.j...@.j|
|00000150| 03 c0 01 90 17 6a 04 80 | 01 e0 17 6a 05 40 02 30 |.....j..|...j.@.0|
|00000160| d7 fc 00 00 00 01 60 00 | ff ac 4b fa 01 60 7a 00 |......`.|..K..`z.|
|00000170| 02 85 00 00 00 07 66 00 | 00 32 24 6c 00 08 24 6a |......f.|.2$l..$j|
|00000180| 00 22 d5 fc 00 00 05 40 | 70 00 10 1d 66 00 00 0a |.".....@|p...f...|
|00000190| 4b fa 01 3a 60 00 ff f4 | b0 3c 00 7f 63 00 00 06 |K..:`...|.<..c...|
|000001a0| 04 00 00 20 04 00 00 20 | d5 c0 00 05 00 08 20 6c |... ... |...... l|
|000001b0| 00 04 d1 fc 00 00 18 88 | 22 3c 00 00 00 07 22 4a |........|"<...."J|
|000001c0| 30 39 00 df f0 06 e0 48 | b0 3c 00 50 62 f2 20 3c |09.....H|.<.Pb. <|
|000001d0| 00 00 00 13 74 00 14 11 | e3 52 eb 72 93 fc 00 00 |....t...|.R.r....|
|000001e0| 00 c0 e5 e0 51 c8 ff fc | 91 fc 00 00 00 28 51 c9 |....Q...|.....(Q.|
|000001f0| ff de 20 3c 00 00 0e 00 | 51 c8 ff fe 52 45 08 39 |.. <....|Q...RE.9|
|00000200| 00 06 00 bf e0 01 66 00 | ff 68 43 fa 00 42 2c 78 |......f.|.hC..B,x|
|00000210| 00 04 4e ae fe 68 20 40 | 4b f9 00 df f0 00 2b 68 |..N..h @|K.....+h|
|00000220| 00 26 00 80 42 79 00 00 | 00 88 3b 7c 80 60 00 96 |.&..By..|..;|.`..|
|00000230| 22 54 20 3c 00 00 2e e0 | 2c 78 00 04 4e ae ff 2e |"T <....|,x..N...|
|00000240| 2c 78 00 04 4e ae ff 76 | 4c df 7f ff 4e 75 67 72 |,x..N..v|L...Nugr|
|00000250| 61 70 68 69 63 73 2e 6c | 69 62 72 61 72 79 00 00 |aphics.l|ibrary..|
|00000260| 34 3c 00 00 26 3c 00 00 | 00 0e e1 48 00 00 00 0f |4<..&<..|...H....|
|00000270| d4 41 32 c0 22 fc ff fe | 01 80 32 c2 06 40 01 00 |.A2."...|..2..@..|
|00000280| 51 cb ff ee 26 3c 00 00 | 00 0e 94 41 32 c0 22 fc |Q...&<..|...A2.".|
|00000290| ff fe 01 80 32 c2 06 40 | 01 00 51 cb ff ee 4e 75 |....2..@|..Q...Nu|
|000002a0| 00 02 e3 60 00 08 00 01 | 74 6f 70 61 7a 2e 66 6f |...`....|topaz.fo|
|000002b0| 6e 74 00 64 6f 73 2e 6c | 69 62 72 61 72 79 00 00 |nt.dos.l|ibrary..|
|000002c0| 00 03 31 30 00 03 37 0c | 00 00 24 00 20 50 6c 65 |..10..7.|..$. Ple|
|000002d0| 61 73 65 20 6c 6f 61 64 | 20 6f 6e 20 79 6f 75 72 |ase load| on your|
|000002e0| 20 57 6f 72 6b 62 65 6e | 63 68 20 2e 2e 2e 2e 2e | Workben|ch .....|
|000002f0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |........|........|
|00000300| 2e 20 20 20 20 20 00 20 | 20 20 20 20 20 20 20 20 |. . | |
|00000310| 20 20 20 20 20 20 20 20 | 00 00 00 00 00 00 00 00 | |........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 48 |........|.......H|
|000003b0| 61 72 64 20 44 69 73 6b | 20 55 74 69 6c 73 00 20 |ard Disk| Utils. |
|000003c0| 20 20 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 | ......|........|
|000003d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 08 00 00 04 15 | 00 00 00 14 00 00 01 e8 |........|........|
|00000410| 00 00 00 03 8d 74 3f c6 | 65 2c 46 41 4c 53 45 29 |.....t?.|e,FALSE)|
|00000420| 20 54 48 45 4e 20 45 4e | 44 3b 0a 20 20 20 20 52 | THEN EN|D;. R|
|00000430| 45 54 55 52 4e 20 6f 6b | 3b 0a 20 20 45 4e 44 20 |ETURN ok|;. END |
|00000440| 57 72 69 74 65 4c 61 73 | 74 3b 0a 0a 28 2a 2d 2d |WriteLas|t;..(*--|
|00000450| 2d 2d 2d 2d 20 20 57 72 | 69 74 65 20 46 69 6c 65 |---- Wr|ite File|
|00000460| 20 74 6f 20 54 72 61 63 | 6b 73 3a 20 20 2d 2d 2d | to Trac|ks: ---|
|00000470| 2d 2d 2d 2a 29 0a 0a 20 | 20 50 52 4f 43 45 44 55 |---*).. | PROCEDU|
|00000480| 52 45 20 57 72 69 74 65 | 46 69 6c 65 28 46 69 6c |RE Write|File(Fil|
|00000490| 65 3a 20 46 69 6c 65 48 | 61 6e 64 6c 65 50 74 72 |e: FileH|andlePtr|
|000004a0| 3b 20 53 69 7a 65 3a 20 | 4c 4f 4e 47 43 41 52 44 |; Size: |LONGCARD|
|000004b0| 29 3a 20 52 65 73 3b 0a | 0a 20 20 56 41 52 0a 20 |): Res;.|. VAR. |
|000004c0| 20 20 20 65 72 72 3a 20 | 42 79 74 65 3b 0a 20 20 | err: |Byte;. |
|000004d0| 20 20 6c 65 6e 3a 20 4c | 4f 4e 47 49 4e 54 3b 0a | len: L|ONGINT;.|
|000004e0| 0a 20 20 42 45 47 49 4e | 0a 20 20 20 20 53 69 7a |. BEGIN|. Siz|
|000004f0| 65 20 3a 3d 20 28 28 53 | 69 7a 65 2b 33 29 20 44 |e := ((S|ize+3) D|
|00000500| 49 56 20 34 29 20 2a 20 | 34 3b 20 20 20 20 20 20 |IV 4) * |4; |
|00000510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000520| 20 20 28 2a 20 61 64 64 | 20 50 61 64 20 62 79 74 | (* add| Pad byt|
|00000530| 65 73 20 2a 29 0a 20 20 | 20 20 57 48 49 4c 45 20 |es *). | WHILE |
|00000540| 53 69 7a 65 3e 3d 28 54 | 72 61 63 6b 53 69 7a 65 |Size>=(T|rackSize|
|00000550| 2d 54 72 61 63 6b 42 75 | 66 66 65 72 43 6e 74 29 |-TrackBu|fferCnt)|
|00000560| 20 44 4f 0a 20 20 20 20 | 20 20 6c 65 6e 20 3a 3d | DO. | len :=|
|00000570| 20 52 65 61 64 28 46 69 | 6c 65 2c 41 44 44 52 45 | Read(Fi|le,ADDRE|
|00000580| 53 53 28 4c 4f 4e 47 43 | 41 52 44 28 54 72 61 63 |SS(LONGC|ARD(Trac|
|00000590| 6b 42 75 66 66 65 72 29 | 2b 54 72 61 63 6b 42 75 |kBuffer)|+TrackBu|
|000005a0| 66 66 65 72 43 6e 74 29 | 2c 0a 20 20 20 20 20 20 |fferCnt)|,. |
|000005b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 54 72 61 63 | | Trac|
|000005c0| 6b 53 69 7a 65 2d 54 72 | 61 63 6b 42 75 66 66 65 |kSize-Tr|ackBuffe|
|000005d0| 72 43 6e 74 29 3b 0a 20 | 20 20 20 20 20 44 45 43 |rCnt);. | DEC|
|000005e0| 28 53 69 7a 65 2c 54 72 | 61 63 6b 53 69 7a 65 2d |(Size,Tr|ackSize-|
|000005f0| 54 72 61 63 6b 42 75 66 | 66 65 72 43 6e 74 29 3b |TrackBuf|ferCnt);|
|00000600| 00 00 00 08 00 00 04 15 | 00 00 00 15 00 00 01 e8 |........|........|
|00000610| 00 00 00 04 3d 4c ec e2 | 0a 20 20 20 20 20 20 54 |....=L..|. T|
|00000620| 72 61 63 6b 42 75 66 66 | 65 72 43 6e 74 20 3a 3d |rackBuff|erCnt :=|
|00000630| 20 30 3b 0a 20 20 20 20 | 20 20 4c 4f 4f 50 0a 20 | 0;. | LOOP. |
|00000640| 20 20 20 20 20 20 20 54 | 79 70 65 28 35 30 30 2c | T|ype(500,|
|00000650| 37 37 2c 22 20 77 72 69 | 74 69 6e 67 20 22 29 3b |77," wri|ting ");|
|00000660| 0a 20 20 20 20 20 20 20 | 20 65 72 72 20 3a 3d 20 |. | err := |
|00000670| 46 6f 72 6d 61 74 54 72 | 61 63 6b 28 44 72 69 76 |FormatTr|ack(Driv|
|00000680| 65 2c 41 63 74 54 72 61 | 63 6b 2c 54 72 61 63 6b |e,ActTra|ck,Track|
|00000690| 42 75 66 66 65 72 2c 31 | 2c 44 69 73 6b 43 68 61 |Buffer,1|,DiskCha|
|000006a0| 6e 67 65 29 3b 0a 20 20 | 20 20 20 20 20 20 49 46 |nge);. | IF|
|000006b0| 20 65 72 72 3d 30 20 54 | 48 45 4e 0a 20 20 20 20 | err=0 T|HEN. |
|000006c0| 20 20 20 20 20 20 54 79 | 70 65 28 35 30 30 2c 37 | Ty|pe(500,7|
|000006d0| 37 2c 22 76 65 72 69 66 | 79 69 6e 67 22 29 3b 0a |7,"verif|ying");.|
|000006e0| 20 20 20 20 20 20 20 20 | 20 20 65 72 72 20 3a 3d | | err :=|
|000006f0| 20 52 65 61 64 43 79 63 | 53 65 63 28 44 72 69 76 | ReadCyc|Sec(Driv|
|00000700| 65 2c 41 63 74 54 72 61 | 63 6b 2c 30 2c 30 2c 54 |e,ActTra|ck,0,0,T|
|00000710| 72 61 63 6b 42 75 66 66 | 65 72 2c 32 32 2c 44 69 |rackBuff|er,22,Di|
|00000720| 73 6b 43 68 61 6e 67 65 | 29 3b 0a 20 20 20 20 20 |skChange|);. |
|00000730| 20 20 20 20 20 49 46 20 | 65 72 72 3d 30 20 54 48 | IF |err=0 TH|
|00000740| 45 4e 20 45 58 49 54 20 | 45 4e 44 3b 0a 20 20 20 |EN EXIT |END;. |
|00000750| 20 20 20 20 20 45 4e 44 | 3b 0a 20 20 20 20 20 20 | END|;. |
|00000760| 20 20 43 41 53 45 20 45 | 72 72 6f 72 28 44 72 69 | CASE E|rror(Dri|
|00000770| 76 65 2c 65 72 72 2c 46 | 41 4c 53 45 29 20 4f 46 |ve,err,F|ALSE) OF|
|00000780| 0a 20 20 20 20 20 20 20 | 20 52 65 74 72 79 3a 0a |. | Retry:.|
|00000790| 20 20 20 20 20 20 20 20 | 20 20 44 69 73 6b 43 68 | | DiskCh|
|000007a0| 61 6e 67 65 20 3a 3d 20 | 47 65 74 44 69 73 6b 43 |ange := |GetDiskC|
|000007b0| 68 61 6e 67 65 28 44 72 | 69 76 65 29 3b 20 7c 0a |hange(Dr|ive); |.|
|000007c0| 20 20 20 20 20 20 20 20 | 43 6f 6e 74 69 6e 75 65 | |Continue|
|000007d0| 3a 0a 20 20 20 20 20 20 | 20 20 20 20 49 46 20 4e |:. | IF N|
|000007e0| 65 78 74 54 72 61 63 6b | 28 29 3d 63 61 6e 63 65 |extTrack|()=cance|
|000007f0| 6c 20 54 48 45 4e 20 52 | 45 54 55 52 4e 20 63 61 |l THEN R|ETURN ca|
|00000800| 00 00 00 08 00 00 04 15 | 00 00 00 16 00 00 01 e8 |........|........|
|00000810| 00 00 00 05 7b e5 42 c9 | 6e 63 65 6c 20 45 4e 44 |....{.B.|ncel END|
|00000820| 3b 0a 20 20 20 20 20 20 | 20 20 20 20 52 45 54 55 |;. | RETU|
|00000830| 52 4e 20 63 6f 6e 74 69 | 6e 75 65 3b 20 7c 0a 20 |RN conti|nue; |. |
|00000840| 20 20 20 20 20 20 20 43 | 61 6e 63 65 6c 3a 0a 20 | C|ancel:. |
|00000850| 20 20 20 20 20 20 20 20 | 20 52 45 54 55 52 4e 20 | | RETURN |
|00000860| 63 61 6e 63 65 6c 3b 20 | 7c 0a 20 20 20 20 20 20 |cancel; ||. |
|00000870| 20 20 45 4c 53 45 0a 20 | 20 20 20 20 20 20 20 45 | ELSE. | E|
|00000880| 4e 44 3b 0a 20 20 20 20 | 20 20 45 4e 44 3b 0a 20 |ND;. | END;. |
|00000890| 20 20 20 20 20 49 46 20 | 4e 65 78 74 54 72 61 63 | IF |NextTrac|
|000008a0| 6b 28 29 3d 63 61 6e 63 | 65 6c 20 54 48 45 4e 20 |k()=canc|el THEN |
|000008b0| 52 45 54 55 52 4e 20 63 | 61 6e 63 65 6c 20 45 4e |RETURN c|ancel EN|
|000008c0| 44 3b 0a 20 20 20 20 45 | 4e 44 3b 0a 20 20 20 20 |D;. E|ND;. |
|000008d0| 49 46 20 53 69 7a 65 23 | 30 20 54 48 45 4e 0a 20 |IF Size#|0 THEN. |
|000008e0| 20 20 20 20 20 6c 65 6e | 20 3a 3d 20 52 65 61 64 | len| := Read|
|000008f0| 28 46 69 6c 65 2c 41 44 | 44 52 45 53 53 28 4c 4f |(File,AD|DRESS(LO|
|00000900| 4e 47 43 41 52 44 28 54 | 72 61 63 6b 42 75 66 66 |NGCARD(T|rackBuff|
|00000910| 65 72 29 2b 54 72 61 63 | 6b 42 75 66 66 65 72 43 |er)+Trac|kBufferC|
|00000920| 6e 74 29 2c 53 69 7a 65 | 29 3b 0a 20 20 20 20 20 |nt),Size|);. |
|00000930| 20 49 4e 43 28 54 72 61 | 63 6b 42 75 66 66 65 72 | INC(Tra|ckBuffer|
|00000940| 43 6e 74 2c 53 69 7a 65 | 29 3b 0a 20 20 20 20 45 |Cnt,Size|);. E|
|00000950| 4e 44 3b 0a 20 20 20 20 | 52 45 54 55 52 4e 20 6f |ND;. |RETURN o|
|00000960| 6b 3b 0a 20 20 45 4e 44 | 20 57 72 69 74 65 46 69 |k;. END| WriteFi|
|00000970| 6c 65 3b 0a 0a 28 2a 2d | 2d 2d 2d 2d 2d 20 20 52 |le;..(*-|----- R|
|00000980| 65 6b 75 72 73 69 76 20 | 62 61 63 6b 75 70 20 70 |ekursiv |backup p|
|00000990| 72 6f 63 65 64 75 72 65 | 3a 20 20 2d 2d 2d 2d 2d |rocedure|: -----|
|000009a0| 2d 2a 29 0a 0a 20 20 50 | 52 4f 43 45 44 55 52 45 |-*).. P|ROCEDURE|
|000009b0| 20 44 6f 42 61 63 6b 55 | 70 28 6c 6f 63 6b 3a 20 | DoBackU|p(lock: |
|000009c0| 46 69 6c 65 4c 6f 63 6b | 50 74 72 29 3a 20 52 65 |FileLock|Ptr): Re|
|000009d0| 73 3b 0a 0a 20 20 56 41 | 52 0a 20 20 20 20 46 69 |s;.. VA|R. Fi|
|000009e0| 6c 65 49 6e 66 6f 3a 20 | 46 69 6c 65 49 6e 66 6f |leInfo: |FileInfo|
|000009f0| 42 6c 6f 63 6b 50 74 72 | 3b 0a 20 20 20 20 44 6f |BlockPtr|;. Do|
|00000a00| 00 00 00 08 00 00 04 15 | 00 00 00 17 00 00 01 e8 |........|........|
|00000a10| 00 00 00 06 45 b4 2a 2e | 73 45 72 72 3a 20 4c 4f |....E.*.|sErr: LO|
|00000a20| 4e 47 49 4e 54 3b 0a 20 | 20 20 20 72 65 73 3a 20 |NGINT;. | res: |
|00000a30| 52 65 73 3b 0a 20 20 20 | 20 4c 6f 63 6b 32 2c 6f |Res;. | Lock2,o|
|00000a40| 6c 64 3a 20 46 69 6c 65 | 4c 6f 63 6b 50 74 72 3b |ld: File|LockPtr;|
|00000a50| 0a 20 20 20 20 6c 3a 20 | 49 4e 54 45 47 45 52 3b |. l: |INTEGER;|
|00000a60| 0a 20 20 20 20 63 3a 20 | 43 48 41 52 3b 0a 20 20 |. c: |CHAR;. |
|00000a70| 20 20 4d 79 4d 73 67 50 | 74 72 3a 20 49 6e 74 75 | MyMsgP|tr: Intu|
|00000a80| 69 4d 65 73 73 61 67 65 | 50 74 72 3b 0a 0a 20 20 |iMessage|Ptr;.. |
|00000a90| 42 45 47 49 4e 0a 20 20 | 20 20 72 65 73 20 3a 3d |BEGIN. | res :=|
|00000aa0| 20 6f 6b 3b 0a 20 20 20 | 20 54 79 70 65 50 61 74 | ok;. | TypePat|
|00000ab0| 68 28 4d 79 46 69 6c 65 | 49 6e 66 6f 2e 70 61 74 |h(MyFile|Info.pat|
|00000ac0| 68 29 3b 0a 20 20 20 20 | 4c 4f 4f 50 0a 20 20 20 |h);. |LOOP. |
|00000ad0| 20 20 20 41 6c 6c 6f 63 | 4d 65 6d 28 46 69 6c 65 | Alloc|Mem(File|
|00000ae0| 49 6e 66 6f 2c 53 49 5a | 45 28 46 69 6c 65 49 6e |Info,SIZ|E(FileIn|
|00000af0| 66 6f 5e 29 2c 46 41 4c | 53 45 29 3b 0a 20 20 20 |fo^),FAL|SE);. |
|00000b00| 20 20 20 49 46 20 46 69 | 6c 65 49 6e 66 6f 23 4e | IF Fi|leInfo#N|
|00000b10| 49 4c 20 54 48 45 4e 20 | 45 58 49 54 20 45 4e 44 |IL THEN |EXIT END|
|00000b20| 3b 0a 20 20 20 20 20 20 | 49 46 20 48 44 52 65 71 |;. |IF HDReq|
|00000b30| 75 65 73 74 28 41 44 52 | 28 22 4f 75 74 20 6f 66 |uest(ADR|("Out of|
|00000b40| 20 6d 65 6d 6f 72 79 22 | 29 2c 33 2c 32 2c 54 52 | memory"|),3,2,TR|
|00000b50| 55 45 29 23 52 65 74 72 | 79 20 54 48 45 4e 20 45 |UE)#Retr|y THEN E|
|00000b60| 58 49 54 20 45 4e 44 3b | 0a 20 20 20 20 45 4e 44 |XIT END;|. END|
|00000b70| 3b 0a 20 20 20 20 49 46 | 20 45 78 61 6d 69 6e 65 |;. IF| Examine|
|00000b80| 28 6c 6f 63 6b 2c 46 69 | 6c 65 49 6e 66 6f 29 23 |(lock,Fi|leInfo)#|
|00000b90| 30 20 54 48 45 4e 0a 20 | 20 20 20 20 20 49 46 20 |0 THEN. | IF |
|00000ba0| 46 69 6c 65 49 6e 66 6f | 5e 2e 64 69 72 45 6e 74 |FileInfo|^.dirEnt|
|00000bb0| 72 79 54 79 70 65 3e 30 | 20 54 48 45 4e 0a 20 20 |ryType>0| THEN. |
|00000bc0| 20 20 20 20 20 20 6f 6c | 64 20 3a 3d 20 43 75 72 | ol|d := Cur|
|00000bd0| 72 65 6e 74 44 69 72 28 | 6c 6f 63 6b 29 3b 0a 20 |rentDir(|lock);. |
|00000be0| 20 20 20 20 20 20 20 57 | 49 54 48 20 46 69 6c 65 | W|ITH File|
|00000bf0| 49 6e 66 6f 5e 20 44 4f | 0a 20 20 20 20 20 20 20 |Info^ DO|. |
|00000c00| 00 00 00 08 00 00 04 15 | 00 00 00 18 00 00 01 e8 |........|........|
|00000c10| 00 00 00 07 57 b0 4e 5e | 20 20 20 57 49 54 48 20 |....W.N^| WITH |
|00000c20| 4d 79 46 69 6c 65 49 6e | 66 6f 20 44 4f 0a 20 20 |MyFileIn|fo DO. |
|00000c30| 20 20 20 20 20 20 20 20 | 20 20 57 48 49 4c 45 20 | | WHILE |
|00000c40| 28 45 78 4e 65 78 74 28 | 6c 6f 63 6b 2c 46 69 6c |(ExNext(|lock,Fil|
|00000c50| 65 49 6e 66 6f 29 23 30 | 29 20 41 4e 44 20 28 72 |eInfo)#0|) AND (r|
|00000c60| 65 73 23 63 61 6e 63 65 | 6c 29 20 44 4f 0a 20 20 |es#cance|l) DO. |
|00000c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 49 46 20 64 | | IF d|
|00000c80| 69 72 45 6e 74 72 79 54 | 79 70 65 3e 30 20 54 48 |irEntryT|ype>0 TH|
|00000c90| 45 4e 0a 28 2a 2d 2d 2d | 2d 2d 2d 20 20 44 69 72 |EN.(*---|--- Dir|
|00000ca0| 65 63 74 6f 72 79 3a 20 | 20 2d 2d 2d 2d 2d 2d 2a |ectory: | ------*|
|00000cb0| 29 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |). | |
|00000cc0| 20 20 4c 4f 4f 50 0a 20 | 20 20 20 20 20 20 20 20 | LOOP. | |
|00000cd0| 20 20 20 20 20 20 20 20 | 20 4c 6f 63 6b 32 20 3a | | Lock2 :|
|00000ce0| 3d 20 4c 6f 63 6b 28 41 | 44 52 28 66 69 6c 65 4e |= Lock(A|DR(fileN|
|00000cf0| 61 6d 65 29 2c 73 68 61 | 72 65 64 4c 6f 63 6b 29 |ame),sha|redLock)|
|00000d00| 3b 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |;. | |
|00000d10| 20 20 20 20 49 46 20 4c | 6f 63 6b 32 23 4e 49 4c | IF L|ock2#NIL|
|00000d20| 20 54 48 45 4e 20 45 58 | 49 54 20 45 4e 44 3b 0a | THEN EX|IT END;.|
|00000d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000d40| 20 20 52 65 71 53 74 72 | 20 3a 3d 20 22 43 61 6e | ReqStr| := "Can|
|00000d50| 27 74 20 4c 6f 63 6b 20 | 22 3b 0a 20 20 20 20 20 |'t Lock |";. |
|00000d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 6e 73 | | Ins|
|00000d70| 65 72 74 28 52 65 71 53 | 74 72 2c 6c 61 73 74 2c |ert(ReqS|tr,last,|
|00000d80| 66 69 6c 65 4e 61 6d 65 | 29 3b 0a 20 20 20 20 20 |fileName|);. |
|00000d90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 46 20 | | IF |
|00000da0| 48 44 52 65 71 75 65 73 | 74 28 41 44 52 28 52 65 |HDReques|t(ADR(Re|
|00000db0| 71 53 74 72 29 2c 33 2c | 32 2c 54 52 55 45 29 3d |qStr),3,|2,TRUE)=|
|00000dc0| 43 61 6e 63 65 6c 20 54 | 48 45 4e 0a 20 20 20 20 |Cancel T|HEN. |
|00000dd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000de0| 72 65 73 3a 3d 20 63 61 | 6e 63 65 6c 3b 0a 20 20 |res:= ca|ncel;. |
|00000df0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000e00| 00 00 00 08 00 00 04 15 | 00 00 00 19 00 00 01 e8 |........|........|
|00000e10| 00 00 00 08 b2 97 ec ad | 20 20 45 58 49 54 3b 0a |........| EXIT;.|
|00000e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000e30| 20 20 45 4e 44 3b 0a 20 | 20 20 20 20 20 20 20 20 | END;. | |
|00000e40| 20 20 20 20 20 20 20 45 | 4e 44 3b 0a 20 20 20 20 | E|ND;. |
|00000e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 49 46 20 4c | | IF L|
|00000e60| 6f 63 6b 32 23 30 20 54 | 48 45 4e 0a 20 20 20 20 |ock2#0 T|HEN. |
|00000e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 6c 20 | | l |
|00000e80| 3a 3d 20 4c 65 6e 67 74 | 68 28 70 61 74 68 29 3b |:= Lengt|h(path);|
|00000e90| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000ea0| 20 20 20 49 46 20 6c 3e | 32 35 33 20 54 48 45 4e | IF l>|253 THEN|
|00000eb0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000ec0| 20 20 20 20 20 57 48 49 | 4c 45 20 48 44 52 65 71 | WHI|LE HDReq|
|00000ed0| 75 65 73 74 28 41 44 52 | 28 22 50 61 74 68 20 74 |uest(ADR|("Path t|
|00000ee0| 6f 6f 6f 20 6c 6f 6f 6f | 6e 67 21 21 21 22 29 2c |ooo looo|ng!!!"),|
|00000ef0| 33 2c 32 2c 54 52 55 45 | 29 23 43 61 6e 63 65 6c |3,2,TRUE|)#Cancel|
|00000f00| 20 44 4f 20 45 4e 44 3b | 0a 20 20 20 20 20 20 20 | DO END;|. |
|00000f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 72 65 73 | | res|
|00000f20| 20 3a 3d 20 63 61 6e 63 | 65 6c 3b 0a 20 20 20 20 | := canc|el;. |
|00000f30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 45 4c | | EL|
|00000f40| 53 45 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |SE. | |
|00000f50| 20 20 20 20 20 20 20 49 | 46 20 6c 23 30 20 54 48 | I|F l#0 TH|
|00000f60| 45 4e 20 70 61 74 68 5b | 6c 5d 20 3a 3d 20 22 2f |EN path[|l] := "/|
|00000f70| 22 3b 20 70 61 74 68 5b | 6c 2b 31 5d 20 3a 3d 20 |"; path[|l+1] := |
|00000f80| 30 43 20 45 4e 44 3b 0a | 20 20 20 20 20 20 20 20 |0C END;.| |
|00000f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 49 6e 73 65 | | Inse|
|00000fa0| 72 74 28 70 61 74 68 2c | 6c 61 73 74 2c 66 69 6c |rt(path,|last,fil|
|00000fb0| 65 4e 61 6d 65 29 3b 0a | 20 20 20 20 20 20 20 20 |eName);.| |
|00000fc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 72 65 73 20 | | res |
|00000fd0| 3a 3d 20 44 6f 42 61 63 | 6b 55 70 28 4c 6f 63 6b |:= DoBac|kUp(Lock|
|00000fe0| 32 29 3b 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |2);. | |
|00000ff0| 20 20 20 20 20 20 20 20 | 70 61 74 68 5b 6c 5d 20 | |path[l] |
|00001000| 00 00 00 08 00 00 04 15 | 00 00 00 1a 00 00 01 e8 |........|........|
|00001010| 00 00 00 09 4a aa 24 06 | 3a 3d 20 30 43 3b 0a 20 |....J.$.|:= 0C;. |
|00001020| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001030| 20 20 20 54 79 70 65 50 | 61 74 68 28 70 61 74 68 | TypeP|ath(path|
|00001040| 29 3b 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |);. | |
|00001050| 20 20 20 20 20 45 4e 44 | 3b 0a 20 20 20 20 20 20 | END|;. |
|00001060| 20 20 20 20 20 20 20 20 | 20 20 20 20 55 6e 4c 6f | | UnLo|
|00001070| 63 6b 28 4c 6f 63 6b 32 | 29 3b 0a 20 20 20 20 20 |ck(Lock2|);. |
|00001080| 20 20 20 20 20 20 20 20 | 20 20 20 45 4e 44 3b 0a | | END;.|
|00001090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 45 4c | | EL|
|000010a0| 53 45 0a 28 2a 2d 2d 2d | 2d 2d 2d 20 20 46 69 6c |SE.(*---|--- Fil|
|000010b0| 65 3a 20 20 2d 2d 2d 2d | 2d 2d 2a 29 0a 20 20 20 |e: ----|--*). |
|000010c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 46 20 | | IF |
|000010d0| 4e 4f 54 28 61 72 63 68 | 69 76 65 20 20 49 4e 20 |NOT(arch|ive IN |
|000010e0| 70 72 6f 74 65 63 74 69 | 6f 6e 29 20 4f 52 0a 20 |protecti|on) OR. |
|000010f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001100| 20 20 4e 4f 54 28 73 65 | 6c 65 63 74 65 64 20 49 | NOT(se|lected I|
|00001110| 4e 20 47 61 64 67 65 74 | 73 5b 52 65 67 61 72 64 |N Gadget|s[Regard|
|00001120| 41 72 63 68 69 76 65 64 | 47 61 64 67 5d 2e 66 6c |Archived|Gadg].fl|
|00001130| 61 67 73 29 20 54 48 45 | 4e 0a 20 20 20 20 20 20 |ags) THE|N. |
|00001140| 20 20 20 20 20 20 20 20 | 20 20 20 20 54 79 70 65 | | Type|
|00001150| 4e 61 6d 65 28 66 69 6c | 65 4e 61 6d 65 29 3b 0a |Name(fil|eName);.|
|00001160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001170| 20 20 62 79 74 65 20 3a | 3d 20 54 72 61 63 6b 42 | byte :|= TrackB|
|00001180| 75 66 66 65 72 43 6e 74 | 20 2b 20 31 31 32 36 34 |ufferCnt| + 11264|
|00001190| 2a 4c 4f 4e 47 43 41 52 | 44 28 41 63 74 54 72 61 |*LONGCAR|D(ActTra|
|000011a0| 63 6b 29 3b 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ck);. | |
|000011b0| 20 20 20 20 20 20 20 70 | 72 6f 74 20 3a 3d 20 70 | p|rot := p|
|000011c0| 72 6f 74 65 63 74 69 6f | 6e 3b 0a 20 20 20 20 20 |rotectio|n;. |
|000011d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 43 6f 70 | | Cop|
|000011e0| 79 28 6e 61 6d 65 2c 66 | 69 6c 65 4e 61 6d 65 2c |y(name,f|ileName,|
|000011f0| 66 69 72 73 74 2c 4c 65 | 6e 67 74 68 28 66 69 6c |first,Le|ngth(fil|
|00001200| 00 00 00 08 00 00 04 15 | 00 00 00 1b 00 00 01 e8 |........|........|
|00001210| 00 00 00 0a 45 b7 58 f8 | 65 4e 61 6d 65 29 29 3b |....E.X.|eName));|
|00001220| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001230| 20 20 20 43 6f 70 79 28 | 63 6f 6d 6d 2c 63 6f 6d | Copy(|comm,com|
|00001240| 6d 65 6e 74 20 2c 66 69 | 72 73 74 2c 4c 65 6e 67 |ment ,fi|rst,Leng|
|00001250| 74 68 28 63 6f 6d 6d 65 | 6e 74 29 29 3b 0a 20 20 |th(comme|nt));. |
|00001260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001270| 53 69 7a 65 20 3a 3d 20 | 73 69 7a 65 3b 0a 20 20 |Size := |size;. |
|00001280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001290| 4c 4f 4f 50 0a 20 20 20 | 20 20 20 20 20 20 20 20 |LOOP. | |
|000012a0| 20 20 20 20 20 20 20 20 | 20 46 69 6c 65 20 3a 3d | | File :=|
|000012b0| 20 4f 70 65 6e 28 41 44 | 52 28 66 69 6c 65 4e 61 | Open(AD|R(fileNa|
|000012c0| 6d 65 29 2c 6f 6c 64 46 | 69 6c 65 29 3b 0a 20 20 |me),oldF|ile);. |
|000012d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000012e0| 20 20 49 46 20 46 69 6c | 65 23 4e 49 4c 20 54 48 | IF Fil|e#NIL TH|
|000012f0| 45 4e 20 45 58 49 54 20 | 45 4e 44 3b 0a 20 20 20 |EN EXIT |END;. |
|00001300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001310| 20 43 6f 70 79 28 52 65 | 71 53 74 72 2c 22 43 61 | Copy(Re|qStr,"Ca|
|00001320| 6e 27 74 20 4f 70 65 6e | 20 22 2c 66 69 72 73 74 |n't Open| ",first|
|00001330| 2c 31 31 29 3b 0a 20 20 | 20 20 20 20 20 20 20 20 |,11);. | |
|00001340| 20 20 20 20 20 20 20 20 | 20 20 49 6e 73 65 72 74 | | Insert|
|00001350| 28 52 65 71 53 74 72 2c | 6c 61 73 74 2c 66 69 6c |(ReqStr,|last,fil|
|00001360| 65 4e 61 6d 65 29 3b 0a | 20 20 20 20 20 20 20 20 |eName);.| |
|00001370| 20 20 20 20 20 20 20 20 | 20 20 20 20 49 6e 73 65 | | Inse|
|00001380| 72 74 28 52 65 71 53 74 | 72 2c 6c 61 73 74 2c 22 |rt(ReqSt|r,last,"|
|00001390| 21 22 29 3b 0a 20 20 20 | 20 20 20 20 20 20 20 20 |!");. | |
|000013a0| 20 20 20 20 20 20 20 20 | 20 43 41 53 45 20 48 44 | | CASE HD|
|000013b0| 52 65 71 75 65 73 74 28 | 41 44 52 28 52 65 71 53 |Request(|ADR(ReqS|
|000013c0| 74 72 29 2c 33 2c 32 2c | 54 52 55 45 29 20 4f 46 |tr),3,2,|TRUE) OF|
|000013d0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000013e0| 20 20 20 20 20 43 61 6e | 63 65 6c 3a 20 72 65 73 | Can|cel: res|
|000013f0| 20 3a 3d 20 63 61 6e 63 | 65 6c 3b 20 45 58 49 54 | := canc|el; EXIT|
|00001400| 00 00 00 08 00 00 04 15 | 00 00 00 1c 00 00 01 e8 |........|........|
|00001410| 00 00 06 d5 a9 92 37 e3 | 3b 20 7c 0a 20 20 20 20 |......7.|; |. |
|00001420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001430| 43 6f 6e 74 69 6e 75 65 | 3a 20 45 58 49 54 3b 20 |Continue|: EXIT; |
|00001440| 7c 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 ||. | |
|00001450| 20 20 20 20 20 20 45 4c | 53 45 0a 20 20 20 20 20 | EL|SE. |
|00001460| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 45 | | E|
|00001470| 4e 44 3b 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |ND;. | |
|00001480| 20 20 20 20 20 20 45 4e | 44 3b 0a 20 20 20 20 20 | EN|D;. |
|00001490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 49 46 20 | | IF |
|000014a0| 46 69 6c 65 23 4e 49 4c | 20 54 48 45 4e 0a 20 20 |File#NIL| THEN. |
|000014b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014c0| 20 20 43 41 53 45 20 57 | 72 69 74 65 54 72 61 63 | CASE W|riteTrac|
|000014d0| 6b 28 41 44 52 28 4d 79 | 46 69 6c 65 49 6e 66 6f |k(ADR(My|FileInfo|
|000014e0| 29 2c 53 49 5a 45 28 4d | 79 46 69 6c 65 54 79 70 |),SIZE(M|yFileTyp|
|000014f0| 65 29 29 20 4f 46 0a 20 | 20 20 20 20 20 20 20 20 |e)) OF. | |
|00001500| 20 20 20 20 20 20 20 20 | 20 20 20 6f 6b 3a 20 72 | | ok: r|
|00001510| 65 73 20 3a 3d 20 57 72 | 69 74 65 46 69 6c 65 28 |es := Wr|iteFile(|
|00001520| 46 69 6c 65 2c 73 69 7a | 65 29 3b 0a 20 20 20 20 |File,siz|e);. |
|00001530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001540| 20 20 20 20 43 6c 6f 73 | 65 28 46 69 6c 65 29 3b | Clos|e(File);|
|00001550| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001560| 20 20 20 20 20 20 20 20 | 20 49 46 20 28 72 65 73 | | IF (res|
|00001570| 3d 6f 6b 29 20 41 4e 44 | 20 28 73 65 6c 65 63 74 |=ok) AND| (select|
|00001580| 65 64 20 49 4e 20 47 61 | 64 67 65 74 73 5b 53 65 |ed IN Ga|dgets[Se|
|00001590| 74 41 72 63 68 69 76 65 | 64 47 61 64 67 5d 2e 66 |tArchive|dGadg].f|
|000015a0| 6c 61 67 73 29 20 54 48 | 45 4e 0a 20 20 20 20 20 |lags) TH|EN. |
|000015b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000015c0| 20 20 20 20 20 49 46 20 | 53 65 74 50 72 6f 74 65 | IF |SetProte|
|000015d0| 63 74 69 6f 6e 28 41 44 | 52 28 66 69 6c 65 4e 61 |ction(AD|R(fileNa|
|000015e0| 6d 65 29 2c 70 72 6f 74 | 65 63 74 69 6f 6e 20 2b |me),prot|ection +|
|000015f0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001600| 00 00 00 08 00 00 04 15 | 00 00 00 09 00 00 01 e8 |........|........|
|00001610| 00 00 00 0c 16 80 04 50 | 48 45 4e 0a 20 20 20 20 |.......P|HEN. |
|00001620| 54 79 70 65 28 31 30 30 | 2c 31 37 30 2c 4e 61 6d |Type(100|,170,Nam|
|00001630| 65 29 3b 0a 20 20 45 4c | 53 45 0a 20 20 20 20 4e |e);. EL|SE. N|
|00001640| 61 6d 65 5b 36 34 5d 20 | 3a 3d 20 30 43 3b 0a 20 |ame[64] |:= 0C;. |
|00001650| 20 20 20 54 79 70 65 28 | 31 30 30 2c 31 35 30 2c | Type(|100,150,|
|00001660| 4e 61 6d 65 29 3b 0a 20 | 20 45 4e 44 3b 0a 45 4e |Name);. | END;.EN|
|00001670| 44 20 54 79 70 65 4e 61 | 6d 65 3b 0a 0a 28 2a 2d |D TypeNa|me;..(*-|
|00001680| 2d 2d 2d 2d 2d 20 20 45 | 72 72 6f 72 20 52 65 71 |----- E|rror Req|
|00001690| 75 65 73 74 3a 20 20 2d | 2d 2d 2d 2d 2d 2a 29 0a |uest: -|-----*).|
|000016a0| 0a 50 52 4f 43 45 44 55 | 52 45 20 45 72 72 6f 72 |.PROCEDU|RE Error|
|000016b0| 28 44 72 69 76 65 3a 20 | 43 41 52 44 49 4e 41 4c |(Drive: |CARDINAL|
|000016c0| 3b 20 65 72 72 3a 20 42 | 79 74 65 3b 20 52 65 61 |; err: B|yte; Rea|
|000016d0| 64 3a 20 42 4f 4f 4c 45 | 41 4e 29 3a 20 52 65 71 |d: BOOLE|AN): Req|
|000016e0| 52 65 73 75 6c 74 73 3b | 0a 0a 56 41 52 0a 20 20 |Results;|..VAR. |
|000016f0| 72 65 73 3a 20 52 65 71 | 52 65 73 75 6c 74 73 3b |res: Req|Results;|
|00001700| 0a 0a 42 45 47 49 4e 0a | 20 20 43 41 53 45 20 65 |..BEGIN.| CASE e|
|00001710| 72 72 20 4f 46 0a 20 20 | 6e 6f 74 53 70 65 63 69 |rr OF. |notSpeci|
|00001720| 66 69 65 64 3a 20 20 52 | 65 71 53 74 72 20 3a 3d |fied: R|eqStr :=|
|00001730| 20 22 3f 3f 3f 22 3b 20 | 20 20 20 20 20 20 20 20 | "???"; | |
|00001740| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 0a 20 20 | | |. |
|00001750| 6e 6f 53 65 63 48 64 72 | 3a 20 20 20 20 20 20 52 |noSecHdr|: R|
|00001760| 65 71 53 74 72 20 3a 3d | 20 22 4e 6f 20 53 65 63 |eqStr :=| "No Sec|
|00001770| 74 6f 72 20 48 65 61 64 | 65 72 22 3b 20 20 20 20 |tor Head|er"; |
|00001780| 20 20 20 20 7c 0a 20 20 | 62 61 64 53 65 63 50 72 | |. |badSecPr|
|00001790| 65 61 6d 62 6c 65 3a 52 | 65 71 53 74 72 20 3a 3d |eamble:R|eqStr :=|
|000017a0| 20 22 42 61 64 20 53 65 | 63 74 6f 72 20 50 72 65 | "Bad Se|ctor Pre|
|000017b0| 61 6d 62 6c 65 22 3b 20 | 20 20 20 20 7c 0a 20 20 |amble"; | |. |
|000017c0| 62 61 64 53 65 63 49 64 | 3a 20 20 20 20 20 20 52 |badSecId|: R|
|000017d0| 65 71 53 74 72 20 3a 3d | 20 22 42 61 64 20 53 65 |eqStr :=| "Bad Se|
|000017e0| 63 74 6f 72 20 49 64 65 | 6e 74 69 66 69 65 72 22 |ctor Ide|ntifier"|
|000017f0| 3b 20 20 20 7c 0a 20 20 | 62 61 64 48 64 72 53 75 |; |. |badHdrSu|
|00001800| 00 00 00 08 00 00 04 15 | 00 00 00 0a 00 00 01 e8 |........|........|
|00001810| 00 00 00 0d 68 bd ee 6a | 6d 3a 20 20 20 20 20 52 |....h..j|m: R|
|00001820| 65 71 53 74 72 20 3a 3d | 20 22 48 65 61 64 65 72 |eqStr :=| "Header|
|00001830| 2d 43 68 65 63 6b 73 75 | 6d 20 45 72 72 6f 72 22 |-Checksu|m Error"|
|00001840| 3b 20 20 20 7c 0a 20 20 | 62 61 64 53 65 63 53 75 |; |. |badSecSu|
|00001850| 6d 3a 20 20 20 20 20 52 | 65 71 53 74 72 20 3a 3d |m: R|eqStr :=|
|00001860| 20 22 53 65 63 74 6f 72 | 2d 43 68 65 63 6b 73 75 | "Sector|-Checksu|
|00001870| 6d 20 45 72 72 6f 72 22 | 3b 20 20 20 7c 0a 20 20 |m Error"|; |. |
|00001880| 74 6f 6f 46 65 77 53 65 | 63 73 3a 20 20 20 20 52 |tooFewSe|cs: R|
|00001890| 65 71 53 74 72 20 3a 3d | 20 22 54 6f 6f 20 66 65 |eqStr :=| "Too fe|
|000018a0| 77 20 53 65 63 74 6f 72 | 73 22 3b 20 20 20 20 20 |w Sector|s"; |
|000018b0| 20 20 20 20 7c 0a 20 20 | 62 61 64 53 65 63 48 64 | |. |badSecHd|
|000018c0| 72 3a 20 20 20 20 20 52 | 65 71 53 74 72 20 3a 3d |r: R|eqStr :=|
|000018d0| 20 22 42 61 64 20 53 65 | 63 74 6f 72 20 48 65 61 | "Bad Se|ctor Hea|
|000018e0| 64 65 72 22 3b 20 20 20 | 20 20 20 20 7c 0a 20 20 |der"; | |. |
|000018f0| 77 72 69 74 65 50 72 6f | 74 3a 20 20 20 20 20 52 |writePro|t: R|
|00001900| 65 71 53 74 72 20 3a 3d | 20 22 44 69 73 6b 20 69 |eqStr :=| "Disk i|
|00001910| 73 20 57 72 69 74 65 2d | 50 72 6f 74 65 63 74 65 |s Write-|Protecte|
|00001920| 64 22 3b 20 7c 0a 20 20 | 64 69 73 6b 43 68 61 6e |d"; |. |diskChan|
|00001930| 67 65 64 3a 20 20 20 52 | 65 71 53 74 72 20 3a 3d |ged: R|eqStr :=|
|00001940| 20 22 44 69 73 6b 20 43 | 68 61 6e 67 65 64 22 3b | "Disk C|hanged";|
|00001950| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 0a 20 20 | | |. |
|00001960| 73 65 65 6b 45 72 72 6f | 72 3a 20 20 20 20 20 52 |seekErro|r: R|
|00001970| 65 71 53 74 72 20 3a 3d | 20 22 53 65 65 6b 20 45 |eqStr :=| "Seek E|
|00001980| 72 72 6f 72 22 3b 20 20 | 20 20 20 20 20 20 20 20 |rror"; | |
|00001990| 20 20 20 20 7c 0a 20 20 | 6e 6f 4d 65 6d 3a 20 20 | |. |noMem: |
|000019a0| 20 20 20 20 20 20 20 52 | 65 71 53 74 72 20 3a 3d | R|eqStr :=|
|000019b0| 20 22 4e 6f 74 20 65 6e | 6f 75 67 68 20 4d 65 6d | "Not en|ough Mem|
|000019c0| 6f 72 79 22 3b 20 20 20 | 20 20 20 20 7c 0a 20 20 |ory"; | |. |
|000019d0| 62 61 64 55 6e 69 74 4e | 75 6d 3a 20 20 20 20 52 |badUnitN|um: R|
|000019e0| 65 71 53 74 72 20 3a 3d | 20 22 44 72 69 76 65 20 |eqStr :=| "Drive |
|000019f0| 6e 6f 74 20 63 6f 6e 6e | 65 63 74 65 64 22 3b 20 |not conn|ected"; |
|00001a00| 00 00 00 08 00 00 04 15 | 00 00 00 0b 00 00 01 e8 |........|........|
|00001a10| 00 00 00 0e 01 26 0c 1d | 20 20 20 20 7c 0a 20 20 |.....&..| |. |
|00001a20| 62 61 64 44 72 69 76 65 | 54 79 70 65 3a 20 20 52 |badDrive|Type: R|
|00001a30| 65 71 53 74 72 20 3a 3d | 20 22 42 61 64 20 44 72 |eqStr :=| "Bad Dr|
|00001a40| 69 76 65 2d 54 79 70 65 | 22 3b 20 20 20 20 20 20 |ive-Type|"; |
|00001a50| 20 20 20 20 7c 0a 20 20 | 64 72 69 76 65 49 6e 55 | |. |driveInU|
|00001a60| 73 65 3a 20 20 20 20 52 | 65 71 53 74 72 20 3a 3d |se: R|eqStr :=|
|00001a70| 20 22 44 72 69 76 65 20 | 69 6e 20 55 73 65 22 3b | "Drive |in Use";|
|00001a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 7c 0a 20 20 | | |. |
|00001a90| 70 6f 73 74 52 65 73 65 | 74 3a 20 20 20 20 20 52 |postRese|t: R|
|00001aa0| 65 71 53 74 72 20 3a 3d | 20 22 55 73 65 72 20 52 |eqStr :=| "User R|
|00001ab0| 65 73 65 74 22 3b 20 20 | 20 20 20 20 20 20 20 20 |eset"; | |
|00001ac0| 20 20 20 20 7c 0a 20 20 | 45 4c 53 45 0a 20 20 20 | |. |ELSE. |
|00001ad0| 20 52 65 71 53 74 72 20 | 3a 3d 20 22 30 30 22 3b | ReqStr |:= "00";|
|00001ae0| 20 4d 61 6b 65 32 44 69 | 67 69 74 73 28 4f 52 44 | Make2Di|gits(ORD|
|00001af0| 28 65 72 72 29 2c 30 29 | 3b 0a 20 20 45 4e 44 3b |(err),0)|;. END;|
|00001b00| 0a 20 20 49 46 20 52 65 | 61 64 20 54 48 45 4e 0a |. IF Re|ad THEN.|
|00001b10| 20 20 20 20 49 6e 73 65 | 72 74 28 52 65 71 53 74 | Inse|rt(ReqSt|
|00001b20| 72 2c 66 69 72 73 74 2c | 22 52 65 61 64 2d 45 72 |r,first,|"Read-Er|
|00001b30| 72 6f 72 3a 20 22 29 3b | 0a 20 20 45 4c 53 45 0a |ror: ");|. ELSE.|
|00001b40| 20 20 20 20 49 6e 73 65 | 72 74 28 52 65 71 53 74 | Inse|rt(ReqSt|
|00001b50| 72 2c 66 69 72 73 74 2c | 22 57 72 69 74 65 2d 45 |r,first,|"Write-E|
|00001b60| 72 72 6f 72 3a 20 22 29 | 3b 0a 20 20 45 4e 44 3b |rror: ")|;. END;|
|00001b70| 0a 20 20 72 65 73 20 3a | 3d 20 48 44 52 65 71 75 |. res :|= HDRequ|
|00001b80| 65 73 74 28 41 44 52 28 | 52 65 71 53 74 72 29 2c |est(ADR(|ReqStr),|
|00001b90| 33 2c 32 2c 54 52 55 45 | 29 3b 0a 20 20 44 69 73 |3,2,TRUE|);. Dis|
|00001ba0| 6b 43 68 61 6e 67 65 20 | 3a 3d 20 47 65 74 44 69 |kChange |:= GetDi|
|00001bb0| 73 6b 43 68 61 6e 67 65 | 28 44 72 69 76 65 29 3b |skChange|(Drive);|
|00001bc0| 0a 20 20 52 45 54 55 52 | 4e 20 72 65 73 3b 0a 45 |. RETUR|N res;.E|
|00001bd0| 4e 44 20 45 72 72 6f 72 | 3b 0a 0a 28 2a 2d 2d 2d |ND Error|;..(*---|
|00001be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001bf0| 2d 2d 2d 2d 20 20 43 72 | 65 61 74 65 20 42 61 63 |---- Cr|eate Bac|
|00001c00| 00 00 00 08 00 00 04 15 | 00 00 00 0c 00 00 01 e8 |........|........|
|00001c10| 00 00 00 0f f5 f5 8f 04 | 6b 55 70 3a 20 20 2d 2d |........|kUp: --|
|00001c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2a 29 |--------|------*)|
|00001c40| 0a 0a 50 52 4f 43 45 44 | 55 52 45 20 42 61 63 6b |..PROCED|URE Back|
|00001c50| 55 70 28 44 72 69 76 65 | 3a 20 43 41 52 44 49 4e |Up(Drive|: CARDIN|
|00001c60| 41 4c 29 3b 0a 0a 56 41 | 52 0a 20 20 49 44 31 2c |AL);..VA|R. ID1,|
|00001c70| 49 44 32 3a 20 43 48 41 | 52 3b 0a 20 20 4e 75 6d |ID2: CHA|R;. Num|
|00001c80| 54 72 61 63 6b 73 3a 20 | 4c 4f 4e 47 43 41 52 44 |Tracks: |LONGCARD|
|00001c90| 3b 0a 20 20 43 6f 75 6e | 74 3a 20 4c 4f 4e 47 43 |;. Coun|t: LONGC|
|00001ca0| 41 52 44 3b 0a 20 20 65 | 72 72 3a 20 42 4f 4f 4c |ARD;. e|rr: BOOL|
|00001cb0| 45 41 4e 3b 0a 0a 28 2a | 2d 2d 2d 2d 2d 2d 20 20 |EAN;..(*|------ |
|00001cc0| 4d 6f 76 65 20 74 6f 20 | 6e 65 78 74 20 54 72 61 |Move to |next Tra|
|00001cd0| 63 6b 3a 20 20 2d 2d 2d | 2d 2d 2d 2a 29 0a 0a 20 |ck: ---|---*).. |
|00001ce0| 20 50 52 4f 43 45 44 55 | 52 45 20 4e 65 78 74 54 | PROCEDU|RE NextT|
|00001cf0| 72 61 63 6b 28 29 3a 20 | 52 65 73 3b 0a 20 20 28 |rack(): |Res;. (|
|00001d00| 2a 20 52 65 73 20 63 61 | 6e 20 62 65 20 6f 6b 20 |* Res ca|n be ok |
|00001d10| 6f 72 20 63 61 6e 63 65 | 6c 20 2a 29 0a 0a 20 20 |or cance|l *).. |
|00001d20| 42 45 47 49 4e 0a 20 20 | 20 20 49 46 20 41 63 74 |BEGIN. | IF Act|
|00001d30| 54 72 61 63 6b 3e 3d 28 | 4e 75 6d 54 72 61 63 6b |Track>=(|NumTrack|
|00001d40| 73 2d 31 29 20 54 48 45 | 4e 0a 20 20 20 20 20 20 |s-1) THE|N. |
|00001d50| 49 4e 43 28 44 69 73 6b | 4e 75 6d 29 3b 0a 20 20 |INC(Disk|Num);. |
|00001d60| 20 20 20 20 49 46 20 4d | 6f 74 6f 72 28 44 72 69 | IF M|otor(Dri|
|00001d70| 76 65 2c 46 41 4c 53 45 | 29 20 54 48 45 4e 20 45 |ve,FALSE|) THEN E|
|00001d80| 4e 44 3b 0a 20 20 20 20 | 20 20 52 65 71 53 74 72 |ND;. | ReqStr|
|00001d90| 20 3a 3d 20 22 49 6e 73 | 65 72 74 20 44 69 73 6b | := "Ins|ert Disk|
|00001da0| 20 4e 75 6d 62 65 72 20 | 30 30 20 21 22 3b 0a 20 | Number |00 !";. |
|00001db0| 20 20 20 20 20 4d 61 6b | 65 32 44 69 67 69 74 73 | Mak|e2Digits|
|00001dc0| 28 44 69 73 6b 4e 75 6d | 2c 31 39 29 3b 0a 20 20 |(DiskNum|,19);. |
|00001dd0| 20 20 20 20 49 46 20 48 | 44 52 65 71 75 65 73 74 | IF H|DRequest|
|00001de0| 28 41 44 52 28 52 65 71 | 53 74 72 29 2c 30 2c 31 |(ADR(Req|Str),0,1|
|00001df0| 2c 46 41 4c 53 45 29 3d | 43 61 6e 63 65 6c 20 54 |,FALSE)=|Cancel T|
|00001e00| 00 00 00 08 00 00 04 15 | 00 00 00 0d 00 00 01 e8 |........|........|
|00001e10| 00 00 00 10 83 1a ba 2c | 48 45 4e 20 52 45 54 55 |.......,|HEN RETU|
|00001e20| 52 4e 20 63 61 6e 63 65 | 6c 20 45 4e 44 3b 0a 20 |RN cance|l END;. |
|00001e30| 20 20 20 20 20 4c 4f 4f | 50 0a 20 20 20 20 20 20 | LOO|P. |
|00001e40| 20 20 57 48 49 4c 45 20 | 4e 4f 54 28 43 68 61 6e | WHILE |NOT(Chan|
|00001e50| 67 65 53 74 61 74 65 28 | 44 72 69 76 65 29 29 20 |geState(|Drive)) |
|00001e60| 44 4f 0a 20 20 20 20 20 | 20 20 20 20 20 49 46 20 |DO. | IF |
|00001e70| 48 44 52 65 71 75 65 73 | 74 28 41 44 52 28 22 4e |HDReques|t(ADR("N|
|00001e80| 6f 20 44 69 73 6b 20 69 | 6e 20 44 72 69 76 65 20 |o Disk i|n Drive |
|00001e90| 21 22 29 2c 30 2c 31 2c | 54 52 55 45 29 3d 43 61 |!"),0,1,|TRUE)=Ca|
|00001ea0| 6e 63 65 6c 20 54 48 45 | 4e 0a 20 20 20 20 20 20 |ncel THE|N. |
|00001eb0| 20 20 20 20 20 20 52 45 | 54 55 52 4e 20 63 61 6e | RE|TURN can|
|00001ec0| 63 65 6c 3b 0a 20 20 20 | 20 20 20 20 20 20 20 45 |cel;. | E|
|00001ed0| 4e 44 3b 0a 20 20 20 20 | 20 20 20 20 45 4e 44 3b |ND;. | END;|
|00001ee0| 0a 20 20 20 20 20 20 20 | 20 49 46 20 44 69 73 6b |. | IF Disk|
|00001ef0| 4e 75 6d 3d 31 20 54 48 | 45 4e 20 45 58 49 54 20 |Num=1 TH|EN EXIT |
|00001f00| 45 4e 44 3b 0a 20 20 20 | 20 20 20 20 20 49 46 20 |END;. | IF |
|00001f10| 52 65 61 64 42 6c 6f 63 | 6b 28 44 72 69 76 65 2c |ReadBloc|k(Drive,|
|00001f20| 30 2c 54 72 61 63 6b 42 | 75 66 66 65 72 2c 31 2c |0,TrackB|uffer,1,|
|00001f30| 47 65 74 44 69 73 6b 43 | 68 61 6e 67 65 28 44 72 |GetDiskC|hange(Dr|
|00001f40| 69 76 65 29 29 23 30 20 | 54 48 45 4e 20 45 58 49 |ive))#0 |THEN EXI|
|00001f50| 54 20 45 4e 44 3b 0a 20 | 20 20 20 20 20 20 20 49 |T END;. | I|
|00001f60| 46 20 28 54 72 61 63 6b | 42 75 66 66 65 72 5e 5b |F (Track|Buffer^[|
|00001f70| 30 5d 3d 22 42 22 29 20 | 41 4e 44 20 28 54 72 61 |0]="B") |AND (Tra|
|00001f80| 63 6b 42 75 66 66 65 72 | 5e 5b 31 5d 3d 22 6b 22 |ckBuffer|^[1]="k"|
|00001f90| 29 20 41 4e 44 0a 20 20 | 20 20 20 20 20 20 20 20 |) AND. | |
|00001fa0| 20 28 54 72 61 63 6b 42 | 75 66 66 65 72 5e 5b 32 | (TrackB|uffer^[2|
|00001fb0| 5d 3d 22 55 22 29 20 41 | 4e 44 20 28 54 72 61 63 |]="U") A|ND (Trac|
|00001fc0| 6b 42 75 66 66 65 72 5e | 5b 33 5d 3d 22 70 22 29 |kBuffer^|[3]="p")|
|00001fd0| 20 41 4e 44 0a 20 20 20 | 20 20 20 20 20 20 20 20 | AND. | |
|00001fe0| 28 54 72 61 63 6b 42 75 | 66 66 65 72 5e 5b 34 5d |(TrackBu|ffer^[4]|
|00001ff0| 3d 49 44 31 29 20 41 4e | 44 20 28 54 72 61 63 6b |=ID1) AN|D (Track|
|00002000| 00 00 00 08 00 00 04 15 | 00 00 00 0e 00 00 01 e8 |........|........|
|00002010| 00 00 00 11 40 80 9a ff | 42 75 66 66 65 72 5e 5b |....@...|Buffer^[|
|00002020| 35 5d 3d 49 44 32 29 20 | 41 4e 44 0a 20 20 20 20 |5]=ID2) |AND. |
|00002030| 20 20 20 20 20 20 20 28 | 54 72 61 63 6b 42 75 66 | (|TrackBuf|
|00002040| 66 65 72 5e 5b 36 5d 3c | 43 48 41 52 28 44 69 73 |fer^[6]<|CHAR(Dis|
|00002050| 6b 4e 75 6d 29 29 20 54 | 48 45 4e 0a 20 20 20 20 |kNum)) T|HEN. |
|00002060| 20 20 20 20 20 20 49 46 | 20 4d 6f 74 6f 72 28 44 | IF| Motor(D|
|00002070| 72 69 76 65 2c 46 41 4c | 53 45 29 20 54 48 45 4e |rive,FAL|SE) THEN|
|00002080| 20 45 4e 44 3b 0a 20 20 | 20 20 20 20 20 20 20 20 | END;. | |
|00002090| 52 65 71 53 74 72 20 3a | 3d 20 22 54 68 69 73 20 |ReqStr :|= "This |
|000020a0| 69 73 20 44 69 73 6b 20 | 23 20 30 30 21 20 49 6e |is Disk |# 00! In|
|000020b0| 73 65 72 74 20 23 20 30 | 30 21 22 3b 0a 20 20 20 |sert # 0|0!";. |
|000020c0| 20 20 20 20 20 20 20 4d | 61 6b 65 32 44 69 67 69 | M|ake2Digi|
|000020d0| 74 73 28 4f 52 44 28 54 | 72 61 63 6b 42 75 66 66 |ts(ORD(T|rackBuff|
|000020e0| 65 72 5e 5b 36 5d 29 2c | 31 35 29 3b 0a 20 20 20 |er^[6]),|15);. |
|000020f0| 20 20 20 20 20 20 20 4d | 61 6b 65 32 44 69 67 69 | M|ake2Digi|
|00002100| 74 73 28 44 69 73 6b 4e | 75 6d 2c 32 38 29 3b 0a |ts(DiskN|um,28);.|
|00002110| 20 20 20 20 20 20 20 20 | 20 20 43 41 53 45 20 48 | | CASE H|
|00002120| 44 52 65 71 75 65 73 74 | 28 41 44 52 28 52 65 71 |DRequest|(ADR(Req|
|00002130| 53 74 72 29 2c 33 2c 32 | 2c 54 52 55 45 29 20 4f |Str),3,2|,TRUE) O|
|00002140| 46 0a 20 20 20 20 20 20 | 20 20 20 20 43 6f 6e 74 |F. | Cont|
|00002150| 69 6e 75 65 3a 20 45 58 | 49 54 3b 20 7c 0a 20 20 |inue: EX|IT; |. |
|00002160| 20 20 20 20 20 20 20 20 | 43 61 6e 63 65 6c 3a 20 | |Cancel: |
|00002170| 52 45 54 55 52 4e 20 63 | 61 6e 63 65 6c 3b 0a 20 |RETURN c|ancel;. |
|00002180| 20 20 20 20 20 20 20 20 | 20 45 4c 53 45 0a 20 20 | | ELSE. |
|00002190| 20 20 20 20 20 20 20 20 | 45 4e 44 3b 0a 20 20 20 | |END;. |
|000021a0| 20 20 20 20 20 45 4c 53 | 45 0a 20 20 20 20 20 20 | ELS|E. |
|000021b0| 20 20 20 20 45 58 49 54 | 3b 0a 20 20 20 20 20 20 | EXIT|;. |
|000021c0| 20 20 45 4e 44 3b 0a 20 | 20 20 20 20 20 45 4e 44 | END;. | END|
|000021d0| 3b 0a 20 20 20 20 20 20 | 41 63 74 54 72 61 63 6b |;. |ActTrack|
|000021e0| 20 3a 3d 20 30 3b 0a 20 | 20 20 20 20 20 54 72 61 | := 0;. | Tra|
|000021f0| 63 6b 42 75 66 66 65 72 | 5e 20 3a 3d 20 22 42 6b |ckBuffer|^ := "Bk|
|00002200| 00 00 00 08 00 00 04 15 | 00 00 00 0f 00 00 01 e8 |........|........|
|00002210| 00 00 00 12 a4 0f ea 85 | 55 70 22 3b 20 20 20 20 |........|Up"; |
|00002220| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002230| 20 20 20 20 20 28 2a 20 | 44 69 73 6b 20 49 44 20 | (* |Disk ID |
|00002240| 20 20 20 20 20 20 20 2a | 29 0a 20 20 20 20 20 20 | *|). |
|00002250| 54 72 61 63 6b 42 75 66 | 66 65 72 5e 5b 34 5d 20 |TrackBuf|fer^[4] |
|00002260| 3a 3d 20 49 44 31 3b 20 | 54 72 61 63 6b 42 75 66 |:= ID1; |TrackBuf|
|00002270| 66 65 72 5e 5b 35 5d 20 | 3a 3d 20 49 44 32 3b 20 |fer^[5] |:= ID2; |
|00002280| 28 2a 20 42 61 63 6b 75 | 70 20 49 44 20 20 20 20 |(* Backu|p ID |
|00002290| 20 20 2a 29 0a 20 20 20 | 20 20 20 54 72 61 63 6b | *). | Track|
|000022a0| 42 75 66 66 65 72 5e 5b | 36 5d 20 3a 3d 20 43 48 |Buffer^[|6] := CH|
|000022b0| 41 52 28 44 69 73 6b 4e | 75 6d 29 3b 20 20 20 20 |AR(DiskN|um); |
|000022c0| 20 20 20 20 20 20 20 20 | 20 20 20 28 2a 20 44 69 | | (* Di|
|000022d0| 73 6b 20 23 20 20 20 20 | 20 20 20 20 20 2a 29 0a |sk # | *).|
|000022e0| 20 20 20 20 20 20 54 72 | 61 63 6b 42 75 66 66 65 | Tr|ackBuffe|
|000022f0| 72 5e 5b 37 5d 20 3a 3d | 20 30 43 3b 20 20 20 20 |r^[7] :=| 0C; |
|00002300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002310| 20 20 20 20 20 20 28 2a | 20 42 61 63 6b 55 70 20 | (*| BackUp |
|00002320| 56 65 72 73 69 6f 6e 20 | 2a 29 0a 20 20 20 20 20 |Version |*). |
|00002330| 20 54 72 61 63 6b 42 75 | 66 66 65 72 43 6e 74 20 | TrackBu|fferCnt |
|00002340| 20 3a 3d 20 38 3b 20 28 | 2a 20 38 20 42 79 74 65 | := 8; (|* 8 Byte|
|00002350| 73 20 69 6e 20 42 75 66 | 66 65 72 20 2a 29 0a 20 |s in Buf|fer *). |
|00002360| 20 20 20 20 20 52 65 71 | 53 74 72 20 3a 3d 20 22 | Req|Str := "|
|00002370| 30 30 22 3b 20 4d 61 6b | 65 32 44 69 67 69 74 73 |00"; Mak|e2Digits|
|00002380| 28 44 69 73 6b 4e 75 6d | 2c 30 29 3b 0a 20 20 20 |(DiskNum|,0);. |
|00002390| 20 20 20 54 79 70 65 28 | 35 36 30 2c 34 35 2c 52 | Type(|560,45,R|
|000023a0| 65 71 53 74 72 29 3b 0a | 20 20 20 20 20 20 44 69 |eqStr);.| Di|
|000023b0| 73 6b 43 68 61 6e 67 65 | 20 3a 3d 20 47 65 74 44 |skChange| := GetD|
|000023c0| 69 73 6b 43 68 61 6e 67 | 65 28 44 72 69 76 65 29 |iskChang|e(Drive)|
|000023d0| 3b 0a 20 20 20 20 45 4c | 53 45 0a 20 20 20 20 20 |;. EL|SE. |
|000023e0| 20 49 4e 43 28 41 63 74 | 54 72 61 63 6b 29 3b 0a | INC(Act|Track);.|
|000023f0| 20 20 20 20 45 4e 44 3b | 0a 20 20 20 20 52 65 71 | END;|. Req|
|00002400| 00 00 00 08 00 00 04 15 | 00 00 00 10 00 00 01 e8 |........|........|
|00002410| 00 00 00 13 5a 6a 9a 1a | 53 74 72 20 3a 3d 20 22 |....Zj..|Str := "|
|00002420| 30 30 22 3b 20 4d 61 6b | 65 32 44 69 67 69 74 73 |00"; Mak|e2Digits|
|00002430| 28 41 63 74 54 72 61 63 | 6b 2c 30 29 3b 0a 20 20 |(ActTrac|k,0);. |
|00002440| 20 20 54 79 70 65 28 35 | 36 30 2c 36 31 2c 52 65 | Type(5|60,61,Re|
|00002450| 71 53 74 72 29 3b 0a 20 | 20 20 20 52 45 54 55 52 |qStr);. | RETUR|
|00002460| 4e 20 6f 6b 3b 0a 20 20 | 45 4e 44 20 4e 65 78 74 |N ok;. |END Next|
|00002470| 54 72 61 63 6b 3b 0a 0a | 28 2a 2d 2d 2d 2d 2d 2d |Track;..|(*------|
|00002480| 20 20 57 72 69 74 65 20 | 74 6f 20 54 72 61 63 6b | Write |to Track|
|00002490| 44 69 73 6b 3a 20 20 2d | 2d 2d 2d 2d 2d 2a 29 0a |Disk: -|-----*).|
|000024a0| 0a 20 20 50 52 4f 43 45 | 44 55 52 45 20 57 72 69 |. PROCE|DURE Wri|
|000024b0| 74 65 54 72 61 63 6b 28 | 42 75 66 66 65 72 3a 20 |teTrack(|Buffer: |
|000024c0| 41 44 44 52 45 53 53 3b | 20 53 69 7a 65 3a 20 4c |ADDRESS;| Size: L|
|000024d0| 4f 4e 47 43 41 52 44 29 | 3a 20 52 65 73 3b 0a 0a |ONGCARD)|: Res;..|
|000024e0| 20 20 56 41 52 0a 20 20 | 20 20 65 72 72 3a 20 42 | VAR. | err: B|
|000024f0| 79 74 65 3b 0a 0a 20 20 | 42 45 47 49 4e 0a 20 20 |yte;.. |BEGIN. |
|00002500| 20 20 57 48 49 4c 45 20 | 53 69 7a 65 3e 3d 28 54 | WHILE |Size>=(T|
|00002510| 72 61 63 6b 53 69 7a 65 | 2d 54 72 61 63 6b 42 75 |rackSize|-TrackBu|
|00002520| 66 66 65 72 43 6e 74 29 | 20 44 4f 0a 20 20 20 20 |fferCnt)| DO. |
|00002530| 20 20 43 6f 70 79 4d 65 | 6d 28 42 75 66 66 65 72 | CopyMe|m(Buffer|
|00002540| 2c 41 44 44 52 45 53 53 | 28 4c 4f 4e 47 43 41 52 |,ADDRESS|(LONGCAR|
|00002550| 44 28 54 72 61 63 6b 42 | 75 66 66 65 72 29 2b 54 |D(TrackB|uffer)+T|
|00002560| 72 61 63 6b 42 75 66 66 | 65 72 43 6e 74 29 2c 0a |rackBuff|erCnt),.|
|00002570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 54 72 | | Tr|
|00002580| 61 63 6b 53 69 7a 65 2d | 54 72 61 63 6b 42 75 66 |ackSize-|TrackBuf|
|00002590| 66 65 72 43 6e 74 29 3b | 0a 20 20 20 20 20 20 49 |ferCnt);|. I|
|000025a0| 4e 43 28 42 75 66 66 65 | 72 2c 54 72 61 63 6b 53 |NC(Buffe|r,TrackS|
|000025b0| 69 7a 65 2d 54 72 61 63 | 6b 42 75 66 66 65 72 43 |ize-Trac|kBufferC|
|000025c0| 6e 74 29 3b 0a 20 20 20 | 20 20 20 44 45 43 28 53 |nt);. | DEC(S|
|000025d0| 69 7a 65 2c 54 72 61 63 | 6b 53 69 7a 65 2d 54 72 |ize,Trac|kSize-Tr|
|000025e0| 61 63 6b 42 75 66 66 65 | 72 43 6e 74 29 3b 0a 20 |ackBuffe|rCnt);. |
|000025f0| 20 20 20 20 20 54 72 61 | 63 6b 42 75 66 66 65 72 | Tra|ckBuffer|
|00002600| 00 00 00 08 00 00 04 15 | 00 00 00 11 00 00 01 e8 |........|........|
|00002610| 00 00 00 14 09 35 71 da | 43 6e 74 20 3a 3d 20 30 |.....5q.|Cnt := 0|
|00002620| 3b 0a 20 20 20 20 20 20 | 4c 4f 4f 50 0a 20 20 20 |;. |LOOP. |
|00002630| 20 20 20 20 20 54 79 70 | 65 28 35 30 30 2c 37 37 | Typ|e(500,77|
|00002640| 2c 22 20 77 72 69 74 69 | 6e 67 20 22 29 3b 0a 20 |," writi|ng ");. |
|00002650| 20 20 20 20 20 20 20 65 | 72 72 20 3a 3d 20 46 6f | e|rr := Fo|
|00002660| 72 6d 61 74 54 72 61 63 | 6b 28 44 72 69 76 65 2c |rmatTrac|k(Drive,|
|00002670| 41 63 74 54 72 61 63 6b | 2c 54 72 61 63 6b 42 75 |ActTrack|,TrackBu|
|00002680| 66 66 65 72 2c 31 2c 44 | 69 73 6b 43 68 61 6e 67 |ffer,1,D|iskChang|
|00002690| 65 29 3b 0a 20 20 20 20 | 20 20 20 20 49 46 20 65 |e);. | IF e|
|000026a0| 72 72 3d 30 20 54 48 45 | 4e 0a 20 20 20 20 20 20 |rr=0 THE|N. |
|000026b0| 20 20 20 20 54 79 70 65 | 28 35 30 30 2c 37 37 2c | Type|(500,77,|
|000026c0| 22 76 65 72 69 66 79 69 | 6e 67 22 29 3b 0a 20 20 |"verifyi|ng");. |
|000026d0| 20 20 20 20 20 20 20 20 | 65 72 72 20 3a 3d 20 52 | |err := R|
|000026e0| 65 61 64 43 79 63 53 65 | 63 28 44 72 69 76 65 2c |eadCycSe|c(Drive,|
|000026f0| 41 63 74 54 72 61 63 6b | 2c 30 2c 30 2c 54 72 61 |ActTrack|,0,0,Tra|
|00002700| 63 6b 42 75 66 66 65 72 | 2c 32 32 2c 44 69 73 6b |ckBuffer|,22,Disk|
|00002710| 43 68 61 6e 67 65 29 3b | 0a 20 20 20 20 20 20 20 |Change);|. |
|00002720| 20 20 20 49 46 20 65 72 | 72 3d 30 20 54 48 45 4e | IF er|r=0 THEN|
|00002730| 20 45 58 49 54 20 45 4e | 44 3b 0a 20 20 20 20 20 | EXIT EN|D;. |
|00002740| 20 20 20 45 4e 44 3b 0a | 20 20 20 20 20 20 20 20 | END;.| |
|00002750| 43 41 53 45 20 45 72 72 | 6f 72 28 44 72 69 76 65 |CASE Err|or(Drive|
|00002760| 2c 65 72 72 2c 46 41 4c | 53 45 29 20 4f 46 0a 20 |,err,FAL|SE) OF. |
|00002770| 20 20 20 20 20 20 20 52 | 65 74 72 79 3a 0a 20 20 | R|etry:. |
|00002780| 20 20 20 20 20 20 20 20 | 44 69 73 6b 43 68 61 6e | |DiskChan|
|00002790| 67 65 20 3a 3d 20 47 65 | 74 44 69 73 6b 43 68 61 |ge := Ge|tDiskCha|
|000027a0| 6e 67 65 28 44 72 69 76 | 65 29 3b 20 7c 0a 20 20 |nge(Driv|e); |. |
|000027b0| 20 20 20 20 20 20 43 6f | 6e 74 69 6e 75 65 3a 0a | Co|ntinue:.|
|000027c0| 20 20 20 20 20 20 20 20 | 20 20 49 46 20 4e 65 78 | | IF Nex|
|000027d0| 74 54 72 61 63 6b 28 29 | 3d 63 61 6e 63 65 6c 20 |tTrack()|=cancel |
|000027e0| 54 48 45 4e 20 52 45 54 | 55 52 4e 20 63 61 6e 63 |THEN RET|URN canc|
|000027f0| 65 6c 20 45 4e 44 3b 0a | 20 20 20 20 20 20 20 20 |el END;.| |
|00002800| 00 00 00 08 00 00 04 15 | 00 00 00 12 00 00 01 e8 |........|........|
|00002810| 00 00 00 15 83 56 5d 8f | 20 20 52 45 54 55 52 4e |.....V].| RETURN|
|00002820| 20 63 6f 6e 74 69 6e 75 | 65 3b 20 7c 0a 20 20 20 | continu|e; |. |
|00002830| 20 20 20 20 20 43 61 6e | 63 65 6c 3a 0a 20 20 20 | Can|cel:. |
|00002840| 20 20 20 20 20 20 20 52 | 45 54 55 52 4e 20 63 61 | R|ETURN ca|
|00002850| 6e 63 65 6c 3b 20 7c 0a | 20 20 20 20 20 20 20 20 |ncel; |.| |
|00002860| 45 4c 53 45 0a 20 20 20 | 20 20 20 20 20 45 4e 44 |ELSE. | END|
|00002870| 3b 0a 20 20 20 20 20 20 | 45 4e 44 3b 0a 20 20 20 |;. |END;. |
|00002880| 20 20 20 49 46 20 4e 65 | 78 74 54 72 61 63 6b 28 | IF Ne|xtTrack(|
|00002890| 29 3d 63 61 6e 63 65 6c | 20 54 48 45 4e 20 52 45 |)=cancel| THEN RE|
|000028a0| 54 55 52 4e 20 63 61 6e | 63 65 6c 20 45 4e 44 3b |TURN can|cel END;|
|000028b0| 0a 20 20 20 20 45 4e 44 | 3b 0a 20 20 20 20 49 46 |. END|;. IF|
|000028c0| 20 53 69 7a 65 23 30 20 | 54 48 45 4e 0a 20 20 20 | Size#0 |THEN. |
|000028d0| 20 20 20 43 6f 70 79 4d | 65 6d 28 42 75 66 66 65 | CopyM|em(Buffe|
|000028e0| 72 2c 41 44 44 52 45 53 | 53 28 4c 4f 4e 47 43 41 |r,ADDRES|S(LONGCA|
|000028f0| 52 44 28 54 72 61 63 6b | 42 75 66 66 65 72 29 2b |RD(Track|Buffer)+|
|00002900| 54 72 61 63 6b 42 75 66 | 66 65 72 43 6e 74 29 2c |TrackBuf|ferCnt),|
|00002910| 53 69 7a 65 29 3b 0a 20 | 20 20 20 20 20 49 4e 43 |Size);. | INC|
|00002920| 28 54 72 61 63 6b 42 75 | 66 66 65 72 43 6e 74 2c |(TrackBu|fferCnt,|
|00002930| 53 69 7a 65 29 3b 0a 20 | 20 20 20 45 4e 44 3b 0a |Size);. | END;.|
|00002940| 20 20 20 20 52 45 54 55 | 52 4e 20 6f 6b 3b 0a 20 | RETU|RN ok;. |
|00002950| 20 45 4e 44 20 57 72 69 | 74 65 54 72 61 63 6b 3b | END Wri|teTrack;|
|00002960| 0a 0a 28 2a 2d 2d 2d 2d | 2d 2d 20 20 57 72 69 74 |..(*----|-- Writ|
|00002970| 65 20 6c 61 73 74 20 54 | 72 61 63 6b 3a 20 20 2d |e last T|rack: -|
|00002980| 2d 2d 2d 2d 2d 2a 29 0a | 0a 20 20 50 52 4f 43 45 |-----*).|. PROCE|
|00002990| 44 55 52 45 20 57 72 69 | 74 65 4c 61 73 74 28 29 |DURE Wri|teLast()|
|000029a0| 3a 20 52 65 73 3b 0a 0a | 20 20 56 41 52 20 65 72 |: Res;..| VAR er|
|000029b0| 72 3a 20 42 79 74 65 3b | 0a 20 20 20 20 45 6e 64 |r: Byte;|. End|
|000029c0| 65 3a 20 45 6e 64 65 54 | 79 70 65 3b 0a 0a 20 20 |e: EndeT|ype;.. |
|000029d0| 42 45 47 49 4e 0a 20 20 | 20 20 4c 4f 4f 50 0a 20 |BEGIN. | LOOP. |
|000029e0| 20 20 20 20 20 45 6e 64 | 65 2e 65 6e 64 65 49 44 | End|e.endeID|
|000029f0| 20 3a 3d 20 45 6e 64 65 | 49 44 3b 0a 20 20 20 20 | := Ende|ID;. |
|00002a00| 00 00 00 08 00 00 04 15 | 00 00 00 13 00 00 01 e8 |........|........|
|00002a10| 00 00 00 02 d0 1d 8d 18 | 20 20 45 6e 64 65 2e 62 |........| Ende.b|
|00002a20| 79 74 65 20 3a 3d 20 54 | 72 61 63 6b 42 75 66 66 |yte := T|rackBuff|
|00002a30| 65 72 43 6e 74 20 2b 20 | 31 31 32 36 34 20 2a 20 |erCnt + |11264 * |
|00002a40| 4c 4f 4e 47 43 41 52 44 | 28 41 63 74 54 72 61 63 |LONGCARD|(ActTrac|
|00002a50| 6b 29 3b 0a 20 20 20 20 | 20 20 49 46 20 57 72 69 |k);. | IF Wri|
|00002a60| 74 65 54 72 61 63 6b 28 | 41 44 52 28 45 6e 64 65 |teTrack(|ADR(Ende|
|00002a70| 29 2c 53 49 5a 45 28 45 | 6e 64 65 29 29 3d 63 61 |),SIZE(E|nde))=ca|
|00002a80| 6e 63 65 6c 20 54 48 45 | 4e 20 52 45 54 55 52 4e |ncel THE|N RETURN|
|00002a90| 20 63 61 6e 63 65 6c 20 | 45 4e 44 3b 0a 20 20 20 | cancel |END;. |
|00002aa0| 20 20 20 49 46 20 28 54 | 72 61 63 6b 42 75 66 66 | IF (T|rackBuff|
|00002ab0| 65 72 43 6e 74 23 30 29 | 20 4f 52 20 28 41 63 74 |erCnt#0)| OR (Act|
|00002ac0| 54 72 61 63 6b 23 30 29 | 20 54 48 45 4e 0a 20 20 |Track#0)| THEN. |
|00002ad0| 20 20 20 20 20 20 65 72 | 72 20 3a 3d 20 46 6f 72 | er|r := For|
|00002ae0| 6d 61 74 54 72 61 63 6b | 28 44 72 69 76 65 2c 41 |matTrack|(Drive,A|
|00002af0| 63 74 54 72 61 63 6b 2c | 54 72 61 63 6b 42 75 66 |ctTrack,|TrackBuf|
|00002b00| 66 65 72 2c 31 2c 44 69 | 73 6b 43 68 61 6e 67 65 |fer,1,Di|skChange|
|00002b10| 29 3b 0a 20 20 20 20 20 | 20 20 20 49 46 20 65 72 |);. | IF er|
|00002b20| 72 3d 30 20 54 48 45 4e | 20 45 58 49 54 20 45 4e |r=0 THEN| EXIT EN|
|00002b30| 44 3b 0a 20 20 20 20 20 | 20 20 20 43 41 53 45 20 |D;. | CASE |
|00002b40| 45 72 72 6f 72 28 44 72 | 69 76 65 2c 65 72 72 2c |Error(Dr|ive,err,|
|00002b50| 46 41 4c 53 45 29 20 4f | 46 0a 20 20 20 20 20 20 |FALSE) O|F. |
|00002b60| 20 20 20 20 43 6f 6e 74 | 69 6e 75 65 3a 20 52 45 | Cont|inue: RE|
|00002b70| 54 55 52 4e 20 63 6f 6e | 74 69 6e 75 65 3b 20 7c |TURN con|tinue; ||
|00002b80| 0a 20 20 20 20 20 20 20 | 20 20 20 43 61 6e 63 65 |. | Cance|
|00002b90| 6c 3a 20 20 20 52 45 54 | 55 52 4e 20 63 61 6e 63 |l: RET|URN canc|
|00002ba0| 65 6c 3b 20 20 20 7c 0a | 20 20 20 20 20 20 20 20 |el; |.| |
|00002bb0| 45 4c 53 45 0a 20 20 20 | 20 20 20 20 20 45 4e 44 |ELSE. | END|
|00002bc0| 3b 0a 20 20 20 20 20 20 | 45 4c 53 45 0a 20 20 20 |;. |ELSE. |
|00002bd0| 20 20 20 20 20 45 58 49 | 54 3b 0a 20 20 20 20 20 | EXI|T;. |
|00002be0| 20 45 4e 44 3b 0a 20 20 | 20 20 45 4e 44 3b 0a 20 | END;. | END;. |
|00002bf0| 20 20 20 49 46 20 4d 6f | 74 6f 72 28 44 72 69 76 | IF Mo|tor(Driv|
|00002c00| 00 00 00 08 00 00 04 0e | 00 00 00 6f 00 00 01 e8 |........|...o....|
|00002c10| 00 00 00 17 c6 9f 18 84 | 36 37 2a 32 29 3b 0a 0a |........|67*2);..|
|00002c20| 49 6d 67 77 69 64 74 68 | 20 5b 44 69 73 6b 5d 20 |Imgwidth| [Disk] |
|00002c30| 3a 3d 31 31 32 3b 0a 49 | 6d 67 68 65 69 67 68 74 |:=112;.I|mgheight|
|00002c40| 5b 44 69 73 6b 5d 20 3a | 3d 20 35 38 3b 0a 41 6c |[Disk] :|= 58;.Al|
|00002c50| 6c 6f 63 4d 65 6d 28 49 | 6d 61 67 65 44 61 74 61 |locMem(I|mageData|
|00002c60| 73 5b 44 69 73 6b 5d 2c | 31 34 2a 35 38 2a 32 2c |s[Disk],|14*58*2,|
|00002c70| 54 52 55 45 29 3b 0a 43 | 6f 70 79 4d 65 6d 28 41 |TRUE);.C|opyMem(A|
|00002c80| 44 52 28 44 69 73 6b 44 | 61 74 61 29 2c 49 6d 61 |DR(DiskD|ata),Ima|
|00002c90| 67 65 44 61 74 61 73 5b | 44 69 73 6b 5d 2c 31 34 |geDatas[|Disk],14|
|00002ca0| 2a 35 38 2a 32 29 3b 0a | 0a 49 6d 67 77 69 64 74 |*58*2);.|.Imgwidt|
|00002cb0| 68 20 5b 4f 70 65 6e 44 | 69 73 6b 5d 20 3a 3d 31 |h [OpenD|isk] :=1|
|00002cc0| 31 32 3b 0a 49 6d 67 68 | 65 69 67 68 74 5b 4f 70 |12;.Imgh|eight[Op|
|00002cd0| 65 6e 44 69 73 6b 5d 20 | 3a 3d 20 35 38 3b 0a 41 |enDisk] |:= 58;.A|
|00002ce0| 6c 6c 6f 63 4d 65 6d 28 | 49 6d 61 67 65 44 61 74 |llocMem(|ImageDat|
|00002cf0| 61 73 5b 4f 70 65 6e 44 | 69 73 6b 5d 2c 31 34 2a |as[OpenD|isk],14*|
|00002d00| 35 38 2a 32 2c 54 52 55 | 45 29 3b 0a 43 6f 70 79 |58*2,TRU|E);.Copy|
|00002d10| 4d 65 6d 28 41 44 52 28 | 4f 70 65 6e 44 69 73 6b |Mem(ADR(|OpenDisk|
|00002d20| 44 61 74 61 29 2c 49 6d | 61 67 65 44 61 74 61 73 |Data),Im|ageDatas|
|00002d30| 5b 4f 70 65 6e 44 69 73 | 6b 5d 2c 31 34 2a 35 38 |[OpenDis|k],14*58|
|00002d40| 2a 32 29 3b 0a 0a 49 6d | 67 77 69 64 74 68 20 5b |*2);..Im|gwidth [|
|00002d50| 42 61 63 6b 55 70 5d 20 | 3a 3d 31 30 34 3b 0a 49 |BackUp] |:=104;.I|
|00002d60| 6d 67 68 65 69 67 68 74 | 5b 42 61 63 6b 55 70 5d |mgheight|[BackUp]|
|00002d70| 20 3a 3d 20 35 33 3b 0a | 41 6c 6c 6f 63 4d 65 6d | := 53;.|AllocMem|
|00002d80| 28 49 6d 61 67 65 44 61 | 74 61 73 5b 42 61 63 6b |(ImageDa|tas[Back|
|00002d90| 55 70 5d 2c 31 34 2a 35 | 33 2a 32 2c 54 52 55 45 |Up],14*5|3*2,TRUE|
|00002da0| 29 3b 0a 43 6f 70 79 4d | 65 6d 28 41 44 52 28 42 |);.CopyM|em(ADR(B|
|00002db0| 61 63 6b 55 70 44 61 74 | 61 29 2c 49 6d 61 67 65 |ackUpDat|a),Image|
|00002dc0| 44 61 74 61 73 5b 42 61 | 63 6b 55 70 5d 2c 31 34 |Datas[Ba|ckUp],14|
|00002dd0| 2a 35 33 2a 32 29 3b 0a | 0a 49 6d 67 77 69 64 74 |*53*2);.|.Imgwidt|
|00002de0| 68 20 5b 48 42 61 63 6b | 55 70 5d 20 3a 3d 31 30 |h [HBack|Up] :=10|
|00002df0| 34 3b 0a 49 6d 67 68 65 | 69 67 68 74 5b 48 42 61 |4;.Imghe|ight[HBa|
|00002e00| 00 00 00 08 00 00 04 0e | 00 00 00 70 00 00 01 b4 |........|...p....|
|00002e10| 00 00 00 00 91 96 47 e7 | 63 6b 55 70 5d 20 3a 3d |......G.|ckUp] :=|
|00002e20| 20 35 33 3b 0a 41 6c 6c | 6f 63 4d 65 6d 28 49 6d | 53;.All|ocMem(Im|
|00002e30| 61 67 65 44 61 74 61 73 | 5b 48 42 61 63 6b 55 70 |ageDatas|[HBackUp|
|00002e40| 5d 2c 31 34 2a 35 33 2a | 32 2c 54 52 55 45 29 3b |],14*53*|2,TRUE);|
|00002e50| 0a 43 6f 70 79 4d 65 6d | 28 41 44 52 28 48 42 61 |.CopyMem|(ADR(HBa|
|00002e60| 63 6b 55 70 44 61 74 61 | 29 2c 49 6d 61 67 65 44 |ckUpData|),ImageD|
|00002e70| 61 74 61 73 5b 48 42 61 | 63 6b 55 70 5d 2c 31 34 |atas[HBa|ckUp],14|
|00002e80| 2a 35 33 2a 32 29 3b 0a | 0a 49 6d 67 77 69 64 74 |*53*2);.|.Imgwidt|
|00002e90| 68 20 5b 52 65 73 74 6f | 72 65 5d 20 3a 3d 31 30 |h [Resto|re] :=10|
|00002ea0| 34 3b 0a 49 6d 67 68 65 | 69 67 68 74 5b 52 65 73 |4;.Imghe|ight[Res|
|00002eb0| 74 6f 72 65 5d 20 3a 3d | 20 35 33 3b 0a 41 6c 6c |tore] :=| 53;.All|
|00002ec0| 6f 63 4d 65 6d 28 49 6d | 61 67 65 44 61 74 61 73 |ocMem(Im|ageDatas|
|00002ed0| 5b 52 65 73 74 6f 72 65 | 5d 2c 31 34 2a 35 33 2a |[Restore|],14*53*|
|00002ee0| 32 2c 54 52 55 45 29 3b | 0a 43 6f 70 79 4d 65 6d |2,TRUE);|.CopyMem|
|00002ef0| 28 41 44 52 28 52 65 73 | 74 6f 72 65 44 61 74 61 |(ADR(Res|toreData|
|00002f00| 29 2c 49 6d 61 67 65 44 | 61 74 61 73 5b 52 65 73 |),ImageD|atas[Res|
|00002f10| 74 6f 72 65 5d 2c 31 34 | 2a 35 33 2a 32 29 3b 0a |tore],14|*53*2);.|
|00002f20| 0a 49 6d 67 77 69 64 74 | 68 20 5b 48 52 65 73 74 |.Imgwidt|h [HRest|
|00002f30| 6f 72 65 5d 20 3a 3d 31 | 30 34 3b 0a 49 6d 67 68 |ore] :=1|04;.Imgh|
|00002f40| 65 69 67 68 74 5b 48 52 | 65 73 74 6f 72 65 5d 20 |eight[HR|estore] |
|00002f50| 3a 3d 20 35 33 3b 0a 41 | 6c 6c 6f 63 4d 65 6d 28 |:= 53;.A|llocMem(|
|00002f60| 49 6d 61 67 65 44 61 74 | 61 73 5b 48 52 65 73 74 |ImageDat|as[HRest|
|00002f70| 6f 72 65 5d 2c 31 34 2a | 35 33 2a 32 2c 54 52 55 |ore],14*|53*2,TRU|
|00002f80| 45 29 3b 0a 43 6f 70 79 | 4d 65 6d 28 41 44 52 28 |E);.Copy|Mem(ADR(|
|00002f90| 48 52 65 73 74 6f 72 65 | 44 61 74 61 29 2c 49 6d |HRestore|Data),Im|
|00002fa0| 61 67 65 44 61 74 61 73 | 5b 48 52 65 73 74 6f 72 |ageDatas|[HRestor|
|00002fb0| 65 5d 2c 31 34 2a 35 33 | 2a 32 29 3b 0a 0a 45 4e |e],14*53|*2);..EN|
|00002fc0| 44 20 48 44 49 6d 61 67 | 65 73 2e 0a 46 46 48 2c |D HDImag|es..FFH,|
|00002fd0| 20 30 46 45 30 30 48 2c | 20 28 2a 34 30 2a 29 0a | 0FE00H,| (*40*).|
|00002fe0| 20 30 30 30 30 30 48 2c | 20 30 30 30 37 46 48 2c | 00000H,| 0007FH,|
|00002ff0| 20 30 46 46 46 46 48 2c | 20 30 46 46 30 30 48 2c | 0FFFFH,| 0FF00H,|
|00003000| 00 00 00 08 00 00 04 13 | 00 00 00 02 00 00 01 e8 |........|........|
|00003010| 00 00 00 19 af 6d 9c 8c | ff f6 27 6c ff fa 00 0e |.....m..|..'l....|
|00003020| 19 7c 00 01 ff f2 19 7c | 00 08 ff f3 19 7c 00 02 |.|.....||.....|..|
|00003030| ff f4 19 7c 00 04 ff f5 | 47 ec ff f2 24 6c ff f6 |...|....|G...$l..|
|00003040| 25 4b 00 22 26 6c ff f6 | 27 7c 00 00 00 04 00 26 |%K."&l..|'|.....&|
|00003050| 70 f4 2c 7a ff 8a 4e ae | ff ee 47 fa ff 64 20 4b |p.,z..N.|..G..d K|
|00003060| 42 a7 22 6c ff f6 42 a7 | 22 1f 20 1f 2c 7a ff 78 |B."l..B.|". .,z.x|
|00003070| 4e ae fe 44 26 6c ff f6 | 1c 2b 00 1f 48 86 60 00 |N..D&l..|.+..H.`.|
|00003080| 00 b2 4e 75 19 7c ff ff | ff f1 26 6c ff f6 37 7c |..Nu.|..|..&l..7||
|00003090| 00 03 00 1c 17 7c 00 10 | 00 1e 27 6c ff ec 00 22 |.....|..|..'l..."|
|000030a0| 27 7c 00 00 00 20 00 26 | 4a 2d 00 0c 67 00 00 12 |'|... .&|J-..g...|
|000030b0| 37 7c 02 58 00 2a 37 7c | 00 64 00 2e 60 00 00 0e |7|.X.*7||.d..`...|
|000030c0| 37 7c 00 c8 00 2a 37 7c | 00 c8 00 2e 37 7c 00 40 |7|...*7||....7|.@|
|000030d0| 00 2c 70 f4 2c 7a ff 08 | 4e ae ff ee 22 6c ff f6 |.,p.,z..|N..."l..|
|000030e0| 2c 7a ff 08 4e ae ff ee | 70 f4 2c 7a fe f2 4e ae |,z..N...|p.,z..N.|
|000030f0| ff ee 22 6c ff f6 2c 7a | fe ee 4e ae fe 26 70 f4 |.."l..,z|..N..&p.|
|00003100| 2c 7a fe dc 4e ae ff ee | 22 6c ff f6 2c 7a fe d8 |,z..N...|"l..,z..|
|00003110| 4e ae fe 3e 42 2c ff f1 | 4e 75 ff 68 ff 66 ff 68 |N..>B,..|Nu.h.f.h|
|00003120| ff 68 ff 68 ff 68 ff 68 | ff 68 ff 68 ff 68 ff 68 |.h.h.h.h|.h.h.h.h|
|00003130| ff 66 47 fa ff e8 04 46 | ff f5 0c 46 00 0a 63 02 |.fG....F|...F..c.|
|00003140| 7c ff e3 46 3c 33 60 00 | 4e b3 60 00 4e 5d 28 5f ||..F<3`.|N.`.N](_|
|00003150| 20 5f 54 8f 4e d0 2f 0c | 28 7a fe 80 2f 0d 2a 4f | _T.N./.|(z../.*O|
|00003160| 4a 2c ff f1 67 00 00 18 | 70 f4 2c 7a fe 72 4e ae |J,..g...|p.,z.rN.|
|00003170| ff ee 22 6c ff f6 2c 7a | fe 6e 4e ae fe 3e 4a ac |.."l..,z|.nN..>J.|
|00003180| ff f6 67 00 00 18 70 f0 | 2c 7a fe 54 4e ae ff ee |..g...p.|,z.TN...|
|00003190| 48 6c ff f6 2c 7a fe 58 | 4e ae ff e8 4a ac ff fa |Hl..,z.X|N...J...|
|000031a0| 67 00 00 18 70 f0 2c 7a | fe 36 4e ae ff ee 2f 2c |g...p.,z|.6N.../,|
|000031b0| ff fa 2c 7a fe 36 4e ae | ff dc 4e 5d 28 5f 4e 75 |..,z.6N.|..N](_Nu|
|000031c0| 2f 0c 28 7a fe 16 2f 0d | 2a 4f 08 ec 00 00 ff fe |/.(z../.|*O......|
|000031d0| 66 00 01 36 2c 7a fe 08 | 4e ae ff fa 2c 7a fe 0c |f..6,z..|N...,z..|
|000031e0| 4e ae ff fa 2c 7a fe 08 | 4e ae ff fa 42 ac ff fa |N...,z..|N...B...|
|000031f0| 42 ac ff f6 42 2c ff f1 | 70 f0 2c 7a fd e2 4e ae |B...B,..|p.,z..N.|
|00003200| 00 00 00 08 00 00 04 13 | 00 00 00 03 00 00 01 0e |........|........|
|00003210| 00 00 00 00 5d c2 13 31 | ff ee 48 7a ff 52 2c 7a |....]..1|..Hz.R,z|
|00003220| fd d6 4e ae ff 94 70 eb | 2c 7a fd cc 4e ae ff ee |..N...p.|,z..N...|
|00003230| 48 6c ff ec 2f 3c 00 00 | 00 20 1f 3c ff ff 2c 7a |Hl../<..|. .<..,z|
|00003240| fd c6 4e ae ff f4 70 ef | 2c 7a fd ac 4e ae ff ee |..N...p.|,z..N...|
|00003250| 4a ac ff ec 56 c6 1f 06 | 47 fa fd 70 2f 0b 2c 7a |J...V...|G..p/.,z|
|00003260| fd 96 4e ae ff ca 42 6c | ff ea 0c 6c 00 10 ff ea |..N...Bl|...l....|
|00003270| 6e 00 00 34 3c 2c ff ea | 4d bc 00 1f 26 6c ff ec |n..4<,..|M...&l..|
|00003280| 17 bc ff 80 60 00 7c 20 | 9c 6c ff ea 4e 76 53 46 |....`.| |.l..NvSF|
|00003290| 4e 76 4d bc 00 1f 26 6c | ff ec 17 bc 00 7f 60 00 |NvM...&l|......`.|
|000032a0| 52 6c ff ea 68 c4 70 ef | 2c 7a fd 4c 4e ae ff ee |Rl..h.p.|,z.LN...|
|000032b0| 47 fa fd 12 2f 0b 42 27 | 2c 7a fd 48 4e ae ff e2 |G.../.B'|,z.HN...|
|000032c0| 29 40 ff fa 70 ef 2c 7a | fd 2e 4e ae ff ee 4a ac |)@..p.,z|..N...J.|
|000032d0| ff fa 56 c6 1f 06 47 fa | fc dc 2f 0b 2c 7a fd 18 |..V...G.|../.,z..|
|000032e0| 4e ae ff ca 70 ec 2c 7a | fd 0e 4e ae ff ee 48 6c |N...p.,z|..N...Hl|
|000032f0| ff f6 2f 3c 00 00 00 44 | 2c 7a fd 0c 4e ae ff ee |../<...D|,z..N...|
|00003300| 70 ef 2c 7a fc f2 4e ae | ff ee 4a ac ff f6 56 c6 |p.,z..N.|..J...V.|
|00003310| 1f 06 47 fa fc 90 2f 0b | 2c 7a fc dc 4e ae ff ca |..G.../.|,z..N...|
|00003320| 4e 5d 28 5f 4e 75 70 70 | 6f 72 74 00 00 00 00 00 |N](_Nupp|ort.....|
|00003330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003340| 0d de 01 33 02 fe 00 01 | 48 65 61 70 00 00 00 00 |...3....|Heap....|
|00003350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003360| 00 00 00 00 00 00 00 00 | 0d de 01 3a 04 e0 00 00 |........|...:....|
|00003370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000033e0| 00 00 00 00 00 00 60 00 | 01 c0 2f 0c 28 7a ff d4 |......`.|../.(z..|
|000033f0| 2f 0d 2a 4f 26 6c ff f6 | 17 7c ff d8 00 09 26 6c |/.*O&l..|.|....&l|
|00003400| 00 00 00 08 00 00 04 15 | 00 00 00 02 00 00 01 e8 |........|........|
|00003410| 00 00 00 1b 09 3f 10 07 | 0a 20 20 20 20 20 20 20 |.....?..|. |
|00003420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003430| 20 20 20 20 20 20 53 65 | 74 43 6f 6d 6d 65 6e 74 | Se|tComment|
|00003440| 2c 20 44 65 6c 65 74 65 | 46 69 6c 65 3b 0a 0a 46 |, Delete|File;..F|
|00003450| 52 4f 4d 20 45 78 65 63 | 20 20 20 20 20 20 20 20 |ROM Exec| |
|00003460| 20 20 20 20 20 49 4d 50 | 4f 52 54 20 42 79 74 65 | IMP|ORT Byte|
|00003470| 2c 20 43 6f 70 79 4d 65 | 6d 2c 20 47 65 74 4d 73 |, CopyMe|m, GetMs|
|00003480| 67 2c 20 52 65 70 6c 79 | 4d 73 67 3b 0a 0a 46 52 |g, Reply|Msg;..FR|
|00003490| 4f 4d 20 47 72 61 70 68 | 69 63 73 20 20 20 20 20 |OM Graph|ics |
|000034a0| 20 20 20 20 49 4d 50 4f | 52 54 20 53 65 74 41 50 | IMPO|RT SetAP|
|000034b0| 65 6e 2c 20 53 65 74 42 | 50 65 6e 2c 20 53 65 74 |en, SetB|Pen, Set|
|000034c0| 44 72 4d 64 2c 20 6a 61 | 6d 31 2c 20 6a 61 6d 32 |DrMd, ja|m1, jam2|
|000034d0| 2c 20 52 65 63 74 46 69 | 6c 6c 3b 0a 0a 46 52 4f |, RectFi|ll;..FRO|
|000034e0| 4d 20 48 65 61 70 20 20 | 20 20 20 20 20 20 20 20 |M Heap | |
|000034f0| 20 20 20 49 4d 50 4f 52 | 54 20 41 6c 6c 6f 63 4d | IMPOR|T AllocM|
|00003500| 65 6d 2c 20 44 65 61 6c | 6c 6f 63 61 74 65 3b 0a |em, Deal|locate;.|
|00003510| 0a 46 52 4f 4d 20 49 6e | 74 75 69 74 69 6f 6e 20 |.FROM In|tuition |
|00003520| 20 20 20 20 20 20 20 49 | 4d 50 4f 52 54 20 47 61 | I|MPORT Ga|
|00003530| 64 67 65 74 46 6c 61 67 | 73 2c 20 47 61 64 67 65 |dgetFlag|s, Gadge|
|00003540| 74 46 6c 61 67 53 65 74 | 2c 20 49 6e 74 75 69 4d |tFlagSet|, IntuiM|
|00003550| 65 73 73 61 67 65 50 74 | 72 2c 0a 20 20 20 20 20 |essagePt|r,. |
|00003560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003570| 20 20 20 20 20 20 20 20 | 49 44 43 4d 50 46 6c 61 | |IDCMPFla|
|00003580| 67 73 2c 20 49 44 43 4d | 50 46 6c 61 67 53 65 74 |gs, IDCM|PFlagSet|
|00003590| 2c 20 52 65 66 72 65 73 | 68 47 61 64 67 65 74 73 |, Refres|hGadgets|
|000035a0| 3b 0a 0a 46 52 4f 4d 20 | 53 74 72 69 6e 67 73 20 |;..FROM |Strings |
|000035b0| 20 20 20 20 20 20 20 20 | 20 49 4d 50 4f 52 54 20 | | IMPORT |
|000035c0| 66 69 72 73 74 2c 20 6c | 61 73 74 2c 20 49 6e 73 |first, l|ast, Ins|
|000035d0| 65 72 74 2c 20 4c 65 6e | 67 74 68 2c 20 43 6f 70 |ert, Len|gth, Cop|
|000035e0| 79 3b 0a 0a 46 52 4f 4d | 20 54 72 61 63 6b 44 69 |y;..FROM| TrackDi|
|000035f0| 73 6b 20 20 20 20 20 20 | 20 20 49 4d 50 4f 52 54 |sk | IMPORT|
|00003600| 00 00 00 08 00 00 04 15 | 00 00 00 03 00 00 01 e8 |........|........|
|00003610| 00 00 00 1c 60 b4 12 eb | 20 6e 6f 74 53 70 65 63 |....`...| notSpec|
|00003620| 69 66 69 65 64 2c 20 6e | 6f 53 65 63 48 64 72 2c |ified, n|oSecHdr,|
|00003630| 20 62 61 64 53 65 63 50 | 72 65 61 6d 62 6c 65 2c | badSecP|reamble,|
|00003640| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00003650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 62 61 | | ba|
|00003660| 64 53 65 63 49 64 2c 20 | 62 61 64 48 64 72 53 75 |dSecId, |badHdrSu|
|00003670| 6d 2c 20 62 61 64 53 65 | 63 53 75 6d 2c 20 74 6f |m, badSe|cSum, to|
|00003680| 6f 46 65 77 53 65 63 73 | 2c 0a 20 20 20 20 20 20 |oFewSecs|,. |
|00003690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000036a0| 20 20 20 20 20 20 20 62 | 61 64 53 65 63 48 64 72 | b|adSecHdr|
|000036b0| 2c 20 77 72 69 74 65 50 | 72 6f 74 2c 20 64 69 73 |, writeP|rot, dis|
|000036c0| 6b 43 68 61 6e 67 65 64 | 2c 20 73 65 65 6b 45 72 |kChanged|, seekEr|
|000036d0| 72 6f 72 2c 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ror,. | |
|000036e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000036f0| 20 20 6e 6f 4d 65 6d 2c | 20 62 61 64 55 6e 69 74 | noMem,| badUnit|
|00003700| 4e 75 6d 2c 20 62 61 64 | 44 72 69 76 65 54 79 70 |Num, bad|DriveTyp|
|00003710| 65 2c 20 64 72 69 76 65 | 49 6e 55 73 65 2c 0a 20 |e, drive|InUse,. |
|00003720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003730| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 6f 73 74 | | post|
|00003740| 52 65 73 65 74 3b 0a 0a | 46 52 4f 4d 20 54 72 61 |Reset;..|FROM Tra|
|00003750| 63 6b 44 69 73 6b 53 75 | 70 70 6f 72 74 20 49 4d |ckDiskSu|pport IM|
|00003760| 50 4f 52 54 20 4f 70 65 | 6e 54 72 61 63 6b 44 69 |PORT Ope|nTrackDi|
|00003770| 73 6b 2c 20 46 6f 72 6d | 61 74 54 72 61 63 6b 2c |sk, Form|atTrack,|
|00003780| 20 52 65 61 64 42 6c 6f | 63 6b 2c 20 4d 6f 74 6f | ReadBlo|ck, Moto|
|00003790| 72 2c 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |r,. | |
|000037a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000037b0| 47 65 74 4e 75 6d 54 72 | 61 63 6b 73 2c 20 43 6c |GetNumTr|acks, Cl|
|000037c0| 6f 73 65 54 72 61 63 6b | 44 69 73 6b 2c 20 47 65 |oseTrack|Disk, Ge|
|000037d0| 74 44 69 73 6b 43 68 61 | 6e 67 65 2c 0a 20 20 20 |tDiskCha|nge,. |
|000037e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000037f0| 20 20 20 20 20 20 20 20 | 20 20 43 68 61 6e 67 65 | | Change|
|00003800| 00 00 00 08 00 00 04 15 | 00 00 00 04 00 00 01 e8 |........|........|
|00003810| 00 00 00 1d 68 f4 6f a2 | 53 74 61 74 65 2c 20 52 |....h.o.|State, R|
|00003820| 65 61 64 43 79 63 53 65 | 63 3b 0a 0a 46 52 4f 4d |eadCycSe|c;..FROM|
|00003830| 20 48 44 44 69 73 70 6c | 61 79 20 20 20 20 20 20 | HDDispl|ay |
|00003840| 20 20 49 4d 50 4f 52 54 | 20 67 61 64 67 65 74 73 | IMPORT| gadgets|
|00003850| 2c 20 52 65 71 52 65 73 | 75 6c 74 73 2c 20 47 61 |, ReqRes|ults, Ga|
|00003860| 64 67 65 74 73 2c 20 52 | 50 2c 20 48 44 4e 61 6d |dgets, R|P, HDNam|
|00003870| 65 2c 20 54 79 70 65 2c | 0a 20 20 20 20 20 20 20 |e, Type,|. |
|00003880| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003890| 20 20 20 20 20 20 48 44 | 52 65 71 75 65 73 74 2c | HD|Request,|
|000038a0| 20 57 69 6e 64 6f 77 3b | 0a 0a 0a 28 2a 2d 2d 2d | Window;|...(*---|
|000038b0| 2d 2d 2d 20 20 43 4f 4e | 54 73 3a 20 20 2d 2d 2d |--- CON|Ts: ---|
|000038c0| 2d 2d 2d 2a 29 0a 0a 43 | 4f 4e 53 54 0a 20 20 54 |---*)..C|ONST. T|
|000038d0| 72 61 63 6b 53 69 7a 65 | 20 3d 20 35 31 32 2a 32 |rackSize| = 512*2|
|000038e0| 32 3b 0a 20 20 47 6f 72 | 6b 73 20 3d 20 22 47 6f |2;. Gor|ks = "Go|
|000038f0| 72 6b 73 21 3f 21 22 3b | 0a 20 20 45 6e 64 65 49 |rks!?!";|. EndeI|
|00003900| 44 20 3d 20 22 42 6b 55 | 70 45 6e 64 65 22 3b 0a |D = "BkU|pEnde";.|
|00003910| 0a 28 2a 2d 2d 2d 2d 2d | 2d 20 20 54 59 50 45 73 |.(*-----|- TYPEs|
|00003920| 3a 20 20 2d 2d 2d 2d 2d | 2d 2a 29 0a 0a 54 59 50 |: -----|-*)..TYP|
|00003930| 45 0a 20 20 52 65 73 20 | 3d 20 28 6f 6b 2c 63 6f |E. Res |= (ok,co|
|00003940| 6e 74 69 6e 75 65 2c 63 | 61 6e 63 65 6c 29 3b 0a |ntinue,c|ancel);.|
|00003950| 20 20 53 74 72 69 6e 67 | 20 3d 20 41 52 52 41 59 | String| = ARRAY|
|00003960| 5b 30 2e 2e 32 35 35 5d | 20 4f 46 20 43 48 41 52 |[0..255]| OF CHAR|
|00003970| 3b 0a 20 20 4d 79 46 69 | 6c 65 54 79 70 65 20 3d |;. MyFi|leType =|
|00003980| 20 52 45 43 4f 52 44 0a | 20 20 20 20 67 6f 72 6b | RECORD.| gork|
|00003990| 73 3a 20 41 52 52 41 59 | 5b 30 2e 2e 37 5d 20 4f |s: ARRAY|[0..7] O|
|000039a0| 46 20 43 48 41 52 3b 20 | 20 20 20 28 2a 20 20 20 |F CHAR; | (* |
|000039b0| 30 20 3d 20 20 20 30 20 | 2a 29 0a 20 20 20 20 62 |0 = 0 |*). b|
|000039c0| 79 74 65 3a 20 20 4c 4f | 4e 47 43 41 52 44 3b 20 |yte: LO|NGCARD; |
|000039d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 2a | | (*|
|000039e0| 20 20 20 38 20 3d 20 20 | 20 38 20 2a 29 0a 20 20 | 8 = | 8 *). |
|000039f0| 20 20 70 72 6f 74 3a 20 | 20 4c 4f 4e 47 53 45 54 | prot: | LONGSET|
|00003a00| 00 00 00 08 00 00 04 15 | 00 00 00 05 00 00 01 e8 |........|........|
|00003a10| 00 00 00 1e 55 90 1f 34 | 3b 20 20 20 20 20 20 20 |....U..4|; |
|00003a20| 20 20 20 20 20 20 20 20 | 20 28 2a 20 20 31 32 20 | | (* 12 |
|00003a30| 3d 20 20 20 43 20 2a 29 | 0a 20 20 20 20 6e 61 6d |= C *)|. nam|
|00003a40| 65 3a 20 20 41 52 52 41 | 59 5b 30 2e 2e 31 30 37 |e: ARRA|Y[0..107|
|00003a50| 5d 20 4f 46 20 43 48 41 | 52 3b 20 20 28 2a 20 20 |] OF CHA|R; (* |
|00003a60| 31 36 20 3d 20 20 31 30 | 20 2a 29 0a 20 20 20 20 |16 = 10| *). |
|00003a70| 63 6f 6d 6d 3a 20 20 41 | 52 52 41 59 5b 30 2e 2e |comm: A|RRAY[0..|
|00003a80| 31 31 35 5d 20 4f 46 20 | 43 48 41 52 3b 20 20 28 |115] OF |CHAR; (|
|00003a90| 2a 20 31 32 34 20 3d 20 | 20 37 43 20 2a 29 0a 20 |* 124 = | 7C *). |
|00003aa0| 20 20 20 53 69 7a 65 3a | 20 20 4c 4f 4e 47 43 41 | Size:| LONGCA|
|00003ab0| 52 44 3b 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |RD; | |
|00003ac0| 20 20 28 2a 20 32 34 30 | 20 3d 20 20 46 30 20 2a | (* 240| = F0 *|
|00003ad0| 29 0a 20 20 20 20 70 61 | 74 68 3a 20 20 53 74 72 |). pa|th: Str|
|00003ae0| 69 6e 67 3b 20 20 20 20 | 20 20 20 20 20 20 20 20 |ing; | |
|00003af0| 20 20 20 20 20 28 2a 20 | 32 34 34 20 3d 20 20 46 | (* |244 = F|
|00003b00| 34 20 2a 29 0a 20 20 45 | 4e 44 3b 20 20 20 20 20 |4 *). E|ND; |
|00003b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003b20| 20 20 20 20 20 20 20 20 | 28 2a 20 35 30 30 20 3d | |(* 500 =|
|00003b30| 20 31 46 34 20 2a 29 0a | 20 20 28 2a 20 44 61 6e | 1F4 *).| (* Dan|
|00003b40| 61 63 68 20 4d 79 46 69 | 6c 65 54 79 70 65 2e 73 |ach MyFi|leType.s|
|00003b50| 69 7a 65 20 42 79 74 65 | 73 20 64 61 74 61 20 75 |ize Byte|s data u|
|00003b60| 6e 64 20 62 69 73 20 7a | 75 20 33 20 70 61 64 2d |nd bis z|u 3 pad-|
|00003b70| 42 79 74 65 73 20 2a 29 | 0a 20 20 45 6e 64 65 54 |Bytes *)|. EndeT|
|00003b80| 79 70 65 20 3d 20 52 45 | 43 4f 52 44 0a 20 20 20 |ype = RE|CORD. |
|00003b90| 20 65 6e 64 65 49 44 3a | 20 41 52 52 41 59 5b 30 | endeID:| ARRAY[0|
|00003ba0| 2e 2e 37 5d 20 4f 46 20 | 43 48 41 52 3b 0a 20 20 |..7] OF |CHAR;. |
|00003bb0| 20 20 62 79 74 65 3a 20 | 4c 4f 4e 47 43 41 52 44 | byte: |LONGCARD|
|00003bc0| 3b 0a 20 20 45 4e 44 3b | 0a 20 20 28 2a 20 68 69 |;. END;|. (* hi|
|00003bd0| 6e 74 65 72 20 6c 65 74 | 7a 74 65 6d 20 46 69 6c |nter let|ztem Fil|
|00003be0| 65 20 2a 29 0a 0a 28 2a | 20 42 61 63 6b 55 70 20 |e *)..(*| BackUp |
|00003bf0| 2d 20 46 6f 72 6d 61 74 | 3a 0a 20 20 20 20 20 41 |- Format|:. A|
|00003c00| 00 00 00 08 00 00 04 15 | 00 00 00 06 00 00 01 e8 |........|........|
|00003c10| 00 00 00 1f 34 af ba 3c | 6d 20 41 6e 66 61 6e 67 |....4..<|m Anfang|
|00003c20| 20 6a 65 64 65 72 20 44 | 69 73 6b 6b 65 74 74 65 | jeder D|iskkette|
|00003c30| 20 3a 0a 20 20 20 20 20 | 42 79 74 65 20 30 2e 2e | :. |Byte 0..|
|00003c40| 33 20 3a 20 22 42 6b 55 | 70 22 0a 20 20 20 20 20 |3 : "BkU|p". |
|00003c50| 20 20 20 20 20 34 2e 2e | 35 20 3a 20 49 64 65 6e | 4..|5 : Iden|
|00003c60| 74 69 66 69 65 72 20 64 | 65 72 20 42 61 63 6b 55 |tifier d|er BackU|
|00003c70| 70 2d 52 65 69 68 65 0a | 20 20 20 20 20 20 20 20 |p-Reihe.| |
|00003c80| 20 20 36 20 20 20 20 3a | 20 44 69 73 6b 65 74 74 | 6 :| Diskett|
|00003c90| 65 6e 20 4e 75 6d 6d 65 | 72 0a 20 20 20 20 20 20 |en Numme|r. |
|00003ca0| 20 20 20 20 37 20 20 20 | 20 3a 20 56 65 72 73 69 | 7 | : Versi|
|00003cb0| 6f 6e 20 28 30 29 0a 20 | 20 20 20 20 44 65 72 20 |on (0). | Der |
|00003cc0| 52 65 73 74 20 61 6c 6c | 65 72 20 44 69 73 6b 65 |Rest all|er Diske|
|00003cd0| 74 74 65 6e 20 77 69 72 | 64 20 61 6c 73 20 65 69 |tten wir|d als ei|
|00003ce0| 6e 20 67 72 6f df 65 72 | 20 42 6c 6f 63 6b 20 61 |n gro.er| Block a|
|00003cf0| 6e 67 65 73 65 68 65 6e | 2e 0a 20 20 20 20 20 45 |ngesehen|.. E|
|00003d00| 72 20 65 6e 74 68 e4 6c | 74 20 66 fc 72 20 6a 65 |r enth.l|t f.r je|
|00003d10| 64 65 73 20 46 69 6c 65 | 20 65 69 6e 65 6e 20 60 |des File| einen `|
|00003d20| 4d 79 46 69 6c 65 54 79 | 70 65 27 20 67 65 66 6f |MyFileTy|pe' gefo|
|00003d30| 6c 67 74 20 76 6f 6e 20 | 64 65 6d 0a 20 20 20 20 |lgt von |dem. |
|00003d40| 20 46 69 6c 65 69 6e 68 | 61 6c 74 20 75 6e 64 20 | Fileinh|alt und |
|00003d50| 20 62 69 73 20 7a 75 20 | 33 20 50 61 64 2d 42 79 | bis zu |3 Pad-By|
|00003d60| 74 65 73 2e 20 48 69 6e | 74 65 72 20 64 65 6d 20 |tes. Hin|ter dem |
|00003d70| 6c 65 74 7a 65 6e 20 46 | 69 6c 65 20 69 73 74 20 |letzen F|ile ist |
|00003d80| 65 69 6e 0a 20 20 20 20 | 20 60 45 6e 64 65 49 44 |ein. | `EndeID|
|00003d90| 27 2e 20 20 2a 29 0a 0a | 0a 28 2a 2d 2d 2d 2d 2d |'. *)..|.(*-----|
|00003da0| 2d 20 20 56 41 52 73 3a | 20 20 2d 2d 2d 2d 2d 2d |- VARs:| ------|
|00003db0| 2a 29 0a 0a 56 41 52 0a | 20 20 54 72 61 63 6b 42 |*)..VAR.| TrackB|
|00003dc0| 75 66 66 65 72 3a 20 50 | 4f 49 4e 54 45 52 20 54 |uffer: P|OINTER T|
|00003dd0| 4f 20 41 52 52 41 59 5b | 30 2e 2e 54 72 61 63 6b |O ARRAY[|0..Track|
|00003de0| 53 69 7a 65 2d 31 5d 20 | 4f 46 20 43 48 41 52 3b |Size-1] |OF CHAR;|
|00003df0| 0a 20 20 41 63 74 54 72 | 61 63 6b 3a 20 43 41 52 |. ActTr|ack: CAR|
|00003e00| 00 00 00 08 00 00 04 15 | 00 00 00 07 00 00 01 e8 |........|........|
|00003e10| 00 00 00 20 54 a9 5c 86 | 44 49 4e 41 4c 3b 0a 20 |... T.\.|DINAL;. |
|00003e20| 20 54 72 61 63 6b 42 75 | 66 66 65 72 43 6e 74 3a | TrackBu|fferCnt:|
|00003e30| 20 43 41 52 44 49 4e 41 | 4c 3b 0a 20 20 44 69 73 | CARDINA|L;. Dis|
|00003e40| 6b 43 68 61 6e 67 65 3a | 20 4c 4f 4e 47 43 41 52 |kChange:| LONGCAR|
|00003e50| 44 3b 0a 20 20 44 69 73 | 6b 4e 75 6d 3a 20 43 41 |D;. Dis|kNum: CA|
|00003e60| 52 44 49 4e 41 4c 3b 0a | 20 20 44 61 74 75 6d 3a |RDINAL;.| Datum:|
|00003e70| 20 44 61 74 65 50 74 72 | 3b 0a 20 20 52 65 71 53 | DatePtr|;. ReqS|
|00003e80| 74 72 3a 20 41 52 52 41 | 59 5b 30 2e 2e 33 39 5d |tr: ARRA|Y[0..39]|
|00003e90| 20 4f 46 20 43 48 41 52 | 3b 0a 20 20 62 6f 6f 6c | OF CHAR|;. bool|
|00003ea0| 3a 20 42 4f 4f 4c 45 41 | 4e 3b 0a 20 20 4d 79 46 |: BOOLEA|N;. MyF|
|00003eb0| 69 6c 65 49 6e 66 6f 3a | 20 4d 79 46 69 6c 65 54 |ileInfo:| MyFileT|
|00003ec0| 79 70 65 3b 0a 20 20 4d | 79 4c 6f 63 6b 3a 20 46 |ype;. M|yLock: F|
|00003ed0| 69 6c 65 4c 6f 63 6b 50 | 74 72 3b 0a 20 20 46 69 |ileLockP|tr;. Fi|
|00003ee0| 6c 65 3a 20 46 69 6c 65 | 48 61 6e 64 6c 65 50 74 |le: File|HandlePt|
|00003ef0| 72 3b 0a 0a 28 2a 2d 2d | 2d 2d 2d 2d 20 20 46 61 |r;..(*--|---- Fa|
|00003f00| 73 74 20 56 61 6c 20 74 | 6f 20 53 74 72 69 6e 67 |st Val t|o String|
|00003f10| 3a 20 20 2d 2d 2d 2d 2d | 2d 2a 29 0a 0a 50 52 4f |: -----|-*)..PRO|
|00003f20| 43 45 44 55 52 45 20 4d | 61 6b 65 32 44 69 67 69 |CEDURE M|ake2Digi|
|00003f30| 74 73 28 78 3a 20 49 4e | 54 45 47 45 52 3b 20 61 |ts(x: IN|TEGER; a|
|00003f40| 74 3a 20 43 41 52 44 49 | 4e 41 4c 29 3b 0a 28 2a |t: CARDI|NAL);.(*|
|00003f50| 20 6d 61 63 68 74 20 61 | 75 73 20 78 20 65 69 6e | macht a|us x ein|
|00003f60| 65 20 32 20 2d 20 5a 69 | 66 66 65 72 20 5a 61 68 |e 2 - Zi|ffer Zah|
|00003f70| 6c 20 61 6e 20 64 65 72 | 20 53 74 65 6c 6c 65 20 |l an der| Stelle |
|00003f80| 61 74 20 69 6e 20 52 65 | 71 53 74 72 20 2a 29 0a |at in Re|qStr *).|
|00003f90| 42 45 47 49 4e 0a 20 20 | 52 65 71 53 74 72 5b 61 |BEGIN. |ReqStr[a|
|00003fa0| 74 20 20 5d 20 3a 3d 20 | 43 48 41 52 28 4f 52 44 |t ] := |CHAR(ORD|
|00003fb0| 28 22 30 22 29 20 2b 20 | 78 20 44 49 56 20 31 30 |("0") + |x DIV 10|
|00003fc0| 29 3b 0a 20 20 52 65 71 | 53 74 72 5b 61 74 2b 31 |);. Req|Str[at+1|
|00003fd0| 5d 20 3a 3d 20 43 48 41 | 52 28 4f 52 44 28 22 30 |] := CHA|R(ORD("0|
|00003fe0| 22 29 20 2b 20 78 20 2d | 20 28 78 20 44 49 56 20 |") + x -| (x DIV |
|00003ff0| 31 30 29 20 2a 20 31 30 | 29 3b 0a 45 4e 44 20 4d |10) * 10|);.END M|
|00004000| 00 00 00 08 00 00 04 15 | 00 00 00 08 00 00 01 e8 |........|........|
|00004010| 00 00 00 0b 18 71 e7 d5 | 61 6b 65 32 44 69 67 69 |.....q..|ake2Digi|
|00004020| 74 73 3b 0a 0a 28 2a 2d | 2d 2d 2d 2d 2d 20 20 54 |ts;..(*-|----- T|
|00004030| 79 70 65 20 50 61 74 68 | 6e 61 6d 65 3a 20 20 2d |ype Path|name: -|
|00004040| 2d 2d 2d 2d 2d 2a 29 0a | 0a 50 52 4f 43 45 44 55 |-----*).|.PROCEDU|
|00004050| 52 45 20 54 79 70 65 50 | 61 74 68 28 50 61 74 68 |RE TypeP|ath(Path|
|00004060| 3a 20 41 52 52 41 59 20 | 4f 46 20 43 48 41 52 29 |: ARRAY |OF CHAR)|
|00004070| 3b 0a 0a 42 45 47 49 4e | 0a 20 20 53 65 74 41 50 |;..BEGIN|. SetAP|
|00004080| 65 6e 28 52 50 2c 30 29 | 3b 20 53 65 74 42 50 65 |en(RP,0)|; SetBPe|
|00004090| 6e 28 52 50 2c 30 29 3b | 20 53 65 74 44 72 4d 64 |n(RP,0);| SetDrMd|
|000040a0| 28 52 50 2c 6a 61 6d 32 | 29 3b 0a 20 20 52 65 63 |(RP,jam2|);. Rec|
|000040b0| 74 46 69 6c 6c 28 52 50 | 2c 31 30 30 2c 31 34 34 |tFill(RP|,100,144|
|000040c0| 2c 36 31 32 2c 31 35 31 | 29 3b 0a 20 20 53 65 74 |,612,151|);. Set|
|000040d0| 41 50 65 6e 28 52 50 2c | 31 29 3b 0a 20 20 49 46 |APen(RP,|1);. IF|
|000040e0| 20 4c 65 6e 67 74 68 28 | 50 61 74 68 29 3c 36 34 | Length(|Path)<64|
|000040f0| 20 54 48 45 4e 0a 20 20 | 20 20 54 79 70 65 28 31 | THEN. | Type(1|
|00004100| 30 30 2c 31 35 30 2c 50 | 61 74 68 29 3b 0a 20 20 |00,150,P|ath);. |
|00004110| 45 4c 53 45 0a 20 20 20 | 20 50 61 74 68 5b 36 34 |ELSE. | Path[64|
|00004120| 5d 20 3a 3d 20 30 43 3b | 0a 20 20 20 20 54 79 70 |] := 0C;|. Typ|
|00004130| 65 28 31 30 30 2c 31 35 | 30 2c 50 61 74 68 29 3b |e(100,15|0,Path);|
|00004140| 0a 20 20 45 4e 44 3b 0a | 45 4e 44 20 54 79 70 65 |. END;.|END Type|
|00004150| 50 61 74 68 3b 0a 0a 50 | 52 4f 43 45 44 55 52 45 |Path;..P|ROCEDURE|
|00004160| 20 54 79 70 65 4e 61 6d | 65 28 4e 61 6d 65 3a 20 | TypeNam|e(Name: |
|00004170| 41 52 52 41 59 20 4f 46 | 20 43 48 41 52 29 3b 0a |ARRAY OF| CHAR);.|
|00004180| 0a 42 45 47 49 4e 0a 20 | 20 53 65 74 41 50 65 6e |.BEGIN. | SetAPen|
|00004190| 28 52 50 2c 30 29 3b 20 | 53 65 74 42 50 65 6e 28 |(RP,0); |SetBPen(|
|000041a0| 52 50 2c 30 29 3b 20 53 | 65 74 44 72 4d 64 28 52 |RP,0); S|etDrMd(R|
|000041b0| 50 2c 6a 61 6d 32 29 3b | 0a 20 20 52 65 63 74 46 |P,jam2);|. RectF|
|000041c0| 69 6c 6c 28 52 50 2c 31 | 30 30 2c 31 36 34 2c 36 |ill(RP,1|00,164,6|
|000041d0| 31 32 2c 31 37 31 29 3b | 0a 20 20 53 65 74 41 50 |12,171);|. SetAP|
|000041e0| 65 6e 28 52 50 2c 31 29 | 3b 0a 20 20 49 46 20 4c |en(RP,1)|;. IF L|
|000041f0| 65 6e 67 74 68 28 4e 61 | 6d 65 29 3c 36 34 20 54 |ength(Na|me)<64 T|
|00004200| 00 00 00 08 00 00 04 0e | 00 00 00 64 00 00 01 e8 |........|...d....|
|00004210| 00 00 00 22 aa 62 44 e8 | 2c 20 30 46 46 46 46 48 |...".bD.|, 0FFFFH|
|00004220| 2c 20 30 46 39 39 43 48 | 2c 20 30 33 43 31 43 48 |, 0F99CH|, 03C1CH|
|00004230| 2c 20 30 31 43 33 31 48 | 2c 20 30 33 43 33 46 48 |, 01C31H|, 03C3FH|
|00004240| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 32 36 2a 29 |, 0FF00H|, (*26*)|
|00004250| 0a 20 30 30 30 33 46 48 | 2c 20 30 46 46 46 46 48 |. 0003FH|, 0FFFFH|
|00004260| 2c 20 30 46 38 33 39 48 | 2c 20 30 39 39 46 45 48 |, 0F839H|, 099FEH|
|00004270| 2c 20 30 37 39 39 38 48 | 2c 20 30 39 39 39 46 48 |, 07998H|, 0999FH|
|00004280| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 32 37 2a 29 |, 0FF00H|, (*27*)|
|00004290| 0a 20 30 30 30 30 46 48 | 2c 20 30 46 46 46 46 48 |. 0000FH|, 0FFFFH|
|000042a0| 2c 20 30 46 39 33 38 48 | 2c 20 30 31 43 33 45 48 |, 0F938H|, 01C3EH|
|000042b0| 2c 20 30 37 39 39 39 48 | 2c 20 30 39 38 31 46 48 |, 07999H|, 0981FH|
|000042c0| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 32 38 2a 29 |, 0FF00H|, (*28*)|
|000042d0| 0a 20 30 30 30 30 33 48 | 2c 20 30 46 46 46 46 48 |. 00003H|, 0FFFFH|
|000042e0| 2c 20 30 46 39 39 39 48 | 2c 20 30 46 46 39 45 48 |, 0F999H|, 0FF9EH|
|000042f0| 2c 20 30 35 39 39 39 48 | 2c 20 30 46 39 46 46 48 |, 05999H|, 0F9FFH|
|00004300| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 32 39 2a 29 |, 0FF00H|, (*29*)|
|00004310| 0a 20 30 30 30 30 30 48 | 2c 20 30 46 46 46 46 48 |. 00000H|, 0FFFFH|
|00004320| 2c 20 30 46 31 43 43 48 | 2c 20 30 33 38 33 46 48 |, 0F1CCH|, 0383FH|
|00004330| 2c 20 30 33 43 33 30 48 | 2c 20 30 46 43 33 46 48 |, 03C30H|, 0FC3FH|
|00004340| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 33 30 2a 29 |, 0FF00H|, (*30*)|
|00004350| 0a 20 30 30 30 30 30 48 | 2c 20 30 33 46 46 46 48 |. 00000H|, 03FFFH|
|00004360| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|00004370| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|00004380| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 33 31 2a 29 |, 0FF00H|, (*31*)|
|00004390| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 46 46 46 48 |. 00000H|, 00FFFH|
|000043a0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|000043b0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|000043c0| 2c 20 30 46 46 30 30 48 | 2c 20 28 2a 33 32 2a 29 |, 0FF00H|, (*32*)|
|000043d0| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 33 46 46 48 |. 00000H|, 003FFH|
|000043e0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|000043f0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|00004400| 00 00 00 08 00 00 04 0e | 00 00 00 65 00 00 01 e8 |........|...e....|
|00004410| 00 00 00 23 ef 1e b1 23 | 2c 20 30 46 46 30 30 48 |...#...#|, 0FF00H|
|00004420| 2c 20 28 2a 33 33 2a 29 | 0a 20 30 30 30 30 30 48 |, (*33*)|. 00000H|
|00004430| 2c 20 30 30 30 46 46 48 | 2c 20 30 46 46 46 46 48 |, 000FFH|, 0FFFFH|
|00004440| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|00004450| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 30 30 48 |, 0FFFFH|, 0FF00H|
|00004460| 2c 20 28 2a 33 34 2a 29 | 0a 20 30 30 30 30 30 48 |, (*34*)|. 00000H|
|00004470| 2c 20 30 30 30 33 46 48 | 2c 20 30 46 46 46 46 48 |, 0003FH|, 0FFFFH|
|00004480| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|00004490| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 30 30 48 |, 0FFFFH|, 0FF00H|
|000044a0| 2c 20 28 2a 33 35 2a 29 | 0a 20 30 30 30 30 30 48 |, (*35*)|. 00000H|
|000044b0| 2c 20 30 30 30 30 46 48 | 2c 20 30 46 46 46 46 48 |, 0000FH|, 0FFFFH|
|000044c0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 46 46 48 |, 0FFFFH|, 0FFFFH|
|000044d0| 2c 20 30 46 46 46 46 48 | 2c 20 30 46 46 30 30 48 |, 0FFFFH|, 0FF00H|
|000044e0| 2c 20 28 2a 33 36 2a 29 | 0a 20 30 30 30 30 30 48 |, (*36*)|. 00000H|
|000044f0| 2c 20 30 30 30 30 33 48 | 2c 20 30 46 46 46 46 48 |, 00003H|, 0FFFFH|
|00004500| 2c 20 30 46 43 30 30 48 | 2c 20 30 30 30 30 30 48 |, 0FC00H|, 00000H|
|00004510| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004520| 2c 20 28 2a 33 37 2a 29 | 0a 20 30 30 30 30 30 48 |, (*37*)|. 00000H|
|00004530| 2c 20 30 30 30 30 30 48 | 2c 20 30 46 46 46 46 48 |, 00000H|, 0FFFFH|
|00004540| 2c 20 30 46 43 30 30 48 | 2c 20 30 30 30 30 30 48 |, 0FC00H|, 00000H|
|00004550| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004560| 2c 20 28 2a 33 38 2a 29 | 0a 20 30 30 30 30 30 48 |, (*38*)|. 00000H|
|00004570| 2c 20 30 30 30 30 30 48 | 2c 20 30 33 46 46 46 48 |, 00000H|, 03FFFH|
|00004580| 2c 20 30 46 43 30 30 48 | 2c 20 30 30 30 30 30 48 |, 0FC00H|, 00000H|
|00004590| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000045a0| 2c 20 28 2a 33 39 2a 29 | 0a 20 30 30 30 30 30 48 |, (*39*)|. 00000H|
|000045b0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 46 46 46 48 |, 00000H|, 00FFFH|
|000045c0| 2c 20 30 46 43 30 30 48 | 2c 20 30 30 30 30 30 48 |, 0FC00H|, 00000H|
|000045d0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000045e0| 2c 20 28 2a 34 30 2a 29 | 0a 20 30 30 30 30 30 48 |, (*40*)|. 00000H|
|000045f0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 33 46 46 48 |, 00000H|, 003FFH|
|00004600| 00 00 00 08 00 00 04 0e | 00 00 00 66 00 00 01 e8 |........|...f....|
|00004610| 00 00 00 24 36 9c 28 81 | 2c 20 30 46 43 30 30 48 |...$6.(.|, 0FC00H|
|00004620| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004630| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 31 2a 29 |, 00000H|, (*41*)|
|00004640| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00004650| 2c 20 30 30 30 46 46 48 | 2c 20 30 46 43 30 30 48 |, 000FFH|, 0FC00H|
|00004660| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004670| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 32 2a 29 |, 00000H|, (*42*)|
|00004680| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00004690| 2c 20 30 30 30 33 46 48 | 2c 20 30 46 43 30 30 48 |, 0003FH|, 0FC00H|
|000046a0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000046b0| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 33 2a 29 |, 00000H|, (*43*)|
|000046c0| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|000046d0| 2c 20 30 30 30 30 46 48 | 2c 20 30 46 43 30 30 48 |, 0000FH|, 0FC00H|
|000046e0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000046f0| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 34 2a 29 |, 00000H|, (*44*)|
|00004700| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00004710| 2c 20 30 30 30 30 33 48 | 2c 20 30 46 43 30 30 48 |, 00003H|, 0FC00H|
|00004720| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004730| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 35 2a 29 |, 00000H|, (*45*)|
|00004740| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00004750| 2c 20 30 30 30 30 30 48 | 2c 20 30 46 43 30 30 48 |, 00000H|, 0FC00H|
|00004760| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004770| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 36 2a 29 |, 00000H|, (*46*)|
|00004780| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00004790| 2c 20 30 30 30 30 30 48 | 2c 20 30 33 43 30 30 48 |, 00000H|, 03C00H|
|000047a0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000047b0| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 37 2a 29 |, 00000H|, (*47*)|
|000047c0| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|000047d0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 43 30 30 48 |, 00000H|, 00C00H|
|000047e0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000047f0| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 34 38 2a 29 |, 00000H|, (*48*)|
|00004800| 00 00 00 08 00 00 04 0e | 00 00 00 67 00 00 01 e8 |........|...g....|
|00004810| 00 00 00 25 72 55 ab 1f | 0a 20 30 30 30 30 30 48 |...%rU..|. 00000H|
|00004820| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004830| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004840| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004850| 2c 20 28 2a 34 39 2a 29 | 0a 20 30 30 30 30 30 48 |, (*49*)|. 00000H|
|00004860| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004870| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004880| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004890| 2c 20 28 2a 35 30 2a 29 | 0a 20 30 30 30 30 30 48 |, (*50*)|. 00000H|
|000048a0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000048b0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000048c0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000048d0| 2c 20 28 2a 35 31 2a 29 | 0a 20 30 30 30 30 30 48 |, (*51*)|. 00000H|
|000048e0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000048f0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004900| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004910| 2c 20 28 2a 35 32 2a 29 | 0a 20 30 30 30 30 30 48 |, (*52*)|. 00000H|
|00004920| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004930| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004940| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00004950| 2c 20 28 2a 35 33 2a 29 | 0a 20 28 2a 20 50 6c 61 |, (*53*)|. (* Pla|
|00004960| 6e 65 20 32 20 2a 29 0a | 20 30 30 30 30 30 48 2c |ne 2 *).| 00000H,|
|00004970| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004980| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00004990| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000049a0| 20 28 2a 20 31 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 1*).| 00000H,|
|000049b0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000049c0| 20 30 30 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00F00H,| 00000H,|
|000049d0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000049e0| 20 28 2a 20 32 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 2*).| 00000H,|
|000049f0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004a00| 00 00 00 08 00 00 04 0e | 00 00 00 68 00 00 01 e8 |........|...h....|
|00004a10| 00 00 00 26 6a 02 d7 3e | 20 30 33 46 30 30 48 2c |...&j..>| 03F00H,|
|00004a20| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004a30| 20 30 30 30 30 30 48 2c | 20 28 2a 20 33 2a 29 0a | 00000H,| (* 3*).|
|00004a40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004a50| 20 30 30 30 30 30 48 2c | 20 30 46 46 30 30 48 2c | 00000H,| 0FF00H,|
|00004a60| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004a70| 20 30 30 30 30 30 48 2c | 20 28 2a 20 34 2a 29 0a | 00000H,| (* 4*).|
|00004a80| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004a90| 20 30 30 30 30 33 48 2c | 20 30 46 46 30 30 48 2c | 00003H,| 0FF00H,|
|00004aa0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004ab0| 20 30 30 30 30 30 48 2c | 20 28 2a 20 35 2a 29 0a | 00000H,| (* 5*).|
|00004ac0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004ad0| 20 30 30 30 30 46 48 2c | 20 30 46 46 30 30 48 2c | 0000FH,| 0FF00H,|
|00004ae0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004af0| 20 30 30 30 30 30 48 2c | 20 28 2a 20 36 2a 29 0a | 00000H,| (* 6*).|
|00004b00| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004b10| 20 30 30 30 33 46 48 2c | 20 30 46 46 30 30 48 2c | 0003FH,| 0FF00H,|
|00004b20| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004b30| 20 30 30 30 30 30 48 2c | 20 28 2a 20 37 2a 29 0a | 00000H,| (* 7*).|
|00004b40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004b50| 20 30 30 30 46 46 48 2c | 20 30 46 46 30 30 48 2c | 000FFH,| 0FF00H,|
|00004b60| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004b70| 20 30 30 30 30 30 48 2c | 20 28 2a 20 38 2a 29 0a | 00000H,| (* 8*).|
|00004b80| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004b90| 20 30 30 33 46 46 48 2c | 20 30 46 46 30 30 48 2c | 003FFH,| 0FF00H,|
|00004ba0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004bb0| 20 30 30 30 30 30 48 2c | 20 28 2a 20 39 2a 29 0a | 00000H,| (* 9*).|
|00004bc0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004bd0| 20 30 30 46 46 46 48 2c | 20 30 46 46 30 30 48 2c | 00FFFH,| 0FF00H,|
|00004be0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004bf0| 20 30 30 30 30 30 48 2c | 20 28 2a 31 30 2a 29 0a | 00000H,| (*10*).|
|00004c00| 00 00 00 08 00 00 04 0e | 00 00 00 69 00 00 01 e8 |........|...i....|
|00004c10| 00 00 00 27 45 d5 a8 9c | 20 30 30 30 30 30 48 2c |...'E...| 00000H,|
|00004c20| 20 30 30 30 30 30 48 2c | 20 30 33 46 46 46 48 2c | 00000H,| 03FFFH,|
|00004c30| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004c40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004c50| 20 28 2a 31 31 2a 29 0a | 20 30 30 30 30 30 48 2c | (*11*).| 00000H,|
|00004c60| 20 30 30 30 30 30 48 2c | 20 30 46 46 46 46 48 2c | 00000H,| 0FFFFH,|
|00004c70| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004c80| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004c90| 20 28 2a 31 32 2a 29 0a | 20 30 30 30 30 30 48 2c | (*12*).| 00000H,|
|00004ca0| 20 30 30 30 30 33 48 2c | 20 30 46 46 46 46 48 2c | 00003H,| 0FFFFH,|
|00004cb0| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004cc0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004cd0| 20 28 2a 31 33 2a 29 0a | 20 30 30 30 30 30 48 2c | (*13*).| 00000H,|
|00004ce0| 20 30 30 30 30 46 48 2c | 20 30 46 46 46 46 48 2c | 0000FH,| 0FFFFH,|
|00004cf0| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004d00| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004d10| 20 28 2a 31 34 2a 29 0a | 20 30 30 30 30 30 48 2c | (*14*).| 00000H,|
|00004d20| 20 30 30 30 33 46 48 2c | 20 30 46 46 46 46 48 2c | 0003FH,| 0FFFFH,|
|00004d30| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004d40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004d50| 20 28 2a 31 35 2a 29 0a | 20 30 30 30 30 30 48 2c | (*15*).| 00000H,|
|00004d60| 20 30 30 30 46 46 48 2c | 20 30 46 46 46 46 48 2c | 000FFH,| 0FFFFH,|
|00004d70| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00004d80| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00004d90| 20 28 2a 31 36 2a 29 0a | 20 30 30 30 30 30 48 2c | (*16*).| 00000H,|
|00004da0| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|00004db0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004dc0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00004dd0| 20 28 2a 31 37 2a 29 0a | 20 30 30 30 30 30 48 2c | (*17*).| 00000H,|
|00004de0| 20 30 30 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 00FFFH,| 0FFFFH,|
|00004df0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004e00| 00 00 00 08 00 00 04 0e | 00 00 00 6a 00 00 01 e8 |........|...j....|
|00004e10| 00 00 00 28 aa d1 a5 8f | 20 30 46 46 46 46 48 2c |...(....| 0FFFFH,|
|00004e20| 20 30 46 46 43 30 48 2c | 20 28 2a 31 38 2a 29 0a | 0FFC0H,| (*18*).|
|00004e30| 20 30 30 30 30 30 48 2c | 20 30 33 46 46 46 48 2c | 00000H,| 03FFFH,|
|00004e40| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004e50| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004e60| 20 30 46 46 43 30 48 2c | 20 28 2a 31 39 2a 29 0a | 0FFC0H,| (*19*).|
|00004e70| 20 30 30 30 30 30 48 2c | 20 30 46 46 46 46 48 2c | 00000H,| 0FFFFH,|
|00004e80| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004e90| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004ea0| 20 30 46 46 43 30 48 2c | 20 28 2a 32 30 2a 29 0a | 0FFC0H,| (*20*).|
|00004eb0| 20 30 30 30 30 33 48 2c | 20 30 46 46 46 46 48 2c | 00003H,| 0FFFFH,|
|00004ec0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004ed0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004ee0| 20 30 46 46 43 30 48 2c | 20 28 2a 32 31 2a 29 0a | 0FFC0H,| (*21*).|
|00004ef0| 20 30 30 30 30 46 48 2c | 20 30 46 46 46 46 48 2c | 0000FH,| 0FFFFH,|
|00004f00| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004f10| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004f20| 20 30 46 46 43 30 48 2c | 20 28 2a 32 32 2a 29 0a | 0FFC0H,| (*22*).|
|00004f30| 20 30 30 30 33 46 48 2c | 20 30 46 46 46 46 48 2c | 0003FH,| 0FFFFH,|
|00004f40| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004f50| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004f60| 20 30 46 46 43 30 48 2c | 20 28 2a 32 33 2a 29 0a | 0FFC0H,| (*23*).|
|00004f70| 20 30 30 30 46 46 48 2c | 20 30 46 46 46 46 48 2c | 000FFH,| 0FFFFH,|
|00004f80| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004f90| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004fa0| 20 30 46 46 43 30 48 2c | 20 28 2a 32 34 2a 29 0a | 0FFC0H,| (*24*).|
|00004fb0| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|00004fc0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004fd0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00004fe0| 20 30 46 46 43 30 48 2c | 20 28 2a 32 35 2a 29 0a | 0FFC0H,| (*25*).|
|00004ff0| 20 30 30 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 00FFFH,| 0FFFFH,|
|00005000| 00 00 00 08 00 00 04 0e | 00 00 00 6b 00 00 01 e8 |........|...k....|
|00005010| 00 00 00 29 37 6e 1f f5 | 20 30 46 46 46 46 48 2c |...)7n..| 0FFFFH,|
|00005020| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005030| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005040| 20 28 2a 32 36 2a 29 0a | 20 30 33 46 46 46 48 2c | (*26*).| 03FFFH,|
|00005050| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005060| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005070| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005080| 20 28 2a 32 37 2a 29 0a | 20 30 46 46 46 46 48 2c | (*27*).| 0FFFFH,|
|00005090| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000050a0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000050b0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|000050c0| 20 28 2a 32 38 2a 29 0a | 20 30 37 46 46 46 48 2c | (*28*).| 07FFFH,|
|000050d0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000050e0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000050f0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005100| 20 28 2a 32 39 2a 29 0a | 20 30 31 46 46 46 48 2c | (*29*).| 01FFFH,|
|00005110| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005120| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005130| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005140| 20 28 2a 33 30 2a 29 0a | 20 30 30 37 46 46 48 2c | (*30*).| 007FFH,|
|00005150| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005160| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005170| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005180| 20 28 2a 33 31 2a 29 0a | 20 30 30 31 46 46 48 2c | (*31*).| 001FFH,|
|00005190| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000051a0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000051b0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|000051c0| 20 28 2a 33 32 2a 29 0a | 20 30 30 30 37 46 48 2c | (*32*).| 0007FH,|
|000051d0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000051e0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000051f0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|00005200| 00 00 00 08 00 00 04 0e | 00 00 00 6c 00 00 01 e8 |........|...l....|
|00005210| 00 00 00 2a 38 24 f8 d4 | 20 28 2a 33 33 2a 29 0a |...*8$..| (*33*).|
|00005220| 20 30 30 30 31 46 48 2c | 20 30 46 46 46 46 48 2c | 0001FH,| 0FFFFH,|
|00005230| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005240| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005250| 20 30 46 46 43 30 48 2c | 20 28 2a 33 34 2a 29 0a | 0FFC0H,| (*34*).|
|00005260| 20 30 30 30 30 37 48 2c | 20 30 46 46 46 46 48 2c | 00007H,| 0FFFFH,|
|00005270| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005280| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005290| 20 30 46 46 43 30 48 2c | 20 28 2a 33 35 2a 29 0a | 0FFC0H,| (*35*).|
|000052a0| 20 30 30 30 30 31 48 2c | 20 30 46 46 46 46 48 2c | 00001H,| 0FFFFH,|
|000052b0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000052c0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000052d0| 20 30 46 46 43 30 48 2c | 20 28 2a 33 36 2a 29 0a | 0FFC0H,| (*36*).|
|000052e0| 20 30 30 30 30 30 48 2c | 20 30 37 46 46 46 48 2c | 00000H,| 07FFFH,|
|000052f0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005300| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005310| 20 30 46 46 43 30 48 2c | 20 28 2a 33 37 2a 29 0a | 0FFC0H,| (*37*).|
|00005320| 20 30 30 30 30 30 48 2c | 20 30 31 46 46 46 48 2c | 00000H,| 01FFFH,|
|00005330| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005340| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005350| 20 30 46 46 38 30 48 2c | 20 28 2a 33 38 2a 29 0a | 0FF80H,| (*38*).|
|00005360| 20 30 30 30 30 30 48 2c | 20 30 30 37 46 46 48 2c | 00000H,| 007FFH,|
|00005370| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005380| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005390| 20 30 46 46 30 30 48 2c | 20 28 2a 33 39 2a 29 0a | 0FF00H,| (*39*).|
|000053a0| 20 30 30 30 30 30 48 2c | 20 30 30 31 46 46 48 2c | 00000H,| 001FFH,|
|000053b0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000053c0| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|000053d0| 20 30 46 45 30 30 48 2c | 20 28 2a 34 30 2a 29 0a | 0FE00H,| (*40*).|
|000053e0| 20 30 30 30 30 30 48 2c | 20 30 30 30 37 46 48 2c | 00000H,| 0007FH,|
|000053f0| 20 30 46 46 46 46 48 2c | 20 30 46 46 30 30 48 2c | 0FFFFH,| 0FF00H,|
|00005400| 00 00 00 08 00 00 04 0e | 00 00 00 6d 00 00 01 e8 |........|...m....|
|00005410| 00 00 00 2b 19 bb 8f 5e | 20 30 30 30 30 30 48 2c |...+...^| 00000H,|
|00005420| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005430| 20 28 2a 34 31 2a 29 0a | 20 30 30 30 30 30 48 2c | (*41*).| 00000H,|
|00005440| 20 30 30 30 31 46 48 2c | 20 30 46 46 46 46 48 2c | 0001FH,| 0FFFFH,|
|00005450| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00005460| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005470| 20 28 2a 34 32 2a 29 0a | 20 30 30 30 30 30 48 2c | (*42*).| 00000H,|
|00005480| 20 30 30 30 30 37 48 2c | 20 30 46 46 46 46 48 2c | 00007H,| 0FFFFH,|
|00005490| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|000054a0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000054b0| 20 28 2a 34 33 2a 29 0a | 20 30 30 30 30 30 48 2c | (*43*).| 00000H,|
|000054c0| 20 30 30 30 30 31 48 2c | 20 30 46 46 46 46 48 2c | 00001H,| 0FFFFH,|
|000054d0| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|000054e0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000054f0| 20 28 2a 34 34 2a 29 0a | 20 30 30 30 30 30 48 2c | (*44*).| 00000H,|
|00005500| 20 30 30 30 30 30 48 2c | 20 30 37 46 46 46 48 2c | 00000H,| 07FFFH,|
|00005510| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00005520| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005530| 20 28 2a 34 35 2a 29 0a | 20 30 30 30 30 30 48 2c | (*45*).| 00000H,|
|00005540| 20 30 30 30 30 30 48 2c | 20 30 31 46 46 46 48 2c | 00000H,| 01FFFH,|
|00005550| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|00005560| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005570| 20 28 2a 34 36 2a 29 0a | 20 30 30 30 30 30 48 2c | (*46*).| 00000H,|
|00005580| 20 30 30 30 30 30 48 2c | 20 30 30 37 46 46 48 2c | 00000H,| 007FFH,|
|00005590| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|000055a0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000055b0| 20 28 2a 34 37 2a 29 0a | 20 30 30 30 30 30 48 2c | (*47*).| 00000H,|
|000055c0| 20 30 30 30 30 30 48 2c | 20 30 30 31 46 46 48 2c | 00000H,| 001FFH,|
|000055d0| 20 30 46 46 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0FF00H,| 00000H,|
|000055e0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000055f0| 20 28 2a 34 38 2a 29 0a | 20 30 30 30 30 30 48 2c | (*48*).| 00000H,|
|00005600| 00 00 00 08 00 00 04 0e | 00 00 00 6e 00 00 01 e8 |........|...n....|
|00005610| 00 00 00 16 1a 15 62 1b | 20 30 30 30 30 30 48 2c |......b.| 00000H,|
|00005620| 20 30 30 30 37 46 48 2c | 20 30 46 46 30 30 48 2c | 0007FH,| 0FF00H,|
|00005630| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005640| 20 30 30 30 30 30 48 2c | 20 28 2a 34 39 2a 29 0a | 00000H,| (*49*).|
|00005650| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005660| 20 30 30 30 31 46 48 2c | 20 30 46 46 30 30 48 2c | 0001FH,| 0FF00H,|
|00005670| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005680| 20 30 30 30 30 30 48 2c | 20 28 2a 35 30 2a 29 0a | 00000H,| (*50*).|
|00005690| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000056a0| 20 30 30 30 30 37 48 2c | 20 30 46 45 30 30 48 2c | 00007H,| 0FE00H,|
|000056b0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000056c0| 20 30 30 30 30 30 48 2c | 20 28 2a 35 31 2a 29 0a | 00000H,| (*51*).|
|000056d0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000056e0| 20 30 30 30 30 31 48 2c | 20 30 46 43 30 30 48 2c | 00001H,| 0FC00H,|
|000056f0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005700| 20 30 30 30 30 30 48 2c | 20 28 2a 35 32 2a 29 0a | 00000H,| (*52*).|
|00005710| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005720| 20 30 30 30 30 30 48 2c | 20 30 37 38 30 30 48 2c | 00000H,| 07800H,|
|00005730| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005740| 20 30 30 30 30 30 48 29 | 20 28 2a 35 33 2a 29 0a | 00000H)| (*53*).|
|00005750| 0a 45 4e 44 20 48 52 65 | 73 74 6f 72 65 44 61 74 |.END HRe|storeDat|
|00005760| 61 3b 0a 0a 42 45 47 49 | 4e 0a 0a 49 6d 67 77 69 |a;..BEGI|N..Imgwi|
|00005770| 64 74 68 20 5b 48 61 72 | 64 44 69 73 6b 5d 20 3a |dth [Har|dDisk] :|
|00005780| 3d 31 36 30 3b 0a 49 6d | 67 68 65 69 67 68 74 5b |=160;.Im|gheight[|
|00005790| 48 61 72 64 44 69 73 6b | 5d 20 3a 3d 20 36 37 3b |HardDisk|] := 67;|
|000057a0| 0a 41 6c 6c 6f 63 4d 65 | 6d 28 49 6d 61 67 65 44 |.AllocMe|m(ImageD|
|000057b0| 61 74 61 73 5b 48 61 72 | 64 44 69 73 6b 5d 2c 32 |atas[Har|dDisk],2|
|000057c0| 30 2a 36 37 2a 32 2c 54 | 52 55 45 29 3b 0a 43 6f |0*67*2,T|RUE);.Co|
|000057d0| 70 79 4d 65 6d 28 41 44 | 52 28 48 61 72 64 44 69 |pyMem(AD|R(HardDi|
|000057e0| 73 6b 44 61 74 61 29 2c | 49 6d 61 67 65 44 61 74 |skData),|ImageDat|
|000057f0| 61 73 5b 48 61 72 64 44 | 69 73 6b 5d 2c 32 30 2a |as[HardD|isk],20*|
|00005800| 00 00 00 08 00 00 04 0e | 00 00 00 59 00 00 01 e8 |........|...Y....|
|00005810| 00 00 00 2d a0 f3 26 05 | 2c 20 28 2a 34 39 2a 29 |...-..&.|, (*49*)|
|00005820| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00005830| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005840| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005850| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 35 30 2a 29 |, 00000H|, (*50*)|
|00005860| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|00005870| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005880| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005890| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 35 31 2a 29 |, 00000H|, (*51*)|
|000058a0| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|000058b0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000058c0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|000058d0| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 35 32 2a 29 |, 00000H|, (*52*)|
|000058e0| 0a 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |. 00000H|, 00000H|
|000058f0| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005900| 2c 20 30 30 30 30 30 48 | 2c 20 30 30 30 30 30 48 |, 00000H|, 00000H|
|00005910| 2c 20 30 30 30 30 30 48 | 2c 20 28 2a 35 33 2a 29 |, 00000H|, (*53*)|
|00005920| 0a 20 28 2a 20 50 6c 61 | 6e 65 20 32 20 2a 29 0a |. (* Pla|ne 2 *).|
|00005930| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005940| 20 30 30 30 30 30 48 2c | 20 30 30 37 30 30 48 2c | 00000H,| 00700H,|
|00005950| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005960| 20 30 30 30 30 30 48 2c | 20 28 2a 20 31 2a 29 0a | 00000H,| (* 1*).|
|00005970| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005980| 20 30 30 30 30 30 48 2c | 20 30 30 46 30 30 48 2c | 00000H,| 00F00H,|
|00005990| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000059a0| 20 30 30 30 30 30 48 2c | 20 28 2a 20 32 2a 29 0a | 00000H,| (* 2*).|
|000059b0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000059c0| 20 30 30 30 30 30 48 2c | 20 30 33 42 30 30 48 2c | 00000H,| 03B00H,|
|000059d0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000059e0| 20 30 30 30 30 30 48 2c | 20 28 2a 20 33 2a 29 0a | 00000H,| (* 3*).|
|000059f0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005a00| 00 00 00 08 00 00 04 0e | 00 00 00 5a 00 00 01 e8 |........|...Z....|
|00005a10| 00 00 00 2e 91 45 2e 97 | 20 30 30 30 30 30 48 2c |.....E..| 00000H,|
|00005a20| 20 30 46 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0F300H,| 00000H,|
|00005a30| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005a40| 20 28 2a 20 34 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 4*).| 00000H,|
|00005a50| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 33 48 2c | 00000H,| 00003H,|
|00005a60| 20 30 38 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 08300H,| 00000H,|
|00005a70| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005a80| 20 28 2a 20 35 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 5*).| 00000H,|
|00005a90| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 46 48 2c | 00000H,| 0000FH,|
|00005aa0| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005ab0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005ac0| 20 28 2a 20 36 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 6*).| 00000H,|
|00005ad0| 20 30 30 30 30 30 48 2c | 20 30 30 30 33 38 48 2c | 00000H,| 00038H,|
|00005ae0| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005af0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005b00| 20 28 2a 20 37 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 7*).| 00000H,|
|00005b10| 20 30 30 30 30 30 48 2c | 20 30 30 30 46 30 48 2c | 00000H,| 000F0H,|
|00005b20| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005b30| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005b40| 20 28 2a 20 38 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 8*).| 00000H,|
|00005b50| 20 30 30 30 30 30 48 2c | 20 30 30 33 38 30 48 2c | 00000H,| 00380H,|
|00005b60| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005b70| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005b80| 20 28 2a 20 39 2a 29 0a | 20 30 30 30 30 30 48 2c | (* 9*).| 00000H,|
|00005b90| 20 30 30 30 30 30 48 2c | 20 30 30 46 30 30 48 2c | 00000H,| 00F00H,|
|00005ba0| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005bb0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005bc0| 20 28 2a 31 30 2a 29 0a | 20 30 30 30 30 30 48 2c | (*10*).| 00000H,|
|00005bd0| 20 30 30 30 30 30 48 2c | 20 30 33 43 30 30 48 2c | 00000H,| 03C00H,|
|00005be0| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|00005bf0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005c00| 00 00 00 08 00 00 04 0e | 00 00 00 5b 00 00 01 e8 |........|...[....|
|00005c10| 00 00 00 2f 21 06 06 14 | 20 28 2a 31 31 2a 29 0a |.../!...| (*11*).|
|00005c20| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005c30| 20 30 46 30 30 30 48 2c | 20 30 30 33 30 30 48 2c | 0F000H,| 00300H,|
|00005c40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005c50| 20 30 30 30 30 30 48 2c | 20 28 2a 31 32 2a 29 0a | 00000H,| (*12*).|
|00005c60| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 33 48 2c | 00000H,| 00003H,|
|00005c70| 20 30 43 30 30 30 48 2c | 20 30 30 33 30 30 48 2c | 0C000H,| 00300H,|
|00005c80| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005c90| 20 30 30 30 30 30 48 2c | 20 28 2a 31 33 2a 29 0a | 00000H,| (*13*).|
|00005ca0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 46 48 2c | 00000H,| 0000FH,|
|00005cb0| 20 30 30 30 30 30 48 2c | 20 30 30 33 30 30 48 2c | 00000H,| 00300H,|
|00005cc0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005cd0| 20 30 30 30 30 30 48 2c | 20 28 2a 31 34 2a 29 0a | 00000H,| (*14*).|
|00005ce0| 20 30 30 30 30 30 48 2c | 20 30 30 30 33 43 48 2c | 00000H,| 0003CH,|
|00005cf0| 20 30 30 30 30 30 48 2c | 20 30 30 33 30 30 48 2c | 00000H,| 00300H,|
|00005d00| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005d10| 20 30 30 30 30 30 48 2c | 20 28 2a 31 35 2a 29 0a | 00000H,| (*15*).|
|00005d20| 20 30 30 30 30 30 48 2c | 20 30 30 30 46 30 48 2c | 00000H,| 000F0H,|
|00005d30| 20 30 30 30 30 30 48 2c | 20 30 30 33 30 30 48 2c | 00000H,| 00300H,|
|00005d40| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005d50| 20 30 30 30 30 30 48 2c | 20 28 2a 31 36 2a 29 0a | 00000H,| (*16*).|
|00005d60| 20 30 30 30 30 30 48 2c | 20 30 30 33 43 30 48 2c | 00000H,| 003C0H,|
|00005d70| 20 30 30 30 30 30 48 2c | 20 30 30 33 46 46 48 2c | 00000H,| 003FFH,|
|00005d80| 20 30 46 46 46 46 48 2c | 20 30 46 46 46 46 48 2c | 0FFFFH,| 0FFFFH,|
|00005d90| 20 30 46 46 43 30 48 2c | 20 28 2a 31 37 2a 29 0a | 0FFC0H,| (*17*).|
|00005da0| 20 30 30 30 30 30 48 2c | 20 30 30 46 30 30 48 2c | 00000H,| 00F00H,|
|00005db0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005dc0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005dd0| 20 30 30 30 43 30 48 2c | 20 28 2a 31 38 2a 29 0a | 000C0H,| (*18*).|
|00005de0| 20 30 30 30 30 30 48 2c | 20 30 33 43 30 30 48 2c | 00000H,| 03C00H,|
|00005df0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005e00| 00 00 00 08 00 00 04 0e | 00 00 00 5c 00 00 01 e8 |........|...\....|
|00005e10| 00 00 00 30 8a 2b fd 31 | 20 30 30 30 30 30 48 2c |...0.+.1| 00000H,|
|00005e20| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005e30| 20 28 2a 31 39 2a 29 0a | 20 30 30 30 30 30 48 2c | (*19*).| 00000H,|
|00005e40| 20 30 46 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0F000H,| 00000H,|
|00005e50| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005e60| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005e70| 20 28 2a 32 30 2a 29 0a | 20 30 30 30 30 33 48 2c | (*20*).| 00003H,|
|00005e80| 20 30 43 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 0C000H,| 00000H,|
|00005e90| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005ea0| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005eb0| 20 28 2a 32 31 2a 29 0a | 20 30 30 30 30 46 48 2c | (*21*).| 0000FH,|
|00005ec0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005ed0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005ee0| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005ef0| 20 28 2a 32 32 2a 29 0a | 20 30 30 30 33 43 48 2c | (*22*).| 0003CH,|
|00005f00| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005f10| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00005f20| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005f30| 20 28 2a 32 33 2a 29 0a | 20 30 30 30 46 30 48 2c | (*23*).| 000F0H,|
|00005f40| 20 30 30 30 30 30 48 2c | 20 30 30 46 43 30 48 2c | 00000H,| 00FC0H,|
|00005f50| 20 30 30 30 30 30 48 2c | 20 30 38 30 30 30 48 2c | 00000H,| 08000H,|
|00005f60| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005f70| 20 28 2a 32 34 2a 29 0a | 20 30 30 33 43 30 48 2c | (*24*).| 003C0H,|
|00005f80| 20 30 30 30 30 30 48 2c | 20 30 30 36 36 30 48 2c | 00000H,| 00660H,|
|00005f90| 20 30 30 30 30 31 48 2c | 20 30 38 30 30 30 48 2c | 00001H,| 08000H,|
|00005fa0| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00005fb0| 20 28 2a 32 35 2a 29 0a | 20 30 30 46 30 30 48 2c | (*25*).| 00F00H,|
|00005fc0| 20 30 30 30 30 30 48 2c | 20 30 30 36 36 33 48 2c | 00000H,| 00663H,|
|00005fd0| 20 30 43 33 45 33 48 2c | 20 30 45 33 43 45 48 2c | 0C3E3H,| 0E3CEH,|
|00005fe0| 20 30 43 33 43 30 48 2c | 20 30 30 30 43 30 48 2c | 0C3C0H,| 000C0H,|
|00005ff0| 20 28 2a 32 36 2a 29 0a | 20 30 33 46 43 30 48 2c | (*26*).| 03FC0H,|
|00006000| 00 00 00 08 00 00 04 0e | 00 00 00 5d 00 00 01 e8 |........|...]....|
|00006010| 00 00 00 31 11 a2 6d 8e | 20 30 30 30 30 30 48 2c |...1..m.| 00000H,|
|00006020| 20 30 30 37 43 36 48 2c | 20 30 36 36 30 31 48 2c | 007C6H,| 06601H,|
|00006030| 20 30 38 36 36 37 48 2c | 20 30 36 36 36 30 48 2c | 08667H,| 06660H,|
|00006040| 20 30 30 30 43 30 48 2c | 20 28 2a 32 37 2a 29 0a | 000C0H,| (*27*).|
|00006050| 20 30 46 46 46 30 48 2c | 20 30 30 30 30 30 48 2c | 0FFF0H,| 00000H,|
|00006060| 20 30 30 36 43 37 48 2c | 20 30 45 33 43 31 48 2c | 006C7H,| 0E3C1H,|
|00006070| 20 30 38 36 36 36 48 2c | 20 30 36 37 45 30 48 2c | 08666H,| 067E0H,|
|00006080| 20 30 30 30 43 30 48 2c | 20 28 2a 32 38 2a 29 0a | 000C0H,| (*28*).|
|00006090| 20 30 37 46 46 43 48 2c | 20 30 30 30 30 30 48 2c | 07FFCH,| 00000H,|
|000060a0| 20 30 30 36 36 36 48 2c | 20 30 30 30 36 31 48 2c | 00666H,| 00061H,|
|000060b0| 20 30 41 36 36 36 48 2c | 20 30 30 36 30 30 48 2c | 0A666H,| 00600H,|
|000060c0| 20 30 30 30 43 30 48 2c | 20 28 2a 32 39 2a 29 0a | 000C0H,| (*29*).|
|000060d0| 20 30 31 46 46 46 48 2c | 20 30 30 30 30 30 48 2c | 01FFFH,| 00000H,|
|000060e0| 20 30 30 45 33 33 48 2c | 20 30 43 37 43 30 48 2c | 00E33H,| 0C7C0H,|
|000060f0| 20 30 43 33 43 46 48 2c | 20 30 30 33 43 30 48 2c | 0C3CFH,| 003C0H,|
|00006100| 20 30 30 30 43 30 48 2c | 20 28 2a 33 30 2a 29 0a | 000C0H,| (*30*).|
|00006110| 20 30 30 37 46 46 48 2c | 20 30 43 30 30 30 48 2c | 007FFH,| 0C000H,|
|00006120| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006130| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006140| 20 30 30 30 43 30 48 2c | 20 28 2a 33 31 2a 29 0a | 000C0H,| (*31*).|
|00006150| 20 30 30 31 46 46 48 2c | 20 30 46 30 30 30 48 2c | 001FFH,| 0F000H,|
|00006160| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006170| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006180| 20 30 30 30 43 30 48 2c | 20 28 2a 33 32 2a 29 0a | 000C0H,| (*32*).|
|00006190| 20 30 30 30 37 46 48 2c | 20 30 46 43 30 30 48 2c | 0007FH,| 0FC00H,|
|000061a0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000061b0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000061c0| 20 30 30 30 43 30 48 2c | 20 28 2a 33 33 2a 29 0a | 000C0H,| (*33*).|
|000061d0| 20 30 30 30 31 46 48 2c | 20 30 46 46 30 30 48 2c | 0001FH,| 0FF00H,|
|000061e0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000061f0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006200| 00 00 00 08 00 00 04 0e | 00 00 00 5e 00 00 01 e8 |........|...^....|
|00006210| 00 00 00 32 ca e1 e1 dd | 20 30 30 30 43 30 48 2c |...2....| 000C0H,|
|00006220| 20 28 2a 33 34 2a 29 0a | 20 30 30 30 30 37 48 2c | (*34*).| 00007H,|
|00006230| 20 30 46 46 43 30 48 2c | 20 30 30 30 30 30 48 2c | 0FFC0H,| 00000H,|
|00006240| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006250| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|00006260| 20 28 2a 33 35 2a 29 0a | 20 30 30 30 30 31 48 2c | (*35*).| 00001H,|
|00006270| 20 30 46 46 46 30 48 2c | 20 30 30 30 30 30 48 2c | 0FFF0H,| 00000H,|
|00006280| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|00006290| 20 30 30 30 30 30 48 2c | 20 30 30 30 43 30 48 2c | 00000H,| 000C0H,|
|000062a0| 20 28 2a 33 36 2a 29 0a | 20 30 30 30 30 30 48 2c | (*36*).| 00000H,|
|000062b0| 20 30 37 46 46 43 48 2c | 20 30 30 30 30 30 48 2c | 07FFCH,| 00000H,|
|000062c0| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|000062d0| 20 30 46 46 46 46 48 2c | 20 30 46 46 43 30 48 2c | 0FFFFH,| 0FFC0H,|
|000062e0| 20 28 2a 33 37 2a 29 0a | 20 30 30 30 30 30 48 2c | (*37*).| 00000H,|
|000062f0| 20 30 31 46 46 46 48 2c | 20 30 30 30 30 30 48 2c | 01FFFH,| 00000H,|
|00006300| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|00006310| 20 30 46 46 46 46 48 2c | 20 30 46 46 38 30 48 2c | 0FFFFH,| 0FF80H,|
|00006320| 20 28 2a 33 38 2a 29 0a | 20 30 30 30 30 30 48 2c | (*38*).| 00000H,|
|00006330| 20 30 30 37 46 46 48 2c | 20 30 43 30 30 30 48 2c | 007FFH,| 0C000H,|
|00006340| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|00006350| 20 30 46 46 46 46 48 2c | 20 30 46 46 30 30 48 2c | 0FFFFH,| 0FF00H,|
|00006360| 20 28 2a 33 39 2a 29 0a | 20 30 30 30 30 30 48 2c | (*39*).| 00000H,|
|00006370| 20 30 30 31 46 46 48 2c | 20 30 46 30 30 30 48 2c | 001FFH,| 0F000H,|
|00006380| 20 30 30 33 46 46 48 2c | 20 30 46 46 46 46 48 2c | 003FFH,| 0FFFFH,|
|00006390| 20 30 46 46 46 46 48 2c | 20 30 46 45 30 30 48 2c | 0FFFFH,| 0FE00H,|
|000063a0| 20 28 2a 34 30 2a 29 0a | 20 30 30 30 30 30 48 2c | (*40*).| 00000H,|
|000063b0| 20 30 30 30 37 46 48 2c | 20 30 46 43 30 30 48 2c | 0007FH,| 0FC00H,|
|000063c0| 20 30 30 33 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00300H,| 00000H,|
|000063d0| 20 30 30 30 30 30 48 2c | 20 30 30 30 30 30 48 2c | 00000H,| 00000H,|
|000063e0| 20 28 2a 34 31 2a 29 0a | 20 30 30 30 30 30 48 2c | (*41*).| 00000H,|
|000063f0| 20 30 30 30 31 46 48 2c | 20 30 46 46 30 30 48 2c | 0001FH,| 0FF00H,|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
