home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | e0 07 00 00 f4 08 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 44 4d 58 64 65 6d 6f | 00 00 00 00 ff ff ff ff |.DMXdemo|........|
|00000070| 45 ff ff ff 87 33 fc fb | 00 00 00 00 ff ff ff ff |E....3..|........|
|00000080| a8 03 00 80 82 21 44 69 | 65 74 4d 61 6e 2b 58 00 |.....!Di|etMan+X.|
|00000090| ff ff ff ff 45 ff ff ff | c4 33 fc fb 00 00 00 00 |....E...|.3......|
|000000a0| ff ff ff ff f4 02 00 80 | 82 21 42 6f 6f 74 00 00 |........|.!Boot..|
|000000b0| 00 00 00 00 08 01 00 00 | 44 eb ff ff ed b3 9b 72 |........|D......r|
|000000c0| 03 00 89 67 08 01 00 00 | 24 00 00 00 82 21 52 75 |...g....|$....!Ru|
|000000d0| 6e 00 00 00 00 00 00 00 | 74 01 00 00 45 eb ff ff |n.......|t...E...|
|000000e0| 05 74 55 e3 03 00 aa 13 | 74 01 00 00 50 01 00 00 |.tU.....|t...P...|
|000000f0| 82 21 52 75 6e 49 6d 61 | 67 65 00 00 bb f7 00 00 |.!RunIma|ge......|
|00000100| 45 fb ff ff 23 48 54 e3 | 03 00 95 58 bb f7 00 00 |E...#HT.|...X....|
|00000110| e8 02 00 00 82 21 53 70 | 72 69 74 65 73 00 00 00 |.....!Sp|rites...|
|00000120| b0 0d 00 00 45 f9 ff ff | 09 4a e9 36 03 00 50 4d |....E...|.J.6..PM|
|00000130| b0 0d 00 00 c7 fa 00 00 | 82 52 65 73 6f 75 72 63 |........|.Resourc|
|00000140| 65 73 00 00 ff ff ff ff | 45 ff ff ff d2 34 fc fb |es......|E....4..|
|00000150| 00 00 00 00 ff ff ff ff | d0 02 00 80 82 43 6f 64 |........|.....Cod|
|00000160| 65 00 6e 20 31 36 20 63 | 00 02 00 00 f4 b4 00 00 |e.n 16 c|........|
|00000170| f4 b4 00 00 03 00 8a 34 | 00 02 00 00 9b 08 01 00 |.......4|........|
|00000180| 82 45 78 74 72 61 49 6e | 66 6f 00 63 45 27 00 00 |.ExtraIn|fo.cE'..|
|00000190| 45 fe fd ff dc 66 6e 92 | 03 00 3a 27 45 27 00 00 |E....fn.|..:'E'..|
|000001a0| bf 0a 01 00 82 46 6f 6f | 64 44 61 74 61 00 20 63 |.....Foo|dData. c|
|000001b0| 7d 39 00 00 45 fe fd ff | 1e 62 6e 92 03 00 e6 65 |}9..E...|.bn....e|
|000001c0| 7d 39 00 00 28 32 01 00 | 82 4d 65 73 73 61 67 65 |}9..(2..|.Message|
|000001d0| 73 00 20 63 ff ff ff ff | 45 ff ff ff 63 35 fc fb |s. c....|E...c5..|
|000001e0| 00 00 00 00 ff ff ff ff | d4 01 00 80 82 55 4b 00 |........|.....UK.|
|000001f0| 00 00 00 00 00 00 00 00 | af 04 00 00 45 ff ff ff |........|....E...|
|00000200| 97 f0 9d 0f 03 00 b8 58 | af 04 00 00 c9 6b 01 00 |.......X|.....k..|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 82 4e 55 46 | 6f 6f 64 44 61 74 61 00 |.....NUF|oodData.|
|00000240| a3 3b 00 00 44 fe fd ff | 1b 77 a0 6f 03 00 75 aa |.;..D...|.w.o..u.|
|00000250| a3 3b 00 00 9c 70 01 00 | 82 53 70 72 69 74 65 73 |.;...p..|.Sprites|
|00000260| 00 36 20 63 64 5f 00 00 | 45 f9 ff ff 6a c8 a2 0f |.6 cd_..|E...j...|
|00000270| 03 00 65 7b 64 5f 00 00 | 63 ac 01 00 82 54 61 72 |..e{d_..|c....Tar|
|00000280| 67 65 74 73 00 36 20 63 | 14 00 00 00 44 fd ff ff |gets.6 c|....D...|
|00000290| fc c7 cc f0 03 00 d2 f9 | 14 00 00 00 eb 0b 02 00 |........|........|
|000002a0| 82 54 61 72 67 65 74 5f | 52 44 41 00 19 00 00 00 |.Target_|RDA.....|
|000002b0| 44 fd ff ff 01 c8 cc f0 | 03 00 55 d5 19 00 00 00 |D.......|..U.....|
|000002c0| 23 0c 02 00 82 54 65 6d | 70 6c 61 74 65 73 00 63 |#....Tem|plates.c|
|000002d0| e0 36 00 00 45 ec ff ff | f4 8d ed d1 03 00 c7 18 |.6..E...|........|
|000002e0| e0 36 00 00 60 0c 02 00 | 82 57 69 6d 70 45 78 74 |.6..`...|.WimpExt|
|000002f0| 00 36 20 63 84 d7 00 00 | 44 fa ff ff 6f 5a 49 98 |.6 c....|D...oZI.|
|00000300| 03 00 96 3b 84 d7 00 00 | 64 43 02 00 00 65 20 74 |...;....|dC...e t|
|00000310| 68 61 6e 20 31 36 20 63 | 68 61 72 61 63 74 65 72 |han 16 c|haracter|
|00000320| 73 20 6c 6f 6e 67 0a 20 | 20 33 37 20 12 66 6c 65 |s long. | 37 .fle|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 82 44 69 65 | 74 00 6e 20 31 36 20 63 |.....Die|t.n 16 c|
|00000360| 9e 01 00 00 44 1d ff ff | 57 58 45 f0 03 00 1e 75 |....D...|WXE....u|
|00000370| 9e 01 00 00 0c 1b 03 00 | 82 6c 75 6e 63 68 00 20 |........|.lunch. |
|00000380| 31 36 20 63 84 00 00 00 | 43 0d ff ff 6d 1d 9a 3e |16 c....|C...m..>|
|00000390| 03 00 f3 2d 84 00 00 00 | ce 1c 03 00 82 4d 61 6e |...-....|.....Man|
|000003a0| 75 61 6c 00 31 36 20 63 | 8f 41 00 00 45 ff ff ff |ual.16 c|.A..E...|
|000003b0| 69 d6 fb f6 03 00 ab 28 | 8f 41 00 00 76 1d 03 00 |i......(|.A..v...|
|000003c0| 82 73 6e 61 63 6b 00 20 | 31 36 20 63 5a 00 00 00 |.snack. |16 cZ...|
|000003d0| 43 0d ff ff d9 94 9a 3e | 03 00 6b 52 5a 00 00 00 |C......>|..kRZ...|
|000003e0| 29 5f 03 00 00 65 20 74 | 68 61 6e 20 31 36 20 63 |)_...e t|han 16 c|
|000003f0| 68 61 72 61 63 74 65 72 | 73 20 6c 6f 6e 67 0a 20 |haracter|s long. |
|00000400| 20 33 37 20 12 66 6c 65 | 82 4d 4d 44 65 6d 6f 00 | 37 .fle|.MMDemo.|
|00000410| 00 00 00 00 ff ff ff ff | 45 ff ff ff ce 37 fc fb |........|E....7..|
|00000420| 00 00 00 00 ff ff ff ff | bc 07 00 80 82 21 4d 65 |........|.....!Me|
|00000430| 6e 75 4d 61 6e 00 00 37 | ff ff ff ff 45 ff ff ff |nuMan..7|....E...|
|00000440| e8 37 fc fb 00 00 00 00 | ff ff ff ff 78 06 00 80 |.7......|....x...|
|00000450| 82 21 42 6f 6f 74 00 00 | 00 00 00 00 83 00 00 00 |.!Boot..|........|
|00000460| 45 eb ff ff a5 07 bb 12 | 03 00 02 d3 83 00 00 00 |E.......|........|
|00000470| a7 5f 03 00 82 21 52 75 | 6e 00 00 00 00 00 00 00 |._...!Ru|n.......|
|00000480| 39 01 00 00 45 eb ff ff | 8f 8a bb 42 03 00 2c ae |9...E...|...B..,.|
|00000490| 39 01 00 00 4e 60 03 00 | 82 21 52 75 6e 49 6d 61 |9...N`..|.!RunIma|
|000004a0| 67 65 00 00 46 32 00 00 | 45 fb ff ff 3a ba 2f 92 |ge..F2..|E...:./.|
|000004b0| 03 00 fa 03 46 32 00 00 | ab 61 03 00 82 21 52 75 |....F2..|.a...!Ru|
|000004c0| 6e 49 6d 61 67 65 47 00 | 59 82 00 00 45 fb ff ff |nImageG.|Y...E...|
|000004d0| 42 62 2f 92 03 00 d9 1b | 59 82 00 00 15 94 03 00 |Bb/.....|Y.......|
|000004e0| 82 21 53 70 72 69 74 65 | 73 00 00 00 dc 05 00 00 |.!Sprite|s.......|
|000004f0| 45 f9 ff ff 04 47 ea 36 | 03 00 7a c7 dc 05 00 00 |E....G.6|..z.....|
|00000500| 92 16 04 00 82 52 65 73 | 6f 75 72 63 65 73 00 00 |.....Res|ources..|
|00000510| ff ff ff ff 45 ff ff ff | ed 38 fc fb 00 00 00 00 |....E...|.8......|
|00000520| ff ff ff ff 54 06 00 80 | 82 43 6f 64 65 00 00 65 |....T...|.Code..e|
|00000530| 86 01 00 37 00 02 00 00 | f4 b4 00 00 f4 b4 00 00 |...7....|........|
|00000540| 03 00 8a 34 00 02 00 00 | 92 1c 04 00 82 4c 61 72 |...4....|.....Lar|
|00000550| 64 65 72 44 61 74 61 00 | 0d 13 00 00 45 fe fd ff |derData.|....E...|
|00000560| 67 8b ec ae 03 00 c6 78 | 0d 13 00 00 b6 1e 04 00 |g......x|........|
|00000570| 82 4c 61 72 64 65 72 44 | 61 74 47 00 36 31 00 00 |.LarderD|atG.61..|
|00000580| 45 fe fd ff 26 40 6c 92 | 03 00 79 84 36 31 00 00 |E...&@l.|..y.61..|
|00000590| e7 31 04 00 82 4d 65 73 | 73 61 67 65 73 00 00 37 |.1...Mes|sages..7|
|000005a0| ff ff ff ff 45 ff ff ff | f4 39 fc fb 00 00 00 00 |....E...|.9......|
|000005b0| ff ff ff ff a0 05 00 80 | 82 55 4b 00 00 00 00 00 |........|.UK.....|
|000005c0| 00 00 00 00 7b 03 00 00 | 45 ff ff ff ce 77 ab 42 |....{...|E....w.B|
|000005d0| 03 00 b0 3b 7b 03 00 00 | 41 63 04 00 00 00 00 00 |...;{...|Ac......|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 82 53 70 72 69 74 65 73 | 00 01 00 37 64 2c 00 00 |.Sprites|...7d,..|
|00000610| 45 f9 ff ff 7a 74 22 92 | 03 00 75 59 64 2c 00 00 |E...zt".|..uYd,..|
|00000620| e0 66 04 00 82 54 65 6d | 70 6c 61 74 65 73 00 37 |.f...Tem|plates.7|
|00000630| 59 2e 00 00 45 ec ff ff | 06 e0 76 92 03 00 ba 26 |Y...E...|..v....&|
|00000640| 59 2e 00 00 68 93 04 00 | 82 57 69 6d 70 45 78 74 |Y...h...|.WimpExt|
|00000650| 00 01 00 37 88 d7 00 00 | 44 fa ff ff 01 f7 4c ca |...7....|D.....L.|
|00000660| 03 00 f7 bb 88 d7 00 00 | e5 c1 04 00 82 58 52 45 |........|.....XRE|
|00000670| 46 74 65 78 74 00 00 37 | 0f 00 00 00 45 ff ff ff |Ftext..7|....E...|
|00000680| a5 28 9b 30 03 00 09 0e | 0f 00 00 00 91 99 05 00 |.(.0....|........|
|00000690| 00 01 00 c2 8d 01 00 65 | 86 01 00 37 e4 01 00 04 |.......e|...7....|
|000006a0| 0e 00 00 02 00 00 00 f0 | 2f 01 00 fd b8 01 00 06 |........|/.......|
|000006b0| dc f9 ff 4c 00 00 00 00 | 00 00 00 00 00 00 00 00 |...L....|........|
|000006c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006d0| 00 00 00 00 00 00 00 00 | 82 52 65 61 64 4d 65 00 |........|.ReadMe.|
|000006e0| 86 01 00 37 08 07 00 00 | 45 ff ff ff f9 12 ee ae |...7....|E.......|
|000006f0| 03 00 70 67 08 07 00 00 | c4 99 05 00 82 52 65 63 |..pg....|.....Rec|
|00000700| 69 70 65 73 00 01 00 37 | ff ff ff ff 45 ff ff ff |ipes...7|....E...|
|00000710| bb 3b fc fb 00 00 00 00 | ff ff ff ff 98 07 00 80 |.;......|........|
|00000720| 82 61 70 70 6c 65 63 72 | 6d 62 6c 00 74 00 00 00 |.applecr|mbl.t...|
|00000730| 45 ff ff ff be 3c c0 30 | 03 00 f0 1c 74 00 00 00 |E....<.0|....t...|
|00000740| f0 a0 05 00 82 62 69 73 | 63 75 69 74 73 00 00 00 |.....bis|cuits...|
|00000750| 54 00 00 00 45 ff ff ff | 80 9d 59 34 03 00 f7 7e |T...E...|..Y4...~|
|00000760| 54 00 00 00 88 a1 05 00 | 82 63 61 75 6c 63 68 65 |T.......|.caulche|
|00000770| 65 73 65 00 92 00 00 00 | 45 ff ff ff 6e 4b a4 42 |ese.....|E...nK.B|
|00000780| 03 00 79 ed 92 00 00 00 | 00 a2 05 00 82 70 61 6e |..y.....|.....pan|
|00000790| 63 61 6b 65 00 00 00 00 | 5d 00 00 00 45 ff ff ff |cake....|]...E...|
|000007a0| dc 99 a4 42 03 00 5d 1d | 5d 00 00 00 b6 a2 05 00 |...B..].|].......|
|000007b0| 82 71 75 69 63 68 65 00 | 00 00 00 00 65 00 00 00 |.quiche.|....e...|
|000007c0| 45 ff ff ff 65 60 a5 42 | 03 00 47 29 65 00 00 00 |E...e`.B|..G)e...|
|000007d0| 37 a3 05 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |7.......|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 01 00 c2 8d 01 00 65 |........|.......e|
|00000800| 86 01 00 37 e4 01 00 04 | 0e 00 00 02 00 00 00 f0 |...7....|........|
|00000810| 2f 01 00 fd b8 01 00 06 | dc f9 ff 4c 00 00 00 00 |/.......|...L....|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 73 75 72 65 20 57 69 6d | 70 45 78 74 65 6e 73 69 |sure Wim|pExtensi|
|00000850| 6f 6e 20 31 2e 39 39 20 | 52 4d 4c 6f 61 64 20 3c |on 1.99 |RMLoad <|
|00000860| 4f 62 65 79 24 44 69 72 | 3e 2e 52 65 73 6f 75 72 |Obey$Dir|>.Resour|
|00000870| 63 65 73 2e 57 69 6d 70 | 45 78 74 0a 52 4d 45 6e |ces.Wimp|Ext.RMEn|
|00000880| 73 75 72 65 20 57 69 6d | 70 45 78 74 65 6e 73 69 |sure Wim|pExtensi|
|00000890| 6f 6e 20 31 2e 39 39 20 | 45 72 72 6f 72 20 46 53 |on 1.99 |Error FS|
|000008a0| 32 70 6c 75 73 20 6e 65 | 65 64 73 20 57 69 6d 70 |2plus ne|eds Wimp|
|000008b0| 45 78 74 65 6e 73 69 6f | 6e 20 31 2e 39 39 20 6f |Extensio|n 1.99 o|
|000008c0| 72 20 6c 61 74 65 72 0a | 52 75 6e 20 3c 44 69 65 |r later.|Run <Die|
|000008d0| 74 4d 61 6e 24 44 69 72 | 3e 2e 21 52 75 6e 49 6d |tMan$Dir|>.!RunIm|
|000008e0| 61 67 65 20 25 2a 30 0a | 46 69 6c 65 44 61 74 61 |age %*0.|FileData|
|000008f0| 82 21 52 75 46 69 6c 65 | 44 61 74 61 82 21 42 6f |.!RuFile|Data.!Bo|
|00000900| 6f 74 00 00 00 00 00 00 | 08 01 00 00 44 eb ff ff |ot......|....D...|
|00000910| ed b3 9b 72 03 00 89 67 | 7c 20 42 6f 6f 74 20 66 |...r...g|| Boot f|
|00000920| 69 6c 65 20 66 6f 72 20 | 4d 65 6e 75 4d 61 6e 20 |ile for |MenuMan |
|00000930| 56 65 72 73 69 6f 6e 20 | 31 2e 30 30 20 28 31 30 |Version |1.00 (10|
|00000940| 20 46 65 62 20 31 39 39 | 31 29 0a 53 65 74 20 44 | Feb 199|1).Set D|
|00000950| 69 65 74 4d 61 6e 24 44 | 69 72 20 3c 4f 62 65 79 |ietMan$D|ir <Obey|
|00000960| 24 44 69 72 3e 0a 53 65 | 74 20 46 69 6c 65 24 54 |$Dir>.Se|t File$T|
|00000970| 79 70 65 5f 46 30 44 20 | 6d 65 61 6c 0a 53 65 74 |ype_F0D |meal.Set|
|00000980| 20 46 69 6c 65 24 54 79 | 70 65 5f 46 31 44 20 64 | File$Ty|pe_F1D d|
|00000990| 69 65 74 0a 53 65 74 20 | 46 69 6c 65 24 54 79 70 |iet.Set |File$Typ|
|000009a0| 65 5f 44 46 45 20 43 53 | 56 0a 53 65 74 20 41 6c |e_DFE CS|V.Set Al|
|000009b0| 69 61 73 24 40 52 75 6e | 54 79 70 65 5f 46 30 44 |ias$@Run|Type_F0D|
|000009c0| 20 52 75 6e 20 3c 4f 62 | 65 79 24 44 69 72 3e 20 | Run <Ob|ey$Dir> |
|000009d0| 25 25 2a 30 0a 53 65 74 | 20 41 6c 69 61 73 24 40 |%%*0.Set| Alias$@|
|000009e0| 52 75 6e 54 79 70 65 5f | 46 31 44 20 52 75 6e 20 |RunType_|F1D Run |
|000009f0| 3c 4f 62 65 79 24 44 69 | 72 3e 20 25 25 2a 30 0a |<Obey$Di|r> %%*0.|
|00000a00| 49 63 6f 6e 53 70 72 69 | 74 65 73 20 3c 4f 62 65 |IconSpri|tes <Obe|
|00000a10| 79 24 44 69 72 3e 2e 21 | 53 70 72 69 74 65 73 0a |y$Dir>.!|Sprites.|
|00000a20| 46 69 6c 65 44 61 74 61 | 82 21 52 75 6e 00 00 00 |FileData|.!Run...|
|00000a30| 00 00 00 00 74 01 00 00 | 45 eb ff ff 05 74 55 e3 |....t...|E....tU.|
|00000a40| 03 00 aa 13 7c 20 52 75 | 6e 20 66 69 6c 65 20 66 |....| Ru|n file f|
|00000a50| 6f 72 20 44 69 65 74 4d | 61 6e 20 56 65 72 73 69 |or DietM|an Versi|
|00000a60| 6f 6e 20 31 2e 30 30 20 | 28 31 30 20 46 65 62 20 |on 1.00 |(10 Feb |
|00000a70| 31 39 39 31 29 0a 57 69 | 6d 70 53 6c 6f 74 20 2d |1991).Wi|mpSlot -|
|00000a80| 6d 69 6e 20 31 39 32 4b | 20 2d 6d 61 78 20 31 39 |min 192K| -max 19|
|00000a90| 32 4b 0a 49 63 6f 6e 53 | 70 72 69 74 65 73 20 3c |2K.IconS|prites <|
|00000aa0| 4f 62 65 79 24 44 69 72 | 3e 2e 21 53 70 72 69 74 |Obey$Dir|>.!Sprit|
|00000ab0| 65 73 0a 53 65 74 20 44 | 69 65 74 4d 61 6e 24 44 |es.Set D|ietMan$D|
|00000ac0| 69 72 20 3c 4f 62 65 79 | 24 44 69 72 3e 0a 52 4d |ir <Obey|$Dir>.RM|
|00000ad0| 45 6e 73 75 72 65 20 43 | 6f 6c 6f 75 72 54 72 61 |Ensure C|olourTra|
|00000ae0| 6e 73 20 30 2e 35 31 20 | 52 4d 4c 6f 61 64 20 3c |ns 0.51 |RMLoad <|
|00000af0| 4f 62 65 79 24 44 69 72 | 3e 2e 52 45 53 4f 55 52 |Obey$Dir|>.RESOUR|
|00000b00| 43 45 53 2e 43 6f 6c 6f | 75 72 73 0a 52 4d 45 6e |CES.Colo|urs.RMEn|
|00000b10| 73 75 72 65 20 57 69 6d | 70 45 78 74 65 6e 73 69 |sure Wim|pExtensi|
|00000b20| 6f 6e 20 31 2e 39 39 20 | 52 4d 4c 6f 61 64 20 3c |on 1.99 |RMLoad <|
|00000b30| 4f 62 65 79 24 44 69 72 | 3e 2e 52 65 73 6f 75 72 |Obey$Dir|>.Resour|
|00000b40| 63 65 73 2e 57 69 6d 70 | 45 78 74 0a 52 4d 45 6e |ces.Wimp|Ext.RMEn|
|00000b50| 73 75 72 65 20 57 69 6d | 70 45 78 74 65 6e 73 69 |sure Wim|pExtensi|
|00000b60| 6f 6e 20 31 2e 39 39 20 | 45 72 72 6f 72 20 46 53 |on 1.99 |Error FS|
|00000b70| 32 70 6c 75 73 20 6e 65 | 65 64 73 20 57 69 6d 70 |2plus ne|eds Wimp|
|00000b80| 45 78 74 65 6e 73 69 6f | 6e 20 31 2e 39 39 20 6f |Extensio|n 1.99 o|
|00000b90| 72 20 6c 61 74 65 72 0a | 52 75 6e 20 3c 44 69 65 |r later.|Run <Die|
|00000ba0| 74 4d 61 6e 24 44 69 72 | 3e 2e 21 52 75 6e 49 6d |tMan$Dir|>.!RunIm|
|00000bb0| 61 67 65 20 25 2a 30 0a | 46 69 6c 65 44 61 74 61 |age %*0.|FileData|
|00000bc0| 82 21 52 75 6e 49 6d 61 | 67 65 00 00 bb f7 00 00 |.!RunIma|ge......|
|00000bd0| 45 fd ff ff 65 34 fc fb | 03 00 95 58 0d 00 0a 10 |E...e4..|...X....|
|00000be0| f4 20 3e 21 52 75 6e 49 | 6d 61 67 65 0d 00 14 30 |. >!RunI|mage...0|
|00000bf0| f4 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |. ******|********|
|00000c00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 00 1e 30 |********|****...0|
|00000c20| f4 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000c30| 20 20 20 3a 20 52 49 53 | 43 20 4f 53 20 4d 75 6c | : RIS|C OS Mul|
|00000c40| 74 69 74 61 73 6b 69 6e | 67 20 20 2a 0d 00 28 30 |titaskin|g *..(0|
|00000c50| f4 20 43 6f 70 79 72 69 | 67 68 74 20 28 43 29 20 |. Copyri|ght (C) |
|00000c60| 4d 45 57 73 6f 66 74 20 | 4a 61 6e 75 61 72 79 20 |MEWsoft |January |
|00000c70| 31 39 39 33 20 20 20 20 | 20 20 20 2a 0d 00 32 30 |1993 | *..20|
|00000c80| f4 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |. ******|********|
|00000c90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ca0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 00 3c 04 |********|****..<.|
|00000cb0| 0d 00 46 18 70 72 6f 67 | 72 61 6d 24 3d 22 44 69 |..F.prog|ram$="Di|
|00000cc0| 65 74 4d 61 6e 2b 58 22 | 0d 00 50 1f 76 65 72 73 |etMan+X"|..P.vers|
|00000cd0| 69 6f 6e 24 3d 22 44 65 | 6d 6f 20 28 31 30 2d 46 |ion$="De|mo (10-F|
|00000ce0| 65 62 2d 39 35 29 22 0d | 00 5a 2d f4 20 58 52 45 |eb-95)".|.Z-. XRE|
|00000cf0| 46 20 64 6f 65 73 6e 74 | 20 6c 69 6b 65 20 3d 30 |F doesnt| like =0|
|00000d00| 20 78 25 3d 65 74 63 20 | 20 70 75 74 20 69 6e 20 | x%=etc | put in |
|00000d10| 54 48 45 4e 0d 00 64 2a | f4 20 6e 65 65 64 73 20 |THEN..d*|. needs |
|00000d20| 52 45 54 55 52 4e 20 61 | 66 74 65 72 20 6d 6f 64 |RETURN a|fter mod|
|00000d30| 69 66 79 69 6e 67 20 70 | 6f 72 74 69 6f 6e 0d 00 |ifying p|ortion..|
|00000d40| 6e 04 0d 00 78 27 f4 20 | 2a 2a 2a 2a 20 69 6e 69 |n...x'. |**** ini|
|00000d50| 74 69 61 6c 69 73 65 20 | 70 72 6f 67 72 61 6d 20 |tialise |program |
|00000d60| 61 73 20 61 20 74 61 73 | 6b 0d 00 82 3f c8 99 20 |as a tas|k...?.. |
|00000d70| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|00000d80| 22 2c 32 30 30 2c 26 34 | 42 35 33 34 31 35 34 2c |",200,&4|B534154,|
|00000d90| 70 72 6f 67 72 61 6d 24 | 20 b8 20 2c 74 61 73 6b |program$| . ,task|
|00000da0| 5f 68 61 6e 64 6c 65 25 | 0d 00 8c 0e f2 63 68 65 |_handle%|.....che|
|00000db0| 63 6b 62 6f 6f 74 0d 00 | 96 30 c8 99 20 22 57 69 |ckboot..|.0.. "Wi|
|00000dc0| 6d 70 45 78 74 5f 49 6e | 69 74 69 61 6c 69 73 65 |mpExt_In|itialise|
|00000dd0| 22 2c 31 32 2c 74 61 73 | 6b 5f 68 61 6e 64 6c 65 |",12,tas|k_handle|
|00000de0| 25 2c 25 31 31 31 0d 00 | a0 13 ee 20 85 20 f2 65 |%,%111..|... . .e|
|00000df0| 72 72 6f 72 62 6f 78 3a | e0 0d 00 aa 04 0d 00 b4 |rrorbox:|........|
|00000e00| 27 de 20 6d 73 67 74 25 | 20 31 36 2c 6d 73 67 62 |'. msgt%| 16,msgb|
|00000e10| 25 20 32 30 30 30 3a 63 | 6f 75 6e 74 72 79 24 3d |% 2000:c|ountry$=|
|00000e20| 22 55 4b 22 0d 00 be 30 | de 20 6d 65 6e 75 66 72 |"UK"...0|. menufr|
|00000e30| 65 65 25 20 26 31 30 30 | 30 2c 6d 65 6e 75 65 6e |ee% &100|0,menuen|
|00000e40| 64 25 20 2d 31 2c 6d 65 | 6e 75 6c 69 73 74 25 20 |d% -1,me|nulist% |
|00000e50| 26 31 30 30 0d 00 c8 57 | c8 99 20 22 4d 65 73 73 |&100...W|.. "Mess|
|00000e60| 61 67 65 54 72 61 6e 73 | 5f 4f 70 65 6e 46 69 6c |ageTrans|_OpenFil|
|00000e70| 65 22 2c 6d 73 67 74 25 | 2c 22 3c 44 69 65 74 4d |e",msgt%|,"<DietM|
|00000e80| 61 6e 24 44 69 72 3e 2e | 52 65 73 6f 75 72 63 65 |an$Dir>.|Resource|
|00000e90| 73 2e 4d 65 73 73 61 67 | 65 73 2e 22 2b 63 6f 75 |s.Messag|es."+cou|
|00000ea0| 6e 74 72 79 24 2c 6d 73 | 67 62 25 0d 00 d2 39 66 |ntry$,ms|gb%...9f|
|00000eb0| 69 6c 65 6e 61 6d 65 24 | 3d 22 6d 65 61 6c 22 3a |ilename$|="meal":|
|00000ec0| 62 6f 6f 74 24 3d 22 22 | 3a e7 20 a6 2d 32 35 36 |boot$=""|:. .-256|
|00000ed0| 3d 31 36 34 20 52 4f 33 | 25 3d b9 20 8b 20 52 4f |=164 RO3|%=. . RO|
|00000ee0| 33 25 3d a3 0d 00 dc 1d | 57 69 6d 70 5f 47 65 74 |3%=.....|Wimp_Get|
|00000ef0| 49 63 6f 6e 53 74 61 74 | 65 25 3d 26 34 30 30 43 |IconStat|e%=&400C|
|00000f00| 45 0d 00 e6 1d 57 69 6d | 70 5f 53 65 74 49 63 6f |E....Wim|p_SetIco|
|00000f10| 6e 53 74 61 74 65 25 3d | 26 34 30 30 43 44 0d 00 |nState%=|&400CD..|
|00000f20| f0 12 de 73 70 72 69 74 | 65 25 20 26 35 30 30 30 |...sprit|e% &5000|
|00000f30| 0d 00 fa 1e f2 73 65 74 | 75 70 5f 73 70 72 69 74 |.....set|up_sprit|
|00000f40| 65 61 72 65 61 3a 67 72 | 61 70 68 25 3d a3 0d 01 |earea:gr|aph%=...|
|00000f50| 04 14 f2 69 6e 69 74 5f | 73 70 72 69 74 65 61 72 |...init_|spritear|
|00000f60| 65 61 0d 01 0e 2a f4 20 | 2a 2a 2a 2a 20 64 61 74 |ea...*. |**** dat|
|00000f70| 61 62 6c 6f 63 6b 20 66 | 6f 72 20 77 69 6d 70 20 |ablock f|or wimp |
|00000f80| 6d 65 73 73 61 67 65 73 | 20 65 74 63 0d 01 18 21 |messages| etc...!|
|00000f90| de 20 71 25 20 32 35 36 | 3a de 20 6f 6c 64 71 25 |. q% 256|:. oldq%|
|00000fa0| 20 32 35 36 3a de 20 71 | 71 25 20 36 34 0d 01 22 | 256:. q|q% 64.."|
|00000fb0| 2f f4 20 2a 2a 2a 2a 20 | 64 61 74 61 62 6c 6f 63 |/. **** |databloc|
|00000fc0| 6b 20 66 6f 72 20 77 69 | 6e 64 6f 77 20 64 65 66 |k for wi|ndow def|
|00000fd0| 69 6e 69 74 69 6f 6e 73 | 20 65 74 63 0d 01 2c 21 |initions| etc..,!|
|00000fe0| de 20 62 6c 6f 63 6b 25 | 20 33 30 37 32 3a 63 75 |. block%| 3072:cu|
|00000ff0| 72 62 75 66 66 25 3d 62 | 6c 6f 63 6b 25 0d 01 36 |rbuff%=b|lock%..6|
|00001000| 34 f4 20 2a 2a 2a 2a 20 | 77 6f 72 6b 73 70 61 63 |4. **** |workspac|
|00001010| 65 20 66 6f 72 20 69 6e | 64 69 72 65 63 74 65 64 |e for in|directed|
|00001020| 20 69 63 6f 6e 73 20 69 | 6e 20 77 69 6e 64 6f 77 | icons i|n window|
|00001030| 73 0d 01 40 2f 6d 61 78 | 77 73 25 3d 26 31 43 30 |s..@/max|ws%=&1C0|
|00001040| 30 3a de 20 77 73 25 20 | 6d 61 78 77 73 25 3a 77 |0:. ws% |maxws%:w|
|00001050| 73 65 6e 64 25 3d 77 73 | 25 2b 6d 61 78 77 73 25 |send%=ws|%+maxws%|
|00001060| 0d 01 4a 1f f4 20 2a 2a | 2a 2a 20 67 65 74 20 77 |..J.. **|** get w|
|00001070| 69 6e 64 6f 77 20 74 65 | 6d 70 6c 61 74 65 73 0d |indow te|mplates.|
|00001080| 01 54 3f c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.T?.. "W|imp_Open|
|00001090| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 22 3c 44 69 65 |Template|",,"<Die|
|000010a0| 74 4d 61 6e 24 44 69 72 | 3e 2e 52 45 53 4f 55 52 |tMan$Dir|>.RESOUR|
|000010b0| 43 45 53 2e 54 65 6d 70 | 6c 61 74 65 73 22 0d 01 |CES.Temp|lates"..|
|000010c0| 5e 2a 70 72 69 6e 74 73 | 65 74 75 70 25 3d a4 47 |^*prints|etup%=.G|
|000010d0| 65 74 54 65 6d 70 6c 61 | 74 65 28 22 50 72 69 6e |etTempla|te("Prin|
|000010e0| 74 53 65 74 55 70 22 29 | 0d 01 68 28 65 78 74 72 |tSetUp")|..h(extr|
|000010f0| 61 69 6e 66 6f 25 3d a4 | 47 65 74 54 65 6d 70 6c |ainfo%=.|GetTempl|
|00001100| 61 74 65 28 22 45 78 74 | 72 61 49 6e 66 6f 22 29 |ate("Ext|raInfo")|
|00001110| 0d 01 72 28 63 6f 70 79 | 72 69 67 68 74 25 3d a4 |..r(copy|right%=.|
|00001120| 47 65 74 54 65 6d 70 6c | 61 74 65 28 22 63 6f 70 |GetTempl|ate("cop|
|00001130| 79 72 69 67 68 74 22 29 | 0d 01 7c 2a 63 6f 70 79 |yright")|..|*copy|
|00001140| 72 69 67 68 74 62 75 66 | 66 25 3d a4 69 63 6f 6e |rightbuf|f%=.icon|
|00001150| 61 64 64 72 28 63 6f 70 | 79 72 69 67 68 74 25 2c |addr(cop|yright%,|
|00001160| 33 29 0d 01 86 41 c8 99 | 20 22 57 69 6d 70 5f 4c |3)...A..| "Wimp_L|
|00001170| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 62 6c |oadTempl|ate",,bl|
|00001180| 6f 63 6b 25 2c 77 73 25 | 2c 77 73 65 6e 64 25 2c |ock%,ws%|,wsend%,|
|00001190| 2d 31 2c 22 4d 61 69 6e | 22 2c 30 20 b8 20 2c 2c |-1,"Main|",0 . ,,|
|000011a0| 77 73 25 0d 01 90 19 62 | 6c 6f 63 6b 25 21 36 34 |ws%....b|lock%!64|
|000011b0| 3d 53 70 72 69 74 65 41 | 72 65 61 25 0d 01 9a 2c |=SpriteA|rea%...,|
|000011c0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|000011d0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |indow",,|block% .|
|000011e0| 20 6c 61 72 64 65 72 25 | 0d 01 ae 28 6d 65 6e 75 | larder%|...(menu|
|000011f0| 6f 70 74 69 6f 6e 73 25 | 3d a4 47 65 74 54 65 6d |options%|=.GetTem|
|00001200| 70 6c 61 74 65 28 22 4f | 70 74 69 6f 6e 73 22 29 |plate("O|ptions")|
|00001210| 0d 01 c2 23 74 61 72 67 | 65 74 25 3d a4 47 65 74 |...#targ|et%=.Get|
|00001220| 54 65 6d 70 6c 61 74 65 | 28 22 54 61 72 67 65 74 |Template|("Target|
|00001230| 73 22 29 0d 01 d6 2a 74 | 61 72 67 65 74 69 6e 66 |s")...*t|argetinf|
|00001240| 6f 25 3d a4 47 65 74 54 | 65 6d 70 6c 61 74 65 28 |o%=.GetT|emplate(|
|00001250| 22 54 61 72 67 65 74 49 | 6e 66 6f 22 29 0d 01 ea |"TargetI|nfo")...|
|00001260| 22 65 64 69 74 6f 72 25 | 3d a4 47 65 74 54 65 6d |"editor%|=.GetTem|
|00001270| 70 6c 61 74 65 28 22 45 | 64 69 74 6f 72 22 29 0d |plate("E|ditor").|
|00001280| 01 fe 26 66 6f 6f 64 6d | 65 6e 75 25 3d a4 47 65 |..&foodm|enu%=.Ge|
|00001290| 74 54 65 6d 70 6c 61 74 | 65 28 22 46 6f 6f 64 45 |tTemplat|e("FoodE|
|000012a0| 64 69 74 22 29 0d 02 08 | 45 c8 99 20 22 57 69 6d |dit")...|E.. "Wim|
|000012b0| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|000012c0| 2c 62 6c 6f 63 6b 25 2c | 77 73 25 2c 77 73 65 6e |,block%,|ws%,wsen|
|000012d0| 64 25 2c 2d 31 2c 22 67 | 72 61 70 68 62 6f 78 22 |d%,-1,"g|raphbox"|
|000012e0| 2c 30 20 b8 20 2c 2c 77 | 73 25 0d 02 12 15 62 6c |,0 . ,,w|s%....bl|
|000012f0| 6f 63 6b 25 21 36 34 3d | 73 70 72 69 74 65 25 0d |ock%!64=|sprite%.|
|00001300| 02 1c 2e c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..... "W|imp_Crea|
|00001310| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |teWindow|",,block|
|00001320| 25 20 b8 20 67 72 61 70 | 68 62 6f 78 25 0d 02 26 |% . grap|hbox%..&|
|00001330| 45 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |E.. "Wim|p_LoadTe|
|00001340| 6d 70 6c 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 2c |mplate",|,block%,|
|00001350| 77 73 25 2c 77 73 65 6e | 64 25 2c 2d 31 2c 22 41 |ws%,wsen|d%,-1,"A|
|00001360| 6e 61 6c 79 73 69 73 22 | 2c 30 20 b8 20 2c 2c 77 |nalysis"|,0 . ,,w|
|00001370| 73 25 0d 02 30 19 62 6c | 6f 63 6b 25 21 36 34 3d |s%..0.bl|ock%!64=|
|00001380| 53 70 72 69 74 65 41 72 | 65 61 25 0d 02 3a 2e c8 |SpriteAr|ea%..:..|
|00001390| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|000013a0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|000013b0| 61 6e 61 6c 79 73 69 73 | 25 0d 02 44 24 73 65 72 |analysis|%..D$ser|
|000013c0| 76 69 6e 67 25 3d a4 69 | 63 6f 6e 61 64 64 72 28 |ving%=.i|conaddr(|
|000013d0| 61 6e 61 6c 79 73 69 73 | 25 2c 31 38 29 0d 02 4e |analysis|%,18)..N|
|000013e0| 41 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |A.. "Wim|p_LoadTe|
|000013f0| 6d 70 6c 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 2c |mplate",|,block%,|
|00001400| 77 73 25 2c 77 73 65 6e | 64 25 2c 2d 31 2c 22 54 |ws%,wsen|d%,-1,"T|
|00001410| 72 61 79 22 2c 30 20 b8 | 20 2c 2c 77 73 25 0d 02 |ray",0 .| ,,ws%..|
|00001420| 58 19 62 6c 6f 63 6b 25 | 21 36 34 3d 53 70 72 69 |X.block%|!64=Spri|
|00001430| 74 65 41 72 65 61 25 0d | 02 62 0e 70 6c 61 74 65 |teArea%.|.b.plate|
|00001440| 73 25 3d 31 30 0d 02 6c | 2a c8 99 20 22 57 69 6d |s%=10..l|*.. "Wim|
|00001450| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00001460| 2c 62 6c 6f 63 6b 25 20 | b8 20 74 72 61 79 25 0d |,block% |. tray%.|
|00001470| 02 76 25 6e 75 74 72 69 | 65 6e 74 62 75 66 66 25 |.v%nutri|entbuff%|
|00001480| 3d a4 69 63 6f 6e 61 64 | 64 72 28 74 72 61 79 25 |=.iconad|dr(tray%|
|00001490| 2c 33 33 29 0d 02 80 21 | 6d 65 61 6c 62 75 66 66 |,33)...!|mealbuff|
|000014a0| 25 3d a4 69 63 6f 6e 61 | 64 64 72 28 74 72 61 79 |%=.icona|ddr(tray|
|000014b0| 25 2c 33 35 29 0d 02 8a | 41 c8 99 20 22 57 69 6d |%,35)...|A.. "Wim|
|000014c0| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|000014d0| 2c 62 6c 6f 63 6b 25 2c | 77 73 25 2c 77 73 65 6e |,block%,|ws%,wsen|
|000014e0| 64 25 2c 2d 31 2c 22 49 | 6e 66 6f 22 2c 30 20 b8 |d%,-1,"I|nfo",0 .|
|000014f0| 20 2c 2c 77 73 25 0d 02 | 94 2a c8 99 20 22 57 69 | ,,ws%..|.*.. "Wi|
|00001500| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00001510| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 69 6e 66 6f 25 |,,block%| . info%|
|00001520| 0d 02 9e 1f 76 65 72 73 | 69 6f 6e 25 3d a4 69 63 |....vers|ion%=.ic|
|00001530| 6f 6e 61 64 64 72 28 69 | 6e 66 6f 25 2c 37 29 0d |onaddr(i|nfo%,7).|
|00001540| 02 a8 16 24 76 65 72 73 | 69 6f 6e 25 3d 76 65 72 |...$vers|ion%=ver|
|00001550| 73 69 6f 6e 24 0d 02 b2 | 20 63 75 73 74 69 6e 66 |sion$...| custinf|
|00001560| 6f 25 3d a4 69 63 6f 6e | 61 64 64 72 28 69 6e 66 |o%=.icon|addr(inf|
|00001570| 6f 25 2c 39 29 0d 02 bc | 41 c8 99 20 22 57 69 6d |o%,9)...|A.. "Wim|
|00001580| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00001590| 2c 62 6c 6f 63 6b 25 2c | 77 73 25 2c 77 73 65 6e |,block%,|ws%,wsen|
|000015a0| 64 25 2c 2d 31 2c 22 53 | 61 76 65 22 2c 30 20 b8 |d%,-1,"S|ave",0 .|
|000015b0| 20 2c 2c 77 73 25 0d 02 | c6 19 62 6c 6f 63 6b 25 | ,,ws%..|..block%|
|000015c0| 21 36 34 3d 53 70 72 69 | 74 65 41 72 65 61 25 0d |!64=Spri|teArea%.|
|000015d0| 02 d0 2d c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..-.. "W|imp_Crea|
|000015e0| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |teWindow|",,block|
|000015f0| 25 20 b8 20 73 61 76 65 | 62 6f 78 25 0d 02 da 23 |% . save|box%...#|
|00001600| 66 69 6c 65 6e 61 6d 65 | 25 3d a4 69 63 6f 6e 61 |filename|%=.icona|
|00001610| 64 64 72 28 73 61 76 65 | 62 6f 78 25 2c 31 29 0d |ddr(save|box%,1).|
|00001620| 02 e4 18 24 66 69 6c 65 | 6e 61 6d 65 25 3d 66 69 |...$file|name%=fi|
|00001630| 6c 65 6e 61 6d 65 24 0d | 02 ee 44 c8 99 20 22 57 |lename$.|..D.. "W|
|00001640| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001650| 22 2c 2c 62 6c 6f 63 6b | 25 2c 77 73 25 2c 77 73 |",,block|%,ws%,ws|
|00001660| 65 6e 64 25 2c 2d 31 2c | 22 53 61 76 65 43 53 56 |end%,-1,|"SaveCSV|
|00001670| 22 2c 30 20 b8 20 2c 2c | 77 73 25 0d 02 f8 19 62 |",0 . ,,|ws%....b|
|00001680| 6c 6f 63 6b 25 21 36 34 | 3d 53 70 72 69 74 65 41 |lock%!64|=SpriteA|
|00001690| 72 65 61 25 0d 03 02 30 | c8 99 20 22 57 69 6d 70 |rea%...0|.. "Wimp|
|000016a0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|000016b0| 62 6c 6f 63 6b 25 20 b8 | 20 73 61 76 65 62 6f 78 |block% .| savebox|
|000016c0| 63 73 76 25 0d 03 0c 41 | 66 69 6c 65 6e 61 6d 65 |csv%...A|filename|
|000016d0| 63 73 76 25 3d a4 69 63 | 6f 6e 61 64 64 72 28 73 |csv%=.ic|onaddr(s|
|000016e0| 61 76 65 62 6f 78 63 73 | 76 25 2c 31 29 3a 24 66 |aveboxcs|v%,1):$f|
|000016f0| 69 6c 65 6e 61 6d 65 63 | 73 76 25 3d 22 43 53 56 |ilenamec|sv%="CSV|
|00001700| 66 69 6c 65 22 0d 03 16 | 48 c8 99 20 22 57 69 6d |file"...|H.. "Wim|
|00001710| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00001720| 2c 62 6c 6f 63 6b 25 2c | 77 73 25 2c 77 73 65 6e |,block%,|ws%,wsen|
|00001730| 64 25 2c 2d 31 2c 22 53 | 61 76 65 64 69 65 74 43 |d%,-1,"S|avedietC|
|00001740| 53 56 22 2c 30 20 b8 20 | 2c 2c 77 73 25 0d 03 20 |SV",0 . |,,ws%.. |
|00001750| 19 62 6c 6f 63 6b 25 21 | 36 34 3d 53 70 72 69 74 |.block%!|64=Sprit|
|00001760| 65 41 72 65 61 25 0d 03 | 2a 34 c8 99 20 22 57 69 |eArea%..|*4.. "Wi|
|00001770| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00001780| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 73 61 76 65 62 |,,block%| . saveb|
|00001790| 6f 78 64 69 65 74 63 73 | 76 25 0d 03 34 4d 66 69 |oxdietcs|v%..4Mfi|
|000017a0| 6c 65 6e 61 6d 65 64 69 | 65 74 63 73 76 25 3d a4 |lenamedi|etcsv%=.|
|000017b0| 69 63 6f 6e 61 64 64 72 | 28 73 61 76 65 62 6f 78 |iconaddr|(savebox|
|000017c0| 64 69 65 74 63 73 76 25 | 2c 31 29 3a 24 66 69 6c |dietcsv%|,1):$fil|
|000017d0| 65 6e 61 6d 65 64 69 65 | 74 63 73 76 25 3d 22 43 |enamedie|tcsv%="C|
|000017e0| 53 56 66 69 6c 65 22 0d | 03 3e 45 c8 99 20 22 57 |SVfile".|.>E.. "W|
|000017f0| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001800| 22 2c 2c 62 6c 6f 63 6b | 25 2c 77 73 25 2c 77 73 |",,block|%,ws%,ws|
|00001810| 65 6e 64 25 2c 2d 31 2c | 22 53 61 76 65 44 69 65 |end%,-1,|"SaveDie|
|00001820| 74 22 2c 30 20 b8 20 2c | 2c 77 73 25 0d 03 48 19 |t",0 . ,|,ws%..H.|
|00001830| 62 6c 6f 63 6b 25 21 36 | 34 3d 53 70 72 69 74 65 |block%!6|4=Sprite|
|00001840| 41 72 65 61 25 0d 03 52 | 31 c8 99 20 22 57 69 6d |Area%..R|1.. "Wim|
|00001850| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00001860| 2c 62 6c 6f 63 6b 25 20 | b8 20 73 61 76 65 62 6f |,block% |. savebo|
|00001870| 78 64 69 65 74 25 0d 03 | 5c 2b 64 69 65 74 66 69 |xdiet%..|\+dietfi|
|00001880| 6c 65 6e 61 6d 65 25 3d | a4 69 63 6f 6e 61 64 64 |lename%=|.iconadd|
|00001890| 72 28 73 61 76 65 62 6f | 78 64 69 65 74 25 2c 31 |r(savebo|xdiet%,1|
|000018a0| 29 0d 03 66 19 24 64 69 | 65 74 66 69 6c 65 6e 61 |)..f.$di|etfilena|
|000018b0| 6d 65 25 3d 22 44 69 65 | 74 22 0d 03 70 0e 73 61 |me%="Die|t"..p.sa|
|000018c0| 76 65 72 65 66 25 3d 30 | 0d 03 7a 47 c8 99 20 22 |veref%=0|..zG.. "|
|000018d0| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|000018e0| 65 22 2c 2c 62 6c 6f 63 | 6b 25 2c 77 73 25 2c 77 |e",,bloc|k%,ws%,w|
|000018f0| 73 65 6e 64 25 2c 2d 31 | 2c 22 73 70 72 69 74 65 |send%,-1|,"sprite|
|00001900| 73 61 76 65 22 2c 30 20 | b8 20 2c 2c 77 73 25 0d |save",0 |. ,,ws%.|
|00001910| 03 84 30 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..0.. "W|imp_Crea|
|00001920| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |teWindow|",,block|
|00001930| 25 20 b8 20 73 61 76 65 | 73 70 72 69 74 65 25 0d |% . save|sprite%.|
|00001940| 03 8e 2c 73 70 72 69 74 | 65 66 69 6c 65 6e 61 6d |..,sprit|efilenam|
|00001950| 65 25 3d a4 69 63 6f 6e | 61 64 64 72 28 73 61 76 |e%=.icon|addr(sav|
|00001960| 65 73 70 72 69 74 65 25 | 2c 31 29 0d 03 98 42 c8 |esprite%|,1)...B.|
|00001970| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00001980| 6c 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 2c 77 73 |late",,b|lock%,ws|
|00001990| 25 2c 77 73 65 6e 64 25 | 2c 2d 31 2c 22 51 75 65 |%,wsend%|,-1,"Que|
|000019a0| 72 79 22 2c 30 20 b8 20 | 2c 2c 77 73 25 0d 03 a2 |ry",0 . |,,ws%...|
|000019b0| 2b c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |+.. "Wim|p_Create|
|000019c0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 20 |Window",|,block% |
|000019d0| b8 20 71 75 65 72 79 25 | 0d 03 ac 24 71 75 65 72 |. query%|...$quer|
|000019e0| 79 73 74 72 69 6e 67 25 | 3d a4 69 63 6f 6e 61 64 |ystring%|=.iconad|
|000019f0| 64 72 28 71 75 65 72 79 | 25 2c 33 29 0d 03 b6 1b |dr(query|%,3)....|
|00001a00| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 54 65 |.. "Wimp|_CloseTe|
|00001a10| 6d 70 6c 61 74 65 22 0d | 03 c0 2d c8 99 22 57 69 |mplate".|..-.."Wi|
|00001a20| 6d 70 45 78 74 5f 4c 69 | 6e 6b 57 69 6e 64 6f 77 |mpExt_Li|nkWindow|
|00001a30| 73 22 2c 2c 2c 74 72 61 | 79 25 2c 61 6e 61 6c 79 |s",,,tra|y%,analy|
|00001a40| 73 69 73 25 0d 03 ca 2f | c8 99 22 57 69 6d 70 45 |sis%.../|.."WimpE|
|00001a50| 78 74 5f 4c 69 6e 6b 57 | 69 6e 64 6f 77 73 22 2c |xt_LinkW|indows",|
|00001a60| 2c 2c 61 6e 61 6c 79 73 | 69 73 25 2c 6c 61 72 64 |,,analys|is%,lard|
|00001a70| 65 72 25 0d 03 d4 04 0d | 03 de 04 0d 03 e8 17 f4 |er%.....|........|
|00001a80| 20 2a 2a 2a 2a 20 77 69 | 6d 70 20 63 6f 6c 6f 75 | **** wi|mp colou|
|00001a90| 72 73 0d 03 f2 49 60 77 | 62 63 6f 6c 3d 30 3a 60 |rs...I`w|bcol=0:`|
|00001aa0| 74 62 63 6f 6c 3d 32 3a | 60 73 63 6f 3d 33 3a 60 |tbcol=2:|`sco=3:`|
|00001ab0| 6d 62 63 6f 6c 3d 32 3a | 60 77 66 63 6f 6c 3d 37 |mbcol=2:|`wfcol=7|
|00001ac0| 3a 60 74 66 63 6f 6c 3d | 37 3a 60 73 63 69 3d 31 |:`tfcol=|7:`sci=1|
|00001ad0| 3a 60 74 62 63 6f 6c 32 | 3d 31 32 0d 03 fc 04 0d |:`tbcol2|=12.....|
|00001ae0| 04 06 09 f2 69 6e 69 74 | 0d 04 10 31 24 63 6f 70 |....init|...1$cop|
|00001af0| 79 72 69 67 68 74 62 75 | 66 66 25 3d 24 63 75 73 |yrightbu|ff%=$cus|
|00001b00| 74 69 6e 66 6f 25 3a f2 | 66 72 6f 6e 74 28 63 6f |tinfo%:.|front(co|
|00001b10| 70 79 72 69 67 68 74 25 | 29 0d 04 1a 10 73 74 61 |pyright%|)....sta|
|00001b20| 72 74 75 70 25 3d 31 30 | 30 0d 04 24 04 0d 04 2e |rtup%=10|0..$....|
|00001b30| 11 e7 20 62 6f 6f 74 24 | 3c 3e 22 22 20 8c 0d 04 |.. boot$|<>"" ...|
|00001b40| 38 34 20 20 66 69 6c 65 | 6e 61 6d 65 24 3d 62 6f |84 file|name$=bo|
|00001b50| 6f 74 24 3a 66 69 6c 65 | 74 79 70 65 25 3d a4 72 |ot$:file|type%=.r|
|00001b60| 65 61 64 74 79 70 65 28 | 66 69 6c 65 6e 61 6d 65 |eadtype(|filename|
|00001b70| 24 29 0d 04 42 26 20 20 | e7 20 66 69 6c 65 74 79 |$)..B& |. filety|
|00001b80| 70 65 25 3d 26 46 30 44 | 20 8c 20 f2 6c 6f 61 64 |pe%=&F0D| . .load|
|00001b90| 5f 6d 65 61 6c 28 a3 29 | 0d 04 4c 26 20 20 e7 20 |_meal(.)|..L& . |
|00001ba0| 66 69 6c 65 74 79 70 65 | 25 3d 26 46 31 44 20 8c |filetype|%=&F1D .|
|00001bb0| 20 f2 6c 6f 61 64 5f 6d | 65 61 6c 28 b9 29 0d 04 | .load_m|eal(.)..|
|00001bc0| 56 3e 20 20 f2 66 72 6f | 6e 74 28 6c 61 72 64 65 |V> .fro|nt(larde|
|00001bd0| 72 25 29 3a f2 66 72 6f | 6e 74 28 74 72 61 79 25 |r%):.fro|nt(tray%|
|00001be0| 29 3a f2 66 72 6f 6e 74 | 28 61 6e 61 6c 79 73 69 |):.front|(analysi|
|00001bf0| 73 25 29 3a 62 6f 6f 74 | 24 3d 22 22 0d 04 60 05 |s%):boot|$=""..`.|
|00001c00| cd 0d 04 6a 04 0d 04 74 | 11 ee 20 85 20 f2 65 72 |...j...t|.. . .er|
|00001c10| 72 6f 72 62 6f 78 0d 04 | 7e 04 0d 04 88 0b 71 75 |rorbox..|~.....qu|
|00001c20| 69 74 25 3d a3 0d 04 92 | 45 e7 20 a6 28 2d 32 35 |it%=....|E. .(-25|
|00001c30| 36 29 3c 31 36 33 20 8c | 20 f2 77 61 72 6e 69 6e |6)<163 .| .warnin|
|00001c40| 67 62 6f 78 28 22 4f 6e | 6c 79 20 66 6f 72 20 52 |gbox("On|ly for R|
|00001c50| 49 53 43 4f 53 20 33 20 | 6f 72 20 61 62 6f 76 65 |ISCOS 3 |or above|
|00001c60| 22 29 3a 71 75 69 74 25 | 3d b9 0d 04 9c 0b 6d 61 |"):quit%|=.....ma|
|00001c70| 73 6b 25 3d 30 0d 04 a6 | 05 f5 0d 04 b0 18 c8 99 |sk%=0...|........|
|00001c80| 20 22 57 69 6d 70 45 78 | 74 5f 50 72 65 50 6f 6c | "WimpEx|t_PrePol|
|00001c90| 6c 22 0d 04 ba 26 20 20 | c8 99 22 57 69 6d 70 5f |l"...& |.."Wimp_|
|00001ca0| 50 6f 6c 6c 22 2c 6d 61 | 73 6b 25 2c 71 25 20 b8 |Poll",ma|sk%,q% .|
|00001cb0| 20 72 65 61 73 6f 6e 25 | 0d 04 c4 3b 20 20 c8 99 | reason%|...; ..|
|00001cc0| 20 22 57 69 6d 70 45 78 | 74 5f 41 63 74 69 6f 6e | "WimpEx|t_Action|
|00001cd0| 22 2c 74 61 73 6b 5f 68 | 61 6e 64 6c 65 25 2c 71 |",task_h|andle%,q|
|00001ce0| 25 2c 72 65 61 73 6f 6e | 25 20 b8 20 72 65 61 73 |%,reason|% . reas|
|00001cf0| 6f 6e 25 0d 04 ce 12 20 | 20 c8 8e 20 72 65 61 73 |on%.... | .. reas|
|00001d00| 6f 6e 25 20 ca 0d 04 d8 | 20 20 20 20 20 c9 20 31 |on% ....| . 1|
|00001d10| 3a 20 f2 72 65 64 72 61 | 77 5f 77 69 6e 64 6f 77 |: .redra|w_window|
|00001d20| 28 21 71 25 29 0d 04 e2 | 45 20 20 20 20 c9 20 32 |(!q%)...|E . 2|
|00001d30| 3a f2 6f 70 65 6e 5f 77 | 69 6e 64 6f 77 28 21 71 |:.open_w|indow(!q|
|00001d40| 25 2c 71 25 21 34 2c 71 | 25 21 38 2c 71 25 21 31 |%,q%!4,q|%!8,q%!1|
|00001d50| 32 2c 71 25 21 31 36 2c | 71 25 21 32 30 2c 71 25 |2,q%!16,|q%!20,q%|
|00001d60| 21 32 34 2c 71 25 21 32 | 38 29 0d 04 ec 1f 20 20 |!24,q%!2|8).... |
|00001d70| 20 20 c9 20 33 3a 20 f2 | 63 6c 6f 73 65 5f 77 69 | . 3: .|close_wi|
|00001d80| 6e 64 6f 77 28 21 71 25 | 29 0d 04 f6 1f 20 20 20 |ndow(!q%|).... |
|00001d90| 20 c9 20 34 3a 20 f2 6c | 65 61 76 65 5f 77 69 6e | . 4: .l|eave_win|
|00001da0| 64 6f 77 28 21 71 25 29 | 0d 05 00 1f 20 20 20 20 |dow(!q%)|.... |
|00001db0| c9 20 35 3a 20 f2 65 6e | 74 65 72 5f 77 69 6e 64 |. 5: .en|ter_wind|
|00001dc0| 6f 77 28 21 71 25 29 0d | 05 0a 3a 20 20 20 20 c9 |ow(!q%).|..: .|
|00001dd0| 20 36 3a 20 f2 6d 6f 75 | 73 65 5f 63 6c 69 63 6b | 6: .mou|se_click|
|00001de0| 28 21 71 25 2c 71 25 21 | 34 2c 71 25 21 38 2c 71 |(!q%,q%!|4,q%!8,q|
|00001df0| 25 21 31 32 2c 71 25 21 | 31 36 2c 71 25 21 32 30 |%!12,q%!|16,q%!20|
|00001e00| 29 0d 05 14 10 20 20 20 | 20 f4 20 71 25 21 38 3d |).... | . q%!8=|
|00001e10| 30 0d 05 1e 19 20 20 20 | 20 c9 20 37 3a 20 f2 64 |0.... | . 7: .d|
|00001e20| 65 63 6f 64 65 5f 64 72 | 61 67 0d 05 28 1f 20 20 |ecode_dr|ag..(. |
|00001e30| 20 20 c9 20 38 3a 20 f2 | 50 72 6f 63 65 73 73 4b | . 8: .|ProcessK|
|00001e40| 65 79 28 71 25 21 32 34 | 29 0d 05 32 1e 20 20 20 |ey(q%!24|)..2. |
|00001e50| 20 c9 20 39 3a 20 f2 6d | 65 6e 75 5f 73 65 6c 65 | . 9: .m|enu_sele|
|00001e60| 63 74 28 21 71 25 29 0d | 05 3c 31 20 20 20 20 c9 |ct(!q%).|.<1 .|
|00001e70| 20 31 37 2c 31 38 2c 31 | 39 3a 20 f2 72 65 63 65 | 17,18,1|9: .rece|
|00001e80| 69 76 65 28 72 65 61 73 | 6f 6e 25 2c 71 25 21 31 |ive(reas|on%,q%!1|
|00001e90| 32 2c 71 25 21 31 36 29 | 0d 05 46 07 20 20 cb 0d |2,q%!16)|..F. ..|
|00001ea0| 05 50 51 20 20 e7 20 73 | 74 61 72 74 75 70 25 3e |.PQ . s|tartup%>|
|00001eb0| 30 20 8c 20 73 74 61 72 | 74 75 70 25 2d 3d 31 3a |0 . star|tup%-=1:|
|00001ec0| e7 20 73 74 61 72 74 75 | 70 25 3d 30 20 8c 20 6d |. startu|p%=0 . m|
|00001ed0| 61 73 6b 25 3d 30 3a f2 | 63 6c 6f 73 65 5f 77 69 |ask%=0:.|close_wi|
|00001ee0| 6e 64 6f 77 28 63 6f 70 | 79 72 69 67 68 74 25 29 |ndow(cop|yright%)|
|00001ef0| 0d 05 5a 0b fd 20 71 75 | 69 74 25 0d 05 64 25 c8 |..Z.. qu|it%..d%.|
|00001f00| 99 20 22 4d 65 73 73 61 | 67 65 54 72 61 6e 73 5f |. "Messa|geTrans_|
|00001f10| 43 6c 6f 73 65 46 69 6c | 65 22 2c 6d 73 67 74 25 |CloseFil|e",msgt%|
|00001f20| 0d 05 6e 45 c8 99 20 22 | 58 57 69 6d 70 45 78 74 |..nE.. "|XWimpExt|
|00001f30| 5f 52 65 6c 65 61 73 65 | 50 6f 69 6e 74 65 72 22 |_Release|Pointer"|
|00001f40| 3a c8 99 20 22 58 57 69 | 6d 70 45 78 74 5f 43 6c |:.. "XWi|mpExt_Cl|
|00001f50| 6f 73 65 44 6f 77 6e 22 | 2c 74 61 73 6b 5f 68 61 |oseDown"|,task_ha|
|00001f60| 6e 64 6c 65 25 0d 05 78 | 17 c8 99 20 22 57 69 6d |ndle%..x|... "Wim|
|00001f70| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 05 82 05 |p_CloseD|own"....|
|00001f80| e0 0d 05 8c 04 0d 05 96 | 4c f4 20 2a 2a 2a 2a 2a |........|L. *****|
|00001f90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001fa0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001fb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001fc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001fd0| 2a 0d 05 a0 24 f4 20 41 | 70 70 6c 69 63 61 74 69 |*...$. A|pplicati|
|00001fe0| 6f 6e 2d 64 65 70 65 6e | 64 65 6e 74 20 72 6f 75 |on-depen|dent rou|
|00001ff0| 74 69 6e 65 73 0d 05 aa | 04 0d 05 b4 1c dd 20 f2 |tines...|...... .|
|00002000| 6c 65 61 76 65 5f 77 69 | 6e 64 6f 77 28 68 61 6e |leave_wi|ndow(han|
|00002010| 64 6c 65 25 29 0d 05 be | 10 c8 8e 20 68 61 6e 64 |dle%)...|... hand|
|00002020| 6c 65 25 20 ca 0d 05 c8 | 0b c9 20 74 72 61 79 25 |le% ....|.. tray%|
|00002030| 0d 05 d2 2e f2 73 65 74 | 6d 65 61 6c 6e 61 6d 65 |.....set|mealname|
|00002040| 73 28 6d 25 2c a4 5f 52 | 65 61 64 49 63 6f 6e 54 |s(m%,._R|eadIconT|
|00002050| 65 78 74 28 74 72 61 79 | 25 2c 33 35 29 29 0d 05 |ext(tray|%,35))..|
|00002060| dc 21 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 61 |.!.. "Wi|mp_SetCa|
|00002070| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 2d 31 0d |retPosit|ion",-1.|
|00002080| 05 e6 05 cb 0d 05 f0 05 | e1 0d 05 fa 04 0d 06 04 |........|........|
|00002090| 1c dd 20 f2 65 6e 74 65 | 72 5f 77 69 6e 64 6f 77 |.. .ente|r_window|
|000020a0| 28 68 61 6e 64 6c 65 25 | 29 0d 06 0e 10 c8 8e 20 |(handle%|)...... |
|000020b0| 68 61 6e 64 6c 65 25 20 | ca 0d 06 18 10 20 20 c9 |handle% |..... .|
|000020c0| 20 6c 61 72 64 65 72 25 | 3a 0d 06 22 05 cb 0d 06 | larder%|:.."....|
|000020d0| 2c 05 e1 0d 06 36 04 0d | 06 40 0f dd 20 a4 72 74 |,....6..|.@.. .rt|
|000020e0| 6f 7a 28 70 25 29 0d 06 | 4a 08 ea 20 71 24 0d 06 |oz(p%)..|J.. q$..|
|000020f0| 54 1e c8 95 20 3f 70 25 | 3c 3e 30 20 71 24 2b 3d |T... ?p%|<>0 q$+=|
|00002100| bd 3f 70 25 3a 70 25 2b | 3d 31 3a ce 0d 06 5e 07 |.?p%:p%+|=1:...^.|
|00002110| 3d 71 24 0d 06 68 04 0d | 06 72 17 dd 20 f2 69 6e |=q$..h..|.r.. .in|
|00002120| 69 74 5f 61 70 70 6c 69 | 63 61 74 69 6f 6e 0d 06 |it_appli|cation..|
|00002130| 7c 1e ea 20 66 69 72 73 | 74 63 6f 6d 6d 61 25 2c ||.. firs|tcomma%,|
|00002140| 73 65 63 6f 6e 64 63 6f | 6d 6d 61 25 0d 06 86 0f |secondco|mma%....|
|00002150| de 63 6f 64 65 25 20 26 | 32 30 30 0d 06 90 2c 64 |.code% &|200...,d|
|00002160| 62 75 66 66 73 69 7a 65 | 25 3d 26 36 30 30 3a de |buffsize|%=&600:.|
|00002170| 64 61 74 61 5f 62 75 66 | 66 65 72 25 20 64 62 75 |data_buf|fer% dbu|
|00002180| 66 66 73 69 7a 65 25 0d | 06 9a 35 ff 28 22 4c 4f |ffsize%.|..5.("LO|
|00002190| 41 44 20 3c 44 69 65 74 | 4d 61 6e 24 44 69 72 3e |AD <Diet|Man$Dir>|
|000021a0| 2e 52 45 53 4f 55 52 43 | 45 53 2e 43 6f 64 65 20 |.RESOURC|ES.Code |
|000021b0| 22 2b c3 7e 28 63 6f 64 | 65 25 29 29 0d 06 a4 13 |"+.~(cod|e%))....|
|000021c0| 63 24 3d 24 28 63 6f 64 | 65 25 2b 32 35 36 29 0d |c$=$(cod|e%+256).|
|000021d0| 06 ae 11 24 63 75 73 74 | 69 6e 66 6f 25 3d 63 24 |...$cust|info%=c$|
|000021e0| 0d 06 b8 38 e3 20 4a 25 | 3d 30 20 b8 20 a9 28 63 |...8. J%|=0 . .(c|
|000021f0| 24 29 2d 31 3a 63 75 73 | 74 69 6e 66 6f 25 3f 4a |$)-1:cus|tinfo%?J|
|00002200| 25 3d 28 63 75 73 74 69 | 6e 66 6f 25 3f 4a 25 29 |%=(custi|nfo%?J%)|
|00002210| 20 82 20 26 41 41 3a ed | 0d 06 c2 2a 66 6f 6e 74 | . &AA:.|...*font|
|00002220| 24 3d 22 43 6f 72 70 75 | 73 2e 4d 65 64 69 75 6d |$="Corpu|s.Medium|
|00002230| 22 3a f2 66 6f 6e 74 5f | 69 6e 69 74 69 61 6c 69 |":.font_|initiali|
|00002240| 73 65 0d 06 cc 3f 66 69 | 6c 65 74 79 70 65 25 3d |se...?fi|letype%=|
|00002250| 30 3a 73 63 72 61 70 25 | 3d a3 3a 73 63 72 61 70 |0:scrap%|=.:scrap|
|00002260| 66 69 6c 65 24 3d 22 22 | 3a 6d 6f 64 69 66 69 65 |file$=""|:modifie|
|00002270| 64 25 3d a3 3a 66 69 72 | 73 74 73 61 76 65 25 3d |d%=.:fir|stsave%=|
|00002280| b9 0d 06 d6 43 de 20 62 | 6f 78 25 20 31 36 2c 62 |....C. b|ox% 16,b|
|00002290| 6f 78 32 25 20 31 36 2c | 6d 61 74 72 69 78 25 20 |ox2% 16,|matrix% |
|000022a0| 31 36 2c 6f 72 69 67 69 | 6e 31 25 20 38 2c 6f 72 |16,origi|n1% 8,or|
|000022b0| 69 67 69 6e 32 25 20 38 | 2c 67 6d 61 74 72 69 78 |igin2% 8|,gmatrix|
|000022c0| 25 20 31 36 0d 06 e0 2e | f2 6c 6f 61 64 5f 66 6f |% 16....|.load_fo|
|000022d0| 6f 64 44 61 74 61 3a 73 | 68 6f 77 69 6e 66 6f 25 |odData:s|howinfo%|
|000022e0| 3d a3 3a de 20 69 6e 66 | 6f 64 61 74 61 24 28 31 |=.:. inf|odata$(1|
|000022f0| 31 29 0d 06 ea 23 de 20 | 63 6f 6e 74 61 69 6e 24 |1)...#. |contain$|
|00002300| 28 31 31 29 3a f4 20 66 | 6f 6f 64 20 62 72 65 61 |(11):. f|ood brea|
|00002310| 6b 64 6f 77 6e 0d 06 f4 | 33 de 20 70 6c 61 74 65 |kdown...|3. plate|
|00002320| 66 75 6c 6c 25 28 33 2c | 70 6c 61 74 65 73 25 29 |full%(3,|plates%)|
|00002330| 3a de 20 70 6c 61 74 65 | 73 65 6c 65 63 74 25 28 |:. plate|select%(|
|00002340| 70 6c 61 74 65 73 25 29 | 0d 06 fe 3d de 20 66 6f |plates%)|...=. fo|
|00002350| 6f 64 24 28 33 2c 70 6c | 61 74 65 73 25 29 3a de |od$(3,pl|ates%):.|
|00002360| 20 70 6f 72 74 69 6f 6e | 24 28 33 2c 70 6c 61 74 | portion|$(3,plat|
|00002370| 65 73 25 29 3a de 20 67 | 72 61 70 68 76 61 6c 73 |es%):. g|raphvals|
|00002380| 25 28 31 30 29 0d 07 08 | 34 61 6e 61 6c 79 73 69 |%(10)...|4analysi|
|00002390| 6e 67 25 3d 31 3a 6f 70 | 74 69 6f 6e 69 63 6f 6e |ng%=1:op|tionicon|
|000023a0| 25 3d 30 3a 73 65 6c 65 | 63 74 65 64 25 3d 30 3a |%=0:sele|cted%=0:|
|000023b0| 6a 6f 75 6c 65 73 25 3d | a3 0d 07 12 35 70 65 72 |joules%=|....5per|
|000023c0| 63 65 6e 74 25 3d a3 3a | 6e 75 74 72 69 65 6e 74 |cent%=.:|nutrient|
|000023d0| 25 3d 32 3a 65 78 70 6f | 72 74 25 3d a3 3a 63 73 |%=2:expo|rt%=.:cs|
|000023e0| 76 24 3d 22 22 3a 73 65 | 70 24 3d 22 2c 22 0d 07 |v$="":se|p$=","..|
|000023f0| 1c 38 de 20 74 6f 74 61 | 6c 28 38 29 2c 69 74 6f |.8. tota|l(8),ito|
|00002400| 74 61 6c 28 38 29 2c 70 | 74 6f 74 61 6c 28 35 29 |tal(8),p|total(5)|
|00002410| 2c 6e 75 74 72 69 65 6e | 74 24 28 35 29 2c 74 65 |,nutrien|t$(5),te|
|00002420| 6d 70 25 28 35 29 0d 07 | 26 2d de 20 6d 65 61 6c |mp%(5)..|&-. meal|
|00002430| 31 25 20 31 32 2c 6d 65 | 61 6c 32 25 20 31 32 2c |1% 12,me|al2% 12,|
|00002440| 6d 65 61 6c 33 25 20 31 | 32 2c 6d 65 61 6c 34 25 |meal3% 1|2,meal4%|
|00002450| 20 31 32 0d 07 30 33 24 | 6d 65 61 6c 31 25 3d a4 | 12..03$|meal1%=.|
|00002460| 6d 73 67 30 28 22 6d 65 | 61 6c 5f 31 22 29 3a 24 |msg0("me|al_1"):$|
|00002470| 6d 65 61 6c 32 25 3d a4 | 6d 73 67 30 28 22 6d 65 |meal2%=.|msg0("me|
|00002480| 61 6c 5f 32 22 29 0d 07 | 3a 33 24 6d 65 61 6c 33 |al_2")..|:3$meal3|
|00002490| 25 3d a4 6d 73 67 30 28 | 22 6d 65 61 6c 5f 33 22 |%=.msg0(|"meal_3"|
|000024a0| 29 3a 24 6d 65 61 6c 34 | 25 3d a4 6d 73 67 30 28 |):$meal4|%=.msg0(|
|000024b0| 22 6d 65 61 6c 5f 34 22 | 29 0d 07 44 17 6d 25 3d |"meal_4"|)..D.m%=|
|000024c0| 30 3a f4 20 6d 65 61 6c | 20 70 6f 69 6e 74 65 72 |0:. meal| pointer|
|000024d0| 0d 07 4e 30 70 5f 72 69 | 73 63 6f 73 25 3d b9 3a |..N0p_ri|scos%=.:|
|000024e0| 70 5f 64 69 65 74 25 3d | a3 3a 70 5f 74 61 72 67 |p_diet%=|.:p_targ|
|000024f0| 65 74 73 25 3d a3 3a 70 | 5f 69 6e 66 6f 25 3d a3 |ets%=.:p|_info%=.|
|00002500| 0d 07 58 15 70 5f 62 61 | 72 25 3d a3 3a 70 5f 70 |..X.p_ba|r%=.:p_p|
|00002510| 69 65 25 3d a3 0d 07 62 | 30 de 20 73 63 61 6c 65 |ie%=...b|0. scale|
|00002520| 28 35 29 3a de 20 74 61 | 72 67 65 74 25 28 34 29 |(5):. ta|rget%(4)|
|00002530| 3a f4 20 75 73 65 64 20 | 66 6f 72 20 62 61 72 20 |:. used |for bar |
|00002540| 63 68 61 72 74 0d 07 6c | 1a de 5f 62 75 66 66 65 |chart..l|.._buffe|
|00002550| 72 25 20 33 30 30 30 3a | 64 72 61 77 25 3d a3 0d |r% 3000:|draw%=..|
|00002560| 07 76 2f de 20 43 44 72 | 61 77 5f 66 6f 6e 74 24 |.v/. CDr|aw_font$|
|00002570| 28 33 29 2c 20 5f 63 6f | 6c 6f 75 72 73 25 20 32 |(3), _co|lours% 2|
|00002580| 30 2a 34 2c 20 5f 64 61 | 73 68 24 28 34 29 0d 07 |0*4, _da|sh$(4)..|
|00002590| 80 1b 73 74 61 72 74 75 | 70 25 3d b9 3a f2 67 65 |..startu|p%=.:.ge|
|000025a0| 74 5f 74 61 72 67 65 74 | 73 0d 07 8a 0a f7 20 8d |t_target|s..... .|
|000025b0| 74 72 47 0d 07 94 33 e3 | 20 6c 6f 6f 70 25 3d 31 |trG...3.| loop%=1|
|000025c0| 20 b8 20 35 3a f3 20 6e | 75 74 72 69 65 6e 74 24 | . 5:. n|utrient$|
|000025d0| 28 6c 6f 6f 70 25 29 2c | 73 63 61 6c 65 28 6c 6f |(loop%),|scale(lo|
|000025e0| 6f 70 25 29 3a ed 0d 07 | 9e 1a 6e 75 74 72 69 65 |op%):...|..nutrie|
|000025f0| 6e 74 24 28 30 29 3d 22 | 53 65 72 76 69 6e 67 22 |nt$(0)="|Serving"|
|00002600| 0d 07 a8 05 e1 0d 07 b2 | 3b dc 20 45 6e 65 72 67 |........|;. Energ|
|00002610| 79 2c 30 2e 30 37 2c 50 | 72 6f 74 65 69 6e 73 2c |y,0.07,P|roteins,|
|00002620| 32 2e 34 2c 43 61 72 62 | 6f 68 64 72 2c 2e 34 2c |2.4,Carb|ohdr,.4,|
|00002630| 46 61 74 73 2c 31 2e 36 | 2c 46 69 62 72 65 2c 37 |Fats,1.6|,Fibre,7|
|00002640| 0d 07 bc 04 0d 07 c6 14 | dd 20 f2 6c 6f 61 64 5f |........|. .load_|
|00002650| 66 6f 6f 64 44 61 74 61 | 0d 07 d0 09 ea 20 69 64 |foodData|..... id|
|00002660| 25 0d 07 da 2d 69 64 25 | 3d 8e 28 22 3c 44 69 65 |%...-id%|=.("<Die|
|00002670| 74 4d 61 6e 24 44 69 72 | 3e 2e 52 45 53 4f 55 52 |tMan$Dir|>.RESOUR|
|00002680| 43 45 53 2e 46 6f 6f 64 | 44 61 74 61 22 29 0d 07 |CES.Food|Data")..|
|00002690| e4 15 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |.... "Ho|urglass_|
|000026a0| 4f 6e 22 0d 07 ee 28 72 | 65 6d 61 69 6e 69 6e 67 |On"...(r|emaining|
|000026b0| 25 3d 31 30 3a f4 20 75 | 73 65 64 20 66 6f 72 20 |%=10:. u|sed for |
|000026c0| 65 78 74 72 61 20 66 6f | 6f 64 73 0d 07 f8 0b 6c |extra fo|ods....l|
|000026d0| 6f 6f 70 25 3d 30 0d 08 | 02 05 f5 0d 08 0c 0e 20 |oop%=0..|....... |
|000026e0| 20 6c 6f 6f 70 25 2b 3d | 31 0d 08 16 12 20 20 64 | loop%+=|1.... d|
|000026f0| 75 6d 6d 79 24 3d be 23 | 69 64 25 0d 08 20 0b fd |ummy$=.#|id%.. ..|
|00002700| 20 c5 23 69 64 25 0d 08 | 2a 18 6e 6f 5f 6f 66 5f | .#id%..|*.no_of_|
|00002710| 66 6f 6f 64 73 25 3d 6c | 6f 6f 70 25 2d 31 0d 08 |foods%=l|oop%-1..|
|00002720| 34 24 de 20 64 61 74 61 | 24 28 6e 6f 5f 6f 66 5f |4$. data|$(no_of_|
|00002730| 66 6f 6f 64 73 25 2b 72 | 65 6d 61 69 6e 69 6e 67 |foods%+r|emaining|
|00002740| 25 29 0d 08 3e 1d de 20 | 66 6f 6f 64 70 6f 69 6e |%)..>.. |foodpoin|
|00002750| 74 65 72 25 28 33 2c 70 | 6c 61 74 65 73 25 29 0d |ter%(3,p|lates%).|
|00002760| 08 48 0b cf 23 69 64 25 | 3d 30 0d 08 52 31 e3 20 |.H..#id%|=0..R1. |
|00002770| 6c 6f 6f 70 25 3d 30 20 | b8 20 6e 6f 5f 6f 66 5f |loop%=0 |. no_of_|
|00002780| 66 6f 6f 64 73 25 3a 64 | 61 74 61 24 28 6c 6f 6f |foods%:d|ata$(loo|
|00002790| 70 25 29 3d be 23 69 64 | 25 3a ed 0d 08 5c 09 d9 |p%)=.#id|%:...\..|
|000027a0| 23 69 64 25 0d 08 66 3f | 65 78 74 72 61 69 6e 66 |#id%..f?|extrainf|
|000027b0| 6f 66 6c 61 67 25 3d a3 | 3a 69 64 25 3d 8e 28 22 |oflag%=.|:id%=.("|
|000027c0| 3c 44 69 65 74 4d 61 6e | 24 44 69 72 3e 2e 52 45 |<DietMan|$Dir>.RE|
|000027d0| 53 4f 55 52 43 45 53 2e | 45 78 74 72 61 49 6e 66 |SOURCES.|ExtraInf|
|000027e0| 6f 22 29 0d 08 70 0e e7 | 20 69 64 25 3c 3e 30 20 |o")..p..| id%<>0 |
|000027f0| 8c 0d 08 7a 30 20 de 20 | 65 78 74 72 61 69 6e 66 |...z0 . |extrainf|
|00002800| 6f 24 28 6e 6f 5f 6f 66 | 5f 66 6f 6f 64 73 25 29 |o$(no_of|_foods%)|
|00002810| 3a 65 78 74 72 61 69 6e | 66 6f 66 6c 61 67 25 3d |:extrain|foflag%=|
|00002820| b9 0d 08 84 1d 20 e3 20 | 6c 6f 6f 70 25 3d 30 20 |..... . |loop%=0 |
|00002830| b8 20 6e 6f 5f 6f 66 5f | 66 6f 6f 64 73 25 0d 08 |. no_of_|foods%..|
|00002840| 8e 11 20 64 75 6d 6d 79 | 24 3d be 23 69 64 25 0d |.. dummy|$=.#id%.|
|00002850| 08 98 1d 20 66 69 72 73 | 74 63 6f 6d 6d 61 25 3d |... firs|tcomma%=|
|00002860| a7 64 75 6d 6d 79 24 2c | 22 2c 22 29 0d 08 a2 2c |.dummy$,|",")...,|
|00002870| 20 73 65 63 6f 6e 64 63 | 6f 6d 6d 61 25 3d a7 64 | secondc|omma%=.d|
|00002880| 75 6d 6d 79 24 2c 22 2c | 22 2c 66 69 72 73 74 63 |ummy$,",|",firstc|
|00002890| 6f 6d 6d 61 25 2b 31 29 | 0d 08 ac 58 20 e7 20 73 |omma%+1)|...X . s|
|000028a0| 65 63 6f 6e 64 63 6f 6d | 6d 61 25 3d 30 20 8c 20 |econdcom|ma%=0 . |
|000028b0| 65 78 74 72 61 69 6e 66 | 6f 24 28 6c 6f 6f 70 25 |extrainf|o$(loop%|
|000028c0| 29 3d 22 22 20 8b 20 65 | 78 74 72 61 69 6e 66 6f |)="" . e|xtrainfo|
|000028d0| 24 28 6c 6f 6f 70 25 29 | 3d c1 64 75 6d 6d 79 24 |$(loop%)|=.dummy$|
|000028e0| 2c 73 65 63 6f 6e 64 63 | 6f 6d 6d 61 25 2b 31 29 |,secondc|omma%+1)|
|000028f0| 0d 08 b6 06 20 ed 0d 08 | c0 0a 20 d9 23 69 64 25 |.... ...|.. .#id%|
|00002900| 0d 08 ca 06 20 cd 0d 08 | d4 16 c8 99 20 22 48 6f |.... ...|.... "Ho|
|00002910| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 0d 08 de 05 |urglass_|Off"....|
|00002920| e1 0d 08 e8 04 0d 08 f2 | 17 dd 20 f2 6c 6f 61 64 |........|.. .load|
|00002930| 5f 6d 65 61 6c 28 66 6c | 61 67 25 29 0d 08 fc 1f |_meal(fl|ag%)....|
|00002940| ea 20 69 64 25 2c 6c 6f | 6f 70 25 2c 6c 6f 6f 70 |. id%,lo|op%,loop|
|00002950| 32 25 2c 49 25 2c 64 6f | 6e 65 25 0d 09 06 18 f4 |2%,I%,do|ne%.....|
|00002960| 20 49 46 20 66 6c 61 67 | 25 20 6c 6f 61 64 20 64 | IF flag|% load d|
|00002970| 69 65 74 0d 09 10 40 e7 | 20 62 6f 6f 74 24 3c 3e |iet...@.| boot$<>|
|00002980| 22 22 20 64 61 74 61 66 | 69 6c 65 6e 61 6d 65 24 |"" dataf|ilename$|
|00002990| 3d 62 6f 6f 74 24 20 8b | 20 64 61 74 61 66 69 6c |=boot$ .| datafil|
|000029a0| 65 6e 61 6d 65 24 3d a4 | 72 74 6f 7a 28 71 25 2b |ename$=.|rtoz(q%+|
|000029b0| 34 34 29 0d 09 1a 43 e7 | 20 66 6c 61 67 25 20 24 |44)...C.| flag% $|
|000029c0| 64 69 65 74 66 69 6c 65 | 6e 61 6d 65 25 3d 64 61 |dietfile|name%=da|
|000029d0| 74 61 66 69 6c 65 6e 61 | 6d 65 24 20 8b 20 24 66 |tafilena|me$ . $f|
|000029e0| 69 6c 65 6e 61 6d 65 25 | 3d 64 61 74 61 66 69 6c |ilename%|=datafil|
|000029f0| 65 6e 61 6d 65 24 0d 09 | 24 18 69 64 25 3d 8e 28 |ename$..|$.id%=.(|
|00002a00| 64 61 74 61 66 69 6c 65 | 6e 61 6d 65 24 29 0d 09 |datafile|name$)..|
|00002a10| 2e 15 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |.... "Ho|urglass_|
|00002a20| 4f 6e 22 0d 09 38 18 64 | 6f 6e 65 25 3d a3 3a e7 |On"..8.d|one%=.:.|
|00002a30| 20 66 6c 61 67 25 20 6d | 25 3d 30 0d 09 42 2e f2 | flag% m|%=0..B..|
|00002a40| 73 65 74 6d 65 61 6c 6e | 61 6d 65 73 28 6d 25 2c |setmealn|ames(m%,|
|00002a50| a4 6c 65 61 66 6e 61 6d | 65 28 64 61 74 61 66 69 |.leafnam|e(datafi|
|00002a60| 6c 65 6e 61 6d 65 24 29 | 29 0d 09 4c 0e c8 95 20 |lename$)|)..L... |
|00002a70| ac 20 64 6f 6e 65 25 0d | 09 56 0d 20 20 6c 6f 6f |. done%.|.V. loo|
|00002a80| 70 25 3d 31 0d 09 60 0f | 20 20 e7 20 66 6c 61 67 |p%=1..`.| . flag|
|00002a90| 25 20 8c 0d 09 6a 13 20 | 20 64 75 6d 6d 79 24 3d |% ...j. | dummy$=|
|00002aa0| be 23 20 69 64 25 0d 09 | 74 1e 20 20 f2 73 65 74 |.# id%..|t. .set|
|00002ab0| 6d 65 61 6c 6e 61 6d 65 | 73 28 6d 25 2c 64 75 6d |mealname|s(m%,dum|
|00002ac0| 6d 79 24 29 0d 09 7e 07 | 20 20 cd 0d 09 88 07 20 |my$)..~.| ..... |
|00002ad0| 20 f5 0d 09 92 23 20 20 | 20 20 70 6c 61 74 65 66 | ....# | platef|
|00002ae0| 75 6c 6c 25 28 6d 25 2c | 6c 6f 6f 70 25 29 3d 9a |ull%(m%,|loop%)=.|
|00002af0| 20 23 69 64 25 0d 09 9c | 20 20 20 20 20 e7 20 70 | #id%...| . p|
|00002b00| 6c 61 74 65 66 75 6c 6c | 25 28 6d 25 2c 6c 6f 6f |latefull|%(m%,loo|
|00002b10| 70 25 29 20 8c 0d 09 a6 | 20 20 20 20 20 20 20 66 |p%) ....| f|
|00002b20| 6f 6f 64 24 28 6d 25 2c | 6c 6f 6f 70 25 29 3d be |ood$(m%,|loop%)=.|
|00002b30| 23 20 69 64 25 0d 09 b0 | 23 20 20 20 20 20 20 70 |# id%...|# p|
|00002b40| 6f 72 74 69 6f 6e 24 28 | 6d 25 2c 6c 6f 6f 70 25 |ortion$(|m%,loop%|
|00002b50| 29 3d be 23 20 69 64 25 | 0d 09 ba 09 20 20 20 20 |)=.# id%|.... |
|00002b60| cd 0d 09 c4 10 20 20 20 | 20 6c 6f 6f 70 25 2b 3d |..... | loop%+=|
|00002b70| 31 0d 09 ce 1d 20 20 fd | 20 c5 23 69 64 25 20 84 |1.... .| .#id% .|
|00002b80| 20 6c 6f 6f 70 25 3e 70 | 6c 61 74 65 73 25 0d 09 | loop%>p|lates%..|
|00002b90| d8 26 20 20 f4 20 6e 6f | 77 20 73 65 65 20 69 66 |.& . no|w see if|
|00002ba0| 20 66 6f 6f 64 20 69 73 | 20 69 6e 20 64 61 74 61 | food is| in data|
|00002bb0| 62 61 73 65 0d 09 e2 19 | 20 20 e3 20 6c 6f 6f 70 |base....| . loop|
|00002bc0| 25 3d 31 20 b8 20 70 6c | 61 74 65 73 25 0d 09 ec |%=1 . pl|ates%...|
|00002bd0| 20 20 20 20 20 e7 20 70 | 6c 61 74 65 66 75 6c 6c | . p|latefull|
|00002be0| 25 28 6d 25 2c 6c 6f 6f | 70 25 29 20 8c 0d 09 f6 |%(m%,loo|p%) ....|
|00002bf0| 12 20 20 20 20 20 20 6c | 6f 6f 70 32 25 3d 31 0d |. l|oop2%=1.|
|00002c00| 0a 00 0b 20 20 20 20 20 | 20 f5 0d 0a 0a 32 20 20 |... | ....2 |
|00002c10| 20 20 20 20 20 20 49 25 | 3d a7 64 61 74 61 24 28 | I%|=.data$(|
|00002c20| 6c 6f 6f 70 32 25 29 2c | 22 2c 22 2b 66 6f 6f 64 |loop2%),|","+food|
|00002c30| 24 28 6d 25 2c 6c 6f 6f | 70 25 29 29 0d 0a 14 15 |$(m%,loo|p%))....|
|00002c40| 20 20 20 20 20 20 20 20 | 6c 6f 6f 70 32 25 2b 3d | |loop2%+=|
|00002c50| 31 0d 0a 1e 27 20 20 20 | 20 20 20 fd 20 49 25 3c |1...' | . I%<|
|00002c60| 3e 30 20 84 20 6c 6f 6f | 70 32 25 3e 6e 6f 5f 6f |>0 . loo|p2%>no_o|
|00002c70| 66 5f 66 6f 6f 64 73 25 | 0d 0a 28 4b 20 20 20 20 |f_foods%|..(K |
|00002c80| 20 20 e7 20 49 25 3d 30 | 20 8c 20 70 6c 61 74 65 | . I%=0| . plate|
|00002c90| 66 75 6c 6c 25 28 6d 25 | 2c 6c 6f 6f 70 25 29 3d |full%(m%|,loop%)=|
|00002ca0| 30 20 8b 20 66 6f 6f 64 | 70 6f 69 6e 74 65 72 25 |0 . food|pointer%|
|00002cb0| 28 6d 25 2c 6c 6f 6f 70 | 25 29 3d 6c 6f 6f 70 32 |(m%,loop|%)=loop2|
|00002cc0| 25 2d 31 0d 0a 32 09 20 | 20 20 20 cd 0d 0a 3c 07 |%-1..2. | ...<.|
|00002cd0| 20 20 ed 0d 0a 46 1f 20 | 20 e7 20 66 6c 61 67 25 | ...F. | . flag%|
|00002ce0| 20 8c 20 6d 25 2b 3d 31 | 20 8b 20 64 6f 6e 65 25 | . m%+=1| . done%|
|00002cf0| 3d b9 0d 0a 50 19 20 20 | e7 20 6d 25 3d 34 20 64 |=...P. |. m%=4 d|
|00002d00| 6f 6e 65 25 3d b9 3a 6d | 25 3d 30 0d 0a 5a 05 ce |one%=.:m|%=0..Z..|
|00002d10| 0d 0a 64 29 f4 20 50 52 | 4f 43 63 72 65 61 74 65 |..d). PR|OCcreate|
|00002d20| 5f 6d 65 6e 75 28 6d 61 | 69 6e 6d 65 6e 75 25 2c |_menu(ma|inmenu%,|
|00002d30| 6d 65 6e 75 24 28 32 29 | 29 0d 0a 6e 09 d9 23 69 |menu$(2)|)..n..#i|
|00002d40| 64 25 0d 0a 78 16 c8 99 | 20 22 48 6f 75 72 67 6c |d%..x...| "Hourgl|
|00002d50| 61 73 73 5f 4f 66 66 22 | 0d 0a 82 2e 70 6c 61 74 |ass_Off"|....plat|
|00002d60| 65 73 65 6c 65 63 74 25 | 28 29 3d 30 3a 61 6e 61 |eselect%|()=0:ana|
|00002d70| 6c 79 73 69 6e 67 25 3d | 31 3a e7 20 66 6c 61 67 |lysing%=|1:. flag|
|00002d80| 25 20 6d 25 3d 30 0d 0a | 8c 18 f4 20 6e 6f 77 20 |% m%=0..|... now |
|00002d90| 66 69 6c 6c 20 74 68 65 | 20 69 63 6f 6e 73 0d 0a |fill the| icons..|
|00002da0| 96 1c f2 66 69 6c 6c 74 | 72 61 79 3a f2 74 6f 74 |...fillt|ray:.tot|
|00002db0| 61 6c 5f 64 69 65 74 28 | a3 29 0d 0a a0 05 e1 0d |al_diet(|.)......|
|00002dc0| 0a aa 04 0d 0a b4 16 dd | 20 a4 72 65 61 64 74 79 |........| .readty|
|00002dd0| 70 65 28 66 69 6c 65 24 | 29 0d 0a be 2d c8 99 20 |pe(file$|)...-.. |
|00002de0| 22 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 66 69 6c 65 |"OS_File|",5,file|
|00002df0| 24 20 b8 2c 2c 6c 6f 61 | 64 61 64 64 72 2c 2c 66 |$ .,,loa|daddr,,f|
|00002e00| 69 6c 65 6c 65 6e 0d 0a | c8 37 e7 20 28 6c 6f 61 |ilelen..|.7. (loa|
|00002e10| 64 61 64 64 72 3e 3e 3e | 32 30 29 3d 26 46 46 46 |daddr>>>|20)=&FFF|
|00002e20| 20 8c 3a 3d 26 46 46 46 | 20 80 20 6c 6f 61 64 61 | .:=&FFF| . loada|
|00002e30| 64 64 72 3e 3e 3e 38 20 | 8b 3a 3d 2d 31 0d 0a d2 |ddr>>>8 |.:=-1...|
|00002e40| 07 3d 2d 31 0d 0a dc 04 | 0d 0a e6 0f dd 20 f2 66 |.=-1....|..... .f|
|00002e50| 69 6c 6c 74 72 61 79 0d | 0a f0 11 ea 20 55 24 2c |illtray.|.... U$,|
|00002e60| 51 24 2c 6c 6f 6f 70 25 | 0d 0a fa 17 e3 20 6c 6f |Q$,loop%|..... lo|
|00002e70| 6f 70 25 3d 31 20 b8 20 | 70 6c 61 74 65 73 25 0d |op%=1 . |plates%.|
|00002e80| 0b 04 1e 20 20 e7 20 70 | 6c 61 74 65 66 75 6c 6c |... . p|latefull|
|00002e90| 25 28 6d 25 2c 6c 6f 6f | 70 25 29 20 8c 0d 0b 0e |%(m%,loo|p%) ....|
|00002ea0| 2e 20 20 20 20 f2 75 6e | 70 61 63 6b 28 64 61 74 |. .un|pack(dat|
|00002eb0| 61 24 28 66 6f 6f 64 70 | 6f 69 6e 74 65 72 25 28 |a$(foodp|ointer%(|
|00002ec0| 6d 25 2c 6c 6f 6f 70 25 | 29 29 29 0d 0b 18 42 20 |m%,loop%|)))...B |
|00002ed0| 20 20 20 63 6f 6e 74 61 | 69 6e 24 28 31 29 3d 66 | conta|in$(1)=f|
|00002ee0| 6f 6f 64 24 28 6d 25 2c | 6c 6f 6f 70 25 29 3a 63 |ood$(m%,|loop%):c|
|00002ef0| 6f 6e 74 61 69 6e 24 28 | 32 29 3d 70 6f 72 74 69 |ontain$(|2)=porti|
|00002f00| 6f 6e 24 28 6d 25 2c 6c | 6f 6f 70 25 29 0d 0b 22 |on$(m%,l|oop%).."|
|00002f10| 45 20 20 20 20 51 24 3d | a4 67 65 74 75 6e 69 74 |E Q$=|.getunit|
|00002f20| 28 70 6f 72 74 69 6f 6e | 24 28 6d 25 2c 6c 6f 6f |(portion|$(m%,loo|
|00002f30| 70 25 29 29 3a 55 24 3d | c1 70 6f 72 74 69 6f 6e |p%)):U$=|.portion|
|00002f40| 24 28 6d 25 2c 6c 6f 6f | 70 25 29 2c a9 51 24 2b |$(m%,loo|p%),.Q$+|
|00002f50| 31 29 0d 0b 2c 21 20 20 | 20 20 c8 95 20 c0 55 24 |1)..,! | .. .U$|
|00002f60| 2c 31 29 3d 22 20 22 3a | 55 24 3d c1 55 24 2c 32 |,1)=" ":|U$=.U$,2|
|00002f70| 29 3a ce 0d 0b 36 38 20 | 20 20 20 f2 53 65 74 49 |):...68 | .SetI|
|00002f80| 63 6f 6e 54 65 78 74 28 | 6c 6f 6f 70 25 2b 70 6c |conText(|loop%+pl|
|00002f90| 61 74 65 73 25 2c 74 72 | 61 79 25 2c 63 6f 6e 74 |ates%,tr|ay%,cont|
|00002fa0| 61 69 6e 24 28 31 29 2c | 32 31 29 0d 0b 40 30 20 |ain$(1),|21)..@0 |
|00002fb0| 20 20 20 f2 53 65 74 49 | 63 6f 6e 54 65 78 74 28 | .SetI|conText(|
|00002fc0| 6c 6f 6f 70 25 2b 32 2a | 70 6c 61 74 65 73 25 2c |loop%+2*|plates%,|
|00002fd0| 74 72 61 79 25 2c 51 24 | 2c 33 29 0d 0b 4a 29 20 |tray%,Q$|,3)..J) |
|00002fe0| 20 20 20 f2 53 65 74 49 | 63 6f 6e 54 65 78 74 28 | .SetI|conText(|
|00002ff0| 6c 6f 6f 70 25 2b 33 35 | 2c 74 72 61 79 25 2c 55 |loop%+35|,tray%,U|
|00003000| 24 2c 36 29 0d 0b 54 07 | 20 20 cc 0d 0b 5e 2f 20 |$,6)..T.| ...^/ |
|00003010| 20 20 20 f2 53 65 74 49 | 63 6f 6e 54 65 78 74 28 | .SetI|conText(|
|00003020| 6c 6f 6f 70 25 2b 70 6c | 61 74 65 73 25 2c 74 72 |loop%+pl|ates%,tr|
|00003030| 61 79 25 2c 22 22 2c 32 | 31 29 0d 0b 68 30 20 20 |ay%,"",2|1)..h0 |
|00003040| 20 20 f2 53 65 74 49 63 | 6f 6e 54 65 78 74 28 6c | .SetIc|onText(l|
|00003050| 6f 6f 70 25 2b 32 2a 70 | 6c 61 74 65 73 25 2c 74 |oop%+2*p|lates%,t|
|00003060| 72 61 79 25 2c 22 22 2c | 38 29 0d 0b 72 29 20 20 |ray%,"",|8)..r) |
|00003070| 20 20 f2 53 65 74 49 63 | 6f 6e 54 65 78 74 28 6c | .SetIc|onText(l|
|00003080| 6f 6f 70 25 2b 33 35 2c | 74 72 61 79 25 2c 22 22 |oop%+35,|tray%,""|
|00003090| 2c 35 29 0d 0b 7c 07 20 | 20 cd 0d 0b 86 05 ed 0d |,5)..|. | .......|
|000030a0| 0b 90 56 e7 20 6e 75 74 | 72 69 65 6e 74 25 3c 3e |..V. nut|rient%<>|
|000030b0| 32 20 6e 75 74 72 69 65 | 6e 74 25 3d 32 3a 24 6e |2 nutrie|nt%=2:$n|
|000030c0| 75 74 72 69 65 6e 74 62 | 75 66 66 25 3d 6e 75 74 |utrientb|uff%=nut|
|000030d0| 72 69 65 6e 74 24 28 6e | 75 74 72 69 65 6e 74 25 |rient$(n|utrient%|
|000030e0| 2d 32 29 3a f2 52 65 64 | 72 61 77 28 74 72 61 79 |-2):.Red|raw(tray|
|000030f0| 25 2c 33 33 29 0d 0b 9a | 1f e7 20 6d 25 3d 30 20 |%,33)...|.. m%=0 |
|00003100| 8c 20 24 6d 65 61 6c 62 | 75 66 66 25 3d 24 6d 65 |. $mealb|uff%=$me|
|00003110| 61 6c 31 25 0d 0b a4 1f | e7 20 6d 25 3d 31 20 8c |al1%....|. m%=1 .|
|00003120| 20 24 6d 65 61 6c 62 75 | 66 66 25 3d 24 6d 65 61 | $mealbu|ff%=$mea|
|00003130| 6c 32 25 0d 0b ae 1f e7 | 20 6d 25 3d 32 20 8c 20 |l2%.....| m%=2 . |
|00003140| 24 6d 65 61 6c 62 75 66 | 66 25 3d 24 6d 65 61 6c |$mealbuf|f%=$meal|
|00003150| 33 25 0d 0b b8 1f e7 20 | 6d 25 3d 33 20 8c 20 24 |3%..... |m%=3 . $|
|00003160| 6d 65 61 6c 62 75 66 66 | 25 3d 24 6d 65 61 6c 34 |mealbuff|%=$meal4|
|00003170| 25 0d 0b c2 16 3a f2 52 | 65 64 72 61 77 28 74 72 |%....:.R|edraw(tr|
|00003180| 61 79 25 2c 33 35 29 0d | 0b cc 05 e1 0d 0b d6 04 |ay%,35).|........|
|00003190| 0d 0b e0 16 dd 20 f2 73 | 61 76 65 66 69 6c 65 28 |..... .s|avefile(|
|000031a0| 66 25 2c 6e 24 29 0d 0b | e1 23 20 f2 77 61 72 6e |f%,n$)..|.# .warn|
|000031b0| 69 6e 67 62 6f 78 28 22 | 4e 6f 20 53 61 76 65 20 |ingbox("|No Save |
|000031c0| 6f 6e 20 44 65 6d 6f 22 | 29 0d 0c d0 05 e1 0d 0c |on Demo"|).......|
|000031d0| da 04 0d 0c e4 17 dd 20 | f2 73 61 76 65 5f 6d 65 |....... |.save_me|
|000031e0| 61 6c 28 66 6c 61 67 25 | 29 0d 0c e5 22 f2 77 61 |al(flag%|)...".wa|
|000031f0| 72 6e 69 6e 67 62 6f 78 | 28 22 4e 6f 20 53 61 76 |rningbox|("No Sav|
|00003200| 65 20 6f 6e 20 44 65 6d | 6f 22 29 0d 0d d4 1b f2 |e on Dem|o").....|
|00003210| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 73 61 76 |close_wi|ndow(sav|
|00003220| 65 62 6f 78 25 29 0d 0d | de 1f f2 63 6c 6f 73 65 |ebox%)..|...close|
|00003230| 5f 77 69 6e 64 6f 77 28 | 73 61 76 65 62 6f 78 64 |_window(|saveboxd|
|00003240| 69 65 74 25 29 0d 0d e8 | 05 e1 0d 0d f2 04 0d 0d |iet%)...|........|
|00003250| fc 13 dd 20 f2 73 61 76 | 65 5f 6d 65 61 6c 63 73 |... .sav|e_mealcs|
|00003260| 76 0d 0d fd 22 f2 77 61 | 72 6e 69 6e 67 62 6f 78 |v...".wa|rningbox|
|00003270| 28 22 4e 6f 20 53 61 76 | 65 20 6f 6e 20 44 65 6d |("No Sav|e on Dem|
|00003280| 6f 22 29 0d 0e b0 1e f2 | 63 6c 6f 73 65 5f 77 69 |o").....|close_wi|
|00003290| 6e 64 6f 77 28 73 61 76 | 65 62 6f 78 63 73 76 25 |ndow(sav|eboxcsv%|
|000032a0| 29 0d 0e ba 05 e1 0d 0e | c4 04 0d 0e ce 13 dd 20 |).......|....... |
|000032b0| f2 73 61 76 65 5f 64 69 | 65 74 63 73 76 0d 0e cf |.save_di|etcsv...|
|000032c0| 22 f2 77 61 72 6e 69 6e | 67 62 6f 78 28 22 4e 6f |".warnin|gbox("No|
|000032d0| 20 53 61 76 65 20 6f 6e | 20 44 65 6d 6f 22 29 0d | Save on| Demo").|
|000032e0| 0f 8c 27 f2 63 6c 6f 73 | 65 5f 77 69 6e 64 6f 77 |..'.clos|e_window|
|000032f0| 28 73 61 76 65 62 6f 78 | 64 69 65 74 63 73 76 25 |(savebox|dietcsv%|
|00003300| 29 3a 6d 25 3d 30 0d 0f | 96 05 e1 0d 0f a0 04 0d |):m%=0..|........|
|00003310| 0f aa 0d dd 20 f2 65 78 | 70 6f 72 74 0d 0f ab 22 |.... .ex|port..."|
|00003320| f2 77 61 72 6e 69 6e 67 | 62 6f 78 28 22 4e 6f 20 |.warning|box("No |
|00003330| 53 61 76 65 20 6f 6e 20 | 44 65 6d 6f 22 29 0d 10 |Save on |Demo")..|
|00003340| 54 1e f2 63 6c 6f 73 65 | 5f 77 69 6e 64 6f 77 28 |T..close|_window(|
|00003350| 73 61 76 65 62 6f 78 63 | 73 76 25 29 0d 10 5e 05 |saveboxc|sv%)..^.|
|00003360| e1 0d 10 68 04 0d 10 72 | 10 dd 20 f2 72 61 6d 65 |...h...r|.. .rame|
|00003370| 78 70 6f 72 74 0d 10 73 | 22 f2 77 61 72 6e 69 6e |xport..s|".warnin|
|00003380| 67 62 6f 78 28 22 4e 6f | 20 53 61 76 65 20 6f 6e |gbox("No| Save on|
|00003390| 20 44 65 6d 6f 22 29 0d | 10 d6 28 f2 63 6c 6f 73 | Demo").|..(.clos|
|000033a0| 65 5f 77 69 6e 64 6f 77 | 28 73 61 76 65 62 6f 78 |e_window|(savebox|
|000033b0| 63 73 76 25 29 3a 65 78 | 70 6f 72 74 25 3d a3 0d |csv%):ex|port%=..|
|000033c0| 10 e0 05 e1 0d 10 ea 04 | 0d 10 f4 15 dd 20 a4 66 |........|..... .f|
|000033d0| 6f 72 6d 73 74 72 69 6e | 67 28 6c 25 29 0d 10 fe |ormstrin|g(l%)...|
|000033e0| 0e ea 20 6c 6f 6f 70 25 | 2c 63 24 0d 11 08 09 63 |.. loop%|,c$....c|
|000033f0| 24 3d 22 22 0d 11 12 27 | f2 75 6e 70 61 63 6b 28 |$=""...'|.unpack(|
|00003400| 64 61 74 61 24 28 66 6f | 6f 64 70 6f 69 6e 74 65 |data$(fo|odpointe|
|00003410| 72 25 28 6d 25 2c 6c 25 | 29 29 29 0d 11 1c 2c 73 |r%(m%,l%|)))...,s|
|00003420| 63 61 6c 65 66 3d bb 28 | 70 6f 72 74 69 6f 6e 24 |calef=.(|portion$|
|00003430| 28 6d 25 2c 6c 25 29 29 | 2f bb 28 63 6f 6e 74 61 |(m%,l%))|/.(conta|
|00003440| 69 6e 24 28 32 29 29 0d | 11 26 14 63 24 2b 3d 66 |in$(2)).|.&.c$+=f|
|00003450| 6f 6f 64 24 28 6d 25 2c | 6c 25 29 0d 11 30 0c 63 |ood$(m%,|l%)..0.c|
|00003460| 24 2b 3d 73 65 70 24 0d | 11 3a 20 63 24 2b 3d 70 |$+=sep$.|.: c$+=p|
|00003470| 6f 72 74 69 6f 6e 24 28 | 6d 25 2c 6c 25 29 3a 63 |ortion$(|m%,l%):c|
|00003480| 24 2b 3d 73 65 70 24 0d | 11 44 54 e7 20 6a 6f 75 |$+=sep$.|.DT. jou|
|00003490| 6c 65 73 25 20 63 24 2b | 3d c3 28 a8 28 bb 28 63 |les% c$+|=.(.(.(c|
|000034a0| 6f 6e 74 61 69 6e 24 28 | 33 29 29 2a 73 63 61 6c |ontain$(|3))*scal|
|000034b0| 65 66 2a 34 2e 31 38 29 | 29 20 8b 20 63 24 2b 3d |ef*4.18)|) . c$+=|
|000034c0| c3 28 a8 28 bb 28 63 6f | 6e 74 61 69 6e 24 28 33 |.(.(.(co|ntain$(3|
|000034d0| 29 29 2a 73 63 61 6c 65 | 66 29 29 0d 11 4e 11 e3 |))*scale|f))..N..|
|000034e0| 20 6c 6f 6f 70 25 3d 34 | 20 b8 20 37 0d 11 58 32 | loop%=4| . 7..X2|
|000034f0| 20 20 63 24 2b 3d 73 65 | 70 24 3a 63 24 2b 3d c3 | c$+=se|p$:c$+=.|
|00003500| 28 a8 28 bb 28 63 6f 6e | 74 61 69 6e 24 28 6c 6f |(.(.(con|tain$(lo|
|00003510| 6f 70 25 29 29 2a 73 63 | 61 6c 65 66 29 29 0d 11 |op%))*sc|alef))..|
|00003520| 62 05 ed 0d 11 6c 11 e7 | 20 73 68 6f 77 69 6e 66 |b....l..| showinf|
|00003530| 6f 25 20 8c 0d 11 76 36 | 20 f2 67 65 74 65 78 74 |o% ...v6| .getext|
|00003540| 72 61 69 6e 66 6f 28 65 | 78 74 72 61 69 6e 66 6f |rainfo(e|xtrainfo|
|00003550| 24 28 66 6f 6f 64 70 6f | 69 6e 74 65 72 25 28 6d |$(foodpo|inter%(m|
|00003560| 25 2c 6c 25 29 29 2c 49 | 25 29 0d 11 80 12 20 e3 |%,l%)),I|%).... .|
|00003570| 20 6c 6f 6f 70 25 3d 31 | 20 b8 20 38 0d 11 8a 23 | loop%=1| . 8...#|
|00003580| 20 20 63 24 2b 3d 73 65 | 70 24 3a 63 24 2b 3d 69 | c$+=se|p$:c$+=i|
|00003590| 6e 66 6f 64 61 74 61 24 | 28 6c 6f 6f 70 25 29 0d |nfodata$|(loop%).|
|000035a0| 11 94 07 20 20 ed 0d 11 | 9e 04 0d 11 a8 04 0d 11 |... ...|........|
|000035b0| b2 06 20 cd 0d 11 bc 07 | 3d 63 24 0d 11 c6 04 0d |.. .....|=c$.....|
|000035c0| 11 d0 11 dd 20 a4 66 6f | 72 6d 74 6f 74 61 6c 73 |.... .fo|rmtotals|
|000035d0| 0d 11 da 0e ea 20 6c 6f | 6f 70 25 2c 63 24 0d 11 |..... lo|op%,c$..|
|000035e0| e4 19 63 24 3d 22 54 6f | 74 61 6c 73 22 2b 73 65 |..c$="To|tals"+se|
|000035f0| 70 24 2b 73 65 70 24 0d | 11 ee 11 e3 20 6c 6f 6f |p$+sep$.|.... loo|
|00003600| 70 25 3d 30 20 b8 20 34 | 0d 11 f8 2b 20 20 63 24 |p%=0 . 4|...+ c$|
|00003610| 2b 3d a4 5f 52 65 61 64 | 49 63 6f 6e 54 65 78 74 |+=._Read|IconText|
|00003620| 28 61 6e 61 6c 79 73 69 | 73 25 2c 32 2a 6c 6f 6f |(analysi|s%,2*loo|
|00003630| 70 25 29 0d 12 02 19 20 | 20 e7 20 6c 6f 6f 70 25 |p%).... | . loop%|
|00003640| 3c 3e 34 20 63 24 2b 3d | 73 65 70 24 0d 12 0c 05 |<>4 c$+=|sep$....|
|00003650| ed 0d 12 16 11 e7 20 73 | 68 6f 77 69 6e 66 6f 25 |...... s|howinfo%|
|00003660| 20 8c 0d 12 20 0c 63 24 | 2b 3d 73 65 70 24 0d 12 | ... .c$|+=sep$..|
|00003670| 2a 14 20 e3 20 6c 6f 6f | 70 25 3d 31 33 20 b8 20 |*. . loo|p%=13 . |
|00003680| 32 30 0d 12 34 2a 20 20 | 63 24 2b 3d a4 5f 52 65 |20..4* |c$+=._Re|
|00003690| 61 64 49 63 6f 6e 54 65 | 78 74 28 65 78 74 72 61 |adIconTe|xt(extra|
|000036a0| 69 6e 66 6f 25 2c 6c 6f | 6f 70 25 29 0d 12 3e 24 |info%,lo|op%)..>$|
|000036b0| 20 20 e7 20 6c 6f 6f 70 | 25 3d 31 33 20 63 24 2b | . loop|%=13 c$+|
|000036c0| 3d 22 75 67 22 20 8b 20 | 63 24 2b 3d 22 6d 67 22 |="ug" . |c$+="mg"|
|000036d0| 0d 12 48 19 20 20 e7 20 | 6c 6f 6f 70 25 3c 32 30 |..H. . |loop%<20|
|000036e0| 20 63 24 2b 3d 73 65 70 | 24 0d 12 52 07 20 20 ed | c$+=sep|$..R. .|
|000036f0| 0d 12 5c 05 cd 0d 12 66 | 07 3d 63 24 0d 12 70 04 |..\....f|.=c$..p.|
|00003700| 0d 12 7a 13 dd 20 f2 73 | 61 76 65 64 61 74 61 62 |..z.. .s|avedatab|
|00003710| 61 73 65 0d 12 84 0f ea | 20 69 64 25 2c 6c 6f 6f |ase.....| id%,loo|
|00003720| 70 25 0d 12 8e 2d 69 64 | 25 3d 8e 28 22 3c 44 69 |p%...-id|%=.("<Di|
|00003730| 65 74 4d 61 6e 24 44 69 | 72 3e 2e 52 45 53 4f 55 |etMan$Di|r>.RESOU|
|00003740| 52 43 45 53 2e 46 6f 6f | 64 44 61 74 61 22 29 0d |RCES.Foo|dData").|
|00003750| 12 98 15 c8 99 20 22 48 | 6f 75 72 67 6c 61 73 73 |..... "H|ourglass|
|00003760| 5f 4f 6e 22 0d 12 a2 31 | e3 20 6c 6f 6f 70 25 3d |_On"...1|. loop%=|
|00003770| 30 20 b8 20 6e 6f 5f 6f | 66 5f 66 6f 6f 64 73 25 |0 . no_o|f_foods%|
|00003780| 3a d5 23 69 64 25 2c 64 | 61 74 61 24 28 6c 6f 6f |:.#id%,d|ata$(loo|
|00003790| 70 25 29 3a ed 0d 12 ac | 09 d9 23 69 64 25 0d 12 |p%):....|..#id%..|
|000037a0| b6 0f 6d 6f 64 69 66 69 | 65 64 25 3d a3 0d 12 c0 |..modifi|ed%=....|
|000037b0| 16 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |... "Hou|rglass_O|
|000037c0| 66 66 22 0d 12 ca 05 e1 | 0d 12 d4 04 0d 12 de 42 |ff".....|.......B|
|000037d0| f4 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |. ******|********|
|000037e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000037f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00003800| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 12 |********|******..|
|00003810| e8 04 0d 12 f2 16 dd 20 | f2 64 6f 5f 6d 65 6e 75 |....... |.do_menu|
|00003820| 28 62 6c 6f 63 6b 25 29 | 0d 12 fc 10 6d 65 6e 75 |(block%)|....menu|
|00003830| 25 3d 62 6c 6f 63 6b 25 | 0d 13 06 78 e7 20 6d 65 |%=block%|...x. me|
|00003840| 6e 75 25 3d 69 63 6f 6e | 6d 65 6e 75 25 20 c8 99 |nu%=icon|menu% ..|
|00003850| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00003860| 75 22 2c 2c 62 6c 6f 63 | 6b 25 2c 6d 6f 75 73 65 |u",,bloc|k%,mouse|
|00003870| 78 25 2d 36 34 2c 39 36 | 2b 38 30 20 8b 20 c8 99 |x%-64,96|+80 . ..|
|00003880| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00003890| 75 22 2c 2c 62 6c 6f 63 | 6b 25 2c 6d 6f 75 73 65 |u",,bloc|k%,mouse|
|000038a0| 78 25 2d 33 32 2c 6d 6f | 75 73 65 79 25 2b 31 36 |x%-32,mo|usey%+16|
|000038b0| 0d 13 10 05 e1 0d 13 1a | 04 0d 13 24 04 0d 13 2e |........|...$....|
|000038c0| 10 dd 20 f2 74 28 70 25 | 2c 6f 6e 25 29 0d 13 38 |.. .t(p%|,on%)..8|
|000038d0| 29 e7 20 6f 6e 25 3a 3f | 70 25 3d 28 3f 70 25 20 |). on%:?|p%=(?p% |
|000038e0| 84 20 31 29 20 8b 20 3f | 70 25 3d 28 3f 70 25 20 |. 1) . ?|p%=(?p% |
|000038f0| 80 20 26 46 45 29 0d 13 | 42 05 e1 0d 13 4c 04 0d |. &FE)..|B....L..|
|00003900| 13 56 19 dd 20 f2 6d 65 | 6e 75 5f 73 65 6c 65 63 |.V.. .me|nu_selec|
|00003910| 74 28 69 74 65 6d 25 29 | 0d 13 60 16 ea 20 6d 65 |t(item%)|..`.. me|
|00003920| 6e 75 24 2c 61 64 6a 75 | 73 74 25 2c 49 25 0d 13 |nu$,adju|st%,I%..|
|00003930| 6a 3b c8 99 20 22 57 69 | 6d 70 5f 47 65 74 50 6f |j;.. "Wi|mp_GetPo|
|00003940| 69 6e 74 65 72 49 6e 66 | 6f 22 2c 2c 62 6c 6f 63 |interInf|o",,bloc|
|00003950| 6b 25 3a 61 64 6a 75 73 | 74 25 3d 28 62 6c 6f 63 |k%:adjus|t%=(bloc|
|00003960| 6b 25 21 38 20 80 20 31 | 29 0d 13 74 0e c8 8e 20 |k%!8 . 1|)..t... |
|00003970| 6d 65 6e 75 25 20 ca 0d | 13 7e 11 20 20 c9 20 6d |menu% ..|.~. . m|
|00003980| 61 69 6e 6d 65 6e 75 25 | 0d 13 88 3b 20 20 c8 99 |ainmenu%|...; ..|
|00003990| 20 22 57 69 6d 70 5f 44 | 65 63 6f 64 65 4d 65 6e | "Wimp_D|ecodeMen|
|000039a0| 75 22 2c 2c 6d 61 69 6e | 6d 65 6e 75 25 2c 71 25 |u",,main|menu%,q%|
|000039b0| 2c c4 32 30 30 2c 22 20 | 22 29 b8 2c 2c 2c 6d 65 |,.200," |").,,,me|
|000039c0| 6e 75 24 0d 13 92 10 20 | 20 c8 8e 20 6d 65 6e 75 |nu$.... | .. menu|
|000039d0| 24 20 ca 0d 13 9c 46 20 | 20 20 20 c9 20 22 42 61 |$ ....F | . "Ba|
|000039e0| 72 20 43 68 61 72 74 22 | 3a 63 68 61 72 74 24 3d |r Chart"|:chart$=|
|000039f0| 22 42 61 72 20 43 68 61 | 72 74 22 3a f2 64 72 61 |"Bar Cha|rt":.dra|
|00003a00| 77 5f 67 72 61 70 68 3a | f2 66 72 6f 6e 74 28 67 |w_graph:|.front(g|
|00003a10| 72 61 70 68 62 6f 78 25 | 29 0d 13 a6 46 20 20 20 |raphbox%|)...F |
|00003a20| 20 c9 20 22 50 69 65 20 | 43 68 61 72 74 22 3a 63 | . "Pie |Chart":c|
|00003a30| 68 61 72 74 24 3d 22 50 | 69 65 20 43 68 61 72 74 |hart$="P|ie Chart|
|00003a40| 22 3a f2 64 72 61 77 5f | 67 72 61 70 68 3a f2 66 |":.draw_|graph:.f|
|00003a50| 72 6f 6e 74 28 67 72 61 | 70 68 62 6f 78 25 29 0d |ront(gra|phbox%).|
|00003a60| 13 b0 1e 20 20 20 20 c9 | 20 22 43 6c 65 61 72 20 |... .| "Clear |
|00003a70| 6d 65 61 6c 73 22 3a f2 | 63 6c 65 61 72 0d 13 ba |meals":.|clear...|
|00003a80| 35 20 20 20 20 c9 20 22 | 53 68 6f 77 20 45 78 74 |5 . "|Show Ext|
|00003a90| 72 61 22 3a f2 66 72 6f | 6e 74 28 65 78 74 72 61 |ra":.fro|nt(extra|
|00003aa0| 69 6e 66 6f 25 29 3a 73 | 68 6f 77 69 6e 66 6f 25 |info%):s|howinfo%|
|00003ab0| 3d b9 0d 13 c4 25 20 20 | 20 20 c9 20 22 50 72 69 |=....% | . "Pri|
|00003ac0| 6e 74 22 3a f2 66 72 6f | 6e 74 28 70 72 69 6e 74 |nt":.fro|nt(print|
|00003ad0| 73 65 74 75 70 25 29 0d | 13 ce 4f 20 20 20 20 c9 |setup%).|..O .|
|00003ae0| 20 22 53 65 6c 65 63 74 | 20 6d 65 61 6c 2e 22 2b | "Select| meal."+|
|00003af0| 24 6d 65 61 6c 31 25 3a | 6d 25 3d 30 3a 70 6c 61 |$meal1%:|m%=0:pla|
|00003b00| 74 65 73 65 6c 65 63 74 | 25 28 29 3d 30 3a f2 66 |teselect|%()=0:.f|
|00003b10| 69 6c 6c 74 72 61 79 3a | f2 74 6f 74 61 6c 5f 64 |illtray:|.total_d|
|00003b20| 69 65 74 28 a3 29 0d 13 | d8 4f 20 20 20 20 c9 20 |iet(.)..|.O . |
|00003b30| 22 53 65 6c 65 63 74 20 | 6d 65 61 6c 2e 22 2b 24 |"Select |meal."+$|
|00003b40| 6d 65 61 6c 32 25 3a 6d | 25 3d 31 3a 70 6c 61 74 |meal2%:m|%=1:plat|
|00003b50| 65 73 65 6c 65 63 74 25 | 28 29 3d 30 3a f2 66 69 |eselect%|()=0:.fi|
|00003b60| 6c 6c 74 72 61 79 3a f2 | 74 6f 74 61 6c 5f 64 69 |lltray:.|total_di|
|00003b70| 65 74 28 a3 29 0d 13 e2 | 4f 20 20 20 20 c9 20 22 |et(.)...|O . "|
|00003b80| 53 65 6c 65 63 74 20 6d | 65 61 6c 2e 22 2b 24 6d |Select m|eal."+$m|
|00003b90| 65 61 6c 33 25 3a 6d 25 | 3d 32 3a 70 6c 61 74 65 |eal3%:m%|=2:plate|
|00003ba0| 73 65 6c 65 63 74 25 28 | 29 3d 30 3a f2 66 69 6c |select%(|)=0:.fil|
|00003bb0| 6c 74 72 61 79 3a f2 74 | 6f 74 61 6c 5f 64 69 65 |ltray:.t|otal_die|
|00003bc0| 74 28 a3 29 0d 13 ec 4f | 20 20 20 20 c9 20 22 53 |t(.)...O| . "S|
|00003bd0| 65 6c 65 63 74 20 6d 65 | 61 6c 2e 22 2b 24 6d 65 |elect me|al."+$me|
|00003be0| 61 6c 34 25 3a 6d 25 3d | 33 3a 70 6c 61 74 65 73 |al4%:m%=|3:plates|
|00003bf0| 65 6c 65 63 74 25 28 29 | 3d 30 3a f2 66 69 6c 6c |elect%()|=0:.fill|
|00003c00| 74 72 61 79 3a f2 74 6f | 74 61 6c 5f 64 69 65 74 |tray:.to|tal_diet|
|00003c10| 28 a3 29 0d 13 f6 30 20 | 20 20 20 c9 20 22 45 78 |(.)...0 | . "Ex|
|00003c20| 70 6f 72 74 22 3a 65 78 | 70 6f 72 74 25 3d b9 3a |port":ex|port%=.:|
|00003c30| f2 66 72 6f 6e 74 28 73 | 61 76 65 62 6f 78 63 73 |.front(s|aveboxcs|
|00003c40| 76 25 29 0d 14 00 49 20 | 20 20 20 c9 20 22 44 61 |v%)...I | . "Da|
|00003c50| 74 61 20 46 6f 72 6d 61 | 74 2e 54 53 56 22 3a 73 |ta Forma|t.TSV":s|
|00003c60| 65 70 24 3d bd 39 3a f2 | 75 6e 74 69 63 6b 28 6d |ep$=.9:.|untick(m|
|00003c70| 5f 64 61 74 61 25 2c 31 | 29 3a f2 75 6e 74 69 63 |_data%,1|):.untic|
|00003c80| 6b 28 6d 5f 64 61 74 61 | 25 2c 30 29 0d 14 0a 4a |k(m_data|%,0)...J|
|00003c90| 20 20 20 20 c9 20 22 44 | 61 74 61 20 46 6f 72 6d | . "D|ata Form|
|00003ca0| 61 74 2e 43 53 56 22 3a | 73 65 70 24 3d 22 2c 22 |at.CSV":|sep$=","|
|00003cb0| 3a f2 75 6e 74 69 63 6b | 28 6d 5f 64 61 74 61 25 |:.untick|(m_data%|
|00003cc0| 2c 30 29 3a f2 75 6e 74 | 69 63 6b 28 6d 5f 64 61 |,0):.unt|ick(m_da|
|00003cd0| 74 61 25 2c 31 29 0d 14 | 14 07 20 20 cb 0d 14 1e |ta%,1)..|.. ....|
|00003ce0| 11 20 20 c9 20 69 63 6f | 6e 6d 65 6e 75 25 0d 14 |. . ico|nmenu%..|
|00003cf0| 28 3b 20 20 c8 99 20 22 | 57 69 6d 70 5f 44 65 63 |(; .. "|Wimp_Dec|
|00003d00| 6f 64 65 4d 65 6e 75 22 | 2c 2c 69 63 6f 6e 6d 65 |odeMenu"|,,iconme|
|00003d10| 6e 75 25 2c 71 25 2c c4 | 32 30 30 2c 22 20 22 29 |nu%,q%,.|200," ")|
|00003d20| b8 2c 2c 2c 6d 65 6e 75 | 24 0d 14 32 1f 20 20 e7 |.,,,menu|$..2. .|
|00003d30| 20 6d 65 6e 75 24 3d 22 | 51 75 69 74 22 3a f2 63 | menu$="|Quit":.c|
|00003d40| 6c 6f 73 65 64 6f 77 6e | 0d 14 3c 3c 20 20 f4 20 |losedown|..<< . |
|00003d50| 49 46 20 6d 65 6e 75 24 | 3d 22 53 61 76 65 20 46 |IF menu$|="Save F|
|00003d60| 6f 6f 64 73 22 20 41 4e | 44 20 6d 6f 64 69 66 69 |oods" AN|D modifi|
|00003d70| 65 64 25 20 50 52 4f 43 | 73 61 76 65 64 61 74 61 |ed% PROC|savedata|
|00003d80| 62 61 73 65 0d 14 46 39 | 20 20 e7 20 6d 65 6e 75 |base..F9| . menu|
|00003d90| 24 3d 22 53 68 6f 77 20 | 45 78 74 72 61 22 20 f2 |$="Show |Extra" .|
|00003da0| 66 72 6f 6e 74 28 65 78 | 74 72 61 69 6e 66 6f 25 |front(ex|trainfo%|
|00003db0| 29 3a 73 68 6f 77 69 6e | 66 6f 25 3d b9 0d 14 50 |):showin|fo%=...P|
|00003dc0| 12 20 20 c9 20 67 72 61 | 70 68 6d 65 6e 75 25 0d |. . gra|phmenu%.|
|00003dd0| 14 5a 3c 20 20 c8 99 20 | 22 57 69 6d 70 5f 44 65 |.Z< .. |"Wimp_De|
|00003de0| 63 6f 64 65 4d 65 6e 75 | 22 2c 2c 67 72 61 70 68 |codeMenu|",,graph|
|00003df0| 6d 65 6e 75 25 2c 71 25 | 2c c4 32 30 30 2c 22 20 |menu%,q%|,.200," |
|00003e00| 22 29 b8 2c 2c 2c 6d 65 | 6e 75 24 0d 14 64 22 20 |").,,,me|nu$..d" |
|00003e10| 20 e7 20 6d 65 6e 75 24 | 3d 22 50 72 69 6e 74 22 | . menu$|="Print"|
|00003e20| 20 f2 70 72 69 6e 74 5f | 67 72 61 70 68 0d 14 6e | .print_|graph..n|
|00003e30| 05 20 0d 14 78 15 20 20 | c9 20 6e 75 74 72 69 65 |. ..x. |. nutrie|
|00003e40| 6e 74 6d 65 6e 75 25 0d | 14 82 17 20 20 6e 75 74 |ntmenu%.|... nut|
|00003e50| 72 69 65 6e 74 25 3d 69 | 74 65 6d 25 2b 32 0d 14 |rient%=i|tem%+2..|
|00003e60| 8c 34 20 20 f2 6e 75 74 | 72 69 65 6e 74 5f 69 6e |.4 .nut|rient_in|
|00003e70| 66 6f 28 6e 75 74 72 69 | 65 6e 74 25 29 3a e7 20 |fo(nutri|ent%):. |
|00003e80| 67 72 61 70 68 25 20 f2 | 64 72 61 77 5f 67 72 61 |graph% .|draw_gra|
|00003e90| 70 68 0d 14 96 05 cb 0d | 14 a0 1d e7 20 61 64 6a |ph......|.... adj|
|00003ea0| 75 73 74 25 20 f2 64 6f | 5f 6d 65 6e 75 28 6d 65 |ust% .do|_menu(me|
|00003eb0| 6e 75 25 29 0d 14 aa 05 | e1 0d 14 b4 04 0d 14 be |nu%)....|........|
|00003ec0| 0c dd 20 f2 63 6c 65 61 | 72 0d 14 c8 3c 70 6c 61 |.. .clea|r...<pla|
|00003ed0| 74 65 66 75 6c 6c 25 28 | 29 3d 30 3a 70 6c 61 74 |tefull%(|)=0:plat|
|00003ee0| 65 73 65 6c 65 63 74 25 | 28 29 3d 30 3a 66 6f 6f |eselect%|()=0:foo|
|00003ef0| 64 24 28 29 3d 22 22 3a | 70 6f 72 74 69 6f 6e 24 |d$()="":|portion$|
|00003f00| 28 29 3d 22 22 0d 14 d2 | 37 e3 20 6d 25 3d 30 20 |()=""...|7. m%=0 |
|00003f10| b8 20 33 3a f2 73 65 74 | 6d 65 61 6c 6e 61 6d 65 |. 3:.set|mealname|
|00003f20| 73 28 6d 25 2c 22 6d 65 | 61 6c 20 22 2b c3 28 6d |s(m%,"me|al "+.(m|
|00003f30| 25 2b 31 29 29 3a ed 3a | 6d 25 3d 30 0d 14 dc 20 |%+1)):.:|m%=0... |
|00003f40| 61 6e 61 6c 79 73 69 6e | 67 25 3d 31 3a 63 6f 6e |analysin|g%=1:con|
|00003f50| 74 61 69 6e 24 28 32 29 | 3d 22 31 22 0d 14 e6 1c |tain$(2)|="1"....|
|00003f60| f2 66 69 6c 6c 74 72 61 | 79 3a 63 6f 6e 74 61 69 |.filltra|y:contai|
|00003f70| 6e 24 28 38 29 3d 22 22 | 0d 14 f0 26 24 73 65 72 |n$(8)=""|...&$ser|
|00003f80| 76 69 6e 67 25 3d 22 22 | 3a f2 52 65 64 72 61 77 |ving%=""|:.Redraw|
|00003f90| 28 61 6e 61 6c 79 73 69 | 73 25 2c 31 38 29 0d 14 |(analysi|s%,18)..|
|00003fa0| fa 13 f2 63 6c 65 61 72 | 65 78 74 72 61 69 6e 66 |...clear|extrainf|
|00003fb0| 6f 0d 15 04 2f e3 20 6c | 6f 6f 70 25 3d 31 20 b8 |o.../. l|oop%=1 .|
|00003fc0| 20 31 30 3a f2 53 65 6c | 65 63 74 49 63 6f 6e 28 | 10:.Sel|ectIcon(|
|00003fd0| 74 72 61 79 25 2c 6c 6f | 6f 70 25 2c a3 29 3a ed |tray%,lo|op%,.):.|
|00003fe0| 0d 15 0e 05 e1 0d 15 18 | 04 0d 15 22 25 dd 20 f2 |........|..."%. .|
|00003ff0| 72 65 63 65 69 76 65 28 | 72 65 61 73 6f 6e 25 2c |receive(|reason%,|
|00004000| 72 65 66 25 2c 6d 65 73 | 73 61 67 65 25 29 0d 15 |ref%,mes|sage%)..|
|00004010| 2c 14 ea 20 6e 61 6d 65 | 24 2c 69 25 2c 78 25 2c |,.. name|$,i%,x%,|
|00004020| 63 24 0d 15 36 10 c8 8e | 20 72 65 61 73 6f 6e 25 |c$..6...| reason%|
|00004030| 20 ca 0d 15 40 0d 20 20 | c9 20 31 37 2c 31 38 0d | ...@. |. 17,18.|
|00004040| 15 4a 29 20 20 e3 20 69 | 25 3d 30 20 b8 20 21 71 |.J) . i|%=0 . !q|
|00004050| 25 2d 31 20 88 20 34 3a | 6f 6c 64 71 25 21 69 25 |%-1 . 4:|oldq%!i%|
|00004060| 3d 71 25 21 69 25 3a ed | 0d 15 54 13 20 20 c8 8e |=q%!i%:.|..T. ..|
|00004070| 20 6d 65 73 73 61 67 65 | 25 20 ca 0d 15 5e 1b 20 | message|% ...^. |
|00004080| 20 20 20 c9 20 30 3a 20 | f4 20 71 75 69 74 2d 6d | . 0: |. quit-m|
|00004090| 65 73 73 61 67 65 0d 15 | 68 12 20 20 20 20 f2 63 |essage..|h. .c|
|000040a0| 6c 6f 73 65 64 6f 77 6e | 0d 15 72 1f 20 20 20 20 |losedown|..r. |
|000040b0| c9 20 31 3a 20 f4 20 64 | 61 74 61 73 61 76 65 2d |. 1: . d|atasave-|
|000040c0| 6d 65 73 73 61 67 65 0d | 15 7c 3c 20 20 20 20 f4 |message.|.|< .|
|000040d0| 20 73 6f 6d 65 6f 6e 65 | 20 77 61 6e 74 73 20 74 | someone| wants t|
|000040e0| 6f 20 73 65 6e 64 20 6d | 65 20 61 20 66 69 6c 65 |o send m|e a file|
|000040f0| 2e 4c 65 74 20 74 68 65 | 6d 20 57 69 6d 70 53 63 |.Let the|m WimpSc|
|00004100| 72 61 70 0d 15 86 29 20 | 20 20 20 71 25 21 30 3d |rap...) | q%!0=|
|00004110| 28 34 38 2b a9 28 22 3c | 57 69 6d 70 24 53 63 72 |(48+.("<|Wimp$Scr|
|00004120| 61 70 3e 20 22 29 29 80 | 20 ac 20 33 0d 15 90 1f |ap> ")).| . 3....|
|00004130| 20 20 20 20 71 25 21 31 | 32 3d 71 25 21 38 3a f4 | q%!1|2=q%!8:.|
|00004140| 20 63 6f 70 79 20 6d 79 | 72 65 66 0d 15 9a 24 20 | copy my|ref...$ |
|00004150| 20 20 20 71 25 21 31 36 | 3d 32 3a f4 20 73 65 74 | q%!16|=2:. set|
|00004160| 20 74 6f 20 44 61 74 61 | 4c 6f 61 64 41 63 6b 0d | to Data|LoadAck.|
|00004170| 15 a4 1f 20 20 20 20 24 | 28 71 25 2b 34 34 29 3d |... $|(q%+44)=|
|00004180| 22 3c 57 69 6d 70 24 53 | 63 72 61 70 3e 22 0d 15 |"<Wimp$S|crap>"..|
|00004190| ae 16 20 20 20 20 73 61 | 76 65 72 65 66 25 3d 71 |.. sa|veref%=q|
|000041a0| 25 21 31 32 0d 15 b8 28 | 20 20 20 20 c8 99 20 22 |%!12...(| .. "|
|000041b0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|000041c0| 22 2c 31 37 2c 71 25 2c | 71 25 21 34 0d 15 c2 09 |",17,q%,|q%!4....|
|000041d0| 20 20 20 20 e1 0d 15 cc | 04 0d 15 d6 3a 20 20 20 | ....|....: |
|000041e0| 20 c9 20 32 3a 20 f4 20 | 69 74 73 20 4f 4b 20 66 | . 2: . |its OK f|
|000041f0| 6f 72 20 6d 65 20 74 6f | 20 73 65 6e 64 20 61 20 |or me to| send a |
|00004200| 66 69 6c 65 2c 20 70 61 | 74 68 20 61 74 20 71 25 |file, pa|th at q%|
|00004210| 2b 34 34 0d 15 e0 1a 20 | 20 20 20 e7 20 72 65 66 |+44.... | . ref|
|00004220| 25 3c 3e 73 61 76 65 72 | 65 66 25 20 8c 0d 15 ea |%<>saver|ef% ....|
|00004230| 26 20 20 20 20 20 20 f2 | 77 61 72 6e 69 6e 67 62 |& .|warningb|
|00004240| 6f 78 28 a4 6d 73 67 30 | 28 22 55 4e 58 54 59 50 |ox(.msg0|("UNXTYP|
|00004250| 22 29 29 0d 15 f4 0b 20 | 20 20 20 20 20 e1 0d 15 |")).... | ...|
|00004260| fe 09 20 20 20 20 cd 0d | 16 08 23 20 20 20 20 6c |.. ..|..# l|
|00004270| 6f 61 64 5f 72 65 66 25 | 3d 71 25 21 38 3a 66 69 |oad_ref%|=q%!8:fi|
|00004280| 72 73 74 73 61 76 65 25 | 3d b9 0d 16 12 17 20 20 |rstsave%|=..... |
|00004290| 20 20 66 69 6c 65 74 79 | 70 65 25 3d 71 25 21 34 | filety|pe%=q%!4|
|000042a0| 30 0d 16 1c 4d 20 20 20 | 20 e7 20 66 69 6c 65 74 |0...M | . filet|
|000042b0| 79 70 65 25 3d 26 46 30 | 44 20 84 20 66 69 6c 65 |ype%=&F0|D . file|
|000042c0| 74 79 70 65 25 3d 26 46 | 31 44 20 84 20 66 69 6c |type%=&F|1D . fil|
|000042d0| 65 74 79 70 65 25 3d 26 | 44 46 45 20 84 20 66 69 |etype%=&|DFE . fi|
|000042e0| 6c 65 74 79 70 65 25 3d | 26 41 46 46 20 8c 0d 16 |letype%=|&AFF ...|
|000042f0| 26 46 20 20 20 20 20 20 | e7 20 71 25 21 33 36 3d |&F |. q%!36=|
|00004300| 2d 31 20 73 63 72 61 70 | 25 3d b9 3a f4 20 50 52 |-1 scrap|%=.:. PR|
|00004310| 4f 43 64 65 62 75 67 28 | 30 2c 22 53 63 72 61 70 |OCdebug(|0,"Scrap|
|00004320| 22 2c 22 20 22 2b 46 4e | 72 74 6f 7a 28 71 25 2b |"," "+FN|rtoz(q%+|
|00004330| 34 34 29 29 0d 16 30 32 | 20 20 20 20 20 20 e7 20 |44))..02| . |
|00004340| 66 69 6c 65 74 79 70 65 | 25 3d 26 46 30 44 20 24 |filetype|%=&F0D $|
|00004350| 66 69 6c 65 6e 61 6d 65 | 25 3d a4 72 74 6f 7a 28 |filename|%=.rtoz(|
|00004360| 71 25 2b 34 34 29 0d 16 | 3a 36 20 20 20 20 20 20 |q%+44)..|:6 |
|00004370| e7 20 66 69 6c 65 74 79 | 70 65 25 3d 26 46 31 44 |. filety|pe%=&F1D|
|00004380| 20 24 64 69 65 74 66 69 | 6c 65 6e 61 6d 65 25 3d | $dietfi|lename%=|
|00004390| a4 72 74 6f 7a 28 71 25 | 2b 34 34 29 0d 16 44 43 |.rtoz(q%|+44)..DC|
|000043a0| 20 20 20 20 20 20 e7 20 | 66 69 6c 65 74 79 70 65 | . |filetype|
|000043b0| 25 3d 26 44 46 45 3a e7 | 20 63 73 76 24 3d 22 6d |%=&DFE:.| csv$="m|
|000043c0| 65 61 6c 22 20 24 66 69 | 6c 65 6e 61 6d 65 63 73 |eal" $fi|lenamecs|
|000043d0| 76 25 3d a4 72 74 6f 7a | 28 71 25 2b 34 34 29 0d |v%=.rtoz|(q%+44).|
|000043e0| 16 4e 47 20 20 20 20 20 | 20 e7 20 66 69 6c 65 74 |.NG | . filet|
|000043f0| 79 70 65 25 3d 26 44 46 | 45 3a e7 20 63 73 76 24 |ype%=&DF|E:. csv$|
|00004400| 3d 22 64 69 65 74 22 20 | 24 66 69 6c 65 6e 61 6d |="diet" |$filenam|
|00004410| 65 64 69 65 74 63 73 76 | 25 3d a4 72 74 6f 7a 28 |edietcsv|%=.rtoz(|
|00004420| 71 25 2b 34 34 29 0d 16 | 58 39 20 20 20 20 20 20 |q%+44)..|X9 |
|00004430| e7 20 66 69 6c 65 74 79 | 70 65 25 3d 26 41 46 46 |. filety|pe%=&AFF|
|00004440| 20 24 73 70 72 69 74 65 | 66 69 6c 65 6e 61 6d 65 | $sprite|filename|
|00004450| 25 3d 20 a4 72 74 6f 7a | 28 71 25 2b 34 34 29 0d |%= .rtoz|(q%+44).|
|00004460| 16 62 37 20 20 20 20 20 | 20 f4 20 50 52 4f 43 64 |.b7 | . PROCd|
|00004470| 65 62 75 67 28 33 2c 22 | 6d 65 73 73 61 67 65 20 |ebug(3,"|message |
|00004480| 32 3a 22 2c 22 20 22 2b | 46 4e 72 74 6f 7a 28 71 |2:"," "+|FNrtoz(q|
|00004490| 25 2b 34 34 29 29 0d 16 | 6c 16 20 20 20 20 20 20 |%+44))..|l. |
|000044a0| e7 20 71 25 21 33 36 3d | 2d 31 20 8c 0d 16 76 25 |. q%!36=|-1 ...v%|
|000044b0| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 66 69 6c | |.savefil|
|000044c0| 65 28 b9 2c a4 72 74 6f | 7a 28 71 25 2b 34 34 29 |e(.,.rto|z(q%+44)|
|000044d0| 29 0d 16 80 0b 20 20 20 | 20 20 20 cc 0d 16 8a 1b |).... | .....|
|000044e0| 20 20 20 20 20 20 20 20 | f2 73 61 76 65 66 69 6c | |.savefil|
|000044f0| 65 28 a3 2c 22 22 29 0d | 16 94 0b 20 20 20 20 20 |e(.,"").|... |
|00004500| 20 cd 0d 16 9e 14 20 20 | 20 20 20 20 6f 6c 64 71 | ..... | oldq|
|00004510| 25 21 31 36 3d 33 0d 16 | a8 17 20 20 20 20 20 20 |%!16=3..|.. |
|00004520| 6f 6c 64 71 25 21 31 32 | 3d 71 25 21 38 0d 16 b2 |oldq%!12|=q%!8...|
|00004530| 30 20 20 20 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |0 .|. "Wimp_|
|00004540| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00004550| 6f 6c 64 71 25 2c 6f 6c | 64 71 25 21 34 0d 16 bc |oldq%,ol|dq%!4...|
|00004560| 09 20 20 20 20 cd 0d 16 | c6 09 20 20 20 20 e1 0d |. ...|.. ..|
|00004570| 16 d0 04 0d 16 da 1f 20 | 20 20 20 c9 20 33 3a 20 |....... | . 3: |
|00004580| f4 20 64 61 74 61 6c 6f | 61 64 2d 6d 65 73 73 61 |. datalo|ad-messa|
|00004590| 67 65 0d 16 e4 39 20 20 | 20 20 f4 20 66 69 6c 65 |ge...9 | . file|
|000045a0| 20 64 72 6f 70 70 65 64 | 20 66 72 6f 6d 20 46 69 | dropped| from Fi|
|000045b0| 6c 65 72 20 2d 20 74 72 | 61 6e 73 66 65 72 20 74 |ler - tr|ansfer t|
|000045c0| 6f 20 64 61 74 61 20 66 | 69 6c 65 0d 16 ee 17 20 |o data f|ile.... |
|000045d0| 20 20 20 66 69 6c 65 74 | 79 70 65 25 3d 71 25 21 | filet|ype%=q%!|
|000045e0| 34 30 0d 16 f8 16 20 20 | 20 20 c8 8e 20 66 69 6c |40.... | .. fil|
|000045f0| 65 74 79 70 65 25 20 ca | 0d 17 02 1e 20 20 20 20 |etype% .|.... |
|00004600| 20 20 c9 20 26 46 30 44 | 3a f2 6c 6f 61 64 5f 6d | . &F0D|:.load_m|
|00004610| 65 61 6c 28 a3 29 0d 17 | 0c 1e 20 20 20 20 20 20 |eal(.)..|.. |
|00004620| c9 20 26 46 31 44 3a f2 | 6c 6f 61 64 5f 6d 65 61 |. &F1D:.|load_mea|
|00004630| 6c 28 b9 29 0d 17 16 2c | 20 20 20 20 20 20 c9 20 |l(.)...,| . |
|00004640| 26 46 30 46 3a f2 67 65 | 74 5f 74 61 72 67 65 74 |&F0F:.ge|t_target|
|00004650| 73 3a f2 74 6f 74 61 6c | 5f 64 69 65 74 28 a3 29 |s:.total|_diet(.)|
|00004660| 0d 17 20 3b 20 20 20 20 | 20 20 e7 20 64 61 74 61 |.. ; | . data|
|00004670| 66 69 6c 65 24 3d 22 3c | 57 69 6d 70 24 53 63 72 |file$="<|Wimp$Scr|
|00004680| 61 70 3e 22 20 8c 20 2a | 52 45 4d 4f 56 45 20 3c |ap>" . *|REMOVE <|
|00004690| 57 69 6d 70 24 53 63 72 | 61 70 3e 0d 17 2a 25 20 |Wimp$Scr|ap>..*% |
|000046a0| 20 20 20 20 20 6f 6c 64 | 71 25 21 31 32 3d 6f 6c | old|q%!12=ol|
|000046b0| 64 71 25 21 38 3a 6f 6c | 64 71 25 21 31 36 3d 34 |dq%!8:ol|dq%!16=4|
|000046c0| 0d 17 34 30 20 20 20 20 | 20 20 c8 99 20 22 57 69 |..40 | .. "Wi|
|000046d0| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|000046e0| 31 37 2c 6f 6c 64 71 25 | 2c 6f 6c 64 71 25 21 34 |17,oldq%|,oldq%!4|
|000046f0| 0d 17 3e 09 20 20 20 20 | cb 0d 17 48 09 20 20 20 |..>. |...H. |
|00004700| 20 e1 0d 17 52 1e 20 20 | 20 20 c9 20 35 3a 20 20 | ...R. | . 5: |
|00004710| 20 66 69 6c 65 74 79 70 | 65 25 3d 71 25 21 34 30 | filetyp|e%=q%!40|
|00004720| 0d 17 5c 2b 20 20 20 20 | e7 20 66 69 6c 65 74 79 |..\+ |. filety|
|00004730| 70 65 25 3d 26 46 30 44 | 20 84 20 66 69 6c 65 74 |pe%=&F0D| . filet|
|00004740| 79 70 65 25 3d 26 46 31 | 44 20 8c 0d 17 66 25 20 |ype%=&F1|D ...f% |
|00004750| 20 20 20 20 20 6f 6c 64 | 71 25 21 31 32 3d 6f 6c | old|q%!12=ol|
|00004760| 64 71 25 21 38 3a 6f 6c | 64 71 25 21 31 36 3d 34 |dq%!8:ol|dq%!16=4|
|00004770| 0d 17 70 30 20 20 20 20 | 20 20 c8 99 20 22 57 69 |..p0 | .. "Wi|
|00004780| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|00004790| 31 37 2c 6f 6c 64 71 25 | 2c 6f 6c 64 71 25 21 34 |17,oldq%|,oldq%!4|
|000047a0| 0d 17 7a 28 20 20 20 20 | 20 20 e7 20 66 69 6c 65 |..z( | . file|
|000047b0| 74 79 70 65 25 3d 26 46 | 30 44 3a f2 6c 6f 61 64 |type%=&F|0D:.load|
|000047c0| 5f 6d 65 61 6c 28 a3 29 | 0d 17 84 28 20 20 20 20 |_meal(.)|...( |
|000047d0| 20 20 e7 20 66 69 6c 65 | 74 79 70 65 25 3d 26 46 | . file|type%=&F|
|000047e0| 31 44 3a f2 6c 6f 61 64 | 5f 6d 65 61 6c 28 b9 29 |1D:.load|_meal(.)|
|000047f0| 0d 17 8e 39 20 20 20 20 | 20 20 f2 66 72 6f 6e 74 |...9 | .front|
|00004800| 28 6c 61 72 64 65 72 25 | 29 3a f2 66 72 6f 6e 74 |(larder%|):.front|
|00004810| 28 74 72 61 79 25 29 3a | f2 66 72 6f 6e 74 28 61 |(tray%):|.front(a|
|00004820| 6e 61 6c 79 73 69 73 25 | 29 0d 17 98 09 20 20 20 |nalysis%|).... |
|00004830| 20 cd 0d 17 a2 3c 20 20 | 20 20 c9 20 36 3a 20 f4 | ....< | . 6: .|
|00004840| 20 52 41 4d 20 66 65 74 | 63 68 20 20 53 6f 6d 65 | RAM fet|ch Some|
|00004850| 6f 6e 65 20 77 61 6e 74 | 73 20 6d 65 20 74 6f 20 |one want|s me to |
|00004860| 73 65 6e 64 20 75 73 69 | 6e 67 20 52 41 4d 0d 17 |send usi|ng RAM..|
|00004870| ac 32 20 20 20 20 f4 20 | 50 52 4f 43 64 65 62 75 |.2 . |PROCdebu|
|00004880| 67 28 36 2c 22 77 68 65 | 6e 20 36 3a 22 2c 22 20 |g(6,"whe|n 6:"," |
|00004890| 22 2b 46 4e 72 74 6f 7a | 28 71 25 2b 34 34 29 29 |"+FNrtoz|(q%+44))|
|000048a0| 0d 17 b6 17 20 20 20 20 | 66 69 6c 65 74 79 70 65 |.... |filetype|
|000048b0| 25 3d 71 25 21 34 30 0d | 17 c0 1a 20 20 20 20 e7 |%=q%!40.|... .|
|000048c0| 20 66 69 6c 65 74 79 70 | 65 25 3d 26 44 46 45 20 | filetyp|e%=&DFE |
|000048d0| 8c 0d 17 ca 16 20 20 20 | 20 e7 20 66 69 72 73 74 |..... | . first|
|000048e0| 73 61 76 65 25 20 8c 0d | 17 d4 23 20 20 20 20 20 |save% ..|..# |
|000048f0| 20 64 61 74 61 70 6f 69 | 6e 74 65 72 25 3d 64 61 | datapoi|nter%=da|
|00004900| 74 61 5f 62 75 66 66 65 | 72 25 0d 17 de 15 20 20 |ta_buffe|r%.... |
|00004910| 20 20 20 20 e7 20 65 78 | 70 6f 72 74 25 20 8c 0d | . ex|port% ..|
|00004920| 17 e8 16 20 20 20 20 20 | 20 20 20 f2 72 61 6d 65 |... | .rame|
|00004930| 78 70 6f 72 74 0d 17 f2 | 0d 20 20 20 20 20 20 20 |xport...|. |
|00004940| 20 cc 0d 17 fc 28 20 20 | 20 20 20 20 20 20 e7 20 | ....( | . |
|00004950| 63 73 76 24 3d 22 6d 65 | 61 6c 22 20 8c 20 f2 73 |csv$="me|al" . .s|
|00004960| 61 76 65 6d 65 61 6c 63 | 73 76 0d 18 06 28 20 20 |avemealc|sv...( |
|00004970| 20 20 20 20 20 20 e7 20 | 63 73 76 24 3d 22 64 69 | . |csv$="di|
|00004980| 65 74 22 20 8c 20 f2 73 | 61 76 65 64 69 65 74 63 |et" . .s|avedietc|
|00004990| 73 76 0d 18 10 0d 20 20 | 20 20 20 20 20 20 cd 0d |sv.... | ..|
|000049a0| 18 1a 4d 20 20 20 20 20 | 20 73 6f 75 72 63 65 5f |..M | source_|
|000049b0| 62 75 66 66 65 72 25 3d | 64 61 74 61 5f 62 75 66 |buffer%=|data_buf|
|000049c0| 66 65 72 25 3a 62 79 74 | 65 73 5f 6c 65 66 74 25 |fer%:byt|es_left%|
|000049d0| 3d 64 61 74 61 70 6f 69 | 6e 74 65 72 25 2d 64 61 |=datapoi|nter%-da|
|000049e0| 74 61 5f 62 75 66 66 65 | 72 25 2b 31 0d 18 24 09 |ta_buffe|r%+1..$.|
|000049f0| 20 20 20 20 cd 0d 18 2e | 42 20 20 20 20 66 69 72 | ....|B fir|
|00004a00| 73 74 73 61 76 65 25 3d | a4 6d 65 73 73 61 67 65 |stsave%=|.message|
|00004a10| 5f 72 61 6d 73 61 76 65 | 28 71 25 2c 73 6f 75 72 |_ramsave|(q%,sour|
|00004a20| 63 65 5f 62 75 66 66 65 | 72 25 2c 62 79 74 65 73 |ce_buffe|r%,bytes|
|00004a30| 5f 6c 65 66 74 25 29 0d | 18 38 09 20 20 20 20 cd |_left%).|.8. .|
|00004a40| 0d 18 42 1a 20 20 20 20 | e7 20 66 69 6c 65 74 79 |..B. |. filety|
|00004a50| 70 65 25 3d 26 41 46 46 | 20 8c 0d 18 4c 17 20 20 |pe%=&AFF| ...L. |
|00004a60| 20 20 20 e7 20 66 69 72 | 73 74 73 61 76 65 25 20 | . fir|stsave% |
|00004a70| 8c 0d 18 56 25 20 20 20 | 20 20 20 64 72 61 77 25 |...V% | draw%|
|00004a80| 3d b9 3a f2 64 72 61 77 | 5f 67 72 61 70 68 3a 64 |=.:.draw|_graph:d|
|00004a90| 72 61 77 25 3d a3 0d 18 | 60 21 20 20 20 20 20 20 |raw%=...|`! |
|00004aa0| 73 6f 75 72 63 65 5f 62 | 75 66 66 65 72 25 3d 5f |source_b|uffer%=_|
|00004ab0| 62 75 66 66 65 72 25 0d | 18 6a 25 20 20 20 20 20 |buffer%.|.j% |
|00004ac0| 20 62 79 74 65 73 5f 6c | 65 66 74 25 3d 20 5f 70 | bytes_l|eft%= _p|
|00004ad0| 74 72 25 2d 5f 62 75 66 | 66 65 72 25 0d 18 74 0b |tr%-_buf|fer%..t.|
|00004ae0| 20 20 20 20 20 20 cd 0d | 18 7e 43 20 20 20 20 20 | ..|.~C |
|00004af0| 66 69 72 73 74 73 61 76 | 65 25 3d a4 6d 65 73 73 |firstsav|e%=.mess|
|00004b00| 61 67 65 5f 72 61 6d 73 | 61 76 65 28 71 25 2c 73 |age_rams|ave(q%,s|
|00004b10| 6f 75 72 63 65 5f 62 75 | 66 66 65 72 25 2c 62 79 |ource_bu|ffer%,by|
|00004b20| 74 65 73 5f 6c 65 66 74 | 25 29 0d 18 88 0a 20 20 |tes_left|%).... |
|00004b30| 20 20 20 cd 0d 18 92 24 | 20 20 20 20 f4 20 57 48 | ....$| . WH|
|00004b40| 45 4e 20 37 3a 20 52 45 | 4d 20 20 20 20 52 41 4d |EN 7: RE|M RAM|
|00004b50| 54 72 61 6e 73 6d 69 74 | 0d 18 9c 04 0d 18 a6 2c |Transmit|.......,|
|00004b60| 20 20 20 20 c9 20 26 35 | 30 32 3a 20 c8 99 22 57 | . &5|02: .."W|
|00004b70| 69 6d 70 5f 53 65 6e 64 | 49 6e 66 6f 72 6d 61 74 |imp_Send|Informat|
|00004b80| 69 6f 6e 22 2c 2c 71 25 | 0d 18 b0 1e 20 20 20 20 |ion",,q%|.... |
|00004b90| c9 20 26 34 30 30 43 31 | 3a 20 f2 67 65 74 6d 6f |. &400C1|: .getmo|
|00004ba0| 64 65 69 6e 66 6f 0d 18 | ba 07 20 20 cb 0d 18 c4 |deinfo..|.. ....|
|00004bb0| 04 0d 18 ce 38 20 20 c9 | 20 31 39 3a 20 20 f4 20 |....8 .| 19: . |
|00004bc0| 20 49 20 74 68 69 6e 6b | 20 74 68 69 73 20 6d 65 | I think| this me|
|00004bd0| 61 6e 73 20 52 41 4d 20 | 63 6f 75 6c 64 6e 27 74 |ans RAM |couldn't|
|00004be0| 20 62 65 20 75 73 65 64 | 2e 0d 18 d8 30 20 f4 20 | be used|....0 . |
|00004bf0| 50 52 4f 43 64 65 62 75 | 67 28 34 2c 22 77 68 65 |PROCdebu|g(4,"whe|
|00004c00| 6e 20 31 39 3a 22 2c 22 | 20 22 2b 46 4e 72 74 6f |n 19:","| "+FNrto|
|00004c10| 7a 28 71 25 2b 34 34 29 | 29 0d 18 e2 1b 20 20 e7 |z(q%+44)|).... .|
|00004c20| 20 71 25 21 31 32 20 3d | 20 6c 6f 61 64 5f 72 65 | q%!12 =| load_re|
|00004c30| 66 25 20 8c 0d 18 ec 10 | 20 20 20 20 72 65 74 72 |f% .....| retr|
|00004c40| 79 25 3d b9 0d 18 f6 12 | 20 20 20 20 e7 20 72 65 |y%=.....| . re|
|00004c50| 74 72 79 25 20 8c 0d 19 | 00 1f 20 20 20 20 20 20 |try% ...|.. |
|00004c60| 6f 6c 64 71 25 21 31 32 | 20 20 20 20 3d 20 6f 6c |oldq%!12| = ol|
|00004c70| 64 71 25 21 38 0d 19 0a | 28 20 20 20 20 20 20 6f |dq%!8...|( o|
|00004c80| 6c 64 71 25 21 31 36 20 | 20 20 20 3d 20 32 3a f4 |ldq%!16 | = 2:.|
|00004c90| 20 44 61 74 61 53 61 76 | 65 41 63 6b 25 0d 19 14 | DataSav|eAck%...|
|00004ca0| 1b 20 20 20 20 20 20 6f | 6c 64 71 25 21 30 20 20 |. o|ldq%!0 |
|00004cb0| 20 20 20 3d 20 32 35 36 | 0d 19 1e 1a 20 20 20 20 | = 256|.... |
|00004cc0| 20 20 6f 6c 64 71 25 21 | 33 36 20 20 20 20 3d 20 | oldq%!|36 = |
|00004cd0| 2d 31 0d 19 28 2d 20 20 | 20 20 20 20 24 28 6f 6c |-1..(- | $(ol|
|00004ce0| 64 71 25 2b 34 34 29 20 | 3d 20 22 3c 57 69 6d 70 |dq%+44) |= "<Wimp|
|00004cf0| 24 53 63 72 61 70 3e 22 | 20 2b 20 bd 28 30 29 0d |$Scrap>"| + .(0).|
|00004d00| 19 32 30 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |.20 | .. "Wim|
|00004d10| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00004d20| 37 2c 6f 6c 64 71 25 2c | 6f 6c 64 71 25 21 34 0d |7,oldq%,|oldq%!4.|
|00004d30| 19 3c 1d 20 20 20 20 20 | 20 6c 6f 61 64 5f 72 65 |.<. | load_re|
|00004d40| 66 25 20 3d 20 6f 6c 64 | 71 25 21 38 0d 19 46 14 |f% = old|q%!8..F.|
|00004d50| 20 20 20 20 20 20 72 65 | 74 72 79 25 20 3d 20 a3 | re|try% = .|
|00004d60| 0d 19 50 09 20 20 20 20 | cc 0d 19 5a 27 20 20 20 |..P. |...Z' |
|00004d70| 20 20 20 f2 77 61 72 6e | 69 6e 67 62 6f 78 28 a4 | .warn|ingbox(.|
|00004d80| 6d 73 67 30 28 22 4e 4f | 54 52 41 4e 53 22 29 29 |msg0("NO|TRANS"))|
|00004d90| 0d 19 64 09 20 20 20 20 | cd 0d 19 6e 07 20 20 cd |..d. |...n. .|
|00004da0| 0d 19 78 05 cb 0d 19 82 | 05 e1 0d 19 8c 04 0d 19 |..x.....|........|
|00004db0| 96 38 dd 20 f2 6d 6f 75 | 73 65 5f 63 6c 69 63 6b |.8. .mou|se_click|
|00004dc0| 28 6d 6f 75 73 65 78 25 | 2c 6d 6f 75 73 65 79 25 |(mousex%|,mousey%|
|00004dd0| 2c 62 25 2c 68 61 6e 64 | 6c 65 25 2c 69 63 6f 6e |,b%,hand|le%,icon|
|00004de0| 25 2c 6f 62 25 29 0d 19 | a0 0b ea 20 78 25 2c 79 |%,ob%)..|... x%,y|
|00004df0| 25 0d 19 aa 0b c8 8e 20 | 62 25 20 ca 0d 19 b4 20 |%...... |b% .... |
|00004e00| 20 20 c9 20 32 3a 20 f4 | 20 6d 65 6e 75 2d 62 75 | . 2: .| menu-bu|
|00004e10| 74 74 6f 6e 20 63 6c 69 | 63 6b 65 64 0d 19 be 12 |tton cli|cked....|
|00004e20| 20 20 c8 8e 20 68 61 6e | 64 6c 65 25 20 ca 0d 19 | .. han|dle% ...|
|00004e30| c8 29 20 20 20 20 c9 20 | 67 72 61 70 68 62 6f 78 |.) . |graphbox|
|00004e40| 25 3a 20 f2 64 6f 5f 6d | 65 6e 75 28 67 72 61 70 |%: .do_m|enu(grap|
|00004e50| 68 6d 65 6e 75 25 29 0d | 19 d2 3c 20 20 20 20 f4 |hmenu%).|..< .|
|00004e60| 20 57 48 45 4e 20 6c 61 | 72 64 65 72 25 3a 49 46 | WHEN la|rder%:IF|
|00004e70| 20 69 63 6f 6e 25 3c 3e | 2d 31 20 50 52 4f 43 73 | icon%<>|-1 PROCs|
|00004e80| 65 74 75 70 66 6f 6f 64 | 6d 65 6e 75 28 69 63 6f |etupfood|menu(ico|
|00004e90| 6e 25 29 0d 19 dc 10 20 | 20 20 20 c9 20 74 72 61 |n%).... | . tra|
|00004ea0| 79 25 3a 0d 19 e6 24 20 | 20 20 20 e7 20 69 63 6f |y%:...$ | . ico|
|00004eb0| 6e 25 3e 30 20 80 20 69 | 63 6f 6e 25 3c 3d 70 6c |n%>0 . i|con%<=pl|
|00004ec0| 61 74 65 73 25 20 8c 0d | 19 f0 4a 20 20 20 20 20 |ates% ..|..J |
|00004ed0| 20 e7 20 70 6c 61 74 65 | 66 75 6c 6c 25 28 6d 25 | . plate|full%(m%|
|00004ee0| 2c 69 63 6f 6e 25 29 20 | 80 20 20 70 6c 61 74 65 |,icon%) |. plate|
|00004ef0| 73 65 6c 65 63 74 25 28 | 69 63 6f 6e 25 29 3a f2 |select%(|icon%):.|
|00004f00| 61 6e 61 6c 79 73 69 73 | 28 69 63 6f 6e 25 2c b9 |analysis|(icon%,.|
|00004f10| 29 0d 19 fa 4d 20 20 20 | 20 20 20 e7 20 70 6c 61 |)...M | . pla|
|00004f20| 74 65 66 75 6c 6c 25 28 | 6d 25 2c 69 63 6f 6e 25 |tefull%(|m%,icon%|
|00004f30| 29 20 80 20 ac 20 70 6c | 61 74 65 73 65 6c 65 63 |) . . pl|ateselec|
|00004f40| 74 25 28 69 63 6f 6e 25 | 29 20 f2 6d 65 6e 75 5f |t%(icon%|) .menu_|
|00004f50| 6f 70 74 69 6f 6e 73 28 | 69 63 6f 6e 25 29 0d 1a |options(|icon%)..|
|00004f60| 04 09 20 20 20 20 cc 0d | 1a 0e 1d 20 20 20 20 20 |.. ..|... |
|00004f70| 20 f2 64 6f 5f 6d 65 6e | 75 28 6d 61 69 6e 6d 65 | .do_men|u(mainme|
|00004f80| 6e 75 25 29 0d 1a 18 09 | 20 20 20 20 cd 0d 1a 22 |nu%)....| ..."|
|00004f90| 13 20 20 20 20 c9 20 61 | 6e 61 6c 79 73 69 73 25 |. . a|nalysis%|
|00004fa0| 0d 1a 2c 13 20 20 20 20 | e7 20 6a 6f 75 6c 65 73 |..,. |. joules|
|00004fb0| 25 20 8c 0d 1a 36 31 20 | 20 20 20 20 20 f2 53 65 |% ...61 | .Se|
|00004fc0| 74 49 63 6f 6e 54 65 78 | 74 28 33 2c 74 61 72 67 |tIconTex|t(3,targ|
|00004fd0| 65 74 25 2c c3 28 74 61 | 72 67 65 74 25 28 30 29 |et%,.(ta|rget%(0)|
|00004fe0| 29 2c 35 29 0d 1a 40 28 | 20 20 20 20 20 20 f2 53 |),5)..@(| .S|
|00004ff0| 65 74 49 63 6f 6e 54 65 | 78 74 28 34 2c 74 61 72 |etIconTe|xt(4,tar|
|00005000| 67 65 74 25 2c 22 6b 4a | 22 2c 35 29 0d 1a 4a 09 |get%,"kJ|",5)..J.|
|00005010| 20 20 20 20 cc 0d 1a 54 | 31 20 20 20 20 20 20 f2 | ...T|1 .|
|00005020| 53 65 74 49 63 6f 6e 54 | 65 78 74 28 33 2c 74 61 |SetIconT|ext(3,ta|
|00005030| 72 67 65 74 25 2c c3 28 | 74 61 72 67 65 74 25 28 |rget%,.(|target%(|
|00005040| 30 29 29 2c 34 29 0d 1a | 5e 2a 20 20 20 20 20 20 |0)),4)..|^* |
|00005050| f2 53 65 74 49 63 6f 6e | 54 65 78 74 28 34 2c 74 |.SetIcon|Text(4,t|
|00005060| 61 72 67 65 74 25 2c 22 | 43 61 6c 73 22 2c 35 29 |arget%,"|Cals",5)|
|00005070| 0d 1a 68 09 20 20 20 20 | cd 0d 1a 72 15 20 20 20 |..h. |...r. |
|00005080| 20 e3 20 6c 6f 6f 70 25 | 3d 31 20 b8 20 34 0d 1a | . loop%|=1 . 4..|
|00005090| 7c 3d 20 20 20 20 20 20 | f2 53 65 74 49 63 6f 6e ||= |.SetIcon|
|000050a0| 54 65 78 74 28 33 2b 6c | 6f 6f 70 25 2a 35 2c 74 |Text(3+l|oop%*5,t|
|000050b0| 61 72 67 65 74 25 2c c3 | 28 74 61 72 67 65 74 25 |arget%,.|(target%|
|000050c0| 28 6c 6f 6f 70 25 29 29 | 2c 34 29 0d 1a 86 09 20 |(loop%))|,4).... |
|000050d0| 20 20 20 ed 0d 1a 90 29 | 20 20 20 20 f2 66 72 6f | ....)| .fro|
|000050e0| 6e 74 28 74 61 72 67 65 | 74 25 29 3a f4 20 74 66 |nt(targe|t%):. tf|
|000050f0| 6c 61 67 25 3d 69 63 6f | 6e 25 2d 31 31 0d 1a 9a |lag%=ico|n%-11...|
|00005100| 21 20 20 20 20 c9 20 2d | 32 3a 20 f2 64 6f 5f 6d |! . -|2: .do_m|
|00005110| 65 6e 75 28 69 63 6f 6e | 6d 65 6e 75 25 29 0d 1a |enu(icon|menu%)..|
|00005120| a4 07 20 20 cb 0d 1a ae | 04 0d 1a b8 1a 20 20 c9 |.. ....|..... .|
|00005130| 20 34 3a 20 f4 20 73 65 | 6c 65 63 74 20 62 75 74 | 4: . se|lect but|
|00005140| 74 6f 6e 0d 1a c2 41 20 | 20 e7 20 68 61 6e 64 6c |ton...A | . handl|
|00005150| 65 25 3e 2d 31 20 8c 20 | f2 67 65 74 77 28 68 61 |e%>-1 . |.getw(ha|
|00005160| 6e 64 6c 65 25 29 3a 78 | 25 3d 6d 6f 75 73 65 78 |ndle%):x|%=mousex|
|00005170| 25 2d 62 78 25 3a 79 25 | 3d 6d 6f 75 73 65 79 25 |%-bx%:y%|=mousey%|
|00005180| 2d 62 79 25 0d 1a cc 12 | 20 20 c8 8e 20 68 61 6e |-by%....| .. han|
|00005190| 64 6c 65 25 20 ca 0d 1a | d6 15 20 20 20 20 c9 20 |dle% ...|.. . |
|000051a0| 70 72 69 6e 74 73 65 74 | 75 70 25 0d 1a e0 13 20 |printset|up%.... |
|000051b0| 20 20 20 20 c8 8e 20 69 | 63 6f 6e 25 20 ca 0d 1a | .. i|con% ...|
|000051c0| ea 16 20 20 20 20 20 c9 | 20 31 3a 70 5f 64 69 65 |.. .| 1:p_die|
|000051d0| 74 25 3d a3 0d 1a f4 50 | 20 20 20 20 20 c9 20 32 |t%=....P| . 2|
|000051e0| 3a 70 5f 64 69 65 74 25 | 3d b9 3a f2 53 65 6c 65 |:p_diet%|=.:.Sele|
|000051f0| 63 74 49 63 6f 6e 28 70 | 72 69 6e 74 73 65 74 75 |ctIcon(p|rintsetu|
|00005200| 70 25 2c 37 2c a3 29 3a | f2 53 65 6c 65 63 74 49 |p%,7,.):|.SelectI|
|00005210| 63 6f 6e 28 70 72 69 6e | 74 73 65 74 75 70 25 2c |con(prin|tsetup%,|
|00005220| 38 2c a3 29 0d 1a fe 18 | 20 20 20 20 20 c9 20 33 |8,.)....| . 3|
|00005230| 3a 70 5f 72 69 73 63 6f | 73 25 3d b9 0d 1b 08 52 |:p_risco|s%=....R|
|00005240| 20 20 20 20 20 c9 20 34 | 3a 70 5f 72 69 73 63 6f | . 4|:p_risco|
|00005250| 73 25 3d a3 3a f2 53 65 | 6c 65 63 74 49 63 6f 6e |s%=.:.Se|lectIcon|
|00005260| 28 70 72 69 6e 74 73 65 | 74 75 70 25 2c 37 2c a3 |(printse|tup%,7,.|
|00005270| 29 3a f2 53 65 6c 65 63 | 74 49 63 6f 6e 28 70 72 |):.Selec|tIcon(pr|
|00005280| 69 6e 74 73 65 74 75 70 | 25 2c 38 2c a3 29 0d 1b |intsetup|%,8,.)..|
|00005290| 12 24 20 20 20 20 20 c9 | 20 35 3a 70 5f 74 61 72 |.$ .| 5:p_tar|
|000052a0| 67 65 74 73 25 3d ac 20 | 70 5f 74 61 72 67 65 74 |gets%=. |p_target|
|000052b0| 73 25 0d 1b 1c 1e 20 20 | 20 20 20 c9 20 36 3a 70 |s%.... | . 6:p|
|000052c0| 5f 69 6e 66 6f 25 3d ac | 20 70 5f 69 6e 66 6f 25 |_info%=.| p_info%|
|000052d0| 0d 1b 26 0c 20 20 20 20 | 20 c9 20 37 0d 1b 30 5a |..&. | . 7..0Z|
|000052e0| 20 20 20 20 20 70 5f 62 | 61 72 25 3d ac 20 70 5f | p_b|ar%=. p_|
|000052f0| 62 61 72 25 3a e7 20 28 | ac 20 70 5f 72 69 73 63 |bar%:. (|. p_risc|
|00005300| 6f 73 25 29 20 84 20 70 | 5f 64 69 65 74 25 20 8c |os%) . p|_diet% .|
|00005310| 20 70 5f 62 61 72 25 3d | a3 3a f2 53 65 6c 65 63 | p_bar%=|.:.Selec|
|00005320| 74 49 63 6f 6e 28 70 72 | 69 6e 74 73 65 74 75 70 |tIcon(pr|intsetup|
|00005330| 25 2c 37 2c a3 29 0d 1b | 3a 4a 20 20 20 20 20 e7 |%,7,.)..|:J .|
|00005340| 20 70 5f 62 61 72 25 20 | 63 68 61 72 74 24 3d 22 | p_bar% |chart$="|
|00005350| 42 61 72 20 43 68 61 72 | 74 22 3a f2 53 65 6c 65 |Bar Char|t":.Sele|
|00005360| 63 74 49 63 6f 6e 28 70 | 72 69 6e 74 73 65 74 75 |ctIcon(p|rintsetu|
|00005370| 70 25 2c 38 2c a3 29 3a | 70 5f 70 69 65 25 3d a3 |p%,8,.):|p_pie%=.|
|00005380| 0d 1b 44 0c 20 20 20 20 | 20 c9 20 38 0d 1b 4e 5a |..D. | . 8..NZ|
|00005390| 20 20 20 20 20 70 5f 70 | 69 65 25 3d ac 20 70 5f | p_p|ie%=. p_|
|000053a0| 70 69 65 25 3a e7 20 28 | ac 20 70 5f 72 69 73 63 |pie%:. (|. p_risc|
|000053b0| 6f 73 25 29 20 84 20 70 | 5f 64 69 65 74 25 20 8c |os%) . p|_diet% .|
|000053c0| 20 70 5f 70 69 65 25 3d | a3 3a f2 53 65 6c 65 63 | p_pie%=|.:.Selec|
|000053d0| 74 49 63 6f 6e 28 70 72 | 69 6e 74 73 65 74 75 70 |tIcon(pr|intsetup|
|000053e0| 25 2c 38 2c a3 29 0d 1b | 58 4a 20 20 20 20 20 e7 |%,8,.)..|XJ .|
|000053f0| 20 70 5f 70 69 65 25 20 | 63 68 61 72 74 24 3d 22 | p_pie% |chart$="|
|00005400| 50 69 65 20 43 68 61 72 | 74 22 3a f2 53 65 6c 65 |Pie Char|t":.Sele|
|00005410| 63 74 49 63 6f 6e 28 70 | 72 69 6e 74 73 65 74 75 |ctIcon(p|rintsetu|
|00005420| 70 25 2c 37 2c a3 29 3a | 70 5f 62 61 72 25 3d a3 |p%,7,.):|p_bar%=.|
|00005430| 0d 1b 62 43 20 20 20 20 | 20 c9 20 39 3a e7 20 70 |..bC | . 9:. p|
|00005440| 5f 72 69 73 63 6f 73 25 | 20 8c 20 f2 70 72 69 6e |_riscos%| . .prin|
|00005450| 74 5f 72 69 73 63 6f 73 | 28 70 5f 64 69 65 74 25 |t_riscos|(p_diet%|
|00005460| 29 20 8b 20 f2 70 72 69 | 6e 74 28 70 5f 64 69 65 |) . .pri|nt(p_die|
|00005470| 74 25 29 0d 1b 6c 0a 20 | 20 20 20 20 cb 0d 1b 76 |t%)..l. | ...v|
|00005480| 10 20 20 20 20 c9 20 71 | 75 65 72 79 25 0d 1b 80 |. . q|uery%...|
|00005490| 27 20 20 20 20 e7 20 69 | 63 6f 6e 25 3d 31 20 f2 |' . i|con%=1 .|
|000054a0| 73 61 76 65 64 61 74 61 | 62 61 73 65 3a 71 75 69 |savedata|base:qui|
|000054b0| 74 25 3d b9 0d 1b 8a 19 | 20 20 20 20 e7 20 69 63 |t%=.....| . ic|
|000054c0| 6f 6e 25 3d 32 20 71 75 | 69 74 25 3d b9 0d 1b 94 |on%=2 qu|it%=....|
|000054d0| 13 20 20 20 20 c9 20 61 | 6e 61 6c 79 73 69 73 25 |. . a|nalysis%|
|000054e0| 0d 1b 9e 12 20 20 20 20 | c8 8e 20 69 63 6f 6e 25 |.... |.. icon%|
|000054f0| 20 ca 0d 1b a8 22 20 20 | 20 20 20 20 c9 20 31 2c | ...." | . 1,|
|00005500| 33 2c 35 2c 37 2c 39 3a | f2 73 68 6f 77 74 61 72 |3,5,7,9:|.showtar|
|00005510| 67 65 74 73 0d 1b b2 1d | 20 20 20 20 20 20 c9 20 |gets....| . |
|00005520| 32 31 3a f2 74 6f 74 61 | 6c 5f 64 69 65 74 28 b9 |21:.tota|l_diet(.|
|00005530| 29 0d 1b bc 1d 20 20 20 | 20 20 20 c9 20 31 37 3a |).... | . 17:|
|00005540| f2 74 6f 74 61 6c 5f 64 | 69 65 74 28 a3 29 0d 1b |.total_d|iet(.)..|
|00005550| c6 2b 20 20 20 20 20 20 | c9 20 31 30 3a 70 65 72 |.+ |. 10:per|
|00005560| 63 65 6e 74 25 3d ac 20 | 70 65 72 63 65 6e 74 25 |cent%=. |percent%|
|00005570| 3a f2 61 6d 6f 75 6e 74 | 73 0d 1b d0 09 20 20 20 |:.amount|s.... |
|00005580| 20 cb 0d 1b da 11 20 20 | 20 20 c9 20 65 64 69 74 | ..... | . edit|
|00005590| 6f 72 25 0d 1b e4 14 20 | 20 20 20 e7 20 69 63 6f |or%.... | . ico|
|000055a0| 6e 25 3d 31 37 20 8c 0d | 1b ee 16 20 20 20 20 20 |n%=17 ..|... |
|000055b0| 20 e7 20 6e 65 77 66 6f | 6f 64 25 20 8c 0d 1b f8 | . newfo|od% ....|
|000055c0| 2c 20 20 20 20 20 20 20 | 20 e7 20 a4 5f 52 65 61 |, | . ._Rea|
|000055d0| 64 49 63 6f 6e 54 65 78 | 74 28 65 64 69 74 6f 72 |dIconTex|t(editor|
|000055e0| 25 2c 31 29 3d 22 22 20 | e1 0d 1c 02 2c 20 20 20 |%,1)="" |...., |
|000055f0| 20 20 20 20 20 e7 20 a4 | 5f 52 65 61 64 49 63 6f | . .|_ReadIco|
|00005600| 6e 54 65 78 74 28 65 64 | 69 74 6f 72 25 2c 32 29 |nText(ed|itor%,2)|
|00005610| 3d 22 22 20 e1 0d 1c 0c | 35 20 20 20 20 20 20 20 |="" ....|5 |
|00005620| 20 e3 20 6c 6f 6f 70 25 | 3d 6e 6f 5f 6f 66 5f 66 | . loop%|=no_of_f|
|00005630| 6f 6f 64 73 25 20 b8 20 | 6f 70 74 69 6f 6e 63 6f |oods% . |optionco|
|00005640| 75 6e 74 65 72 25 20 88 | 2d 31 0d 1c 16 29 20 20 |unter% .|-1...) |
|00005650| 20 20 20 20 20 20 20 20 | 64 61 74 61 24 28 6c 6f | |data$(lo|
|00005660| 6f 70 25 2b 31 29 3d 64 | 61 74 61 24 28 6c 6f 6f |op%+1)=d|ata$(loo|
|00005670| 70 25 29 0d 1c 20 0d 20 | 20 20 20 20 20 20 20 ed |p%).. . | .|
|00005680| 0d 1c 2a 3f 20 20 20 20 | 20 20 20 20 63 6f 6e 74 |..*? | cont|
|00005690| 61 69 6e 24 28 30 29 3d | 66 6f 6f 64 69 63 6f 6e |ain$(0)=|foodicon|
|000056a0| 24 3a 72 65 6d 61 69 6e | 69 6e 67 25 2d 3d 31 3a |$:remain|ing%-=1:|
|000056b0| 6e 6f 5f 6f 66 5f 66 6f | 6f 64 73 25 2b 3d 31 0d |no_of_fo|ods%+=1.|
|000056c0| 1c 34 1f 20 20 20 20 20 | 20 20 20 e3 20 6c 6f 6f |.4. | . loo|
|000056d0| 70 25 3d 31 20 b8 20 70 | 6c 61 74 65 73 25 0d 1c |p%=1 . p|lates%..|
|000056e0| 3e 6b 20 20 20 20 20 20 | 20 20 20 20 e7 20 70 6c |>k | . pl|
|000056f0| 61 74 65 66 75 6c 6c 25 | 28 6d 25 2c 6c 6f 6f 70 |atefull%|(m%,loop|
|00005700| 25 29 20 80 20 28 66 6f | 6f 64 70 6f 69 6e 74 65 |%) . (fo|odpointe|
|00005710| 72 25 28 6d 25 2c 6c 6f | 6f 70 25 29 3e 3d 6f 70 |r%(m%,lo|op%)>=op|
|00005720| 74 69 6f 6e 63 6f 75 6e | 74 65 72 25 29 20 8c 20 |tioncoun|ter%) . |
|00005730| 66 6f 6f 64 70 6f 69 6e | 74 65 72 25 28 6d 25 2c |foodpoin|ter%(m%,|
|00005740| 6c 6f 6f 70 25 29 2b 3d | 31 0d 1c 48 0d 20 20 20 |loop%)+=|1..H. |
|00005750| 20 20 20 20 20 ed 0d 1c | 52 0b 20 20 20 20 20 20 | ...|R. |
|00005760| cd 0d 1c 5c 2b 20 20 20 | 20 20 20 64 61 74 61 24 |...\+ | data$|
|00005770| 28 6f 70 74 69 6f 6e 63 | 6f 75 6e 74 65 72 25 29 |(optionc|ounter%)|
|00005780| 3d 63 6f 6e 74 61 69 6e | 24 28 30 29 0d 1c 66 17 |=contain|$(0)..f.|
|00005790| 20 20 20 20 20 20 e3 20 | 6c 6f 6f 70 25 3d 31 20 | . |loop%=1 |
|000057a0| b8 20 38 0d 1c 70 23 20 | 20 20 20 20 20 20 20 e7 |. 8..p# | .|
|000057b0| 20 28 6c 6f 6f 70 25 3d | 33 29 20 80 20 6a 6f 75 | (loop%=|3) . jou|
|000057c0| 6c 65 73 25 20 8c 0d 1c | 7a 5a 20 20 20 20 20 20 |les% ...|zZ |
|000057d0| 20 20 20 20 64 61 74 61 | 24 28 6f 70 74 69 6f 6e | data|$(option|
|000057e0| 63 6f 75 6e 74 65 72 25 | 29 2b 3d 28 22 2c 22 2b |counter%|)+=(","+|
|000057f0| c3 28 a8 28 30 2e 35 2b | bb 28 a4 5f 52 65 61 64 |.(.(0.5+|.(._Read|
|00005800| 49 63 6f 6e 54 65 78 74 | 28 65 64 69 74 6f 72 25 |IconText|(editor%|
|00005810| 2c 6c 6f 6f 70 25 29 29 | 2f 34 2e 31 38 29 29 29 |,loop%))|/4.18)))|
|00005820| 0d 1c 84 0d 20 20 20 20 | 20 20 20 20 cc 0d 1c 8e |.... | ....|
|00005830| 48 20 20 20 20 20 20 20 | 20 20 20 64 61 74 61 24 |H | data$|
|00005840| 28 6f 70 74 69 6f 6e 63 | 6f 75 6e 74 65 72 25 29 |(optionc|ounter%)|
|00005850| 2b 3d 28 22 2c 22 2b a4 | 5f 52 65 61 64 49 63 6f |+=(","+.|_ReadIco|
|00005860| 6e 54 65 78 74 28 65 64 | 69 74 6f 72 25 2c 6c 6f |nText(ed|itor%,lo|
|00005870| 6f 70 25 29 29 0d 1c 98 | 0d 20 20 20 20 20 20 20 |op%))...|. |
|00005880| 20 cd 0d 1c a2 0b 20 20 | 20 20 20 20 ed 0d 1c ac | ..... | ....|
|00005890| 15 20 20 20 20 20 20 6d | 6f 64 69 66 69 65 64 25 |. m|odified%|
|000058a0| 3d b9 0d 1c b6 20 20 20 | 20 20 20 20 f2 63 6c 6f |=.... | .clo|
|000058b0| 73 65 5f 77 69 6e 64 6f | 77 28 65 64 69 74 6f 72 |se_windo|w(editor|
|000058c0| 25 29 0d 1c c0 09 20 20 | 20 20 cd 0d 1c ca 13 20 |%).... | ..... |
|000058d0| 20 20 20 c9 20 66 6f 6f | 64 6d 65 6e 75 25 0d 1c | . foo|dmenu%..|
|000058e0| d4 1e 20 20 20 20 e7 20 | 69 63 6f 6e 25 3e 34 20 |.. . |icon%>4 |
|000058f0| 80 20 69 63 6f 6e 25 3c | 33 36 20 8c 0d 1c de 2f |. icon%<|36 ..../|
|00005900| 20 20 20 20 20 20 54 65 | 78 74 24 3d a4 5f 52 65 | Te|xt$=._Re|
|00005910| 61 64 49 63 6f 6e 54 65 | 78 74 28 66 6f 6f 64 6d |adIconTe|xt(foodm|
|00005920| 65 6e 75 25 2c 69 63 6f | 6e 25 29 0d 1c e8 5d 20 |enu%,ico|n%)...] |
|00005930| 20 20 20 20 20 e7 20 54 | 65 78 74 24 3c 3e 22 22 | . T|ext$<>""|
|00005940| 20 f2 53 65 74 49 63 6f | 6e 54 65 78 74 28 33 36 | .SetIco|nText(36|
|00005950| 2c 66 6f 6f 64 6d 65 6e | 75 25 2c 54 65 78 74 24 |,foodmen|u%,Text$|
|00005960| 2c 32 31 29 3a 6f 70 74 | 69 6f 6e 63 6f 75 6e 74 |,21):opt|ioncount|
|00005970| 65 72 25 3d 6f 70 74 69 | 6f 6e 73 74 61 72 74 25 |er%=opti|onstart%|
|00005980| 2b 69 63 6f 6e 25 2d 35 | 0d 1c f2 09 20 20 20 20 |+icon%-5|.... |
|00005990| cd 0d 1c fc 13 20 20 20 | 20 e7 20 69 63 6f 6e 25 |..... | . icon%|
|000059a0| 3d 32 20 8c 0d 1d 06 2c | 20 20 20 20 20 20 54 65 |=2 ....,| Te|
|000059b0| 78 74 24 3d a4 5f 52 65 | 61 64 49 63 6f 6e 54 65 |xt$=._Re|adIconTe|
|000059c0| 78 74 28 66 6f 6f 64 6d | 65 6e 75 25 2c 33 36 29 |xt(foodm|enu%,36)|
|000059d0| 0d 1d 10 21 20 20 20 20 | 20 20 f2 65 64 69 74 28 |...! | .edit(|
|000059e0| 6f 70 74 69 6f 6e 63 6f | 75 6e 74 65 72 25 2c a3 |optionco|unter%,.|
|000059f0| 29 0d 1d 1a 09 20 20 20 | 20 cd 0d 1d 24 2b 20 20 |).... | ...$+ |
|00005a00| 20 20 e7 20 69 63 6f 6e | 25 3d 31 20 80 20 72 65 | . icon|%=1 . re|
|00005a10| 6d 61 69 6e 69 6e 67 25 | 3e 30 20 f2 65 64 69 74 |maining%|>0 .edit|
|00005a20| 28 30 2c b9 29 0d 1d 2e | 04 0d 1d 38 16 20 20 20 |(0,.)...|...8. |
|00005a30| 20 c9 20 6d 65 6e 75 6f | 70 74 69 6f 6e 73 25 0d | . menuo|ptions%.|
|00005a40| 1d 42 38 20 20 20 20 e7 | 20 69 63 6f 6e 25 3e 34 |.B8 .| icon%>4|
|00005a50| 20 80 20 69 63 6f 6e 25 | 3c 28 36 2b 6f 70 74 69 | . icon%|<(6+opti|
|00005a60| 6f 6e 73 65 6e 64 25 2d | 6f 70 74 69 6f 6e 73 74 |onsend%-|optionst|
|00005a70| 61 72 74 25 29 20 8c 0d | 1d 4c 2d 20 20 20 20 20 |art%) ..|.L- |
|00005a80| 20 6f 70 74 69 6f 6e 63 | 6f 75 6e 74 65 72 25 3d | optionc|ounter%=|
|00005a90| 6f 70 74 69 6f 6e 73 74 | 61 72 74 25 2b 69 63 6f |optionst|art%+ico|
|00005aa0| 6e 25 2d 35 0d 1d 56 54 | 20 20 20 20 20 20 f2 75 |n%-5..VT| .u|
|00005ab0| 6e 70 61 63 6b 28 64 61 | 74 61 24 28 6f 70 74 69 |npack(da|ta$(opti|
|00005ac0| 6f 6e 63 6f 75 6e 74 65 | 72 25 29 29 3a 66 6f 6f |oncounte|r%)):foo|
|00005ad0| 64 70 6f 69 6e 74 65 72 | 25 28 6d 25 2c 6f 70 74 |dpointer|%(m%,opt|
|00005ae0| 69 6f 6e 69 63 6f 6e 25 | 29 3d 6f 70 74 69 6f 6e |ionicon%|)=option|
|00005af0| 63 6f 75 6e 74 65 72 25 | 0d 1d 60 35 20 20 20 20 |counter%|..`5 |
|00005b00| 20 20 f2 53 65 74 49 63 | 6f 6e 54 65 78 74 28 30 | .SetIc|onText(0|
|00005b10| 2c 6d 65 6e 75 6f 70 74 | 69 6f 6e 73 25 2c 63 6f |,menuopt|ions%,co|
|00005b20| 6e 74 61 69 6e 24 28 31 | 29 2c 32 31 29 0d 1d 6a |ntain$(1|),21)..j|
|00005b30| 09 20 20 20 20 cd 0d 1d | 74 04 0d 1d 7e 1d 20 20 |. ...|t...~. |
|00005b40| 20 20 e7 20 69 63 6f 6e | 25 3d 31 20 84 20 69 63 | . icon|%=1 . ic|
|00005b50| 6f 6e 25 3d 32 20 8c 0d | 1d 88 42 20 20 20 20 20 |on%=2 ..|..B |
|00005b60| 20 e7 20 69 63 6f 6e 25 | 3d 32 20 80 20 6f 70 74 | . icon%|=2 . opt|
|00005b70| 69 6f 6e 63 6f 75 6e 74 | 65 72 25 3c 6f 70 74 69 |ioncount|er%<opti|
|00005b80| 6f 6e 73 65 6e 64 25 20 | 6f 70 74 69 6f 6e 63 6f |onsend% |optionco|
|00005b90| 75 6e 74 65 72 25 2b 3d | 31 0d 1d 92 43 20 20 20 |unter%+=|1...C |
|00005ba0| 20 20 20 e7 20 69 63 6f | 6e 25 3d 31 20 80 20 6f | . ico|n%=1 . o|
|00005bb0| 70 74 69 6f 6e 63 6f 75 | 6e 74 65 72 25 3e 6f 70 |ptioncou|nter%>op|
|00005bc0| 74 69 6f 6e 73 74 61 72 | 74 25 20 6f 70 74 69 6f |tionstar|t% optio|
|00005bd0| 6e 63 6f 75 6e 74 65 72 | 25 2d 3d 31 0d 1d 9c 54 |ncounter|%-=1...T|
|00005be0| 20 20 20 20 20 20 f2 75 | 6e 70 61 63 6b 28 64 61 | .u|npack(da|
|00005bf0| 74 61 24 28 6f 70 74 69 | 6f 6e 63 6f 75 6e 74 65 |ta$(opti|oncounte|
|00005c00| 72 25 29 29 3a 66 6f 6f | 64 70 6f 69 6e 74 65 72 |r%)):foo|dpointer|
|00005c10| 25 28 6d 25 2c 6f 70 74 | 69 6f 6e 69 63 6f 6e 25 |%(m%,opt|ionicon%|
|00005c20| 29 3d 6f 70 74 69 6f 6e | 63 6f 75 6e 74 65 72 25 |)=option|counter%|
|00005c30| 0d 1d a6 35 20 20 20 20 | 20 20 f2 53 65 74 49 63 |...5 | .SetIc|
|00005c40| 6f 6e 54 65 78 74 28 30 | 2c 6d 65 6e 75 6f 70 74 |onText(0|,menuopt|
|00005c50| 69 6f 6e 73 25 2c 63 6f | 6e 74 61 69 6e 24 28 31 |ions%,co|ntain$(1|
|00005c60| 29 2c 32 31 29 0d 1d b0 | 09 20 20 20 20 cd 0d 1d |),21)...|. ...|
|00005c70| ba 13 20 20 20 20 e7 20 | 69 63 6f 6e 25 3d 33 20 |.. . |icon%=3 |
|00005c80| 8c 0d 1d c4 40 20 20 20 | 20 20 20 f2 53 65 74 49 |....@ | .SetI|
|00005c90| 63 6f 6e 54 65 78 74 28 | 6f 70 74 69 6f 6e 69 63 |conText(|optionic|
|00005ca0| 6f 6e 25 2b 70 6c 61 74 | 65 73 25 2c 74 72 61 79 |on%+plat|es%,tray|
|00005cb0| 25 2c 63 6f 6e 74 61 69 | 6e 24 28 31 29 2c 32 31 |%,contai|n$(1),21|
|00005cc0| 29 0d 1d ce 2b 20 20 20 | 20 20 20 66 6f 6f 64 24 |)...+ | food$|
|00005cd0| 28 6d 25 2c 6f 70 74 69 | 6f 6e 69 63 6f 6e 25 29 |(m%,opti|onicon%)|
|00005ce0| 3d 63 6f 6e 74 61 69 6e | 24 28 31 29 0d 1d d8 39 |=contain|$(1)...9|
|00005cf0| 20 20 20 20 20 20 51 24 | 3d a4 67 65 74 75 6e 69 | Q$|=.getuni|
|00005d00| 74 28 63 6f 6e 74 61 69 | 6e 24 28 32 29 29 3a 55 |t(contai|n$(2)):U|
|00005d10| 24 3d c1 63 6f 6e 74 61 | 69 6e 24 28 32 29 2c a9 |$=.conta|in$(2),.|
|00005d20| 51 24 2b 31 29 0d 1d e2 | 23 20 20 20 20 20 20 c8 |Q$+1)...|# .|
|00005d30| 95 20 c0 55 24 2c 31 29 | 3d 22 20 22 3a 55 24 3d |. .U$,1)|=" ":U$=|
|00005d40| c1 55 24 2c 32 29 3a ce | 0d 1d ec 38 20 20 20 20 |.U$,2):.|...8 |
|00005d50| 20 20 f2 53 65 74 49 63 | 6f 6e 54 65 78 74 28 6f | .SetIc|onText(o|
|00005d60| 70 74 69 6f 6e 69 63 6f | 6e 25 2b 32 2a 70 6c 61 |ptionico|n%+2*pla|
|00005d70| 74 65 73 25 2c 74 72 61 | 79 25 2c 51 24 2c 34 29 |tes%,tra|y%,Q$,4)|
|00005d80| 0d 1d f6 31 20 20 20 20 | 20 20 f2 53 65 74 49 63 |...1 | .SetIc|
|00005d90| 6f 6e 54 65 78 74 28 6f | 70 74 69 6f 6e 69 63 6f |onText(o|ptionico|
|00005da0| 6e 25 2b 33 35 2c 74 72 | 61 79 25 2c 55 24 2c 36 |n%+35,tr|ay%,U$,6|
|00005db0| 29 0d 1e 00 2e 20 20 20 | 20 20 20 70 6f 72 74 69 |).... | porti|
|00005dc0| 6f 6e 24 28 6d 25 2c 6f | 70 74 69 6f 6e 69 63 6f |on$(m%,o|ptionico|
|00005dd0| 6e 25 29 3d 63 6f 6e 74 | 61 69 6e 24 28 32 29 0d |n%)=cont|ain$(2).|
|00005de0| 1e 0a 2e 20 20 20 20 20 | 20 f2 63 6c 6f 73 65 5f |... | .close_|
|00005df0| 77 69 6e 64 6f 77 28 68 | 61 6e 64 6c 65 25 29 3a |window(h|andle%):|
|00005e00| 6f 70 74 69 6f 6e 69 63 | 6f 6e 25 3d 30 0d 1e 14 |optionic|on%=0...|
|00005e10| 09 20 20 20 20 cd 0d 1e | 1e 11 20 20 20 20 c9 20 |. ...|.. . |
|00005e20| 74 61 72 67 65 74 25 0d | 1e 28 22 20 20 20 20 e7 |target%.|.(" .|
|00005e30| 20 69 63 6f 6e 25 3d 33 | 35 20 f2 73 61 76 65 5f | icon%=3|5 .save_|
|00005e40| 74 61 72 67 65 74 73 3a | e1 0d 1e 32 15 20 20 20 |targets:|...2. |
|00005e50| 20 e3 20 6c 6f 6f 70 25 | 3d 30 20 b8 20 34 0d 1e | . loop%|=0 . 4..|
|00005e60| 3c 2f 20 20 20 20 20 20 | e7 20 69 63 6f 6e 25 3d |</ |. icon%=|
|00005e70| 31 2b 6c 6f 6f 70 25 2a | 35 20 84 20 69 63 6f 6e |1+loop%*|5 . icon|
|00005e80| 25 3d 32 2b 6c 6f 6f 70 | 25 2a 35 20 8c 0d 1e 46 |%=2+loop|%*5 ...F|
|00005e90| 2f 20 20 20 20 20 20 20 | 20 e7 20 69 63 6f 6e 25 |/ | . icon%|
|00005ea0| 3d 31 2b 6c 6f 6f 70 25 | 2a 35 20 74 61 72 67 65 |=1+loop%|*5 targe|
|00005eb0| 74 25 28 6c 6f 6f 70 25 | 29 2b 3d 31 0d 1e 50 44 |t%(loop%|)+=1..PD|
|00005ec0| 20 20 20 20 20 20 20 20 | e7 20 69 63 6f 6e 25 3d | |. icon%=|
|00005ed0| 32 2b 6c 6f 6f 70 25 2a | 35 20 80 20 74 61 72 67 |2+loop%*|5 . targ|
|00005ee0| 65 74 25 28 6c 6f 6f 70 | 25 29 3e 31 20 8c 20 74 |et%(loop|%)>1 . t|
|00005ef0| 61 72 67 65 74 25 28 6c | 6f 6f 70 25 29 2d 3d 31 |arget%(l|oop%)-=1|
|00005f00| 0d 1e 5a 3f 20 20 20 20 | 20 20 20 20 f2 53 65 74 |..Z? | .Set|
|00005f10| 49 63 6f 6e 54 65 78 74 | 28 33 2b 6c 6f 6f 70 25 |IconText|(3+loop%|
|00005f20| 2a 35 2c 74 61 72 67 65 | 74 25 2c c3 28 74 61 72 |*5,targe|t%,.(tar|
|00005f30| 67 65 74 25 28 6c 6f 6f | 70 25 29 29 2c 35 29 0d |get%(loo|p%)),5).|
|00005f40| 1e 64 0b 20 20 20 20 20 | 20 cd 0d 1e 6e 09 20 20 |.d. | ...n. |
|00005f50| 20 20 ed 0d 1e 78 14 20 | 20 20 20 e7 20 69 63 6f | ...x. | . ico|
|00005f60| 6e 25 3d 32 35 20 8c 0d | 1e 82 17 20 20 20 20 20 |n%=25 ..|... |
|00005f70| 20 e3 20 6c 6f 6f 70 25 | 3d 30 20 b8 20 34 0d 1e | . loop%|=0 . 4..|
|00005f80| 8c 3f 20 20 20 20 20 20 | 20 20 74 61 72 67 65 74 |.? | target|
|00005f90| 25 28 6c 6f 6f 70 25 29 | 3d bb 28 a4 5f 52 65 61 |%(loop%)|=.(._Rea|
|00005fa0| 64 49 63 6f 6e 54 65 78 | 74 28 74 61 72 67 65 74 |dIconTex|t(target|
|00005fb0| 25 2c 33 2b 6c 6f 6f 70 | 25 2a 35 29 29 0d 1e 96 |%,3+loop|%*5))...|
|00005fc0| 0b 20 20 20 20 20 20 ed | 0d 1e a0 20 20 20 20 20 |. .|... |
|00005fd0| 20 20 f2 63 6c 6f 73 65 | 5f 77 69 6e 64 6f 77 28 | .close|_window(|
|00005fe0| 68 61 6e 64 6c 65 25 29 | 0d 1e aa 09 20 20 20 20 |handle%)|.... |
|00005ff0| cd 0d 1e b4 20 20 20 20 | 20 e7 20 69 63 6f 6e 25 |.... | . icon%|
|00006000| 3d 33 31 20 80 20 ac 20 | 6a 6f 75 6c 65 73 25 20 |=31 . . |joules% |
|00006010| 8c 0d 1e be 4d 20 20 20 | 20 20 20 6a 6f 75 6c 65 |....M | joule|
|00006020| 73 25 3d b9 3a 74 61 72 | 67 65 74 25 28 30 29 3d |s%=.:tar|get%(0)=|
|00006030| 74 61 72 67 65 74 25 28 | 30 29 2a 34 2e 31 38 3a |target%(|0)*4.18:|
|00006040| f2 53 65 74 49 63 6f 6e | 54 65 78 74 28 34 2c 74 |.SetIcon|Text(4,t|
|00006050| 61 72 67 65 74 25 2c 22 | 6b 4a 22 2c 34 29 0d 1e |arget%,"|kJ",4)..|
|00006060| c8 3e 20 20 20 20 20 20 | f2 53 65 74 49 63 6f 6e |.> |.SetIcon|
|00006070| 54 65 78 74 28 33 2c 74 | 61 72 67 65 74 25 2c c3 |Text(3,t|arget%,.|
|00006080| 28 74 61 72 67 65 74 25 | 28 30 29 29 2c 35 29 3a |(target%|(0)),5):|
|00006090| f2 73 68 6f 77 74 61 72 | 67 65 74 73 0d 1e d2 09 |.showtar|gets....|
|000060a0| 20 20 20 20 cd 0d 1e dc | 1e 20 20 20 20 e7 20 69 | ....|. . i|
|000060b0| 63 6f 6e 25 3d 33 32 20 | 80 20 6a 6f 75 6c 65 73 |con%=32 |. joules|
|000060c0| 25 20 8c 0d 1e e6 4f 20 | 20 20 20 20 20 6a 6f 75 |% ....O | jou|
|000060d0| 6c 65 73 25 3d a3 3a 74 | 61 72 67 65 74 25 28 30 |les%=.:t|arget%(0|
|000060e0| 29 3d 74 61 72 67 65 74 | 25 28 30 29 2f 34 2e 31 |)=target|%(0)/4.1|
|000060f0| 38 3a f2 53 65 74 49 63 | 6f 6e 54 65 78 74 28 34 |8:.SetIc|onText(4|
|00006100| 2c 74 61 72 67 65 74 25 | 2c 22 43 61 6c 73 22 2c |,target%|,"Cals",|
|00006110| 34 29 0d 1e f0 3e 20 20 | 20 20 20 20 f2 53 65 74 |4)...> | .Set|
|00006120| 49 63 6f 6e 54 65 78 74 | 28 33 2c 74 61 72 67 65 |IconText|(3,targe|
|00006130| 74 25 2c c3 28 74 61 72 | 67 65 74 25 28 30 29 29 |t%,.(tar|get%(0))|
|00006140| 2c 35 29 3a f2 73 68 6f | 77 74 61 72 67 65 74 73 |,5):.sho|wtargets|
|00006150| 0d 1e fa 09 20 20 20 20 | cd 0d 1f 04 10 20 20 20 |.... |..... |
|00006160| 20 c9 20 74 72 61 79 25 | 3a 0d 1f 0e 26 20 20 20 | . tray%|:...& |
|00006170| 20 e7 20 69 63 6f 6e 25 | 3d 33 33 20 8c 20 f2 6e | . icon%|=33 . .n|
|00006180| 75 74 72 69 65 6e 74 5f | 69 6e 66 6f 28 32 29 0d |utrient_|info(2).|
|00006190| 1f 18 14 20 20 20 20 e7 | 20 69 63 6f 6e 25 3d 33 |... .| icon%=3|
|000061a0| 34 20 8c 0d 1f 22 1f 20 | 20 20 20 f2 64 6f 5f 6d |4 ...". | .do_m|
|000061b0| 65 6e 75 28 6e 75 74 72 | 69 65 6e 74 6d 65 6e 75 |enu(nutr|ientmenu|
|000061c0| 25 29 0d 1f 2c 09 20 20 | 20 20 cd 0d 1f 36 23 20 |%)..,. | ...6# |
|000061d0| 20 20 20 e7 20 69 63 6f | 6e 25 3d 30 20 8c 20 f2 | . ico|n%=0 . .|
|000061e0| 57 69 70 65 49 63 6f 6e | 54 65 78 74 3a e1 0d 1f |WipeIcon|Text:...|
|000061f0| 40 24 20 20 20 20 e7 20 | 69 63 6f 6e 25 3e 30 20 |@$ . |icon%>0 |
|00006200| 80 20 69 63 6f 6e 25 3c | 3d 70 6c 61 74 65 73 25 |. icon%<|=plates%|
|00006210| 20 8c 0d 1f 4a 51 20 20 | 20 20 20 20 e7 20 70 6c | ...JQ | . pl|
|00006220| 61 74 65 66 75 6c 6c 25 | 28 6d 25 2c 69 63 6f 6e |atefull%|(m%,icon|
|00006230| 25 29 3a f2 61 6e 61 6c | 79 73 69 73 28 69 63 6f |%):.anal|ysis(ico|
|00006240| 6e 25 2c a3 29 3a c8 99 | 20 22 57 69 6d 70 5f 53 |n%,.):..| "Wimp_S|
|00006250| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00006260| 2c 2d 31 0d 1f 54 09 20 | 20 20 20 cd 0d 1f 5e 2e |,-1..T. | ...^.|
|00006270| 20 20 20 20 e7 20 69 63 | 6f 6e 25 3e 32 2a 70 6c | . ic|on%>2*pl|
|00006280| 61 74 65 73 25 20 80 20 | 69 63 6f 6e 25 3c 3d 33 |ates% . |icon%<=3|
|00006290| 2a 70 6c 61 74 65 73 25 | 20 8c 0d 1f 68 68 20 20 |*plates%| ...hh |
|000062a0| 20 20 20 20 e7 20 70 6c | 61 74 65 66 75 6c 6c 25 | . pl|atefull%|
|000062b0| 28 6d 25 2c 69 63 6f 6e | 25 2d 32 2a 70 6c 61 74 |(m%,icon|%-2*plat|
|000062c0| 65 73 25 29 20 80 20 20 | 70 6c 61 74 65 73 65 6c |es%) . |platesel|
|000062d0| 65 63 74 25 28 69 63 6f | 6e 25 2d 32 2a 70 6c 61 |ect%(ico|n%-2*pla|
|000062e0| 74 65 73 25 29 3a f2 61 | 6e 61 6c 79 73 69 73 28 |tes%):.a|nalysis(|
|000062f0| 69 63 6f 6e 25 2d 32 2a | 70 6c 61 74 65 73 25 2c |icon%-2*|plates%,|
|00006300| b9 29 0d 1f 72 4c 20 20 | 20 20 20 20 e7 20 ac 20 |.)..rL | . . |
|00006310| 70 6c 61 74 65 73 65 6c | 65 63 74 25 28 69 63 6f |platesel|ect%(ico|
|00006320| 6e 25 2d 32 2a 70 6c 61 | 74 65 73 25 29 20 f2 53 |n%-2*pla|tes%) .S|
|00006330| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 28 |etCaretP|osition(|
|00006340| 74 72 61 79 25 2c 69 63 | 6f 6e 25 2c 30 29 0d 1f |tray%,ic|on%,0)..|
|00006350| 7c 3e 20 20 20 20 20 20 | e7 20 6e 75 74 72 69 65 ||> |. nutrie|
|00006360| 6e 74 25 3c 3e 32 20 6e | 75 74 72 69 65 6e 74 25 |nt%<>2 n|utrient%|
|00006370| 3d 32 3a f2 6e 75 74 72 | 69 65 6e 74 5f 69 6e 66 |=2:.nutr|ient_inf|
|00006380| 6f 28 6e 75 74 72 69 65 | 6e 74 25 29 0d 1f 86 09 |o(nutrie|nt%)....|
|00006390| 20 20 20 20 cd 0d 1f 90 | 2d 20 20 20 20 c9 20 73 | ....|- . s|
|000063a0| 61 76 65 62 6f 78 25 3a | 20 e7 20 69 63 6f 6e 25 |avebox%:| . icon%|
|000063b0| 3d 32 20 f2 73 61 76 65 | 66 69 6c 65 28 a3 2c 22 |=2 .save|file(.,"|
|000063c0| 22 29 0d 1f 9a 30 20 20 | 20 20 c9 20 73 61 76 65 |")...0 | . save|
|000063d0| 62 6f 78 63 73 76 25 3a | 20 e7 20 69 63 6f 6e 25 |boxcsv%:| . icon%|
|000063e0| 3d 32 20 f2 73 61 76 65 | 66 69 6c 65 28 a3 2c 22 |=2 .save|file(.,"|
|000063f0| 22 29 0d 1f a4 31 20 20 | 20 20 c9 20 73 61 76 65 |")...1 | . save|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
