/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / maths / factors

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 88 02 00 00 e8 02 00 00 |Archive.|........|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 46 61 63 74 6f 72 | 73 00 00 00 ff ff ff ff |.!Factor|s.......|
|00000070| 43 fd ff ff 43 2e f4 e5 | 00 00 00 00 ff ff ff ff |C...C...|........|
|00000080| 64 02 00 80 82 21 42 6f | 6f 74 00 00 ff ff ff ff |d....!Bo|ot......|
|00000090| 6e 00 00 00 43 eb ff ff | cd 38 50 cf 03 00 06 df |n...C...|.8P.....|
|000000a0| 6e 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 00 |n...$...|.!Help..|
|000000b0| ff ff ff ff ff ff ff ff | 43 fd ff ff 78 2f f4 e5 |........|C...x/..|
|000000c0| 00 00 00 00 ff ff ff ff | 68 01 00 80 82 21 42 6f |........|h....!Bo|
|000000d0| 6f 74 00 00 00 00 00 00 | 5d 00 00 00 43 eb ff ff |ot......|]...C...|
|000000e0| 64 a4 54 b9 03 00 65 a1 | 5d 00 00 00 b6 00 00 00 |d.T...e.|].......|
|000000f0| 82 21 52 75 6e 00 00 00 | 00 00 00 00 54 00 00 00 |.!Run...|....T...|
|00000100| 43 eb ff ff e5 64 d9 60 | 03 00 44 15 54 00 00 00 |C....d.`|..D.T...|
|00000110| 37 01 00 00 82 21 52 75 | 6e 49 6d 61 67 65 00 00 |7....!Ru|nImage..|
|00000120| 90 07 00 00 43 f8 ff ff | 52 a4 54 b9 03 00 f0 53 |....C...|R.T....S|
|00000130| 90 07 00 00 af 01 00 00 | 82 21 53 70 72 69 74 65 |........|.!Sprite|
|00000140| 73 00 00 00 8c 01 00 00 | 43 f9 ff ff 87 f8 d8 60 |s.......|C......`|
|00000150| 03 00 d7 66 8c 01 00 00 | 63 09 00 00 82 52 65 61 |...f....|c....Rea|
|00000160| 64 4d 65 00 00 00 00 00 | 74 05 00 00 43 ff ff ff |dMe.....|t...C...|
|00000170| 73 21 02 d0 03 00 11 ca | 74 05 00 00 13 0b 00 00 |s!......|t.......|
|00000180| 82 54 65 6d 70 6c 61 74 | 65 73 00 00 4f 02 00 00 |.Templat|es..O...|
|00000190| 42 ec ff ff a5 3a 81 70 | 03 00 83 32 4f 02 00 00 |B....:.p|...2O...|
|000001a0| ab 10 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 6c 00 00 00 | 82 21 52 75 6e 00 00 00 |....l...|.!Run...|
|000001d0| ff ff ff ff a8 00 00 00 | 43 eb ff ff 25 d5 e8 d0 |........|C...%...|
|000001e0| 03 00 dc b1 a8 00 00 00 | 1e 13 00 00 82 21 52 75 |........|.....!Ru|
|000001f0| 6e 49 6d 61 67 65 00 ff | 46 26 00 00 43 fb ff ff |nImage..|F&..C...|
|00000200| 09 27 e9 d0 03 00 3c 8b | 46 26 00 00 ea 13 00 00 |.'....<.|F&......|
|00000210| 82 21 52 75 6e 49 6d 61 | 67 65 54 00 e2 2c 00 00 |.!RunIma|geT..,..|
|00000220| 43 ff ff ff b3 23 e9 d0 | 03 00 c0 4f e2 2c 00 00 |C....#..|...O.,..|
|00000230| 54 3a 00 00 82 21 53 70 | 72 69 74 65 73 00 ff ff |T:...!Sp|rites...|
|00000240| bc 03 00 00 43 f9 ff ff | a1 d4 00 d0 03 00 3e 07 |....C...|......>.|
|00000250| bc 03 00 00 5a 67 00 00 | 82 49 6e 74 65 72 66 61 |....Zg..|.Interfa|
|00000260| 63 65 00 ff 78 11 00 00 | 43 fa ff ff a6 89 88 bf |ce..x...|C.......|
|00000270| 03 00 89 a1 78 11 00 00 | 3a 6b 00 00 82 54 65 6d |....x...|:k...Tem|
|00000280| 70 6c 61 74 65 73 00 ff | 8f 07 00 00 43 ec ff ff |plates..|....C...|
|00000290| b4 3f fc d0 03 00 6b b7 | 8f 07 00 00 d6 7c 00 00 |.?....k.|.....|..|
|000002a0| 00 00 00 01 18 00 00 00 | ff ff ff ff 03 00 d3 01 |........|........|
|000002b0| 45 fb f3 ff 98 d7 df 6b | 90 ae 00 00 03 00 00 00 |E......k|........|
|000002c0| 57 97 9a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |W.......|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 6c 00 00 00 | 46 69 6c 65 44 61 74 61 |....l...|FileData|
|000002f0| 82 21 42 6f 6f 74 00 00 | ff ff ff ff 6e 00 00 00 |.!Boot..|....n...|
|00000300| 43 eb ff ff cd 38 50 cf | 03 00 06 df 7c 20 42 6f |C....8P.|....| Bo|
|00000310| 6f 74 20 66 69 6c 65 20 | 66 6f 72 20 46 61 63 74 |ot file |for Fact|
|00000320| 6f 72 73 20 56 65 72 73 | 69 6f 6e 20 31 2e 30 30 |ors Vers|ion 1.00|
|00000330| 20 28 31 36 20 41 70 72 | 20 31 39 39 32 29 0a 53 | (16 Apr| 1992).S|
|00000340| 65 74 20 46 61 63 74 6f | 72 73 24 44 69 72 20 3c |et Facto|rs$Dir <|
|00000350| 4f 62 65 79 24 44 69 72 | 3e 0a 49 63 6f 6e 53 70 |Obey$Dir|>.IconSp|
|00000360| 72 69 74 65 73 20 3c 4f | 62 65 79 24 44 69 72 3e |rites <O|bey$Dir>|
|00000370| 2e 21 53 70 72 69 74 65 | 73 0a 46 69 6c 65 44 61 |.!Sprite|s.FileDa|
|00000380| 74 61 82 21 42 6f 6f 74 | 00 00 00 00 00 00 5d 00 |ta.!Boot|......].|
|00000390| 00 00 43 eb ff ff 64 a4 | 54 b9 03 00 65 a1 49 63 |..C...d.|T...e.Ic|
|000003a0| 6f 6e 53 70 72 69 74 65 | 73 20 3c 4f 62 65 79 24 |onSprite|s <Obey$|
|000003b0| 44 69 72 3e 2e 21 53 70 | 72 69 74 65 73 0a 7c 20 |Dir>.!Sp|rites.| |
|000003c0| 54 68 69 73 20 66 69 6c | 65 20 68 61 73 20 62 65 |This fil|e has be|
|000003d0| 65 6e 20 69 6e 6e 6f 63 | 75 6c 61 74 65 64 20 61 |en innoc|ulated a|
|000003e0| 67 61 69 6e 73 74 20 74 | 68 65 20 45 78 74 65 6e |gainst t|he Exten|
|000003f0| 64 20 56 69 72 75 73 0a | 7c 7c ff 46 69 6c 65 44 |d Virus.|||.FileD|
|00000400| 61 74 61 82 21 52 75 6e | 00 00 00 00 00 00 00 54 |ata.!Run|.......T|
|00000410| 00 00 00 43 eb ff ff e5 | 64 d9 60 03 00 44 15 49 |...C....|d.`..D.I|
|00000420| 63 6f 6e 53 70 72 69 74 | 65 73 20 3c 4f 62 65 79 |conSprit|es <Obey|
|00000430| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 0a 57 |$Dir>.!S|prites.W|
|00000440| 69 6d 70 53 6c 6f 74 20 | 2d 6d 69 6e 20 31 36 6b |impSlot |-min 16k|
|00000450| 20 2d 6d 61 78 20 31 36 | 6b 0a 52 75 6e 20 3c 4f | -max 16|k.Run <O|
|00000460| 62 65 79 24 44 69 72 3e | 2e 21 52 75 6e 49 6d 61 |bey$Dir>|.!RunIma|
|00000470| 67 65 0a 46 69 6c 65 44 | 61 74 61 82 21 52 75 6e |ge.FileD|ata.!Run|
|00000480| 49 6d 61 67 65 00 00 90 | 07 00 00 43 f8 ff ff 52 |Image...|...C...R|
|00000490| a4 54 b9 03 00 f0 53 00 | 00 00 ea 74 07 00 00 0c |.T....S.|...t....|
|000004a0| c0 1f e5 0c c0 8f e0 02 | db 8c e2 04 d0 4d e2 b3 |........|.....M..|
|000004b0| 00 00 eb bd 00 00 eb 48 | 01 00 eb 38 04 9f e5 0c |.......H|...8....|
|000004c0| 10 a0 e1 00 00 81 e5 cb | 00 06 ef 9a 00 00 eb 78 |........|.......x|
|000004d0| 00 9f e5 0c 10 a0 e1 c7 | 00 06 ef 14 e0 4f e2 00 |........|.....O..|
|000004e0| 20 8f e2 00 f1 82 e0 0e | f0 a0 e1 0e f0 a0 e1 91 | .......|........|
|000004f0| 00 00 ea 94 00 00 ea 0e | f0 a0 e1 0e f0 a0 e1 93 |........|........|
|00000500| 00 00 ea 0e f0 a0 e1 11 | 00 00 ea 2e 01 00 ea 0e |........|........|
|00000510| f0 a0 e1 0e f0 a0 e1 0e | f0 a0 e1 0e f0 a0 e1 0e |........|........|
|00000520| f0 a0 e1 0e f0 a0 e1 0e | f0 a0 e1 8f 00 00 ea 8e |........|........|
|00000530| 00 00 ea 8d 00 00 ea 6c | 02 9f e5 64 12 9f e5 dd |.......l|...d....|
|00000540| 00 06 ef 11 00 02 ef 00 | 00 00 00 00 00 00 00 b1 |........|........|
|00000550| fc 09 00 00 40 2d e9 18 | 00 91 e5 f4 20 9f e5 02 |....@-..|.... ...|
|00000560| 00 50 e1 18 20 a0 03 20 | 30 a0 03 44 00 00 0a dc |.P.. .. |0..D....|
|00000570| 20 9f e5 02 00 50 e1 18 | 20 a0 03 1f 30 e0 03 3f | ....P..| ...0..?|
|00000580| 00 00 0a d4 20 9f e5 02 | 00 50 e1 14 20 a0 03 20 |.... ...|.P.. .. |
|00000590| 30 a0 03 3a 00 00 0a bc | 20 9f e5 02 00 50 e1 14 |0..:....| ....P..|
|000005a0| 20 a0 03 1f 30 e0 03 35 | 00 00 0a b4 20 9f e5 02 | ...0..5|.... ...|
|000005b0| 00 50 e1 18 20 a0 03 01 | 30 a0 03 3b 00 00 0a 9c |.P.. ...|0..;....|
|000005c0| 20 9f e5 02 00 50 e1 18 | 20 a0 03 02 30 a0 03 36 | ....P..| ...0..6|
|000005d0| 00 00 0a 94 20 9f e5 02 | 00 50 e1 14 20 a0 03 03 |.... ...|.P.. ...|
|000005e0| 30 a0 03 31 00 00 0a 7c | 20 9f e5 02 00 50 e1 14 |0..1...|| ....P..|
|000005f0| 20 a0 03 04 30 a0 03 2c | 00 00 0a 74 20 9f e5 02 | ...0..,|...t ...|
|00000600| 00 50 e1 18 20 a0 03 01 | 30 a0 03 3d 00 00 0a 5c |.P.. ...|0..=...\|
|00000610| 20 9f e5 02 00 50 e1 18 | 20 a0 03 02 30 a0 03 38 | ....P..| ...0..8|
|00000620| 00 00 0a 54 20 9f e5 02 | 00 50 e1 14 20 a0 03 03 |...T ...|.P.. ...|
|00000630| 30 a0 03 33 00 00 0a 3c | 20 9f e5 02 00 50 e1 14 |0..3...<| ....P..|
|00000640| 20 a0 03 04 30 a0 03 2e | 00 00 0a dc 00 06 ef 00 | ...0...|........|
|00000650| 80 bd e8 8e 01 00 00 8f | 01 00 00 8c 01 00 00 8d |........|........|
|00000660| 01 00 00 9e 01 00 00 9f | 01 00 00 9c 01 00 00 9d |........|........|
|00000670| 01 00 00 ae 01 00 00 af | 01 00 00 ac 01 00 00 ad |........|........|
|00000680| 01 00 00 70 02 9f e5 00 | 00 81 e5 cb 00 06 ef 02 |...p....|........|
|00000690| 00 91 e7 03 00 80 e0 02 | 00 81 e7 c5 00 06 ef 0f |........|........|
|000006a0| 00 a0 e3 01 10 a0 e3 06 | 00 02 ef 00 80 bd e8 44 |........|.......D|
|000006b0| 02 9f e5 00 00 81 e5 cb | 00 06 ef 01 00 53 e3 08 |........|.....S..|
|000006c0| 30 91 05 10 40 91 05 03 | 30 44 00 ef ff ff 0a 02 |0...@...|0D......|
|000006d0| 00 53 e3 08 30 91 05 10 | 40 91 05 04 30 43 00 ea |.S..0...|@...0C..|
|000006e0| ff ff 0a 03 00 53 e3 04 | 30 91 05 0c 40 91 05 03 |.....S..|0...@...|
|000006f0| 30 44 00 e5 ff ff 0a 04 | 30 91 e5 0c 40 91 e5 04 |0D......|0...@...|
|00000700| 30 43 e0 e1 ff ff ea 01 | 00 53 e3 20 30 9f 05 db |0C......|.S. 0...|
|00000710| ff ff 0a 02 00 53 e3 18 | 30 9f 05 d8 ff ff 0a 03 |.....S..|0.......|
|00000720| 00 53 e3 08 30 9f 05 d5 | ff ff 0a 04 30 9f e5 d3 |.S..0...|....0...|
|00000730| ff ff ea ff ff 00 00 01 | 00 ff ff 00 40 2d e9 c5 |........|....@-..|
|00000740| 00 06 ef 83 00 00 6a 00 | 80 bd e8 c6 00 06 ef 78 |......j.|.......x|
|00000750| ff ff ea 00 40 2d e9 08 | 20 91 e5 02 20 12 e2 80 |....@-..| ... ...|
|00000760| 00 00 1a 00 00 e0 e3 d2 | 00 06 ef 00 80 bd e8 00 |........|........|
|00000770| 40 2d e9 10 00 9c e5 00 | 00 50 e3 6d ff ff 0a 00 |@-......|.P.m....|
|00000780| 80 bd e8 00 40 2d e9 c8 | 00 a0 e3 14 10 9f e5 08 |....@-..|........|
|00000790| 20 8f e2 c0 00 06 ef 0c | 10 8f e5 00 80 bd e8 52 | .......|.......R|
|000007a0| 65 61 64 20 4d 65 00 54 | 41 53 4b 00 00 00 00 00 |ead Me.T|ASK.....|
|000007b0| 40 2d e9 70 10 8f e2 d9 | 00 06 ef 65 00 00 6a 0c |@-.p....|...e..j.|
|000007c0| 10 a0 e1 90 20 8f e2 4b | 3f 8f e2 00 40 e0 e3 00 |.... ..K|?...@...|
|000007d0| 60 a0 e3 68 50 8f e2 db | 00 06 ef c1 00 06 ef 14 |`..hP...|........|
|000007e0| 01 8f e5 00 40 e0 e3 00 | 60 a0 e3 5c 50 8f e2 db |....@...|`..\P...|
|000007f0| 00 06 ef c1 00 06 ef 00 | 01 8f e5 5f 1f 8f e2 20 |........|..._... |
|00000800| 00 81 e5 03 10 a0 e3 08 | 20 8f e2 3c 00 00 eb da |........| ..<....|
|00000810| 00 06 ef 00 80 bd e8 31 | 2e 30 39 20 28 31 36 20 |.......1|.09 (16 |
|00000820| 4a 61 6e 20 31 39 39 30 | 29 00 00 3c 4f 62 65 79 |Jan 1990|)..<Obey|
|00000830| 24 44 69 72 3e 2e 54 65 | 6d 70 6c 61 74 65 73 00 |$Dir>.Te|mplates.|
|00000840| 00 00 00 4d 61 69 6e 00 | 20 20 20 20 20 20 20 49 |...Main.|       I|
|00000850| 6e 66 6f 00 20 20 20 20 | 20 20 20 00 00 00 00 00 |nfo.    |   .....|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 00 0f 42 2d e9 64 | 90 8c e2 00 00 89 e5 04 |....B-.d|........|
|00000910| 10 89 e5 09 10 a0 e1 ce | 00 06 ef 1c 10 91 e5 01 |........|........|
|00000920| 00 d2 e4 01 00 c1 e4 00 | 00 50 e3 fb ff ff 1a 09 |........|.P......|
|00000930| 10 a0 e1 04 00 91 e4 00 | 00 81 e5 c9 00 06 ef 00 |........|........|
|00000940| 00 50 e3 02 00 00 0a 09 | 10 a0 e1 ca 00 06 ef fa |.P......|........|
|00000950| ff ff ea 0f 82 bd e8 01 | 10 a0 e3 71 2f 4f e2 df |........|...q/O..|
|00000960| 00 06 ef f3 fe ff ea 00 | 20 9c e5 40 20 42 e2 04 |........| ..@ B..|
|00000970| 30 9c e5 04 10 8f e2 d4 | 00 06 ef 00 80 bd e8 52 |0.......|.......R|
|00000980| 65 61 64 20 4d 65 0d 00 | 00 00 00 07 02 07 00 84 |ead Me..|........|
|00000990| 00 00 00 2c 00 00 00 00 | 00 00 00 00 00 00 00 ff |...,....|........|
|000009a0| ff ff ff 21 00 00 07 49 | 6e 66 6f 0d 00 00 00 00 |...!...I|nfo.....|
|000009b0| 00 00 00 80 00 00 00 ff | ff ff ff 21 00 00 07 51 |........|...!...Q|
|000009c0| 75 69 74 0d 00 00 00 00 | 00 00 00 00 40 2d e9 00 |uit.....|....@-..|
|000009d0| 20 9c e5 01 00 52 e3 d6 | fe ff 0a 00 80 bd e8 00 | ....R..|........|
|000009e0| 40 2d e9 05 00 a0 e3 6f | 1f 8f e2 08 00 02 ef 00 |@-.....o|........|
|000009f0| 00 50 e3 71 0f 8f 02 d6 | ff ff 0a 00 b0 a0 e1 02 |.P.q....|........|
|00000a00| ab 8c e2 40 a0 8a e2 0a | 90 a0 e1 02 09 4a e2 04 |...@....|.....J..|
|00000a10| 00 80 e0 00 10 e0 e3 00 | 80 a0 e1 ec 00 06 ef 00 |........|........|
|00000a20| 00 58 e1 6b 0f 8f c2 ca | ff ff ca 00 80 a0 e3 00 |.X.k....|........|
|00000a30| 70 a0 e3 46 00 a0 e3 c3 | 06 04 ef 02 1b 8c e2 4c |p..F....|.......L|
|00000a40| 01 1f e5 00 00 81 e5 00 | 00 a0 e3 04 00 81 e5 ce |........|........|
|00000a50| 00 06 ef 04 00 91 e4 00 | 00 81 e5 01 60 a0 e1 2c |........|....`..,|
|00000a60| 10 81 e2 70 01 1f e5 00 | 00 81 e5 cc 00 06 ef 2c |...p....|.......,|
|00000a70| 00 91 e5 00 00 81 e5 30 | 00 91 e5 04 00 81 e5 34 |.......0|.......4|
|00000a80| 00 91 e5 08 00 81 e5 38 | 00 91 e5 0c 00 81 e5 ff |.......8|........|
|00000a90| 00 a0 e3 11 1e 8f e2 0a | 20 a0 e1 00 30 a0 e3 08 |........| ...0...|
|00000aa0| 00 02 ef 04 b0 8a e0 00 | 50 a0 e3 05 40 a0 e1 01 |........|P...@...|
|00000ab0| 00 da e4 0b 00 5a e1 35 | 00 00 0a ff 00 55 e3 00 |.....Z.5|.....U..|
|00000ac0| 00 a0 c3 01 00 4a c5 20 | 00 50 e3 00 00 a0 b3 01 |.....J. |.P......|
|00000ad0| 00 4a b5 01 50 85 e2 00 | 00 50 e3 f3 ff ff 1a 04 |.J..P...|.P......|
|00000ae0| 00 55 e1 05 40 a0 c1 00 | 00 58 e3 06 00 00 1a 09 |.U..@...|.X......|
|00000af0| 20 a0 e1 18 10 96 e5 01 | 00 d2 e4 01 00 c1 e4 00 | .......|........|
|00000b00| 00 50 e3 fb ff ff 1a 0b | 00 00 ea 06 10 a0 e1 08 |.P......|........|
|00000b10| 00 91 e5 20 00 40 e2 08 | 00 81 e5 10 00 91 e5 20 |... .@..|....... |
|00000b20| 00 40 e2 10 00 81 e5 09 | 00 4a e0 01 00 59 e3 01 |.@......|.J...Y..|
|00000b30| 00 00 0a 18 90 81 e5 c2 | 00 06 ef 01 80 88 e2 0a |........|........|
|00000b40| 90 a0 e1 00 50 a0 e3 00 | 00 57 e3 d7 ff ff 0a 03 |....P...|.W......|
|00000b50| 30 e0 e3 03 a0 0a e0 28 | a0 8a e2 2c 10 86 e2 6c |0......(|...,...l|
|00000b60| 02 1f e5 20 20 a0 e3 98 | 02 03 e0 00 30 63 e2 0c |...  ...|....0c..|
|00000b70| 30 43 e2 04 30 81 e5 10 | 20 a0 e3 94 02 03 e0 04 |0C..0...| .......|
|00000b80| 30 43 e2 08 30 81 e5 d7 | 00 06 ef c1 06 04 ef 00 |0C..0...|........|
|00000b90| 80 bd e8 00 00 da e5 00 | 00 50 e3 00 00 00 0a 01 |........|.P......|
|00000ba0| 70 ca e4 01 70 a0 e3 cc | ff ff ea 3c 4f 62 65 79 |p...p...|...<Obey|
|00000bb0| 24 44 69 72 3e 2e 52 65 | 61 64 6d 65 00 00 00 00 |$Dir>.Re|adme....|
|00000bc0| 00 02 00 43 61 6e 27 74 | 20 66 69 6e 64 20 27 52 |...Can't| find 'R|
|00000bd0| 65 61 64 6d 65 27 00 00 | 00 02 00 4e 6f 74 20 65 |eadme'..|...Not e|
|00000be0| 6e 6f 75 67 68 20 6d 65 | 6d 6f 72 79 20 61 76 61 |nough me|mory ava|
|00000bf0| 69 6c 61 62 6c 65 00 54 | 68 69 73 20 69 73 20 61 |ilable.T|his is a|
|00000c00| 20 4a 6f 72 69 73 20 52 | d6 6c 69 6e 67 20 70 72 | Joris R|.ling pr|
|00000c10| 6f 64 75 63 74 69 6f 6e | 20 a9 20 31 39 39 30 48 |oduction| . 1990H|
|00000c20| 79 70 6f 31 32 31 30 46 | 69 6c 65 44 61 74 61 82 |ypo1210F|ileData.|
|00000c30| 21 53 70 72 69 74 65 73 | 00 00 00 8c 01 00 00 43 |!Sprites|.......C|
|00000c40| f9 ff ff 87 f8 d8 60 03 | 00 d7 66 01 00 00 00 10 |......`.|..f.....|
|00000c50| 00 00 00 90 01 00 00 80 | 01 00 00 21 68 65 6c 70 |........|...!help|
|00000c60| 00 00 00 00 00 00 00 04 | 00 00 00 10 00 00 00 00 |........|........|
|00000c70| 00 00 00 07 00 00 00 2c | 00 00 00 2c 00 00 00 0c |.......,|...,....|
|00000c80| 00 00 00 88 88 88 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000c90| 88 88 88 88 00 80 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000ca0| 88 88 88 88 88 88 88 88 | 00 80 88 88 88 88 88 88 |........|........|
|00000cb0| 88 88 88 88 00 00 80 88 | 88 88 88 88 00 80 88 88 |........|........|
|00000cc0| 88 88 88 88 88 88 88 08 | 00 00 00 88 88 88 88 88 |........|........|
|00000cd0| 00 80 88 88 88 88 88 88 | 88 88 88 88 00 00 80 88 |........|........|
|00000ce0| 88 88 88 88 00 80 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000cf0| 88 88 88 88 88 88 88 88 | 00 80 88 88 88 88 88 88 |........|........|
|00000d00| 88 88 00 00 00 88 88 88 | 88 88 88 88 00 80 88 88 |........|........|
|00000d10| 88 88 88 88 08 00 00 00 | 80 88 88 88 88 88 88 88 |........|........|
|00000d20| 00 80 88 88 88 88 88 00 | 00 00 00 00 88 88 88 88 |........|........|
|00000d30| 88 88 88 88 00 80 88 88 | 88 88 88 88 08 00 00 80 |........|........|
|00000d40| 88 88 88 88 88 88 88 88 | 00 80 88 88 88 88 88 88 |........|........|
|00000d50| 00 00 00 88 88 88 88 88 | 88 88 88 88 00 80 88 88 |........|........|
|00000d60| 88 88 88 08 00 00 80 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000d70| 00 80 88 88 88 88 88 08 | 00 00 00 88 00 00 80 88 |........|........|
|00000d80| 88 88 88 88 00 80 88 88 | 88 88 88 08 00 00 00 00 |........|........|
|00000d90| 00 00 88 88 88 88 88 88 | 00 80 88 88 88 88 88 88 |........|........|
|00000da0| 08 00 00 00 00 88 88 88 | 88 88 88 88 00 80 88 88 |........|........|
|00000db0| 88 88 88 88 88 88 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000dc0| 00 80 88 88 88 88 88 88 | 88 88 88 88 88 88 88 88 |........|........|
|00000dd0| 88 88 88 88 40 44 44 46 | 69 6c 65 44 61 74 61 82 |....@DDF|ileData.|
|00000de0| 52 65 61 64 4d 65 00 00 | 00 00 00 74 05 00 00 43 |ReadMe..|...t...C|
|00000df0| ff ff ff 73 21 02 d0 03 | 00 11 ca 46 61 63 74 6f |...s!...|...Facto|
|00000e00| 72 73 20 76 65 72 73 69 | 6f 6e 20 31 2e 30 30 20 |rs versi|on 1.00 |
|00000e10| 2d 20 31 36 74 68 20 41 | 70 72 69 6c 20 31 39 39 |- 16th A|pril 199|
|00000e20| 32 0a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |2.------|--------|
|00000e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e40| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 0a 62 79 20 3a 20 53 |--------|..by : S|
|00000e50| 74 75 61 72 74 20 46 6f | 72 64 0a 0a 54 68 69 73 |tuart Fo|rd..This|
|00000e60| 20 69 73 20 61 20 73 69 | 6d 70 6c 65 20 70 72 6f | is a si|mple pro|
|00000e70| 67 72 61 6d 20 67 69 76 | 65 6e 20 61 20 57 49 4d |gram giv|en a WIM|
|00000e80| 50 20 66 72 6f 6e 74 20 | 65 6e 64 2e 20 42 61 73 |P front |end. Bas|
|00000e90| 69 63 61 6c 6c 79 2c 20 | 69 74 20 69 73 20 74 6f |ically, |it is to|
|00000ea0| 20 68 65 6c 70 0a 73 74 | 75 64 65 6e 74 73 20 6f | help.st|udents o|
|00000eb0| 66 20 47 43 53 45 20 6d | 61 74 68 73 20 6c 69 6b |f GCSE m|aths lik|
|00000ec0| 65 20 6d 65 20 74 6f 20 | 66 69 6e 64 20 6f 75 74 |e me to |find out|
|00000ed0| 20 61 6c 6c 20 74 68 65 | 20 66 61 63 74 6f 72 73 | all the| factors|
|00000ee0| 20 6f 66 20 61 20 6e 75 | 6d 62 65 72 2e 0a 0a 4c | of a nu|mber...L|
|00000ef0| 6f 61 64 69 6e 67 20 69 | 6e 76 6f 6c 76 65 73 20 |oading i|nvolves |
|00000f00| 74 68 65 20 75 73 75 61 | 6c 20 64 6f 75 62 6c 65 |the usua|l double|
|00000f10| 20 63 6c 69 63 6b 20 6f | 6e 20 74 68 65 20 46 61 | click o|n the Fa|
|00000f20| 63 74 6f 72 73 20 69 63 | 6f 6e 2e 20 50 75 74 20 |ctors ic|on. Put |
|00000f30| 74 68 65 20 6e 75 6d 62 | 65 72 0a 74 68 61 74 20 |the numb|er.that |
|00000f40| 79 6f 75 20 77 61 6e 74 | 20 74 6f 20 65 78 74 72 |you want| to extr|
|00000f50| 61 63 74 20 66 61 63 74 | 6f 72 73 20 66 72 6f 6d |act fact|ors from|
|00000f60| 20 69 6e 20 74 68 65 20 | 74 6f 70 20 72 69 67 68 | in the |top righ|
|00000f70| 74 20 62 6f 78 20 61 6e | 64 20 63 6c 69 63 6b 20 |t box an|d click |
|00000f80| 6f 6e 0a 27 45 78 74 72 | 61 63 74 20 66 61 63 74 |on.'Extr|act fact|
|00000f90| 6f 72 73 27 20 74 6f 20 | 62 65 67 69 6e 2e 20 54 |ors' to |begin. T|
|00000fa0| 68 65 20 62 69 67 67 65 | 72 20 79 6f 75 72 20 6e |he bigge|r your n|
|00000fb0| 75 6d 62 65 72 2c 20 74 | 68 65 20 6c 6f 6e 67 65 |umber, t|he longe|
|00000fc0| 72 20 74 68 65 20 63 6f | 6d 70 75 74 65 72 0a 77 |r the co|mputer.w|
|00000fd0| 69 6c 6c 20 74 61 6b 65 | 20 74 6f 20 67 65 74 20 |ill take| to get |
|00000fe0| 74 68 65 20 66 61 63 74 | 6f 72 73 2e 20 49 74 20 |the fact|ors. It |
|00000ff0| 77 69 6c 6c 20 74 65 6c | 6c 20 79 6f 75 20 77 68 |will tel|l you wh|
|00001000| 65 6e 20 69 74 20 68 61 | 73 20 66 69 6e 69 73 68 |en it ha|s finish|
|00001010| 65 64 20 69 6e 20 74 68 | 65 0a 4d 65 73 73 61 67 |ed in th|e.Messag|
|00001020| 65 73 20 62 6f 78 2e 0a | 0a 59 6f 75 20 6d 75 73 |es box..|.You mus|
|00001030| 74 20 6e 6f 77 20 73 61 | 76 65 20 74 68 65 20 6f |t now sa|ve the o|
|00001040| 75 74 70 75 74 20 66 69 | 6c 65 2e 20 54 68 69 73 |utput fi|le. This|
|00001050| 20 63 6f 6e 74 61 69 6e | 73 20 79 6f 75 72 20 66 | contain|s your f|
|00001060| 61 63 74 6f 72 20 61 6e | 73 77 65 72 73 2e 20 54 |actor an|swers. T|
|00001070| 68 65 0a 66 69 6c 65 20 | 68 65 61 64 73 20 69 74 |he.file |heads it|
|00001080| 73 65 6c 66 20 77 69 74 | 68 20 74 68 65 20 6e 61 |self wit|h the na|
|00001090| 6d 65 20 6f 66 20 74 68 | 65 20 70 72 6f 67 72 61 |me of th|e progra|
|000010a0| 6d 2c 20 74 68 65 20 74 | 69 6d 65 20 61 6e 64 20 |m, the t|ime and |
|000010b0| 64 61 74 65 20 74 68 61 | 74 20 69 74 0a 77 61 73 |date tha|t it.was|
|000010c0| 20 67 65 6e 65 72 61 74 | 65 64 2c 20 79 6f 75 72 | generat|ed, your|
|000010d0| 20 62 61 73 65 20 6e 75 | 6d 62 65 72 20 61 6e 64 | base nu|mber and|
|000010e0| 20 6f 66 20 63 6f 75 72 | 73 65 20 61 6c 6c 20 69 | of cour|se all i|
|000010f0| 74 27 73 20 66 61 63 74 | 6f 72 73 2e 20 54 6f 20 |t's fact|ors. To |
|00001100| 73 61 76 65 20 69 74 2c | 0a 66 69 72 73 74 20 63 |save it,|.first c|
|00001110| 6c 69 63 6b 20 6f 6e 20 | 74 68 65 20 27 53 61 76 |lick on |the 'Sav|
|00001120| 65 20 72 65 73 75 6c 74 | 73 27 20 69 63 6f 6e 2e |e result|s' icon.|
|00001130| 20 54 68 69 73 20 77 69 | 6c 6c 20 6f 70 65 6e 20 | This wi|ll open |
|00001140| 74 68 65 20 66 61 6d 69 | 6c 69 61 72 20 52 49 53 |the fami|liar RIS|
|00001150| 43 20 4f 53 0a 73 61 76 | 65 20 62 6f 78 2e 20 53 |C OS.sav|e box. S|
|00001160| 61 76 65 20 69 6e 20 74 | 68 65 20 75 73 75 61 6c |ave in t|he usual|
|00001170| 20 77 61 79 2c 20 64 72 | 61 67 20 74 68 65 20 69 | way, dr|ag the i|
|00001180| 63 6f 6e 20 6f 72 20 65 | 6e 74 65 72 20 61 20 66 |con or e|nter a f|
|00001190| 69 6c 65 6e 61 6d 65 20 | 61 6e 64 20 63 6c 69 63 |ilename |and clic|
|000011a0| 6b 0a 6f 6e 20 4f 4b 2e | 20 50 6c 65 61 73 65 20 |k.on OK.| Please |
|000011b0| 6f 6e 6c 79 20 64 72 61 | 67 20 74 68 65 20 69 63 |only dra|g the ic|
|000011c0| 6f 6e 20 74 6f 20 61 20 | 64 69 72 65 63 74 6f 72 |on to a |director|
|000011d0| 79 20 76 69 65 77 65 72 | 2e 20 44 72 61 67 67 69 |y viewer|. Draggi|
|000011e0| 6e 67 20 69 74 20 74 6f | 0a 61 6e 6f 74 68 65 72 |ng it to|.another|
|000011f0| 20 74 61 73 6b 20 77 69 | 6c 6c 20 63 61 75 73 65 | task wi|ll cause|
|00001200| 20 75 6e 74 6f 6c 64 20 | 65 72 72 6f 72 73 20 66 | untold |errors f|
|00001210| 72 6f 6d 20 62 6f 74 68 | 20 46 61 63 74 6f 72 73 |rom both| Factors|
|00001220| 20 61 6e 64 20 74 68 65 | 20 64 65 73 74 69 6e 61 | and the| destina|
|00001230| 74 69 6f 6e 0a 74 61 73 | 6b 2e 0a 0a 43 72 65 64 |tion.tas|k...Cred|
|00001240| 69 74 73 0a 2d 2d 2d 2d | 2d 2d 2d 0a 0a 53 74 75 |its.----|---..Stu|
|00001250| 61 72 74 20 46 6f 72 64 | 20 2d 20 74 68 61 74 27 |art Ford| - that'|
|00001260| 73 20 6d 65 2e 0a 4c 6f | 72 69 6e 67 20 2d 20 66 |s me..Lo|ring - f|
|00001270| 6f 72 20 74 68 65 20 48 | 65 6c 70 20 75 74 69 6c |or the H|elp util|
|00001280| 69 74 79 0a 53 69 6d 6f | 6e 20 48 75 6e 74 69 6e |ity.Simo|n Huntin|
|00001290| 67 74 6f 6e 20 2d 20 66 | 6f 72 20 68 69 73 20 49 |gton - f|or his I|
|000012a0| 6e 74 65 72 66 61 63 65 | 20 4d 61 6e 61 67 65 72 |nterface| Manager|
|000012b0| 0a 50 61 75 6c 20 48 6f | 62 62 73 20 2d 20 66 6f |.Paul Ho|bbs - fo|
|000012c0| 72 20 68 69 73 20 21 53 | 68 65 6c 6c 20 63 6f 72 |r his !S|hell cor|
|000012d0| 65 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 0a 0a 49 |e applic|ation..I|
|000012e0| 66 20 79 6f 75 20 77 61 | 6e 74 20 74 6f 20 73 65 |f you wa|nt to se|
|000012f0| 6e 64 20 6d 65 20 73 6f | 6d 65 20 6d 6f 6e 65 79 |nd me so|me money|
|00001300| 20 6f 72 20 73 6f 6d 65 | 74 68 69 6e 67 2c 20 6d | or some|thing, m|
|00001310| 79 20 61 64 64 72 65 73 | 73 20 69 73 20 2e 2e 2e |y addres|s is ...|
|00001320| 0a 0a 31 39 20 4c 61 6e | 67 73 68 6f 74 74 20 43 |..19 Lan|gshott C|
|00001330| 6c 6f 73 65 0a 57 6f 6f | 64 68 61 6d 0a 57 65 79 |lose.Woo|dham.Wey|
|00001340| 62 72 69 64 67 65 0a 53 | 75 72 72 65 79 0a 4b 54 |bridge.S|urrey.KT|
|00001350| 31 35 20 33 53 45 0a 0a | 55 73 65 20 69 6e 20 67 |15 3SE..|Use in g|
|00001360| 6f 6f 64 20 68 65 61 6c | 74 68 20 21 21 21 0a 46 |ood heal|th !!!.F|
|00001370| 69 6c 65 44 61 74 61 82 | 54 65 6d 70 6c 61 74 65 |ileData.|Template|
|00001380| 73 00 00 4f 02 00 00 42 | ec ff ff a5 3a 81 70 03 |s..O...B|....:.p.|
|00001390| 00 83 32 ff ff ff ff 00 | 00 00 00 00 00 00 00 00 |..2.....|........|
|000013a0| 00 00 00 44 00 00 00 8c | 01 00 00 01 00 00 00 49 |...D....|.......I|
|000013b0| 6e 66 6f 0d ff ff ff 0b | 00 00 00 d0 01 00 00 7f |nfo.....|........|
|000013c0| 00 00 00 01 00 00 00 4d | 61 69 6e 0d 01 00 c7 b1 |.......M|ain.....|
|000013d0| da 00 00 00 00 00 00 44 | 01 00 00 74 01 00 00 4a |.......D|...t...J|
|000013e0| 03 00 00 44 02 00 00 00 | 00 00 00 00 00 00 00 48 |...D....|.......H|
|000013f0| 07 00 00 12 00 07 84 07 | 02 07 01 0c 0e 0c 00 00 |........|........|
|00001400| 00 00 00 30 ff ff ff 06 | 02 00 00 00 00 00 00 3d |...0....|.......=|
|00001410| 01 00 00 00 00 00 00 01 | 00 00 00 00 00 00 00 58 |........|.......X|
|00001420| 01 00 00 ff ff ff ff 13 | 00 00 00 08 00 00 00 9a |........|........|
|00001430| 00 00 00 cc ff ff ff 02 | 02 00 00 fc ff ff ff 3d |........|.......=|
|00001440| 00 00 07 52 65 61 64 20 | 4d 65 0d 68 0d 0d 00 9a |...Read |Me.h....|
|00001450| 00 00 00 98 ff ff ff 02 | 02 00 00 c8 ff ff ff 3d |........|.......=|
|00001460| 01 00 07 6b 01 00 00 ff | ff ff ff 12 00 00 00 9a |...k....|........|
|00001470| 00 00 00 68 ff ff ff 02 | 02 00 00 94 ff ff ff 3d |...h....|.......=|
|00001480| 01 00 07 7c 01 00 00 ff | ff ff ff 0f 00 00 00 9a |...|....|........|
|00001490| 00 00 00 34 ff ff ff 02 | 02 00 00 64 ff ff ff 3d |...4....|...d...=|
|000014a0| 01 00 07 8b 01 00 00 ff | ff ff ff 15 00 00 00 3e |........|.......>|
|000014b0| 00 00 00 d0 ff ff ff 9a | 00 00 00 f8 ff ff ff 19 |........|........|
|000014c0| 00 00 17 4e 61 6d 65 3a | 0d 6c 65 64 3e 0d fe 0e |...Name:|.led>...|
|000014d0| 00 00 00 9c ff ff ff 9a | 00 00 00 c4 ff ff ff 19 |........|........|
|000014e0| 00 00 17 50 75 72 70 6f | 73 65 3a 0d 3e 0d fe 0e |...Purpo|se:.>...|
|000014f0| 00 00 00 68 ff ff ff 9a | 00 00 00 90 ff ff ff 19 |...h....|........|
|00001500| 00 00 17 41 75 74 68 6f | 72 73 3a 0d 3e 0d fe 0e |...Autho|rs:.>...|
|00001510| 00 00 00 38 ff ff ff 9a | 00 00 00 60 ff ff ff 19 |...8....|...`....|
|00001520| 00 00 17 56 65 72 73 69 | 6f 6e 3a 0d 3e 0d fe 41 |...Versi|on:.>..A|
|00001530| 62 6f 75 74 20 74 68 69 | 73 20 70 72 6f 67 72 61 |bout thi|s progra|
|00001540| 6d 0d 41 70 70 6c 69 63 | 61 74 69 6f 6e 20 69 6e |m.Applic|ation in|
|00001550| 66 6f 0d a9 20 4c 6f 72 | 69 6e 67 2c 20 31 39 39 |fo.. Lor|ing, 199|
|00001560| 30 0d 0d 02 00 00 00 00 | 01 00 00 d6 04 00 00 24 |0.......|.......$|
|00001570| 03 00 00 00 00 00 00 00 | 00 00 00 28 07 00 00 12 |........|...(....|
|00001580| 10 01 ff 07 02 07 00 03 | 01 02 00 00 00 00 00 e4 |........|........|
|00001590| ef ff ff 40 1f 00 00 00 | 00 00 00 3d 00 00 00 00 |...@....|...=....|
|000015a0| 30 00 00 01 00 00 00 00 | 00 00 00 52 65 61 64 20 |0.......|...Read |
|000015b0| 4d 65 0d 64 3e 0d 65 01 | 00 00 00 fe ff ff ff d8 |Me.d>.e.|........|
|000015c0| ff ff ff c8 17 00 00 f8 | ff ff ff 31 61 00 05 78 |........|...1a..x|
|000015d0| 00 00 00 79 00 00 00 ff | 00 00 00 0d 61 7e 20 2d |...y....|....a~ -|
|000015e0| ff 0d 46 69 6c 65 44 61 | 74 61 82 21 52 75 6e 00 |..FileDa|ta.!Run.|
|000015f0| 00 00 ff ff ff ff a8 00 | 00 00 43 eb ff ff 25 d5 |........|..C...%.|
|00001600| e8 d0 03 00 dc b1 7c 20 | 52 75 6e 20 66 69 6c 65 |......| |Run file|
|00001610| 20 66 6f 72 20 46 61 63 | 74 6f 72 73 20 56 65 72 | for Fac|tors Ver|
|00001620| 73 69 6f 6e 20 31 2e 30 | 30 20 28 31 36 20 41 70 |sion 1.0|0 (16 Ap|
|00001630| 72 20 31 39 39 32 29 0a | 57 69 6d 70 53 6c 6f 74 |r 1992).|WimpSlot|
|00001640| 20 2d 6d 69 6e 20 33 32 | 4b 20 2d 6d 61 78 20 36 | -min 32|K -max 6|
|00001650| 34 4b 0a 49 63 6f 6e 53 | 70 72 69 74 65 73 20 3c |4K.IconS|prites <|
|00001660| 4f 62 65 79 24 44 69 72 | 3e 2e 21 53 70 72 69 74 |Obey$Dir|>.!Sprit|
|00001670| 65 73 0a 53 65 74 20 46 | 61 63 74 6f 72 73 24 44 |es.Set F|actors$D|
|00001680| 69 72 20 3c 4f 62 65 79 | 24 44 69 72 3e 0a 52 75 |ir <Obey|$Dir>.Ru|
|00001690| 6e 20 3c 46 61 63 74 6f | 72 73 24 44 69 72 3e 2e |n <Facto|rs$Dir>.|
|000016a0| 21 52 75 6e 49 6d 61 67 | 65 20 25 2a 30 0a 46 69 |!RunImag|e %*0.Fi|
|000016b0| 6c 65 44 61 74 61 82 21 | 52 75 6e 49 6d 61 67 65 |leData.!|RunImage|
|000016c0| 00 ff 46 26 00 00 43 fb | ff ff 09 27 e9 d0 03 00 |..F&..C.|...'....|
|000016d0| 3c 8b 0d 00 0a 1f f4 20 | 3e 20 3c 46 61 63 74 6f |<...... |> <Facto|
|000016e0| 72 73 24 44 69 72 3e 2e | 21 52 75 6e 49 6d 61 67 |rs$Dir>.|!RunImag|
|000016f0| 65 0d 00 14 04 0d 00 1e | 0d de 20 71 25 20 32 35 |e.......|.. q% 25|
|00001700| 30 30 0d 00 28 0e 24 71 | 25 3d 22 54 41 53 4b 22 |00..(.$q|%="TASK"|
|00001710| 0d 00 32 33 c8 99 20 22 | 57 69 6d 70 5f 49 6e 69 |..23.. "|Wimp_Ini|
|00001720| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 21 71 25 |tialise"|,200,!q%|
|00001730| 2c 22 46 61 63 74 6f 72 | 73 22 20 b8 20 2c 74 61 |,"Factor|s" . ,ta|
|00001740| 73 6b 25 0d 00 3c 22 c8 | 99 20 22 57 69 6d 70 5f |sk%..<".|. "Wimp_|
|00001750| 43 6c 61 69 6d 49 6e 74 | 65 72 66 61 63 65 22 2c |ClaimInt|erface",|
|00001760| 74 61 73 6b 25 0d 00 46 | 15 c8 99 20 22 48 6f 75 |task%..F|... "Hou|
|00001770| 72 67 6c 61 73 73 5f 4f | 6e 22 0d 00 50 05 3a 0d |rglass_O|n"..P.:.|
|00001780| 00 5a 32 53 25 3d 8e 20 | 22 3c 46 61 63 74 6f 72 |.Z2S%=. |"<Factor|
|00001790| 73 24 44 69 72 3e 2e 21 | 53 70 72 69 74 65 73 22 |s$Dir>.!|Sprites"|
|000017a0| 3a 54 25 3d a2 23 53 25 | 2b 31 36 3a d9 20 23 53 |:T%=.#S%|+16:. #S|
|000017b0| 25 0d 00 64 19 de 20 73 | 70 20 54 25 3a 21 73 70 |%..d.. s|p T%:!sp|
|000017c0| 3d 54 25 3a 73 70 21 34 | 3d 30 0d 00 6e 14 73 70 |=T%:sp!4|=0..n.sp|
|000017d0| 21 38 3d 31 36 3a 73 70 | 21 31 32 3d 31 36 0d 00 |!8=16:sp|!12=16..|
|000017e0| 78 1c c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |x... "OS|_SpriteO|
|000017f0| 70 22 2c 26 32 30 39 2c | 73 70 0d 00 82 35 c8 99 |p",&209,|sp...5..|
|00001800| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 26 | "OS_Spr|iteOp",&|
|00001810| 32 30 41 2c 73 70 2c 22 | 3c 46 61 63 74 6f 72 73 |20A,sp,"|<Factors|
|00001820| 24 44 69 72 3e 2e 21 53 | 70 72 69 74 65 73 22 0d |$Dir>.!S|prites".|
|00001830| 00 8c 39 73 69 63 6f 6e | 3d a4 69 63 6f 6e 5f 63 |..9sicon|=.icon_c|
|00001840| 72 65 61 74 65 28 2d 31 | 2c 30 2c 30 2c 36 38 2c |reate(-1|,0,0,68,|
|00001850| 36 38 2c 30 2c 30 2c 26 | 33 30 30 32 2c 22 21 46 |68,0,0,&|3002,"!F|
|00001860| 61 63 74 6f 72 73 22 29 | 0d 00 96 05 3a 0d 00 a0 |actors")|....:...|
|00001870| 25 de 20 74 65 78 74 24 | 28 35 30 29 2c 73 65 74 |%. text$|(50),set|
|00001880| 74 69 6e 67 28 35 30 29 | 2c 66 6c 61 67 73 28 35 |ting(50)|,flags(5|
|00001890| 30 29 0d 00 aa 25 de 20 | 73 75 62 6d 65 6e 75 28 |0)...%. |submenu(|
|000018a0| 35 30 29 2c 72 65 66 28 | 35 30 29 2c 6d 65 6e 75 |50),ref(|50),menu|
|000018b0| 70 6f 73 28 32 30 29 0d | 00 b4 0f de 20 6d 65 6e |pos(20).|.... men|
|000018c0| 75 25 20 35 31 32 0d 00 | be 15 de 20 69 6e 64 69 |u% 512..|... indi|
|000018d0| 72 65 63 74 25 20 26 32 | 30 30 30 0d 00 c8 11 de |rect% &2|000.....|
|000018e0| 20 6d 73 67 62 6c 6b 25 | 20 32 35 36 0d 00 d2 12 | msgblk%| 256....|
|000018f0| 73 65 6e 64 74 6f 66 69 | 6c 65 24 3d 22 22 0d 00 |sendtofi|le$=""..|
|00001900| dc 15 6d 79 5f 66 69 6c | 65 74 79 70 65 25 3d 26 |..my_fil|etype%=&|
|00001910| 46 46 46 0d 00 e6 0f 6e | 75 6d 62 65 72 74 24 3d |FFF....n|umbert$=|
|00001920| 22 22 0d 00 f0 25 69 70 | 74 72 25 3d 69 6e 64 69 |""...%ip|tr%=indi|
|00001930| 72 65 63 74 25 3a 69 65 | 6e 64 25 3d 69 70 74 72 |rect%:ie|nd%=iptr|
|00001940| 25 2b 26 32 30 30 30 0d | 00 fa 20 ee 20 85 20 ff |%+&2000.|.. . . .|
|00001950| 20 22 45 72 72 6f 72 20 | 22 2b f6 24 2b 22 20 3a | "Error |"+.$+" :|
|00001960| 20 22 2b c3 28 9e 29 0d | 01 04 05 3a 0d 01 0e 30 | "+.(.).|...:...0|
|00001970| f2 6f 70 65 6e 74 65 6d | 70 6c 61 74 65 66 69 6c |.opentem|platefil|
|00001980| 65 28 22 3c 46 61 63 74 | 6f 72 73 24 44 69 72 3e |e("<Fact|ors$Dir>|
|00001990| 2e 54 65 6d 70 6c 61 74 | 65 73 22 29 0d 01 18 19 |.Templat|es")....|
|000019a0| f2 6c 6f 61 64 74 65 6d | 70 6c 61 74 65 28 22 6d |.loadtem|plate("m|
|000019b0| 61 69 6e 22 29 0d 01 22 | 26 c8 99 20 22 57 69 6d |ain").."|&.. "Wim|
|000019c0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|000019d0| 2c 71 25 20 b8 20 6d 61 | 69 6e 25 0d 01 2c 19 f2 |,q% . ma|in%..,..|
|000019e0| 6c 6f 61 64 74 65 6d 70 | 6c 61 74 65 28 22 69 6e |loadtemp|late("in|
|000019f0| 66 6f 22 29 0d 01 36 26 | c8 99 20 22 57 69 6d 70 |fo")..6&|.. "Wimp|
|00001a00| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00001a10| 71 25 20 b8 20 69 6e 66 | 6f 25 0d 01 40 19 f2 6c |q% . inf|o%..@..l|
|00001a20| 6f 61 64 74 65 6d 70 6c | 61 74 65 28 22 73 61 76 |oadtempl|ate("sav|
|00001a30| 65 22 29 0d 01 4a 26 c8 | 99 20 22 57 69 6d 70 5f |e")..J&.|. "Wimp_|
|00001a40| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 71 |CreateWi|ndow",,q|
|00001a50| 25 20 b8 20 73 61 76 65 | 25 0d 01 4b 1a f2 6c 6f |% . save|%..K..lo|
|00001a60| 61 64 74 65 6d 70 6c 61 | 74 65 61 73 64 28 22 6d |adtempla|teasd("m|
|00001a70| 65 22 29 0d 01 4c 24 c8 | 99 20 22 57 69 6d 70 5f |e")..L$.|. "Wimp_|
|00001a80| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 71 |CreateWi|ndow",,q|
|00001a90| 25 20 b8 20 6d 65 25 0d | 01 54 16 f2 63 6c 6f 73 |% . me%.|.T..clos|
|00001aa0| 65 74 65 6d 70 6c 61 74 | 65 66 69 6c 65 0d 01 5e |etemplat|efile..^|
|00001ab0| 05 3a 0d 01 68 27 f2 69 | 63 6f 6e 5f 70 75 74 64 |.:..h'.i|con_putd|
|00001ac0| 61 74 61 28 71 25 2c 6d | 61 69 6e 25 2c 35 2c 22 |ata(q%,m|ain%,5,"|
|00001ad0| 52 65 61 64 79 22 2c 30 | 29 0d 01 72 16 c8 99 20 |Ready",0|)..r... |
|00001ae0| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|00001af0| 01 7c 05 f5 0d 01 86 17 | 20 20 f2 61 63 74 69 6f |.|......|  .actio|
|00001b00| 6e 28 a4 70 6f 6c 6c 28 | 30 29 29 0d 01 90 07 fd |n(.poll(|0)).....|
|00001b10| 20 a3 0d 01 9a 05 3a 0d | 01 a4 0f dd f2 63 6c 6f | .....:.|.....clo|
|00001b20| 73 65 64 6f 77 6e 0d 01 | ae 0e 24 71 25 3d 22 54 |sedown..|..$q%="T|
|00001b30| 41 53 4b 22 0d 01 b8 22 | c8 99 20 22 57 69 6d 70 |ASK"..."|.. "Wimp|
|00001b40| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 74 61 73 6b |_CloseDo|wn",task|
|00001b50| 25 2c 71 25 21 30 0d 01 | c2 05 e0 0d 01 cc 05 e1 |%,q%!0..|........|
|00001b60| 0d 01 d6 05 3a 0d 01 e0 | 3c dd f2 63 6c 69 63 6b |....:...|<..click|
|00001b70| 77 69 6e 64 6f 77 28 6d | 6f 75 73 65 78 25 2c 6d |window(m|ousex%,m|
|00001b80| 6f 75 73 65 79 25 2c 62 | 75 74 74 6f 6e 25 2c 68 |ousey%,b|utton%,h|
|00001b90| 61 6e 64 6c 65 25 2c 69 | 63 6f 6e 25 2c 6f 62 25 |andle%,i|con%,ob%|
|00001ba0| 29 0d 01 ea 10 c8 8e 20 | 68 61 6e 64 6c 65 25 20 |)...... |handle% |
|00001bb0| ca 0d 01 f4 28 20 20 c9 | 20 6d 61 69 6e 25 20 3a |....(  .| main% :|
|00001bc0| f2 63 6c 69 63 6b 6d 61 | 69 6e 28 62 75 74 74 6f |.clickma|in(butto|
|00001bd0| 6e 25 2c 69 63 6f 6e 25 | 29 0d 01 fe 28 20 20 c9 |n%,icon%|)...(  .|
|00001be0| 20 73 61 76 65 25 20 3a | f2 63 6c 69 63 6b 73 61 | save% :|.clicksa|
|00001bf0| 76 65 28 62 75 74 74 6f | 6e 25 2c 69 63 6f 6e 25 |ve(butto|n%,icon%|
|00001c00| 29 0d 02 03 28 20 20 c9 | 20 69 6e 66 6f 25 20 3a |)...(  .| info% :|
|00001c10| f2 63 6c 69 63 6b 69 6e | 66 6f 28 62 75 74 74 6f |.clickin|fo(butto|
|00001c20| 6e 25 2c 69 63 6f 6e 25 | 29 0d 02 04 26 20 20 c9 |n%,icon%|)...&  .|
|00001c30| 20 6d 65 25 20 20 20 3a | f2 63 6c 69 63 6b 6d 65 | me%   :|.clickme|
|00001c40| 28 62 75 74 74 6f 6e 25 | 2c 69 63 6f 6e 25 29 0d |(button%|,icon%).|
|00001c50| 02 08 2b 20 20 c9 20 2d | 32 20 20 20 20 3a f2 63 |..+  . -|2    :.c|
|00001c60| 6c 69 63 6b 69 63 6f 6e | 62 61 72 28 62 75 74 74 |lickicon|bar(butt|
|00001c70| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 02 12 05 cb 0d |on%,icon|%)......|
|00001c80| 02 1c 05 e1 0d 02 26 05 | 3a 0d 02 30 21 dd f2 63 |......&.|:..0!..c|
|00001c90| 6c 69 63 6b 69 63 6f 6e | 62 61 72 28 62 75 74 74 |lickicon|bar(butt|
|00001ca0| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 02 3a 11 e7 20 |on%,icon|%)..:.. |
|00001cb0| 69 63 6f 6e 25 3c 30 20 | 8c 20 e1 0d 02 44 0a c8 |icon%<0 |. ...D..|
|00001cc0| 8e 20 b9 20 ca 0d 02 4e | 11 20 20 c9 20 62 75 74 |. . ...N|.  . but|
|00001cd0| 74 6f 6e 25 3d 32 0d 02 | 58 17 20 20 20 20 e7 20 |ton%=2..|X.    . |
|00001ce0| 69 63 6f 6e 25 3d 73 69 | 63 6f 6e 20 8c 0d 02 62 |icon%=si|con ...b|
|00001cf0| 15 20 20 20 20 20 20 f2 | 6d 65 6e 75 5f 73 69 63 |.      .|menu_sic|
|00001d00| 6f 6e 0d 02 6c 09 20 20 | 20 20 cd 0d 02 76 11 20 |on..l.  |  ...v. |
|00001d10| 20 c9 20 62 75 74 74 6f | 6e 25 3d 34 0d 02 80 21 | . butto|n%=4...!|
|00001d20| 20 20 20 20 20 20 f2 6f | 70 65 6e 77 69 6e 64 6f |      .o|penwindo|
|00001d30| 77 28 6d 61 69 6e 25 2c | a3 2c 2d 31 29 0d 02 8a |w(main%,|.,-1)...|
|00001d40| 11 20 20 20 20 20 20 6f | 70 65 6e 25 3d b9 0d 02 |.      o|pen%=...|
|00001d50| 94 09 20 20 20 20 cd 0d | 02 9e 05 cb 0d 02 a8 05 |..    ..|........|
|00001d60| e1 0d 02 b2 05 3a 0d 02 | bc 10 dd f2 6d 65 6e 75 |.....:..|....menu|
|00001d70| 5f 73 69 63 6f 6e 0d 02 | c6 11 6e 6f 3d 30 3a c8 |_sicon..|..no=0:.|
|00001d80| 97 20 78 2c 79 2c 62 0d | 02 d0 3d f2 64 65 66 69 |. x,y,b.|..=.defi|
|00001d90| 6e 65 5f 6d 65 6e 75 5f | 74 65 78 74 28 22 49 6e |ne_menu_|text("In|
|00001da0| 66 6f 22 2c 6e 6f 2c 30 | 2c 30 2c 30 2c 30 2c 26 |fo",no,0|,0,0,0,&|
|00001db0| 31 30 30 32 31 2c 69 6e | 66 6f 25 2c 30 29 3a 6e |10021,in|fo%,0):n|
|00001dc0| 6f 2b 3d 31 0d 02 da 3a | f2 64 65 66 69 6e 65 5f |o+=1...:|.define_|
|00001dd0| 6d 65 6e 75 5f 74 65 78 | 74 28 22 51 75 69 74 22 |menu_tex|t("Quit"|
|00001de0| 2c 6e 6f 2c 30 2c 30 2c | 30 2c 30 2c 26 31 30 30 |,no,0,0,|0,0,&100|
|00001df0| 32 31 2c 30 2c 2d 31 29 | 3a 6e 6f 2b 3d 31 0d 02 |21,0,-1)|:no+=1..|
|00001e00| e4 32 f2 63 72 65 61 74 | 65 5f 6d 65 6e 75 28 22 |.2.creat|e_menu("|
|00001e10| 46 61 63 74 6f 72 73 22 | 2c 6e 6f 2c 31 30 30 2c |Factors"|,no,100,|
|00001e20| 78 2d 36 34 2c 39 36 2b | 28 6e 6f 2a 34 30 29 29 |x-64,96+|(no*40))|
|00001e30| 0d 02 ee 0e 6d 65 6e 75 | 5f 6e 72 25 3d 30 0d 02 |....menu|_nr%=0..|
|00001e40| f8 16 63 6c 61 69 6d 6d | 65 6e 75 24 3d 22 73 69 |..claimm|enu$="si|
|00001e50| 63 6f 6e 22 0d 03 02 05 | e1 0d 03 0c 05 3a 0d 03 |con"....|.....:..|
|00001e60| 16 11 dd f2 72 65 63 65 | 69 76 65 28 71 25 29 0d |....rece|ive(q%).|
|00001e70| 03 20 0e c8 8e 20 71 25 | 21 31 36 20 ca 0d 03 2a |. ... q%|!16 ...*|
|00001e80| 13 c9 20 30 20 3a f2 63 | 6c 6f 73 65 64 6f 77 6e |.. 0 :.c|losedown|
|00001e90| 0d 03 34 16 c9 20 32 20 | 3a f2 64 61 74 61 73 61 |..4.. 2 |:.datasa|
|00001ea0| 76 65 28 71 25 29 0d 03 | 3e 05 cb 0d 03 48 05 e1 |ve(q%)..|>....H..|
|00001eb0| 0d 03 52 05 3a 0d 03 5c | 26 dd f2 6f 70 65 6e 77 |..R.:..\|&..openw|
|00001ec0| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 2c 66 75 |indow(ha|ndle%,fu|
|00001ed0| 6c 6c 25 2c 66 72 6f 6e | 74 25 29 0d 03 66 10 71 |ll%,fron|t%)..f.q|
|00001ee0| 25 21 30 3d 68 61 6e 64 | 6c 65 25 0d 03 70 2d e7 |%!0=hand|le%..p-.|
|00001ef0| 20 ac 20 66 75 6c 6c 25 | 20 8c 20 c8 99 20 22 57 | . full%| . .. "W|
|00001f00| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00001f10| 74 65 22 2c 30 2c 71 25 | 0d 03 7a 17 e7 20 66 72 |te",0,q%|..z.. fr|
|00001f20| 6f 6e 74 25 20 8c 20 71 | 25 21 32 38 3d 2d 31 0d |ont% . q|%!28=-1.|
|00001f30| 03 84 1d c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |..... "W|imp_Open|
|00001f40| 57 69 6e 64 6f 77 22 2c | 30 2c 71 25 0d 03 8e 05 |Window",|0,q%....|
|00001f50| e1 0d 03 98 04 0d 03 a2 | 1a dd f2 63 6c 6f 73 65 |........|...close|
|00001f60| 77 69 6e 64 6f 77 28 68 | 61 6e 64 6c 65 25 29 0d |window(h|andle%).|
|00001f70| 03 ac 1c e7 20 a4 6f 6b | 74 6f 63 6c 6f 73 65 77 |.... .ok|toclosew|
|00001f80| 28 68 61 6e 64 6c 65 25 | 29 20 8c 0d 03 b6 12 20 |(handle%|) ..... |
|00001f90| 20 71 25 21 30 3d 68 61 | 6e 64 6c 65 25 0d 03 c0 | q%!0=ha|ndle%...|
|00001fa0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |   .. "W|imp_Clos|
|00001fb0| 65 57 69 6e 64 6f 77 22 | 2c 30 2c 71 25 0d 03 ca |eWindow"|,0,q%...|
|00001fc0| 05 cd 0d 03 d4 05 e1 0d | 03 de 04 0d 03 e8 11 dd |........|........|
|00001fd0| a4 70 6f 6c 6c 28 6d 61 | 73 6b 25 29 0d 03 f2 20 |.poll(ma|sk%)... |
|00001fe0| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 6d |.. "Wimp|_Poll",m|
|00001ff0| 61 73 6b 25 2c 71 25 20 | b8 20 61 25 0d 03 fc 23 |ask%,q% |. a%...#|
|00002000| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 50 6f 69 |.. "Wimp|_PollPoi|
|00002010| 6e 74 65 72 22 2c 61 25 | 2c 2c 74 61 73 6b 25 0d |nter",a%|,,task%.|
|00002020| 04 06 07 3d 61 25 0d 04 | 10 04 0d 04 1a 13 dd f2 |...=a%..|........|
|00002030| 61 63 74 69 6f 6e 28 65 | 76 6e 74 25 29 0d 04 24 |action(e|vnt%)..$|
|00002040| 0e c8 8e 20 65 76 6e 74 | 25 20 ca 0d 04 2e 1d 20 |... evnt|% ..... |
|00002050| 20 c9 20 30 3a f2 64 6f | 5f 62 61 63 6b 67 72 6f | . 0:.do|_backgro|
|00002060| 75 6e 64 5f 74 61 73 6b | 0d 04 38 1d 20 20 c9 20 |und_task|..8.  . |
|00002070| 31 3a f2 72 65 64 72 61 | 77 77 69 6e 64 6f 77 28 |1:.redra|wwindow(|
|00002080| 71 25 21 30 29 0d 04 42 | 1f 20 20 c9 20 32 3a f2 |q%!0)..B|.  . 2:.|
|00002090| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 71 25 21 30 2c |openwind|ow(q%!0,|
|000020a0| b9 2c 30 29 0d 04 4c 1c | 20 20 c9 20 33 3a f2 63 |.,0)..L.|  . 3:.c|
|000020b0| 6c 6f 73 65 77 69 6e 64 | 6f 77 28 71 25 21 30 29 |losewind|ow(q%!0)|
|000020c0| 0d 04 56 0a 20 20 c9 20 | 34 3a 0d 04 60 0a 20 20 |..V.  . |4:..`.  |
|000020d0| c9 20 35 3a 0d 04 6a 37 | 20 20 c9 20 36 3a f2 63 |. 5:..j7|  . 6:.c|
|000020e0| 6c 69 63 6b 77 69 6e 64 | 6f 77 28 21 71 25 2c 71 |lickwind|ow(!q%,q|
|000020f0| 25 21 34 2c 71 25 21 38 | 2c 71 25 21 31 32 2c 71 |%!4,q%!8|,q%!12,q|
|00002100| 25 21 31 36 2c 71 25 21 | 32 30 29 0d 04 74 3d 20 |%!16,q%!|20)..t= |
|00002110| 20 c9 20 37 3a e7 20 63 | 6c 61 69 6d 64 72 61 67 | . 7:. c|laimdrag|
|00002120| 24 3c 3e 22 22 20 8c 20 | 6a 75 6e 6b 3d a0 28 22 |$<>"" . |junk=.("|
|00002130| 46 4e 75 73 65 72 64 72 | 61 67 5f 22 2b 63 6c 61 |FNuserdr|ag_"+cla|
|00002140| 69 6d 64 72 61 67 24 29 | 0d 04 7e 0a 20 20 c9 20 |imdrag$)|..~.  . |
|00002150| 38 3a 0d 04 88 33 20 20 | c9 20 39 3a e7 20 63 6c |8:...3  |. 9:. cl|
|00002160| 61 69 6d 6d 65 6e 75 24 | 3c 3e 22 22 20 8c 20 f2 |aimmenu$|<>"" . .|
|00002170| 77 68 69 63 68 6d 65 6e | 75 28 63 6c 61 69 6d 6d |whichmen|u(claimm|
|00002180| 65 6e 75 24 29 0d 04 92 | 1a 20 20 c9 20 31 37 2c |enu$)...|.  . 17,|
|00002190| 31 38 3a f2 72 65 63 65 | 69 76 65 28 71 25 29 0d |18:.rece|ive(q%).|
|000021a0| 04 9c 05 cb 0d 04 a6 05 | e1 0d 04 b0 04 0d 04 ba |........|........|
|000021b0| 11 dd f2 72 65 63 65 69 | 76 65 28 71 25 29 0d 04 |...recei|ve(q%)..|
|000021c0| c4 0e c8 8e 20 71 25 21 | 31 36 20 ca 0d 04 ce 37 |.... q%!|16 ....7|
|000021d0| c9 20 30 20 20 20 20 3a | 24 71 25 3d 22 54 41 53 |. 0    :|$q%="TAS|
|000021e0| 4b 22 3a c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |K":.. "W|imp_Clos|
|000021f0| 65 44 6f 77 6e 22 2c 74 | 61 73 6b 25 2c 71 25 21 |eDown",t|ask%,q%!|
|00002200| 30 3a e0 0d 04 d8 05 cb | 0d 04 e2 05 e1 0d 04 ec |0:......|........|
|00002210| 04 0d 04 f6 1c dd f2 6c | 77 61 6f 72 69 67 69 6e |.......l|waorigin|
|00002220| 28 62 2c f8 20 78 25 2c | f8 20 79 25 29 0d 05 00 |(b,. x%,|. y%)...|
|00002230| 1c 78 25 3d 62 21 30 2d | 62 21 31 36 3a 79 25 3d |.x%=b!0-|b!16:y%=|
|00002240| 62 21 31 32 2d 62 21 32 | 30 0d 05 0a 05 e1 0d 05 |b!12-b!2|0.......|
|00002250| 14 04 0d 05 1e 48 dd a4 | 69 63 6f 6e 5f 63 72 65 |.....H..|icon_cre|
|00002260| 61 74 65 28 77 69 6e 64 | 6f 77 25 2c 6d 69 6e 78 |ate(wind|ow%,minx|
|00002270| 25 2c 6d 69 6e 79 25 2c | 77 69 64 74 68 25 2c 68 |%,miny%,|width%,h|
|00002280| 65 69 67 68 74 25 2c 66 | 67 25 2c 62 67 25 2c 66 |eight%,f|g%,bg%,f|
|00002290| 6c 67 25 2c 64 61 74 61 | 24 29 0d 05 28 08 ea 20 |lg%,data|$)..(.. |
|000022a0| 69 25 0d 05 32 10 71 25 | 21 30 3d 77 69 6e 64 6f |i%..2.q%|!0=windo|
|000022b0| 77 25 0d 05 3c 19 71 25 | 21 34 3d 6d 69 6e 78 25 |w%..<.q%|!4=minx%|
|000022c0| 3a 71 25 21 38 3d 6d 69 | 6e 79 25 0d 05 46 2a 71 |:q%!8=mi|ny%..F*q|
|000022d0| 25 21 31 32 3d 6d 69 6e | 78 25 2b 77 69 64 74 68 |%!12=min|x%+width|
|000022e0| 25 3a 71 25 21 31 36 3d | 6d 69 6e 79 25 2b 68 65 |%:q%!16=|miny%+he|
|000022f0| 69 67 68 74 25 0d 05 50 | 22 71 25 21 32 30 3d 66 |ight%..P|"q%!20=f|
|00002300| 6c 67 25 20 84 20 62 67 | 25 3c 3c 32 38 20 84 20 |lg% . bg|%<<28 . |
|00002310| 66 67 25 3c 3c 32 34 0d | 05 5a 14 e7 20 71 25 21 |fg%<<24.|.Z.. q%!|
|00002320| 32 30 20 80 20 26 31 30 | 30 20 8c 0d 05 64 14 20 |20 . &10|0 ...d. |
|00002330| 20 69 25 3d a7 64 61 74 | 61 24 2c 22 2c 22 29 0d | i%=.dat|a$,",").|
|00002340| 05 6e 1b 20 20 71 25 21 | 32 34 3d a0 28 c0 64 61 |.n.  q%!|24=.(.da|
|00002350| 74 61 24 2c 69 25 2d 31 | 29 29 0d 05 78 0e 20 20 |ta$,i%-1|))..x.  |
|00002360| 71 25 21 32 38 3d 2d 31 | 0d 05 82 1b 20 20 71 25 |q%!28=-1|....  q%|
|00002370| 21 33 32 3d a0 28 c1 64 | 61 74 61 24 2c 69 25 2b |!32=.(.d|ata$,i%+|
|00002380| 31 29 29 0d 05 8c 05 cc | 0d 05 96 17 24 28 71 25 |1)).....|....$(q%|
|00002390| 2b 32 34 29 3d c0 64 61 | 74 61 24 2c 31 31 29 0d |+24)=.da|ta$,11).|
|000023a0| 05 a0 05 cd 0d 05 aa 22 | c8 99 20 22 57 69 6d 70 |......."|.. "Wimp|
|000023b0| 5f 43 72 65 61 74 65 49 | 63 6f 6e 22 2c 30 2c 71 |_CreateI|con",0,q|
|000023c0| 25 20 b8 20 69 25 0d 05 | b4 07 3d 69 25 0d 05 be |% . i%..|..=i%...|
|000023d0| 04 0d 05 c8 26 dd f2 69 | 63 6f 6e 5f 70 75 74 64 |....&..i|con_putd|
|000023e0| 61 74 61 28 62 2c 77 68 | 25 2c 69 68 25 2c 74 65 |ata(b,wh|%,ih%,te|
|000023f0| 78 74 24 2c 72 64 29 0d | 05 d2 13 62 21 30 3d 77 |xt$,rd).|...b!0=w|
|00002400| 68 25 3a 62 21 34 3d 69 | 68 25 0d 05 dc 1d c8 99 |h%:b!4=i|h%......|
|00002410| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00002420| 61 74 65 22 2c 2c 62 0d | 05 e6 1b c8 99 20 22 57 |ate",,b.|..... "W|
|00002430| 69 6d 70 5f 44 65 6c 65 | 74 65 49 63 6f 6e 22 2c |imp_Dele|teIcon",|
|00002440| 2c 62 0d 05 f0 1e 62 21 | 34 3d 77 68 25 3a 24 28 |,b....b!|4=wh%:$(|
|00002450| 62 21 32 38 29 3d 74 65 | 78 74 24 3a 62 2b 3d 34 |b!28)=te|xt$:b+=4|
|00002460| 0d 05 fa 1b c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |...... "|Wimp_Cre|
|00002470| 61 74 65 49 63 6f 6e 22 | 2c 2c 62 0d 06 04 36 e7 |ateIcon"|,,b...6.|
|00002480| 20 72 64 20 8c 20 c8 99 | 20 22 57 69 6d 70 5f 46 | rd . ..| "Wimp_F|
|00002490| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 62 21 30 2c |orceRedr|aw",b!0,|
|000024a0| 62 21 34 2c 62 21 38 2c | 62 21 31 32 2c 62 21 31 |b!4,b!8,|b!12,b!1|
|000024b0| 36 0d 06 0e 08 62 2d 3d | 34 0d 06 18 05 e1 0d 06 |6....b-=|4.......|
|000024c0| 22 04 0d 06 2c 35 dd f2 | 69 63 6f 6e 5f 70 75 74 |"...,5..|icon_put|
|000024d0| 64 61 74 61 28 71 25 2c | 77 68 61 6e 64 6c 65 25 |data(q%,|whandle%|
|000024e0| 2c 69 68 61 6e 64 6c 65 | 25 2c 64 61 74 61 24 2c |,ihandle|%,data$,|
|000024f0| 72 65 64 72 61 77 29 0d | 06 36 11 71 25 21 30 3d |redraw).|.6.q%!0=|
|00002500| 77 68 61 6e 64 6c 65 25 | 0d 06 40 11 71 25 21 34 |whandle%|..@.q%!4|
|00002510| 3d 69 68 61 6e 64 6c 65 | 25 0d 06 4a 1e c8 99 20 |=ihandle|%..J... |
|00002520| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00002530| 74 65 22 2c 2c 71 25 0d | 06 54 12 24 28 71 25 21 |te",,q%.|.T.$(q%!|
|00002540| 32 38 29 3d 64 61 74 61 | 24 0d 06 5e 0e e7 20 72 |28)=data|$..^.. r|
|00002550| 65 64 72 61 77 20 8c 0d | 06 68 3b 20 20 c8 99 20 |edraw ..|.h;  .. |
|00002560| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00002570| 77 22 2c 77 68 61 6e 64 | 6c 65 25 2c 71 25 21 38 |w",whand|le%,q%!8|
|00002580| 2c 71 25 21 31 32 2c 71 | 25 21 31 36 2c 71 25 21 |,q%!12,q|%!16,q%!|
|00002590| 32 30 0d 06 72 05 cd 0d | 06 7c 05 e1 0d 06 86 04 |20..r...|.|......|
|000025a0| 0d 06 90 28 dd a4 69 63 | 6f 6e 5f 67 65 74 64 61 |...(..ic|on_getda|
|000025b0| 74 61 28 71 25 2c 77 68 | 61 6e 64 6c 65 25 2c 69 |ta(q%,wh|andle%,i|
|000025c0| 68 61 6e 64 6c 65 25 29 | 0d 06 9a 11 71 25 21 30 |handle%)|....q%!0|
|000025d0| 3d 77 68 61 6e 64 6c 65 | 25 0d 06 a4 11 71 25 21 |=whandle|%....q%!|
|000025e0| 34 3d 69 68 61 6e 64 6c | 65 25 0d 06 ae 1e c8 99 |4=ihandl|e%......|
|000025f0| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00002600| 61 74 65 22 2c 2c 71 25 | 0d 06 b8 0d 3d 24 28 71 |ate",,q%|....=$(q|
|00002610| 25 21 32 38 29 0d 06 c2 | 04 0d 06 cc 0d dd f2 6e |%!28)...|.......n|
|00002620| 65 77 76 61 6c 73 0d 06 | d6 17 67 74 78 3d 71 25 |ewvals..|..gtx=q%|
|00002630| 21 33 36 3a 67 74 79 3d | 71 25 21 34 30 0d 06 e0 |!36:gty=|q%!40...|
|00002640| 15 77 62 78 3d 71 25 21 | 34 3a 77 62 79 3d 71 25 |.wbx=q%!|4:wby=q%|
|00002650| 21 38 0d 06 ea 17 77 74 | 78 3d 71 25 21 31 32 3a |!8....wt|x=q%!12:|
|00002660| 77 74 79 3d 71 25 21 31 | 36 0d 06 f4 17 78 73 63 |wty=q%!1|6....xsc|
|00002670| 3d 71 25 21 32 30 3a 79 | 73 63 3d 71 25 21 32 34 |=q%!20:y|sc=q%!24|
|00002680| 0d 06 fe 21 68 70 3d 77 | 74 78 2d 77 62 78 3a 76 |...!hp=w|tx-wbx:v|
|00002690| 70 3d 77 74 79 2d 77 62 | 79 3a 65 62 78 3d 78 73 |p=wty-wb|y:ebx=xs|
|000026a0| 63 0d 07 08 21 65 74 78 | 3d 78 73 63 2b 68 70 3a |c...!etx|=xsc+hp:|
|000026b0| 65 74 79 3d 79 73 63 3a | 65 62 79 3d 79 73 63 2d |ety=ysc:|eby=ysc-|
|000026c0| 76 70 0d 07 12 05 e1 0d | 07 1c 04 0d 07 26 32 dd |vp......|.....&2.|
|000026d0| f2 64 65 66 69 6e 65 5f | 6d 65 6e 75 5f 74 65 78 |.define_|menu_tex|
|000026e0| 74 28 74 65 78 74 24 2c | 6e 2c 77 2c 74 2c 64 2c |t(text$,|n,w,t,d,|
|000026f0| 73 2c 66 6c 61 67 73 2c | 73 6d 2c 6c 29 0d 07 30 |s,flags,|sm,l)..0|
|00002700| 12 74 65 78 74 24 28 6e | 29 3d 74 65 78 74 24 0d |.text$(n|)=text$.|
|00002710| 07 3a 10 73 65 74 74 69 | 6e 67 28 6e 29 3d 30 0d |.:.setti|ng(n)=0.|
|00002720| 07 44 38 e7 20 77 20 8c | 20 73 65 74 74 69 6e 67 |.D8. w .| setting|
|00002730| 28 6e 29 3d 73 65 74 74 | 69 6e 67 28 6e 29 20 84 |(n)=sett|ing(n) .|
|00002740| 20 26 30 34 3a 66 6c 61 | 67 73 3d 66 6c 61 67 73 | &04:fla|gs=flags|
|00002750| 20 84 20 26 31 30 30 0d | 07 4e 25 e7 20 74 20 8c | . &100.|.N%. t .|
|00002760| 20 73 65 74 74 69 6e 67 | 28 6e 29 3d 73 65 74 74 | setting|(n)=sett|
|00002770| 69 6e 67 28 6e 29 20 84 | 20 26 30 31 0d 07 58 25 |ing(n) .| &01..X%|
|00002780| e7 20 64 20 8c 20 73 65 | 74 74 69 6e 67 28 6e 29 |. d . se|tting(n)|
|00002790| 3d 73 65 74 74 69 6e 67 | 28 6e 29 20 84 20 26 30 |=setting|(n) . &0|
|000027a0| 32 0d 07 62 25 e7 20 6c | 20 8c 20 73 65 74 74 69 |2..b%. l| . setti|
|000027b0| 6e 67 28 6e 29 3d 73 65 | 74 74 69 6e 67 28 6e 29 |ng(n)=se|tting(n)|
|000027c0| 20 84 20 26 38 30 0d 07 | 6c 1f e7 20 73 20 8c 20 | . &80..|l.. s . |
|000027d0| 66 6c 61 67 73 3d 66 6c | 61 67 73 20 84 20 26 34 |flags=fl|ags . &4|
|000027e0| 30 30 30 30 30 0d 07 76 | 12 66 6c 61 67 73 28 6e |00000..v|.flags(n|
|000027f0| 29 3d 66 6c 61 67 73 0d | 07 80 11 73 75 62 6d 65 |)=flags.|...subme|
|00002800| 6e 75 28 6e 29 3d 73 6d | 0d 07 8a 05 e1 0d 07 94 |nu(n)=sm|........|
|00002810| 04 0d 07 9e 26 dd f2 63 | 72 65 61 74 65 5f 6d 65 |....&..c|reate_me|
|00002820| 6e 75 28 74 69 74 6c 65 | 24 2c 6e 2c 77 69 64 74 |nu(title|$,n,widt|
|00002830| 68 25 2c 78 2c 79 29 0d | 07 a8 0d 6d 62 25 3d 6d |h%,x,y).|...mb%=m|
|00002840| 65 6e 75 25 0d 07 b2 0f | 6d 65 6e 75 73 3d 30 3a |enu%....|menus=0:|
|00002850| 71 3d 30 0d 07 bc 05 f5 | 0d 07 c6 21 20 20 6d 65 |q=0.....|...!  me|
|00002860| 6e 75 70 6f 73 28 6d 65 | 6e 75 73 29 3d 6d 62 25 |nupos(me|nus)=mb%|
|00002870| 3a 6d 65 6e 75 73 2b 3d | 31 0d 07 d0 11 20 20 24 |:menus+=|1....  $|
|00002880| 6d 62 25 3d 74 69 74 6c | 65 24 0d 07 da 0e 20 20 |mb%=titl|e$....  |
|00002890| 6d 62 25 3f 31 32 3d 37 | 0d 07 e4 0e 20 20 6d 62 |mb%?12=7|....  mb|
|000028a0| 25 3f 31 33 3d 32 0d 07 | ee 0e 20 20 6d 62 25 3f |%?13=2..|..  mb%?|
|000028b0| 31 34 3d 37 0d 07 f8 0e | 20 20 6d 62 25 3f 31 35 |14=7....|  mb%?15|
|000028c0| 3d 30 0d 08 02 13 20 20 | 6d 62 25 21 31 36 3d 77 |=0....  |mb%!16=w|
|000028d0| 69 64 74 68 25 0d 08 0c | 27 20 20 6d 62 25 21 32 |idth%...|'  mb%!2|
|000028e0| 30 3d 34 30 20 3a f4 20 | 68 65 69 67 68 74 20 6f |0=40 :. |height o|
|000028f0| 66 20 6d 65 6e 75 20 69 | 74 65 6d 73 0d 08 16 41 |f menu i|tems...A|
|00002900| 20 20 6d 62 25 21 32 34 | 3d 30 20 20 3a f4 20 76 |  mb%!24|=0  :. v|
|00002910| 65 72 74 69 63 61 6c 20 | 67 61 70 20 62 65 74 77 |ertical |gap betw|
|00002920| 65 65 6e 20 69 74 65 6d | 73 20 28 61 6c 73 6f 20 |een item|s (also |
|00002930| 74 6f 70 20 26 20 62 6f | 74 74 6f 6d 29 0d 08 20 |top & bo|ttom).. |
|00002940| 14 20 20 69 74 65 6d 70 | 74 72 3d 6d 62 25 2b 32 |.  itemp|tr=mb%+2|
|00002950| 38 0d 08 2a 07 20 20 f5 | 0d 08 34 1c 20 20 20 20 |8..*.  .|..4.    |
|00002960| 69 74 65 6d 70 74 72 21 | 30 3d 73 65 74 74 69 6e |itemptr!|0=settin|
|00002970| 67 28 71 29 0d 08 3e 18 | 20 20 20 20 72 65 66 28 |g(q)..>.|    ref(|
|00002980| 71 29 3d 69 74 65 6d 70 | 74 72 2b 34 0d 08 48 2a |q)=itemp|tr+4..H*|
|00002990| 20 20 20 20 69 74 65 6d | 70 74 72 21 38 3d 66 6c |    item|ptr!8=fl|
|000029a0| 61 67 73 28 71 29 20 84 | 20 30 3c 3c 32 38 20 84 |ags(q) .| 0<<28 .|
|000029b0| 20 37 3c 3c 32 34 0d 08 | 52 1f 20 20 20 20 e7 20 | 7<<24..|R.    . |
|000029c0| 28 66 6c 61 67 73 28 71 | 29 20 80 20 26 31 30 30 |(flags(q|) . &100|
|000029d0| 29 3d 30 20 8c 0d 08 5c | 20 20 20 20 20 20 20 24 |)=0 ...\|       $|
|000029e0| 28 69 74 65 6d 70 74 72 | 2b 31 32 29 3d 74 65 78 |(itemptr|+12)=tex|
|000029f0| 74 24 28 71 29 0d 08 66 | 09 20 20 20 20 cc 0d 08 |t$(q)..f|.    ...|
|00002a00| 70 1c 20 20 20 20 20 20 | 70 6f 73 3d a7 74 65 78 |p.      |pos=.tex|
|00002a10| 74 24 28 71 29 2c 22 28 | 22 29 0d 08 7a 28 20 20 |t$(q),"(|")..z(  |
|00002a20| 20 20 20 20 69 74 65 6d | 70 74 72 21 31 32 3d a0 |    item|ptr!12=.|
|00002a30| 28 c0 74 65 78 74 24 28 | 71 29 2c 70 6f 73 2d 31 |(.text$(|q),pos-1|
|00002a40| 29 29 0d 08 84 17 20 20 | 20 20 20 20 69 74 65 6d |))....  |    item|
|00002a50| 70 74 72 21 31 36 3d 2d | 31 0d 08 8e 32 20 20 20 |ptr!16=-|1...2   |
|00002a60| 20 20 20 69 74 65 6d 70 | 74 72 21 32 30 3d a0 28 |   itemp|tr!20=.(|
|00002a70| c2 74 65 78 74 24 28 71 | 29 2c a9 28 74 65 78 74 |.text$(q|),.(text|
|00002a80| 24 28 71 29 29 2d 70 6f | 73 29 29 0d 08 98 09 20 |$(q))-po|s)).... |
|00002a90| 20 20 20 cd 0d 08 a2 18 | 20 20 20 20 69 74 65 6d |   .....|    item|
|00002aa0| 70 74 72 2b 3d 32 34 3a | 71 2b 3d 31 0d 08 ac 1e |ptr+=24:|q+=1....|
|00002ab0| 20 20 fd 20 28 73 65 74 | 74 69 6e 67 28 71 2d 31 |  . (set|ting(q-1|
|00002ac0| 29 20 80 20 26 38 30 29 | 3e 30 0d 08 b6 11 20 20 |) . &80)|>0....  |
|00002ad0| 6d 62 25 3d 69 74 65 6d | 70 74 72 0d 08 c0 23 20 |mb%=item|ptr...# |
|00002ae0| 20 e7 20 71 3c 3e 6e 20 | 8c 20 74 69 74 6c 65 24 | . q<>n |. title$|
|00002af0| 3d 74 65 78 74 24 28 71 | 29 3a 71 2b 3d 31 0d 08 |=text$(q|):q+=1..|
|00002b00| ca 09 fd 20 71 3d 6e 0d | 08 d4 04 0d 08 de 0f e3 |... q=n.|........|
|00002b10| 20 71 3d 30 20 b8 20 6e | 2d 31 0d 08 e8 29 20 20 | q=0 . n|-1...)  |
|00002b20| e7 20 73 75 62 6d 65 6e | 75 28 71 29 3e 30 20 80 |. submen|u(q)>0 .|
|00002b30| 20 73 75 62 6d 65 6e 75 | 28 71 29 3c 6d 65 6e 75 | submenu|(q)<menu|
|00002b40| 73 20 8c 0d 08 f2 23 20 | 20 20 20 21 72 65 66 28 |s ....# |   !ref(|
|00002b50| 71 29 3d 6d 65 6e 75 70 | 6f 73 28 73 75 62 6d 65 |q)=menup|os(subme|
|00002b60| 6e 75 28 71 29 29 0d 08 | fc 07 20 20 cc 0d 09 06 |nu(q))..|..  ....|
|00002b70| 48 20 20 20 20 21 72 65 | 66 28 71 29 3d 73 75 62 |H    !re|f(q)=sub|
|00002b80| 6d 65 6e 75 28 71 29 3a | f4 20 77 61 73 20 2d 31 |menu(q):|. was -1|
|00002b90| 20 69 2e 65 2e 20 73 75 | 62 6d 65 6e 75 20 64 69 | i.e. su|bmenu di|
|00002ba0| 73 61 6c 6c 6f 77 65 64 | 21 20 54 68 69 73 20 63 |sallowed|! This c|
|00002bb0| 68 61 6e 67 65 0d 09 10 | 3e 20 20 20 20 20 20 20 |hange...|>       |
|00002bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |        |       :|
|00002bd0| f4 20 61 6c 6c 6f 77 73 | 20 61 20 77 69 6e 64 6f |. allows| a windo|
|00002be0| 77 20 68 61 6e 64 6c 65 | 20 74 6f 20 62 65 20 75 |w handle| to be u|
|00002bf0| 73 65 64 0d 09 1a 07 20 | 20 cd 0d 09 24 07 ed 20 |sed.... | ...$.. |
|00002c00| 71 0d 09 2e 23 c8 99 20 | 22 57 69 6d 70 5f 43 72 |q...#.. |"Wimp_Cr|
|00002c10| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 6d 65 6e 75 25 |eateMenu|",,menu%|
|00002c20| 2c 78 2c 79 0d 09 38 05 | e1 0d 09 42 04 0d 09 4c |,x,y..8.|...B...L|
|00002c30| 1d dd f2 6f 70 65 6e 74 | 65 6d 70 6c 61 74 65 66 |...opent|emplatef|
|00002c40| 69 6c 65 28 66 69 6c 65 | 24 29 0d 09 56 21 c8 99 |ile(file|$)..V!..|
|00002c50| 20 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c | "Wimp_O|penTempl|
|00002c60| 61 74 65 22 2c 2c 66 69 | 6c 65 24 0d 09 60 05 e1 |ate",,fi|le$..`..|
|00002c70| 0d 09 6a 04 0d 09 74 19 | dd f2 6c 6f 61 64 74 65 |..j...t.|..loadte|
|00002c80| 6d 70 6c 61 74 65 28 6e | 61 6d 65 24 29 0d 09 7e |mplate(n|ame$)..~|
|00002c90| 13 ea 20 74 79 70 65 25 | 2c 70 6f 73 25 2c 78 25 |.. type%|,pos%,x%|
|00002ca0| 0d 09 88 4c c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |...L.. "|Wimp_Loa|
|00002cb0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 71 25 2c 69 |dTemplat|e",,q%,i|
|00002cc0| 70 74 72 25 2c 69 65 6e | 64 25 2c 2d 31 2c 6e 61 |ptr%,ien|d%,-1,na|
|00002cd0| 6d 65 24 2c 30 20 b8 20 | 74 79 70 65 25 2c 2c 69 |me$,0 . |type%,,i|
|00002ce0| 70 74 72 25 2c 2c 2c 2c | 70 6f 73 25 0d 09 92 05 |ptr%,,,,|pos%....|
|00002cf0| e1 0d 09 93 04 0d 09 94 | 1c dd f2 6c 6f 61 64 74 |........|...loadt|
|00002d00| 65 6d 70 6c 61 74 65 61 | 73 64 28 6e 61 6d 65 24 |emplatea|sd(name$|
|00002d10| 29 0d 09 95 13 ea 20 74 | 79 70 65 25 2c 70 6f 73 |)..... t|ype%,pos|
|00002d20| 25 2c 78 25 0d 09 96 4c | c8 99 20 22 57 69 6d 70 |%,x%...L|.. "Wimp|
|00002d30| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00002d40| 71 25 2c 69 70 74 72 25 | 2c 69 65 6e 64 25 2c 2d |q%,iptr%|,iend%,-|
|00002d50| 31 2c 6e 61 6d 65 24 2c | 30 20 b8 20 74 79 70 65 |1,name$,|0 . type|
|00002d60| 25 2c 2c 69 70 74 72 25 | 2c 2c 2c 2c 70 6f 73 25 |%,,iptr%|,,,,pos%|
|00002d70| 0d 09 97 0a e5 20 8d 44 | 4c 41 0d 09 9c 04 0d 09 |..... .D|LA......|
|00002d80| a6 17 dd f2 63 6c 6f 73 | 65 74 65 6d 70 6c 61 74 |....clos|etemplat|
|00002d90| 65 66 69 6c 65 0d 09 b0 | 1b c8 99 20 22 57 69 6d |efile...|... "Wim|
|00002da0| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00002db0| 0d 09 ba 05 e1 0d 09 c4 | 04 0d 09 ce 11 dd a4 6c |........|.......l|
|00002dc0| 65 61 66 28 70 61 74 68 | 24 29 0d 09 d8 12 c8 95 |eaf(path|$)......|
|00002dd0| 20 a7 70 61 74 68 24 2c | 22 2e 22 29 0d 09 e2 21 | .path$,|".")...!|
|00002de0| 20 20 70 61 74 68 24 3d | c1 70 61 74 68 24 2c a7 |  path$=|.path$,.|
|00002df0| 70 61 74 68 24 2c 22 2e | 22 29 2b 31 29 0d 09 ec |path$,".|")+1)...|
|00002e00| 05 ce 0d 09 f6 0a 3d 70 | 61 74 68 24 0d 0a 00 04 |......=p|ath$....|
|00002e10| 0d 0a 0a 10 dd a4 67 6e | 61 6d 65 28 70 74 72 29 |......gn|ame(ptr)|
|00002e20| 0d 0a 14 09 66 24 3d 22 | 22 0d 0a 1e 19 c8 95 20 |....f$="|"...... |
|00002e30| 3f 70 74 72 3c 3e 30 20 | 80 20 3f 70 74 72 3c 3e |?ptr<>0 |. ?ptr<>|
|00002e40| 31 33 0d 0a 28 18 20 20 | 66 24 3d 66 24 2b bd 3f |13..(.  |f$=f$+.?|
|00002e50| 70 74 72 3a 70 74 72 2b | 3d 31 0d 0a 32 05 ce 0d |ptr:ptr+|=1..2...|
|00002e60| 0a 3c 07 3d 66 24 0d 0a | 46 04 0d 0a 50 18 dd f2 |.<.=f$..|F...P...|
|00002e70| 64 6f 5f 62 61 63 6b 67 | 72 6f 75 6e 64 5f 74 61 |do_backg|round_ta|
|00002e80| 73 6b 0d 0a 5a 05 e1 0d | 0a 64 04 0d 0a 6e 1b dd |sk..Z...|.d...n..|
|00002e90| f2 72 65 64 72 61 77 77 | 69 6e 64 6f 77 28 68 61 |.redraww|indow(ha|
|00002ea0| 6e 64 6c 65 25 29 0d 0a | 78 0b ea 20 76 6f 69 64 |ndle%)..|x.. void|
|00002eb0| 25 0d 0a 82 10 71 25 21 | 30 3d 68 61 6e 64 6c 65 |%....q%!|0=handle|
|00002ec0| 25 0d 0a 8c 27 c8 99 20 | 22 57 69 6d 70 5f 52 65 |%...'.. |"Wimp_Re|
|00002ed0| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 30 2c 71 25 |drawWind|ow",0,q%|
|00002ee0| 20 b8 20 6d 6f 72 65 25 | 0d 0a 96 1c f2 6c 77 61 | . more%|.....lwa|
|00002ef0| 6f 72 69 67 69 6e 28 71 | 25 2b 34 2c 78 30 25 2c |origin(q|%+4,x0%,|
|00002f00| 79 30 25 29 0d 0a a0 0c | c8 95 20 6d 6f 72 65 25 |y0%)....|.. more%|
|00002f10| 0d 0a aa 0e 20 20 f2 6e | 65 77 76 61 6c 73 0d 0a |....  .n|ewvals..|
|00002f20| b4 12 20 20 c8 8e 20 68 | 61 6e 64 6c 65 25 20 ca |..  .. h|andle% .|
|00002f30| 0d 0a be 07 20 20 cb 0d | 0a c8 20 20 20 c8 99 20 |....  ..|..   .. |
|00002f40| 22 57 69 6d 70 5f 42 6f | 72 64 65 72 57 69 6e 64 |"Wimp_Bo|rderWind|
|00002f50| 6f 77 22 2c 2c 71 25 0d | 0a d2 29 20 20 c8 99 20 |ow",,q%.|..)  .. |
|00002f60| 22 57 69 6d 70 5f 47 65 | 74 52 65 63 74 61 6e 67 |"Wimp_Ge|tRectang|
|00002f70| 6c 65 22 2c 30 2c 71 25 | 20 b8 20 6d 6f 72 65 25 |le",0,q%| . more%|
|00002f80| 0d 0a dc 05 ce 0d 0a e6 | 05 e1 0d 0a f0 05 3a 0d |........|......:.|
|00002f90| 0a fa 19 dd a4 6f 6b 74 | 6f 63 6c 6f 73 65 77 28 |.....okt|oclosew(|
|00002fa0| 68 61 6e 64 6c 65 25 29 | 0d 0b 04 0f ea 20 73 68 |handle%)|..... sh|
|00002fb0| 75 74 74 69 6e 67 25 0d | 0b 0e 0f 73 68 75 74 74 |utting%.|...shutt|
|00002fc0| 69 6e 67 25 3d b9 0d 0b | 18 0e 3d 73 68 75 74 74 |ing%=...|..=shutt|
|00002fd0| 69 6e 67 25 0d 0b 22 04 | 0d 0b 2c 1e dd f2 63 6c |ing%..".|..,...cl|
|00002fe0| 69 63 6b 6d 61 69 6e 28 | 62 75 74 74 6f 6e 25 2c |ickmain(|button%,|
|00002ff0| 69 63 6f 6e 25 29 0d 0b | 36 0a c8 8e 20 b9 20 ca |icon%)..|6... . .|
|00003000| 0d 0b 40 3f c9 20 28 62 | 75 74 74 6f 6e 25 20 80 |..@?. (b|utton% .|
|00003010| 20 34 29 3d 34 20 80 20 | 69 63 6f 6e 25 3c 3e 2d | 4)=4 . |icon%<>-|
|00003020| 31 20 84 20 28 62 75 74 | 74 6f 6e 25 20 80 20 31 |1 . (but|ton% . 1|
|00003030| 29 3d 31 20 80 20 69 63 | 6f 6e 25 3c 3e 2d 31 0d |)=1 . ic|on%<>-1.|
|00003040| 0b 4a 10 20 20 c8 8e 20 | 69 63 6f 6e 25 20 ca 0d |.J.  .. |icon% ..|
|00003050| 0b 54 14 20 20 c9 20 33 | 20 3a f2 73 6c 61 62 69 |.T.  . 3| :.slabi|
|00003060| 63 6f 6e 0d 0b 5e 25 20 | 20 20 20 20 20 20 20 20 |con..^% |        |
|00003070| 20 f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 73 61 76 | .openwi|ndow(sav|
|00003080| 65 25 2c a3 2c 2d 31 29 | 0d 0b 68 14 20 20 c9 20 |e%,.,-1)|..h.  . |
|00003090| 34 20 3a f2 73 6c 61 62 | 69 63 6f 6e 0d 0b 72 1d |4 :.slab|icon..r.|
|000030a0| 20 20 20 20 20 20 20 20 | 20 20 f2 65 78 74 72 61 |        |  .extra|
|000030b0| 63 74 66 61 63 74 6f 72 | 73 0d 0b 7c 07 20 20 cb |ctfactor|s..|.  .|
|000030c0| 0d 0b 86 05 cb 0d 0b 90 | 05 e1 0d 0b 9a 05 3a 0d |........|......:.|
|000030d0| 0b a4 0e dd f2 73 6c 61 | 62 69 63 6f 6e 0d 0b ae |.....sla|bicon...|
|000030e0| 1c c8 99 20 22 57 69 6d | 70 5f 42 6f 72 64 65 72 |... "Wim|p_Border|
|000030f0| 49 63 6f 6e 22 2c 2c 71 | 25 0d 0b b8 0a 71 25 21 |Icon",,q|%....q%!|
|00003100| 38 3d 30 0d 0b c2 1c c8 | 99 20 22 57 69 6d 70 5f |8=0.....|. "Wimp_|
|00003110| 42 6f 72 64 65 72 49 63 | 6f 6e 22 2c 2c 71 25 0d |BorderIc|on",,q%.|
|00003120| 0b cc 05 e1 0d 0b d6 05 | 3a 0d 0b e0 1e dd f2 63 |........|:......c|
|00003130| 6c 69 63 6b 73 61 76 65 | 28 62 75 74 74 6f 6e 25 |licksave|(button%|
|00003140| 2c 69 63 6f 6e 25 29 0d | 0b ea 0a c8 8e 20 b9 20 |,icon%).|..... . |
|00003150| ca 0d 0b f4 1f c9 20 28 | 62 75 74 74 6f 6e 25 20 |...... (|button% |
|00003160| 80 20 34 29 3d 34 20 80 | 20 69 63 6f 6e 25 3d 35 |. 4)=4 .| icon%=5|
|00003170| 0d 0b fe 34 20 20 f2 73 | 6c 61 62 69 63 6f 6e 3a |...4  .s|labicon:|
|00003180| f2 73 61 76 65 66 69 6c | 65 28 a4 69 63 6f 6e 5f |.savefil|e(.icon_|
|00003190| 67 65 74 64 61 74 61 28 | 71 25 2c 73 61 76 65 25 |getdata(|q%,save%|
|000031a0| 2c 34 29 29 0d 0c 08 1f | c9 20 28 62 75 74 74 6f |,4))....|. (butto|
|000031b0| 6e 25 20 80 20 34 29 3d | 34 20 80 20 69 63 6f 6e |n% . 4)=|4 . icon|
|000031c0| 25 3d 33 0d 0c 12 17 20 | 20 63 6c 61 69 6d 64 72 |%=3.... | claimdr|
|000031d0| 61 67 24 3d 22 73 61 76 | 65 22 0d 0c 1c 0f 20 20 |ag$="sav|e"....  |
|000031e0| 21 71 25 3d 73 61 76 65 | 25 0d 0c 26 22 20 20 c8 |!q%=save|%..&"  .|
|000031f0| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00003200| 77 53 74 61 74 65 22 2c | 2c 71 25 0d 0c 30 14 20 |wState",|,q%..0. |
|00003210| 20 77 65 78 3d 71 25 21 | 34 2d 71 25 21 32 30 0d | wex=q%!|4-q%!20.|
|00003220| 0c 3a 15 20 20 77 65 79 | 3d 71 25 21 31 36 2d 71 |.:.  wey|=q%!16-q|
|00003230| 25 21 32 34 0d 0c 44 0c | 20 20 71 25 21 34 3d 33 |%!24..D.|  q%!4=3|
|00003240| 0d 0c 4e 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 47 |..N   ..| "Wimp_G|
|00003250| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|00003260| 0d 0c 58 16 20 20 21 71 | 25 3d 73 61 76 65 25 3a |..X.  !q|%=save%:|
|00003270| 71 25 21 34 3d 35 0d 0c | 62 13 20 20 71 25 21 38 |q%!4=5..|b.  q%!8|
|00003280| 3d 71 25 21 38 2b 77 65 | 78 0d 0c 6c 15 20 20 71 |=q%!8+we|x..l.  q|
|00003290| 25 21 31 32 3d 71 25 21 | 31 32 2b 77 65 79 0d 0c |%!12=q%!|12+wey..|
|000032a0| 76 15 20 20 71 25 21 31 | 36 3d 71 25 21 31 36 2b |v.  q%!1|6=q%!16+|
|000032b0| 77 65 78 0d 0c 80 15 20 | 20 71 25 21 32 30 3d 71 |wex.... | q%!20=q|
|000032c0| 25 21 32 30 2b 77 65 79 | 0d 0c 8a 15 20 20 71 25 |%!20+wey|....  q%|
|000032d0| 21 32 34 3d 30 3a 71 25 | 21 32 38 3d 30 0d 0c 94 |!24=0:q%|!28=0...|
|000032e0| 25 20 20 71 25 21 33 32 | 3d 26 37 46 46 46 46 46 |%  q%!32|=&7FFFFF|
|000032f0| 46 46 3a 71 25 21 33 36 | 3d 26 37 46 46 46 46 46 |FF:q%!36|=&7FFFFF|
|00003300| 46 46 0d 0c 9e 1b 20 20 | c8 99 20 22 57 69 6d 70 |FF....  |.. "Wimp|
|00003310| 5f 44 72 61 67 42 6f 78 | 22 2c 2c 71 25 0d 0c a8 |_DragBox|",,q%...|
|00003320| 05 cb 0d 0c b2 05 e1 0d | 0c bc 04 0d 0c c6 13 dd |........|........|
|00003330| a4 75 73 65 72 64 72 61 | 67 5f 73 61 76 65 0d 0c |.userdra|g_save..|
|00003340| d0 25 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 50 6f |.%.. "Wi|mp_GetPo|
|00003350| 69 6e 74 65 72 49 6e 66 | 6f 22 2c 2c 6d 73 67 62 |interInf|o",,msgb|
|00003360| 6c 6b 25 0d 0c da 1e 6d | 73 67 62 6c 6b 25 21 32 |lk%....m|sgblk%!2|
|00003370| 30 3d 36 34 3a 6d 73 67 | 62 6c 6b 25 21 33 32 3d |0=64:msg|blk%!32=|
|00003380| 30 0d 0c e4 26 6d 73 67 | 62 6c 6b 25 21 33 36 3d |0...&msg|blk%!36=|
|00003390| 31 3a 6d 73 67 62 6c 6b | 25 21 34 30 3d 6d 73 67 |1:msgblk|%!40=msg|
|000033a0| 62 6c 6b 25 21 31 32 0d | 0c ee 19 6d 73 67 62 6c |blk%!12.|...msgbl|
|000033b0| 6b 25 21 34 34 3d 6d 73 | 67 62 6c 6b 25 21 31 36 |k%!44=ms|gblk%!16|
|000033c0| 0d 0c f8 17 6d 73 67 62 | 6c 6b 25 21 34 38 3d 21 |....msgb|lk%!48=!|
|000033d0| 6d 73 67 62 6c 6b 25 0d | 0d 02 18 6d 73 67 62 6c |msgblk%.|...msgbl|
|000033e0| 6b 25 21 35 32 3d 6d 73 | 67 62 6c 6b 25 21 34 0d |k%!52=ms|gblk%!4.|
|000033f0| 0d 0c 13 6d 73 67 62 6c | 6b 25 21 35 36 3d 26 31 |...msgbl|k%!56=&1|
|00003400| 30 30 0d 0d 16 1b 6d 73 | 67 62 6c 6b 25 21 36 30 |00....ms|gblk%!60|
|00003410| 3d 6d 79 5f 66 69 6c 65 | 74 79 70 65 25 0d 0d 20 |=my_file|type%.. |
|00003420| 32 24 28 6d 73 67 62 6c | 6b 25 2b 36 34 29 3d a4 |2$(msgbl|k%+64)=.|
|00003430| 6c 65 61 66 28 a4 69 63 | 6f 6e 5f 67 65 74 64 61 |leaf(.ic|on_getda|
|00003440| 74 61 28 71 25 2c 73 61 | 76 65 25 2c 34 29 29 0d |ta(q%,sa|ve%,4)).|
|00003450| 0d 2a 3d c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |.*=.. "W|imp_Send|
|00003460| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 6d 73 67 62 |Message"|,17,msgb|
|00003470| 6c 6b 25 2b 32 30 2c 6d | 73 67 62 6c 6b 25 21 31 |lk%+20,m|sgblk%!1|
|00003480| 32 2c 6d 73 67 62 6c 6b | 25 21 31 36 0d 0d 34 06 |2,msgblk|%!16..4.|
|00003490| 3d 30 0d 0d 3e 04 0d 0d | 48 14 dd f2 65 78 74 72 |=0..>...|H...extr|
|000034a0| 61 63 74 66 61 63 74 6f | 72 73 0d 0d 52 34 f2 69 |actfacto|rs..R4.i|
|000034b0| 63 6f 6e 5f 70 75 74 64 | 61 74 61 28 71 25 2c 6d |con_putd|ata(q%,m|
|000034c0| 61 69 6e 25 2c 35 2c 22 | 45 78 74 72 61 63 74 69 |ain%,5,"|Extracti|
|000034d0| 6e 67 20 66 61 63 74 6f | 72 73 22 2c 31 29 0d 0d |ng facto|rs",1)..|
|000034e0| 5c 34 f2 69 63 6f 6e 5f | 70 75 74 64 61 74 61 28 |\4.icon_|putdata(|
|000034f0| 71 25 2c 6d 61 69 6e 25 | 2c 35 2c 22 45 78 74 72 |q%,main%|,5,"Extr|
|00003500| 61 63 74 69 6e 67 20 66 | 61 63 74 6f 72 73 22 2c |acting f|actors",|
|00003510| 31 29 0d 0d 66 26 6e 75 | 6d 62 65 72 74 24 3d a4 |1)..f&nu|mbert$=.|
|00003520| 69 63 6f 6e 5f 67 65 74 | 64 61 74 61 28 71 25 2c |icon_get|data(q%,|
|00003530| 6d 61 69 6e 25 2c 31 29 | 0d 0d 70 49 e7 20 6e 75 |main%,1)|..pI. nu|
|00003540| 6d 62 65 72 74 24 3d 22 | 22 20 8c 20 f2 69 63 6f |mbert$="|" . .ico|
|00003550| 6e 5f 70 75 74 64 61 74 | 61 28 71 25 2c 6d 61 69 |n_putdat|a(q%,mai|
|00003560| 6e 25 2c 35 2c 22 50 6c | 65 61 73 65 20 65 6e 74 |n%,5,"Pl|ease ent|
|00003570| 65 72 20 61 20 6e 75 6d | 62 65 72 22 2c 31 29 3a |er a num|ber",1):|
|00003580| e1 0d 0d 7a 17 6e 75 6d | 62 65 72 25 3d bb 28 6e |...z.num|ber%=.(n|
|00003590| 75 6d 62 65 72 74 24 29 | 0d 0d 84 12 73 65 6e 64 |umbert$)|....send|
|000035a0| 74 6f 66 69 6c 65 24 3d | 22 22 0d 0d 8e 15 c8 99 |tofile$=|""......|
|000035b0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d | "Hourgl|ass_On".|
|000035c0| 0d 98 16 e3 20 76 61 72 | 61 3d 31 20 b8 20 6e 75 |.... var|a=1 . nu|
|000035d0| 6d 62 65 72 25 0d 0d 9d | 32 20 20 c8 99 20 22 48 |mber%...|2  .. "H|
|000035e0| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|000035f0| 61 67 65 22 2c 28 76 61 | 72 61 2f 6e 75 6d 62 65 |age",(va|ra/numbe|
|00003600| 72 25 29 2a 31 30 30 0d | 0d a2 18 20 20 e3 20 76 |r%)*100.|...  . v|
|00003610| 61 72 62 3d 31 20 b8 20 | 6e 75 6d 62 65 72 25 0d |arb=1 . |number%.|
|00003620| 0d ac 45 20 20 20 20 e7 | 20 6e 75 6d 62 65 72 25 |..E    .| number%|
|00003630| 2f 76 61 72 61 3d 76 61 | 72 62 20 8c 20 73 65 6e |/vara=va|rb . sen|
|00003640| 64 74 6f 66 69 6c 65 24 | 3d 73 65 6e 64 74 6f 66 |dtofile$|=sendtof|
|00003650| 69 6c 65 24 2b 22 22 2b | c3 28 76 61 72 61 29 2b |ile$+""+|.(vara)+|
|00003660| 22 2c 20 22 0d 0d b6 0c | 20 20 ed 20 76 61 72 62 |", "....|  . varb|
|00003670| 0d 0d c0 0a ed 20 76 61 | 72 61 0d 0d ca 16 c8 99 |..... va|ra......|
|00003680| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00003690| 0d 0d d4 3c f2 69 63 6f | 6e 5f 70 75 74 64 61 74 |...<.ico|n_putdat|
|000036a0| 61 28 71 25 2c 6d 61 69 | 6e 25 2c 35 2c 22 46 69 |a(q%,mai|n%,5,"Fi|
|000036b0| 6e 69 73 68 65 64 2c 20 | 70 6c 65 61 73 65 20 73 |nished, |please s|
|000036c0| 61 76 65 20 66 69 6c 65 | 22 2c 31 29 0d 0d de 05 |ave file|",1)....|
|000036d0| e1 0d 0d e8 04 0d 0d f2 | 0b 28 6d 65 6e 75 24 29 |........|.(menu$)|
|000036e0| 0d 0d fc 0b ea 20 76 6f | 69 64 25 0d 0e 06 0e c8 |..... vo|id%.....|
|000036f0| 8e 20 6d 65 6e 75 24 20 | ca 0d 0e 10 28 20 20 c9 |. menu$ |....(  .|
|00003700| 20 22 73 69 63 6f 6e 22 | 20 3a 76 6f 69 64 25 3d | "sicon"| :void%=|
|00003710| a4 6d 65 6e 75 73 65 6c | 65 63 74 5f 73 69 63 6f |.menusel|ect_sico|
|00003720| 6e 0d 0e 1a 05 cb 0d 0e | 24 05 e1 0d 0e 2e 04 0d |n.......|$.......|
|00003730| 0e 38 16 dd a4 6d 65 6e | 75 73 65 6c 65 63 74 5f |.8...men|uselect_|
|00003740| 73 69 63 6f 6e 0d 0e 42 | 0c ea 20 6c 65 76 65 6c |sicon..B|.. level|
|00003750| 30 0d 0e 4c 0f 6c 65 76 | 65 6c 30 3d 71 25 21 30 |0..L.lev|el0=q%!0|
|00003760| 0d 0e 56 0f c8 8e 20 6c | 65 76 65 6c 30 20 ca 0d |..V... l|evel0 ..|
|00003770| 0e 60 22 20 20 c9 20 30 | 20 3a f2 6f 70 65 6e 77 |.`"  . 0| :.openw|
|00003780| 69 6e 64 6f 77 28 69 6e | 66 6f 25 2c a3 2c 2d 31 |indow(in|fo%,.,-1|
|00003790| 29 0d 0e 6a 15 20 20 c9 | 20 31 20 3a f2 63 6c 6f |)..j.  .| 1 :.clo|
|000037a0| 73 65 64 6f 77 6e 0d 0e | 74 05 cb 0d 0e 7e 06 3d |sedown..|t....~.=|
|000037b0| 30 0d 0e 88 04 0d 0e 92 | 11 dd f2 64 61 74 61 73 |0.......|...datas|
|000037c0| 61 76 65 28 62 29 0d 0e | 9c 1b f2 73 61 76 65 66 |ave(b)..|...savef|
|000037d0| 69 6c 65 28 a4 67 6e 61 | 6d 65 28 62 2b 34 34 29 |ile(.gna|me(b+44)|
|000037e0| 29 0d 0e a6 19 62 21 31 | 32 3d 62 21 38 3a 62 21 |)....b!1|2=b!8:b!|
|000037f0| 31 36 3d 33 3a 21 62 3d | 36 34 0d 0e b0 28 c8 99 |16=3:!b=|64...(..|
|00003800| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|00003810| 67 65 22 2c 31 37 2c 62 | 2c 62 21 32 30 2c 62 21 |ge",17,b|,b!20,b!|
|00003820| 32 34 0d 0e ba 05 e1 0d | 0e c4 04 0d 0e ce 15 dd |24......|........|
|00003830| f2 73 61 76 65 66 69 6c | 65 28 66 69 6c 65 24 29 |.savefil|e(file$)|
|00003840| 0d 0e d8 08 ea 20 58 25 | 0d 0e e2 27 e7 20 28 a7 |..... X%|...'. (.|
|00003850| 66 69 6c 65 24 2c 22 2e | 22 29 3d 30 20 80 20 a7 |file$,".|")=0 . .|
|00003860| 66 69 6c 65 24 2c 22 3a | 22 29 3d 30 29 20 8c 0d |file$,":|")=0) ..|
|00003870| 0e ec 86 20 20 20 20 20 | 3a 20 c8 99 20 22 57 69 |...     |: .. "Wi|
|00003880| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00003890| 22 2e 2e 2e 2e 54 6f 20 | 73 61 76 65 2c 20 70 6c |"....To |save, pl|
|000038a0| 65 61 73 65 20 64 72 61 | 67 20 74 68 65 20 74 65 |ease dra|g the te|
|000038b0| 78 74 20 69 63 6f 6e 20 | 74 6f 20 61 20 64 69 72 |xt icon |to a dir|
|000038c0| 65 63 74 6f 72 79 20 76 | 69 65 77 65 72 22 2c 26 |ectory v|iewer",&|
|000038d0| 31 34 2c 22 4d 65 73 73 | 61 67 65 20 66 72 6f 6d |14,"Mess|age from|
|000038e0| 20 46 61 63 74 6f 72 73 | 22 20 b8 20 72 65 73 70 | Factors|" . resp|
|000038f0| 6f 6e 73 65 25 0d 0e f6 | 0c 20 20 20 20 20 3a 20 |onse%...|.     : |
|00003900| e1 0d 0f 00 05 cd 0d 0f | 0a 15 c8 99 20 22 48 6f |........|.... "Ho|
|00003910| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 0f 14 0e 45 |urglass_|On"....E|
|00003920| 78 65 63 25 3d 71 25 21 | 30 0d 0f 1e 0e 4c 6f 61 |xec%=q%!|0....Loa|
|00003930| 64 25 3d 71 25 3f 34 0d | 0f 28 30 4c 6f 61 64 25 |d%=q%?4.|.(0Load%|
|00003940| 3d 28 4c 6f 61 64 25 20 | 80 20 26 46 46 29 20 84 |=(Load% |. &FF) .|
|00003950| 20 28 26 46 46 46 3c 3c | 32 30 29 20 84 20 28 26 | (&FFF<<|20) . (&|
|00003960| 46 46 46 3c 3c 38 29 0d | 0f 32 28 c8 99 20 22 4f |FFF<<8).|.2(.. "O|
|00003970| 53 5f 46 69 6c 65 22 2c | 37 2c 66 69 6c 65 24 2c |S_File",|7,file$,|
|00003980| 4c 6f 61 64 25 2c 45 78 | 65 63 25 2c 30 2c 30 0d |Load%,Ex|ec%,0,0.|
|00003990| 0f 3c 22 c8 99 20 22 4f | 53 5f 46 69 6e 64 22 2c |.<".. "O|S_Find",|
|000039a0| 32 30 34 2c 66 69 6c 65 | 24 20 b8 20 63 68 61 6e |204,file|$ . chan|
|000039b0| 25 0d 0f 46 29 d5 23 63 | 68 61 6e 25 2c 22 46 61 |%..F).#c|han%,"Fa|
|000039c0| 63 74 6f 72 73 20 70 72 | 6f 67 72 61 6d 20 6f 75 |ctors pr|ogram ou|
|000039d0| 74 70 75 74 20 66 69 6c | 65 22 0d 0f 50 29 d5 23 |tput fil|e"..P).#|
|000039e0| 63 68 61 6e 25 2c 22 2d | 2d 2d 2d 2d 2d 2d 2d 2d |chan%,"-|--------|
|000039f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a00| 2d 2d 22 0d 0f 5a 0f d5 | 23 63 68 61 6e 25 2c 22 |--"..Z..|#chan%,"|
|00003a10| 20 22 0d 0f 64 22 d5 23 | 63 68 61 6e 25 2c 22 46 | "..d".#|chan%,"F|
|00003a20| 69 6c 65 20 67 65 6e 65 | 72 61 74 65 64 20 3a 20 |ile gene|rated : |
|00003a30| 22 2b 91 24 0d 0f 6e 0f | d5 23 63 68 61 6e 25 2c |"+.$..n.|.#chan%,|
|00003a40| 22 20 22 0d 0f 78 46 d5 | 23 63 68 61 6e 25 2c 22 |" "..xF.|#chan%,"|
|00003a50| 42 61 73 65 20 6e 75 6d | 62 65 72 20 74 68 61 74 |Base num|ber that|
|00003a60| 20 66 61 63 74 6f 72 73 | 20 77 65 72 65 20 65 78 | factors| were ex|
|00003a70| 74 72 61 63 74 65 64 20 | 66 72 6f 6d 20 3a 20 22 |tracted |from : "|
|00003a80| 2b 6e 75 6d 62 65 72 74 | 24 0d 0f 82 0f d5 23 63 |+numbert|$.....#c|
|00003a90| 68 61 6e 25 2c 22 20 22 | 0d 0f 8c 24 d5 23 63 68 |han%," "|...$.#ch|
|00003aa0| 61 6e 25 2c 22 46 61 63 | 74 6f 72 73 20 3a 20 22 |an%,"Fac|tors : "|
|00003ab0| 2b 73 65 6e 64 74 6f 66 | 69 6c 65 24 0d 0f 96 0b |+sendtof|ile$....|
|00003ac0| d9 23 63 68 61 6e 25 0d | 0f a0 1e ff 20 22 53 65 |.#chan%.|.... "Se|
|00003ad0| 74 54 79 70 65 20 22 2b | 66 69 6c 65 24 2b 22 20 |tType "+|file$+" |
|00003ae0| 26 46 46 46 22 0d 0f a5 | 25 f2 69 63 6f 6e 5f 70 |&FFF"...|%.icon_p|
|00003af0| 75 74 64 61 74 61 28 71 | 25 2c 73 61 76 65 25 2c |utdata(q|%,save%,|
|00003b00| 34 2c 66 69 6c 65 24 2c | 31 29 0d 0f aa 16 c8 99 |4,file$,|1)......|
|00003b10| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00003b20| 0d 0f b4 05 e1 0d 0f be | 04 0d 1a d6 16 dd f2 77 |........|.......w|
|00003b30| 68 69 63 68 6d 65 6e 75 | 28 6d 65 6e 75 24 29 0d |hichmenu|(menu$).|
|00003b40| 1a e0 0b ea 20 76 6f 69 | 64 25 0d 1a ea 0e c8 8e |.... voi|d%......|
|00003b50| 20 6d 65 6e 75 24 20 ca | 0d 1a fe 28 20 20 c9 20 | menu$ .|...(  . |
|00003b60| 22 73 69 63 6f 6e 22 20 | 3a 76 6f 69 64 25 3d a4 |"sicon" |:void%=.|
|00003b70| 6d 65 6e 75 73 65 6c 65 | 63 74 5f 73 69 63 6f 6e |menusele|ct_sicon|
|00003b80| 0d 1b 08 05 cb 0d 1b 12 | 05 e1 0d 1b 1c 05 3a 0d |........|......:.|
|00003b90| 1b 26 1e dd f2 63 6c 69 | 63 6b 69 6e 66 6f 28 62 |.&...cli|ckinfo(b|
|00003ba0| 75 74 74 6f 6e 25 2c 69 | 63 6f 6e 25 29 0d 1b 30 |utton%,i|con%)..0|
|00003bb0| 0a c8 8e 20 b9 20 ca 0d | 1b 3a 3f c9 20 28 62 75 |... . ..|.:?. (bu|
|00003bc0| 74 74 6f 6e 25 20 80 20 | 34 29 3d 34 20 80 20 69 |tton% . |4)=4 . i|
|00003bd0| 63 6f 6e 25 3c 3e 2d 31 | 20 84 20 28 62 75 74 74 |con%<>-1| . (butt|
|00003be0| 6f 6e 25 20 80 20 31 29 | 3d 31 20 80 20 69 63 6f |on% . 1)|=1 . ico|
|00003bf0| 6e 25 3c 3e 2d 31 0d 1b | 44 10 20 20 c8 8e 20 69 |n%<>-1..|D.  .. i|
|00003c00| 63 6f 6e 25 20 ca 0d 1b | 4e 16 20 20 20 20 c9 20 |con% ...|N.    . |
|00003c10| 32 20 3a f2 73 6c 61 62 | 69 63 6f 6e 0d 1b 56 25 |2 :.slab|icon..V%|
|00003c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 6f 70 65 |        |    .ope|
|00003c30| 6e 77 69 6e 64 6f 77 28 | 6d 65 25 2c a3 2c 2d 31 |nwindow(|me%,.,-1|
|00003c40| 29 0d 1b 58 07 20 20 cb | 0d 1b 62 05 cb 0d 1b 6c |)..X.  .|..b....l|
|00003c50| 05 e1 0d 1b 76 04 0d 1b | 80 1c dd f2 63 6c 69 63 |....v...|....clic|
|00003c60| 6b 6d 65 28 62 75 74 74 | 6f 6e 25 2c 69 63 6f 6e |kme(butt|on%,icon|
|00003c70| 25 29 0d 1b 8a 0a c8 8e | 20 b9 20 ca 0d 1b 94 3f |%)......| . ....?|
|00003c80| c9 20 28 62 75 74 74 6f | 6e 25 20 80 20 34 29 3d |. (butto|n% . 4)=|
|00003c90| 34 20 80 20 69 63 6f 6e | 25 3c 3e 2d 31 20 84 20 |4 . icon|%<>-1 . |
|00003ca0| 28 62 75 74 74 6f 6e 25 | 20 80 20 31 29 3d 31 20 |(button%| . 1)=1 |
|00003cb0| 80 20 69 63 6f 6e 25 3c | 3e 2d 31 0d 1b 9e 10 20 |. icon%<|>-1.... |
|00003cc0| 20 c8 8e 20 69 63 6f 6e | 25 20 ca 0d 1b a8 17 20 | .. icon|% ..... |
|00003cd0| 20 20 20 c9 20 31 32 20 | 3a f2 73 6c 61 62 69 63 |   . 12 |:.slabic|
|00003ce0| 6f 6e 0d 1b b2 22 20 20 | 20 20 20 20 20 20 20 20 |on..."  |        |
|00003cf0| 20 20 20 f2 63 6c 6f 73 | 65 77 69 6e 64 6f 77 28 |   .clos|ewindow(|
|00003d00| 6d 65 25 29 0d 1b bc 08 | 20 20 20 cb 0d 1b c6 05 |me%)....|   .....|
|00003d10| cb 0d 1b d0 05 e1 0d ff | 46 69 6c 65 44 61 74 61 |........|FileData|
|00003d20| 82 21 52 75 6e 49 6d 61 | 67 65 54 00 e2 2c 00 00 |.!RunIma|geT..,..|
|00003d30| 43 ff ff ff b3 23 e9 d0 | 03 00 c0 4f 31 30 52 45 |C....#..|...O10RE|
|00003d40| 4d 20 3e 20 3c 46 61 63 | 74 6f 72 73 24 44 69 72 |M > <Fac|tors$Dir|
|00003d50| 3e 2e 21 52 75 6e 49 6d | 61 67 65 0a 32 30 0a 33 |>.!RunIm|age.20.3|
|00003d60| 30 44 49 4d 20 71 25 20 | 32 35 30 30 0a 34 30 24 |0DIM q% |2500.40$|
|00003d70| 71 25 3d 22 54 41 53 4b | 22 0a 35 30 53 59 53 20 |q%="TASK|".50SYS |
|00003d80| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|00003d90| 22 2c 32 30 30 2c 21 71 | 25 2c 22 46 61 63 74 6f |",200,!q|%,"Facto|
|00003da0| 72 73 22 20 54 4f 20 2c | 74 61 73 6b 25 0a 36 30 |rs" TO ,|task%.60|
|00003db0| 53 59 53 20 22 57 69 6d | 70 5f 43 6c 61 69 6d 49 |SYS "Wim|p_ClaimI|
|00003dc0| 6e 74 65 72 66 61 63 65 | 22 2c 74 61 73 6b 25 0a |nterface|",task%.|
|00003dd0| 37 30 53 59 53 20 22 48 | 6f 75 72 67 6c 61 73 73 |70SYS "H|ourglass|
|00003de0| 5f 4f 6e 22 0a 38 30 3a | 0a 39 30 53 25 3d 4f 50 |_On".80:|.90S%=OP|
|00003df0| 45 4e 49 4e 20 22 3c 46 | 61 63 74 6f 72 73 24 44 |ENIN "<F|actors$D|
|00003e00| 69 72 3e 2e 21 53 70 72 | 69 74 65 73 22 3a 54 25 |ir>.!Spr|ites":T%|
|00003e10| 3d 45 58 54 23 53 25 2b | 31 36 3a 43 4c 4f 53 45 |=EXT#S%+|16:CLOSE|
|00003e20| 20 23 53 25 0a 31 30 30 | 44 49 4d 20 73 70 20 54 | #S%.100|DIM sp T|
|00003e30| 25 3a 21 73 70 3d 54 25 | 3a 73 70 21 34 3d 30 0a |%:!sp=T%|:sp!4=0.|
|00003e40| 31 31 30 73 70 21 38 3d | 31 36 3a 73 70 21 31 32 |110sp!8=|16:sp!12|
|00003e50| 3d 31 36 0a 31 32 30 53 | 59 53 20 22 4f 53 5f 53 |=16.120S|YS "OS_S|
|00003e60| 70 72 69 74 65 4f 70 22 | 2c 26 32 30 39 2c 73 70 |priteOp"|,&209,sp|
|00003e70| 0a 31 33 30 53 59 53 20 | 22 4f 53 5f 53 70 72 69 |.130SYS |"OS_Spri|
|00003e80| 74 65 4f 70 22 2c 26 32 | 30 41 2c 73 70 2c 22 3c |teOp",&2|0A,sp,"<|
|00003e90| 46 61 63 74 6f 72 73 24 | 44 69 72 3e 2e 21 53 70 |Factors$|Dir>.!Sp|
|00003ea0| 72 69 74 65 73 22 0a 31 | 34 30 73 69 63 6f 6e 3d |rites".1|40sicon=|
|00003eb0| 46 4e 69 63 6f 6e 5f 63 | 72 65 61 74 65 28 2d 31 |FNicon_c|reate(-1|
|00003ec0| 2c 30 2c 30 2c 36 38 2c | 36 38 2c 30 2c 30 2c 26 |,0,0,68,|68,0,0,&|
|00003ed0| 33 30 30 32 2c 22 21 46 | 61 63 74 6f 72 73 22 29 |3002,"!F|actors")|
|00003ee0| 0a 31 35 30 3a 0a 31 36 | 30 44 49 4d 20 74 65 78 |.150:.16|0DIM tex|
|00003ef0| 74 24 28 35 30 29 2c 73 | 65 74 74 69 6e 67 28 35 |t$(50),s|etting(5|
|00003f00| 30 29 2c 66 6c 61 67 73 | 28 35 30 29 0a 31 37 30 |0),flags|(50).170|
|00003f10| 44 49 4d 20 73 75 62 6d | 65 6e 75 28 35 30 29 2c |DIM subm|enu(50),|
|00003f20| 72 65 66 28 35 30 29 2c | 6d 65 6e 75 70 6f 73 28 |ref(50),|menupos(|
|00003f30| 32 30 29 0a 31 38 30 44 | 49 4d 20 6d 65 6e 75 25 |20).180D|IM menu%|
|00003f40| 20 35 31 32 0a 31 39 30 | 44 49 4d 20 69 6e 64 69 | 512.190|DIM indi|
|00003f50| 72 65 63 74 25 20 26 32 | 30 30 30 0a 32 30 30 44 |rect% &2|000.200D|
|00003f60| 49 4d 20 6d 73 67 62 6c | 6b 25 20 32 35 36 0a 32 |IM msgbl|k% 256.2|
|00003f70| 31 30 73 65 6e 64 74 6f | 66 69 6c 65 24 3d 22 22 |10sendto|file$=""|
|00003f80| 0a 32 32 30 6d 79 5f 66 | 69 6c 65 74 79 70 65 25 |.220my_f|iletype%|
|00003f90| 3d 26 46 46 46 0a 32 33 | 30 6e 75 6d 62 65 72 74 |=&FFF.23|0numbert|
|00003fa0| 24 3d 22 22 0a 32 34 30 | 69 70 74 72 25 3d 69 6e |$="".240|iptr%=in|
|00003fb0| 64 69 72 65 63 74 25 3a | 69 65 6e 64 25 3d 69 70 |direct%:|iend%=ip|
|00003fc0| 74 72 25 2b 26 32 30 30 | 30 0a 32 35 30 4f 4e 20 |tr%+&200|0.250ON |
|00003fd0| 45 52 52 4f 52 20 4f 53 | 43 4c 49 20 22 45 72 72 |ERROR OS|CLI "Err|
|00003fe0| 6f 72 20 22 2b 52 45 50 | 4f 52 54 24 2b 22 20 3a |or "+REP|ORT$+" :|
|00003ff0| 20 22 2b 53 54 52 24 28 | 45 52 4c 29 0a 32 36 30 | "+STR$(|ERL).260|
|00004000| 3a 0a 32 37 30 50 52 4f | 43 6f 70 65 6e 74 65 6d |:.270PRO|Copentem|
|00004010| 70 6c 61 74 65 66 69 6c | 65 28 22 3c 46 61 63 74 |platefil|e("<Fact|
|00004020| 6f 72 73 24 44 69 72 3e | 2e 54 65 6d 70 6c 61 74 |ors$Dir>|.Templat|
|00004030| 65 73 22 29 0a 32 38 30 | 50 52 4f 43 6c 6f 61 64 |es").280|PROCload|
|00004040| 74 65 6d 70 6c 61 74 65 | 28 22 6d 61 69 6e 22 29 |template|("main")|
|00004050| 0a 32 39 30 53 59 53 20 | 22 57 69 6d 70 5f 43 72 |.290SYS |"Wimp_Cr|
|00004060| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 71 25 20 |eateWind|ow",,q% |
|00004070| 54 4f 20 6d 61 69 6e 25 | 0a 33 30 30 50 52 4f 43 |TO main%|.300PROC|
|00004080| 6c 6f 61 64 74 65 6d 70 | 6c 61 74 65 28 22 69 6e |loadtemp|late("in|
|00004090| 66 6f 22 29 0a 33 31 30 | 53 59 53 20 22 57 69 6d |fo").310|SYS "Wim|
|000040a0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|000040b0| 2c 71 25 20 54 4f 20 69 | 6e 66 6f 25 0a 33 32 30 |,q% TO i|nfo%.320|
|000040c0| 50 52 4f 43 6c 6f 61 64 | 74 65 6d 70 6c 61 74 65 |PROCload|template|
|000040d0| 28 22 73 61 76 65 22 29 | 0a 33 33 30 53 59 53 20 |("save")|.330SYS |
|000040e0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|000040f0| 6f 77 22 2c 2c 71 25 20 | 54 4f 20 73 61 76 65 25 |ow",,q% |TO save%|
|00004100| 0a 33 33 31 50 52 4f 43 | 6c 6f 61 64 74 65 6d 70 |.331PROC|loadtemp|
|00004110| 6c 61 74 65 61 73 64 28 | 22 6d 65 22 29 0a 33 33 |lateasd(|"me").33|
|00004120| 32 53 59 53 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |2SYS "Wi|mp_Creat|
|00004130| 65 57 69 6e 64 6f 77 22 | 2c 2c 71 25 20 54 4f 20 |eWindow"|,,q% TO |
|00004140| 6d 65 25 0a 33 34 30 50 | 52 4f 43 63 6c 6f 73 65 |me%.340P|ROCclose|
|00004150| 74 65 6d 70 6c 61 74 65 | 66 69 6c 65 0a 33 35 30 |template|file.350|
|00004160| 3a 0a 33 36 30 50 52 4f | 43 69 63 6f 6e 5f 70 75 |:.360PRO|Cicon_pu|
|00004170| 74 64 61 74 61 28 71 25 | 2c 6d 61 69 6e 25 2c 35 |tdata(q%|,main%,5|
|00004180| 2c 22 52 65 61 64 79 22 | 2c 30 29 0a 33 37 30 53 |,"Ready"|,0).370S|
|00004190| 59 53 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |YS "Hour|glass_Of|
|000041a0| 66 22 0a 33 38 30 52 45 | 50 45 41 54 0a 33 39 30 |f".380RE|PEAT.390|
|000041b0| 20 20 50 52 4f 43 61 63 | 74 69 6f 6e 28 46 4e 70 |  PROCac|tion(FNp|
|000041c0| 6f 6c 6c 28 30 29 29 0a | 34 30 30 55 4e 54 49 4c |oll(0)).|400UNTIL|
|000041d0| 20 46 41 4c 53 45 0a 34 | 31 30 3a 0a 34 32 30 44 | FALSE.4|10:.420D|
|000041e0| 45 46 50 52 4f 43 63 6c | 6f 73 65 64 6f 77 6e 0a |EFPROCcl|osedown.|
|000041f0| 34 33 30 24 71 25 3d 22 | 54 41 53 4b 22 0a 34 34 |430$q%="|TASK".44|
|00004200| 30 53 59 53 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |0SYS "Wi|mp_Close|
|00004210| 44 6f 77 6e 22 2c 74 61 | 73 6b 25 2c 71 25 21 30 |Down",ta|sk%,q%!0|
|00004220| 0a 34 35 30 45 4e 44 0a | 34 36 30 45 4e 44 50 52 |.450END.|460ENDPR|
|00004230| 4f 43 0a 34 37 30 3a 0a | 34 38 30 44 45 46 50 52 |OC.470:.|480DEFPR|
|00004240| 4f 43 63 6c 69 63 6b 77 | 69 6e 64 6f 77 28 6d 6f |OCclickw|indow(mo|
|00004250| 75 73 65 78 25 2c 6d 6f | 75 73 65 79 25 2c 62 75 |usex%,mo|usey%,bu|
|00004260| 74 74 6f 6e 25 2c 68 61 | 6e 64 6c 65 25 2c 69 63 |tton%,ha|ndle%,ic|
|00004270| 6f 6e 25 2c 6f 62 25 29 | 0a 34 39 30 43 41 53 45 |on%,ob%)|.490CASE|
|00004280| 20 68 61 6e 64 6c 65 25 | 20 4f 46 0a 35 30 30 20 | handle%| OF.500 |
|00004290| 20 57 48 45 4e 20 6d 61 | 69 6e 25 20 3a 50 52 4f | WHEN ma|in% :PRO|
|000042a0| 43 63 6c 69 63 6b 6d 61 | 69 6e 28 62 75 74 74 6f |Cclickma|in(butto|
|000042b0| 6e 25 2c 69 63 6f 6e 25 | 29 0a 35 31 30 20 20 57 |n%,icon%|).510  W|
|000042c0| 48 45 4e 20 73 61 76 65 | 25 20 3a 50 52 4f 43 63 |HEN save|% :PROCc|
|000042d0| 6c 69 63 6b 73 61 76 65 | 28 62 75 74 74 6f 6e 25 |licksave|(button%|
|000042e0| 2c 69 63 6f 6e 25 29 0a | 35 31 35 20 20 57 48 45 |,icon%).|515  WHE|
|000042f0| 4e 20 69 6e 66 6f 25 20 | 3a 50 52 4f 43 63 6c 69 |N info% |:PROCcli|
|00004300| 63 6b 69 6e 66 6f 28 62 | 75 74 74 6f 6e 25 2c 69 |ckinfo(b|utton%,i|
|00004310| 63 6f 6e 25 29 0a 35 31 | 36 20 20 57 48 45 4e 20 |con%).51|6  WHEN |
|00004320| 6d 65 25 20 20 20 3a 50 | 52 4f 43 63 6c 69 63 6b |me%   :P|ROCclick|
|00004330| 6d 65 28 62 75 74 74 6f | 6e 25 2c 69 63 6f 6e 25 |me(butto|n%,icon%|
|00004340| 29 0a 35 32 30 20 20 57 | 48 45 4e 20 2d 32 20 20 |).520  W|HEN -2  |
|00004350| 20 20 3a 50 52 4f 43 63 | 6c 69 63 6b 69 63 6f 6e |  :PROCc|lickicon|
|00004360| 62 61 72 28 62 75 74 74 | 6f 6e 25 2c 69 63 6f 6e |bar(butt|on%,icon|
|00004370| 25 29 0a 35 33 30 45 4e | 44 43 41 53 45 0a 35 34 |%).530EN|DCASE.54|
|00004380| 30 45 4e 44 50 52 4f 43 | 0a 35 35 30 3a 0a 35 36 |0ENDPROC|.550:.56|
|00004390| 30 44 45 46 50 52 4f 43 | 63 6c 69 63 6b 69 63 6f |0DEFPROC|clickico|
|000043a0| 6e 62 61 72 28 62 75 74 | 74 6f 6e 25 2c 69 63 6f |nbar(but|ton%,ico|
|000043b0| 6e 25 29 0a 35 37 30 49 | 46 20 69 63 6f 6e 25 3c |n%).570I|F icon%<|
|000043c0| 30 20 54 48 45 4e 20 45 | 4e 44 50 52 4f 43 0a 35 |0 THEN E|NDPROC.5|
|000043d0| 38 30 43 41 53 45 20 54 | 52 55 45 20 4f 46 0a 35 |80CASE T|RUE OF.5|
|000043e0| 39 30 20 20 57 48 45 4e | 20 62 75 74 74 6f 6e 25 |90  WHEN| button%|
|000043f0| 3d 32 0a 36 30 30 20 20 | 20 20 49 46 20 69 63 6f |=2.600  |  IF ico|
|00004400| 6e 25 3d 73 69 63 6f 6e | 20 54 48 45 4e 0a 36 31 |n%=sicon| THEN.61|
|00004410| 30 20 20 20 20 20 20 50 | 52 4f 43 6d 65 6e 75 5f |0      P|ROCmenu_|
|00004420| 73 69 63 6f 6e 0a 36 32 | 30 20 20 20 20 45 4e 44 |sicon.62|0    END|
|00004430| 49 46 0a 36 33 30 20 20 | 57 48 45 4e 20 62 75 74 |IF.630  |WHEN but|
|00004440| 74 6f 6e 25 3d 34 0a 36 | 34 30 20 20 20 20 20 20 |ton%=4.6|40      |
|00004450| 50 52 4f 43 6f 70 65 6e | 77 69 6e 64 6f 77 28 6d |PROCopen|window(m|
|00004460| 61 69 6e 25 2c 46 41 4c | 53 45 2c 2d 31 29 0a 36 |ain%,FAL|SE,-1).6|
|00004470| 35 30 20 20 20 20 20 20 | 6f 70 65 6e 25 3d 54 52 |50      |open%=TR|
|00004480| 55 45 0a 36 36 30 20 20 | 20 20 45 4e 44 49 46 0a |UE.660  |  ENDIF.|
|00004490| 36 37 30 45 4e 44 43 41 | 53 45 0a 36 38 30 45 4e |670ENDCA|SE.680EN|
|000044a0| 44 50 52 4f 43 0a 36 39 | 30 3a 0a 37 30 30 44 45 |DPROC.69|0:.700DE|
|000044b0| 46 50 52 4f 43 6d 65 6e | 75 5f 73 69 63 6f 6e 0a |FPROCmen|u_sicon.|
|000044c0| 37 31 30 6e 6f 3d 30 3a | 4d 4f 55 53 45 20 78 2c |710no=0:|MOUSE x,|
|000044d0| 79 2c 62 0a 37 32 30 50 | 52 4f 43 64 65 66 69 6e |y,b.720P|ROCdefin|
|000044e0| 65 5f 6d 65 6e 75 5f 74 | 65 78 74 28 22 49 6e 66 |e_menu_t|ext("Inf|
|000044f0| 6f 22 2c 6e 6f 2c 30 2c | 30 2c 30 2c 30 2c 26 31 |o",no,0,|0,0,0,&1|
|00004500| 30 30 32 31 2c 69 6e 66 | 6f 25 2c 30 29 3a 6e 6f |0021,inf|o%,0):no|
|00004510| 2b 3d 31 0a 37 33 30 50 | 52 4f 43 64 65 66 69 6e |+=1.730P|ROCdefin|
|00004520| 65 5f 6d 65 6e 75 5f 74 | 65 78 74 28 22 51 75 69 |e_menu_t|ext("Qui|
|00004530| 74 22 2c 6e 6f 2c 30 2c | 30 2c 30 2c 30 2c 26 31 |t",no,0,|0,0,0,&1|
|00004540| 30 30 32 31 2c 30 2c 2d | 31 29 3a 6e 6f 2b 3d 31 |0021,0,-|1):no+=1|
|00004550| 0a 37 34 30 50 52 4f 43 | 63 72 65 61 74 65 5f 6d |.740PROC|create_m|
|00004560| 65 6e 75 28 22 46 61 63 | 74 6f 72 73 22 2c 6e 6f |enu("Fac|tors",no|
|00004570| 2c 31 30 30 2c 78 2d 36 | 34 2c 39 36 2b 28 6e 6f |,100,x-6|4,96+(no|
|00004580| 2a 34 30 29 29 0a 37 35 | 30 6d 65 6e 75 5f 6e 72 |*40)).75|0menu_nr|
|00004590| 25 3d 30 0a 37 36 30 63 | 6c 61 69 6d 6d 65 6e 75 |%=0.760c|laimmenu|
|000045a0| 24 3d 22 73 69 63 6f 6e | 22 0a 37 37 30 45 4e 44 |$="sicon|".770END|
|000045b0| 50 52 4f 43 0a 37 38 30 | 3a 0a 37 39 30 44 45 46 |PROC.780|:.790DEF|
|000045c0| 50 52 4f 43 72 65 63 65 | 69 76 65 28 71 25 29 0a |PROCrece|ive(q%).|
|000045d0| 38 30 30 43 41 53 45 20 | 71 25 21 31 36 20 4f 46 |800CASE |q%!16 OF|
|000045e0| 0a 38 31 30 57 48 45 4e | 20 30 20 3a 50 52 4f 43 |.810WHEN| 0 :PROC|
|000045f0| 63 6c 6f 73 65 64 6f 77 | 6e 0a 38 32 30 57 48 45 |closedow|n.820WHE|
|00004600| 4e 20 32 20 3a 50 52 4f | 43 64 61 74 61 73 61 76 |N 2 :PRO|Cdatasav|
|00004610| 65 28 71 25 29 0a 38 33 | 30 45 4e 44 43 41 53 45 |e(q%).83|0ENDCASE|
|00004620| 0a 38 34 30 45 4e 44 50 | 52 4f 43 0a 38 35 30 3a |.840ENDP|ROC.850:|
|00004630| 0a 38 36 30 44 45 46 50 | 52 4f 43 6f 70 65 6e 77 |.860DEFP|ROCopenw|
|00004640| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 2c 66 75 |indow(ha|ndle%,fu|
|00004650| 6c 6c 25 2c 66 72 6f 6e | 74 25 29 0a 38 37 30 71 |ll%,fron|t%).870q|
|00004660| 25 21 30 3d 68 61 6e 64 | 6c 65 25 0a 38 38 30 49 |%!0=hand|le%.880I|
|00004670| 46 20 4e 4f 54 20 66 75 | 6c 6c 25 20 54 48 45 4e |F NOT fu|ll% THEN|
|00004680| 20 53 59 53 20 22 57 69 | 6d 70 5f 47 65 74 57 69 | SYS "Wi|mp_GetWi|
|00004690| 6e 64 6f 77 53 74 61 74 | 65 22 2c 30 2c 71 25 0a |ndowStat|e",0,q%.|
|000046a0| 38 39 30 49 46 20 66 72 | 6f 6e 74 25 20 54 48 45 |890IF fr|ont% THE|
|000046b0| 4e 20 71 25 21 32 38 3d | 2d 31 0a 39 30 30 53 59 |N q%!28=|-1.900SY|
|000046c0| 53 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |S "Wimp_|OpenWind|
|000046d0| 6f 77 22 2c 30 2c 71 25 | 0a 39 31 30 45 4e 44 50 |ow",0,q%|.910ENDP|
|000046e0| 52 4f 43 0a 39 32 30 0a | 39 33 30 44 45 46 50 52 |ROC.920.|930DEFPR|
|000046f0| 4f 43 63 6c 6f 73 65 77 | 69 6e 64 6f 77 28 68 61 |OCclosew|indow(ha|
|00004700| 6e 64 6c 65 25 29 0a 39 | 34 30 49 46 20 46 4e 6f |ndle%).9|40IF FNo|
|00004710| 6b 74 6f 63 6c 6f 73 65 | 77 28 68 61 6e 64 6c 65 |ktoclose|w(handle|
|00004720| 25 29 20 54 48 45 4e 0a | 39 35 30 20 20 71 25 21 |%) THEN.|950  q%!|
|00004730| 30 3d 68 61 6e 64 6c 65 | 25 0a 39 36 30 20 20 53 |0=handle|%.960  S|
|00004740| 59 53 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |YS "Wimp|_CloseWi|
|00004750| 6e 64 6f 77 22 2c 30 2c | 71 25 0a 39 37 30 45 4e |ndow",0,|q%.970EN|
|00004760| 44 49 46 0a 39 38 30 45 | 4e 44 50 52 4f 43 0a 39 |DIF.980E|NDPROC.9|
|00004770| 39 30 0a 31 30 30 30 44 | 45 46 46 4e 70 6f 6c 6c |90.1000D|EFFNpoll|
|00004780| 28 6d 61 73 6b 25 29 0a | 31 30 31 30 53 59 53 20 |(mask%).|1010SYS |
|00004790| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 2c 6d 61 73 6b |"Wimp_Po|ll",mask|
|000047a0| 25 2c 71 25 20 54 4f 20 | 61 25 0a 31 30 32 30 53 |%,q% TO |a%.1020S|
|000047b0| 59 53 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 50 6f 69 |YS "Wimp|_PollPoi|
|000047c0| 6e 74 65 72 22 2c 61 25 | 2c 2c 74 61 73 6b 25 0a |nter",a%|,,task%.|
|000047d0| 31 30 33 30 3d 61 25 0a | 31 30 34 30 0a 31 30 35 |1030=a%.|1040.105|
|000047e0| 30 44 45 46 50 52 4f 43 | 61 63 74 69 6f 6e 28 65 |0DEFPROC|action(e|
|000047f0| 76 6e 74 25 29 0a 31 30 | 36 30 43 41 53 45 20 65 |vnt%).10|60CASE e|
|00004800| 76 6e 74 25 20 4f 46 0a | 31 30 37 30 20 20 57 48 |vnt% OF.|1070  WH|
|00004810| 45 4e 20 30 3a 50 52 4f | 43 64 6f 5f 62 61 63 6b |EN 0:PRO|Cdo_back|
|00004820| 67 72 6f 75 6e 64 5f 74 | 61 73 6b 0a 31 30 38 30 |ground_t|ask.1080|
|00004830| 20 20 57 48 45 4e 20 31 | 3a 50 52 4f 43 72 65 64 |  WHEN 1|:PROCred|
|00004840| 72 61 77 77 69 6e 64 6f | 77 28 71 25 21 30 29 0a |rawwindo|w(q%!0).|
|00004850| 31 30 39 30 20 20 57 48 | 45 4e 20 32 3a 50 52 4f |1090  WH|EN 2:PRO|
|00004860| 43 6f 70 65 6e 77 69 6e | 64 6f 77 28 71 25 21 30 |Copenwin|dow(q%!0|
|00004870| 2c 54 52 55 45 2c 30 29 | 0a 31 31 30 30 20 20 57 |,TRUE,0)|.1100  W|
|00004880| 48 45 4e 20 33 3a 50 52 | 4f 43 63 6c 6f 73 65 77 |HEN 3:PR|OCclosew|
|00004890| 69 6e 64 6f 77 28 71 25 | 21 30 29 0a 31 31 31 30 |indow(q%|!0).1110|
|000048a0| 20 20 57 48 45 4e 20 34 | 3a 0a 31 31 32 30 20 20 |  WHEN 4|:.1120  |
|000048b0| 57 48 45 4e 20 35 3a 0a | 31 31 33 30 20 20 57 48 |WHEN 5:.|1130  WH|
|000048c0| 45 4e 20 36 3a 50 52 4f | 43 63 6c 69 63 6b 77 69 |EN 6:PRO|Cclickwi|
|000048d0| 6e 64 6f 77 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ndow(!q%|,q%!4,q%|
|000048e0| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|000048f0| 25 21 32 30 29 0a 31 31 | 34 30 20 20 57 48 45 4e |%!20).11|40  WHEN|
|00004900| 20 37 3a 49 46 20 63 6c | 61 69 6d 64 72 61 67 24 | 7:IF cl|aimdrag$|
|00004910| 3c 3e 22 22 20 54 48 45 | 4e 20 6a 75 6e 6b 3d 45 |<>"" THE|N junk=E|
|00004920| 56 41 4c 28 22 46 4e 75 | 73 65 72 64 72 61 67 5f |VAL("FNu|serdrag_|
|00004930| 22 2b 63 6c 61 69 6d 64 | 72 61 67 24 29 0a 31 31 |"+claimd|rag$).11|
|00004940| 35 30 20 20 57 48 45 4e | 20 38 3a 0a 31 31 36 30 |50  WHEN| 8:.1160|
|00004950| 20 20 57 48 45 4e 20 39 | 3a 49 46 20 63 6c 61 69 |  WHEN 9|:IF clai|
|00004960| 6d 6d 65 6e 75 24 3c 3e | 22 22 20 54 48 45 4e 20 |mmenu$<>|"" THEN |
|00004970| 50 52 4f 43 77 68 69 63 | 68 6d 65 6e 75 28 63 6c |PROCwhic|hmenu(cl|
|00004980| 61 69 6d 6d 65 6e 75 24 | 29 0a 31 31 37 30 20 20 |aimmenu$|).1170  |
|00004990| 57 48 45 4e 20 31 37 2c | 31 38 3a 50 52 4f 43 72 |WHEN 17,|18:PROCr|
|000049a0| 65 63 65 69 76 65 28 71 | 25 29 0a 31 31 38 30 45 |eceive(q|%).1180E|
|000049b0| 4e 44 43 41 53 45 0a 31 | 31 39 30 45 4e 44 50 52 |NDCASE.1|190ENDPR|
|000049c0| 4f 43 0a 31 32 30 30 0a | 31 32 31 30 44 45 46 50 |OC.1200.|1210DEFP|
|000049d0| 52 4f 43 72 65 63 65 69 | 76 65 28 71 25 29 0a 31 |ROCrecei|ve(q%).1|
|000049e0| 32 32 30 43 41 53 45 20 | 71 25 21 31 36 20 4f 46 |220CASE |q%!16 OF|
|000049f0| 0a 31 32 33 30 57 48 45 | 4e 20 30 20 20 20 20 3a |.1230WHE|N 0    :|
|00004a00| 24 71 25 3d 22 54 41 53 | 4b 22 3a 53 59 53 20 22 |$q%="TAS|K":SYS "|
|00004a10| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00004a20| 74 61 73 6b 25 2c 71 25 | 21 30 3a 45 4e 44 0a 31 |task%,q%|!0:END.1|
|00004a30| 32 34 30 45 4e 44 43 41 | 53 45 0a 31 32 35 30 45 |240ENDCA|SE.1250E|
|00004a40| 4e 44 50 52 4f 43 0a 31 | 32 36 30 0a 31 32 37 30 |NDPROC.1|260.1270|
|00004a50| 44 45 46 50 52 4f 43 6c | 77 61 6f 72 69 67 69 6e |DEFPROCl|waorigin|
|00004a60| 28 62 2c 52 45 54 55 52 | 4e 20 78 25 2c 52 45 54 |(b,RETUR|N x%,RET|
|00004a70| 55 52 4e 20 79 25 29 0a | 31 32 38 30 78 25 3d 62 |URN y%).|1280x%=b|
|00004a80| 21 30 2d 62 21 31 36 3a | 79 25 3d 62 21 31 32 2d |!0-b!16:|y%=b!12-|
|00004a90| 62 21 32 30 0a 31 32 39 | 30 45 4e 44 50 52 4f 43 |b!20.129|0ENDPROC|
|00004aa0| 0a 31 33 30 30 0a 31 33 | 31 30 44 45 46 46 4e 69 |.1300.13|10DEFFNi|
|00004ab0| 63 6f 6e 5f 63 72 65 61 | 74 65 28 77 69 6e 64 6f |con_crea|te(windo|
|00004ac0| 77 25 2c 6d 69 6e 78 25 | 2c 6d 69 6e 79 25 2c 77 |w%,minx%|,miny%,w|
|00004ad0| 69 64 74 68 25 2c 68 65 | 69 67 68 74 25 2c 66 67 |idth%,he|ight%,fg|
|00004ae0| 25 2c 62 67 25 2c 66 6c | 67 25 2c 64 61 74 61 24 |%,bg%,fl|g%,data$|
|00004af0| 29 0a 31 33 32 30 4c 4f | 43 41 4c 20 69 25 0a 31 |).1320LO|CAL i%.1|
|00004b00| 33 33 30 71 25 21 30 3d | 77 69 6e 64 6f 77 25 0a |330q%!0=|window%.|
|00004b10| 31 33 34 30 71 25 21 34 | 3d 6d 69 6e 78 25 3a 71 |1340q%!4|=minx%:q|
|00004b20| 25 21 38 3d 6d 69 6e 79 | 25 0a 31 33 35 30 71 25 |%!8=miny|%.1350q%|
|00004b30| 21 31 32 3d 6d 69 6e 78 | 25 2b 77 69 64 74 68 25 |!12=minx|%+width%|
|00004b40| 3a 71 25 21 31 36 3d 6d | 69 6e 79 25 2b 68 65 69 |:q%!16=m|iny%+hei|
|00004b50| 67 68 74 25 0a 31 33 36 | 30 71 25 21 32 30 3d 66 |ght%.136|0q%!20=f|
|00004b60| 6c 67 25 20 4f 52 20 62 | 67 25 3c 3c 32 38 20 4f |lg% OR b|g%<<28 O|
|00004b70| 52 20 66 67 25 3c 3c 32 | 34 0a 31 33 37 30 49 46 |R fg%<<2|4.1370IF|
|00004b80| 20 71 25 21 32 30 20 41 | 4e 44 20 26 31 30 30 20 | q%!20 A|ND &100 |
|00004b90| 54 48 45 4e 0a 31 33 38 | 30 20 20 69 25 3d 49 4e |THEN.138|0  i%=IN|
|00004ba0| 53 54 52 28 64 61 74 61 | 24 2c 22 2c 22 29 0a 31 |STR(data|$,",").1|
|00004bb0| 33 39 30 20 20 71 25 21 | 32 34 3d 45 56 41 4c 28 |390  q%!|24=EVAL(|
|00004bc0| 4c 45 46 54 24 28 64 61 | 74 61 24 2c 69 25 2d 31 |LEFT$(da|ta$,i%-1|
|00004bd0| 29 29 0a 31 34 30 30 20 | 20 71 25 21 32 38 3d 2d |)).1400 | q%!28=-|
|00004be0| 31 0a 31 34 31 30 20 20 | 71 25 21 33 32 3d 45 56 |1.1410  |q%!32=EV|
|00004bf0| 41 4c 28 4d 49 44 24 28 | 64 61 74 61 24 2c 69 25 |AL(MID$(|data$,i%|
|00004c00| 2b 31 29 29 0a 31 34 32 | 30 45 4c 53 45 0a 31 34 |+1)).142|0ELSE.14|
|00004c10| 33 30 24 28 71 25 2b 32 | 34 29 3d 4c 45 46 54 24 |30$(q%+2|4)=LEFT$|
|00004c20| 28 64 61 74 61 24 2c 31 | 31 29 0a 31 34 34 30 45 |(data$,1|1).1440E|
|00004c30| 4e 44 49 46 0a 31 34 35 | 30 53 59 53 20 22 57 69 |NDIF.145|0SYS "Wi|
|00004c40| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 30 |mp_Creat|eIcon",0|
|00004c50| 2c 71 25 20 54 4f 20 69 | 25 0a 31 34 36 30 3d 69 |,q% TO i|%.1460=i|
|00004c60| 25 0a 31 34 37 30 0a 31 | 34 38 30 44 45 46 50 52 |%.1470.1|480DEFPR|
|00004c70| 4f 43 69 63 6f 6e 5f 70 | 75 74 64 61 74 61 28 62 |OCicon_p|utdata(b|
|00004c80| 2c 77 68 25 2c 69 68 25 | 2c 74 65 78 74 24 2c 72 |,wh%,ih%|,text$,r|
|00004c90| 64 29 0a 31 34 39 30 62 | 21 30 3d 77 68 25 3a 62 |d).1490b|!0=wh%:b|
|00004ca0| 21 34 3d 69 68 25 0a 31 | 35 30 30 53 59 53 20 22 |!4=ih%.1|500SYS "|
|00004cb0| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00004cc0| 65 22 2c 2c 62 0a 31 35 | 31 30 53 59 53 20 22 57 |e",,b.15|10SYS "W|
|00004cd0| 69 6d 70 5f 44 65 6c 65 | 74 65 49 63 6f 6e 22 2c |imp_Dele|teIcon",|
|00004ce0| 2c 62 0a 31 35 32 30 62 | 21 34 3d 77 68 25 3a 24 |,b.1520b|!4=wh%:$|
|00004cf0| 28 62 21 32 38 29 3d 74 | 65 78 74 24 3a 62 2b 3d |(b!28)=t|ext$:b+=|
|00004d00| 34 0a 31 35 33 30 53 59 | 53 20 22 57 69 6d 70 5f |4.1530SY|S "Wimp_|
|00004d10| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 62 0a 31 |CreateIc|on",,b.1|
|00004d20| 35 34 30 49 46 20 72 64 | 20 54 48 45 4e 20 53 59 |540IF rd| THEN SY|
|00004d30| 53 20 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |S "Wimp_|ForceRed|
|00004d40| 72 61 77 22 2c 62 21 30 | 2c 62 21 34 2c 62 21 38 |raw",b!0|,b!4,b!8|
|00004d50| 2c 62 21 31 32 2c 62 21 | 31 36 0a 31 35 35 30 62 |,b!12,b!|16.1550b|
|00004d60| 2d 3d 34 0a 31 35 36 30 | 45 4e 44 50 52 4f 43 0a |-=4.1560|ENDPROC.|
|00004d70| 31 35 37 30 0a 31 35 38 | 30 44 45 46 50 52 4f 43 |1570.158|0DEFPROC|
|00004d80| 69 63 6f 6e 5f 70 75 74 | 64 61 74 61 28 71 25 2c |icon_put|data(q%,|
|00004d90| 77 68 61 6e 64 6c 65 25 | 2c 69 68 61 6e 64 6c 65 |whandle%|,ihandle|
|00004da0| 25 2c 64 61 74 61 24 2c | 72 65 64 72 61 77 29 0a |%,data$,|redraw).|
|00004db0| 31 35 39 30 71 25 21 30 | 3d 77 68 61 6e 64 6c 65 |1590q%!0|=whandle|
|00004dc0| 25 0a 31 36 30 30 71 25 | 21 34 3d 69 68 61 6e 64 |%.1600q%|!4=ihand|
|00004dd0| 6c 65 25 0a 31 36 31 30 | 53 59 53 20 22 57 69 6d |le%.1610|SYS "Wim|
|00004de0| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00004df0| 2c 71 25 0a 31 36 32 30 | 24 28 71 25 21 32 38 29 |,q%.1620|$(q%!28)|
|00004e00| 3d 64 61 74 61 24 0a 31 | 36 33 30 49 46 20 72 65 |=data$.1|630IF re|
|00004e10| 64 72 61 77 20 54 48 45 | 4e 0a 31 36 34 30 20 20 |draw THE|N.1640  |
|00004e20| 53 59 53 20 22 57 69 6d | 70 5f 46 6f 72 63 65 52 |SYS "Wim|p_ForceR|
|00004e30| 65 64 72 61 77 22 2c 77 | 68 61 6e 64 6c 65 25 2c |edraw",w|handle%,|
|00004e40| 71 25 21 38 2c 71 25 21 | 31 32 2c 71 25 21 31 36 |q%!8,q%!|12,q%!16|
|00004e50| 2c 71 25 21 32 30 0a 31 | 36 35 30 45 4e 44 49 46 |,q%!20.1|650ENDIF|
|00004e60| 0a 31 36 36 30 45 4e 44 | 50 52 4f 43 0a 31 36 37 |.1660END|PROC.167|
|00004e70| 30 0a 31 36 38 30 44 45 | 46 46 4e 69 63 6f 6e 5f |0.1680DE|FFNicon_|
|00004e80| 67 65 74 64 61 74 61 28 | 71 25 2c 77 68 61 6e 64 |getdata(|q%,whand|
|00004e90| 6c 65 25 2c 69 68 61 6e | 64 6c 65 25 29 0a 31 36 |le%,ihan|dle%).16|
|00004ea0| 39 30 71 25 21 30 3d 77 | 68 61 6e 64 6c 65 25 0a |90q%!0=w|handle%.|
|00004eb0| 31 37 30 30 71 25 21 34 | 3d 69 68 61 6e 64 6c 65 |1700q%!4|=ihandle|
|00004ec0| 25 0a 31 37 31 30 53 59 | 53 20 22 57 69 6d 70 5f |%.1710SY|S "Wimp_|
|00004ed0| 47 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |GetIconS|tate",,q|
|00004ee0| 25 0a 31 37 32 30 3d 24 | 28 71 25 21 32 38 29 0a |%.1720=$|(q%!28).|
|00004ef0| 31 37 33 30 0a 31 37 34 | 30 44 45 46 50 52 4f 43 |1730.174|0DEFPROC|
|00004f00| 6e 65 77 76 61 6c 73 0a | 31 37 35 30 67 74 78 3d |newvals.|1750gtx=|
|00004f10| 71 25 21 33 36 3a 67 74 | 79 3d 71 25 21 34 30 0a |q%!36:gt|y=q%!40.|
|00004f20| 31 37 36 30 77 62 78 3d | 71 25 21 34 3a 77 62 79 |1760wbx=|q%!4:wby|
|00004f30| 3d 71 25 21 38 0a 31 37 | 37 30 77 74 78 3d 71 25 |=q%!8.17|70wtx=q%|
|00004f40| 21 31 32 3a 77 74 79 3d | 71 25 21 31 36 0a 31 37 |!12:wty=|q%!16.17|
|00004f50| 38 30 78 73 63 3d 71 25 | 21 32 30 3a 79 73 63 3d |80xsc=q%|!20:ysc=|
|00004f60| 71 25 21 32 34 0a 31 37 | 39 30 68 70 3d 77 74 78 |q%!24.17|90hp=wtx|
|00004f70| 2d 77 62 78 3a 76 70 3d | 77 74 79 2d 77 62 79 3a |-wbx:vp=|wty-wby:|
|00004f80| 65 62 78 3d 78 73 63 0a | 31 38 30 30 65 74 78 3d |ebx=xsc.|1800etx=|
|00004f90| 78 73 63 2b 68 70 3a 65 | 74 79 3d 79 73 63 3a 65 |xsc+hp:e|ty=ysc:e|
|00004fa0| 62 79 3d 79 73 63 2d 76 | 70 0a 31 38 31 30 45 4e |by=ysc-v|p.1810EN|
|00004fb0| 44 50 52 4f 43 0a 31 38 | 32 30 0a 31 38 33 30 44 |DPROC.18|20.1830D|
|00004fc0| 45 46 50 52 4f 43 64 65 | 66 69 6e 65 5f 6d 65 6e |EFPROCde|fine_men|
|00004fd0| 75 5f 74 65 78 74 28 74 | 65 78 74 24 2c 6e 2c 77 |u_text(t|ext$,n,w|
|00004fe0| 2c 74 2c 64 2c 73 2c 66 | 6c 61 67 73 2c 73 6d 2c |,t,d,s,f|lags,sm,|
|00004ff0| 6c 29 0a 31 38 34 30 74 | 65 78 74 24 28 6e 29 3d |l).1840t|ext$(n)=|
|00005000| 74 65 78 74 24 0a 31 38 | 35 30 73 65 74 74 69 6e |text$.18|50settin|
|00005010| 67 28 6e 29 3d 30 0a 31 | 38 36 30 49 46 20 77 20 |g(n)=0.1|860IF w |
|00005020| 54 48 45 4e 20 73 65 74 | 74 69 6e 67 28 6e 29 3d |THEN set|ting(n)=|
|00005030| 73 65 74 74 69 6e 67 28 | 6e 29 20 4f 52 20 26 30 |setting(|n) OR &0|
|00005040| 34 3a 66 6c 61 67 73 3d | 66 6c 61 67 73 20 4f 52 |4:flags=|flags OR|
|00005050| 20 26 31 30 30 0a 31 38 | 37 30 49 46 20 74 20 54 | &100.18|70IF t T|
|00005060| 48 45 4e 20 73 65 74 74 | 69 6e 67 28 6e 29 3d 73 |HEN sett|ing(n)=s|
|00005070| 65 74 74 69 6e 67 28 6e | 29 20 4f 52 20 26 30 31 |etting(n|) OR &01|
|00005080| 0a 31 38 38 30 49 46 20 | 64 20 54 48 45 4e 20 73 |.1880IF |d THEN s|
|00005090| 65 74 74 69 6e 67 28 6e | 29 3d 73 65 74 74 69 6e |etting(n|)=settin|
|000050a0| 67 28 6e 29 20 4f 52 20 | 26 30 32 0a 31 38 39 30 |g(n) OR |&02.1890|
|000050b0| 49 46 20 6c 20 54 48 45 | 4e 20 73 65 74 74 69 6e |IF l THE|N settin|
|000050c0| 67 28 6e 29 3d 73 65 74 | 74 69 6e 67 28 6e 29 20 |g(n)=set|ting(n) |
|000050d0| 4f 52 20 26 38 30 0a 31 | 39 30 30 49 46 20 73 20 |OR &80.1|900IF s |
|000050e0| 54 48 45 4e 20 66 6c 61 | 67 73 3d 66 6c 61 67 73 |THEN fla|gs=flags|
|000050f0| 20 4f 52 20 26 34 30 30 | 30 30 30 0a 31 39 31 30 | OR &400|000.1910|
|00005100| 66 6c 61 67 73 28 6e 29 | 3d 66 6c 61 67 73 0a 31 |flags(n)|=flags.1|
|00005110| 39 32 30 73 75 62 6d 65 | 6e 75 28 6e 29 3d 73 6d |920subme|nu(n)=sm|
|00005120| 0a 31 39 33 30 45 4e 44 | 50 52 4f 43 0a 31 39 34 |.1930END|PROC.194|
|00005130| 30 0a 31 39 35 30 44 45 | 46 50 52 4f 43 63 72 65 |0.1950DE|FPROCcre|
|00005140| 61 74 65 5f 6d 65 6e 75 | 28 74 69 74 6c 65 24 2c |ate_menu|(title$,|
|00005150| 6e 2c 77 69 64 74 68 25 | 2c 78 2c 79 29 0a 31 39 |n,width%|,x,y).19|
|00005160| 36 30 6d 62 25 3d 6d 65 | 6e 75 25 0a 31 39 37 30 |60mb%=me|nu%.1970|
|00005170| 6d 65 6e 75 73 3d 30 3a | 71 3d 30 0a 31 39 38 30 |menus=0:|q=0.1980|
|00005180| 52 45 50 45 41 54 0a 31 | 39 39 30 20 20 6d 65 6e |REPEAT.1|990  men|
|00005190| 75 70 6f 73 28 6d 65 6e | 75 73 29 3d 6d 62 25 3a |upos(men|us)=mb%:|
|000051a0| 6d 65 6e 75 73 2b 3d 31 | 0a 32 30 30 30 20 20 24 |menus+=1|.2000  $|
|000051b0| 6d 62 25 3d 74 69 74 6c | 65 24 0a 32 30 31 30 20 |mb%=titl|e$.2010 |
|000051c0| 20 6d 62 25 3f 31 32 3d | 37 0a 32 30 32 30 20 20 | mb%?12=|7.2020  |
|000051d0| 6d 62 25 3f 31 33 3d 32 | 0a 32 30 33 30 20 20 6d |mb%?13=2|.2030  m|
|000051e0| 62 25 3f 31 34 3d 37 0a | 32 30 34 30 20 20 6d 62 |b%?14=7.|2040  mb|
|000051f0| 25 3f 31 35 3d 30 0a 32 | 30 35 30 20 20 6d 62 25 |%?15=0.2|050  mb%|
|00005200| 21 31 36 3d 77 69 64 74 | 68 25 0a 32 30 36 30 20 |!16=widt|h%.2060 |
|00005210| 20 6d 62 25 21 32 30 3d | 34 30 20 3a 52 45 4d 20 | mb%!20=|40 :REM |
|00005220| 68 65 69 67 68 74 20 6f | 66 20 6d 65 6e 75 20 69 |height o|f menu i|
|00005230| 74 65 6d 73 0a 32 30 37 | 30 20 20 6d 62 25 21 32 |tems.207|0  mb%!2|
|00005240| 34 3d 30 20 20 3a 52 45 | 4d 20 76 65 72 74 69 63 |4=0  :RE|M vertic|
|00005250| 61 6c 20 67 61 70 20 62 | 65 74 77 65 65 6e 20 69 |al gap b|etween i|
|00005260| 74 65 6d 73 20 28 61 6c | 73 6f 20 74 6f 70 20 26 |tems (al|so top &|
|00005270| 20 62 6f 74 74 6f 6d 29 | 0a 32 30 38 30 20 20 69 | bottom)|.2080  i|
|00005280| 74 65 6d 70 74 72 3d 6d | 62 25 2b 32 38 0a 32 30 |temptr=m|b%+28.20|
|00005290| 39 30 20 20 52 45 50 45 | 41 54 0a 32 31 30 30 20 |90  REPE|AT.2100 |
|000052a0| 20 20 20 69 74 65 6d 70 | 74 72 21 30 3d 73 65 74 |   itemp|tr!0=set|
|000052b0| 74 69 6e 67 28 71 29 0a | 32 31 31 30 20 20 20 20 |ting(q).|2110    |
|000052c0| 72 65 66 28 71 29 3d 69 | 74 65 6d 70 74 72 2b 34 |ref(q)=i|temptr+4|
|000052d0| 0a 32 31 32 30 20 20 20 | 20 69 74 65 6d 70 74 72 |.2120   | itemptr|
|000052e0| 21 38 3d 66 6c 61 67 73 | 28 71 29 20 4f 52 20 30 |!8=flags|(q) OR 0|
|000052f0| 3c 3c 32 38 20 4f 52 20 | 37 3c 3c 32 34 0a 32 31 |<<28 OR |7<<24.21|
|00005300| 33 30 20 20 20 20 49 46 | 20 28 66 6c 61 67 73 28 |30    IF| (flags(|
|00005310| 71 29 20 41 4e 44 20 26 | 31 30 30 29 3d 30 20 54 |q) AND &|100)=0 T|
|00005320| 48 45 4e 0a 32 31 34 30 | 20 20 20 20 20 20 24 28 |HEN.2140|      $(|
|00005330| 69 74 65 6d 70 74 72 2b | 31 32 29 3d 74 65 78 74 |itemptr+|12)=text|
|00005340| 24 28 71 29 0a 32 31 35 | 30 20 20 20 20 45 4c 53 |$(q).215|0    ELS|
|00005350| 45 0a 32 31 36 30 20 20 | 20 20 20 20 70 6f 73 3d |E.2160  |    pos=|
|00005360| 49 4e 53 54 52 28 74 65 | 78 74 24 28 71 29 2c 22 |INSTR(te|xt$(q),"|
|00005370| 28 22 29 0a 32 31 37 30 | 20 20 20 20 20 20 69 74 |(").2170|      it|
|00005380| 65 6d 70 74 72 21 31 32 | 3d 45 56 41 4c 28 4c 45 |emptr!12|=EVAL(LE|
|00005390| 46 54 24 28 74 65 78 74 | 24 28 71 29 2c 70 6f 73 |FT$(text|$(q),pos|
|000053a0| 2d 31 29 29 0a 32 31 38 | 30 20 20 20 20 20 20 69 |-1)).218|0      i|
|000053b0| 74 65 6d 70 74 72 21 31 | 36 3d 2d 31 0a 32 31 39 |temptr!1|6=-1.219|
|000053c0| 30 20 20 20 20 20 20 69 | 74 65 6d 70 74 72 21 32 |0      i|temptr!2|
|000053d0| 30 3d 45 56 41 4c 28 52 | 49 47 48 54 24 28 74 65 |0=EVAL(R|IGHT$(te|
|000053e0| 78 74 24 28 71 29 2c 4c | 45 4e 28 74 65 78 74 24 |xt$(q),L|EN(text$|
|000053f0| 28 71 29 29 2d 70 6f 73 | 29 29 0a 32 32 30 30 20 |(q))-pos|)).2200 |
|00005400| 20 20 20 45 4e 44 49 46 | 0a 32 32 31 30 20 20 20 |   ENDIF|.2210   |
|00005410| 20 69 74 65 6d 70 74 72 | 2b 3d 32 34 3a 71 2b 3d | itemptr|+=24:q+=|
|00005420| 31 0a 32 32 32 30 20 20 | 55 4e 54 49 4c 20 28 73 |1.2220  |UNTIL (s|
|00005430| 65 74 74 69 6e 67 28 71 | 2d 31 29 20 41 4e 44 20 |etting(q|-1) AND |
|00005440| 26 38 30 29 3e 30 0a 32 | 32 33 30 20 20 6d 62 25 |&80)>0.2|230  mb%|
|00005450| 3d 69 74 65 6d 70 74 72 | 0a 32 32 34 30 20 20 49 |=itemptr|.2240  I|
|00005460| 46 20 71 3c 3e 6e 20 54 | 48 45 4e 20 74 69 74 6c |F q<>n T|HEN titl|
|00005470| 65 24 3d 74 65 78 74 24 | 28 71 29 3a 71 2b 3d 31 |e$=text$|(q):q+=1|
|00005480| 0a 32 32 35 30 55 4e 54 | 49 4c 20 71 3d 6e 0a 32 |.2250UNT|IL q=n.2|
|00005490| 32 36 30 0a 32 32 37 30 | 46 4f 52 20 71 3d 30 20 |260.2270|FOR q=0 |
|000054a0| 54 4f 20 6e 2d 31 0a 32 | 32 38 30 20 20 49 46 20 |TO n-1.2|280  IF |
|000054b0| 73 75 62 6d 65 6e 75 28 | 71 29 3e 30 20 41 4e 44 |submenu(|q)>0 AND|
|000054c0| 20 73 75 62 6d 65 6e 75 | 28 71 29 3c 6d 65 6e 75 | submenu|(q)<menu|
|000054d0| 73 20 54 48 45 4e 0a 32 | 32 39 30 20 20 20 20 21 |s THEN.2|290    !|
|000054e0| 72 65 66 28 71 29 3d 6d | 65 6e 75 70 6f 73 28 73 |ref(q)=m|enupos(s|
|000054f0| 75 62 6d 65 6e 75 28 71 | 29 29 0a 32 33 30 30 20 |ubmenu(q|)).2300 |
|00005500| 20 45 4c 53 45 0a 32 33 | 31 30 20 20 20 20 21 72 | ELSE.23|10    !r|
|00005510| 65 66 28 71 29 3d 73 75 | 62 6d 65 6e 75 28 71 29 |ef(q)=su|bmenu(q)|
|00005520| 3a 52 45 4d 20 77 61 73 | 20 2d 31 20 69 2e 65 2e |:REM was| -1 i.e.|
|00005530| 20 73 75 62 6d 65 6e 75 | 20 64 69 73 61 6c 6c 6f | submenu| disallo|
|00005540| 77 65 64 21 20 54 68 69 | 73 20 63 68 61 6e 67 65 |wed! Thi|s change|
|00005550| 0a 32 33 32 30 20 20 20 | 20 20 20 20 20 20 20 20 |.2320   |        |
|00005560| 20 20 20 20 20 20 20 20 | 20 20 20 3a 52 45 4d 20 |        |   :REM |
|00005570| 61 6c 6c 6f 77 73 20 61 | 20 77 69 6e 64 6f 77 20 |allows a| window |
|00005580| 68 61 6e 64 6c 65 20 74 | 6f 20 62 65 20 75 73 65 |handle t|o be use|
|00005590| 64 0a 32 33 33 30 20 20 | 45 4e 44 49 46 0a 32 33 |d.2330  |ENDIF.23|
|000055a0| 34 30 4e 45 58 54 20 71 | 0a 32 33 35 30 53 59 53 |40NEXT q|.2350SYS|
|000055b0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|000055c0| 75 22 2c 2c 6d 65 6e 75 | 25 2c 78 2c 79 0a 32 33 |u",,menu|%,x,y.23|
|000055d0| 36 30 45 4e 44 50 52 4f | 43 0a 32 33 37 30 0a 32 |60ENDPRO|C.2370.2|
|000055e0| 33 38 30 44 45 46 50 52 | 4f 43 6f 70 65 6e 74 65 |380DEFPR|OCopente|
|000055f0| 6d 70 6c 61 74 65 66 69 | 6c 65 28 66 69 6c 65 24 |mplatefi|le(file$|
|00005600| 29 0a 32 33 39 30 53 59 | 53 20 22 57 69 6d 70 5f |).2390SY|S "Wimp_|
|00005610| 4f 70 65 6e 54 65 6d 70 | 6c 61 74 65 22 2c 2c 66 |OpenTemp|late",,f|
|00005620| 69 6c 65 24 0a 32 34 30 | 30 45 4e 44 50 52 4f 43 |ile$.240|0ENDPROC|
|00005630| 0a 32 34 31 30 0a 32 34 | 32 30 44 45 46 50 52 4f |.2410.24|20DEFPRO|
|00005640| 43 6c 6f 61 64 74 65 6d | 70 6c 61 74 65 28 6e 61 |Cloadtem|plate(na|
|00005650| 6d 65 24 29 0a 32 34 33 | 30 4c 4f 43 41 4c 20 74 |me$).243|0LOCAL t|
|00005660| 79 70 65 25 2c 70 6f 73 | 25 2c 78 25 0a 32 34 34 |ype%,pos|%,x%.244|
|00005670| 30 53 59 53 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |0SYS "Wi|mp_LoadT|
|00005680| 65 6d 70 6c 61 74 65 22 | 2c 2c 71 25 2c 69 70 74 |emplate"|,,q%,ipt|
|00005690| 72 25 2c 69 65 6e 64 25 | 2c 2d 31 2c 6e 61 6d 65 |r%,iend%|,-1,name|
|000056a0| 24 2c 30 20 54 4f 20 74 | 79 70 65 25 2c 2c 69 70 |$,0 TO t|ype%,,ip|
|000056b0| 74 72 25 2c 2c 2c 2c 70 | 6f 73 25 0a 32 34 35 30 |tr%,,,,p|os%.2450|
|000056c0| 45 4e 44 50 52 4f 43 0a | 32 34 35 31 0a 32 34 35 |ENDPROC.|2451.245|
|000056d0| 32 44 45 46 50 52 4f 43 | 6c 6f 61 64 74 65 6d 70 |2DEFPROC|loadtemp|
|000056e0| 6c 61 74 65 61 73 64 28 | 6e 61 6d 65 24 29 0a 32 |lateasd(|name$).2|
|000056f0| 34 35 33 4c 4f 43 41 4c | 20 74 79 70 65 25 2c 70 |453LOCAL| type%,p|
|00005700| 6f 73 25 2c 78 25 0a 32 | 34 35 34 53 59 53 20 22 |os%,x%.2|454SYS "|
|00005710| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00005720| 65 22 2c 2c 71 25 2c 69 | 70 74 72 25 2c 69 65 6e |e",,q%,i|ptr%,ien|
|00005730| 64 25 2c 2d 31 2c 6e 61 | 6d 65 24 2c 30 20 54 4f |d%,-1,na|me$,0 TO|
|00005740| 20 74 79 70 65 25 2c 2c | 69 70 74 72 25 2c 2c 2c | type%,,|iptr%,,,|
|00005750| 2c 70 6f 73 25 0a 32 34 | 35 35 47 4f 54 4f 20 33 |,pos%.24|55GOTO 3|
|00005760| 33 32 0a 32 34 36 30 0a | 32 34 37 30 44 45 46 50 |32.2460.|2470DEFP|
|00005770| 52 4f 43 63 6c 6f 73 65 | 74 65 6d 70 6c 61 74 65 |ROCclose|template|
|00005780| 66 69 6c 65 0a 32 34 38 | 30 53 59 53 20 22 57 69 |file.248|0SYS "Wi|
|00005790| 6d 70 5f 43 6c 6f 73 65 | 54 65 6d 70 6c 61 74 65 |mp_Close|Template|
|000057a0| 22 0a 32 34 39 30 45 4e | 44 50 52 4f 43 0a 32 35 |".2490EN|DPROC.25|
|000057b0| 30 30 0a 32 35 31 30 44 | 45 46 46 4e 6c 65 61 66 |00.2510D|EFFNleaf|
|000057c0| 28 70 61 74 68 24 29 0a | 32 35 32 30 57 48 49 4c |(path$).|2520WHIL|
|000057d0| 45 20 49 4e 53 54 52 28 | 70 61 74 68 24 2c 22 2e |E INSTR(|path$,".|
|000057e0| 22 29 0a 32 35 33 30 20 | 20 70 61 74 68 24 3d 4d |").2530 | path$=M|
|000057f0| 49 44 24 28 70 61 74 68 | 24 2c 49 4e 53 54 52 28 |ID$(path|$,INSTR(|
|00005800| 70 61 74 68 24 2c 22 2e | 22 29 2b 31 29 0a 32 35 |path$,".|")+1).25|
|00005810| 34 30 45 4e 44 57 48 49 | 4c 45 0a 32 35 35 30 3d |40ENDWHI|LE.2550=|
|00005820| 70 61 74 68 24 0a 32 35 | 36 30 0a 32 35 37 30 44 |path$.25|60.2570D|
|00005830| 45 46 46 4e 67 6e 61 6d | 65 28 70 74 72 29 0a 32 |EFFNgnam|e(ptr).2|
|00005840| 35 38 30 66 24 3d 22 22 | 0a 32 35 39 30 57 48 49 |580f$=""|.2590WHI|
|00005850| 4c 45 20 3f 70 74 72 3c | 3e 30 20 41 4e 44 20 3f |LE ?ptr<|>0 AND ?|
|00005860| 70 74 72 3c 3e 31 33 0a | 32 36 30 30 20 20 66 24 |ptr<>13.|2600  f$|
|00005870| 3d 66 24 2b 43 48 52 24 | 3f 70 74 72 3a 70 74 72 |=f$+CHR$|?ptr:ptr|
|00005880| 2b 3d 31 0a 32 36 31 30 | 45 4e 44 57 48 49 4c 45 |+=1.2610|ENDWHILE|
|00005890| 0a 32 36 32 30 3d 66 24 | 0a 32 36 33 30 0a 32 36 |.2620=f$|.2630.26|
|000058a0| 34 30 44 45 46 50 52 4f | 43 64 6f 5f 62 61 63 6b |40DEFPRO|Cdo_back|
|000058b0| 67 72 6f 75 6e 64 5f 74 | 61 73 6b 0a 32 36 35 30 |ground_t|ask.2650|
|000058c0| 45 4e 44 50 52 4f 43 0a | 32 36 36 30 0a 32 36 37 |ENDPROC.|2660.267|
|000058d0| 30 44 45 46 50 52 4f 43 | 72 65 64 72 61 77 77 69 |0DEFPROC|redrawwi|
|000058e0| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 29 0a 32 36 |ndow(han|dle%).26|
|000058f0| 38 30 4c 4f 43 41 4c 20 | 76 6f 69 64 25 0a 32 36 |80LOCAL |void%.26|
|00005900| 39 30 71 25 21 30 3d 68 | 61 6e 64 6c 65 25 0a 32 |90q%!0=h|andle%.2|
|00005910| 37 30 30 53 59 53 20 22 | 57 69 6d 70 5f 52 65 64 |700SYS "|Wimp_Red|
|00005920| 72 61 77 57 69 6e 64 6f | 77 22 2c 30 2c 71 25 20 |rawWindo|w",0,q% |
|00005930| 54 4f 20 6d 6f 72 65 25 | 0a 32 37 31 30 50 52 4f |TO more%|.2710PRO|
|00005940| 43 6c 77 61 6f 72 69 67 | 69 6e 28 71 25 2b 34 2c |Clwaorig|in(q%+4,|
|00005950| 78 30 25 2c 79 30 25 29 | 0a 32 37 32 30 57 48 49 |x0%,y0%)|.2720WHI|
|00005960| 4c 45 20 6d 6f 72 65 25 | 0a 32 37 33 30 20 20 50 |LE more%|.2730  P|
|00005970| 52 4f 43 6e 65 77 76 61 | 6c 73 0a 32 37 34 30 20 |ROCnewva|ls.2740 |
|00005980| 20 43 41 53 45 20 68 61 | 6e 64 6c 65 25 20 4f 46 | CASE ha|ndle% OF|
|00005990| 0a 32 37 35 30 20 20 45 | 4e 44 43 41 53 45 0a 32 |.2750  E|NDCASE.2|
|000059a0| 37 36 30 20 20 53 59 53 | 20 22 57 69 6d 70 5f 42 |760  SYS| "Wimp_B|
|000059b0| 6f 72 64 65 72 57 69 6e | 64 6f 77 22 2c 2c 71 25 |orderWin|dow",,q%|
|000059c0| 0a 32 37 37 30 20 20 53 | 59 53 20 22 57 69 6d 70 |.2770  S|YS "Wimp|
|000059d0| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 30 |_GetRect|angle",0|
|000059e0| 2c 71 25 20 54 4f 20 6d | 6f 72 65 25 0a 32 37 38 |,q% TO m|ore%.278|
|000059f0| 30 45 4e 44 57 48 49 4c | 45 0a 32 37 39 30 45 4e |0ENDWHIL|E.2790EN|
|00005a00| 44 50 52 4f 43 0a 32 38 | 30 30 3a 0a 32 38 31 30 |DPROC.28|00:.2810|
|00005a10| 44 45 46 46 4e 6f 6b 74 | 6f 63 6c 6f 73 65 77 28 |DEFFNokt|oclosew(|
|00005a20| 68 61 6e 64 6c 65 25 29 | 0a 32 38 32 30 4c 4f 43 |handle%)|.2820LOC|
|00005a30| 41 4c 20 73 68 75 74 74 | 69 6e 67 25 0a 32 38 33 |AL shutt|ing%.283|
|00005a40| 30 73 68 75 74 74 69 6e | 67 25 3d 54 52 55 45 0a |0shuttin|g%=TRUE.|
|00005a50| 32 38 34 30 3d 73 68 75 | 74 74 69 6e 67 25 0a 32 |2840=shu|tting%.2|
|00005a60| 38 35 30 0a 32 38 36 30 | 44 45 46 50 52 4f 43 63 |850.2860|DEFPROCc|
|00005a70| 6c 69 63 6b 6d 61 69 6e | 28 62 75 74 74 6f 6e 25 |lickmain|(button%|
|00005a80| 2c 69 63 6f 6e 25 29 0a | 32 38 37 30 43 41 53 45 |,icon%).|2870CASE|
|00005a90| 20 54 52 55 45 20 4f 46 | 0a 32 38 38 30 57 48 45 | TRUE OF|.2880WHE|
|00005aa0| 4e 20 28 62 75 74 74 6f | 6e 25 20 41 4e 44 20 34 |N (butto|n% AND 4|
|00005ab0| 29 3d 34 20 41 4e 44 20 | 69 63 6f 6e 25 3c 3e 2d |)=4 AND |icon%<>-|
|00005ac0| 31 20 4f 52 20 28 62 75 | 74 74 6f 6e 25 20 41 4e |1 OR (bu|tton% AN|
|00005ad0| 44 20 31 29 3d 31 20 41 | 4e 44 20 69 63 6f 6e 25 |D 1)=1 A|ND icon%|
|00005ae0| 3c 3e 2d 31 0a 32 38 39 | 30 20 20 43 41 53 45 20 |<>-1.289|0  CASE |
|00005af0| 69 63 6f 6e 25 20 4f 46 | 0a 32 39 30 30 20 20 57 |icon% OF|.2900  W|
|00005b00| 48 45 4e 20 33 20 3a 50 | 52 4f 43 73 6c 61 62 69 |HEN 3 :P|ROCslabi|
|00005b10| 63 6f 6e 0a 32 39 31 30 | 20 20 20 20 20 20 20 20 |con.2910|        |
|00005b20| 20 20 50 52 4f 43 6f 70 | 65 6e 77 69 6e 64 6f 77 |  PROCop|enwindow|
|00005b30| 28 73 61 76 65 25 2c 46 | 41 4c 53 45 2c 2d 31 29 |(save%,F|ALSE,-1)|
|00005b40| 0a 32 39 32 30 20 20 57 | 48 45 4e 20 34 20 3a 50 |.2920  W|HEN 4 :P|
|00005b50| 52 4f 43 73 6c 61 62 69 | 63 6f 6e 0a 32 39 33 30 |ROCslabi|con.2930|
|00005b60| 20 20 20 20 20 20 20 20 | 20 20 50 52 4f 43 65 78 |        |  PROCex|
|00005b70| 74 72 61 63 74 66 61 63 | 74 6f 72 73 0a 32 39 34 |tractfac|tors.294|
|00005b80| 30 20 20 45 4e 44 43 41 | 53 45 0a 32 39 35 30 45 |0  ENDCA|SE.2950E|
|00005b90| 4e 44 43 41 53 45 0a 32 | 39 36 30 45 4e 44 50 52 |NDCASE.2|960ENDPR|
|00005ba0| 4f 43 0a 32 39 37 30 3a | 0a 32 39 38 30 44 45 46 |OC.2970:|.2980DEF|
|00005bb0| 50 52 4f 43 73 6c 61 62 | 69 63 6f 6e 0a 32 39 39 |PROCslab|icon.299|
|00005bc0| 30 53 59 53 20 22 57 69 | 6d 70 5f 42 6f 72 64 65 |0SYS "Wi|mp_Borde|
|00005bd0| 72 49 63 6f 6e 22 2c 2c | 71 25 0a 33 30 30 30 71 |rIcon",,|q%.3000q|
|00005be0| 25 21 38 3d 30 0a 33 30 | 31 30 53 59 53 20 22 57 |%!8=0.30|10SYS "W|
|00005bf0| 69 6d 70 5f 42 6f 72 64 | 65 72 49 63 6f 6e 22 2c |imp_Bord|erIcon",|
|00005c00| 2c 71 25 0a 33 30 32 30 | 45 4e 44 50 52 4f 43 0a |,q%.3020|ENDPROC.|
|00005c10| 33 30 33 30 3a 0a 33 30 | 34 30 44 45 46 50 52 4f |3030:.30|40DEFPRO|
|00005c20| 43 63 6c 69 63 6b 73 61 | 76 65 28 62 75 74 74 6f |Cclicksa|ve(butto|
|00005c30| 6e 25 2c 69 63 6f 6e 25 | 29 0a 33 30 35 30 43 41 |n%,icon%|).3050CA|
|00005c40| 53 45 20 54 52 55 45 20 | 4f 46 0a 33 30 36 30 57 |SE TRUE |OF.3060W|
|00005c50| 48 45 4e 20 28 62 75 74 | 74 6f 6e 25 20 41 4e 44 |HEN (but|ton% AND|
|00005c60| 20 34 29 3d 34 20 41 4e | 44 20 69 63 6f 6e 25 3d | 4)=4 AN|D icon%=|
|00005c70| 35 0a 33 30 37 30 20 20 | 50 52 4f 43 73 6c 61 62 |5.3070  |PROCslab|
|00005c80| 69 63 6f 6e 3a 50 52 4f | 43 73 61 76 65 66 69 6c |icon:PRO|Csavefil|
|00005c90| 65 28 46 4e 69 63 6f 6e | 5f 67 65 74 64 61 74 61 |e(FNicon|_getdata|
|00005ca0| 28 71 25 2c 73 61 76 65 | 25 2c 34 29 29 0a 33 30 |(q%,save|%,4)).30|
|00005cb0| 38 30 57 48 45 4e 20 28 | 62 75 74 74 6f 6e 25 20 |80WHEN (|button% |
|00005cc0| 41 4e 44 20 34 29 3d 34 | 20 41 4e 44 20 69 63 6f |AND 4)=4| AND ico|
|00005cd0| 6e 25 3d 33 0a 33 30 39 | 30 20 20 63 6c 61 69 6d |n%=3.309|0  claim|
|00005ce0| 64 72 61 67 24 3d 22 73 | 61 76 65 22 0a 33 31 30 |drag$="s|ave".310|
|00005cf0| 30 20 20 21 71 25 3d 73 | 61 76 65 25 0a 33 31 31 |0  !q%=s|ave%.311|
|00005d00| 30 20 20 53 59 53 20 22 | 57 69 6d 70 5f 47 65 74 |0  SYS "|Wimp_Get|
|00005d10| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 71 25 |WindowSt|ate",,q%|
|00005d20| 0a 33 31 32 30 20 20 77 | 65 78 3d 71 25 21 34 2d |.3120  w|ex=q%!4-|
|00005d30| 71 25 21 32 30 0a 33 31 | 33 30 20 20 77 65 79 3d |q%!20.31|30  wey=|
|00005d40| 71 25 21 31 36 2d 71 25 | 21 32 34 0a 33 31 34 30 |q%!16-q%|!24.3140|
|00005d50| 20 20 71 25 21 34 3d 33 | 0a 33 31 35 30 20 20 53 |  q%!4=3|.3150  S|
|00005d60| 59 53 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |YS "Wimp|_GetIcon|
|00005d70| 53 74 61 74 65 22 2c 2c | 71 25 0a 33 31 36 30 20 |State",,|q%.3160 |
|00005d80| 20 21 71 25 3d 73 61 76 | 65 25 3a 71 25 21 34 3d | !q%=sav|e%:q%!4=|
|00005d90| 35 0a 33 31 37 30 20 20 | 71 25 21 38 3d 71 25 21 |5.3170  |q%!8=q%!|
|00005da0| 38 2b 77 65 78 0a 33 31 | 38 30 20 20 71 25 21 31 |8+wex.31|80  q%!1|
|00005db0| 32 3d 71 25 21 31 32 2b | 77 65 79 0a 33 31 39 30 |2=q%!12+|wey.3190|
|00005dc0| 20 20 71 25 21 31 36 3d | 71 25 21 31 36 2b 77 65 |  q%!16=|q%!16+we|
|00005dd0| 78 0a 33 32 30 30 20 20 | 71 25 21 32 30 3d 71 25 |x.3200  |q%!20=q%|
|00005de0| 21 32 30 2b 77 65 79 0a | 33 32 31 30 20 20 71 25 |!20+wey.|3210  q%|
|00005df0| 21 32 34 3d 30 3a 71 25 | 21 32 38 3d 30 0a 33 32 |!24=0:q%|!28=0.32|
|00005e00| 32 30 20 20 71 25 21 33 | 32 3d 26 37 46 46 46 46 |20  q%!3|2=&7FFFF|
|00005e10| 46 46 46 3a 71 25 21 33 | 36 3d 26 37 46 46 46 46 |FFF:q%!3|6=&7FFFF|
|00005e20| 46 46 46 0a 33 32 33 30 | 20 20 53 59 53 20 22 57 |FFF.3230|  SYS "W|
|00005e30| 69 6d 70 5f 44 72 61 67 | 42 6f 78 22 2c 2c 71 25 |imp_Drag|Box",,q%|
|00005e40| 0a 33 32 34 30 45 4e 44 | 43 41 53 45 0a 33 32 35 |.3240END|CASE.325|
|00005e50| 30 45 4e 44 50 52 4f 43 | 0a 33 32 36 30 0a 33 32 |0ENDPROC|.3260.32|
|00005e60| 37 30 44 45 46 46 4e 75 | 73 65 72 64 72 61 67 5f |70DEFFNu|serdrag_|
|00005e70| 73 61 76 65 0a 33 32 38 | 30 53 59 53 20 22 57 69 |save.328|0SYS "Wi|
|00005e80| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00005e90| 6f 22 2c 2c 6d 73 67 62 | 6c 6b 25 0a 33 32 39 30 |o",,msgb|lk%.3290|
|00005ea0| 6d 73 67 62 6c 6b 25 21 | 32 30 3d 36 34 3a 6d 73 |msgblk%!|20=64:ms|
|00005eb0| 67 62 6c 6b 25 21 33 32 | 3d 30 0a 33 33 30 30 6d |gblk%!32|=0.3300m|
|00005ec0| 73 67 62 6c 6b 25 21 33 | 36 3d 31 3a 6d 73 67 62 |sgblk%!3|6=1:msgb|
|00005ed0| 6c 6b 25 21 34 30 3d 6d | 73 67 62 6c 6b 25 21 31 |lk%!40=m|sgblk%!1|
|00005ee0| 32 0a 33 33 31 30 6d 73 | 67 62 6c 6b 25 21 34 34 |2.3310ms|gblk%!44|
|00005ef0| 3d 6d 73 67 62 6c 6b 25 | 21 31 36 0a 33 33 32 30 |=msgblk%|!16.3320|
|00005f00| 6d 73 67 62 6c 6b 25 21 | 34 38 3d 21 6d 73 67 62 |msgblk%!|48=!msgb|
|00005f10| 6c 6b 25 0a 33 33 33 30 | 6d 73 67 62 6c 6b 25 21 |lk%.3330|msgblk%!|
|00005f20| 35 32 3d 6d 73 67 62 6c | 6b 25 21 34 0a 33 33 34 |52=msgbl|k%!4.334|
|00005f30| 30 6d 73 67 62 6c 6b 25 | 21 35 36 3d 26 31 30 30 |0msgblk%|!56=&100|
|00005f40| 0a 33 33 35 30 6d 73 67 | 62 6c 6b 25 21 36 30 3d |.3350msg|blk%!60=|
|00005f50| 6d 79 5f 66 69 6c 65 74 | 79 70 65 25 0a 33 33 36 |my_filet|ype%.336|
|00005f60| 30 24 28 6d 73 67 62 6c | 6b 25 2b 36 34 29 3d 46 |0$(msgbl|k%+64)=F|
|00005f70| 4e 6c 65 61 66 28 46 4e | 69 63 6f 6e 5f 67 65 74 |Nleaf(FN|icon_get|
|00005f80| 64 61 74 61 28 71 25 2c | 73 61 76 65 25 2c 34 29 |data(q%,|save%,4)|
|00005f90| 29 0a 33 33 37 30 53 59 | 53 20 22 57 69 6d 70 5f |).3370SY|S "Wimp_|
|00005fa0| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00005fb0| 6d 73 67 62 6c 6b 25 2b | 32 30 2c 6d 73 67 62 6c |msgblk%+|20,msgbl|
|00005fc0| 6b 25 21 31 32 2c 6d 73 | 67 62 6c 6b 25 21 31 36 |k%!12,ms|gblk%!16|
|00005fd0| 0a 33 33 38 30 3d 30 0a | 33 33 39 30 0a 33 34 30 |.3380=0.|3390.340|
|00005fe0| 30 44 45 46 50 52 4f 43 | 65 78 74 72 61 63 74 66 |0DEFPROC|extractf|
|00005ff0| 61 63 74 6f 72 73 0a 33 | 34 31 30 50 52 4f 43 69 |actors.3|410PROCi|
|00006000| 63 6f 6e 5f 70 75 74 64 | 61 74 61 28 71 25 2c 6d |con_putd|ata(q%,m|
|00006010| 61 69 6e 25 2c 35 2c 22 | 45 78 74 72 61 63 74 69 |ain%,5,"|Extracti|
|00006020| 6e 67 20 66 61 63 74 6f | 72 73 22 2c 31 29 0a 33 |ng facto|rs",1).3|
|00006030| 34 32 30 50 52 4f 43 69 | 63 6f 6e 5f 70 75 74 64 |420PROCi|con_putd|
|00006040| 61 74 61 28 71 25 2c 6d | 61 69 6e 25 2c 35 2c 22 |ata(q%,m|ain%,5,"|
|00006050| 45 78 74 72 61 63 74 69 | 6e 67 20 66 61 63 74 6f |Extracti|ng facto|
|00006060| 72 73 22 2c 31 29 0a 33 | 34 33 30 6e 75 6d 62 65 |rs",1).3|430numbe|
|00006070| 72 74 24 3d 46 4e 69 63 | 6f 6e 5f 67 65 74 64 61 |rt$=FNic|on_getda|
|00006080| 74 61 28 71 25 2c 6d 61 | 69 6e 25 2c 31 29 0a 33 |ta(q%,ma|in%,1).3|
|00006090| 34 34 30 49 46 20 6e 75 | 6d 62 65 72 74 24 3d 22 |440IF nu|mbert$="|
|000060a0| 22 20 54 48 45 4e 20 50 | 52 4f 43 69 63 6f 6e 5f |" THEN P|ROCicon_|
|000060b0| 70 75 74 64 61 74 61 28 | 71 25 2c 6d 61 69 6e 25 |putdata(|q%,main%|
|000060c0| 2c 35 2c 22 50 6c 65 61 | 73 65 20 65 6e 74 65 72 |,5,"Plea|se enter|
|000060d0| 20 61 20 6e 75 6d 62 65 | 72 22 2c 31 29 3a 45 4e | a numbe|r",1):EN|
|000060e0| 44 50 52 4f 43 0a 33 34 | 35 30 6e 75 6d 62 65 72 |DPROC.34|50number|
|000060f0| 25 3d 56 41 4c 28 6e 75 | 6d 62 65 72 74 24 29 0a |%=VAL(nu|mbert$).|
|00006100| 33 34 36 30 73 65 6e 64 | 74 6f 66 69 6c 65 24 3d |3460send|tofile$=|
|00006110| 22 22 0a 33 34 37 30 53 | 59 53 20 22 48 6f 75 72 |"".3470S|YS "Hour|
|00006120| 67 6c 61 73 73 5f 4f 6e | 22 0a 33 34 38 30 46 4f |glass_On|".3480FO|
|00006130| 52 20 76 61 72 61 3d 31 | 20 54 4f 20 6e 75 6d 62 |R vara=1| TO numb|
|00006140| 65 72 25 0a 33 34 38 35 | 20 20 53 59 53 20 22 48 |er%.3485|  SYS "H|
|00006150| 6f 75 72 67 6c 61 73 73 | 5f 50 65 72 63 65 6e 74 |ourglass|_Percent|
|00006160| 61 67 65 22 2c 28 76 61 | 72 61 2f 6e 75 6d 62 65 |age",(va|ra/numbe|
|00006170| 72 25 29 2a 31 30 30 0a | 33 34 39 30 20 20 46 4f |r%)*100.|3490  FO|
|00006180| 52 20 76 61 72 62 3d 31 | 20 54 4f 20 6e 75 6d 62 |R varb=1| TO numb|
|00006190| 65 72 25 0a 33 35 30 30 | 20 20 20 20 49 46 20 6e |er%.3500|    IF n|
|000061a0| 75 6d 62 65 72 25 2f 76 | 61 72 61 3d 76 61 72 62 |umber%/v|ara=varb|
|000061b0| 20 54 48 45 4e 20 73 65 | 6e 64 74 6f 66 69 6c 65 | THEN se|ndtofile|
|000061c0| 24 3d 73 65 6e 64 74 6f | 66 69 6c 65 24 2b 22 22 |$=sendto|file$+""|
|000061d0| 2b 53 54 52 24 28 76 61 | 72 61 29 2b 22 2c 20 22 |+STR$(va|ra)+", "|
|000061e0| 0a 33 35 31 30 20 20 4e | 45 58 54 20 76 61 72 62 |.3510  N|EXT varb|
|000061f0| 0a 33 35 32 30 4e 45 58 | 54 20 76 61 72 61 0a 33 |.3520NEX|T vara.3|
|00006200| 35 33 30 53 59 53 20 22 | 48 6f 75 72 67 6c 61 73 |530SYS "|Hourglas|
|00006210| 73 5f 4f 66 66 22 0a 33 | 35 34 30 50 52 4f 43 69 |s_Off".3|540PROCi|
|00006220| 63 6f 6e 5f 70 75 74 64 | 61 74 61 28 71 25 2c 6d |con_putd|ata(q%,m|
|00006230| 61 69 6e 25 2c 35 2c 22 | 46 69 6e 69 73 68 65 64 |ain%,5,"|Finished|
|00006240| 2c 20 70 6c 65 61 73 65 | 20 73 61 76 65 20 66 69 |, please| save fi|
|00006250| 6c 65 22 2c 31 29 0a 33 | 35 35 30 45 4e 44 50 52 |le",1).3|550ENDPR|
|00006260| 4f 43 0a 33 35 36 30 0a | 33 35 37 30 28 6d 65 6e |OC.3560.|3570(men|
|00006270| 75 24 29 0a 33 35 38 30 | 4c 4f 43 41 4c 20 76 6f |u$).3580|LOCAL vo|
|00006280| 69 64 25 0a 33 35 39 30 | 43 41 53 45 20 6d 65 6e |id%.3590|CASE men|
|00006290| 75 24 20 4f 46 0a 33 36 | 30 30 20 20 57 48 45 4e |u$ OF.36|00  WHEN|
|000062a0| 20 22 73 69 63 6f 6e 22 | 20 3a 76 6f 69 64 25 3d | "sicon"| :void%=|
|000062b0| 46 4e 6d 65 6e 75 73 65 | 6c 65 63 74 5f 73 69 63 |FNmenuse|lect_sic|
|000062c0| 6f 6e 0a 33 36 31 30 45 | 4e 44 43 41 53 45 0a 33 |on.3610E|NDCASE.3|
|000062d0| 36 32 30 45 4e 44 50 52 | 4f 43 0a 33 36 33 30 0a |620ENDPR|OC.3630.|
|000062e0| 33 36 34 30 44 45 46 46 | 4e 6d 65 6e 75 73 65 6c |3640DEFF|Nmenusel|
|000062f0| 65 63 74 5f 73 69 63 6f | 6e 0a 33 36 35 30 4c 4f |ect_sico|n.3650LO|
|00006300| 43 41 4c 20 6c 65 76 65 | 6c 30 0a 33 36 36 30 6c |CAL leve|l0.3660l|
|00006310| 65 76 65 6c 30 3d 71 25 | 21 30 0a 33 36 37 30 43 |evel0=q%|!0.3670C|
|00006320| 41 53 45 20 6c 65 76 65 | 6c 30 20 4f 46 0a 33 36 |ASE leve|l0 OF.36|
|00006330| 38 30 20 20 57 48 45 4e | 20 30 20 3a 50 52 4f 43 |80  WHEN| 0 :PROC|
|00006340| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 69 6e 66 6f 25 |openwind|ow(info%|
|00006350| 2c 46 41 4c 53 45 2c 2d | 31 29 0a 33 36 39 30 20 |,FALSE,-|1).3690 |
|00006360| 20 57 48 45 4e 20 31 20 | 3a 50 52 4f 43 63 6c 6f | WHEN 1 |:PROCclo|
|00006370| 73 65 64 6f 77 6e 0a 33 | 37 30 30 45 4e 44 43 41 |sedown.3|700ENDCA|
|00006380| 53 45 0a 33 37 31 30 3d | 30 0a 33 37 32 30 0a 33 |SE.3710=|0.3720.3|
|00006390| 37 33 30 44 45 46 50 52 | 4f 43 64 61 74 61 73 61 |730DEFPR|OCdatasa|
|000063a0| 76 65 28 62 29 0a 33 37 | 34 30 50 52 4f 43 73 61 |ve(b).37|40PROCsa|
|000063b0| 76 65 66 69 6c 65 28 46 | 4e 67 6e 61 6d 65 28 62 |vefile(F|Ngname(b|
|000063c0| 2b 34 34 29 29 0a 33 37 | 35 30 62 21 31 32 3d 62 |+44)).37|50b!12=b|
|000063d0| 21 38 3a 62 21 31 36 3d | 33 3a 21 62 3d 36 34 0a |!8:b!16=|3:!b=64.|
|000063e0| 33 37 36 30 53 59 53 20 | 22 57 69 6d 70 5f 53 65 |3760SYS |"Wimp_Se|
|000063f0| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 37 2c 62 2c |ndMessag|e",17,b,|
+--------+-------------------------+-------------------------+--------+--------+