home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-01-05 | 13.0 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
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 21 f4 20 50 61 | 74 63 68 20 72 6f 75 74 |...!. Pa|tch rout|
|00000010| 69 6e 65 20 66 6f 72 20 | 74 65 6d 70 6c 61 74 65 |ine for |template|
|00000020| 73 0d 00 14 20 f4 20 53 | 74 61 72 74 65 64 20 36 |s... . S|tarted 6|
|00000030| 74 68 20 53 65 70 74 65 | 6d 62 65 72 20 31 39 39 |th Septe|mber 199|
|00000040| 34 0d 00 1e 1b f4 20 50 | 72 6f 67 72 61 6d 20 a9 |4..... P|rogram .|
|00000050| 20 53 61 6d 20 4b 69 6e | 67 74 6f 6e 0d 00 28 20 | Sam Kin|gton..( |
|00000060| f4 20 56 65 72 73 69 6f | 6e 20 31 2e 30 31 20 28 |. Versio|n 1.01 (|
|00000070| 30 36 20 4a 61 6e 20 31 | 39 39 35 29 0d 00 32 04 |06 Jan 1|995)..2.|
|00000080| 0d 00 3c 13 63 6f 6e 66 | 69 67 68 61 6e 64 6c 65 |..<.conf|ighandle|
|00000090| 3d 2d 31 0d 00 46 13 6f | 75 74 70 75 74 68 61 6e |=-1..F.o|utputhan|
|000000a0| 64 6c 65 3d 2d 31 0d 00 | 50 04 0d 00 5a 73 ee 20 |dle=-1..|P...Zs. |
|000000b0| 85 20 ee 20 85 20 87 20 | 3a 20 f2 63 6c 6f 73 65 |. . . . |: .close|
|000000c0| 28 63 6f 6e 66 69 67 68 | 61 6e 64 6c 65 29 20 3a |(configh|andle) :|
|000000d0| 20 f2 63 6c 6f 73 65 28 | 6f 75 74 70 75 74 68 61 | .close(|outputha|
|000000e0| 6e 64 6c 65 29 20 3a 20 | 85 20 9f 2c 20 22 45 72 |ndle) : |. ., "Er|
|000000f0| 72 6f 72 20 77 68 69 6c | 65 20 70 61 74 63 68 69 |ror whil|e patchi|
|00000100| 6e 67 3a 20 22 2b f6 24 | 2b 22 20 61 74 20 6c 69 |ng: "+.$|+" at li|
|00000110| 6e 65 20 22 2b c3 28 9e | 29 20 3a 20 e0 0d 00 64 |ne "+.(.|) : ...d|
|00000120| 1c de 20 62 6c 6f 63 6b | 25 20 32 35 36 2c 20 6d |.. block|% 256, m|
|00000130| 65 73 73 61 67 65 73 20 | 38 0d 00 6e 1d de 20 77 |essages |8..n.. w|
|00000140| 69 6e 64 6f 77 24 28 36 | 34 29 2c 20 77 69 6e 64 |indow$(6|4), wind|
|00000150| 6f 77 28 36 34 29 0d 00 | 78 10 6e 75 6d 77 69 6e |ow(64)..|x.numwin|
|00000160| 64 6f 77 73 3d 30 0d 00 | 82 0f 21 6d 65 73 73 61 |dows=0..|..!messa|
|00000170| 67 65 73 3d 33 0d 00 8c | 10 6d 65 73 73 61 67 65 |ges=3...|.message|
|00000180| 73 21 34 3d 30 0d 00 96 | 0c de 20 6e 75 6c 6c 20 |s!4=0...|.. null |
|00000190| 34 0d 00 a0 0c 24 6e 75 | 6c 6c 3d 22 22 0d 00 aa |4....$nu|ll=""...|
|000001a0| 21 73 6f 75 72 63 65 24 | 3d 22 43 6f 6e 66 69 67 |!source$|="Config|
|000001b0| 75 72 65 3a 54 65 6d 70 | 6c 61 74 65 73 22 0d 00 |ure:Temp|lates"..|
|000001c0| b4 1c 70 61 74 63 68 24 | 3d 22 3c 43 6f 6e 66 50 |..patch$|="<ConfP|
|000001d0| 61 74 63 68 24 44 69 72 | 3e 22 0d 00 be 2e 77 72 |atch$Dir|>"....wr|
|000001e0| 69 74 65 24 3d 22 3c 43 | 6f 6e 66 69 67 2b 24 44 |ite$="<C|onfig+$D|
|000001f0| 69 72 3e 2e 43 6f 6e 66 | 69 67 75 72 65 2e 54 65 |ir>.Conf|igure.Te|
|00000200| 6d 70 6c 61 74 65 73 22 | 0d 00 c8 04 0d 00 d2 5b |mplates"|.......[|
|00000210| c8 99 20 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |.. "Wimp|_Initial|
|00000220| 69 73 65 22 2c 20 33 31 | 30 2c 20 26 34 42 35 33 |ise", 31|0, &4B53|
|00000230| 34 31 35 34 2c 20 22 43 | 6f 6e 66 69 67 2b 20 70 |4154, "C|onfig+ p|
|00000240| 61 74 63 68 65 72 22 2c | 20 6d 65 73 73 61 67 65 |atcher",| message|
|00000250| 73 20 b8 20 77 69 6d 70 | 76 65 72 2c 20 74 61 73 |s . wimp|ver, tas|
|00000260| 6b 68 61 6e 64 6c 65 0d | 00 dc 19 52 49 53 43 50 |khandle.|...RISCP|
|00000270| 43 3d 28 77 69 6d 70 76 | 65 72 3e 3d 33 35 30 29 |C=(wimpv|er>=350)|
|00000280| 0d 00 e6 04 0d 00 f0 37 | c8 99 20 22 57 69 6d 70 |.......7|.. "Wimp|
|00000290| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|000002a0| 22 3c 43 6f 6e 66 50 61 | 74 63 68 24 44 69 72 3e |"<ConfPa|tch$Dir>|
|000002b0| 2e 54 65 6d 70 6c 61 74 | 65 73 22 0d 00 fa 42 c8 |.Templat|es"...B.|
|000002c0| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|000002d0| 6c 61 74 65 22 2c 2c 2d | 31 2c 30 2c 30 2c 2d 31 |late",,-|1,0,0,-1|
|000002e0| 2c 22 4f 6c 64 43 6f 6e | 66 22 20 b8 20 2c 62 75 |,"OldCon|f" . ,bu|
|000002f0| 66 73 69 7a 65 2c 69 6e | 64 73 69 7a 65 0d 01 04 |fsize,in|dsize...|
|00000300| 21 de 20 62 75 66 66 65 | 72 20 62 75 66 73 69 7a |!. buffe|r bufsiz|
|00000310| 65 2c 20 69 6e 64 20 69 | 6e 64 73 69 7a 65 0d 01 |e, ind i|ndsize..|
|00000320| 0e 45 c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |.E.. "Wi|mp_LoadT|
|00000330| 65 6d 70 6c 61 74 65 22 | 2c 20 2c 20 62 75 66 66 |emplate"|, , buff|
|00000340| 65 72 2c 20 69 6e 64 2c | 20 69 6e 64 2b 69 6e 64 |er, ind,| ind+ind|
|00000350| 73 69 7a 65 2c 20 2d 31 | 2c 20 22 4f 6c 64 43 6f |size, -1|, "OldCo|
|00000360| 6e 66 22 0d 01 18 30 c8 | 99 20 22 57 69 6d 70 5f |nf"...0.|. "Wimp_|
|00000370| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|00000380| 75 66 66 65 72 20 b8 20 | 77 69 6e 5f 6f 6c 64 63 |uffer . |win_oldc|
|00000390| 6f 6e 66 0d 01 22 43 c8 | 99 20 22 57 69 6d 70 5f |onf.."C.|. "Wimp_|
|000003a0| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 2d |LoadTemp|late",,-|
|000003b0| 31 2c 30 2c 30 2c 2d 31 | 2c 22 57 68 69 63 68 56 |1,0,0,-1|,"WhichV|
|000003c0| 65 72 22 20 b8 20 2c 62 | 75 66 73 69 7a 65 2c 69 |er" . ,b|ufsize,i|
|000003d0| 6e 64 73 69 7a 65 0d 01 | 2c 21 de 20 62 75 66 66 |ndsize..|,!. buff|
|000003e0| 65 72 20 62 75 66 73 69 | 7a 65 2c 20 69 6e 64 20 |er bufsi|ze, ind |
|000003f0| 69 6e 64 73 69 7a 65 0d | 01 36 46 c8 99 20 22 57 |indsize.|.6F.. "W|
|00000400| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00000410| 22 2c 20 2c 20 62 75 66 | 66 65 72 2c 20 69 6e 64 |", , buf|fer, ind|
|00000420| 2c 20 69 6e 64 2b 69 6e | 64 73 69 7a 65 2c 20 2d |, ind+in|dsize, -|
|00000430| 31 2c 20 22 57 68 69 63 | 68 56 65 72 22 0d 01 40 |1, "Whic|hVer"..@|
|00000440| 31 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |1.. "Wim|p_Create|
|00000450| 57 69 6e 64 6f 77 22 2c | 2c 62 75 66 66 65 72 20 |Window",|,buffer |
|00000460| b8 20 77 69 6e 5f 77 68 | 69 63 68 76 65 72 0d 01 |. win_wh|ichver..|
|00000470| 4a 1b c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |J... "Wi|mp_Close|
|00000480| 54 65 6d 70 6c 61 74 65 | 22 0d 01 54 04 0d 01 5e |Template|"..T...^|
|00000490| 19 de 20 69 6e 70 75 74 | 20 32 30 2c 20 6f 75 74 |.. input| 20, out|
|000004a0| 70 75 74 20 32 30 0d 01 | 68 0c 21 69 6e 70 75 74 |put 20..|h.!input|
|000004b0| 3d 34 0d 01 72 0d 69 6e | 70 75 74 21 34 3d 35 0d |=4..r.in|put!4=5.|
|000004c0| 01 7c 0e 69 6e 70 75 74 | 21 38 3d 31 31 0d 01 86 |.|.input|!8=11...|
|000004d0| 0f 69 6e 70 75 74 21 31 | 32 3d 31 32 0d 01 90 0f |.input!1|2=12....|
|000004e0| 69 6e 70 75 74 21 31 36 | 3d 2d 31 0d 01 9a 2b c8 |input!16|=-1...+.|
|000004f0| 99 20 22 4f 53 5f 52 65 | 61 64 56 64 75 56 61 72 |. "OS_Re|adVduVar|
|00000500| 69 61 62 6c 65 73 22 2c | 20 69 6e 70 75 74 2c 20 |iables",| input, |
|00000510| 6f 75 74 70 75 74 0d 01 | a4 21 73 63 72 65 65 6e |output..|.!screen|
|00000520| 77 69 64 74 68 3d 6f 75 | 74 70 75 74 21 38 3c 3c |width=ou|tput!8<<|
|00000530| 21 6f 75 74 70 75 74 0d | 01 ae 24 73 63 72 65 65 |!output.|..$scree|
|00000540| 6e 68 65 69 67 68 74 3d | 6f 75 74 70 75 74 21 31 |nheight=|output!1|
|00000550| 32 3c 3c 6f 75 74 70 75 | 74 21 34 0d 01 b8 04 0d |2<<outpu|t!4.....|
|00000560| 01 c2 1f f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 77 |....open|window(w|
|00000570| 69 6e 5f 6f 6c 64 63 6f | 6e 66 2c 20 b9 29 0d 01 |in_oldco|nf, .)..|
|00000580| cc 05 f5 0d 01 d6 41 20 | 20 20 c8 99 20 22 57 69 |......A | .. "Wi|
|00000590| 6d 70 5f 50 6f 6c 6c 22 | 2c 20 25 31 30 30 30 30 |mp_Poll"|, %10000|
|000005a0| 30 31 31 31 30 30 31 30 | 30 31 31 30 30 31 31 2c |01110010|0110011,|
|000005b0| 20 62 6c 6f 63 6b 25 20 | b8 20 72 65 61 73 6f 6e | block% |. reason|
|000005c0| 63 6f 64 65 0d 01 e0 0f | 20 20 20 72 65 74 75 72 |code....| retur|
|000005d0| 6e 3d a3 0d 01 ea 16 20 | 20 20 c8 8e 20 72 65 61 |n=..... | .. rea|
|000005e0| 73 6f 6e 63 6f 64 65 20 | ca 0d 01 f4 2c 20 20 20 |soncode |...., |
|000005f0| 20 20 20 c9 20 32 20 3a | 20 c8 99 20 22 57 69 6d | . 2 :| .. "Wim|
|00000600| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000610| 6c 6f 63 6b 25 0d 01 fe | 37 20 20 20 20 20 20 c9 |lock%...|7 .|
|00000620| 20 33 20 3a 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c | 3 : .. |"Wimp_Cl|
|00000630| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000640| 6b 25 20 3a 20 f2 66 69 | 6e 69 73 68 0d 02 08 12 |k% : .fi|nish....|
|00000650| 20 20 20 20 20 20 c9 20 | 31 37 2c 20 31 38 0d 02 | . |17, 18..|
|00000660| 12 34 20 20 20 20 20 20 | 20 20 20 ff 28 22 53 65 |.4 | .("Se|
|00000670| 74 20 43 6f 6e 66 50 61 | 74 63 68 24 41 63 74 69 |t ConfPa|tch$Acti|
|00000680| 6f 6e 20 22 2b c3 28 62 | 6c 6f 63 6b 25 21 31 36 |on "+.(b|lock%!16|
|00000690| 29 29 0d 02 1c 1b 20 20 | 20 20 20 20 20 20 20 c8 |)).... | .|
|000006a0| 8e 20 62 6c 6f 63 6b 25 | 21 31 36 20 ca 0d 02 26 |. block%|!16 ...&|
|000006b0| 1d 20 20 20 20 20 20 20 | 20 20 20 20 20 c9 20 30 |. | . 0|
|000006c0| 20 3a 20 f2 66 69 6e 69 | 73 68 0d 02 30 13 20 20 | : .fini|sh..0. |
|000006d0| 20 20 20 20 20 20 20 20 | 20 20 c9 20 33 0d 02 3a | | . 3..:|
|000006e0| 37 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |7 | |
|000006f0| ff 28 22 53 65 74 20 43 | 6f 6e 66 50 61 74 63 68 |.("Set C|onfPatch|
|00000700| 24 52 65 66 20 22 2b c3 | 28 62 6c 6f 63 6b 25 21 |$Ref "+.|(block%!|
|00000710| 31 32 29 29 0d 02 44 38 | 20 20 20 20 20 20 20 20 |12))..D8| |
|00000720| 20 20 20 20 20 20 20 ff | 28 22 53 65 74 20 43 6f | .|("Set Co|
|00000730| 6e 66 50 61 74 63 68 24 | 54 79 70 65 20 22 2b c3 |nfPatch$|Type "+.|
|00000740| 28 62 6c 6f 63 6b 25 21 | 34 30 29 29 0d 02 4e 33 |(block%!|40))..N3|
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 | | .|
|00000760| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 30 20 80 20 62 | block%!|12=0 . b|
|00000770| 6c 6f 63 6b 25 21 34 30 | 3e 26 46 46 46 20 8c 0d |lock%!40|>&FFF ..|
|00000780| 02 58 36 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.X6 | |
|00000790| 20 20 20 20 20 72 65 61 | 6c 63 6f 6e 66 24 3d a4 | rea|lconf$=.|
|000007a0| 72 65 61 64 73 74 72 69 | 6e 67 28 62 6c 6f 63 6b |readstri|ng(block|
|000007b0| 25 2b 34 34 29 0d 02 62 | 1e 20 20 20 20 20 20 20 |%+44)..b|. |
|000007c0| 20 20 20 20 20 20 20 20 | 20 20 20 72 65 74 75 72 | | retur|
|000007d0| 6e 3d b9 0d 02 6c 28 20 | 20 20 20 20 20 20 20 20 |n=...l( | |
|000007e0| 20 20 20 20 20 20 20 20 | 20 62 6c 6f 63 6b 25 21 | | block%!|
|000007f0| 31 32 3d 62 6c 6f 63 6b | 25 21 38 0d 02 76 21 20 |12=block|%!8..v! |
|00000800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000810| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 34 0d 02 80 41 | block%!|16=4...A|
|00000820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000830| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d | .. "Wi|mp_SendM|
|00000840| 65 73 73 61 67 65 22 2c | 20 31 37 2c 20 62 6c 6f |essage",| 17, blo|
|00000850| 63 6b 25 2c 20 62 6c 6f | 63 6b 25 21 34 0d 02 8a |ck%, blo|ck%!4...|
|00000860| 14 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000870| cd 0d 02 94 0e 20 20 20 | 20 20 20 20 20 20 cb 0d |..... | ..|
|00000880| 02 9e 08 20 20 20 cb 0d | 02 a8 0c fd 20 72 65 74 |... ..|.... ret|
|00000890| 75 72 6e 0d 02 b2 04 0d | 02 bc 1d f2 63 6c 6f 73 |urn.....|....clos|
|000008a0| 65 77 69 6e 64 6f 77 28 | 77 69 6e 5f 6f 6c 64 63 |ewindow(|win_oldc|
|000008b0| 6f 6e 66 29 0d 02 c6 26 | f2 73 65 6c 65 63 74 28 |onf)...&|.select(|
|000008c0| 77 69 6e 5f 77 68 69 63 | 68 76 65 72 2c 20 31 2c |win_whic|hver, 1,|
|000008d0| 20 ac 20 52 49 53 43 50 | 43 29 0d 02 d0 24 f2 73 | . RISCP|C)...$.s|
|000008e0| 65 6c 65 63 74 28 77 69 | 6e 5f 77 68 69 63 68 76 |elect(wi|n_whichv|
|000008f0| 65 72 2c 20 32 2c 20 52 | 49 53 43 50 43 29 0d 02 |er, 2, R|ISCPC)..|
|00000900| da 20 f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 77 69 |. .openw|indow(wi|
|00000910| 6e 5f 77 68 69 63 68 76 | 65 72 2c 20 b9 29 0d 02 |n_whichv|er, .)..|
|00000920| e4 04 0d 02 ee 05 f5 0d | 02 f8 41 20 20 20 c8 99 |........|..A ..|
|00000930| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 20 25 31 | "Wimp_P|oll", %1|
|00000940| 30 30 30 30 30 31 31 31 | 30 30 31 30 30 31 31 30 |00000111|00100110|
|00000950| 30 31 31 2c 20 62 6c 6f | 63 6b 25 20 b8 20 72 65 |011, blo|ck% . re|
|00000960| 61 73 6f 6e 63 6f 64 65 | 0d 03 02 0f 20 20 20 72 |asoncode|.... r|
|00000970| 65 74 75 72 6e 3d a3 0d | 03 0c 16 20 20 20 c8 8e |eturn=..|... ..|
|00000980| 20 72 65 61 73 6f 6e 63 | 6f 64 65 20 ca 0d 03 16 | reasonc|ode ....|
|00000990| 2c 20 20 20 20 20 20 c9 | 20 32 20 3a 20 c8 99 20 |, .| 2 : .. |
|000009a0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000009b0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 03 20 37 20 20 20 |",,block|%.. 7 |
|000009c0| 20 20 20 c9 20 33 20 3a | 20 c8 99 20 22 57 69 6d | . 3 :| .. "Wim|
|000009d0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|000009e0| 62 6c 6f 63 6b 25 20 3a | 20 f2 66 69 6e 69 73 68 |block% :| .finish|
|000009f0| 0d 03 2a 0d 20 20 20 20 | 20 20 c9 20 36 0d 03 34 |..*. | . 6..4|
|00000a00| 21 20 20 20 20 20 20 20 | 20 20 72 65 74 75 72 6e |! | return|
|00000a10| 3d 28 62 6c 6f 63 6b 25 | 21 31 36 3d 33 29 0d 03 |=(block%|!16=3)..|
|00000a20| 3e 30 20 20 20 20 20 20 | 20 20 20 f2 73 65 6c 65 |>0 | .sele|
|00000a30| 63 74 28 77 69 6e 5f 77 | 68 69 63 68 76 65 72 2c |ct(win_w|hichver,|
|00000a40| 20 62 6c 6f 63 6b 25 21 | 31 36 2c 20 b9 29 0d 03 | block%!|16, .)..|
|00000a50| 48 12 20 20 20 20 20 20 | c9 20 31 37 2c 20 31 38 |H. |. 17, 18|
|00000a60| 0d 03 52 24 20 20 20 20 | 20 20 20 20 20 e7 20 62 |..R$ | . b|
|00000a70| 6c 6f 63 6b 25 21 31 36 | 3d 30 20 8c 20 f2 66 69 |lock%!16|=0 . .fi|
|00000a80| 6e 69 73 68 0d 03 5c 08 | 20 20 20 cb 0d 03 66 0c |nish..\.| ...f.|
|00000a90| fd 20 72 65 74 75 72 6e | 0d 03 70 25 52 49 53 43 |. return|..p%RISC|
|00000aa0| 50 43 3d a4 73 65 6c 65 | 63 74 65 64 28 77 69 6e |PC=.sele|cted(win|
|00000ab0| 5f 77 68 69 63 68 76 65 | 72 2c 20 32 29 0d 03 7a |_whichve|r, 2)..z|
|00000ac0| 1e f2 63 6c 6f 73 65 77 | 69 6e 64 6f 77 28 77 69 |..closew|indow(wi|
|00000ad0| 6e 5f 77 68 69 63 68 76 | 65 72 29 0d 03 84 1f f2 |n_whichv|er).....|
|00000ae0| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 77 69 6e 5f 6f |openwind|ow(win_o|
|00000af0| 6c 64 63 6f 6e 66 2c 20 | b9 29 0d 03 8e 04 0d 03 |ldconf, |.)......|
|00000b00| 98 10 e7 20 ac 20 52 49 | 53 43 50 43 20 8c 0d 03 |... . RI|SCPC ...|
|00000b10| a2 1b 20 20 20 70 61 74 | 63 68 24 2b 3d 22 2e 52 |.. pat|ch$+=".R|
|00000b20| 49 53 43 4f 53 33 31 30 | 22 0d 03 ac 21 20 20 20 |ISCOS310|"...! |
|00000b30| 77 73 6c 6f 74 24 3d 22 | 2d 6d 69 6e 20 36 34 4b |wslot$="|-min 64K|
|00000b40| 20 2d 6d 61 78 20 36 34 | 4b 22 0d 03 b6 05 cc 0d | -max 64|K"......|
|00000b50| 03 c0 1b 20 20 20 70 61 | 74 63 68 24 2b 3d 22 2e |... pa|tch$+=".|
|00000b60| 52 49 53 43 4f 53 33 35 | 30 22 0d 03 ca 23 20 20 |RISCOS35|0"...# |
|00000b70| 20 77 73 6c 6f 74 24 3d | 22 2d 6d 69 6e 20 31 39 | wslot$=|"-min 19|
|00000b80| 32 4b 20 2d 6d 61 78 20 | 31 39 32 4b 22 0d 03 d4 |2K -max |192K"...|
|00000b90| 05 cd 0d 03 de 04 0d 03 | e8 23 e7 20 a4 72 65 61 |........|.#. .rea|
|00000ba0| 64 76 61 72 28 22 43 6f | 6e 66 69 67 2b 24 44 69 |dvar("Co|nfig+$Di|
|00000bb0| 72 22 29 3c 3e 22 22 20 | 8c 0d 03 f2 2c 20 20 20 |r")<>"" |...., |
|00000bc0| c8 99 20 22 58 4f 53 5f | 43 4c 49 22 2c 20 22 52 |.. "XOS_|CLI", "R|
|00000bd0| 4d 4b 69 6c 6c 20 43 6f | 6e 66 2b 52 65 73 6f 75 |MKill Co|nf+Resou|
|00000be0| 72 63 65 73 22 0d 03 fc | 34 20 20 20 c8 99 20 22 |rces"...|4 .. "|
|00000bf0| 58 4f 53 5f 43 4c 49 22 | 2c 20 22 46 69 6c 65 72 |XOS_CLI"|, "Filer|
|00000c00| 5f 52 75 6e 20 22 2b 72 | 65 61 6c 63 6f 6e 66 24 |_Run "+r|ealconf$|
|00000c10| 2b 22 2e 21 42 6f 6f 74 | 22 0d 04 06 05 cc 0d 04 |+".!Boot|".......|
|00000c20| 10 50 20 20 20 85 20 30 | 2c 20 22 43 61 6e 27 74 |.P . 0|, "Can't|
|00000c30| 20 66 69 6e 64 20 6f 75 | 74 70 75 74 20 64 69 72 | find ou|tput dir|
|00000c40| 65 63 74 6f 72 79 20 2d | 20 70 6c 65 61 73 65 20 |ectory -| please |
|00000c50| 6c 6f 63 61 74 65 20 21 | 43 6f 6e 66 69 67 2b 20 |locate !|Config+ |
|00000c60| 61 6e 64 20 74 72 79 20 | 61 67 61 69 6e 22 0d 04 |and try |again"..|
|00000c70| 1a 05 cd 0d 04 24 04 0d | 04 2e 34 f2 77 72 69 74 |.....$..|..4.writ|
|00000c80| 65 69 63 6f 6e 28 77 69 | 6e 5f 6f 6c 64 63 6f 6e |eicon(wi|n_oldcon|
|00000c90| 66 2c 20 32 2c 20 22 50 | 61 74 63 68 69 6e 67 20 |f, 2, "P|atching |
|00000ca0| 53 74 61 72 74 43 6f 6e | 66 22 29 0d 04 38 09 f2 |StartCon|f")..8..|
|00000cb0| 70 6f 6c 6c 0d 04 42 25 | 66 69 6c 65 3d ae 28 22 |poll..B%|file=.("|
|00000cc0| 3c 43 6f 6e 66 69 67 2b | 24 44 69 72 3e 2e 53 74 |<Config+|$Dir>.St|
|00000cd0| 61 72 74 43 6f 6e 66 22 | 29 0d 04 4c 0f d5 23 66 |artConf"|)..L..#f|
|00000ce0| 69 6c 65 2c 20 22 7c 22 | 0d 04 56 1f d5 23 66 69 |ile, "|"|..V..#fi|
|00000cf0| 6c 65 2c 20 22 7c 20 53 | 74 61 72 74 20 43 6f 6e |le, "| S|tart Con|
|00000d00| 66 69 67 75 72 65 22 0d | 04 60 0f d5 23 66 69 6c |figure".|.`..#fil|
|00000d10| 65 2c 20 22 7c 22 0d 04 | 6a 41 d5 23 66 69 6c 65 |e, "|"..|jA.#file|
|00000d20| 2c 20 22 49 66 20 22 22 | 3c 43 6f 6e 66 69 67 2b |, "If ""|<Config+|
|00000d30| 24 44 69 72 3e 22 22 3d | 22 22 22 22 20 54 68 65 |$Dir>""=|"""" The|
|00000d40| 6e 20 52 75 6e 20 3c 4f | 62 65 79 24 44 69 72 3e |n Run <O|bey$Dir>|
|00000d50| 2e 21 42 6f 6f 74 22 0d | 04 74 1e d5 23 66 69 6c |.!Boot".|.t..#fil|
|00000d60| 65 2c 20 22 57 69 6d 70 | 53 6c 6f 74 20 22 2b 77 |e, "Wimp|Slot "+w|
|00000d70| 73 6c 6f 74 24 0d 04 7e | 2d d5 23 66 69 6c 65 2c |slot$..~|-.#file,|
|00000d80| 20 22 52 75 6e 20 22 2b | 72 65 61 6c 63 6f 6e 66 | "Run "+|realconf|
|00000d90| 24 2b 22 2e 21 52 75 6e | 49 6d 61 67 65 20 25 2a |$+".!Run|Image %*|
|00000da0| 30 22 0d 04 88 0a d9 23 | 66 69 6c 65 0d 04 92 2d |0".....#|file...-|
|00000db0| ff 28 22 53 65 74 54 79 | 70 65 20 3c 43 6f 6e 66 |.("SetTy|pe <Conf|
|00000dc0| 69 67 2b 24 44 69 72 3e | 2e 53 74 61 72 74 43 6f |ig+$Dir>|.StartCo|
|00000dd0| 6e 66 20 4f 62 65 79 22 | 29 0d 04 9c 04 0d 04 a6 |nf Obey"|).......|
|00000de0| 2e 66 69 6c 65 3d ae 28 | 22 3c 43 6f 6e 66 69 67 |.file=.(|"<Config|
|00000df0| 2b 24 44 69 72 3e 2e 43 | 6f 6e 66 69 67 75 72 65 |+$Dir>.C|onfigure|
|00000e00| 2e 50 61 74 68 49 6e 66 | 6f 22 29 0d 04 b0 31 d5 |.PathInf|o")...1.|
|00000e10| 23 66 69 6c 65 2c 20 22 | 53 65 74 20 43 6f 6e 66 |#file, "|Set Conf|
|00000e20| 69 67 2b 24 52 65 61 6c | 50 61 74 68 20 22 2b 72 |ig+$Real|Path "+r|
|00000e30| 65 61 6c 63 6f 6e 66 24 | 2b 22 2e 22 0d 04 ba 0a |ealconf$|+"."....|
|00000e40| d9 23 66 69 6c 65 0d 04 | c4 36 ff 28 22 53 65 74 |.#file..|.6.("Set|
|00000e50| 54 79 70 65 20 3c 43 6f | 6e 66 69 67 2b 24 44 69 |Type <Co|nfig+$Di|
|00000e60| 72 3e 2e 43 6f 6e 66 69 | 67 75 72 65 2e 50 61 74 |r>.Confi|gure.Pat|
|00000e70| 68 49 6e 66 6f 20 4f 62 | 65 79 22 29 0d 04 ce 04 |hInfo Ob|ey")....|
|00000e80| 0d 04 d8 2a ff 28 22 53 | 65 74 20 43 6f 6e 66 69 |...*.("S|et Confi|
|00000e90| 67 75 72 65 24 50 61 74 | 68 20 22 2b 72 65 61 6c |gure$Pat|h "+real|
|00000ea0| 63 6f 6e 66 24 2b 22 2e | 22 29 0d 04 e2 40 c8 99 |conf$+".|")...@..|
|00000eb0| 20 22 4f 53 5f 46 69 6c | 65 22 2c 20 32 33 2c 20 | "OS_Fil|e", 23, |
|00000ec0| 22 43 6f 6e 66 69 67 75 | 72 65 3a 4d 65 73 73 61 |"Configu|re:Messa|
|00000ed0| 67 65 73 22 20 b8 20 66 | 6f 75 6e 64 2c 2c 2c 2c |ges" . f|ound,,,,|
|00000ee0| 2c 2c 66 69 6c 65 74 79 | 70 65 0d 04 ec 0f e7 20 |,,filety|pe..... |
|00000ef0| 66 6f 75 6e 64 3d 30 20 | 8c 0d 04 f6 37 20 20 20 |found=0 |....7 |
|00000f00| 85 20 30 2c 20 22 43 6f | 75 6c 64 6e 27 74 20 66 |. 0, "Co|uldn't f|
|00000f10| 69 6e 64 20 43 6f 6e 66 | 69 67 75 72 65 27 73 20 |ind Conf|igure's |
|00000f20| 72 65 73 6f 75 72 63 65 | 73 20 66 69 6c 65 73 22 |resource|s files"|
|00000f30| 0d 05 00 05 cd 0d 05 0a | 04 0d 05 14 33 f2 77 72 |........|....3.wr|
|00000f40| 69 74 65 69 63 6f 6e 28 | 77 69 6e 5f 6f 6c 64 63 |iteicon(|win_oldc|
|00000f50| 6f 6e 66 2c 20 32 2c 20 | 22 50 61 74 63 68 69 6e |onf, 2, |"Patchin|
|00000f60| 67 20 6d 65 73 73 61 67 | 65 73 22 29 0d 05 1e 09 |g messag|es")....|
|00000f70| f2 70 6f 6c 6c 0d 05 28 | 04 0d 05 32 55 2a 57 69 |.poll..(|...2U*Wi|
|00000f80| 6d 70 74 61 73 6b 20 43 | 6f 70 79 20 43 6f 6e 66 |mptask C|opy Conf|
|00000f90| 69 67 75 72 65 3a 4d 65 | 73 73 61 67 65 73 20 3c |igure:Me|ssages <|
|00000fa0| 43 6f 6e 66 69 67 2b 24 | 44 69 72 3e 2e 43 6f 6e |Config+$|Dir>.Con|
|00000fb0| 66 69 67 75 72 65 2e 4d | 65 73 73 61 67 65 73 20 |figure.M|essages |
|00000fc0| 7e 43 20 7e 56 20 46 20 | 4c 20 7e 4e 20 51 0d 05 |~C ~V F |L ~N Q..|
|00000fd0| 3c 04 0d 05 46 16 e7 20 | 66 69 6c 65 74 79 70 65 |<...F.. |filetype|
|00000fe0| 3c 3e 26 46 46 46 20 8c | 0d 05 50 d5 20 20 20 e7 |<>&FFF .|..P. .|
|00000ff0| 20 66 69 6c 65 74 79 70 | 65 3c 3e 26 46 43 41 20 | filetyp|e<>&FCA |
|00001000| 8c 20 85 20 30 2c 20 22 | 4d 65 73 73 61 67 65 73 |. . 0, "|Messages|
|00001010| 20 61 72 65 20 69 6e 20 | 61 6e 20 75 6e 6b 6e 6f | are in |an unkno|
|00001020| 77 6e 20 66 6f 72 6d 61 | 74 20 28 22 2b c3 7e 66 |wn forma|t ("+.~f|
|00001030| 69 6c 65 74 79 70 65 2b | 22 2c 20 22 2b a4 72 65 |iletype+|", "+.re|
|00001040| 61 64 76 61 72 28 22 46 | 69 6c 65 24 54 79 70 65 |advar("F|ile$Type|
|00001050| 5f 22 2b c3 7e 66 69 6c | 65 74 79 70 65 29 2b 22 |_"+.~fil|etype)+"|
|00001060| 29 2e 20 43 6f 6e 76 65 | 72 74 20 74 68 65 6d 20 |). Conve|rt them |
|00001070| 74 6f 20 54 65 78 74 2c | 20 6d 6f 64 69 66 79 20 |to Text,| modify |
|00001080| 43 6f 6e 66 69 67 75 72 | 65 24 50 61 74 68 20 74 |Configur|e$Path t|
|00001090| 6f 20 70 6f 69 6e 74 20 | 74 6f 20 74 68 65 69 72 |o point |to their|
|000010a0| 20 6e 65 77 20 6c 6f 63 | 61 74 69 6f 6e 20 61 6e | new loc|ation an|
|000010b0| 64 20 74 72 79 20 61 67 | 61 69 6e 2e 22 0d 05 5a |d try ag|ain."..Z|
|000010c0| 8a 20 20 20 e7 20 a4 72 | 65 61 64 76 61 72 28 22 |. . .r|eadvar("|
|000010d0| 41 6c 69 61 73 24 40 52 | 75 6e 54 79 70 65 5f 46 |Alias$@R|unType_F|
|000010e0| 43 41 22 29 3d 22 22 20 | 8c 20 85 20 30 2c 20 22 |CA")="" |. . 0, "|
|000010f0| 43 61 6e 27 74 20 75 6e | 73 71 75 61 73 68 20 53 |Can't un|squash S|
|00001100| 71 75 61 73 68 20 66 69 | 6c 65 73 20 77 69 74 68 |quash fi|les with|
|00001110| 6f 75 74 20 68 61 76 69 | 6e 67 20 73 65 65 6e 20 |out havi|ng seen |
|00001120| 21 53 71 75 61 73 68 2e | 20 4c 6f 63 61 74 65 20 |!Squash.| Locate |
|00001130| 21 53 71 75 61 73 68 20 | 61 6e 64 20 74 72 79 20 |!Squash |and try |
|00001140| 61 67 61 69 6e 2e 22 0d | 05 64 39 20 20 20 f2 77 |again.".|.d9 .w|
|00001150| 72 69 74 65 69 63 6f 6e | 28 77 69 6e 5f 6f 6c 64 |riteicon|(win_old|
|00001160| 63 6f 6e 66 2c 20 32 2c | 20 22 55 6e 73 71 75 61 |conf, 2,| "Unsqua|
|00001170| 73 68 69 6e 67 20 6d 65 | 73 73 61 67 65 73 22 29 |shing me|ssages")|
|00001180| 0d 05 6e 0c 20 20 20 f2 | 70 6f 6c 6c 0d 05 78 32 |..n. .|poll..x2|
|00001190| 20 20 20 2a 46 69 6c 65 | 72 5f 52 75 6e 20 3c 43 | *File|r_Run <C|
|000011a0| 6f 6e 66 69 67 2b 24 44 | 69 72 3e 2e 43 6f 6e 66 |onfig+$D|ir>.Conf|
|000011b0| 69 67 75 72 65 2e 4d 65 | 73 73 61 67 65 73 0d 05 |igure.Me|ssages..|
|000011c0| 82 08 20 20 20 f5 0d 05 | 8c 0f 20 20 20 20 20 20 |.. ...|.. |
|000011d0| f2 70 6f 6c 6c 0d 05 96 | 54 20 20 20 20 20 20 c8 |.poll...|T .|
|000011e0| 99 20 22 4f 53 5f 46 69 | 6c 65 22 2c 20 32 33 2c |. "OS_Fi|le", 23,|
|000011f0| 20 22 3c 43 6f 6e 66 69 | 67 2b 24 44 69 72 3e 2e | "<Confi|g+$Dir>.|
|00001200| 43 6f 6e 66 69 67 75 72 | 65 2e 4d 65 73 73 61 67 |Configur|e.Messag|
|00001210| 65 73 22 20 b8 20 66 6f | 75 6e 64 2c 2c 2c 2c 2c |es" . fo|und,,,,,|
|00001220| 2c 66 69 6c 65 74 79 70 | 65 0d 05 a0 21 20 20 20 |,filetyp|e...! |
|00001230| fd 20 66 6f 75 6e 64 3c | 3e 30 20 80 20 66 69 6c |. found<|>0 . fil|
|00001240| 65 74 79 70 65 3d 26 46 | 46 46 0d 05 aa 05 cd 0d |etype=&F|FF......|
|00001250| 05 b4 04 0d 05 be 33 f2 | 77 72 69 74 65 69 63 6f |......3.|writeico|
|00001260| 6e 28 77 69 6e 5f 6f 6c | 64 63 6f 6e 66 2c 20 32 |n(win_ol|dconf, 2|
|00001270| 2c 20 22 50 61 74 63 68 | 69 6e 67 20 6d 65 73 73 |, "Patch|ing mess|
|00001280| 61 67 65 73 22 29 0d 05 | c8 09 f2 70 6f 6c 6c 0d |ages")..|...poll.|
|00001290| 05 d2 04 0d 05 dc 34 6f | 75 74 70 75 74 66 69 6c |......4o|utputfil|
|000012a0| 65 3d ad 28 22 3c 43 6f | 6e 66 69 67 2b 24 44 69 |e=.("<Co|nfig+$Di|
|000012b0| 72 3e 2e 43 6f 6e 66 69 | 67 75 72 65 2e 4d 65 73 |r>.Confi|gure.Mes|
|000012c0| 73 61 67 65 73 22 29 0d | 05 e6 1d cf 23 6f 75 74 |sages").|....#out|
|000012d0| 70 75 74 66 69 6c 65 3d | a2 23 6f 75 74 70 75 74 |putfile=|.#output|
|000012e0| 66 69 6c 65 0d 05 f0 04 | 0d 05 fa 24 63 6f 6e 66 |file....|...$conf|
|000012f0| 69 67 66 69 6c 65 3d 8e | 28 70 61 74 63 68 24 2b |igfile=.|(patch$+|
|00001300| 22 2e 4d 65 73 73 61 67 | 65 73 22 29 0d 06 04 05 |".Messag|es")....|
|00001310| f5 0d 06 0e 21 20 20 20 | d5 23 6f 75 74 70 75 74 |....! |.#output|
|00001320| 66 69 6c 65 2c 20 be 23 | 63 6f 6e 66 69 67 66 69 |file, .#|configfi|
|00001330| 6c 65 0d 06 18 12 fd 20 | c5 23 63 6f 6e 66 69 67 |le..... |.#config|
|00001340| 66 69 6c 65 0d 06 22 16 | f2 63 6c 6f 73 65 28 6f |file..".|.close(o|
|00001350| 75 74 70 75 74 66 69 6c | 65 29 0d 06 2c 3b 2a 77 |utputfil|e)..,;*w|
|00001360| 69 6d 70 74 61 73 6b 20 | 53 65 74 54 79 70 65 20 |imptask |SetType |
|00001370| 3c 43 6f 6e 66 69 67 2b | 24 44 69 72 3e 2e 43 6f |<Config+|$Dir>.Co|
|00001380| 6e 66 69 67 75 72 65 2e | 4d 65 73 73 61 67 65 73 |nfigure.|Messages|
|00001390| 20 54 65 78 74 0d 06 36 | 04 0d 06 40 32 f2 77 72 | Text..6|...@2.wr|
|000013a0| 69 74 65 69 63 6f 6e 28 | 77 69 6e 5f 6f 6c 64 63 |iteicon(|win_oldc|
|000013b0| 6f 6e 66 2c 20 32 2c 20 | 22 50 61 74 63 68 69 6e |onf, 2, |"Patchin|
|000013c0| 67 20 73 70 72 69 74 65 | 73 22 29 0d 06 4a 09 f2 |g sprite|s")..J..|
|000013d0| 70 6f 6c 6c 0d 06 54 04 | 0d 06 5e 25 c8 99 20 22 |poll..T.|..^%.. "|
|000013e0| 57 69 6d 70 5f 52 65 61 | 64 53 79 73 49 6e 66 6f |Wimp_Rea|dSysInfo|
|000013f0| 22 2c 20 32 20 b8 20 73 | 75 66 66 69 78 0d 06 68 |", 2 . s|uffix..h|
|00001400| 1c c8 8e 20 a4 72 65 61 | 64 73 74 72 69 6e 67 28 |... .rea|dstring(|
|00001410| 73 75 66 66 69 78 29 20 | ca 0d 06 73 19 20 20 20 |suffix) |...s. |
|00001420| c9 20 22 32 32 22 20 3a | 20 6b 65 65 70 73 75 66 |. "22" :| keepsuf|
|00001430| 3d 32 0d 06 74 19 20 20 | 20 c9 20 22 32 33 22 20 |=2..t. | . "23" |
|00001440| 3a 20 6b 65 65 70 73 75 | 66 3d 33 0d 06 75 14 20 |: keepsu|f=3..u. |
|00001450| 20 20 7f 20 3a 20 6b 65 | 65 70 73 75 66 3d 31 0d | . : ke|epsuf=1.|
|00001460| 06 7c 05 cb 0d 06 7d 12 | 72 65 61 6c 73 70 72 69 |.|....}.|realspri|
|00001470| 74 65 25 3d 2d 31 0d 06 | 86 10 e3 20 74 79 70 65 |te%=-1..|... type|
|00001480| 3d 31 20 b8 20 33 0d 06 | 90 10 20 20 20 c8 8e 20 |=1 . 3..|.. .. |
|00001490| 74 79 70 65 20 ca 0d 06 | 9a 17 20 20 20 20 20 20 |type ...|.. |
|000014a0| c9 20 31 20 3a 20 73 75 | 66 24 3d 22 22 0d 06 a4 |. 1 : su|f$=""...|
|000014b0| 19 20 20 20 20 20 20 c9 | 20 32 20 3a 20 73 75 66 |. .| 2 : suf|
|000014c0| 24 3d 22 32 32 22 0d 06 | ae 19 20 20 20 20 20 20 |$="22"..|.. |
|000014d0| c9 20 33 20 3a 20 73 75 | 66 24 3d 22 32 33 22 0d |. 3 : su|f$="23".|
|000014e0| 06 b8 08 20 20 20 cb 0d | 06 c2 1a 20 20 20 e7 20 |... ..|... . |
|000014f0| 52 49 53 43 50 43 20 84 | 20 74 79 70 65 3d 31 20 |RISCPC .| type=1 |
|00001500| 8c 0d 06 cc 4c 20 20 20 | 20 20 20 c8 99 20 22 4f |....L | .. "O|
|00001510| 53 5f 46 69 6c 65 22 2c | 20 32 33 2c 20 22 43 6f |S_File",| 23, "Co|
|00001520| 6e 66 69 67 75 72 65 3a | 53 70 72 69 74 65 73 22 |nfigure:|Sprites"|
|00001530| 2b 73 75 66 24 20 b8 20 | 66 6f 75 6e 64 2c 2c 2c |+suf$ . |found,,,|
|00001540| 2c 63 6f 6e 66 69 67 6c | 65 6e 67 74 68 0d 06 d6 |,configl|ength...|
|00001550| 15 20 20 20 20 20 20 e7 | 20 66 6f 75 6e 64 3d 30 |. .| found=0|
|00001560| 20 8c 0d 06 e0 3f 20 20 | 20 20 20 20 20 20 20 85 | ....? | .|
|00001570| 20 30 2c 20 22 43 61 6e | 27 74 20 66 69 6e 64 20 | 0, "Can|'t find |
|00001580| 43 6f 6e 66 69 67 75 72 | 65 27 73 20 53 70 72 69 |Configur|e's Spri|
|00001590| 74 65 73 22 2b 73 75 66 | 24 2b 22 20 66 69 6c 65 |tes"+suf|$+" file|
|000015a0| 22 0d 06 ea 0b 20 20 20 | 20 20 20 cd 0d 06 f4 49 |".... | ....I|
|000015b0| 20 20 20 20 20 20 c8 99 | 20 22 4f 53 5f 46 69 6c | ..| "OS_Fil|
|000015c0| 65 22 2c 20 32 33 2c 20 | 70 61 74 63 68 24 2b 22 |e", 23, |patch$+"|
|000015d0| 2e 53 70 72 69 74 65 73 | 22 2b 73 75 66 24 20 b8 |.Sprites|"+suf$ .|
|000015e0| 20 66 6f 75 6e 64 2c 2c | 2c 2c 70 61 74 63 68 6c | found,,|,,patchl|
|000015f0| 65 6e 67 74 68 0d 06 fe | 15 20 20 20 20 20 20 e7 |ength...|. .|
|00001600| 20 66 6f 75 6e 64 3d 30 | 20 8c 0d 07 08 40 20 20 | found=0| ....@ |
|00001610| 20 20 20 20 20 20 20 85 | 20 30 2c 20 22 43 61 6e | .| 0, "Can|
|00001620| 27 74 20 66 69 6e 64 20 | 43 6f 6e 66 69 67 75 72 |'t find |Configur|
|00001630| 65 2b 27 73 20 53 70 72 | 69 74 65 73 22 2b 73 75 |e+'s Spr|ites"+su|
|00001640| 66 24 2b 22 20 66 69 6c | 65 22 0d 07 12 0b 20 20 |f$+" fil|e".... |
|00001650| 20 20 20 20 cd 0d 07 1c | 2e 20 20 20 20 20 20 61 | ....|. a|
|00001660| 72 65 61 73 69 7a 65 3d | 63 6f 6e 66 69 67 6c 65 |reasize=|configle|
|00001670| 6e 67 74 68 2b 70 61 74 | 63 68 6c 65 6e 67 74 68 |ngth+pat|chlength|
|00001680| 2b 31 36 0d 07 26 1c 20 | 20 20 20 20 20 de 20 73 |+16..&. | . s|
|00001690| 70 72 69 74 65 25 20 61 | 72 65 61 73 69 7a 65 0d |prite% a|reasize.|
|000016a0| 07 30 1b 20 20 20 20 20 | 20 21 73 70 72 69 74 65 |.0. | !sprite|
|000016b0| 25 3d 61 72 65 61 73 69 | 7a 65 0d 07 3a 16 20 20 |%=areasi|ze..:. |
|000016c0| 20 20 20 20 73 70 72 69 | 74 65 25 21 38 3d 31 36 | spri|te%!8=16|
|000016d0| 0d 07 44 2b 20 20 20 20 | 20 20 c8 99 20 22 4f 53 |..D+ | .. "OS|
|000016e0| 5f 53 70 72 69 74 65 4f | 70 22 2c 20 26 31 30 30 |_SpriteO|p", &100|
|000016f0| 2b 39 2c 20 73 70 72 69 | 74 65 25 0d 07 4e 46 20 |+9, spri|te%..NF |
|00001700| 20 20 20 20 20 c8 99 20 | 22 4f 53 5f 53 70 72 69 | .. |"OS_Spri|
|00001710| 74 65 4f 70 22 2c 20 26 | 31 30 30 2b 31 30 2c 20 |teOp", &|100+10, |
|00001720| 73 70 72 69 74 65 25 2c | 20 22 43 6f 6e 66 69 67 |sprite%,| "Config|
|00001730| 75 72 65 3a 53 70 72 69 | 74 65 73 22 2b 73 75 66 |ure:Spri|tes"+suf|
|00001740| 24 0d 07 58 0f 20 20 20 | 20 20 20 f2 70 6f 6c 6c |$..X. | .poll|
|00001750| 0d 07 62 44 20 20 20 20 | 20 20 c8 99 20 22 4f 53 |..bD | .. "OS|
|00001760| 5f 53 70 72 69 74 65 4f | 70 22 2c 20 26 31 30 30 |_SpriteO|p", &100|
|00001770| 2b 31 31 2c 20 73 70 72 | 69 74 65 25 2c 20 70 61 |+11, spr|ite%, pa|
|00001780| 74 63 68 24 2b 22 2e 53 | 70 72 69 74 65 73 22 2b |tch$+".S|prites"+|
|00001790| 73 75 66 24 0d 07 6c 0f | 20 20 20 20 20 20 f2 70 |suf$..l.| .p|
|000017a0| 6f 6c 6c 0d 07 76 54 20 | 20 20 20 20 20 c8 99 20 |oll..vT | .. |
|000017b0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 20 26 |"OS_Spri|teOp", &|
|000017c0| 31 30 30 2b 31 32 2c 20 | 73 70 72 69 74 65 25 2c |100+12, |sprite%,|
|000017d0| 20 22 3c 43 6f 6e 66 69 | 67 2b 24 44 69 72 3e 2e | "<Confi|g+$Dir>.|
|000017e0| 43 6f 6e 66 69 67 75 72 | 65 2e 53 70 72 69 74 65 |Configur|e.Sprite|
|000017f0| 73 22 2b 73 75 66 24 0d | 07 80 0f 20 20 20 20 20 |s"+suf$.|... |
|00001800| 20 f2 70 6f 6c 6c 0d 07 | 81 2e 20 20 20 20 20 20 | .poll..|.. |
|00001810| e7 20 6b 65 65 70 73 75 | 66 3d 74 79 70 65 20 8c |. keepsu|f=type .|
|00001820| 20 72 65 61 6c 73 70 72 | 69 74 65 25 3d 73 70 72 | realspr|ite%=spr|
|00001830| 69 74 65 25 0d 07 8a 08 | 20 20 20 cd 0d 07 94 05 |ite%....| .....|
|00001840| ed 0d 07 95 2a e7 20 72 | 65 61 6c 73 70 72 69 74 |....*. r|ealsprit|
|00001850| 65 25 3d 2d 31 20 8c 20 | 72 65 61 6c 73 70 72 69 |e%=-1 . |realspri|
|00001860| 74 65 25 3d 73 70 72 69 | 74 65 25 0d 07 d0 04 0d |te%=spri|te%.....|
|00001870| 07 da 34 f2 77 72 69 74 | 65 69 63 6f 6e 28 77 69 |..4.writ|eicon(wi|
|00001880| 6e 5f 6f 6c 64 63 6f 6e | 66 2c 20 32 2c 20 22 50 |n_oldcon|f, 2, "P|
|00001890| 61 74 63 68 69 6e 67 20 | 74 65 6d 70 6c 61 74 65 |atching |template|
|000018a0| 73 22 29 0d 07 e4 09 f2 | 70 6f 6c 6c 0d 07 ee 04 |s").....|poll....|
|000018b0| 0d 07 f8 11 de 20 77 69 | 6c 64 63 61 72 64 20 31 |..... wi|ldcard 1|
|000018c0| 32 0d 08 02 10 e3 20 6c | 6f 6f 70 3d 31 20 b8 20 |2..... l|oop=1 . |
|000018d0| 32 0d 08 0c 3b 20 20 20 | e7 20 6c 6f 6f 70 3d 31 |2...; |. loop=1|
|000018e0| 20 8c 20 66 69 6c 65 24 | 3d 73 6f 75 72 63 65 24 | . file$|=source$|
|000018f0| 20 8b 20 66 69 6c 65 24 | 3d 70 61 74 63 68 24 2b | . file$|=patch$+|
|00001900| 22 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 08 16 24 |".Templa|tes"...$|
|00001910| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e | .. "W|imp_Open|
|00001920| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 66 69 6c 65 24 |Template|",,file$|
|00001930| 0d 08 20 10 20 20 20 63 | 6f 75 6e 74 65 72 3d 30 |.. . c|ounter=0|
|00001940| 0d 08 2a 08 20 20 20 f5 | 0d 08 34 17 20 20 20 20 |..*. .|..4. |
|00001950| 20 20 24 77 69 6c 64 63 | 61 72 64 3d 22 2a 22 0d | $wildc|ard="*".|
|00001960| 08 3e 5d 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |.>] | .. "Wim|
|00001970| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00001980| 2c 2d 31 2c 30 2c 30 2c | 2d 31 2c 77 69 6c 64 63 |,-1,0,0,|-1,wildc|
|00001990| 61 72 64 2c 63 6f 75 6e | 74 65 72 20 b8 20 2c 62 |ard,coun|ter . ,b|
|000019a0| 75 66 73 69 7a 65 2c 69 | 6e 64 73 69 7a 65 2c 2c |ufsize,i|ndsize,,|
|000019b0| 2c 2c 6e 65 77 63 6f 75 | 6e 74 65 72 0d 08 48 1b |,,newcou|nter..H.|
|000019c0| 20 20 20 20 20 20 e7 20 | 6e 65 77 63 6f 75 6e 74 | . |newcount|
|000019d0| 65 72 3c 3e 30 20 8c 0d | 08 52 1a 20 20 20 20 20 |er<>0 ..|.R. |
|000019e0| 20 20 20 20 6e 75 6d 77 | 69 6e 64 6f 77 73 2b 3d | numw|indows+=|
|000019f0| 31 0d 08 5c 2a 20 20 20 | 20 20 20 20 20 20 de 20 |1..\* | . |
|00001a00| 62 75 66 66 65 72 20 62 | 75 66 73 69 7a 65 2c 20 |buffer b|ufsize, |
|00001a10| 69 6e 64 20 69 6e 64 73 | 69 7a 65 0d 08 66 6a 20 |ind inds|ize..fj |
|00001a20| 20 20 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 | |.. "Wimp|
|00001a30| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 20 |_LoadTem|plate", |
|00001a40| 2c 20 62 75 66 66 65 72 | 2c 20 69 6e 64 2c 20 69 |, buffer|, ind, i|
|00001a50| 6e 64 2b 69 6e 64 73 69 | 7a 65 2c 20 2d 31 2c 20 |nd+indsi|ze, -1, |
|00001a60| 77 69 6c 64 63 61 72 64 | 2c 20 63 6f 75 6e 74 65 |wildcard|, counte|
|00001a70| 72 20 b8 20 2c 2c 2c 2c | 2c 6e 61 6d 65 2c 63 6f |r . ,,,,|,name,co|
|00001a80| 75 6e 74 65 72 0d 08 70 | 32 20 20 20 20 20 20 20 |unter..p|2 |
|00001a90| 20 20 77 69 6e 64 6f 77 | 24 28 6e 75 6d 77 69 6e | window|$(numwin|
|00001aa0| 64 6f 77 73 29 3d a4 72 | 65 61 64 73 74 72 69 6e |dows)=.r|eadstrin|
|00001ab0| 67 28 6e 61 6d 65 29 0d | 08 7a 22 20 20 20 20 20 |g(name).|.z" |
|00001ac0| 20 20 20 20 62 75 66 66 | 65 72 21 36 34 3d 72 65 | buff|er!64=re|
|00001ad0| 61 6c 73 70 72 69 74 65 | 25 0d 08 84 40 20 20 20 |alsprite|%...@ |
|00001ae0| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 | ..| "Wimp_C|
|00001af0| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 62 75 |reateWin|dow",,bu|
|00001b00| 66 66 65 72 20 b8 20 77 | 69 6e 64 6f 77 28 6e 75 |ffer . w|indow(nu|
|00001b10| 6d 77 69 6e 64 6f 77 73 | 29 0d 08 8e 0b 20 20 20 |mwindows|).... |
|00001b20| 20 20 20 cd 0d 08 98 15 | 20 20 20 fd 20 6e 65 77 | .....| . new|
|00001b30| 63 6f 75 6e 74 65 72 3d | 30 0d 08 a2 1e 20 20 20 |counter=|0.... |
|00001b40| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 54 65 |.. "Wimp|_CloseTe|
|00001b50| 6d 70 6c 61 74 65 22 0d | 08 ac 2b 20 20 20 e7 20 |mplate".|..+ . |
|00001b60| 6c 6f 6f 70 3d 31 20 8c | 20 6e 75 6d 72 65 61 6c |loop=1 .| numreal|
|00001b70| 77 69 6e 64 6f 77 73 3d | 6e 75 6d 77 69 6e 64 6f |windows=|numwindo|
|00001b80| 77 73 0d 08 b6 05 ed 0d | 08 c0 04 0d 08 ca 17 de |ws......|........|
|00001b90| 20 69 6e 64 65 78 28 6e | 75 6d 77 69 6e 64 6f 77 | index(n|umwindow|
|00001ba0| 73 29 0d 08 d4 04 0d 08 | de 09 f2 70 6f 6c 6c 0d |s)......|...poll.|
|00001bb0| 08 e8 04 0d 08 f2 28 e3 | 20 6c 6f 6f 70 3d 6e 75 |......(.| loop=nu|
|00001bc0| 6d 72 65 61 6c 77 69 6e | 64 6f 77 73 2b 31 20 b8 |mrealwin|dows+1 .|
|00001bd0| 20 6e 75 6d 77 69 6e 64 | 6f 77 73 0d 08 fc 0f 20 | numwind|ows.... |
|00001be0| 20 20 6d 61 74 63 68 3d | 2d 31 0d 09 06 21 20 20 | match=|-1...! |
|00001bf0| 20 e3 20 6c 6f 6f 70 32 | 3d 31 20 b8 20 6e 75 6d | . loop2|=1 . num|
|00001c00| 72 65 61 6c 77 69 6e 64 | 6f 77 73 0d 09 10 36 20 |realwind|ows...6 |
|00001c10| 20 20 20 20 20 e7 20 77 | 69 6e 64 6f 77 24 28 6c | . w|indow$(l|
|00001c20| 6f 6f 70 32 29 3d 77 69 | 6e 64 6f 77 24 28 6c 6f |oop2)=wi|ndow$(lo|
|00001c30| 6f 70 29 20 8c 20 6d 61 | 74 63 68 3d 6c 6f 6f 70 |op) . ma|tch=loop|
|00001c40| 32 0d 09 1a 08 20 20 20 | ed 0d 09 24 14 20 20 20 |2.... |...$. |
|00001c50| e7 20 6d 61 74 63 68 3c | 3e 2d 31 20 8c 0d 09 2e |. match<|>-1 ....|
|00001c60| 1f 20 20 20 20 20 20 72 | 65 61 6c 77 69 6e 3d 77 |. r|ealwin=w|
|00001c70| 69 6e 64 6f 77 28 6d 61 | 74 63 68 29 0d 09 38 1f |indow(ma|tch)..8.|
|00001c80| 20 20 20 20 20 20 70 61 | 74 63 68 77 69 6e 3d 77 | pa|tchwin=w|
|00001c90| 69 6e 64 6f 77 28 6c 6f | 6f 70 29 0d 09 42 1a 20 |indow(lo|op)..B. |
|00001ca0| 20 20 20 20 20 21 62 6c | 6f 63 6b 25 3d 70 61 74 | !bl|ock%=pat|
|00001cb0| 63 68 77 69 6e 0d 09 4c | 2d 20 20 20 20 20 20 c8 |chwin..L|- .|
|00001cc0| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00001cd0| 77 49 6e 66 6f 22 2c 2c | 62 6c 6f 63 6b 25 20 84 |wInfo",,|block% .|
|00001ce0| 20 31 0d 09 56 19 20 20 | 20 20 20 20 66 6c 61 67 | 1..V. | flag|
|00001cf0| 73 3d 62 6c 6f 63 6b 25 | 21 33 32 0d 09 60 31 20 |s=block%|!32..`1 |
|00001d00| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 | .. |"Wimp_Se|
|00001d10| 74 45 78 74 65 6e 74 22 | 2c 20 72 65 61 6c 77 69 |tExtent"|, realwi|
|00001d20| 6e 2c 20 62 6c 6f 63 6b | 25 2b 34 34 0d 09 6a 19 |n, block|%+44..j.|
|00001d30| 20 20 20 20 20 20 21 62 | 6c 6f 63 6b 25 3d 72 65 | !b|lock%=re|
|00001d40| 61 6c 77 69 6e 0d 09 74 | 26 20 20 20 20 20 20 c8 |alwin..t|& .|
|00001d50| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00001d60| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 09 7e 27 20 |ow",,blo|ck%..~' |
|00001d70| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c | .. |"Wimp_Cl|
|00001d80| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00001d90| 6b 25 0d 09 88 1a 20 20 | 20 20 20 20 21 62 6c 6f |k%.... | !blo|
|00001da0| 63 6b 25 3d 70 61 74 63 | 68 77 69 6e 0d 09 92 22 |ck%=patc|hwin..."|
|00001db0| 20 20 20 20 20 20 e3 20 | 69 63 6f 6e 3d 30 20 b8 | . |icon=0 .|
|00001dc0| 20 28 62 6c 6f 63 6b 25 | 21 38 38 29 2d 31 0d 09 | (block%|!88)-1..|
|00001dd0| 9c 1a 20 20 20 20 20 20 | 20 20 20 62 6c 6f 63 6b |.. | block|
|00001de0| 25 21 34 3d 69 63 6f 6e | 0d 09 a6 2b 20 20 20 20 |%!4=icon|...+ |
|00001df0| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 | .. |"Wimp_Ge|
|00001e00| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00001e10| 63 6b 25 0d 09 b0 1d 20 | 20 20 20 20 20 20 20 20 |ck%.... | |
|00001e20| 62 6c 6f 63 6b 25 21 34 | 3d 72 65 61 6c 77 69 6e |block%!4|=realwin|
|00001e30| 0d 09 ba 2b 20 20 20 20 | 20 20 20 20 20 c8 99 20 |...+ | .. |
|00001e40| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00001e50| 22 2c 2c 62 6c 6f 63 6b | 25 2b 34 0d 09 c4 0b 20 |",,block|%+4.... |
|00001e60| 20 20 20 20 20 ed 0d 09 | ce 08 20 20 20 cd 0d 09 | ...|.. ...|
|00001e70| d8 05 ed 0d 09 e2 1d 6e | 75 6d 77 69 6e 64 6f 77 |.......n|umwindow|
|00001e80| 73 3d 6e 75 6d 72 65 61 | 6c 77 69 6e 64 6f 77 73 |s=numrea|lwindows|
|00001e90| 0d 09 ec 04 0d 09 f6 15 | c8 99 20 22 48 6f 75 72 |........|.. "Hour|
|00001ea0| 67 6c 61 73 73 5f 4f 6e | 22 0d 0a 00 0d f2 67 6c |glass_On|".....gl|
|00001eb0| 61 73 73 28 30 29 0d 0a | 0a 04 0d 0a 14 12 66 69 |ass(0)..|......fi|
|00001ec0| 6c 65 3d ae 28 77 72 69 | 74 65 24 29 0d 0a 1e 18 |le=.(wri|te$)....|
|00001ed0| f2 77 72 69 74 65 77 6f | 72 64 28 2d 31 2c 20 66 |.writewo|rd(-1, f|
|00001ee0| 69 6c 65 29 0d 0a 28 17 | f2 77 72 69 74 65 77 6f |ile)..(.|.writewo|
|00001ef0| 72 64 28 30 2c 20 66 69 | 6c 65 29 0d 0a 32 17 f2 |rd(0, fi|le)..2..|
|00001f00| 77 72 69 74 65 77 6f 72 | 64 28 30 2c 20 66 69 6c |writewor|d(0, fil|
|00001f10| 65 29 0d 0a 3c 17 f2 77 | 72 69 74 65 77 6f 72 64 |e)..<..w|riteword|
|00001f20| 28 30 2c 20 66 69 6c 65 | 29 0d 0a 46 04 0d 0a 50 |(0, file|)..F...P|
|00001f30| 19 e3 20 6c 6f 6f 70 3d | 31 20 b8 20 6e 75 6d 77 |.. loop=|1 . numw|
|00001f40| 69 6e 64 6f 77 73 0d 0a | 5a 19 20 20 20 69 6e 64 |indows..|Z. ind|
|00001f50| 65 78 28 6c 6f 6f 70 29 | 3d 8f 23 66 69 6c 65 0d |ex(loop)|=.#file.|
|00001f60| 0a 64 1b 20 20 20 f2 77 | 72 69 74 65 77 6f 72 64 |.d. .w|riteword|
|00001f70| 28 2d 31 2c 20 66 69 6c | 65 29 0d 0a 6e 1b 20 20 |(-1, fil|e)..n. |
|00001f80| 20 f2 77 72 69 74 65 77 | 6f 72 64 28 2d 31 2c 20 | .writew|ord(-1, |
|00001f90| 66 69 6c 65 29 0d 0a 78 | 1a 20 20 20 f2 77 72 69 |file)..x|. .wri|
|00001fa0| 74 65 77 6f 72 64 28 31 | 2c 20 66 69 6c 65 29 0d |teword(1|, file).|
|00001fb0| 0a 82 26 20 20 20 f2 77 | 72 69 74 65 6e 61 6d 65 |..& .w|ritename|
|00001fc0| 28 77 69 6e 64 6f 77 24 | 28 6c 6f 6f 70 29 2c 20 |(window$|(loop), |
|00001fd0| 66 69 6c 65 29 0d 0a 8c | 05 ed 0d 0a 96 17 f2 77 |file)...|.......w|
|00001fe0| 72 69 74 65 77 6f 72 64 | 28 30 2c 20 66 69 6c 65 |riteword|(0, file|
|00001ff0| 29 0d 0a a0 04 0d 0a aa | 19 e3 20 6c 6f 6f 70 3d |).......|.. loop=|
|00002000| 31 20 b8 20 6e 75 6d 77 | 69 6e 64 6f 77 73 0d 0a |1 . numw|indows..|
|00002010| b4 2b 20 20 20 67 6c 61 | 73 73 70 74 72 3d 31 30 |.+ gla|ssptr=10|
|00002020| 2b 28 28 6c 6f 6f 70 2d | 31 29 2f 6e 75 6d 77 69 |+((loop-|1)/numwi|
|00002030| 6e 64 6f 77 73 29 2a 38 | 39 0d 0a be 17 20 20 20 |ndows)*8|9.... |
|00002040| f2 67 6c 61 73 73 28 67 | 6c 61 73 73 70 74 72 29 |.glass(g|lassptr)|
|00002050| 0d 0a c8 23 20 20 20 f2 | 6f 70 65 6e 77 69 6e 64 |...# .|openwind|
|00002060| 6f 77 28 77 69 6e 64 6f | 77 28 6c 6f 6f 70 29 2c |ow(windo|w(loop),|
|00002070| 20 a3 29 0d 0a d2 48 20 | 20 20 f2 77 72 69 74 65 | .)...H | .write|
|00002080| 69 63 6f 6e 28 77 69 6e | 5f 6f 6c 64 63 6f 6e 66 |icon(win|_oldconf|
|00002090| 2c 20 32 2c 20 22 50 61 | 74 63 68 69 6e 67 20 77 |, 2, "Pa|tching w|
|000020a0| 69 6e 64 6f 77 20 90 22 | 2b 77 69 6e 64 6f 77 24 |indow ."|+window$|
|000020b0| 28 6c 6f 6f 70 29 2b 22 | 91 22 29 0d 0a dc 0c 20 |(loop)+"|.").... |
|000020c0| 20 20 f2 70 6f 6c 6c 0d | 0a e6 16 20 20 20 73 74 | .poll.|... st|
|000020d0| 61 72 74 70 74 72 3d 8f | 23 66 69 6c 65 0d 0a f0 |artptr=.|#file...|
|000020e0| 19 20 20 20 cf 23 66 69 | 6c 65 3d 69 6e 64 65 78 |. .#fi|le=index|
|000020f0| 28 6c 6f 6f 70 29 0d 0a | fa 21 20 20 20 f2 77 72 |(loop)..|.! .wr|
|00002100| 69 74 65 77 6f 72 64 28 | 73 74 61 72 74 70 74 72 |iteword(|startptr|
|00002110| 2c 20 66 69 6c 65 29 0d | 0b 04 16 20 20 20 cf 23 |, file).|... .#|
|00002120| 66 69 6c 65 3d 73 74 61 | 72 74 70 74 72 0d 0b 0e |file=sta|rtptr...|
|00002130| 1b 20 20 20 21 62 6c 6f | 63 6b 25 3d 77 69 6e 64 |. !blo|ck%=wind|
|00002140| 6f 77 28 6c 6f 6f 70 29 | 0d 0b 18 2a 20 20 20 c8 |ow(loop)|...* .|
|00002150| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00002160| 77 49 6e 66 6f 22 2c 2c | 62 6c 6f 63 6b 25 20 84 |wInfo",,|block% .|
|00002170| 20 31 0d 0b 22 19 20 20 | 20 6e 75 6d 69 63 6f 6e | 1..". | numicon|
|00002180| 73 3d 62 6c 6f 63 6b 25 | 21 38 38 0d 0b 2c 24 20 |s=block%|!88..,$ |
|00002190| 20 20 de 20 77 69 6e 64 | 6f 77 62 75 66 66 65 72 | . wind|owbuffer|
|000021a0| 20 38 38 2b 6e 75 6d 69 | 63 6f 6e 73 2a 33 32 0d | 88+numi|cons*32.|
|000021b0| 0b 36 21 20 20 20 21 77 | 69 6e 64 6f 77 62 75 66 |.6! !w|indowbuf|
|000021c0| 66 65 72 3d 77 69 6e 64 | 6f 77 28 6c 6f 6f 70 29 |fer=wind|ow(loop)|
|000021d0| 0d 0b 40 2c 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..@, .|. "Wimp_|
|000021e0| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|000021f0| 77 69 6e 64 6f 77 62 75 | 66 66 65 72 0d 0b 4a 1a |windowbu|ffer..J.|
|00002200| 20 20 20 e3 20 6f 66 66 | 73 65 74 3d 34 20 b8 20 | . off|set=4 . |
|00002210| 38 38 20 88 20 34 0d 0b | 54 2f 20 20 20 20 20 20 |88 . 4..|T/ |
|00002220| f2 77 72 69 74 65 77 6f | 72 64 28 77 69 6e 64 6f |.writewo|rd(windo|
|00002230| 77 62 75 66 66 65 72 21 | 6f 66 66 73 65 74 2c 20 |wbuffer!|offset, |
|00002240| 66 69 6c 65 29 0d 0b 5e | 08 20 20 20 ed 0d 0b 68 |file)..^|. ...h|
|00002250| 25 20 20 20 f2 67 6c 61 | 73 73 28 67 6c 61 73 73 |% .gla|ss(glass|
|00002260| 70 74 72 2b 31 30 2f 6e | 75 6d 77 69 6e 64 6f 77 |ptr+10/n|umwindow|
|00002270| 73 29 0d 0b 72 15 20 20 | 20 69 63 6f 6e 70 74 72 |s)..r. | iconptr|
|00002280| 3d 8f 23 66 69 6c 65 0d | 0b 7c 1c 20 20 20 e3 20 |=.#file.|.|. . |
|00002290| 69 63 6f 6e 3d 30 20 b8 | 20 6e 75 6d 69 63 6f 6e |icon=0 .| numicon|
|000022a0| 73 2d 31 0d 0b 86 1d 20 | 20 20 20 20 20 e3 20 6f |s-1.... | . o|
|000022b0| 66 66 73 65 74 3d 30 20 | b8 20 32 38 20 88 20 34 |ffset=0 |. 28 . 4|
|000022c0| 0d 0b 90 3f 20 20 20 20 | 20 20 20 20 20 f2 77 72 |...? | .wr|
|000022d0| 69 74 65 77 6f 72 64 28 | 77 69 6e 64 6f 77 62 75 |iteword(|windowbu|
|000022e0| 66 66 65 72 21 28 39 32 | 2b 69 63 6f 6e 2a 33 32 |ffer!(92|+icon*32|
|000022f0| 2b 6f 66 66 73 65 74 29 | 2c 20 66 69 6c 65 29 0d |+offset)|, file).|
|00002300| 0b 9a 0b 20 20 20 20 20 | 20 ed 0d 0b a4 08 20 20 |... | ..... |
|00002310| 20 ed 0d 0b ae 25 20 20 | 20 f2 67 6c 61 73 73 28 | ....% | .glass(|
|00002320| 67 6c 61 73 73 70 74 72 | 2b 32 30 2f 6e 75 6d 77 |glassptr|+20/numw|
|00002330| 69 6e 64 6f 77 73 29 0d | 0b b8 1d 20 20 20 74 66 |indows).|... tf|
|00002340| 6c 61 67 73 3d 77 69 6e | 64 6f 77 62 75 66 66 65 |lags=win|dowbuffe|
|00002350| 72 21 36 30 0d 0b c2 1e | 20 20 20 e7 20 28 74 66 |r!60....| . (tf|
|00002360| 6c 61 67 73 20 80 20 28 | 31 3c 3c 38 29 29 3e 30 |lags . (|1<<8))>0|
|00002370| 20 8c 0d 0b cc 1d 20 20 | 20 20 20 20 74 65 78 74 | ..... | text|
|00002380| 3d 28 74 66 6c 61 67 73 | 20 80 20 31 29 3e 30 0d |=(tflags| . 1)>0.|
|00002390| 0b d6 1f 20 20 20 20 20 | 20 73 70 72 69 74 65 3d |... | sprite=|
|000023a0| 28 74 66 6c 61 67 73 20 | 80 20 32 29 3e 30 0d 0b |(tflags |. 2)>0..|
|000023b0| e0 1b 20 20 20 20 20 20 | e7 20 74 65 78 74 20 84 |.. |. text .|
|000023c0| 20 73 70 72 69 74 65 20 | 8c 0d 0b ea 17 20 20 20 | sprite |..... |
|000023d0| 20 20 20 20 20 20 70 6f | 73 3d a2 23 66 69 6c 65 | po|s=.#file|
|000023e0| 0d 0b f4 1f 20 20 20 20 | 20 20 20 20 20 cf 23 66 |.... | .#f|
|000023f0| 69 6c 65 3d 73 74 61 72 | 74 70 74 72 2b 37 32 0d |ile=star|tptr+72.|
|00002400| 0b fe 2b 20 20 20 20 20 | 20 20 20 20 f2 77 72 69 |..+ | .wri|
|00002410| 74 65 77 6f 72 64 28 70 | 6f 73 2d 73 74 61 72 74 |teword(p|os-start|
|00002420| 70 74 72 2c 20 66 69 6c | 65 29 0d 0c 08 17 20 20 |ptr, fil|e).... |
|00002430| 20 20 20 20 20 20 20 cf | 23 66 69 6c 65 3d 70 6f | .|#file=po|
|00002440| 73 0d 0c 12 2d 20 20 20 | 20 20 20 20 20 20 f2 77 |s...- | .w|
|00002450| 72 69 74 65 69 6e 64 28 | 77 69 6e 64 6f 77 62 75 |riteind(|windowbu|
|00002460| 66 66 65 72 21 37 36 2c | 20 66 69 6c 65 29 0d 0c |ffer!76,| file)..|
|00002470| 1c 15 20 20 20 20 20 20 | 20 20 20 e7 20 74 65 78 |.. | . tex|
|00002480| 74 20 8c 0d 0c 26 1a 20 | 20 20 20 20 20 20 20 20 |t ...&. | |
|00002490| 20 20 20 70 6f 73 3d a2 | 23 66 69 6c 65 0d 0c 30 | pos=.|#file..0|
|000024a0| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 cf 23 66 |" | .#f|
|000024b0| 69 6c 65 3d 73 74 61 72 | 74 70 74 72 2b 37 36 0d |ile=star|tptr+76.|
|000024c0| 0c 3a 2e 20 20 20 20 20 | 20 20 20 20 20 20 20 f2 |.:. | .|
|000024d0| 77 72 69 74 65 77 6f 72 | 64 28 70 6f 73 2d 73 74 |writewor|d(pos-st|
|000024e0| 61 72 74 70 74 72 2c 20 | 66 69 6c 65 29 0d 0c 44 |artptr, |file)..D|
|000024f0| 1a 20 20 20 20 20 20 20 | 20 20 20 20 20 cf 23 66 |. | .#f|
|00002500| 69 6c 65 3d 70 6f 73 0d | 0c 4e 30 20 20 20 20 20 |ile=pos.|.N0 |
|00002510| 20 20 20 20 20 20 20 f2 | 77 72 69 74 65 69 6e 64 | .|writeind|
|00002520| 28 77 69 6e 64 6f 77 62 | 75 66 66 65 72 21 38 30 |(windowb|uffer!80|
|00002530| 2c 20 66 69 6c 65 29 0d | 0c 58 0e 20 20 20 20 20 |, file).|.X. |
|00002540| 20 20 20 20 cc 0d 0c 62 | 22 20 20 20 20 20 20 20 | ...b|" |
|00002550| 20 20 20 20 20 cf 23 66 | 69 6c 65 3d 73 74 61 72 | .#f|ile=star|
|00002560| 74 70 74 72 2b 37 36 0d | 0c 6c 23 20 20 20 20 20 |tptr+76.|.l# |
|00002570| 20 20 20 20 20 20 20 f2 | 77 72 69 74 65 77 6f 72 | .|writewor|
|00002580| 64 28 31 2c 20 66 69 6c | 65 29 0d 0c 76 1d 20 20 |d(1, fil|e)..v. |
|00002590| 20 20 20 20 20 20 20 20 | 20 20 cf 23 66 69 6c 65 | | .#file|
|000025a0| 3d a2 23 66 69 6c 65 0d | 0c 80 0e 20 20 20 20 20 |=.#file.|... |
|000025b0| 20 20 20 20 cd 0d 0c 8a | 0b 20 20 20 20 20 20 cd | ....|. .|
|000025c0| 0d 0c 94 08 20 20 20 cd | 0d 0c 9e 04 0d 0c a8 1c |.... .|........|
|000025d0| 20 20 20 e3 20 69 63 6f | 6e 3d 30 20 b8 20 6e 75 | . ico|n=0 . nu|
|000025e0| 6d 69 63 6f 6e 73 2d 31 | 0d 0c b2 3b 20 20 20 20 |micons-1|...; |
|000025f0| 20 20 f2 67 6c 61 73 73 | 28 67 6c 61 73 73 70 74 | .glass|(glasspt|
|00002600| 72 2b 28 33 30 2b 69 63 | 6f 6e 2f 6e 75 6d 69 63 |r+(30+ic|on/numic|
|00002610| 6f 6e 73 2a 37 30 29 2f | 6e 75 6d 77 69 6e 64 6f |ons*70)/|numwindo|
|00002620| 77 73 29 0d 0c bc 2c 20 | 20 20 20 20 20 69 63 6f |ws)..., | ico|
|00002630| 6e 6f 66 66 73 65 74 3d | 77 69 6e 64 6f 77 62 75 |noffset=|windowbu|
|00002640| 66 66 65 72 2b 39 32 2b | 69 63 6f 6e 2a 33 32 0d |ffer+92+|icon*32.|
|00002650| 0c c6 1d 20 20 20 20 20 | 20 66 6c 61 67 73 3d 69 |... | flags=i|
|00002660| 63 6f 6e 6f 66 66 73 65 | 74 21 31 36 0d 0c d0 20 |conoffse|t!16... |
|00002670| 20 20 20 20 20 20 e7 20 | 28 66 6c 61 67 73 20 80 | . |(flags .|
|00002680| 20 28 31 3c 3c 38 29 29 | 3e 30 20 8c 0d 0c da 1f | (1<<8))|>0 .....|
|00002690| 20 20 20 20 20 20 20 20 | 20 74 65 78 74 3d 28 66 | | text=(f|
|000026a0| 6c 61 67 73 20 80 20 31 | 29 3e 30 0d 0c e4 21 20 |lags . 1|)>0...! |
|000026b0| 20 20 20 20 20 20 20 20 | 73 70 72 69 74 65 3d 28 | |sprite=(|
|000026c0| 66 6c 61 67 73 20 80 20 | 32 29 3e 30 0d 0c ee 1e |flags . |2)>0....|
|000026d0| 20 20 20 20 20 20 20 20 | 20 e7 20 74 65 78 74 20 | | . text |
|000026e0| 84 20 73 70 72 69 74 65 | 20 8c 0d 0c f8 1a 20 20 |. sprite| ..... |
|000026f0| 20 20 20 20 20 20 20 20 | 20 20 70 6f 73 3d a2 23 | | pos=.#|
|00002700| 66 69 6c 65 0d 0d 02 29 | 20 20 20 20 20 20 20 20 |file...)| |
|00002710| 20 20 20 20 cf 23 66 69 | 6c 65 3d 69 63 6f 6e 70 | .#fi|le=iconp|
|00002720| 74 72 2b 69 63 6f 6e 2a | 33 32 2b 32 30 0d 0d 0c |tr+icon*|32+20...|
|00002730| 2e 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 77 72 |. | .wr|
|00002740| 69 74 65 77 6f 72 64 28 | 70 6f 73 2d 73 74 61 72 |iteword(|pos-star|
|00002750| 74 70 74 72 2c 20 66 69 | 6c 65 29 0d 0d 16 1a 20 |tptr, fi|le).... |
|00002760| 20 20 20 20 20 20 20 20 | 20 20 20 cf 23 66 69 6c | | .#fil|
|00002770| 65 3d 70 6f 73 0d 0d 20 | 2e 20 20 20 20 20 20 20 |e=pos.. |. |
|00002780| 20 20 20 20 20 f2 77 72 | 69 74 65 69 6e 64 28 69 | .wr|iteind(i|
|00002790| 63 6f 6e 6f 66 66 73 65 | 74 21 32 30 2c 20 66 69 |conoffse|t!20, fi|
|000027a0| 6c 65 29 0d 0d 2a 18 20 | 20 20 20 20 20 20 20 20 |le)..*. | |
|000027b0| 20 20 20 e7 20 74 65 78 | 74 20 8c 0d 0d 34 1d 20 | . tex|t ...4. |
|000027c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 70 6f | | po|
|000027d0| 73 3d a2 23 66 69 6c 65 | 0d 0d 3e 2c 20 20 20 20 |s=.#file|..>, |
|000027e0| 20 20 20 20 20 20 20 20 | 20 20 20 cf 23 66 69 6c | | .#fil|
|000027f0| 65 3d 69 63 6f 6e 70 74 | 72 2b 69 63 6f 6e 2a 33 |e=iconpt|r+icon*3|
|00002800| 32 2b 32 34 0d 0d 48 31 | 20 20 20 20 20 20 20 20 |2+24..H1| |
|00002810| 20 20 20 20 20 20 20 f2 | 77 72 69 74 65 77 6f 72 | .|writewor|
|00002820| 64 28 70 6f 73 2d 73 74 | 61 72 74 70 74 72 2c 20 |d(pos-st|artptr, |
|00002830| 66 69 6c 65 29 0d 0d 52 | 1d 20 20 20 20 20 20 20 |file)..R|. |
|00002840| 20 20 20 20 20 20 20 20 | cf 23 66 69 6c 65 3d 70 | |.#file=p|
|00002850| 6f 73 0d 0d 5c 31 20 20 | 20 20 20 20 20 20 20 20 |os..\1 | |
|00002860| 20 20 20 20 20 f2 77 72 | 69 74 65 69 6e 64 28 69 | .wr|iteind(i|
|00002870| 63 6f 6e 6f 66 66 73 65 | 74 21 32 34 2c 20 66 69 |conoffse|t!24, fi|
|00002880| 6c 65 29 0d 0d 66 11 20 | 20 20 20 20 20 20 20 20 |le)..f. | |
|00002890| 20 20 20 cc 0d 0d 70 2c | 20 20 20 20 20 20 20 20 | ...p,| |
|000028a0| 20 20 20 20 20 20 20 cf | 23 66 69 6c 65 3d 69 63 | .|#file=ic|
|000028b0| 6f 6e 70 74 72 2b 69 63 | 6f 6e 2a 33 32 2b 32 34 |onptr+ic|on*32+24|
|000028c0| 0d 0d 7a 26 20 20 20 20 | 20 20 20 20 20 20 20 20 |..z& | |
|000028d0| 20 20 20 f2 77 72 69 74 | 65 77 6f 72 64 28 31 2c | .writ|eword(1,|
|000028e0| 20 66 69 6c 65 29 0d 0d | 84 20 20 20 20 20 20 20 | file)..|. |
|000028f0| 20 20 20 20 20 20 20 20 | 20 cf 23 66 69 6c 65 3d | | .#file=|
|00002900| a2 23 66 69 6c 65 0d 0d | 8e 11 20 20 20 20 20 20 |.#file..|.. |
|00002910| 20 20 20 20 20 20 cd 0d | 0d 98 0e 20 20 20 20 20 | ..|... |
|00002920| 20 20 20 20 cd 0d 0d a2 | 0b 20 20 20 20 20 20 cd | ....|. .|
|00002930| 0d 0d ac 08 20 20 20 ed | 0d 0d b6 18 20 20 20 63 |.... .|.... c|
|00002940| 75 72 72 65 6e 74 70 74 | 72 3d 8f 23 66 69 6c 65 |urrentpt|r=.#file|
|00002950| 0d 0d c0 1b 20 20 20 cf | 23 66 69 6c 65 3d 69 6e |.... .|#file=in|
|00002960| 64 65 78 28 6c 6f 6f 70 | 29 2b 34 0d 0d ca 2c 20 |dex(loop|)+4..., |
|00002970| 20 20 f2 77 72 69 74 65 | 77 6f 72 64 28 63 75 72 | .write|word(cur|
|00002980| 72 65 6e 74 70 74 72 2d | 73 74 61 72 74 70 74 72 |rentptr-|startptr|
|00002990| 2c 20 66 69 6c 65 29 0d | 0d d4 18 20 20 20 cf 23 |, file).|... .#|
|000029a0| 66 69 6c 65 3d 63 75 72 | 72 65 6e 74 70 74 72 0d |file=cur|rentptr.|
|000029b0| 0d de 1b 20 20 20 21 62 | 6c 6f 63 6b 25 3d 77 69 |... !b|lock%=wi|
|000029c0| 6e 64 6f 77 28 6c 6f 6f | 70 29 0d 0d e8 24 20 20 |ndow(loo|p)...$ |
|000029d0| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 | .. "Wim|p_CloseW|
|000029e0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 0d |indow",,|block%..|
|000029f0| f2 05 ed 0d 0d fc 0e f2 | 67 6c 61 73 73 28 39 39 |........|glass(99|
|00002a00| 29 0d 0e 06 04 0d 0e 10 | 0a d9 23 66 69 6c 65 0d |).......|..#file.|
|00002a10| 0e 1a 04 0d 0e 24 2d ff | 28 22 57 69 6d 70 54 61 |.....$-.|("WimpTa|
|00002a20| 73 6b 20 53 65 74 54 79 | 70 65 20 22 2b 77 72 69 |sk SetTy|pe "+wri|
|00002a30| 74 65 24 2b 22 20 54 65 | 6d 70 6c 61 74 65 22 29 |te$+" Te|mplate")|
|00002a40| 0d 0e 2e 16 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 |...... "|Hourglas|
|00002a50| 73 5f 4f 66 66 22 0d 0e | 2f 04 0d 0e 42 05 e0 0d |s_Off"..|/...B...|
|00002a60| 0e 4c 04 0d 0e 56 13 dd | a4 72 65 61 64 76 61 72 |.L...V..|.readvar|
|00002a70| 28 76 61 72 24 29 0d 0e | 60 0d ea 20 6e 75 6d 72 |(var$)..|`.. numr|
|00002a80| 65 61 64 0d 0e 6a 3c c8 | 99 20 22 58 4f 53 5f 52 |ead..j<.|. "XOS_R|
|00002a90| 65 61 64 56 61 72 56 61 | 6c 22 2c 20 76 61 72 24 |eadVarVa|l", var$|
|00002aa0| 2c 20 62 6c 6f 63 6b 25 | 2c 20 32 35 35 2c 20 30 |, block%|, 255, 0|
|00002ab0| 2c 20 33 20 b8 20 2c 2c | 6e 75 6d 72 65 61 64 0d |, 3 . ,,|numread.|
|00002ac0| 0e 74 15 62 6c 6f 63 6b | 25 3f 6e 75 6d 72 65 61 |.t.block|%?numrea|
|00002ad0| 64 3d 31 33 0d 0e 7e 0c | 3d 24 62 6c 6f 63 6b 25 |d=13..~.|=$block%|
|00002ae0| 0d 0e 88 04 0d 0e 92 0a | dd f2 70 6f 6c 6c 0d 0e |........|..poll..|
|00002af0| 9c 2a c8 99 20 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |.*.. "Wi|mp_Poll"|
|00002b00| 2c 20 30 2c 20 62 6c 6f | 63 6b 25 20 b8 20 72 65 |, 0, blo|ck% . re|
|00002b10| 61 73 6f 6e 63 6f 64 65 | 0d 0e a6 15 e7 20 72 65 |asoncode|..... re|
|00002b20| 61 73 6f 6e 63 6f 64 65 | 3d 31 37 20 8c 0d 0e b0 |asoncode|=17 ....|
|00002b30| 1e 20 20 20 e7 20 62 6c | 6f 63 6b 25 21 31 36 3d |. . bl|ock%!16=|
|00002b40| 30 20 8c 20 f2 66 69 6e | 69 73 68 0d 0e ba 05 cd |0 . .fin|ish.....|
|00002b50| 0d 0e c4 05 e1 0d 0e ce | 04 0d 0e d8 15 dd f2 63 |........|.......c|
|00002b60| 6c 6f 73 65 28 f8 20 68 | 61 6e 64 6c 65 29 0d 0e |lose(. h|andle)..|
|00002b70| e2 1e e7 20 68 61 6e 64 | 6c 65 3c 3e 30 20 80 20 |... hand|le<>0 . |
|00002b80| 68 61 6e 64 6c 65 3c 3e | 2d 31 20 8c 0d 0e ec 0f |handle<>|-1 .....|
|00002b90| 20 20 20 d9 23 68 61 6e | 64 6c 65 0d 0e f6 10 20 | .#han|dle.... |
|00002ba0| 20 20 68 61 6e 64 6c 65 | 3d 2d 31 0d 0f 00 05 cd | handle|=-1.....|
|00002bb0| 0d 0f 0a 05 e1 0d 0f 14 | 04 0d 0f 1e 0c dd f2 66 |........|.......f|
|00002bc0| 69 6e 69 73 68 0d 0f 28 | 18 f2 63 6c 6f 73 65 28 |inish..(|..close(|
|00002bd0| 63 6f 6e 66 69 67 68 61 | 6e 64 6c 65 29 0d 0f 32 |configha|ndle)..2|
|00002be0| 18 f2 63 6c 6f 73 65 28 | 6f 75 74 70 75 74 68 61 |..close(|outputha|
|00002bf0| 6e 64 6c 65 29 0d 0f 3c | 2e c8 99 20 22 57 69 6d |ndle)..<|... "Wim|
|00002c00| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 2c 20 74 61 |p_CloseD|own", ta|
|00002c10| 73 6b 68 61 6e 64 6c 65 | 2c 20 26 34 42 35 33 34 |skhandle|, &4B534|
|00002c20| 31 35 34 0d 0f 46 05 e1 | 0d 0f 50 04 0d 0f 5a 18 |154..F..|..P...Z.|
|00002c30| dd a4 72 65 61 64 73 74 | 72 69 6e 67 28 6f 66 66 |..readst|ring(off|
|00002c40| 73 65 74 29 0d 0f 64 0d | ea 20 73 74 72 69 6e 67 |set)..d.|. string|
|00002c50| 24 0d 0f 6e 12 c8 95 20 | 3f 6f 66 66 73 65 74 3e |$..n... |?offset>|
|00002c60| 3d 33 32 0d 0f 78 1a 20 | 20 20 73 74 72 69 6e 67 |=32..x. | string|
|00002c70| 24 2b 3d bd 28 3f 6f 66 | 66 73 65 74 29 0d 0f 82 |$+=.(?of|fset)...|
|00002c80| 10 20 20 20 6f 66 66 73 | 65 74 2b 3d 31 0d 0f 8c |. offs|et+=1...|
|00002c90| 05 ce 0d 0f 96 0c 3d 73 | 74 72 69 6e 67 24 0d 0f |......=s|tring$..|
|00002ca0| a0 04 0d 0f aa 1a dd f2 | 77 72 69 74 65 77 6f 72 |........|writewor|
|00002cb0| 64 28 76 61 6c 2c 20 66 | 69 6c 65 29 0d 0f b4 15 |d(val, f|ile)....|
|00002cc0| d5 23 66 69 6c 65 2c 20 | 76 61 6c 20 80 20 26 46 |.#file, |val . &F|
|00002cd0| 46 0d 0f be 1a d5 23 66 | 69 6c 65 2c 20 28 76 61 |F.....#f|ile, (va|
|00002ce0| 6c 3e 3e 38 29 20 80 20 | 26 46 46 0d 0f c8 1b d5 |l>>8) . |&FF.....|
|00002cf0| 23 66 69 6c 65 2c 20 28 | 76 61 6c 3e 3e 31 36 29 |#file, (|val>>16)|
|00002d00| 20 80 20 26 46 46 0d 0f | d2 1b d5 23 66 69 6c 65 | . &FF..|...#file|
|00002d10| 2c 20 28 76 61 6c 3e 3e | 32 34 29 20 80 20 26 46 |, (val>>|24) . &F|
|00002d20| 46 0d 0f dc 05 e1 0d 0f | e6 04 0d 0f f0 14 dd a4 |F.......|........|
|00002d30| 72 65 61 64 77 6f 72 64 | 28 66 69 6c 65 29 0d 0f |readword|(file)..|
|00002d40| fa 31 3d 9a 23 66 69 6c | 65 2b 28 9a 23 66 69 6c |.1=.#fil|e+(.#fil|
|00002d50| 65 3c 3c 38 29 2b 28 9a | 23 66 69 6c 65 3c 3c 31 |e<<8)+(.|#file<<1|
|00002d60| 36 29 2b 28 9a 23 66 69 | 6c 65 3c 3c 32 34 29 0d |6)+(.#fi|le<<24).|
|00002d70| 10 04 04 0d 10 0e 1e dd | f2 77 72 69 74 65 6e 61 |........|.writena|
|00002d80| 6d 65 28 73 74 72 69 6e | 67 24 2c 20 66 69 6c 65 |me(strin|g$, file|
|00002d90| 29 0d 10 18 0a ea 20 6c | 6f 6f 70 0d 10 22 11 e3 |)..... l|oop.."..|
|00002da0| 20 6c 6f 6f 70 3d 31 20 | b8 20 31 32 0d 10 2c 1a | loop=1 |. 12..,.|
|00002db0| 20 20 20 e7 20 6c 6f 6f | 70 3e a9 28 73 74 72 69 | . loo|p>.(stri|
|00002dc0| 6e 67 24 29 20 8c 0d 10 | 36 36 20 20 20 20 20 20 |ng$) ...|66 |
|00002dd0| e7 20 6c 6f 6f 70 3d a9 | 28 73 74 72 69 6e 67 24 |. loop=.|(string$|
|00002de0| 29 2b 31 20 8c 20 d5 23 | 66 69 6c 65 2c 20 31 33 |)+1 . .#|file, 13|
|00002df0| 20 8b 20 d5 23 66 69 6c | 65 2c 20 30 0d 10 40 08 | . .#fil|e, 0..@.|
|00002e00| 20 20 20 cc 0d 10 4a 27 | 20 20 20 20 20 20 d5 23 | ...J'| .#|
|00002e10| 66 69 6c 65 2c 20 97 28 | c1 73 74 72 69 6e 67 24 |file, .(|.string$|
|00002e20| 2c 20 6c 6f 6f 70 2c 20 | 31 29 29 0d 10 54 08 20 |, loop, |1))..T. |
|00002e30| 20 20 cd 0d 10 5e 05 ed | 0d 10 68 05 e1 0d 10 72 | ...^..|..h....r|
|00002e40| 04 0d 10 7c 19 dd f2 77 | 72 69 74 65 69 6e 64 28 |...|...w|riteind(|
|00002e50| 70 6f 73 2c 20 66 69 6c | 65 29 0d 10 86 0f e7 20 |pos, fil|e)..... |
|00002e60| 70 6f 73 3c 3e 2d 31 20 | 8c 0d 10 90 12 20 20 20 |pos<>-1 |..... |
|00002e70| c8 95 20 3f 70 6f 73 3e | 3d 33 32 0d 10 9a 16 20 |.. ?pos>|=32.... |
|00002e80| 20 20 20 20 20 d5 23 66 | 69 6c 65 2c 20 3f 70 6f | .#f|ile, ?po|
|00002e90| 73 0d 10 a4 10 20 20 20 | 20 20 20 70 6f 73 2b 3d |s.... | pos+=|
|00002ea0| 31 0d 10 ae 08 20 20 20 | ce 0d 10 b8 05 cd 0d 10 |1.... |........|
|00002eb0| c2 0e d5 23 66 69 6c 65 | 2c 20 31 33 0d 10 cc 05 |...#file|, 13....|
|00002ec0| e1 0d 10 d6 04 0d 10 e0 | 10 dd f2 67 6c 61 73 73 |........|...glass|
|00002ed0| 28 6e 75 6d 29 0d 10 ea | 22 c8 99 20 22 48 6f 75 |(num)...|".. "Hou|
|00002ee0| 72 67 6c 61 73 73 5f 50 | 65 72 63 65 6e 74 61 67 |rglass_P|ercentag|
|00002ef0| 65 22 2c 20 6e 75 6d 0d | 10 f4 05 e1 0d 10 fe 04 |e", num.|........|
|00002f00| 0d 11 08 28 dd f2 77 72 | 69 74 65 69 63 6f 6e 28 |...(..wr|iteicon(|
|00002f10| 77 69 6e 64 6f 77 25 2c | 20 69 63 6f 6e 25 2c 20 |window%,| icon%, |
|00002f20| 73 74 72 69 6e 67 24 29 | 0d 11 12 13 21 62 6c 6f |string$)|....!blo|
|00002f30| 63 6b 25 3d 77 69 6e 64 | 6f 77 25 0d 11 1c 12 62 |ck%=wind|ow%....b|
|00002f40| 6c 6f 63 6b 25 21 34 3d | 69 63 6f 6e 25 0d 11 26 |lock%!4=|icon%..&|
|00002f50| 22 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |".. "Wim|p_GetIco|
|00002f60| 6e 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |nState",|,block%.|
|00002f70| 11 30 1f e7 20 28 62 6c | 6f 63 6b 25 21 32 34 20 |.0.. (bl|ock%!24 |
|00002f80| 80 20 31 3c 3c 32 33 29 | 3e 31 20 8c 20 e1 0d 11 |. 1<<23)|>1 . ...|
|00002f90| 3a 18 24 28 62 6c 6f 63 | 6b 25 21 32 38 29 3d 73 |:.$(bloc|k%!28)=s|
|00002fa0| 74 72 69 6e 67 24 0d 11 | 44 27 f2 73 65 74 69 63 |tring$..|D'.setic|
|00002fb0| 6f 6e 73 74 61 74 65 28 | 77 69 6e 64 6f 77 25 2c |onstate(|window%,|
|00002fc0| 20 69 63 6f 6e 25 2c 20 | 30 2c 20 30 29 0d 11 4e | icon%, |0, 0)..N|
|00002fd0| 05 e1 0d 11 58 04 0d 11 | 62 1e dd a4 72 65 61 64 |....X...|b...read|
|00002fe0| 69 63 6f 6e 28 77 69 6e | 64 6f 77 25 2c 20 69 63 |icon(win|dow%, ic|
|00002ff0| 6f 6e 25 29 0d 11 6c 13 | 21 62 6c 6f 63 6b 25 3d |on%)..l.|!block%=|
|00003000| 77 69 6e 64 6f 77 25 0d | 11 76 12 62 6c 6f 63 6b |window%.|.v.block|
|00003010| 25 21 34 3d 69 63 6f 6e | 25 0d 11 80 22 c8 99 20 |%!4=icon|%...".. |
|00003020| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00003030| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 0d 11 8a 21 e7 |te",,blo|ck%...!.|
|00003040| 20 28 62 6c 6f 63 6b 25 | 21 32 34 20 80 20 31 3c | (block%|!24 . 1<|
|00003050| 3c 32 33 29 3e 31 20 8c | 20 3d 22 22 0d 11 94 11 |<23)>1 .| =""....|
|00003060| 3d 24 28 62 6c 6f 63 6b | 25 21 32 38 29 0d 11 9e |=$(block|%!28)...|
|00003070| 04 0d 11 a8 27 dd f2 73 | 65 6c 65 63 74 28 77 69 |....'..s|elect(wi|
|00003080| 6e 64 6f 77 25 2c 20 69 | 63 6f 6e 25 2c 20 73 65 |ndow%, i|con%, se|
|00003090| 6c 65 63 74 65 64 25 29 | 0d 11 b2 0f ea 20 6d 61 |lected%)|..... ma|
|000030a0| 73 6b 2c 20 73 65 74 0d | 11 bc 0e 6d 61 73 6b 3d |sk, set.|...mask=|
|000030b0| 31 3c 3c 32 31 0d 11 c6 | 18 73 65 74 3d 94 28 73 |1<<21...|.set=.(s|
|000030c0| 65 6c 65 63 74 65 64 25 | 29 3c 3c 32 31 0d 11 d0 |elected%|)<<21...|
|000030d0| 2c f2 73 65 74 69 63 6f | 6e 73 74 61 74 65 28 77 |,.setico|nstate(w|
|000030e0| 69 6e 64 6f 77 25 2c 20 | 69 63 6f 6e 25 2c 20 6d |indow%, |icon%, m|
|000030f0| 61 73 6b 2c 20 73 65 74 | 29 0d 11 da 05 e1 0d 11 |ask, set|).......|
|00003100| e4 04 0d 11 ee 1e dd a4 | 73 65 6c 65 63 74 65 64 |........|selected|
|00003110| 28 77 69 6e 64 6f 77 25 | 2c 20 69 63 6f 6e 25 29 |(window%|, icon%)|
|00003120| 0d 11 f8 13 21 62 6c 6f | 63 6b 25 3d 77 69 6e 64 |....!blo|ck%=wind|
|00003130| 6f 77 25 0d 12 02 12 62 | 6c 6f 63 6b 25 21 34 3d |ow%....b|lock%!4=|
|00003140| 69 63 6f 6e 25 0d 12 0c | 23 c8 99 20 22 58 57 69 |icon%...|#.. "XWi|
|00003150| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00003160| 2c 2c 62 6c 6f 63 6b 25 | 0d 12 16 1c 3d 28 28 62 |,,block%|....=((b|
|00003170| 6c 6f 63 6b 25 21 32 34 | 20 80 20 31 3c 3c 32 31 |lock%!24| . 1<<21|
|00003180| 29 3e 30 29 0d 12 20 04 | 0d 12 2a 2e dd f2 73 65 |)>0).. .|..*...se|
|00003190| 74 69 63 6f 6e 73 74 61 | 74 65 28 77 69 6e 64 6f |ticonsta|te(windo|
|000031a0| 77 25 2c 20 69 63 6f 6e | 25 2c 20 6d 61 73 6b 2c |w%, icon|%, mask,|
|000031b0| 20 62 69 74 73 29 0d 12 | 34 13 21 62 6c 6f 63 6b | bits)..|4.!block|
|000031c0| 25 3d 77 69 6e 64 6f 77 | 25 0d 12 3e 12 62 6c 6f |%=window|%..>.blo|
|000031d0| 63 6b 25 21 34 3d 69 63 | 6f 6e 25 0d 12 48 11 62 |ck%!4=ic|on%..H.b|
|000031e0| 6c 6f 63 6b 25 21 38 3d | 62 69 74 73 0d 12 52 12 |lock%!8=|bits..R.|
|000031f0| 62 6c 6f 63 6b 25 21 31 | 32 3d 6d 61 73 6b 0d 12 |block%!1|2=mask..|
|00003200| 5c 22 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 49 63 |\".. "Wi|mp_SetIc|
|00003210| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00003220| 0d 12 66 05 e1 0d 12 70 | 04 0d 12 7a 21 dd f2 6f |..f....p|...z!..o|
|00003230| 70 65 6e 77 69 6e 64 6f | 77 28 77 69 6e 64 6f 77 |penwindo|w(window|
|00003240| 25 2c 20 63 65 6e 74 72 | 65 29 0d 12 84 19 ea 20 |%, centr|e)..... |
|00003250| 77 69 6e 77 69 64 74 68 | 2c 20 77 69 6e 68 65 69 |winwidth|, winhei|
|00003260| 67 68 74 0d 12 8e 13 21 | 62 6c 6f 63 6b 25 3d 77 |ght....!|block%=w|
|00003270| 69 6e 64 6f 77 25 0d 12 | 98 24 c8 99 20 22 57 69 |indow%..|.$.. "Wi|
|00003280| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00003290| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 12 99 0e e7 20 |e",,bloc|k%..... |
|000032a0| 63 65 6e 74 72 65 20 8c | 0d 12 a2 22 20 20 20 77 |centre .|..." w|
|000032b0| 69 6e 77 69 64 74 68 3d | 62 6c 6f 63 6b 25 21 31 |inwidth=|block%!1|
|000032c0| 32 2d 62 6c 6f 63 6b 25 | 21 34 0d 12 ac 23 20 20 |2-block%|!4...# |
|000032d0| 20 77 69 6e 68 65 69 67 | 68 74 3d 62 6c 6f 63 6b | winheig|ht=block|
|000032e0| 25 21 31 36 2d 62 6c 6f | 63 6b 25 21 38 0d 12 b6 |%!16-blo|ck%!8...|
|000032f0| 28 20 20 20 62 6c 6f 63 | 6b 25 21 34 3d 28 73 63 |( bloc|k%!4=(sc|
|00003300| 72 65 65 6e 77 69 64 74 | 68 2d 77 69 6e 77 69 64 |reenwidt|h-winwid|
|00003310| 74 68 29 2f 32 0d 12 c0 | 2a 20 20 20 62 6c 6f 63 |th)/2...|* bloc|
|00003320| 6b 25 21 38 3d 28 73 63 | 72 65 65 6e 68 65 69 67 |k%!8=(sc|reenheig|
|00003330| 68 74 2d 77 69 6e 68 65 | 69 67 68 74 29 2f 32 0d |ht-winhe|ight)/2.|
|00003340| 12 ca 22 20 20 20 62 6c | 6f 63 6b 25 21 31 32 3d |.." bl|ock%!12=|
|00003350| 62 6c 6f 63 6b 25 21 34 | 2b 77 69 6e 77 69 64 74 |block%!4|+winwidt|
|00003360| 68 0d 12 d4 23 20 20 20 | 62 6c 6f 63 6b 25 21 31 |h...# |block%!1|
|00003370| 36 3d 62 6c 6f 63 6b 25 | 21 38 2b 77 69 6e 68 65 |6=block%|!8+winhe|
|00003380| 69 67 68 74 0d 12 d5 05 | cd 0d 12 de 10 62 6c 6f |ight....|.....blo|
|00003390| 63 6b 25 21 32 38 3d 2d | 31 0d 12 e8 20 c8 99 20 |ck%!28=-|1... .. |
|000033a0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000033b0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 12 f2 05 e1 0d 12 |",,block|%.......|
|000033c0| fc 04 0d 13 06 1a dd f2 | 63 6c 6f 73 65 77 69 6e |........|closewin|
|000033d0| 64 6f 77 28 77 69 6e 64 | 6f 77 25 29 0d 13 10 13 |dow(wind|ow%)....|
|000033e0| 21 62 6c 6f 63 6b 25 3d | 77 69 6e 64 6f 77 25 0d |!block%=|window%.|
|000033f0| 13 1a 21 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |..!.. "W|imp_Clos|
|00003400| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00003410| 0d 13 24 05 e1 0d ff | |..$.... | |
+--------+-------------------------+-------------------------+--------+--------+
