/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / archive / progs / flopback / !FlopBack / !Runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 22 f4 3e 3c 46 | 6c 6f 70 70 79 42 61 63 |...".><F|loppyBac|
|00000010| 6b 75 70 24 44 69 72 3e | 2e 21 52 75 6e 69 6d 61 |kup$Dir>|.!Runima|
|00000020| 67 65 0d 00 14 40 f4 20 | 49 6d 70 72 6f 76 65 64 |ge...@. |Improved|
|00000030| 20 62 61 63 6b 75 70 20 | 72 6f 75 74 69 6e 65 73 | backup |routines|
|00000040| 20 66 6f 72 20 64 65 73 | 6b 74 6f 70 2c 20 6d 61 | for des|ktop, ma|
|00000050| 70 70 69 6e 67 20 61 6c | 6c 20 66 6c 6f 70 70 69 |pping al|l floppi|
|00000060| 65 73 0d 00 1e 14 f4 20 | 74 6f 20 65 61 63 68 20 |es..... |to each |
|00000070| 6f 74 68 65 72 2e 0d 00 | 28 05 3a 0d 00 32 17 70 |other...|(.:..2.p|
|00000080| 72 6f 67 5f 6e 61 6d 65 | 24 3d 22 42 61 63 6b 75 |rog_name|$="Backu|
|00000090| 70 22 0d 00 3c 13 76 65 | 72 73 69 6f 6e 24 3d 22 |p"..<.ve|rsion$="|
|000000a0| 31 2e 30 30 22 0d 00 46 | 1f 61 6c 69 61 73 24 3d |1.00"..F|.alias$=|
|000000b0| 22 3c 46 6c 6f 70 70 79 | 42 61 63 6b 75 70 24 44 |"<Floppy|Backup$D|
|000000c0| 69 72 3e 22 0d 00 50 05 | 3a 0d 00 5a 0c ee 85 f2 |ir>"..P.|:..Z....|
|000000d0| 65 72 72 6f 72 0d 00 64 | 0a f2 73 65 74 75 70 0d |error..d|..setup.|
|000000e0| 00 6e 09 f2 6d 61 69 6e | 0d 00 78 0b f2 66 69 6e |.n..main|..x..fin|
|000000f0| 69 73 68 0d 00 82 05 e0 | 0d 00 8c 05 3a 0d 00 96 |ish.....|....:...|
|00000100| 0b dd f2 73 65 74 75 70 | 0d 00 a0 34 de 20 74 61 |...setup|...4. ta|
|00000110| 73 6b 25 20 34 2c 62 6c | 6f 63 6b 25 20 31 30 30 |sk% 4,bl|ock% 100|
|00000120| 30 2c 62 6c 6f 63 6b 32 | 25 20 31 32 38 2c 6d 65 |0,block2|% 128,me|
|00000130| 6e 62 6c 6f 63 6b 25 20 | 34 30 30 30 0d 00 aa 11 |nblock% |4000....|
|00000140| 24 74 61 73 6b 25 3d 22 | 54 41 53 4b 22 0d 00 b4 |$task%="|TASK"...|
|00000150| 38 c8 99 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |8.."Wimp|_Initial|
|00000160| 69 73 65 22 2c 32 30 30 | 2c 21 74 61 73 6b 25 2c |ise",200|,!task%,|
|00000170| 70 72 6f 67 5f 6e 61 6d | 65 24 20 b8 20 2c 68 61 |prog_nam|e$ . ,ha|
|00000180| 6e 64 6c 65 25 0d 00 be | 20 f2 73 70 72 69 74 65 |ndle%...| .sprite|
|00000190| 73 28 61 6c 69 61 73 24 | 2b 22 2e 21 53 70 72 69 |s(alias$|+".!Spri|
|000001a0| 74 65 73 22 29 0d 00 c8 | 20 69 63 6f 6e 68 25 3d |tes")...| iconh%=|
|000001b0| a4 69 63 6f 6e 62 61 72 | 28 22 21 66 6c 6f 70 62 |.iconbar|("!flopb|
|000001c0| 61 63 6b 22 29 0d 00 d2 | 10 f2 64 65 66 69 6e 65 |ack")...|..define|
|000001d0| 6d 65 6e 75 73 0d 00 dc | 05 e1 0d 00 e6 05 3a 0d |menus...|......:.|
|000001e0| 00 f0 14 dd f2 73 70 72 | 69 74 65 73 28 66 69 6c |.....spr|ites(fil|
|000001f0| 65 24 29 0d 00 fa 0d ea | 20 64 69 6d 25 2c 73 70 |e$).....| dim%,sp|
|00000200| 0d 01 04 0d 73 70 3d 8e | 66 69 6c 65 24 0d 01 0e |....sp=.|file$...|
|00000210| 10 64 69 6d 25 3d a2 23 | 73 70 2b 31 36 0d 01 18 |.dim%=.#|sp+16...|
|00000220| 08 d9 23 73 70 0d 01 22 | 12 de 20 73 70 72 69 74 |..#sp.."|.. sprit|
|00000230| 65 25 20 64 69 6d 25 0d | 01 2c 38 21 73 70 72 69 |e% dim%.|.,8!spri|
|00000240| 74 65 25 3d 64 69 6d 25 | 3a 73 70 72 69 74 65 25 |te%=dim%|:sprite%|
|00000250| 21 34 3d 30 3a 73 70 72 | 69 74 65 25 21 38 3d 31 |!4=0:spr|ite%!8=1|
|00000260| 36 3a 73 70 72 69 74 65 | 25 21 31 32 3d 31 36 0d |6:sprite|%!12=16.|
|00000270| 01 36 28 c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |.6(.."OS|_SpriteO|
|00000280| 70 22 2c 32 35 36 2b 31 | 30 2c 73 70 72 69 74 65 |p",256+1|0,sprite|
|00000290| 25 2c 66 69 6c 65 24 0d | 01 40 05 e1 0d 01 4a 05 |%,file$.|.@....J.|
|000002a0| 3a 0d 01 54 16 dd a4 69 | 63 6f 6e 62 61 72 28 73 |:..T...i|conbar(s|
|000002b0| 70 6e 61 6d 65 24 29 0d | 01 5e 0e 21 62 6c 6f 63 |pname$).|.^.!bloc|
|000002c0| 6b 25 3d 2d 32 0d 01 68 | 0e 62 6c 6f 63 6b 25 21 |k%=-2..h|.block%!|
|000002d0| 34 3d 30 0d 01 72 0e 62 | 6c 6f 63 6b 25 21 38 3d |4=0..r.b|lock%!8=|
|000002e0| 30 0d 01 7c 10 62 6c 6f | 63 6b 25 21 31 32 3d 36 |0..|.blo|ck%!12=6|
|000002f0| 33 0d 01 86 10 62 6c 6f | 63 6b 25 21 31 36 3d 36 |3....blo|ck%!16=6|
|00000300| 34 0d 01 90 13 62 6c 6f | 63 6b 25 21 32 30 3d 26 |4....blo|ck%!20=&|
|00000310| 32 31 30 32 0d 01 9a 1c | de 20 62 6c 6f 63 6b 25 |2102....|. block%|
|00000320| 21 32 34 20 28 a9 73 70 | 6e 61 6d 65 24 2b 31 29 |!24 (.sp|name$+1)|
|00000330| 0d 01 a4 18 24 28 62 6c | 6f 63 6b 25 21 32 34 29 |....$(bl|ock%!24)|
|00000340| 3d 73 70 6e 61 6d 65 24 | 0d 01 ae 15 62 6c 6f 63 |=spname$|....bloc|
|00000350| 6b 25 21 32 38 3d 73 70 | 72 69 74 65 25 0d 01 b8 |k%!28=sp|rite%...|
|00000360| 18 62 6c 6f 63 6b 25 21 | 33 32 3d a9 73 70 6e 61 |.block%!|32=.spna|
|00000370| 6d 65 24 2b 31 0d 01 c2 | 27 c8 99 22 57 69 6d 70 |me$+1...|'.."Wimp|
|00000380| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 2c 62 6c |_CreateI|con",,bl|
|00000390| 6f 63 6b 25 20 b8 20 69 | 63 6f 6e 25 0d 01 cc 0a |ock% . i|con%....|
|000003a0| 3d 69 63 6f 6e 25 0d 01 | d6 05 3a 0d 01 e0 11 dd |=icon%..|..:.....|
|000003b0| f2 64 65 66 69 6e 65 6d | 65 6e 75 73 0d 01 ea 11 |.definem|enus....|
|000003c0| f2 6e 6f 6f 66 66 6c 6f | 70 70 69 65 73 0d 01 f4 |.noofflo|ppies...|
|000003d0| 10 f2 69 6e 69 74 77 69 | 6e 64 6f 77 73 0d 01 fe |..initwi|ndows...|
|000003e0| 05 e1 0d 02 08 05 3a 0d | 02 12 12 dd f2 6e 6f 6f |......:.|.....noo|
|000003f0| 66 66 6c 6f 70 70 69 65 | 73 0d 02 1c 20 c8 99 22 |ffloppie|s... .."|
|00000400| 41 44 46 53 5f 44 72 69 | 76 65 73 22 20 b8 20 2c |ADFS_Dri|ves" . ,|
|00000410| 66 6c 6f 70 70 69 65 73 | 25 0d 02 26 05 e1 0d 02 |floppies|%..&....|
|00000420| 30 05 3a 0d 02 3a 11 dd | f2 69 6e 69 74 77 69 6e |0.:..:..|.initwin|
|00000430| 64 6f 77 73 0d 02 44 14 | 6d 61 78 74 65 78 74 6c |dows..D.|maxtextl|
|00000440| 65 6e 67 74 68 3d 34 30 | 0d 02 4e 1c 74 65 78 74 |ength=40|..N.text|
|00000450| 6c 65 6e 67 74 68 3d 6d | 61 78 74 65 78 74 6c 65 |length=m|axtextle|
|00000460| 6e 67 74 68 0d 02 58 19 | de 20 6d 74 65 78 74 20 |ngth..X.|. mtext |
|00000470| 6d 61 78 74 65 78 74 6c | 65 6e 67 74 68 0d 02 62 |maxtextl|ength..b|
|00000480| 0d 24 6d 74 65 78 74 3d | 22 22 0d 02 6c 2f 6d 65 |.$mtext=|""..l/me|
|00000490| 6e 75 62 6c 6f 63 6b 73 | 69 7a 65 3d 32 38 2b 35 |nublocks|ize=28+5|
|000004a0| 2a 32 34 3a 6e 6f 6f 66 | 6d 65 6e 75 73 3d 33 2b |*24:noof|menus=3+|
|000004b0| 66 6c 6f 70 70 69 65 73 | 25 0d 02 76 0d de 20 6d |floppies|%..v.. m|
|000004c0| 62 28 35 2c 35 29 0d 02 | 80 12 6a 75 6e 6b 3d 6d |b(5,5)..|..junk=m|
|000004d0| 65 6e 62 6c 6f 63 6b 25 | 0d 02 8a 3b e3 20 78 3d |enblock%|...;. x=|
|000004e0| 30 20 b8 20 35 3a e3 20 | 79 3d 30 20 b8 20 33 3a |0 . 5:. |y=0 . 3:|
|000004f0| 6d 62 28 78 2c 79 29 3d | 6a 75 6e 6b 3a 6a 75 6e |mb(x,y)=|junk:jun|
|00000500| 6b 2b 3d 6d 65 6e 75 62 | 6c 6f 63 6b 73 69 7a 65 |k+=menub|locksize|
|00000510| 3a ed 2c 0d 02 94 13 64 | 65 73 74 6d 65 6e 75 24 |:.,....d|estmenu$|
|00000520| 3d 22 54 6f 7c 22 0d 02 | 9e 17 e3 20 78 3d 30 20 |="To|"..|... x=0 |
|00000530| b8 20 66 6c 6f 70 70 69 | 65 73 25 2d 31 0d 02 a8 |. floppi|es%-1...|
|00000540| 15 64 65 73 74 6d 65 6e | 75 24 2b 3d c3 78 2b 22 |.destmen|u$+=.x+"|
|00000550| 7c 22 0d 02 b2 05 ed 0d | 02 bc 17 73 6f 75 72 63 ||"......|...sourc|
|00000560| 65 6d 65 6e 75 24 3d 22 | 46 72 6f 6d 7c 22 0d 02 |emenu$="|From|"..|
|00000570| c6 17 e3 20 78 3d 30 20 | b8 20 66 6c 6f 70 70 69 |... x=0 |. floppi|
|00000580| 65 73 25 2d 31 0d 02 d0 | 26 73 6f 75 72 63 65 6d |es%-1...|&sourcem|
|00000590| 65 6e 75 24 2b 3d 22 27 | 64 65 73 74 6d 65 6e 75 |enu$+="'|destmenu|
|000005a0| 24 27 20 22 2b c3 78 2b | 22 7c 22 0d 02 da 05 ed |$' "+.x+|"|".....|
|000005b0| 0d 02 e4 19 63 6f 6d 70 | 61 63 74 6d 65 6e 75 24 |....comp|actmenu$|
|000005c0| 3d 22 44 72 69 76 65 7c | 22 0d 02 ee 17 e3 20 78 |="Drive||"..... x|
|000005d0| 3d 30 20 b8 20 66 6c 6f | 70 70 69 65 73 25 2d 31 |=0 . flo|ppies%-1|
|000005e0| 0d 02 f8 1d 63 6f 6d 70 | 61 63 74 6d 65 6e 75 24 |....comp|actmenu$|
|000005f0| 2b 3d 22 20 20 22 2b c3 | 78 2b 22 7c 22 0d 03 02 |+="  "+.|x+"|"...|
|00000600| 05 ed 0d 03 0c 4c 6d 61 | 69 6e 6d 65 6e 75 24 3d |.....Lma|inmenu$=|
|00000610| 22 46 6c 6f 70 70 79 20 | 42 61 63 6b 7c 27 73 6f |"Floppy |Back|'so|
|00000620| 75 72 63 65 6d 65 6e 75 | 24 27 42 61 63 6b 75 70 |urcemenu|$'Backup|
|00000630| 7c 3a 27 63 6f 6d 70 61 | 63 74 6d 65 6e 75 24 27 ||:'compa|ctmenu$'|
|00000640| 43 6f 6d 70 61 63 74 7c | 51 75 69 74 7c 22 0d 03 |Compact||Quit|"..|
|00000650| 16 05 e1 0d 03 20 05 3a | 0d 03 2a 1e dd a4 63 72 |..... .:|..*...cr|
|00000660| 65 61 74 65 6d 65 6e 75 | 28 6c 65 76 65 6c 25 2c |eatemenu|(level%,|
|00000670| 74 65 78 74 24 29 0d 03 | 34 2b ea 20 6e 65 77 74 |text$)..|4+. newt|
|00000680| 65 78 74 24 2c 74 69 74 | 6c 65 24 2c 70 74 72 25 |ext$,tit|le$,ptr%|
|00000690| 2c 64 6f 74 74 65 64 25 | 2c 73 75 62 6d 65 6e 75 |,dotted%|,submenu|
|000006a0| 25 0d 03 3e 20 74 69 74 | 6c 65 24 3d c0 74 65 78 |%..> tit|le$=.tex|
|000006b0| 74 24 2c a7 74 65 78 74 | 24 2c 22 7c 22 29 2d 31 |t$,.text|$,"|")-1|
|000006c0| 29 0d 03 48 1f 74 65 78 | 74 24 3d c1 74 65 78 74 |)..H.tex|t$=.text|
|000006d0| 24 2c a7 74 65 78 74 24 | 2c 22 7c 22 29 2b 31 29 |$,.text$|,"|")+1)|
|000006e0| 0d 03 52 26 24 6d 62 28 | 6d 65 6e 75 69 74 65 6d |..R&$mb(|menuitem|
|000006f0| 73 25 2c 6c 65 76 65 6c | 25 29 3d c0 74 69 74 6c |s%,level|%)=.titl|
|00000700| 65 24 2c 31 31 29 0d 03 | 5c 6f 6d 62 28 6d 65 6e |e$,11)..|\omb(men|
|00000710| 75 69 74 65 6d 73 25 2c | 6c 65 76 65 6c 25 29 3f |uitems%,|level%)?|
|00000720| 31 32 3d 37 3a 6d 62 28 | 6d 65 6e 75 69 74 65 6d |12=7:mb(|menuitem|
|00000730| 73 25 2c 6c 65 76 65 6c | 25 29 3f 31 33 3d 33 3a |s%,level|%)?13=3:|
|00000740| 6d 62 28 6d 65 6e 75 69 | 74 65 6d 73 25 2c 6c 65 |mb(menui|tems%,le|
|00000750| 76 65 6c 25 29 3f 31 34 | 3d 37 3a 6d 62 28 6d 65 |vel%)?14|=7:mb(me|
|00000760| 6e 75 69 74 65 6d 73 25 | 2c 6c 65 76 65 6c 25 29 |nuitems%|,level%)|
|00000770| 3f 31 35 3d 30 0d 03 66 | 64 6d 62 28 6d 65 6e 75 |?15=0..f|dmb(menu|
|00000780| 69 74 65 6d 73 25 2c 6c | 65 76 65 6c 25 29 21 31 |items%,l|evel%)!1|
|00000790| 36 3d a9 74 69 74 6c 65 | 24 2a 31 30 2b 32 38 3a |6=.title|$*10+28:|
|000007a0| 6d 62 28 6d 65 6e 75 69 | 74 65 6d 73 25 2c 6c 65 |mb(menui|tems%,le|
|000007b0| 76 65 6c 25 29 21 32 30 | 3d 33 32 2b 38 3a 6d 62 |vel%)!20|=32+8:mb|
|000007c0| 28 6d 65 6e 75 69 74 65 | 6d 73 25 2c 6c 65 76 65 |(menuite|ms%,leve|
|000007d0| 6c 25 29 21 32 34 3d 31 | 30 0d 03 70 1f e7 20 c2 |l%)!24=1|0..p.. .|
|000007e0| 74 65 78 74 24 2c 31 29 | 3c 3e 22 7c 22 20 74 65 |text$,1)|<>"|" te|
|000007f0| 78 74 24 2b 3d 22 7c 22 | 0d 03 7a 21 70 74 72 25 |xt$+="|"|..z!ptr%|
|00000800| 3d 6d 62 28 6d 65 6e 75 | 69 74 65 6d 73 25 2c 6c |=mb(menu|items%,l|
|00000810| 65 76 65 6c 25 29 2b 32 | 38 0d 03 84 0c f2 70 72 |evel%)+2|8.....pr|
|00000820| 6f 63 65 73 73 0d 03 8e | 3d e7 20 6c 65 76 65 6c |ocess...|=. level|
|00000830| 25 3d 30 20 8c 20 c8 99 | 22 57 69 6d 70 5f 43 72 |%=0 . ..|"Wimp_Cr|
|00000840| 65 61 74 65 4d 65 6e 75 | 22 2c 30 2c 6d 65 6e 62 |eateMenu|",0,menb|
|00000850| 6c 6f 63 6b 25 2c 6d 78 | 25 2c 6d 79 25 2b 31 36 |lock%,mx|%,my%+16|
|00000860| 2a 35 0d 03 98 1a 3d 6d | 62 28 6d 65 6e 75 69 74 |*5....=m|b(menuit|
|00000870| 65 6d 73 25 2c 6c 65 76 | 65 6c 25 29 0d 03 a2 05 |ems%,lev|el%)....|
|00000880| 3a 0d 03 ac 46 dd f2 63 | 72 65 61 74 65 6d 65 6e |:...F..c|reatemen|
|00000890| 75 73 74 72 75 63 74 75 | 72 65 3a 6d 65 6e 75 69 |ustructu|re:menui|
|000008a0| 74 65 6d 73 25 3d 30 3a | 6a 75 6e 6b 3d a4 63 72 |tems%=0:|junk=.cr|
|000008b0| 65 61 74 65 6d 65 6e 75 | 28 30 2c 6d 61 69 6e 6d |eatemenu|(0,mainm|
|000008c0| 65 6e 75 24 29 3a e1 0d | 03 b6 05 3a 0d 03 c0 0d |enu$):..|...:....|
|000008d0| dd f2 70 72 6f 63 65 73 | 73 0d 03 ca 10 ea 20 6d |..proces|s..... m|
|000008e0| 65 6e 75 69 74 65 6d 73 | 25 0d 03 d4 05 f5 0d 03 |enuitems|%.......|
|000008f0| de 11 6d 65 6e 75 69 74 | 65 6d 73 25 2b 3d 31 0d |..menuit|ems%+=1.|
|00000900| 03 e8 19 64 6f 74 74 65 | 64 25 3d 30 3a 73 75 62 |...dotte|d%=0:sub|
|00000910| 6d 65 6e 75 25 3d 2d 31 | 0d 03 f2 2d e7 20 c0 74 |menu%=-1|...-. .t|
|00000920| 65 78 74 24 2c 31 29 3d | 22 3a 22 20 64 6f 74 74 |ext$,1)=|":" dott|
|00000930| 65 64 25 3d 32 3a 74 65 | 78 74 24 3d c1 74 65 78 |ed%=2:te|xt$=.tex|
|00000940| 74 24 2c 32 29 0d 03 fc | 15 e7 20 c0 74 65 78 74 |t$,2)...|.. .text|
|00000950| 24 2c 31 29 3d 22 27 22 | 20 8c 0d 04 06 13 74 65 |$,1)="'"| .....te|
|00000960| 78 74 24 3d c1 74 65 78 | 74 24 2c 32 29 0d 04 10 |xt$=.tex|t$,2)...|
|00000970| 25 6e 65 77 74 65 78 74 | 24 3d a0 28 c0 74 65 78 |%newtext|$=.(.tex|
|00000980| 74 24 2c a7 74 65 78 74 | 24 2c 22 27 22 29 2d 31 |t$,.text|$,"'")-1|
|00000990| 29 29 0d 04 1a 1f 74 65 | 78 74 24 3d c1 74 65 78 |))....te|xt$=.tex|
|000009a0| 74 24 2c a7 74 65 78 74 | 24 2c 22 27 22 29 2b 31 |t$,.text|$,"'")+1|
|000009b0| 29 0d 04 24 2b 73 75 62 | 6d 65 6e 75 25 3d a4 63 |)..$+sub|menu%=.c|
|000009c0| 72 65 61 74 65 6d 65 6e | 75 28 6c 65 76 65 6c 25 |reatemen|u(level%|
|000009d0| 2b 31 2c 6e 65 77 74 65 | 78 74 24 29 0d 04 2e 04 |+1,newte|xt$)....|
|000009e0| 0d 04 38 05 cd 0d 04 42 | 29 24 28 70 74 72 25 2b |..8....B|)$(ptr%+|
|000009f0| 31 32 29 3d c0 c0 74 65 | 78 74 24 2c a7 74 65 78 |12)=..te|xt$,.tex|
|00000a00| 74 24 2c 22 7c 22 29 2d | 31 29 2c 31 31 29 0d 04 |t$,"|")-|1),11)..|
|00000a10| 4c 1f 74 65 78 74 24 3d | c1 74 65 78 74 24 2c a7 |L.text$=|.text$,.|
|00000a20| 74 65 78 74 24 2c 22 7c | 22 29 2b 31 29 0d 04 56 |text$,"||")+1)..V|
|00000a30| 27 70 74 72 25 21 30 3d | 64 6f 74 74 65 64 25 20 |'ptr%!0=|dotted% |
|00000a40| 84 20 28 26 38 30 20 80 | 20 28 74 65 78 74 24 3d |. (&80 .| (text$=|
|00000a50| 22 22 29 29 0d 04 60 13 | 70 74 72 25 21 34 3d 73 |""))..`.|ptr%!4=s|
|00000a60| 75 62 6d 65 6e 75 25 0d | 04 6a 22 70 74 72 25 21 |ubmenu%.|.j"ptr%!|
|00000a70| 38 3d 26 30 31 30 30 32 | 31 20 84 20 30 3c 3c 32 |8=&01002|1 . 0<<2|
|00000a80| 38 20 84 20 37 3c 3c 32 | 34 0d 04 74 0c 70 74 72 |8 . 7<<2|4..t.ptr|
|00000a90| 25 2b 3d 32 34 0d 04 7e | 0d fd 74 65 78 74 24 3d |%+=24..~|..text$=|
|00000aa0| 22 22 0d 04 88 05 e1 0d | 04 92 05 3a 0d 04 9c 21 |""......|...:...!|
|00000ab0| f4 20 48 65 72 65 20 63 | 6f 6d 65 73 20 74 68 65 |. Here c|omes the|
|00000ac0| 20 6d 61 69 6e 20 62 69 | 74 2e 2e 2e 2e 0d 04 a6 | main bi|t.......|
|00000ad0| 05 3a 0d 04 b0 0a dd f2 | 6d 61 69 6e 0d 04 ba 05 |.:......|main....|
|00000ae0| f5 0d 04 c4 09 f2 70 6f | 6c 6c 0d 04 ce 2d fd 20 |......po|ll...-. |
|00000af0| 28 72 65 61 73 6f 6e 25 | 3d 31 37 20 84 20 72 65 |(reason%|=17 . re|
|00000b00| 61 73 6f 6e 25 3d 31 38 | 29 20 80 20 62 6c 6f 63 |ason%=18|) . bloc|
|00000b10| 6b 25 21 31 36 3d 30 0d | 04 d8 05 e1 0d 04 e2 05 |k%!16=0.|........|
|00000b20| 3a 0d 04 ec 0a dd f2 70 | 6f 6c 6c 0d 04 f6 24 c8 |:......p|oll...$.|
|00000b30| 99 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 30 2c 62 |."Wimp_P|oll",0,b|
|00000b40| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000b50| 05 00 1e e7 20 72 65 61 | 73 6f 6e 25 20 f2 61 63 |.... rea|son% .ac|
|00000b60| 74 69 6f 6e 28 72 65 61 | 73 6f 6e 25 29 0d 05 0a |tion(rea|son%)...|
|00000b70| 05 e1 0d 05 14 05 3a 0d | 05 1e 15 dd f2 61 63 74 |......:.|.....act|
|00000b80| 69 6f 6e 28 72 65 61 73 | 6f 6e 25 29 0d 05 28 10 |ion(reas|on%)..(.|
|00000b90| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 05 32 39 |.. reaso|n% ...29|
|00000ba0| c9 20 36 3a f2 63 68 65 | 63 6b 5f 6d 6f 75 73 65 |. 6:.che|ck_mouse|
|00000bb0| 28 21 62 6c 6f 63 6b 25 | 2c 62 6c 6f 63 6b 25 21 |(!block%|,block%!|
|00000bc0| 34 2c 62 6c 6f 63 6b 25 | 21 38 2c 62 6c 6f 63 6b |4,block%|!8,block|
|00000bd0| 25 21 31 32 29 0d 05 3c | 13 c9 20 39 3a f2 6d 65 |%!12)..<|.. 9:.me|
|00000be0| 6e 75 73 65 6c 65 63 74 | 0d 05 46 05 cb 0d 05 50 |nuselect|..F....P|
|00000bf0| 05 e1 0d 05 5a 05 3a 0d | 05 64 24 dd f2 63 68 65 |....Z.:.|.d$..che|
|00000c00| 63 6b 5f 6d 6f 75 73 65 | 28 6d 78 25 2c 6d 79 25 |ck_mouse|(mx%,my%|
|00000c10| 2c 62 75 74 25 2c 68 6e | 64 25 29 0d 05 6e 0d c8 |,but%,hn|d%)..n..|
|00000c20| 8e 20 62 75 74 25 20 ca | 0d 05 78 13 c9 20 32 3a |. but% .|..x.. 2:|
|00000c30| e7 20 68 6e 64 25 3d 2d | 32 20 8c 0d 05 82 18 f2 |. hnd%=-|2 ......|
|00000c40| 63 72 65 61 74 65 6d 65 | 6e 75 73 74 72 75 63 74 |createme|nustruct|
|00000c50| 75 72 65 0d 05 8c 05 cd | 0d 05 96 05 cb 0d 05 a0 |ure.....|........|
|00000c60| 05 e1 0d 05 aa 05 3a 0d | 05 b4 10 dd f2 6d 65 6e |......:.|.....men|
|00000c70| 75 73 65 6c 65 63 74 0d | 05 be 11 c8 8e 20 62 6c |uselect.|..... bl|
|00000c80| 6f 63 6b 25 21 30 20 ca | 0d 05 c8 2f c9 20 30 3a |ock%!0 .|.../. 0:|
|00000c90| e7 20 62 6c 6f 63 6b 25 | 21 34 3e 3d 30 20 80 20 |. block%|!4>=0 . |
|00000ca0| 62 6c 6f 63 6b 25 21 34 | 3c 3d 66 6c 6f 70 70 69 |block%!4|<=floppi|
|00000cb0| 65 73 25 2d 31 20 8c 0d | 05 d2 44 e7 20 62 6c 6f |es%-1 ..|..D. blo|
|00000cc0| 63 6b 25 21 38 3e 3d 30 | 20 80 20 62 6c 6f 63 6b |ck%!8>=0| . block|
|00000cd0| 25 21 38 3c 3d 66 6c 6f | 70 70 69 65 73 25 2d 31 |%!8<=flo|ppies%-1|
|00000ce0| 20 f2 62 61 63 6b 75 70 | 28 62 6c 6f 63 6b 25 21 | .backup|(block%!|
|00000cf0| 34 2c 62 6c 6f 63 6b 25 | 21 38 29 0d 05 dc 40 c9 |4,block%|!8)...@.|
|00000d00| 20 31 3a e7 20 62 6c 6f | 63 6b 25 21 34 3e 3d 30 | 1:. blo|ck%!4>=0|
|00000d10| 20 80 20 62 6c 6f 63 6b | 25 21 34 3c 3d 66 6c 6f | . block|%!4<=flo|
|00000d20| 70 70 69 65 73 25 2d 31 | 20 f2 63 6f 6d 70 61 63 |ppies%-1| .compac|
|00000d30| 74 28 62 6c 6f 63 6b 25 | 21 34 29 0d 05 e6 0f c9 |t(block%|!4).....|
|00000d40| 20 32 3a f2 66 69 6e 69 | 73 68 0d 05 f0 05 cb 0d | 2:.fini|sh......|
|00000d50| 05 fa 05 e1 0d 06 04 05 | 3a 0d 06 0e 17 dd f2 62 |........|:......b|
|00000d60| 61 63 6b 75 70 28 66 72 | 6f 6d 25 2c 74 6f 25 29 |ackup(fr|om%,to%)|
|00000d70| 0d 06 18 14 c8 99 22 48 | 6f 75 72 67 6c 61 73 73 |......"H|ourglass|
|00000d80| 5f 4f 6e 22 0d 06 22 2f | 24 62 6c 6f 63 6b 25 3d |_On".."/|$block%=|
|00000d90| 22 46 6c 6f 70 70 79 20 | 44 69 73 63 20 42 61 63 |"Floppy |Disc Bac|
|00000da0| 6b 75 70 20 55 74 69 6c | 69 74 79 22 2b bd 30 2b |kup Util|ity"+.0+|
|00000db0| bd 31 33 0d 06 2c 21 c8 | 99 22 57 69 6d 70 5f 43 |.13..,!.|."Wimp_C|
|00000dc0| 6f 6d 6d 61 6e 64 57 69 | 6e 64 6f 77 22 2c 62 6c |ommandWi|ndow",bl|
|00000dd0| 6f 63 6b 25 0d 06 36 3d | f1 22 42 61 63 6b 75 70 |ock%..6=|."Backup|
|00000de0| 20 64 69 73 63 20 69 6e | 20 64 72 69 76 65 20 22 | disc in| drive "|
|00000df0| 3b 66 72 6f 6d 25 3b 22 | 20 6f 6e 74 6f 20 64 69 |;from%;"| onto di|
|00000e00| 73 63 20 69 6e 20 64 72 | 69 76 65 20 22 3b 74 6f |sc in dr|ive ";to|
|00000e10| 25 0d 06 40 20 ff 28 22 | 42 61 63 6b 75 70 20 22 |%..@ .("|Backup "|
|00000e20| 2b c3 66 72 6f 6d 25 2b | 22 20 22 2b c3 74 6f 25 |+.from%+|" "+.to%|
|00000e30| 29 0d 06 4a 15 c8 99 22 | 48 6f 75 72 67 6c 61 73 |)..J..."|Hourglas|
|00000e40| 73 5f 4f 66 66 22 0d 06 | 54 1c c8 99 22 57 69 6d |s_Off"..|T..."Wim|
|00000e50| 70 5f 43 6f 6d 6d 61 6e | 64 57 69 6e 64 6f 77 22 |p_Comman|dWindow"|
|00000e60| 2c 30 0d 06 5e 04 0d 06 | 68 05 e1 0d 06 72 05 3a |,0..^...|h....r.:|
|00000e70| 0d 06 7c 15 dd f2 63 6f | 6d 70 61 63 74 28 64 72 |..|...co|mpact(dr|
|00000e80| 69 76 65 25 29 0d 06 86 | 14 c8 99 22 48 6f 75 72 |ive%)...|..."Hour|
|00000e90| 67 6c 61 73 73 5f 4f 6e | 22 0d 06 90 33 24 62 6c |glass_On|"...3$bl|
|00000ea0| 6f 63 6b 25 3d 22 46 6c | 6f 70 70 79 20 44 69 73 |ock%="Fl|oppy Dis|
|00000eb0| 63 20 43 6f 6d 70 61 63 | 74 69 6f 6e 20 55 74 69 |c Compac|tion Uti|
|00000ec0| 6c 69 74 79 22 2b bd 30 | 2b bd 31 33 0d 06 9a 21 |lity"+.0|+.13...!|
|00000ed0| c8 99 22 57 69 6d 70 5f | 43 6f 6d 6d 61 6e 64 57 |.."Wimp_|CommandW|
|00000ee0| 69 6e 64 6f 77 22 2c 62 | 6c 6f 63 6b 25 0d 06 a4 |indow",b|lock%...|
|00000ef0| 18 24 62 6c 6f 63 6b 32 | 25 3d c3 64 72 69 76 65 |.$block2|%=.drive|
|00000f00| 25 2b bd 31 33 0d 06 ae | 2c c8 99 22 41 44 46 53 |%+.13...|,.."ADFS|
|00000f10| 5f 46 72 65 65 53 70 61 | 63 65 22 2c 62 6c 6f 63 |_FreeSpa|ce",bloc|
|00000f20| 6b 32 25 20 b8 20 73 70 | 61 63 65 25 2c 6c 73 61 |k2% . sp|ace%,lsa|
|00000f30| 25 0d 06 b8 04 0d 06 c2 | 04 0d 06 cc 87 f1 22 54 |%.......|......"T|
|00000f40| 6f 74 61 6c 20 66 72 65 | 65 20 73 70 61 63 65 20 |otal fre|e space |
|00000f50| 6f 6e 20 64 69 73 63 3a | 20 22 3b 73 70 61 63 65 |on disc:| ";space|
|00000f60| 25 2f 31 30 32 34 3b 22 | 6b 22 27 22 4c 61 72 67 |%/1024;"|k"'"Larg|
|00000f70| 65 73 74 20 61 72 65 61 | 20 6f 66 20 66 72 65 65 |est area| of free|
|00000f80| 20 73 70 61 63 65 3a 20 | 22 3b 6c 73 61 25 2f 31 | space: |";lsa%/1|
|00000f90| 30 32 34 3b 22 6b 20 6f | 72 20 22 3b 6c 73 61 25 |024;"k o|r ";lsa%|
|00000fa0| 2a 31 30 30 20 81 20 73 | 70 61 63 65 25 3b 22 25 |*100 . s|pace%;"%|
|00000fb0| 20 6f 66 20 66 72 65 65 | 20 73 70 61 63 65 2e 22 | of free| space."|
|00000fc0| 0d 06 d6 19 ff 28 22 43 | 6f 6d 70 61 63 74 20 22 |.....("C|ompact "|
|00000fd0| 2b c3 64 72 69 76 65 25 | 29 0d 06 e0 2c c8 99 22 |+.drive%|)...,.."|
|00000fe0| 41 44 46 53 5f 46 72 65 | 65 53 70 61 63 65 22 2c |ADFS_Fre|eSpace",|
|00000ff0| 62 6c 6f 63 6b 32 25 20 | b8 20 73 70 61 63 65 25 |block2% |. space%|
|00001000| 2c 6c 73 61 25 0d 06 ea | 73 f1 22 41 66 74 65 72 |,lsa%...|s."After|
|00001010| 20 63 6f 6d 70 61 63 74 | 69 6f 6e 2c 20 74 68 65 | compact|ion, the|
|00001020| 20 6c 61 72 67 65 73 74 | 20 61 72 65 61 20 6f 66 | largest| area of|
|00001030| 20 66 72 65 65 20 73 70 | 61 63 65 20 69 73 20 22 | free sp|ace is "|
|00001040| 3b 6c 73 61 25 2f 31 30 | 32 34 3b 22 6b 22 27 22 |;lsa%/10|24;"k"'"|
|00001050| 6f 72 20 22 3b 6c 73 61 | 25 2a 31 30 30 20 81 20 |or ";lsa|%*100 . |
|00001060| 73 70 61 63 65 25 3b 22 | 25 20 6f 66 20 64 69 73 |space%;"|% of dis|
|00001070| 63 20 73 70 61 63 65 22 | 0d 06 f4 15 c8 99 22 48 |c space"|......"H|
|00001080| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 22 0d 06 fe |ourglass|_Off"...|
|00001090| 1c c8 99 22 57 69 6d 70 | 5f 43 6f 6d 6d 61 6e 64 |..."Wimp|_Command|
|000010a0| 57 69 6e 64 6f 77 22 2c | 30 0d 07 08 04 0d 07 12 |Window",|0.......|
|000010b0| 05 e1 0d 07 1c 0c dd f2 | 66 69 6e 69 73 68 0d 07 |........|finish..|
|000010c0| 26 25 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |&%.."Wim|p_CloseD|
|000010d0| 6f 77 6e 22 2c 68 61 6e | 64 6c 65 25 2c 21 74 61 |own",han|dle%,!ta|
|000010e0| 73 6b 25 0d 07 30 05 e0 | 0d 07 3a 05 e1 0d 07 44 |sk%..0..|..:....D|
|000010f0| 05 3a 0d 07 4e 0b dd f2 | 65 72 72 6f 72 0d 07 58 |.:..N...|error..X|
|00001100| 1d c8 99 22 57 69 6d 70 | 5f 43 6f 6d 6d 61 6e 64 |..."Wimp|_Command|
|00001110| 57 69 6e 64 6f 77 22 2c | 2d 31 0d 07 62 0d 21 62 |Window",|-1..b.!b|
|00001120| 6c 6f 63 6b 25 3d 9f 0d | 07 6c 0b 65 72 72 6f 72 |lock%=..|.l.error|
|00001130| 3d b9 0d 07 76 0a c8 8e | 20 9f 20 ca 0d 07 80 4f |=...v...| . ....O|
|00001140| c9 20 36 37 37 39 35 3a | 24 28 62 6c 6f 63 6b 25 |. 67795:|$(block%|
|00001150| 2b 34 29 3d 22 54 72 79 | 20 70 75 74 74 69 6e 67 |+4)="Try| putting|
|00001160| 20 61 20 64 69 73 63 20 | 69 6e 20 74 68 65 20 64 | a disc |in the d|
|00001170| 72 69 76 65 20 6e 65 78 | 74 20 74 69 6d 65 21 22 |rive nex|t time!"|
|00001180| 2b bd 30 3a 65 72 72 6f | 72 3d a3 0d 07 8a 05 7f |+.0:erro|r=......|
|00001190| 0d 07 94 38 24 28 62 6c | 6f 63 6b 25 2b 34 29 3d |...8$(bl|ock%+4)=|
|000011a0| f6 24 2b 22 20 28 45 72 | 72 6f 72 20 43 6f 64 65 |.$+" (Er|ror Code|
|000011b0| 20 22 2b c3 9f 2b 22 29 | 20 61 74 20 6c 69 6e 65 | "+..+")| at line|
|000011c0| 20 22 2b c3 9e 2b bd 30 | 0d 07 9e 05 cb 0d 07 a8 | "+..+.0|........|
|000011d0| 0d 66 6c 61 67 73 3d 26 | 31 37 0d 07 b2 39 c8 99 |.flags=&|17...9..|
|000011e0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|000011f0| 72 22 2c 62 6c 6f 63 6b | 25 2c 66 6c 61 67 73 2c |r",block|%,flags,|
|00001200| 22 42 61 63 6b 75 70 22 | 20 b8 20 2c 61 6e 73 77 |"Backup"| . ,answ|
|00001210| 65 72 25 0d 07 bc 20 e7 | 20 61 6e 73 77 65 72 25 |er%... .| answer%|
|00001220| 3c 3e 31 20 f2 66 69 6e | 69 73 68 20 8b 20 f2 6d |<>1 .fin|ish . .m|
|00001230| 61 69 6e 0d 07 c6 05 e1 | 0d ff                   |ain.....|..      |
+--------+-------------------------+-------------------------+--------+--------+