home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1989-01-24 | 8.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| Truevision Targa Graphic (image/tga)
| magic
| Supported |
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 13 f4 20 3e 20 | 24 2e 44 66 73 54 6f 41 |..... > |$.DfsToA|
|00000010| 64 66 73 0d 00 14 05 f4 | 0d 00 1e 2e f4 20 57 72 |dfs.....|..... Wr|
|00000020| 69 74 74 65 6e 62 79 20 | 50 68 69 6c 6c 69 70 20 |ittenby |Phillip |
|00000030| 4a 20 43 6f 6c 6d 65 72 | 2c 20 4a 61 6e 75 61 72 |J Colmer|, Januar|
|00000040| 79 20 31 39 38 38 0d 00 | 28 05 f4 0d 00 32 3b de |y 1988..|(....2;.|
|00000050| 20 44 61 74 61 25 20 32 | 30 30 2a 31 30 32 34 3a | Data% 2|00*1024:|
|00000060| f4 20 4d 61 78 69 6d 75 | 6d 20 69 73 20 6f 6e 65 |. Maximu|m is one|
|00000070| 20 73 69 64 65 20 6f 66 | 20 38 30 20 74 72 61 63 | side of| 80 trac|
|00000080| 6b 20 64 69 73 63 0d 00 | 3c 14 de 20 44 69 73 63 |k disc..|<.. Disc|
|00000090| 52 65 63 6f 72 64 25 20 | 36 34 0d 00 46 1d de 20 |Record% |64..F.. |
|000000a0| 44 5f 4e 61 6d 65 24 28 | 33 31 29 2c 41 5f 4e 61 |D_Name$(|31),A_Na|
|000000b0| 6d 65 24 28 33 31 29 0d | 00 50 0e de 20 44 69 72 |me$(31).|.P.. Dir|
|000000c0| 24 28 33 31 29 0d 00 5a | 0f de 20 4c 6f 61 64 25 |$(31)..Z|.. Load%|
|000000d0| 28 33 31 29 0d 00 64 0f | de 20 45 78 65 63 25 28 |(31)..d.|. Exec%(|
|000000e0| 33 31 29 0d 00 6e 11 de | 20 4c 65 6e 67 74 68 25 |31)..n..| Length%|
|000000f0| 28 33 31 29 0d 00 78 10 | de 20 53 74 61 72 74 25 |(31)..x.|. Start%|
|00000100| 28 33 31 29 0d 00 82 14 | de 20 61 64 66 73 5f 64 |(31)....|. adfs_d|
|00000110| 72 69 76 65 73 28 35 29 | 0d 00 8c 13 de 20 64 66 |rives(5)|..... df|
|00000120| 73 5f 64 72 69 76 65 73 | 28 37 29 0d 00 96 3f f4 |s_drives|(7)...?.|
|00000130| 20 2a 2a 2a 2a 2a 20 44 | 4f 20 4e 4f 54 20 43 48 | ***** D|O NOT CH|
|00000140| 41 4e 47 45 20 76 24 20 | 2d 20 55 53 45 44 20 42 |ANGE v$ |- USED B|
|00000150| 59 20 53 45 56 45 52 41 | 4c 20 50 52 4f 43 45 44 |Y SEVERA|L PROCED|
|00000160| 55 52 45 53 20 2a 2a 2a | 2a 2a 0d 00 a0 13 76 24 |URES ***|**....v$|
|00000170| 3d 22 30 31 32 33 34 35 | 36 37 38 39 22 0d 00 aa |="012345|6789"...|
|00000180| 26 76 24 3d 76 24 2b 22 | 61 62 63 64 65 66 67 68 |&v$=v$+"|abcdefgh|
|00000190| 69 6a 6b 6c 6d 6e 6f 70 | 71 72 73 74 75 76 77 78 |ijklmnop|qrstuvwx|
|000001a0| 79 7a 22 0d 00 b4 26 76 | 24 3d 76 24 2b 22 41 42 |yz"...&v|$=v$+"AB|
|000001b0| 43 44 45 46 47 48 49 4a | 4b 4c 4d 4e 4f 50 51 52 |CDEFGHIJ|KLMNOPQR|
|000001c0| 53 54 55 56 57 58 59 5a | 22 0d 00 be 17 76 24 3d |STUVWXYZ|"....v$=|
|000001d0| 76 24 2b 22 21 5f 22 2b | bd 31 33 2b bd 31 32 37 |v$+"!_"+|.13+.127|
|000001e0| 0d 00 c8 0b f4 20 2a 2a | 2a 2a 2a 0d 00 d2 09 eb |..... **|***.....|
|000001f0| 20 30 3a 87 0d 00 dc 14 | 2a 41 4c 50 48 41 42 45 | 0:.....|*ALPHABE|
|00000200| 54 20 4c 41 54 49 4e 31 | 0d 00 e6 2e 20 f2 63 65 |T LATIN1|.... .ce|
|00000210| 6e 74 72 65 28 30 2c 22 | 44 46 53 20 74 6f 20 41 |ntre(0,"|DFS to A|
|00000220| 44 46 53 20 54 72 61 6e | 73 66 65 72 20 55 74 69 |DFS Tran|sfer Uti|
|00000230| 6c 69 74 79 22 29 0d 00 | f0 2c f2 63 65 6e 74 72 |lity")..|.,.centr|
|00000240| 65 28 32 2c bd 28 31 36 | 39 29 2b 22 31 39 38 37 |e(2,.(16|9)+"1987|
|00000250| 20 50 68 69 6c 69 70 20 | 4a 20 43 6f 6c 6d 65 72 | Philip |J Colmer|
|00000260| 22 29 0d 00 fa 13 2a 41 | 4c 50 48 41 42 45 54 20 |")....*A|LPHABET |
|00000270| 42 46 4f 4e 54 0d 01 04 | 23 c8 99 20 22 41 44 46 |BFONT...|#.. "ADF|
|00000280| 53 5f 44 72 69 76 65 73 | 22 b8 20 64 65 73 74 25 |S_Drives|". dest%|
|00000290| 2c 6e 66 25 2c 6e 68 25 | 0d 01 0e 22 e7 6e 66 25 |,nf%,nh%|...".nf%|
|000002a0| 3c 31 20 85 20 31 2c 27 | 4e 6f 74 20 65 6e 6f 75 |<1 . 1,'|Not enou|
|000002b0| 67 68 20 64 72 69 76 65 | 73 22 0d 01 18 42 64 73 |gh drive|s"...Bds|
|000002c0| 69 7a 65 25 3d 38 3a f4 | 20 66 69 78 65 64 20 61 |ize%=8:.| fixed a|
|000002d0| 74 20 38 30 20 74 72 61 | 63 6b 73 20 2d 20 23 20 |t 80 tra|cks - # |
|000002e0| 72 65 61 64 20 64 65 70 | 65 6e 64 61 6e 74 20 6f |read dep|endant o|
|000002f0| 6e 20 64 69 73 63 5f 73 | 69 7a 65 25 0d 01 22 0b |n disc_s|ize%..".|
|00000300| e3 69 25 3d 30 b8 37 0d | 01 2c 1b e7 69 25 3c 36 |.i%=0.7.|.,..i%<6|
|00000310| 20 61 64 66 73 5f 64 72 | 69 76 65 73 28 69 25 29 | adfs_dr|ives(i%)|
|00000320| 3d a3 0d 01 36 14 64 66 | 73 5f 64 72 69 76 65 73 |=...6.df|s_drives|
|00000330| 28 69 25 29 3d a3 0d 01 | 40 05 ed 0d 01 4a 0d e3 |(i%)=...|@....J..|
|00000340| 69 25 3d 31 b8 6e 66 25 | 0d 01 54 1a 64 66 73 5f |i%=1.nf%|..T.dfs_|
|00000350| 64 72 69 76 65 73 28 28 | 69 25 2d 31 29 2a 32 29 |drives((|i%-1)*2)|
|00000360| 3d b9 0d 01 5e 1c 64 66 | 73 5f 64 72 69 76 65 73 |=...^.df|s_drives|
|00000370| 28 28 69 25 2d 31 29 2a | 32 2b 31 29 3d b9 0d 01 |((i%-1)*|2+1)=...|
|00000380| 68 17 61 64 66 73 5f 64 | 72 69 76 65 73 28 69 25 |h.adfs_d|rives(i%|
|00000390| 2d 31 29 3d b9 0d 01 72 | 05 ed 0d 01 7c 2a e7 6e |-1)=...r|....|*.n|
|000003a0| 68 25 3e 30 20 e3 69 25 | 3d 31 b8 6e 68 25 3a 61 |h%>0 .i%|=1.nh%:a|
|000003b0| 64 66 73 5f 64 72 69 76 | 65 73 28 69 25 2b 33 29 |dfs_driv|es(i%+3)|
|000003c0| 3d b9 3a ed 0d 01 86 1e | 73 6f 75 72 63 65 25 3d |=.:.....|source%=|
|000003d0| 32 3a e7 6e 66 25 3c 32 | 20 73 6f 75 72 63 65 25 |2:.nf%<2| source%|
|000003e0| 3d 30 0d 01 90 21 f2 64 | 69 73 70 6c 61 79 5f 73 |=0...!.d|isplay_s|
|000003f0| 6f 75 72 63 65 3a f2 64 | 69 73 70 6c 61 79 5f 64 |ource:.d|isplay_d|
|00000400| 65 73 74 0d 01 9a 1f f2 | 69 6e 76 65 72 73 65 28 |est.....|inverse(|
|00000410| 30 29 3a db 3a 6f 25 3d | 31 3a 2a 50 4f 49 4e 54 |0):.:o%=|1:*POINT|
|00000420| 45 52 0d 01 a4 10 c8 97 | 20 b8 20 36 34 30 2c 38 |ER......| . 640,8|
|00000430| 32 30 0d 01 ae 05 f5 0d | 01 b8 17 c8 97 20 c8 93 |20......|..... ..|
|00000440| 20 31 36 2c 30 2c 31 32 | 33 38 2c 38 32 37 0d 01 | 16,0,12|38,827..|
|00000450| c2 05 f5 0d 01 cc 2c f2 | 69 6e 76 65 72 73 65 28 |......,.|inverse(|
|00000460| 6f 25 3d 31 29 3a f2 63 | 65 6e 74 72 65 28 32 2c |o%=1):.c|entre(2,|
|00000470| 22 49 6e 74 72 6f 64 75 | 63 74 69 6f 6e 22 29 0d |"Introdu|ction").|
|00000480| 01 d6 34 f2 69 6e 76 65 | 72 73 65 28 6f 25 3d 32 |..4.inve|rse(o%=2|
|00000490| 29 3a f2 63 65 6e 74 72 | 65 28 34 2c 22 43 61 74 |):.centr|e(4,"Cat|
|000004a0| 61 6c 6f 67 75 65 20 61 | 20 44 46 53 20 64 69 73 |alogue a| DFS dis|
|000004b0| 63 22 29 0d 01 e0 36 f2 | 69 6e 76 65 72 73 65 28 |c")...6.|inverse(|
|000004c0| 6f 25 3d 33 29 3a f2 63 | 65 6e 74 72 65 28 36 2c |o%=3):.c|entre(6,|
|000004d0| 22 43 61 74 61 6c 6f 67 | 75 65 20 61 6e 20 41 44 |"Catalog|ue an AD|
|000004e0| 46 53 20 64 69 73 63 22 | 29 0d 01 ea 12 f2 69 6e |FS disc"|).....in|
|000004f0| 76 65 72 73 65 28 6f 25 | 3d 34 29 0d 01 f4 3f f2 |verse(o%|=4)...?.|
|00000500| 63 65 6e 74 72 65 28 38 | 2c 22 54 72 61 6e 73 66 |centre(8|,"Transf|
|00000510| 65 72 20 66 69 6c 65 73 | 20 66 72 6f 6d 20 61 20 |er files| from a |
|00000520| 44 46 53 20 64 69 73 63 | 20 74 6f 20 61 6e 20 41 |DFS disc| to an A|
|00000530| 44 46 53 20 64 69 73 63 | 22 29 0d 01 fe 25 f2 69 |DFS disc|")...%.i|
|00000540| 6e 76 65 72 73 65 28 6f | 25 3d 35 29 3a f2 63 65 |nverse(o|%=5):.ce|
|00000550| 6e 74 72 65 28 31 30 2c | 22 45 78 69 74 22 29 0d |ntre(10,|"Exit").|
|00000560| 02 08 0f c8 97 20 78 25 | 2c 79 25 2c 7a 25 0d 02 |..... x%|,y%,z%..|
|00000570| 12 1b 20 e7 28 79 25 3c | 35 35 30 29 84 28 79 25 |.. .(y%<|550).(y%|
|00000580| 3e 38 32 37 29 6f 25 3d | 30 0d 02 1c 1b 20 e7 28 |>827)o%=|0.... .(|
|00000590| 79 25 3c 38 32 38 29 80 | 28 79 25 3e 38 30 30 29 |y%<828).|(y%>800)|
|000005a0| 6f 25 3d 31 0d 02 26 1b | 20 e7 28 79 25 3c 37 36 |o%=1..&.| .(y%<76|
|000005b0| 36 29 80 28 79 25 3e 37 | 33 39 29 6f 25 3d 32 0d |6).(y%>7|39)o%=2.|
|000005c0| 02 30 1b 20 e7 28 79 25 | 3c 37 30 31 29 80 28 79 |.0. .(y%|<701).(y|
|000005d0| 25 3e 36 37 37 29 6f 25 | 3d 33 0d 02 3a 1b 20 e7 |%>677)o%|=3..:. .|
|000005e0| 28 79 25 3c 36 33 39 29 | 80 28 79 25 3e 36 31 32 |(y%<639)|.(y%>612|
|000005f0| 29 6f 25 3d 34 0d 02 44 | 1b 20 e7 28 79 25 3c 35 |)o%=4..D|. .(y%<5|
|00000600| 37 35 29 80 28 79 25 3e | 35 34 39 29 6f 25 3d 35 |75).(y%>|549)o%=5|
|00000610| 0d 02 4e 0a 20 fd 7a 25 | 3d 34 0d 02 58 0d 20 e7 |..N. .z%|=4..X. .|
|00000620| 79 25 3c 39 34 20 8c 0d | 02 62 11 20 f2 66 69 6e |y%<94 ..|.b. .fin|
|00000630| 64 5f 73 6f 75 72 63 65 | 0d 02 6c 0f 20 f2 66 69 |d_source|..l. .fi|
|00000640| 6e 64 5f 64 65 73 74 0d | 02 76 06 20 cd 0d 02 80 |nd_dest.|.v. ....|
|00000650| 06 20 f5 0d 02 8a 10 20 | c8 97 20 78 25 2c 79 25 |. ..... |.. x%,y%|
|00000660| 2c 7a 25 0d 02 94 0a 20 | fd 7a 25 3d 30 0d 02 9e |,z%.... |.z%=0...|
|00000670| 0c 20 c8 8e 20 6f 25 20 | ca 0d 02 a8 10 20 c9 20 |. .. o% |..... . |
|00000680| 31 3a 20 f2 69 6e 74 72 | 6f 0d 02 b2 12 20 c9 20 |1: .intr|o.... . |
|00000690| 32 3a 20 f2 63 61 74 5f | 64 66 73 0d 02 bc 13 20 |2: .cat_|dfs.... |
|000006a0| c9 20 33 3a 20 f2 63 61 | 74 5f 61 64 66 73 0d 02 |. 3: .ca|t_adfs..|
|000006b0| c6 16 20 c9 20 34 3a 20 | f2 64 66 73 5f 74 6f 5f |.. . 4: |.dfs_to_|
|000006c0| 61 64 66 73 0d 02 d0 06 | 20 7f 0d 02 da 06 20 cb |adfs....| ..... .|
|000006d0| 0d 02 e4 0a fd 20 6f 25 | 3d 35 0d 02 ee 1a f2 69 |..... o%|=5.....i|
|000006e0| 6e 76 65 72 73 65 28 a3 | 29 3a 2a 50 4f 49 4e 54 |nverse(.|):*POINT|
|000006f0| 45 52 20 30 0d 02 f8 0c | ef 32 36 2c 31 32 3a ee |ER 0....|.26,12:.|
|00000700| 0d 03 02 05 e0 0d 03 0c | 05 3a 0d 03 16 0b dd f2 |........|.:......|
|00000710| 69 6e 74 72 6f 0d 03 20 | 08 ea 20 76 25 0d 03 2a |intro.. |.. v%..*|
|00000720| 10 db 3a 2a 50 4f 49 4e | 54 45 52 20 30 0d 03 34 |..:*POIN|TER 0..4|
|00000730| 0b f1 8a 30 2c 32 29 3b | 0d 03 3e 45 f2 70 28 22 |...0,2);|..>E.p("|
|00000740| 54 68 69 73 20 70 72 6f | 67 72 61 6d 20 61 74 74 |This pro|gram att|
|00000750| 65 6d 70 74 73 20 74 6f | 20 63 6f 70 79 20 74 68 |empts to| copy th|
|00000760| 65 20 66 69 6c 65 73 20 | 6f 6e 20 61 20 34 30 20 |e files |on a 40 |
|00000770| 6f 72 20 38 30 20 74 72 | 61 63 6b 22 29 0d 03 48 |or 80 tr|ack")..H|
|00000780| 2f f2 70 28 22 44 46 53 | 20 66 6f 72 6d 61 74 74 |/.p("DFS| formatt|
|00000790| 65 64 20 64 69 73 63 20 | 6f 6e 74 6f 20 61 6e 20 |ed disc |onto an |
|000007a0| 41 44 46 53 20 64 69 73 | 63 2e 22 29 0d 03 52 06 |ADFS dis|c.")..R.|
|000007b0| f1 27 0d 03 5c 4a f2 70 | 28 22 41 20 64 69 72 65 |.'..\J.p|("A dire|
|000007c0| 63 74 6f 72 79 20 69 73 | 20 63 72 65 61 74 65 64 |ctory is| created|
|000007d0| 20 74 6f 20 68 6f 6c 64 | 20 74 68 65 73 65 20 70 | to hold| these p|
|000007e0| 72 6f 67 72 61 6d 73 2e | 20 54 68 65 20 6e 61 6d |rograms.| The nam|
|000007f0| 65 20 66 6f 72 20 74 68 | 69 73 22 29 0d 03 66 4b |e for th|is")..fK|
|00000800| f2 70 28 22 64 69 72 65 | 63 74 6f 72 79 20 69 73 |.p("dire|ctory is|
|00000810| 20 74 61 6b 65 6e 20 66 | 72 6f 6d 20 74 68 65 20 | taken f|rom the |
|00000820| 74 69 74 6c 65 20 6f 6e | 20 74 68 65 20 44 46 53 |title on| the DFS|
|00000830| 20 64 69 73 63 2e 20 49 | 66 20 61 20 64 69 72 65 | disc. I|f a dire|
|00000840| 63 74 6f 72 79 22 29 0d | 03 70 4b f2 70 28 22 61 |ctory").|.pK.p("a|
|00000850| 6c 72 65 61 64 79 20 65 | 78 69 73 74 73 20 77 69 |lready e|xists wi|
|00000860| 74 68 20 74 68 61 74 20 | 6e 61 6d 65 2c 20 79 6f |th that |name, yo|
|00000870| 75 20 77 69 6c 6c 20 62 | 65 20 61 73 6b 65 64 20 |u will b|e asked |
|00000880| 74 6f 20 65 6e 74 65 72 | 20 61 6e 6f 74 68 65 72 |to enter| another|
|00000890| 22 29 0d 03 7a 3c f2 70 | 28 22 6e 61 6d 65 2e 20 |")..z<.p|("name. |
|000008a0| 53 75 62 2d 64 69 72 65 | 63 74 6f 72 69 65 73 20 |Sub-dire|ctories |
|000008b0| 77 69 6c 6c 20 62 65 20 | 63 72 65 61 74 65 64 20 |will be |created |
|000008c0| 61 73 20 72 65 71 75 69 | 72 65 64 2e 22 29 0d 03 |as requi|red.")..|
|000008d0| 84 06 f1 27 0d 03 8e 49 | f2 70 28 22 49 66 20 61 |...'...I|.p("If a|
|000008e0| 20 44 46 53 20 64 69 72 | 65 63 74 6f 72 79 20 69 | DFS dir|ectory i|
|000008f0| 73 20 72 65 71 75 69 72 | 65 64 20 77 68 69 63 68 |s requir|ed which|
|00000900| 20 69 73 20 69 69 6c 65 | 67 61 6c 20 75 6e 64 65 | is iile|gal unde|
|00000910| 72 20 41 44 46 53 2c 20 | 74 68 65 22 29 0d 03 98 |r ADFS, |the")...|
|00000920| 39 f2 70 28 22 66 69 6c | 65 20 77 69 6c 6c 20 62 |9.p("fil|e will b|
|00000930| 65 20 73 74 6f 72 65 64 | 20 69 6e 20 74 68 65 20 |e stored| in the |
|00000940| 74 6f 70 20 6c 65 76 65 | 6c 20 64 69 72 65 63 74 |top leve|l direct|
|00000950| 6f 72 79 2e 22 29 0d 03 | a2 06 f1 27 0d 03 ac 48 |ory.")..|...'...H|
|00000960| f2 70 28 22 53 69 6d 69 | 6c 61 72 6c 79 2c 20 63 |.p("Simi|larly, c|
|00000970| 65 72 74 61 69 6e 20 63 | 68 61 72 61 63 74 65 72 |ertain c|haracter|
|00000980| 73 20 61 6c 6c 6f 77 65 | 64 20 69 6e 20 44 46 53 |s allowe|d in DFS|
|00000990| 20 66 69 6c 65 6e 61 6d | 65 73 20 61 72 65 20 6e | filenam|es are n|
|000009a0| 6f 74 22 29 0d 03 b6 38 | f2 70 28 22 61 6c 6c 6f |ot")...8|.p("allo|
|000009b0| 77 65 64 20 69 6e 20 41 | 44 46 53 20 66 69 6c 65 |wed in A|DFS file|
|000009c0| 6e 61 6d 65 73 20 61 6e | 64 20 77 69 6c 6c 20 62 |names an|d will b|
|000009d0| 65 20 69 67 6e 6f 72 65 | 64 2e 22 29 0d 03 c0 06 |e ignore|d.")....|
|000009e0| f1 27 0d 03 ca 47 f2 70 | 28 22 54 68 65 20 44 46 |.'...G.p|("The DF|
|000009f0| 53 20 64 69 73 63 20 4d | 55 53 54 20 62 65 20 75 |S disc M|UST be u|
|00000a00| 73 65 64 20 69 6e 20 74 | 68 65 20 61 70 70 72 6f |sed in t|he appro|
|00000a10| 70 72 69 61 74 65 20 73 | 69 7a 65 20 64 73 69 63 |priate s|ize dsic|
|00000a20| 20 64 72 69 76 65 2e 22 | 29 0d 03 d4 4b f2 70 28 | drive."|)...K.p(|
|00000a30| 22 49 74 20 69 73 20 6e | 6f 74 20 70 6f 73 73 69 |"It is n|ot possi|
|00000a40| 62 6c 65 20 74 6f 20 64 | 6f 75 62 6c 65 2d 73 74 |ble to d|ouble-st|
|00000a50| 65 70 20 61 6e 64 20 38 | 30 20 74 72 61 63 6b 20 |ep and 8|0 track |
|00000a60| 64 69 73 63 20 64 72 69 | 76 65 20 74 6f 20 72 65 |disc dri|ve to re|
|00000a70| 61 64 22 29 0d 03 de 1a | f2 70 28 22 61 20 34 30 |ad")....|.p("a 40|
|00000a80| 2d 74 72 61 63 6b 20 64 | 69 73 63 2e 22 29 0d 03 |-track d|isc.")..|
|00000a90| e8 06 f1 27 0d 03 f2 41 | f2 70 28 22 59 4f 55 20 |...'...A|.p("YOU |
|00000aa0| 41 52 45 20 41 44 56 49 | 53 45 44 20 54 4f 20 57 |ARE ADVI|SED TO W|
|00000ab0| 52 49 54 45 2d 50 52 4f | 54 45 43 54 20 54 48 45 |RITE-PRO|TECT THE|
|00000ac0| 20 53 4f 55 52 43 45 20 | 44 49 53 43 20 42 45 46 | SOURCE |DISC BEF|
|00000ad0| 4f 52 45 22 29 0d 03 fc | 15 f2 70 28 22 43 4f 4e |ORE")...|..p("CON|
|00000ae0| 54 49 4e 55 49 4e 47 2e | 22 29 0d 04 06 39 f2 63 |TINUING.|")...9.c|
|00000af0| 65 6e 74 72 65 28 32 31 | 2c 22 50 6c 65 61 73 65 |entre(21|,"Please|
|00000b00| 20 63 6c 69 63 6b 20 61 | 20 6d 6f 75 73 65 20 62 | click a| mouse b|
|00000b10| 75 74 74 6f 6e 20 74 6f | 20 63 6f 6e 74 69 6e 75 |utton to| continu|
|00000b20| 65 22 29 0d 04 10 0d 76 | 25 3d a4 63 6c 69 63 6b |e")....v|%=.click|
|00000b30| 0d 04 1a 0e db 3a 2a 50 | 4f 49 4e 54 45 52 0d 04 |.....:*P|OINTER..|
|00000b40| 24 05 e1 0d 04 2e 05 3a | 0d 04 38 0d dd f2 63 61 |$......:|..8...ca|
|00000b50| 74 5f 64 66 73 0d 04 42 | 08 ea 20 76 25 0d 04 4c |t_dfs..B|.. v%..L|
|00000b60| 10 db 3a 2a 50 4f 49 4e | 54 45 52 20 30 0d 04 56 |..:*POIN|TER 0..V|
|00000b70| 20 76 25 3d a4 70 72 6f | 6d 70 74 28 22 20 44 46 | v%=.pro|mpt(" DF|
|00000b80| 53 22 2c 73 6f 75 72 63 | 65 25 2c b9 29 0d 04 60 |S",sourc|e%,.)..`|
|00000b90| 0a e7 76 25 3d 34 8c 0d | 04 6a 16 20 f2 69 6e 69 |..v%=4..|.j. .ini|
|00000ba0| 74 5f 64 69 73 63 5f 72 | 65 63 6f 72 64 0d 04 74 |t_disc_r|ecord..t|
|00000bb0| 13 f2 72 65 61 64 5f 64 | 69 72 65 63 74 6f 72 79 |..read_d|irectory|
|00000bc0| 0d 04 7e 39 f2 63 65 6e | 74 72 65 28 32 31 2c 22 |..~9.cen|tre(21,"|
|00000bd0| 50 6c 65 61 73 65 20 63 | 6c 69 63 6b 20 61 20 6d |Please c|lick a m|
|00000be0| 6f 75 73 65 20 62 75 74 | 74 6f 6e 20 74 6f 20 63 |ouse but|ton to c|
|00000bf0| 6f 6e 74 69 6e 75 65 22 | 29 0d 04 88 0e 20 76 25 |ontinue"|).... v%|
|00000c00| 3d a4 63 6c 69 63 6b 0d | 04 92 05 cd 0d 04 9c 0e |=.click.|........|
|00000c10| db 3a 2a 50 4f 49 4e 54 | 45 52 0d 04 a6 05 e1 0d |.:*POINT|ER......|
|00000c20| 04 b0 05 3a 0d 04 ba 0e | dd f2 63 61 74 5f 61 64 |...:....|..cat_ad|
|00000c30| 66 73 0d 04 c4 08 ea 20 | 76 25 0d 04 ce 10 db 3a |fs..... |v%.....:|
|00000c40| 2a 50 4f 49 4e 54 45 52 | 20 30 0d 04 d8 1f 76 25 |*POINTER| 0....v%|
|00000c50| 3d a4 70 72 6f 6d 70 74 | 28 22 20 41 44 46 53 22 |=.prompt|(" ADFS"|
|00000c60| 2c 64 65 73 74 25 2c a3 | 29 0d 04 e2 0b e7 76 25 |,dest%,.|).....v%|
|00000c70| 3d 34 20 8c 0d 04 ec 19 | 20 ff 28 22 4d 4f 55 4e |=4 .....| .("MOUN|
|00000c80| 54 20 22 2b c3 28 64 65 | 73 74 25 29 29 0d 04 f6 |T "+.(de|st%))...|
|00000c90| 09 20 db 3a 2a 2e 0d 05 | 00 3a 20 f2 63 65 6e 74 |. .:*...|.: .cent|
|00000ca0| 72 65 28 32 31 2c 22 50 | 6c 65 61 73 65 20 63 6c |re(21,"P|lease cl|
|00000cb0| 69 63 6b 20 61 20 6d 6f | 75 73 65 20 62 75 74 74 |ick a mo|use butt|
|00000cc0| 6f 6e 20 74 6f 20 63 6f | 6e 74 69 6e 75 65 22 29 |on to co|ntinue")|
|00000cd0| 0d 05 0a 0e 20 76 25 3d | a4 63 6c 69 63 6b 0d 05 |.... v%=|.click..|
|00000ce0| 14 05 cd 0d 05 1e 0e db | 3a 2a 50 4f 49 4e 54 45 |........|:*POINTE|
|00000cf0| 52 0d 05 28 05 e1 0d 05 | 32 05 3a 0d 05 3c 11 dd |R..(....|2.:..<..|
|00000d00| f2 64 66 73 5f 74 6f 5f | 61 64 66 73 0d 05 46 08 |.dfs_to_|adfs..F.|
|00000d10| ea 20 76 25 0d 05 50 10 | db 3a 2a 50 4f 49 4e 54 |. v%..P.|.:*POINT|
|00000d20| 45 52 20 30 0d 05 5a 1f | 73 61 6d 65 25 3d 28 28 |ER 0..Z.|same%=((|
|00000d30| 73 6f 75 72 63 65 25 20 | 81 20 32 29 3d 64 65 73 |source% |. 2)=des|
|00000d40| 74 25 29 0d 05 64 20 76 | 25 3d a4 70 72 6f 6d 70 |t%)..d v|%=.promp|
|00000d50| 74 28 22 20 44 46 53 22 | 2c 73 6f 75 72 63 65 25 |t(" DFS"|,source%|
|00000d60| 2c b9 29 0d 05 6e 0b e7 | 76 25 3d 34 20 8c 0d 05 |,.)..n..|v%=4 ...|
|00000d70| 78 2a 20 e7 ac 28 73 61 | 6d 65 25 29 20 76 25 3d |x* ..(sa|me%) v%=|
|00000d80| a4 70 72 6f 6d 70 74 28 | 22 20 41 44 46 53 22 2c |.prompt(|" ADFS",|
|00000d90| 64 65 73 74 25 2c a3 29 | 0d 05 82 0c 20 e7 76 25 |dest%,.)|.... .v%|
|00000da0| 3d 34 20 8c 0d 05 8c 16 | 20 f2 69 6e 69 74 5f 64 |=4 .....| .init_d|
|00000db0| 69 73 63 5f 72 65 63 6f | 72 64 0d 05 96 14 20 f2 |isc_reco|rd.... .|
|00000dc0| 72 65 61 64 5f 64 69 72 | 65 63 74 6f 72 79 0d 05 |read_dir|ectory..|
|00000dd0| a0 12 20 e7 20 66 69 6c | 65 73 25 3c 3e 30 20 8c |.. . fil|es%<>0 .|
|00000de0| 0d 05 aa 0f 20 f2 72 65 | 61 64 5f 64 69 73 63 0d |.... .re|ad_disc.|
|00000df0| 05 b4 27 20 e7 73 61 6d | 65 25 20 76 25 3d a4 70 |..' .sam|e% v%=.p|
|00000e00| 72 6f 6d 70 74 28 22 20 | 41 44 46 53 22 2c 64 65 |rompt(" |ADFS",de|
|00000e10| 73 74 25 2c a3 29 0d 05 | be 0c 20 e7 76 25 3d 34 |st%,.)..|.. .v%=4|
|00000e20| 20 8c 0d 05 c8 06 20 db | 0d 05 d2 16 20 f2 63 72 | ..... .|.... .cr|
|00000e30| 65 61 74 65 5f 64 69 72 | 65 63 74 6f 72 79 0d 05 |eate_dir|ectory..|
|00000e40| dc 06 20 db 0d 05 e6 10 | 20 f2 63 6f 70 79 5f 66 |.. .....| .copy_f|
|00000e50| 69 6c 65 73 0d 05 f0 0b | 20 2a 44 49 52 20 24 0d |iles....| *DIR $.|
|00000e60| 05 fa 1c 20 f1 27 27 27 | 27 8a 30 2c 31 39 29 3b |... .'''|'.0,19);|
|00000e70| 22 46 69 6e 69 73 68 65 | 64 2e 22 0d 06 04 06 20 |"Finishe|d.".... |
|00000e80| cd 0d 06 0e 05 cd 0d 06 | 18 3a 20 f2 63 65 6e 74 |........|.: .cent|
|00000e90| 72 65 28 32 31 2c 22 50 | 6c 65 61 73 65 20 63 6c |re(21,"P|lease cl|
|00000ea0| 69 63 6b 20 61 20 6d 6f | 75 73 65 20 62 75 74 74 |ick a mo|use butt|
|00000eb0| 6f 6e 20 74 6f 20 63 6f | 6e 74 69 6e 75 65 22 29 |on to co|ntinue")|
|00000ec0| 0d 06 22 0e 20 76 25 3d | a4 63 6c 69 63 6b 0d 06 |..". v%=|.click..|
|00000ed0| 2c 06 20 cd 0d 06 36 05 | cd 0d 06 40 0e db 3a 2a |,. ...6.|...@..:*|
|00000ee0| 50 4f 49 4e 54 45 52 0d | 06 4a 05 e1 0d 06 54 05 |POINTER.|.J....T.|
|00000ef0| 3a 0d 06 5e 16 dd a4 70 | 72 6f 6d 70 74 28 6e 24 |:..^...p|rompt(n$|
|00000f00| 2c 64 25 2c 6c 25 29 0d | 06 68 08 ea 20 76 25 0d |,d%,l%).|.h.. v%.|
|00000f10| 06 72 15 e7 28 64 25 3e | 33 29 80 20 ac 20 28 6c |.r..(d%>|3). . (l|
|00000f20| 25 29 20 8c 0d 06 7c 09 | 20 76 25 3d 34 0d 06 86 |%) ...|.| v%=4...|
|00000f30| 05 cc 0d 06 90 2f 20 6e | 24 3d 22 50 6c 65 61 73 |...../ n|$="Pleas|
|00000f40| 65 20 70 6c 61 63 65 20 | 74 68 65 22 2b 6e 24 2b |e place |the"+n$+|
|00000f50| 22 20 64 69 73 63 20 69 | 6e 20 64 72 69 76 65 20 |" disc i|n drive |
|00000f60| 22 0d 06 9a 27 20 e7 6c | 25 20 6e 24 3d 6e 24 2b |"...' .l|% n$=n$+|
|00000f70| bd 28 36 35 2b 64 25 29 | 8b 20 6e 24 3d 6e 24 2b |.(65+d%)|. n$=n$+|
|00000f80| bd 28 34 38 2b 64 25 29 | 0d 06 a4 26 20 6e 24 3d |.(48+d%)|...& n$=|
|00000f90| 6e 24 2b 22 20 61 6e 64 | 20 63 6c 69 63 6b 20 61 |n$+" and| click a|
|00000fa0| 20 6d 6f 75 73 65 20 62 | 75 74 74 6f 6e 22 0d 06 | mouse b|utton"..|
|00000fb0| ae 13 20 f2 63 65 6e 74 | 72 65 28 32 31 2c 6e 24 |.. .cent|re(21,n$|
|00000fc0| 29 0d 06 b8 0e 20 76 25 | 3d a4 63 6c 69 63 6b 0d |).... v%|=.click.|
|00000fd0| 06 c2 13 20 f1 8a 30 2c | 32 32 29 3b 89 28 37 39 |... ..0,|22);.(79|
|00000fe0| 29 3b 0d 06 cc 05 cd 0d | 06 d6 07 3d 76 25 0d 06 |);......|...=v%..|
|00000ff0| e0 05 3a 0d 06 ea 16 dd | f2 69 6e 69 74 5f 64 69 |..:.....|.init_di|
|00001000| 73 63 5f 72 65 63 6f 72 | 64 0d 06 f4 08 ea 20 69 |sc_recor|d..... i|
|00001010| 25 0d 06 fe 2e 44 69 73 | 63 52 65 63 6f 72 64 25 |%....Dis|cRecord%|
|00001020| 3f 30 20 3d 20 38 3a f4 | 4c 6f 67 32 20 6f 66 20 |?0 = 8:.|Log2 of |
|00001030| 74 68 65 20 73 65 63 74 | 6f 72 20 73 69 7a 65 0d |the sect|or size.|
|00001040| 07 08 16 44 69 73 63 52 | 65 63 6f 72 64 25 3f 31 |...DiscR|ecord%?1|
|00001050| 20 3d 20 31 30 0d 07 12 | 27 44 69 73 63 52 65 63 | = 10...|'DiscRec|
|00001060| 6f 72 64 25 3f 32 20 3d | 20 31 3a f4 20 4e 75 6d |ord%?2 =| 1:. Num|
|00001070| 62 65 72 20 6f 66 20 68 | 65 61 64 73 0d 07 1c 26 |ber of h|eads...&|
|00001080| 44 69 73 63 52 65 63 6f | 72 64 25 3f 33 20 3d 20 |DiscReco|rd%?3 = |
|00001090| 31 3a f4 20 53 69 6e 67 | 6c 65 20 64 65 6e 73 69 |1:. Sing|le densi|
|000010a0| 74 79 0d 07 26 14 e3 69 | 25 20 3d 20 34 20 b8 20 |ty..&..i|% = 4 . |
|000010b0| 36 30 20 88 20 34 0d 07 | 30 15 44 69 73 63 52 65 |60 . 4..|0.DiscRe|
|000010c0| 63 6f 72 64 25 21 69 25 | 20 3d 30 0d 07 3a 06 20 |cord%!i%| =0..:. |
|000010d0| ed 0d 07 44 3e 44 69 73 | 63 52 65 63 6f 72 64 25 |...D>Dis|cRecord%|
|000010e0| 21 31 36 20 3d 20 28 64 | 73 69 7a 65 25 2a 31 30 |!16 = (d|size%*10|
|000010f0| 29 2a 31 30 2a 32 35 36 | 2a 32 3a f4 20 44 69 73 |)*10*256|*2:. Dis|
|00001100| 63 20 73 69 7a 65 20 69 | 6e 20 62 79 74 65 73 0d |c size i|n bytes.|
|00001110| 07 4e 05 e1 0d 07 58 05 | 3a 0d 07 62 14 dd f2 72 |.N....X.|:..b...r|
|00001120| 65 61 64 5f 64 69 72 65 | 63 74 6f 72 79 0d 07 6c |ead_dire|ctory..l|
|00001130| 08 ea 20 69 25 0d 07 76 | 05 db 0d 07 80 18 f2 72 |.. i%..v|.......r|
|00001140| 65 61 64 5f 74 72 61 63 | 6b 28 44 61 74 61 25 2c |ead_trac|k(Data%,|
|00001150| 30 29 0d 07 8a 34 74 69 | 74 6c 65 24 3d a4 73 74 |0)...4ti|tle$=.st|
|00001160| 72 69 6e 67 28 44 61 74 | 61 25 2c 38 2c b9 29 2b |ring(Dat|a%,8,.)+|
|00001170| a4 73 74 72 69 6e 67 28 | 44 61 74 61 25 2b 32 35 |.string(|Data%+25|
|00001180| 36 2c 32 2c b9 29 0d 07 | 94 44 e7 74 69 74 6c 65 |6,2,.)..|.D.title|
|00001190| 24 3d 22 22 20 f1 3a e8 | 22 4e 6f 20 64 69 73 63 |$="" .:.|"No disc|
|000011a0| 20 74 69 74 6c 65 2c 20 | 45 6e 74 65 72 20 6e 65 | title, |Enter ne|
|000011b0| 77 20 64 69 72 65 63 74 | 6f 72 79 20 6e 61 6d 65 |w direct|ory name|
|000011c0| 20 3a 20 22 74 69 74 6c | 65 24 0d 07 9e 1a f1 22 | : "titl|e$....."|
|000011d0| 44 69 73 63 20 74 69 74 | 6c 65 3a 22 3b 74 69 74 |Disc tit|le:";tit|
|000011e0| 6c 65 24 27 0d 07 a8 18 | 66 69 6c 65 73 25 3d 44 |le$'....|files%=D|
|000011f0| 61 74 61 25 3f 32 36 31 | 20 81 20 38 0d 07 b2 18 |ata%?261| . 8....|
|00001200| 64 69 73 63 5f 73 69 7a | 65 25 3d 44 61 74 61 25 |disc_siz|e%=Data%|
|00001210| 3f 32 36 32 0d 07 bc 21 | e7 66 69 6c 65 73 25 3d |?262...!|.files%=|
|00001220| 30 20 f1 22 4e 6f 20 66 | 69 6c 65 73 20 70 72 65 |0 ."No f|iles pre|
|00001230| 73 65 6e 74 22 0d 07 c6 | 13 e3 20 69 25 3d 31 20 |sent"...|.. i%=1 |
|00001240| b8 20 66 69 6c 65 73 25 | 0d 07 d0 28 20 44 5f 4e |. files%|...( D_N|
|00001250| 61 6d 65 24 28 69 25 29 | 3d a4 73 74 72 69 6e 67 |ame$(i%)|=.string|
|00001260| 28 44 61 74 61 25 2b 69 | 25 2a 38 2c 37 2c a3 29 |(Data%+i|%*8,7,.)|
|00001270| 0d 07 da 28 20 41 5f 4e | 61 6d 65 24 28 69 25 29 |...( A_N|ame$(i%)|
|00001280| 3d a4 73 74 72 69 6e 67 | 28 44 61 74 61 25 2b 69 |=.string|(Data%+i|
|00001290| 25 2a 38 2c 37 2c b9 29 | 0d 07 e4 29 20 e7 41 5f |%*8,7,.)|...) .A_|
|000012a0| 4e 61 6d 65 24 28 69 25 | 29 3d 22 22 20 41 5f 4e |Name$(i%|)="" A_N|
|000012b0| 61 6d 65 24 28 69 25 29 | 3d 22 4e 6f 4e 61 6d 65 |ame$(i%)|="NoName|
|000012c0| 22 0d 07 ee 18 20 f1 44 | 5f 4e 61 6d 65 24 28 69 |".... .D|_Name$(i|
|000012d0| 25 29 3b 89 28 31 33 29 | 3b 0d 07 f8 27 20 44 69 |%);.(13)|;...' Di|
|000012e0| 72 24 28 69 25 29 3d a4 | 73 74 72 69 6e 67 28 44 |r$(i%)=.|string(D|
|000012f0| 61 74 61 25 2b 69 25 2a | 38 2b 37 2c 31 2c b9 29 |ata%+i%*|8+7,1,.)|
|00001300| 0d 08 02 1e 20 4c 6f 61 | 64 25 28 69 25 29 3d a4 |.... Loa|d%(i%)=.|
|00001310| 6c 6f 61 64 28 44 61 74 | 61 25 2c 69 25 29 0d 08 |load(Dat|a%,i%)..|
|00001320| 0c 1e 20 45 78 65 63 25 | 28 69 25 29 3d a4 65 78 |.. Exec%|(i%)=.ex|
|00001330| 65 63 28 44 61 74 61 25 | 2c 69 25 29 0d 08 16 22 |ec(Data%|,i%)..."|
|00001340| 20 4c 65 6e 67 74 68 25 | 28 69 25 29 3d a4 6c 65 | Length%|(i%)=.le|
|00001350| 6e 67 74 68 28 44 61 74 | 61 25 2c 69 25 29 0d 08 |ngth(Dat|a%,i%)..|
|00001360| 20 20 20 53 74 61 72 74 | 25 28 69 25 29 3d a4 73 | Start|%(i%)=.s|
|00001370| 74 61 72 74 28 44 61 74 | 61 25 2c 69 25 29 0d 08 |tart(Dat|a%,i%)..|
|00001380| 2a 06 20 ed 0d 08 34 06 | 20 f1 0d 08 3e 06 20 e1 |*. ...4.| ...>. .|
|00001390| 0d 08 48 05 3a 0d 08 52 | 0f dd f2 72 65 61 64 5f |..H.:..R|...read_|
|000013a0| 64 69 73 63 0d 08 5c 0c | ea 20 74 74 25 2c 69 25 |disc..\.|. tt%,i%|
|000013b0| 0d 08 66 23 e7 64 69 73 | 63 5f 73 69 7a 65 25 3d |..f#.dis|c_size%=|
|000013c0| 26 39 30 20 74 74 25 3d | 33 39 20 8b 20 74 74 25 |&90 tt%=|39 . tt%|
|000013d0| 3d 37 39 0d 08 70 17 f1 | 27 22 52 65 61 64 69 6e |=79..p..|'"Readin|
|000013e0| 67 20 74 72 61 63 6b 23 | 22 3b 0d 08 7a 0f e3 69 |g track#|";..z..i|
|000013f0| 25 3d 31 20 b8 20 74 74 | 25 0d 08 84 10 20 f1 8a |%=1 . tt|%.... ..|
|00001400| 31 35 2c bc 29 3b 69 25 | 3b 0d 08 8e 22 20 f2 72 |15,.);i%|;..." .r|
|00001410| 65 61 64 5f 74 72 61 63 | 6b 28 44 61 74 61 25 2b |ead_trac|k(Data%+|
|00001420| 69 25 2a 32 35 36 30 2c | 69 25 29 0d 08 98 05 ed |i%*2560,|i%).....|
|00001430| 0d 08 a2 05 e1 0d 08 ac | 05 3a 0d 08 b6 16 dd f2 |........|.:......|
|00001440| 63 72 65 61 74 65 5f 64 | 69 72 65 63 74 6f 72 79 |create_d|irectory|
|00001450| 0d 08 c0 08 ea 20 66 25 | 0d 08 ca 08 2a 42 59 45 |..... f%|....*BYE|
|00001460| 0d 08 d4 18 ff 28 22 4d | 4f 55 4e 54 20 22 2b c3 |.....("M|OUNT "+.|
|00001470| 28 64 65 73 74 25 29 29 | 0d 08 de 05 f5 0d 08 e8 |(dest%))|........|
|00001480| 22 66 25 3d a4 6f 62 6a | 65 63 74 5f 65 78 69 73 |"f%=.obj|ect_exis|
|00001490| 74 73 28 22 24 2e 22 2b | 74 69 74 6c 65 24 29 0d |ts("$."+|title$).|
|000014a0| 08 f2 21 e7 66 25 20 74 | 69 74 6c 65 24 3d a4 6e |..!.f% t|itle$=.n|
|000014b0| 65 77 5f 74 69 74 6c 65 | 28 74 69 74 6c 65 24 29 |ew_title|(title$)|
|000014c0| 0d 08 fc 0b fd 20 ac 28 | 66 25 29 0d 09 06 17 ff |..... .(|f%).....|
|000014d0| 28 22 43 44 49 52 20 24 | 2e 22 2b 74 69 74 6c 65 |("CDIR $|."+title|
|000014e0| 24 29 0d 09 10 16 ff 28 | 22 44 49 52 20 24 2e 22 |$).....(|"DIR $."|
|000014f0| 2b 74 69 74 6c 65 24 29 | 0d 09 1a 05 e1 0d 09 24 |+title$)|.......$|
|00001500| 05 3a 0d 09 2e 04 0d 09 | 38 17 dd a4 6f 62 6a 65 |.:......|8...obje|
|00001510| 63 74 5f 65 78 69 73 74 | 73 28 74 24 29 0d 09 42 |ct_exist|s(t$)..B|
|00001520| 08 ea 20 72 25 0d 09 4c | 0d e7 74 24 3d 22 22 20 |.. r%..L|..t$="" |
|00001530| 3d b9 0d 09 56 0c 72 25 | 3d 8e 28 74 24 29 0d 09 |=...V.r%|=.(t$)..|
|00001540| 60 0f e7 72 25 3c 3e 30 | 20 d9 23 72 25 0d 09 6a |`..r%<>0| .#r%..j|
|00001550| 0c 3d 28 72 25 3c 3e 30 | 29 0d 09 74 05 3a 0d 09 |.=(r%<>0|)..t.:..|
|00001560| 7e 13 dd a4 6e 65 77 5f | 74 69 74 6c 65 28 74 24 |~...new_|title(t$|
|00001570| 29 0d 09 88 08 ea 20 73 | 24 0d 09 92 3a f1 8a 30 |)..... s|$...:..0|
|00001580| 2c 32 38 29 3b 22 41 20 | 64 69 72 65 63 74 6f 72 |,28);"A |director|
|00001590| 79 20 61 6c 72 65 61 64 | 79 20 65 78 69 73 74 73 |y alread|y exists|
|000015a0| 20 77 69 74 68 20 74 68 | 65 20 6e 61 6d 65 20 22 | with th|e name "|
|000015b0| 2b 74 24 0d 09 9c 3e f1 | 22 50 6c 65 61 73 65 20 |+t$...>.|"Please |
|000015c0| 65 6e 74 65 72 20 61 20 | 72 65 70 6c 61 63 65 6d |enter a |replacem|
|000015d0| 65 6e 74 20 6e 61 6d 65 | 20 28 75 70 20 74 6f 20 |ent name| (up to |
|000015e0| 31 30 20 63 68 61 72 73 | 20 6f 6e 6c 79 29 3a 20 |10 chars| only): |
|000015f0| 22 0d 09 a6 11 73 24 3d | a4 67 65 74 5f 73 28 31 |"....s$=|.get_s(1|
|00001600| 30 29 0d 09 b0 13 f1 8a | 30 2c 32 38 29 3b 89 28 |0)......|0,28);.(|
|00001610| 32 34 30 29 3b 0d 09 ba | 07 3d 73 24 0d 09 c4 05 |240);...|.=s$....|
|00001620| 3a 0d 09 ce 12 dd a4 6e | 65 77 5f 6e 61 6d 65 28 |:......n|ew_name(|
|00001630| 74 24 29 0d 09 d8 08 ea | 20 73 24 0d 09 e2 34 f1 |t$).....| s$...4.|
|00001640| 8a 30 2c 32 38 29 3b 22 | 41 20 66 69 6c 65 20 61 |.0,28);"|A file a|
|00001650| 6c 72 65 61 64 79 20 65 | 78 69 73 74 73 20 77 69 |lready e|xists wi|
|00001660| 74 68 20 74 68 65 20 6e | 61 6d 65 22 2b 74 24 0d |th the n|ame"+t$.|
|00001670| 09 ec 3e f1 22 50 6c 65 | 61 73 65 20 65 6e 74 65 |..>."Ple|ase ente|
|00001680| 72 20 61 20 72 65 70 6c | 61 63 65 6d 65 6e 74 20 |r a repl|acement |
|00001690| 6e 61 6d 65 20 28 75 70 | 20 74 6f 20 31 32 20 63 |name (up| to 12 c|
|000016a0| 68 61 72 73 20 6f 6e 6c | 79 29 3a 20 22 0d 09 f6 |hars onl|y): "...|
|000016b0| 11 73 24 3d a4 67 65 74 | 5f 73 28 31 32 29 0d 0a |.s$=.get|_s(12)..|
|000016c0| 00 13 f1 8a 4f 2c 32 38 | 29 3b 89 28 32 34 30 29 |....O,28|);.(240)|
|000016d0| 3b 0d 0a 0a 07 3d 73 24 | 0d 0a 14 05 3a 0d 0a 1e |;....=s$|....:...|
|000016e0| 10 dd f2 63 6f 70 79 5f | 66 69 6c 65 73 0d 0a 28 |...copy_|files..(|
|000016f0| 0e ea 20 69 25 2c 6f 25 | 2c 66 25 0d 0a 32 12 e3 |.. i%,o%|,f%..2..|
|00001700| 69 25 3d 31 20 b8 20 66 | 69 6c 65 73 25 0d 0a 3c |i%=1 . f|iles%..<|
|00001710| 36 20 e7 20 ac 20 28 a4 | 6f 62 6a 65 63 74 5f 65 |6 . . (.|object_e|
|00001720| 78 69 73 74 73 28 44 69 | 72 24 28 69 25 29 29 29 |xists(Di|r$(i%)))|
|00001730| ff 28 22 43 44 49 52 20 | 22 2b 44 69 72 24 28 69 |.("CDIR |"+Dir$(i|
|00001740| 25 29 29 0d 0a 46 06 20 | f5 0d 0a 50 0a 20 6f 24 |%))..F. |...P. o$|
|00001750| 3d 22 22 0d 0a 5a 24 20 | e7 44 69 72 24 28 69 25 |=""..Z$ |.Dir$(i%|
|00001760| 29 3c 3e 22 22 6f 24 3d | 6f 24 2b 44 69 72 24 28 |)<>""o$=|o$+Dir$(|
|00001770| 69 25 29 2b 22 2e 22 0d | 0a 64 16 20 6f 24 3d 6f |i%)+".".|.d. o$=o|
|00001780| 24 2b 41 5f 4e 61 6d 65 | 24 28 69 25 29 0d 0a 6e |$+A_Name|$(i%)..n|
|00001790| 1f 20 66 25 3d a4 6f 62 | 6a 65 63 74 5f 65 78 69 |. f%=.ob|ject_exi|
|000017a0| 73 74 73 28 22 24 2e 22 | 2b 6f 24 29 0d 0a 78 2b |sts("$."|+o$)..x+|
|000017b0| 20 e7 66 25 20 41 5f 4e | 61 6d 65 24 28 69 25 29 | .f% A_N|ame$(i%)|
|000017c0| 3d a4 6e 65 77 5f 6e 61 | 6d 65 28 41 5f 4e 61 6d |=.new_na|me(A_Nam|
|000017d0| 65 24 28 69 25 29 29 0d | 0a 82 0c 20 fd 20 ac 28 |e$(i%)).|... . .(|
|000017e0| 66 25 29 0d 0a 8c 33 20 | 6f 24 3d 22 73 61 76 65 |f%)...3 |o$="save|
|000017f0| 20 22 2b 6f 24 2b 22 20 | 22 2b c3 7e 28 44 61 74 | "+o$+" |"+.~(Dat|
|00001800| 61 25 2b 53 74 61 72 74 | 25 28 69 25 29 2a 32 35 |a%+Start|%(i%)*25|
|00001810| 36 29 2b 22 2b 22 0d 0a | 96 1e 20 6f 24 3d 6f 24 |6)+"+"..|.. o$=o$|
|00001820| 2b c3 7e 28 4c 65 6e 67 | 74 68 25 28 69 25 29 29 |+.~(Leng|th%(i%))|
|00001830| 2b 22 20 22 0d 0a a0 1c | 20 6f 24 3d 6f 24 2b c3 |+" "....| o$=o$+.|
|00001840| 7e 28 45 78 65 63 25 28 | 69 25 29 29 2b 22 20 22 |~(Exec%(|i%))+" "|
|00001850| 0d 0a aa 18 20 6f 24 3d | 6f 24 2b c3 7e 28 4c 6f |.... o$=|o$+.~(Lo|
|00001860| 61 64 25 28 69 25 29 29 | 0d 0a b4 2f 20 f1 22 43 |ad%(i%))|.../ ."C|
|00001870| 6f 70 79 69 6e 67 20 22 | 3b 44 5f 4e 61 6d 65 24 |opying "|;D_Name$|
|00001880| 28 69 25 29 3b 22 20 61 | 73 20 22 3b 41 5f 4e 61 |(i%);" a|s ";A_Na|
|00001890| 6d 65 24 28 69 25 29 0d | 0a be 0a 20 ff 28 6f 24 |me$(i%).|... .(o$|
|000018a0| 29 0d 0a c8 06 20 ed 0d | 0a d2 05 e1 0d 0a dc 05 |).... ..|........|
|000018b0| 3a 0d 0a e6 17 dd f2 72 | 65 61 64 5f 74 72 61 63 |:......r|ead_trac|
|000018c0| 6b 28 62 25 2c 74 25 29 | 0d 0a f0 05 f4 0d 0a fa |k(b%,t%)|........|
|000018d0| 05 f4 0d 0b 04 24 ea 20 | 72 25 2c 68 25 2c 64 25 |.....$. |r%,h%,d%|
|000018e0| 2c 72 65 61 73 6f 6e 25 | 2c 64 69 73 63 5f 61 64 |,reason%|,disc_ad|
|000018f0| 64 72 65 73 73 25 0d 0b | 0e 14 64 25 3d 28 73 6f |dress%..|..d%=(so|
|00001900| 75 72 63 65 25 20 81 20 | 32 29 0d 0b 18 14 68 25 |urce% . |2)....h%|
|00001910| 3d 28 73 6f 75 72 63 65 | 25 20 83 20 32 29 0d 0b |=(source|% . 2)..|
|00001920| 22 21 74 25 3d 28 28 68 | 25 2a 64 73 69 7a 65 25 |"!t%=((h|%*dsize%|
|00001930| 2a 31 30 2b 74 25 29 2a | 31 30 29 2a 32 35 36 0d |*10+t%)*|10)*256.|
|00001940| 0b 2c 20 72 65 61 73 6f | 6e 25 3d 31 2b 28 44 69 |., reaso|n%=1+(Di|
|00001950| 73 63 52 65 63 6f 72 64 | 25 20 3c 3c 20 36 29 0d |scRecord|% << 6).|
|00001960| 0b 36 1f 64 69 73 63 5f | 61 64 64 72 65 73 73 25 |.6.disc_|address%|
|00001970| 3d 74 25 2b 28 64 25 20 | 3c 3c 20 32 39 29 0d 0b |=t%+(d% |<< 29)..|
|00001980| 40 15 44 69 73 63 52 65 | 63 6f 72 64 25 3f 33 34 |@.DiscRe|cord%?34|
|00001990| 3d 64 25 0d 0b 4a 3a c8 | 99 20 22 58 41 44 46 53 |=d%..J:.|. "XADFS|
|000019a0| 5f 44 69 73 63 4f 70 22 | 2c 30 2c 72 65 61 73 6f |_DiscOp"|,0,reaso|
|000019b0| 6e 25 2c 64 69 73 63 5f | 61 64 64 72 65 73 73 25 |n%,disc_|address%|
|000019c0| 2c 62 25 2c 32 35 36 30 | 20 b8 20 72 25 0d 0b 54 |,b%,2560| . r%..T|
|000019d0| 22 e7 20 72 25 3c 3e 30 | 20 f1 22 55 6e 61 62 6c |". r%<>0| ."Unabl|
|000019e0| 65 20 74 6f 20 72 65 61 | 64 20 64 61 74 61 22 0d |e to rea|d data".|
|000019f0| 0b 5e 05 e1 0d 0b 68 05 | 3a 0d 0b 72 16 dd a4 73 |.^....h.|:..r...s|
|00001a00| 74 72 69 6e 67 28 62 25 | 2c 73 25 2c 66 25 29 0d |tring(b%|,s%,f%).|
|00001a10| 0b 7c 0b ea 20 73 24 2c | 63 25 0d 0b 86 09 73 24 |.|.. s$,|c%....s$|
|00001a20| 3d 22 22 0d 0b 90 05 f5 | 0d 0b 9a 10 63 25 3d 3f |="".....|....c%=?|
|00001a30| 62 25 20 80 20 31 32 37 | 0d 0b a4 0a e7 20 66 25 |b% . 127|..... f%|
|00001a40| 20 8c 0d 0b ae 28 e7 a7 | c0 76 24 2c a9 28 76 24 | ....(..|.v$,.(v$|
|00001a50| 29 2d 32 29 2c bd 28 63 | 25 29 29 3c 3e 30 20 73 |)-2),.(c|%))<>0 s|
|00001a60| 24 3d 73 24 2b bd 28 63 | 25 29 0d 0b b8 05 cc 0d |$=s$+.(c|%)......|
|00001a70| 0b c2 0f 73 24 3d 73 24 | 2b bd 28 63 25 29 0d 0b |...s$=s$|+.(c%)..|
|00001a80| cc 05 cd 0d 0b d6 09 62 | 25 2b 3d 31 0d 0b e0 09 |.......b|%+=1....|
|00001a90| 73 25 2d 3d 31 0d 0b ea | 09 fd 73 25 3d 30 0d 0b |s%-=1...|..s%=0..|
|00001aa0| f4 07 3d 73 24 0d 0b fe | 05 3a 0d 0c 08 11 dd a4 |..=s$...|.:......|
|00001ab0| 6c 6f 61 64 28 62 25 2c | 6e 25 29 0d 0c 12 05 20 |load(b%,|n%).... |
|00001ac0| 0d 0c 1c 05 20 0d 0c 26 | 05 20 0d 0c 30 05 20 0d |.... ..&|. ..0. .|
|00001ad0| 0c 3a 26 3d 3f 28 62 25 | 2b 32 35 36 2b 6e 25 2a |.:&=?(b%|+256+n%*|
|00001ae0| 38 29 2b 3f 28 62 25 2b | 32 35 37 2b 6e 25 2a 38 |8)+?(b%+|257+n%*8|
|00001af0| 29 2a 32 35 36 0d 0c 44 | 05 20 0d 0c 4e 11 dd a4 |)*256..D|. ..N...|
|00001b00| 65 78 65 63 28 62 25 2c | 6e 25 29 0d 0c 58 05 20 |exec(b%,|n%)..X. |
|00001b10| 0d 0c 62 05 20 0d 0c 6c | 05 20 0d 0c 76 05 20 0d |..b. ..l|. ..v. .|
|00001b20| 0c 80 05 20 0d 0c 8a 26 | 3d 3f 28 62 25 2b 32 35 |... ...&|=?(b%+25|
|00001b30| 38 2b 6e 25 2a 38 29 2b | 3f 28 62 25 2b 32 35 39 |8+n%*8)+|?(b%+259|
|00001b40| 2b 6e 25 2a 38 29 2a 32 | 35 36 0d 0c 94 05 20 0d |+n%*8)*2|56.... .|
|00001b50| 0c 9e 13 dd a4 6c 65 6e | 67 74 68 28 62 25 2c 6e |.....len|gth(b%,n|
|00001b60| 25 29 0d 0c a8 05 20 0d | 0c b2 05 20 0d 0c bc 05 |%).... .|... ....|
|00001b70| 20 0d 0c c6 05 20 0d 0c | d0 05 20 0d 0c da 26 3d | .... ..|.. ...&=|
|00001b80| 3f 28 62 25 2b 32 36 30 | 2b 6e 25 2a 38 29 2b 3f |?(b%+260|+n%*8)+?|
|00001b90| 28 62 25 2b 32 36 31 2b | 6e 25 2a 38 29 2a 32 35 |(b%+261+|n%*8)*25|
|00001ba0| 36 0d 0c e4 05 20 0d 0c | ee 12 dd a4 73 74 61 72 |6.... ..|....star|
|00001bb0| 74 28 62 25 2c 6e 25 29 | 0d 0c f8 05 20 0d 0d 02 |t(b%,n%)|.... ...|
|00001bc0| 05 20 0d 0d 0c 05 20 0d | 0d 16 05 20 0d 0d 20 2d |. .... .|... .. -|
|00001bd0| 3d 3f 28 62 25 2b 32 36 | 33 2b 6e 25 2a 38 29 2b |=?(b%+26|3+n%*8)+|
|00001be0| 28 28 3f 28 62 25 2b 32 | 36 32 2b 6e 25 2a 38 29 |((?(b%+2|62+n%*8)|
|00001bf0| 20 80 20 33 29 3c 3c 38 | 29 0d 0d 2a 05 20 0d 0d | . 3)<<8|)..*. ..|
|00001c00| 34 0f dd a4 67 65 74 5f | 73 28 6c 25 29 0d 0d 3e |4...get_|s(l%)..>|
|00001c10| 0e ea 20 61 24 2c 66 25 | 2c 73 24 0d 0d 48 09 73 |.. a$,f%|,s$..H.s|
|00001c20| 24 3d 22 22 0d 0d 52 08 | 66 25 3d a3 0d 0d 5c 0c |$=""..R.|f%=...\.|
|00001c30| c8 95 20 ac 28 66 25 29 | 0d 0d 66 0d 61 24 3d a4 |.. .(f%)|..f.a$=.|
|00001c40| 67 65 74 5f 63 0d 0d 70 | 0b c8 8e 20 61 24 20 ca |get_c..p|... a$ .|
|00001c50| 0d 0d 7a 11 20 c9 20 bd | 31 33 3a 20 20 66 25 3d |..z. . .|13: f%=|
|00001c60| b9 0d 0d 84 17 20 c9 20 | bd 31 32 37 3a 20 e7 a9 |..... . |.127: ..|
|00001c70| 28 73 24 29 3e 30 20 8c | 0d 0d 8e 1b 73 24 3d c0 |(s$)>0 .|....s$=.|
|00001c80| 73 24 2c a9 28 73 24 29 | 2d 31 29 3a ef 38 2c 33 |s$,.(s$)|-1):.8,3|
|00001c90| 32 2c 38 0d 0d 98 05 cc | 0d 0d a2 06 ef 37 0d 0d |2,8.....|.....7..|
|00001ca0| ac 05 cd 0d 0d b6 20 7f | 20 e7 20 a9 28 73 24 29 |...... .| . .(s$)|
|00001cb0| 3d 6c 25 20 8c 20 ef 37 | 20 8b 20 73 24 3d 73 24 |=l% . .7| . s$=s$|
|00001cc0| 2b 61 24 0d 0d c0 05 cb | 0d 0d ca 05 ce 0d 0d d4 |+a$.....|........|
|00001cd0| 07 3d 73 24 0d 0d de 05 | 20 0d 0d e8 0b dd a4 67 |.=s$....| ......g|
|00001ce0| 65 74 5f 63 0d 0d f2 0b | ea 20 61 24 2c 66 25 0d |et_c....|. a$,f%.|
|00001cf0| 0d fc 05 ee 0d 0e 06 05 | f5 0d 0e 10 08 61 24 3d |........|.....a$=|
|00001d00| be 0d 0e 1a 0e 66 25 3d | a7 76 24 2c 61 24 29 0d |.....f%=|.v$,a$).|
|00001d10| 0e 24 0c e7 66 25 3d 30 | 20 ef 37 0d 0e 2e 0b fd |.$..f%=0| .7.....|
|00001d20| 20 66 25 3c 3e 30 0d 0e | 38 05 87 0d 0e 42 08 f1 | f%<>0..|8....B..|
|00001d30| 61 24 3b 0d 0e 4c 07 3d | 61 24 0d 0e 56 05 20 0d |a$;..L.=|a$..V. .|
|00001d40| 0e 60 16 dd f2 62 6f 78 | 28 63 25 2c 74 25 2c 6e |.`...box|(c%,t%,n|
|00001d50| 25 2c 6c 25 29 0d 0e 6a | 08 ea 20 58 25 0d 0e 74 |%,l%)..j|.. X%..t|
|00001d60| 16 e7 6e 25 3c 31 30 20 | 58 25 3d 31 20 8b 20 58 |..n%<10 |X%=1 . X|
|00001d70| 25 3d 32 0d 0e 7e 10 f2 | 69 6e 76 65 72 73 65 28 |%=2..~..|inverse(|
|00001d80| 63 25 29 0d 0e 88 11 ef | 33 31 2c 74 25 2c 32 39 |c%).....|31,t%,29|
|00001d90| 2c 31 36 33 0d 0e 92 11 | f1 c4 58 25 2c bd 28 31 |,163....|..X%,.(1|
|00001da0| 36 36 29 29 3b 0d 0e 9c | 15 ef 31 36 35 2c 33 31 |66));...|..165,31|
|00001db0| 2c 74 25 2c 33 30 2c 31 | 36 39 0d 0e a6 17 e7 6c |,t%,30,1|69.....l|
|00001dc0| 25 20 ef 36 35 2b 6e 25 | 20 8b 20 ef 34 38 2b 6e |% .65+n%| . .48+n|
|00001dd0| 25 0d 0e b0 15 ef 31 36 | 39 2c 33 31 2c 74 25 2c |%.....16|9,31,t%,|
|00001de0| 33 31 2c 31 37 30 0d 0e | ba 11 f1 c4 58 25 2c bd |31,170..|....X%,.|
|00001df0| 28 31 36 36 29 29 3b 0d | 0e c4 08 ef 31 37 32 0d |(166));.|....172.|
|00001e00| 0e ce 05 e1 0d 0e d8 05 | 20 0d 0e e2 14 dd f2 64 |........| ......d|
|00001e10| 69 73 70 6c 61 79 5f 73 | 6f 75 72 63 65 0d 0e ec |isplay_s|ource...|
|00001e20| 08 ea 20 64 25 0d 0e f6 | 07 ef 32 36 0d 0f 00 25 |.. d%...|..26...%|
|00001e30| 3a f2 69 6e 76 65 72 73 | 65 28 a3 29 3a f1 8a 31 |:.invers|e(.):..1|
|00001e40| 2c 32 37 29 3b 22 20 44 | 46 53 20 64 72 69 76 65 |,27);" D|FS drive|
|00001e50| 22 0d 0f 0a 0b e3 64 25 | 3d 30 b8 37 0d 0f 14 35 |".....d%|=0.7...5|
|00001e60| e7 64 66 73 5f 64 72 69 | 76 65 73 28 64 25 29 20 |.dfs_dri|ves(d%) |
|00001e70| 8c 20 f2 62 6f 78 28 28 | 73 6f 75 72 63 65 25 3d |. .box((|source%=|
|00001e80| 64 25 29 2c 31 2b 64 25 | 2a 34 2c 64 25 2c 20 b9 |d%),1+d%|*4,d%, .|
|00001e90| 29 0d 0f 1e 05 ed 0d 0f | 28 0b f2 77 69 6e 64 6f |).......|(..windo|
|00001ea0| 77 0d 0f 32 05 e1 0d 0f | 3c 05 3a 0d 0f 46 11 dd |w..2....|<.:..F..|
|00001eb0| f2 66 69 6e 64 5f 73 6f | 75 72 63 65 0d 0f 50 08 |.find_so|urce..P.|
|00001ec0| ea 20 73 25 0d 0f 5a 0f | e7 28 78 25 3c 33 38 34 |. s%..Z.|.(x%<384|
|00001ed0| 29 20 8c 0d 0f 64 12 73 | 25 3d 28 78 25 2d 31 36 |) ...d.s|%=(x%-16|
|00001ee0| 29 81 20 36 30 0d 0f 6e | 2e e7 64 66 73 5f 64 72 |). 60..n|..dfs_dr|
|00001ef0| 69 76 65 73 28 73 25 29 | 20 73 6f 75 72 63 65 25 |ives(s%)| source%|
|00001f00| 3d 73 25 3a f2 64 69 73 | 70 6c 61 79 5f 73 6f 75 |=s%:.dis|play_sou|
|00001f10| 72 63 65 0d 0f 78 05 cd | 0d 0f 82 05 e1 0d 0f 8c |rce..x..|........|
|00001f20| 05 3a 0d 0f 96 12 dd f2 | 64 69 73 70 6c 61 79 5f |.:......|display_|
|00001f30| 64 65 73 74 0d 0f a0 08 | ea 20 64 25 0d 0f aa 13 |dest....|. d%....|
|00001f40| ef 32 36 3a f2 69 6e 76 | 65 72 73 65 28 a3 29 0d |.26:.inv|erse(.).|
|00001f50| 0f b4 1a f1 8a 36 39 2c | 32 37 29 3b 22 20 41 44 |.....69,|27);" AD|
|00001f60| 46 53 20 64 72 69 76 65 | 22 0d 0f be 21 e7 61 64 |FS drive|"...!.ad|
|00001f70| 66 73 5f 64 72 69 76 65 | 73 28 64 65 73 74 25 29 |fs_drive|s(dest%)|
|00001f80| 3d a3 20 64 65 73 74 25 | 3d 30 0d 0f c8 0b e3 64 |=. dest%|=0.....d|
|00001f90| 25 3d 30 b8 35 0d 0f d2 | 32 e7 61 64 66 73 5f 64 |%=0.5...|2.adfs_d|
|00001fa0| 72 69 76 65 73 28 64 25 | 29 20 f2 62 6f 78 28 28 |rives(d%|) .box((|
|00001fb0| 64 65 73 74 25 3d 64 25 | 29 2c 35 36 2b 64 25 2a |dest%=d%|),56+d%*|
|00001fc0| 34 2c 64 25 2c a3 29 0d | 0f dc 05 ed 0d 0f e6 0b |4,d%,.).|........|
|00001fd0| f2 77 69 6e 64 6f 77 0d | 0f f0 05 e1 0d 0f fa 04 |.window.|........|
|00001fe0| 0d 10 04 04 0d 10 0e 04 | 0d 10 18 04 0d 10 22 04 |........|......".|
|00001ff0| 0d 10 2c 05 3a 0d 10 36 | 0f dd f2 66 69 6e 64 5f |..,.:..6|...find_|
|00002000| 64 65 73 74 0d 10 40 08 | ea 20 73 25 0d 10 4a 0f |dest..@.|. s%..J.|
|00002010| e7 28 78 25 3e 38 39 35 | 29 20 8c 0d 10 54 14 73 |.(x%>895|) ...T.s|
|00002020| 25 3d 28 78 25 2d 38 39 | 36 29 20 81 20 36 30 0d |%=(x%-89|6) . 60.|
|00002030| 10 5e 2b e7 61 64 66 73 | 5f 64 72 69 76 65 73 28 |.^+.adfs|_drives(|
|00002040| 73 25 29 20 64 65 73 74 | 25 3d 73 25 3a f2 64 69 |s%) dest|%=s%:.di|
|00002050| 73 70 6c 61 79 5f 64 65 | 73 74 0d 10 68 05 cd 0d |splay_de|st..h...|
|00002060| 10 72 05 e1 0d 10 7c 05 | 3a 0d 10 86 13 dd f2 63 |.r....|.|:......c|
|00002070| 65 6e 74 72 65 28 6c 25 | 2c 73 24 29 0d 10 90 15 |entre(l%|,s$)....|
|00002080| f1 8a 34 30 2d a9 73 24 | 81 32 2c 6c 25 29 3b 73 |..40-.s$|.2,l%);s|
|00002090| 24 0d 10 9a 05 e1 0d 10 | a4 05 3a 0d 10 ae 11 dd |$.......|..:.....|
|000020a0| f2 69 6e 76 65 72 73 65 | 28 63 25 29 0d 10 b8 1b |.inverse|(c%)....|
|000020b0| e7 63 25 20 fb 30 3a fb | 20 31 33 35 20 8b 20 fb |.c% .0:.| 135 . .|
|000020c0| 20 37 3a fb 31 32 38 0d | 10 c2 05 e1 0d 10 cc 05 | 7:.128.|........|
|000020d0| 3a 0d 10 d6 0c dd f2 77 | 69 6e 64 6f 77 0d 10 e0 |:......w|indow...|
|000020e0| 11 ef 32 38 2c 30 2c 32 | 36 2c 37 39 2c 34 0d 10 |..28,0,2|6,79,4..|
|000020f0| ea 05 e1 0d 10 f4 05 3a | 0d 10 fe 0b dd a4 63 6c |.......:|......cl|
|00002100| 69 63 6b 0d 11 08 11 ea | 20 78 25 2c 79 25 2c 7a |ick.....| x%,y%,z|
|00002110| 25 2c 76 25 0d 11 12 05 | f5 0d 11 1c 0f c8 97 20 |%,v%....|....... |
|00002120| 78 25 2c 79 25 2c 7a 25 | 0d 11 26 0a fd 7a 25 3c |x%,y%,z%|..&..z%<|
|00002130| 3e 30 0d 11 30 05 f5 0d | 11 3a 0f c8 97 20 78 25 |>0..0...|.:... x%|
|00002140| 2c 79 25 2c 76 25 0d 11 | 44 09 fd 76 25 3d 30 0d |,y%,v%..|D..v%=0.|
|00002150| 11 4e 07 3d 7a 25 0d 11 | 58 05 3a 0d 11 62 0b dd |.N.=z%..|X.:..b..|
|00002160| f2 70 28 73 24 29 0d 11 | 6c 08 ea 20 69 25 0d 11 |.p(s$)..|l.. i%..|
|00002170| 76 05 f5 0d 11 80 1e 69 | 25 3d a7 73 24 2c 22 20 |v......i|%=.s$," |
|00002180| 22 29 3a e7 69 25 3d 30 | 20 69 25 3d a9 28 73 24 |"):.i%=0| i%=.(s$|
|00002190| 29 0d 11 8a 0e e7 69 25 | 2b 9c 3e 37 39 20 f1 0d |).....i%|+.>79 ..|
|000021a0| 11 94 1a f1 c0 73 24 2c | 69 25 29 3b 3a 73 24 3d |.....s$,|i%);:s$=|
|000021b0| c1 73 24 2c 69 25 2b 31 | 29 0d 11 9e 0a fd 73 24 |.s$,i%+1|).....s$|
|000021c0| 3d 22 22 0d 11 a8 07 ef | 33 32 0d 11 b2 05 e1 0d |="".....|32......|
|000021d0| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+
