home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 3 / TheARMClub_PDCD3.iso / programs / acorn / riscos2 / apps2 / !MailMan / !RunImage < prev    next >
Unknown  |  1988-12-09  |  20.3 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 1e de 20 74 | 61 73 6b 69 64 25 34 3a |e..... t|askid%4:|
|00000020| 24 74 61 73 6b 69 64 25 | 3d 22 54 41 53 4b 22 0d |$taskid%|="TASK".|
|00000030| 00 1e 3b c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |..;.. "W|imp_Init|
|00000040| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 74 61 73 |ialise",|200,!tas|
|00000050| 6b 69 64 25 2c 22 4d 61 | 69 6c 20 4d 61 6e 22 20 |kid%,"Ma|il Man" |
|00000060| b8 20 76 65 72 73 69 6f | 6e 25 0d 00 28 4d 60 77 |. versio|n%..(M`w|
|00000070| 62 63 6f 6c 3d 26 30 3a | 60 74 62 63 6f 6c 3d 31 |bcol=&0:|`tbcol=1|
|00000080| 32 3a 60 73 63 6f 3d 34 | 3a 60 6d 62 63 6f 6c 3d |2:`sco=4|:`mbcol=|
|00000090| 32 3a 60 77 66 63 6f 6c | 3d 26 37 3a 60 74 66 63 |2:`wfcol|=&7:`tfc|
|000000a0| 6f 6c 3d 37 3a 60 73 63 | 69 3d 26 44 3a 60 74 62 |ol=7:`sc|i=&D:`tb|
|000000b0| 63 6f 6c 32 3d 26 43 0d | 00 32 09 f2 76 61 72 73 |col2=&C.|.2..vars|
|000000c0| 0d 00 3c 05 20 0d 00 46 | 3d 6d 61 78 62 75 66 25 |..<. ..F|=maxbuf%|
|000000d0| 3d 26 32 30 30 3a de 20 | 62 75 66 66 65 72 25 20 |=&200:. |buffer% |
|000000e0| 6d 61 78 62 75 66 25 2c | 65 6e 64 62 75 66 25 20 |maxbuf%,|endbuf% |
|000000f0| 2d 31 3a 63 75 72 62 75 | 66 25 3d 62 75 66 66 65 |-1:curbu|f%=buffe|
|00000100| 72 25 0d 00 50 2e c8 99 | 20 22 4f 53 5f 46 53 43 |r%..P...| "OS_FSC|
|00000110| 6f 6e 74 72 6f 6c 22 2c | 31 33 2c 22 6e 65 74 22 |ontrol",|13,"net"|
|00000120| 2b bd 30 2c 31 20 b8 20 | 2c 2c 4e 65 74 4f 4b 25 |+.0,1 . |,,NetOK%|
|00000130| 0d 00 5a 80 e7 20 4e 65 | 74 4f 4b 25 3d 30 20 8c |..Z.. Ne|tOK%=0 .|
|00000140| 20 f2 72 65 70 6f 72 74 | 28 32 30 30 36 2c 20 22 | .report|(2006, "|
|00000150| 59 6f 75 20 6e 65 65 64 | 20 6e 65 74 77 6f 72 6b |You need| network|
|00000160| 20 68 61 72 64 77 61 72 | 65 20 61 6e 64 20 74 68 | hardwar|e and th|
|00000170| 65 20 6e 65 74 77 6f 72 | 6b 20 66 69 6c 69 6e 67 |e networ|k filing|
|00000180| 20 73 79 73 74 65 6d 20 | 69 6e 20 6f 72 64 65 72 | system |in order|
|00000190| 20 74 6f 20 75 73 65 20 | 74 68 65 20 6d 61 69 6c | to use |the mail|
|000001a0| 6d 61 6e 2e 22 29 3a f2 | 66 69 6e 69 73 68 3a e0 |man."):.|finish:.|
|000001b0| 0d 00 64 05 20 0d 00 6e | 19 de 20 71 25 20 26 32 |..d. ..n|.. q% &2|
|000001c0| 34 30 2c 69 63 6f 6e 73 | 25 20 26 31 30 30 0d 00 |40,icons|% &100..|
|000001d0| 78 14 de 20 6d 65 6e 75 | 64 61 74 61 25 20 26 32 |x.. menu|data% &2|
|000001e0| 30 30 0d 00 82 46 6d 61 | 78 56 61 72 73 25 3d 33 |00...Fma|xVars%=3|
|000001f0| 3a de 20 63 68 6f 69 63 | 65 25 28 6d 61 78 56 61 |:. choic|e%(maxVa|
|00000200| 72 73 25 29 3a 63 75 72 | 72 65 6e 74 3d 30 3a 6c |rs%):cur|rent=0:l|
|00000210| 6f 67 66 69 6c 65 3d 31 | 3a 6e 61 6d 65 3d 32 3a |ogfile=1|:name=2:|
|00000220| 73 6f 75 72 63 65 3d 33 | 0d 00 8c 44 de 20 76 61 |source=3|...D. va|
|00000230| 72 6e 61 6d 65 73 24 28 | 6d 61 78 56 61 72 73 25 |rnames$(|maxVars%|
|00000240| 29 3a e3 20 76 25 3d 30 | b8 6d 61 78 56 61 72 73 |):. v%=0|.maxVars|
|00000250| 25 3a f3 76 61 72 6e 61 | 6d 65 73 24 28 76 25 29 |%:.varna|mes$(v%)|
|00000260| 3a ed 3a 73 63 72 61 70 | 24 3d 22 22 0d 00 96 05 |:.:scrap|$=""....|
|00000270| 20 0d 00 a0 2a de 20 69 | 63 6f 6e 49 6e 66 6f 25 | ...*. i|conInfo%|
|00000280| 20 34 30 3a 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e | 40:Wimp|_GetIcon|
|00000290| 49 6e 66 6f 3d 26 34 30 | 30 63 65 0d 00 aa 26 69 |Info=&40|0ce...&i|
|000002a0| 6e 74 65 72 6e 61 6c 25 | 3d b9 3a ee 85 20 f2 65 |nternal%|=.:.. .e|
|000002b0| 72 72 6f 72 62 6f 78 3a | f2 66 69 6e 69 73 68 3a |rrorbox:|.finish:|
|000002c0| e0 0d 00 b4 05 20 0d 00 | be 2f 53 25 3d 8e 22 3c |..... ..|./S%=."<|
|000002d0| 4d 61 69 6c 4d 61 6e 24 | 44 69 72 3e 2e 53 70 72 |MailMan$|Dir>.Spr|
|000002e0| 69 74 65 73 22 3a 54 25 | 3d a2 23 53 25 2b 31 36 |ites":T%|=.#S%+16|
|000002f0| 3a d9 23 53 25 0d 00 c8 | 11 de 20 73 70 72 69 74 |:.#S%...|.. sprit|
|00000300| 65 73 25 20 54 25 0d 00 | d2 1d 21 73 70 72 69 74 |es% T%..|..!sprit|
|00000310| 65 73 25 3d 54 25 3a 73 | 70 72 69 74 65 73 25 21 |es%=T%:s|prites%!|
|00000320| 38 3d 30 0d 00 dc 1a c8 | 99 20 73 70 6f 70 25 2c |8=0.....|. spop%,|
|00000330| 26 31 30 39 2c 73 70 72 | 69 74 65 73 25 0d 00 e6 |&109,spr|ites%...|
|00000340| 32 c8 99 20 73 70 6f 70 | 25 2c 26 31 30 41 2c 73 |2.. spop|%,&10A,s|
|00000350| 70 72 69 74 65 73 25 2c | 22 3c 4d 61 69 6c 4d 61 |prites%,|"<MailMa|
|00000360| 6e 24 44 69 72 3e 2e 53 | 70 72 69 74 65 73 22 0d |n$Dir>.S|prites".|
|00000370| 00 f0 14 69 63 6d 61 69 | 6c 25 3d a4 69 63 6f 6e |...icmai|l%=.icon|
|00000380| 62 61 72 0d 00 fa 05 20 | 0d 01 04 35 c8 99 20 22 |bar.... |...5.. "|
|00000390| 57 69 6d 70 5f 4f 70 65 | 6e 54 65 6d 70 6c 61 74 |Wimp_Ope|nTemplat|
|000003a0| 65 22 2c 2c 22 3c 4d 61 | 69 6c 4d 61 6e 24 44 69 |e",,"<Ma|ilMan$Di|
|000003b0| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 01 0e |r>.Templ|ates"...|
|000003c0| 3b 6d 61 69 6c 74 6f 53 | 69 7a 65 25 3d 35 2a 31 |;mailtoS|ize%=5*1|
|000003d0| 30 30 2b 33 32 2b 31 36 | 3a 69 6e 66 6f 53 69 7a |00+32+16|:infoSiz|
|000003e0| 65 25 3d 32 30 30 3a 63 | 68 6f 69 63 65 73 53 69 |e%=200:c|hoicesSi|
|000003f0| 7a 65 25 3d 31 32 30 30 | 0d 01 18 4d de 20 6d 61 |ze%=1200|...M. ma|
|00000400| 69 6c 49 63 6f 6e 73 25 | 20 6d 61 69 6c 74 6f 53 |ilIcons%| mailtoS|
|00000410| 69 7a 65 25 2c 20 69 6e | 66 6f 49 63 6f 6e 73 25 |ize%, in|foIcons%|
|00000420| 20 69 6e 66 6f 53 69 7a | 65 25 2c 20 63 68 6f 69 | infoSiz|e%, choi|
|00000430| 63 65 49 63 6f 6e 73 25 | 20 63 68 6f 69 63 65 73 |ceIcons%| choices|
|00000440| 53 69 7a 65 25 0d 01 22 | 4e c8 99 20 22 57 69 6d |Size%.."|N.. "Wim|
|00000450| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 22 2c |p_LoadTe|mplate",|
|00000460| 2c 71 25 2c 6d 61 69 6c | 49 63 6f 6e 73 25 2c 6d |,q%,mail|Icons%,m|
|00000470| 61 69 6c 49 63 6f 6e 73 | 25 2b 6d 61 69 6c 74 6f |ailIcons|%+mailto|
|00000480| 53 69 7a 65 25 2c 2d 31 | 2c 22 4d 61 69 6c 54 6f |Size%,-1|,"MailTo|
|00000490| 22 2c 30 0d 01 2c 28 c8 | 99 20 22 57 69 6d 70 5f |",0..,(.|. "Wimp_|
|000004a0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 71 |CreateWi|ndow",,q|
|000004b0| 25 20 b8 20 6d 61 69 6c | 74 6f 25 0d 01 36 4a c8 |% . mail|to%..6J.|
|000004c0| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|000004d0| 6c 61 74 65 22 2c 2c 71 | 25 2c 69 6e 66 6f 49 63 |late",,q|%,infoIc|
|000004e0| 6f 6e 73 25 2c 69 6e 66 | 6f 49 63 6f 6e 73 25 2b |ons%,inf|oIcons%+|
|000004f0| 69 6e 66 6f 53 69 7a 65 | 25 2c 2d 31 2c 22 49 6e |infoSize|%,-1,"In|
|00000500| 66 6f 22 2c 30 0d 01 40 | 2c c8 99 20 22 57 69 6d |fo",0..@|,.. "Wim|
|00000510| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00000520| 2c 71 25 20 b8 20 69 6e | 66 6f 77 69 6e 64 6f 77 |,q% . in|fowindow|
|00000530| 25 0d 01 4a 54 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |%..JT.. |"Wimp_Lo|
|00000540| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 71 25 2c |adTempla|te",,q%,|
|00000550| 63 68 6f 69 63 65 49 63 | 6f 6e 73 25 2c 63 68 6f |choiceIc|ons%,cho|
|00000560| 69 63 65 49 63 6f 6e 73 | 25 2b 63 68 6f 69 63 65 |iceIcons|%+choice|
|00000570| 73 53 69 7a 65 25 2c 2d | 31 2c 22 63 68 6f 69 63 |sSize%,-|1,"choic|
|00000580| 65 73 22 2c 30 0d 01 54 | 3c c8 99 20 22 57 69 6d |es",0..T|<.. "Wim|
|00000590| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|000005a0| 2c 71 25 20 b8 20 63 68 | 6f 69 63 65 73 77 69 6e |,q% . ch|oiceswin|
|000005b0| 64 6f 77 25 3a f2 6e 6f | 74 65 42 75 66 66 65 72 |dow%:.no|teBuffer|
|000005c0| 73 0d 01 5e 1b c8 99 20 | 22 57 69 6d 70 5f 43 6c |s..^... |"Wimp_Cl|
|000005d0| 6f 73 65 54 65 6d 70 6c | 61 74 65 22 0d 01 68 05 |oseTempl|ate"..h.|
|000005e0| 20 0d 01 72 12 de 20 6f | 70 74 62 75 66 66 25 20 | ..r.. o|ptbuff% |
|000005f0| 31 30 30 0d 01 7c 3f 62 | 6f 6e 67 3d a3 3a 6d 61 |100..|?b|ong=.:ma|
|00000600| 69 6c 72 65 66 25 3d 30 | 3a 6d 61 69 6c 6d 65 74 |ilref%=0|:mailmet|
|00000610| 68 6f 64 25 3d 30 3a f4 | 20 30 20 6e 6f 6e 65 2c |hod%=0:.| 0 none,|
|00000620| 20 31 20 66 69 6c 65 2c | 20 32 2c 33 20 73 63 72 | 1 file,| 2,3 scr|
|00000630| 61 70 0d 01 86 21 61 63 | 6b 3d a3 3a f2 73 65 74 |ap...!ac|k=.:.set|
|00000640| 4f 70 74 28 6d 61 69 6c | 74 6f 25 2c 31 31 2c 61 |Opt(mail|to%,11,a|
|00000650| 63 6b 29 0d 01 90 16 64 | 69 61 6c 6f 67 75 65 53 |ck)....d|ialogueS|
|00000660| 74 61 72 74 65 64 25 3d | a3 0d 01 9a 05 20 0d 01 |tarted%=|..... ..|
|00000670| a4 1f f2 72 65 61 64 43 | 68 6f 69 63 65 73 3a f2 |...readC|hoices:.|
|00000680| 66 69 6c 6c 49 6e 43 68 | 6f 69 63 65 73 0d 01 ae |fillInCh|oices...|
|00000690| 4e c8 99 20 22 58 4f 53 | 5f 52 65 61 64 56 61 72 |N.. "XOS|_ReadVar|
|000006a0| 56 61 6c 22 2c 22 4d 61 | 69 6c 4d 61 6e 24 44 69 |Val","Ma|ilMan$Di|
|000006b0| 72 22 2c 62 75 66 66 65 | 72 25 2c 32 35 35 2c 30 |r",buffe|r%,255,0|
|000006c0| 2c 33 20 b8 20 2c 2c 6c | 65 6e 67 74 68 25 3a 76 |,3 . ,,l|ength%:v|
|000006d0| 25 3d 6c 65 6e 67 74 68 | 25 2d 31 0d 01 b8 3a c8 |%=length|%-1...:.|
|000006e0| 95 20 76 25 3e 3d 30 20 | 80 20 62 75 66 66 65 72 |. v%>=0 |. buffer|
|000006f0| 25 3f 76 25 3c 3e 97 22 | 2e 22 3a 76 25 2d 3d 31 |%?v%<>."|.":v%-=1|
|00000700| 3a ce 3a 76 25 2b 3d 31 | 3a 62 75 66 66 65 72 25 |:.:v%+=1|:buffer%|
|00000710| 3f 76 25 3d 30 0d 01 c2 | 4b f2 73 65 74 46 69 6c |?v%=0...|K.setFil|
|00000720| 65 28 62 75 66 66 65 72 | 25 2c 63 75 72 72 65 6e |e(buffer|%,curren|
|00000730| 74 2c 22 43 75 72 72 65 | 6e 74 22 29 3a f2 73 65 |t,"Curre|nt"):.se|
|00000740| 74 46 69 6c 65 28 62 75 | 66 66 65 72 25 2c 6c 6f |tFile(bu|ffer%,lo|
|00000750| 67 66 69 6c 65 2c 22 4c | 6f 67 46 69 6c 65 22 29 |gfile,"L|ogFile")|
|00000760| 0d 01 cc 1d f2 73 65 74 | 4d 61 69 6c 53 6f 75 72 |.....set|MailSour|
|00000770| 63 65 3a f2 6e 6f 74 65 | 53 63 72 61 70 0d 01 d6 |ce:.note|Scrap...|
|00000780| 05 20 0d 01 e0 10 ee 85 | 20 f2 65 72 72 6f 72 62 |. ......| .errorb|
|00000790| 6f 78 0d 01 ea 0e 6c 6f | 64 65 6c 25 3d 35 30 30 |ox....lo|del%=500|
|000007a0| 0d 01 f4 0f 68 69 64 65 | 6c 25 3d 36 30 30 30 0d |....hide|l%=6000.|
|000007b0| 01 fe 13 64 65 6c 61 79 | 25 20 3d 20 68 69 64 65 |...delay|% = hide|
|000007c0| 6c 25 0d 02 08 0f c8 99 | 20 44 72 61 67 2c 2c 2d |l%......| Drag,,-|
|000007d0| 31 0d 02 12 1f c8 99 20 | 54 69 6d 65 25 20 b8 20 |1...... |Time% . |
|000007e0| 74 69 6d 65 78 25 3a f2 | 6e 75 64 67 65 28 a3 29 |timex%:.|nudge(.)|
|000007f0| 0d 02 1c 05 f5 0d 02 26 | 1e 20 c8 99 20 50 6f 6c |.......&|. .. Pol|
|00000800| 6c 25 2c 30 2c 71 25 2c | 74 69 6d 65 78 25 20 b8 |l%,0,q%,|timex% .|
|00000810| 20 41 25 0d 02 30 0d 20 | 20 c8 8e 20 41 25 20 ca | A%..0. | .. A% .|
|00000820| 0d 02 3a 42 20 20 c9 20 | 30 20 3a e7 6d 61 69 6c |..:B . |0 :.mail|
|00000830| 6d 65 74 68 6f 64 25 3d | 33 20 f2 53 74 61 72 74 |method%=|3 .Start|
|00000840| 44 69 61 6c 6f 67 75 65 | 3a 6d 61 69 6c 6d 65 74 |Dialogue|:mailmet|
|00000850| 68 6f 64 25 3d 31 20 8b | 20 f2 6e 75 64 67 65 28 |hod%=1 .| .nudge(|
|00000860| b9 29 0d 02 44 1e 20 20 | c9 20 31 20 3a f2 72 65 |.)..D. |. 1 :.re|
|00000870| 64 72 61 77 5f 77 69 6e | 64 6f 77 28 21 71 25 29 |draw_win|dow(!q%)|
|00000880| 0d 02 4e 44 20 20 c9 20 | 32 20 3a f2 6f 70 65 6e |..ND . |2 :.open|
|00000890| 5f 77 69 6e 64 6f 77 28 | 21 71 25 2c 71 25 21 34 |_window(|!q%,q%!4|
|000008a0| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|000008b0| 36 2c 71 25 21 32 30 2c | 71 25 21 32 34 2c 71 25 |6,q%!20,|q%!24,q%|
|000008c0| 21 32 38 29 0d 02 58 1d | 20 20 c9 20 33 20 3a f2 |!28)..X.| . 3 :.|
|000008d0| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 28 21 71 25 |close_wi|ndow(!q%|
|000008e0| 29 0d 02 62 37 20 20 c9 | 20 36 20 3a f2 63 68 65 |)..b7 .| 6 :.che|
|000008f0| 63 6b 6d 6f 75 73 65 28 | 21 71 25 2c 71 25 21 34 |ckmouse(|!q%,q%!4|
|00000900| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00000910| 36 2c 71 25 21 32 30 29 | 0d 02 6c 36 20 20 c9 20 |6,q%!20)|..l6 . |
|00000920| 38 20 3a f2 6b 65 79 28 | 21 71 25 2c 71 25 21 34 |8 :.key(|!q%,q%!4|
|00000930| 2c 71 25 21 38 2c 71 25 | 21 31 32 2c 71 25 21 31 |,q%!8,q%|!12,q%!1|
|00000940| 36 2c 71 25 21 32 30 2c | 71 25 21 32 34 29 0d 02 |6,q%!20,|q%!24)..|
|00000950| 76 33 20 20 c9 20 39 20 | 3a f2 67 65 74 70 6f 69 |v3 . 9 |:.getpoi|
|00000960| 6e 74 65 72 3a f2 6d 65 | 6e 75 73 65 6c 65 63 74 |nter:.me|nuselect|
|00000970| 28 71 25 29 3a f2 72 65 | 74 61 69 6e 43 68 65 63 |(q%):.re|tainChec|
|00000980| 6b 0d 02 80 1a 20 20 c9 | 20 31 37 2c 31 38 3a f2 |k.... .| 17,18:.|
|00000990| 72 65 63 65 69 76 65 28 | 71 25 29 0d 02 8a 07 20 |receive(|q%).... |
|000009a0| 20 cb 0d 02 94 07 fd 20 | a3 0d 02 9e 05 20 0d 02 | ...... |..... ..|
|000009b0| a8 12 dd 20 f2 72 65 63 | 65 69 76 65 28 71 25 29 |... .rec|eive(q%)|
|000009c0| 0d 02 b2 0e f2 6e 6f 74 | 65 53 63 72 61 70 0d 02 |.....not|eScrap..|
|000009d0| bc 0e c8 8e 20 71 25 21 | 31 36 20 ca 0d 02 c6 11 |.... q%!|16 .....|
|000009e0| c9 20 30 3a f2 66 69 6e | 69 73 68 3a e0 0d 02 d0 |. 0:.fin|ish:....|
|000009f0| 27 c9 20 33 3a f4 20 64 | 61 74 61 20 6c 6f 61 64 |'. 3:. d|ata load|
|00000a00| 65 64 20 66 72 6f 6d 20 | 66 69 6c 65 72 20 76 69 |ed from |filer vi|
|00000a10| 65 77 65 72 0d 02 da 29 | 20 20 e7 20 6d 61 69 6c |ewer...)| . mail|
|00000a20| 6d 65 74 68 6f 64 25 3c | 32 20 84 20 71 25 21 31 |method%<|2 . q%!1|
|00000a30| 32 3c 3e 6d 61 69 6c 72 | 65 66 25 20 8c 0d 02 e4 |2<>mailr|ef% ....|
|00000a40| 23 20 20 20 20 e7 20 71 | 25 21 34 30 3d 34 30 39 |# . q|%!40=409|
|00000a50| 36 20 84 20 71 25 21 34 | 30 3d 38 31 39 32 20 8c |6 . q%!4|0=8192 .|
|00000a60| 0d 02 ee 55 20 20 20 20 | 20 20 f2 72 65 70 6f 72 |...U | .repor|
|00000a70| 74 28 32 30 30 33 2c 22 | 59 6f 75 20 63 61 6e 20 |t(2003,"|You can |
|00000a80| 6f 6e 6c 79 20 73 65 6e | 64 20 66 69 6c 65 73 2c |only sen|d files,|
|00000a90| 20 6e 6f 74 20 64 69 72 | 65 63 74 6f 72 69 65 73 | not dir|ectories|
|00000aa0| 20 6f 72 20 61 70 70 6c | 69 63 61 74 69 6f 6e 73 | or appl|ications|
|00000ab0| 2e 22 29 3a e1 0d 02 f8 | 09 20 20 20 20 cc 0d 03 |."):....|. ...|
|00000ac0| 02 2d 20 20 20 20 20 20 | 66 69 6c 65 6e 61 6d 24 |.- |filenam$|
|00000ad0| 3d a4 72 74 6f 7a 28 71 | 25 2b 34 34 29 3a 6d 61 |=.rtoz(q|%+44):ma|
|00000ae0| 69 6c 6d 65 74 68 6f 64 | 25 3d 31 0d 03 0c 32 20 |ilmethod|%=1...2 |
|00000af0| 20 20 20 20 20 71 25 21 | 31 36 3d 34 3a c8 99 20 | q%!|16=4:.. |
|00000b00| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00000b10| 65 22 2c 31 37 2c 71 25 | 2c 71 25 21 34 0d 03 16 |e",17,q%|,q%!4...|
|00000b20| 18 20 20 20 20 20 20 f2 | 53 74 61 72 74 44 69 61 |. .|StartDia|
|00000b30| 6c 6f 67 75 65 0d 03 20 | 09 20 20 20 20 cd 0d 03 |logue.. |. ...|
|00000b40| 2a 07 20 20 cc 0d 03 34 | 42 20 20 20 20 71 25 21 |*. ...4|B q%!|
|00000b50| 31 36 3d 34 3a 71 25 21 | 31 32 3d 71 25 21 38 3a |16=4:q%!|12=q%!8:|
|00000b60| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|00000b70| 73 61 67 65 22 2c 31 37 | 2c 71 25 2c 6d 61 69 6c |sage",17|,q%,mail|
|00000b80| 73 65 6e 64 65 72 25 0d | 03 3e 19 20 20 20 20 c8 |sender%.|.>. .|
|00000b90| 99 20 54 69 6d 65 25 20 | b8 20 74 69 6d 65 78 25 |. Time% |. timex%|
|00000ba0| 0d 03 48 15 20 20 20 20 | 6d 61 69 6c 6d 65 74 68 |..H. |mailmeth|
|00000bb0| 6f 64 25 3d 33 0d 03 52 | 07 20 20 cd 0d 03 5c 1e |od%=3..R|. ...\.|
|00000bc0| c9 20 31 3a f4 20 61 20 | 64 61 74 61 20 73 61 76 |. 1:. a |data sav|
|00000bd0| 65 20 69 6e 74 6f 20 6d | 65 2e 0d 03 66 34 20 20 |e into m|e...f4 |
|00000be0| 66 69 6c 65 6e 61 6d 24 | 3d 22 3c 61 70 70 6c 69 |filenam$|="<appli|
|00000bf0| 63 61 74 69 6f 6e 20 64 | 61 74 61 3a 22 2b a4 72 |cation d|ata:"+.r|
|00000c00| 74 6f 7a 28 71 25 2b 34 | 34 29 2b 22 3e 22 0d 03 |toz(q%+4|4)+">"..|
|00000c10| 70 32 20 20 6d 61 69 6c | 6d 65 74 68 6f 64 25 3d |p2 mail|method%=|
|00000c20| 32 3a 6d 61 69 6c 73 65 | 6e 64 65 72 25 3d 71 25 |2:mailse|nder%=q%|
|00000c30| 21 34 3a 6d 61 69 6c 72 | 65 66 25 3d 71 25 21 38 |!4:mailr|ef%=q%!8|
|00000c40| 0d 03 7a 15 20 20 e7 20 | 73 63 72 61 70 24 3d 22 |..z. . |scrap$="|
|00000c50| 22 20 8c 20 e1 0d 03 84 | 5b 20 20 24 28 71 25 2b |" . ....|[ $(q%+|
|00000c60| 34 34 29 3d 73 63 72 61 | 70 24 3a 71 25 3f 28 34 |44)=scra|p$:q%?(4|
|00000c70| 34 2b 73 63 72 61 70 43 | 25 29 3d 30 3a 21 71 25 |4+scrapC|%)=0:!q%|
|00000c80| 3d 34 37 2b 73 63 72 61 | 70 43 25 2b 31 80 ac 33 |=47+scra|pC%+1..3|
|00000c90| 3a 71 25 21 31 36 3d 32 | 3a 71 25 21 31 32 3d 6d |:q%!16=2|:q%!12=m|
|00000ca0| 61 69 6c 72 65 66 25 3a | 71 25 21 33 36 3d 2d 31 |ailref%:|q%!36=-1|
|00000cb0| 0d 03 8e 3b 20 20 c8 99 | 20 22 57 69 6d 70 5f 53 |...; ..| "Wimp_S|
|00000cc0| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 71 |endMessa|ge",17,q|
|00000cd0| 25 2c 6d 61 69 6c 73 65 | 6e 64 65 72 25 3a 6d 61 |%,mailse|nder%:ma|
|00000ce0| 69 6c 72 65 66 25 3d 71 | 25 21 38 0d 03 98 19 c9 |ilref%=q|%!8.....|
|00000cf0| 20 26 35 30 32 3a f4 20 | 68 65 6c 70 20 72 65 71 | &502:. |help req|
|00000d00| 75 65 73 74 0d 03 a2 27 | 20 20 71 25 21 31 32 3d |uest...'| q%!12=|
|00000d10| 71 25 21 38 3a 71 25 21 | 31 36 3d 26 35 30 33 3a |q%!8:q%!|16=&503:|
|00000d20| 68 65 6c 70 25 3d 71 25 | 2b 32 30 0d 03 ac 2d 20 |help%=q%|+20...- |
|00000d30| 20 68 65 6c 70 25 3d a4 | 68 65 6c 70 28 71 25 21 | help%=.|help(q%!|
|00000d40| 33 32 2c 71 25 21 33 36 | 2c 68 65 6c 70 25 29 3a |32,q%!36|,help%):|
|00000d50| 3f 68 65 6c 70 25 3d 30 | 0d 03 b6 19 20 20 21 71 |?help%=0|.... !q|
|00000d60| 25 3d 28 68 65 6c 70 25 | 2b 34 2d 71 25 29 80 ac |%=(help%|+4-q%)..|
|00000d70| 33 0d 03 c0 26 20 20 c8 | 99 20 22 57 69 6d 70 5f |3...& .|. "Wimp_|
|00000d80| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00000d90| 71 25 2c 71 25 21 34 0d | 03 ca 39 c9 20 26 34 30 |q%,q%!4.|..9. &40|
|00000da0| 30 43 30 3a f4 20 73 75 | 62 6d 65 6e 75 20 72 65 |0C0:. su|bmenu re|
|00000db0| 71 75 65 73 74 3a 20 63 | 61 6e 20 6f 6e 6c 79 20 |quest: c|an only |
|00000dc0| 61 70 70 6c 79 20 74 6f | 20 63 68 6f 69 63 65 73 |apply to| choices|
|00000dd0| 0d 03 d4 3e 20 20 f2 73 | 74 61 72 74 43 68 6f 69 |...> .s|tartChoi|
|00000de0| 63 65 73 3a c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |ces:.. "|Wimp_Cre|
|00000df0| 61 74 65 53 75 62 4d 65 | 6e 75 22 2c 2c 71 25 21 |ateSubMe|nu",,q%!|
|00000e00| 32 30 2c 71 25 21 32 34 | 2c 71 25 21 32 38 0d 03 |20,q%!24|,q%!28..|
|00000e10| de 05 cb 0d 03 e8 05 e1 | 0d 03 f2 05 20 0d 03 fc |........|.... ...|
|00000e20| 12 dd f2 73 74 61 72 74 | 43 68 6f 69 63 65 73 0d |...start|Choices.|
|00000e30| 04 06 42 20 f2 66 69 6c | 6c 49 6e 43 68 6f 69 63 |..B .fil|lInChoic|
|00000e40| 65 73 3a 6e 65 77 42 6f | 6e 67 3d 62 6f 6e 67 3a |es:newBo|ng=bong:|
|00000e50| f2 73 65 74 4f 70 74 28 | 63 68 6f 69 63 65 73 77 |.setOpt(|choicesw|
|00000e60| 69 6e 64 6f 77 25 2c 36 | 2c 6e 65 77 42 6f 6e 67 |indow%,6|,newBong|
|00000e70| 29 0d 04 10 05 e1 0d 04 | 1a 05 20 0d 04 24 14 dd |).......|.. ..$..|
|00000e80| 20 f2 53 74 61 72 74 44 | 69 61 6c 6f 67 75 65 0d | .StartD|ialogue.|
|00000e90| 04 2e 10 f2 65 6e 64 44 | 69 61 6c 6f 67 75 65 0d |....endD|ialogue.|
|00000ea0| 04 38 83 e7 20 73 63 72 | 61 70 24 3d 22 22 8c f2 |.8.. scr|ap$=""..|
|00000eb0| 72 65 70 6f 72 74 28 32 | 30 30 35 2c 22 59 6f 75 |report(2|005,"You|
|00000ec0| 20 6d 75 73 74 20 73 65 | 74 20 75 70 20 61 20 63 | must se|t up a c|
|00000ed0| 75 72 72 65 6e 74 20 6f | 72 20 73 63 72 61 70 20 |urrent o|r scrap |
|00000ee0| 6d 61 69 6c 20 66 69 6c | 65 20 6e 61 6d 65 20 62 |mail fil|e name b|
|00000ef0| 65 66 6f 72 65 20 79 6f | 75 20 63 61 6e 20 73 65 |efore yo|u can se|
|00000f00| 6e 64 20 61 20 66 69 6c | 65 20 66 72 6f 6d 20 61 |nd a fil|e from a|
|00000f10| 6e 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 2e 22 29 |n applic|ation.")|
|00000f20| 3a e1 0d 04 42 21 66 72 | 6f 6d 6e 61 6d 24 3d a4 |:...B!fr|omnam$=.|
|00000f30| 72 74 6f 7a 28 63 68 6f | 69 63 65 25 28 6e 61 6d |rtoz(cho|ice%(nam|
|00000f40| 65 29 29 0d 04 4c 12 24 | 6d 61 69 6c 49 63 6f 6e |e))..L.$|mailIcon|
|00000f50| 73 25 3d bd 30 0d 04 56 | 18 24 28 6d 61 69 6c 49 |s%=.0..V|.$(mailI|
|00000f60| 63 6f 6e 73 25 2b 31 30 | 30 29 3d bd 30 0d 04 60 |cons%+10|0)=.0..`|
|00000f70| 18 24 28 6d 61 69 6c 49 | 63 6f 6e 73 25 2b 32 30 |.$(mailI|cons%+20|
|00000f80| 30 29 3d bd 30 0d 04 6a | 21 24 28 6d 61 69 6c 49 |0)=.0..j|!$(mailI|
|00000f90| 63 6f 6e 73 25 2b 33 30 | 30 29 3d 66 72 6f 6d 6e |cons%+30|0)=fromn|
|00000fa0| 61 6d 24 2b bd 30 0d 04 | 74 21 24 28 6d 61 69 6c |am$+.0..|t!$(mail|
|00000fb0| 49 63 6f 6e 73 25 2b 34 | 30 30 29 3d 66 69 6c 65 |Icons%+4|00)=file|
|00000fc0| 6e 61 6d 24 2b bd 30 0d | 04 7e 32 f2 67 65 74 70 |nam$+.0.|.~2.getp|
|00000fd0| 6f 69 6e 74 65 72 3a f2 | 70 6f 70 75 70 28 6d 61 |ointer:.|popup(ma|
|00000fe0| 69 6c 74 6f 25 29 3a 64 | 69 61 6c 6f 67 75 65 53 |ilto%):d|ialogueS|
|00000ff0| 74 61 72 74 65 64 25 3d | b9 0d 04 88 32 c8 99 22 |tarted%=|....2.."|
|00001000| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00001010| 69 74 69 6f 6e 22 2c 6d | 61 69 6c 74 6f 25 2c 30 |ition",m|ailto%,0|
|00001020| 2c 30 2c 2d 31 2c 2d 31 | 2c 2d 31 0d 04 92 05 e1 |,0,-1,-1|,-1.....|
|00001030| 0d 04 9c 05 20 0d 04 a6 | 11 dd f2 65 6e 64 44 69 |.... ...|...endDi|
|00001040| 61 6c 6f 67 75 65 0d 04 | b0 51 20 e7 20 64 69 61 |alogue..|.Q . dia|
|00001050| 6c 6f 67 75 65 53 74 61 | 72 74 65 64 25 20 8c 20 |logueSta|rted% . |
|00001060| f2 63 6c 6f 73 65 5f 77 | 69 6e 64 6f 77 28 6d 61 |.close_w|indow(ma|
|00001070| 69 6c 74 6f 25 29 3a 6d | 61 69 6c 6d 65 74 68 6f |ilto%):m|ailmetho|
|00001080| 64 25 3d 30 3a 64 69 61 | 6c 6f 67 75 65 53 74 61 |d%=0:dia|logueSta|
|00001090| 72 74 65 64 25 3d a3 0d | 04 ba 05 e1 0d 04 c4 05 |rted%=..|........|
|000010a0| 20 0d 04 ce 0f dd 20 a4 | 72 74 6f 7a 28 73 25 29 | ..... .|rtoz(s%)|
|000010b0| 0d 04 d8 08 ea 20 6e 24 | 0d 04 e2 1a c8 95 3f 73 |..... n$|......?s|
|000010c0| 25 3a 6e 24 2b 3d bd 3f | 73 25 3a 73 25 2b 3d 31 |%:n$+=.?|s%:s%+=1|
|000010d0| 3a ce 0d 04 ec 07 3d 6e | 24 0d 04 f6 05 20 0d 05 |:.....=n|$.... ..|
|000010e0| 00 3e dd 20 f2 6b 65 79 | 28 68 61 6e 64 6c 65 25 |.>. .key|(handle%|
|000010f0| 2c 69 63 6f 6e 25 2c 78 | 63 6f 66 66 25 2c 79 63 |,icon%,x|coff%,yc|
|00001100| 6f 66 66 25 2c 63 61 72 | 65 74 68 25 2c 63 61 72 |off%,car|eth%,car|
|00001110| 65 74 69 6e 64 78 25 2c | 63 68 25 29 0d 05 0a 17 |etindx%,|ch%)....|
|00001120| e7 20 68 61 6e 64 6c 65 | 25 3d 6d 61 69 6c 74 6f |. handle|%=mailto|
|00001130| 25 20 8c 0d 05 14 19 20 | e7 20 63 68 25 3d 31 33 |% ..... |. ch%=13|
|00001140| 20 80 20 69 63 6f 6e 25 | 3e 31 20 8c 0d 05 1e 22 | . icon%|>1 ...."|
|00001150| 20 20 f2 6d 61 69 6c 3a | e7 20 72 65 6d 6f 76 65 | .mail:|. remove|
|00001160| 25 20 f2 65 6e 64 44 69 | 61 6c 6f 67 75 65 0d 05 |% .endDi|alogue..|
|00001170| 28 06 20 cc 0d 05 32 23 | 20 20 f2 64 6f 4b 65 79 |(. ...2#| .doKey|
|00001180| 28 63 68 25 2c 6d 61 69 | 6c 74 6f 25 2c 69 63 6f |(ch%,mai|lto%,ico|
|00001190| 6e 25 2c 34 2c 30 29 0d | 05 3c 08 20 cd 3a e1 0d |n%,4,0).|.<. .:..|
|000011a0| 05 46 05 cd 0d 05 50 1e | e7 20 68 61 6e 64 6c 65 |.F....P.|. handle|
|000011b0| 25 3d 63 68 6f 69 63 65 | 73 77 69 6e 64 6f 77 25 |%=choice|swindow%|
|000011c0| 20 8c 0d 05 5a 2f 20 e7 | 20 63 68 25 3d 31 33 20 | ...Z/ .| ch%=13 |
|000011d0| 80 20 69 63 6f 6e 25 3d | 35 20 f2 72 65 67 69 73 |. icon%=|5 .regis|
|000011e0| 74 65 72 43 68 6f 69 63 | 65 73 28 b9 2c a3 29 3a |terChoic|es(.,.):|
|000011f0| e1 0d 05 64 29 20 f2 64 | 6f 4b 65 79 28 63 68 25 |...d) .d|oKey(ch%|
|00001200| 2c 63 68 6f 69 63 65 73 | 77 69 6e 64 6f 77 25 2c |,choices|window%,|
|00001210| 69 63 6f 6e 25 2c 35 2c | 32 29 0d 05 6e 05 cd 0d |icon%,5,|2)..n...|
|00001220| 05 78 05 e1 0d 05 82 05 | 20 0d 05 8c 30 dd f2 64 |.x......| ...0..d|
|00001230| 6f 4b 65 79 28 63 68 25 | 2c 77 69 6e 64 6f 77 25 |oKey(ch%|,window%|
|00001240| 2c 69 63 6f 6e 25 2c 6d | 61 78 69 63 6f 6e 25 2c |,icon%,m|axicon%,|
|00001250| 6d 69 6e 69 63 6f 6e 25 | 29 0d 05 96 0d 20 c8 8e |minicon%|).... ..|
|00001260| 20 63 68 25 20 ca 0d 05 | a0 0c 20 20 20 c9 20 31 | ch% ...|.. . 1|
|00001270| 33 3a 0d 05 aa 35 20 20 | 20 20 20 69 63 6f 6e 25 |3:...5 | icon%|
|00001280| 3d 69 63 6f 6e 25 2b 31 | 3a e7 69 63 6f 6e 25 3e |=icon%+1|:.icon%>|
|00001290| 6d 61 78 69 63 6f 6e 25 | 20 69 63 6f 6e 25 3d 6d |maxicon%| icon%=m|
|000012a0| 69 6e 69 63 6f 6e 25 0d | 05 b4 2c 20 20 20 20 20 |inicon%.|.., |
|000012b0| f2 73 65 74 43 61 72 65 | 74 28 77 69 6e 64 6f 77 |.setCare|t(window|
|000012c0| 25 2c 69 63 6f 6e 25 2c | 63 61 72 65 74 69 6e 64 |%,icon%,|caretind|
|000012d0| 78 25 29 0d 05 be 19 20 | 20 20 c9 20 32 37 3a 20 |x%).... | . 27: |
|000012e0| f2 65 6e 64 44 69 61 6c | 6f 67 75 65 0d 05 c8 3a |.endDial|ogue...:|
|000012f0| 20 20 20 c9 20 26 31 38 | 45 3a 69 63 6f 6e 25 3d | . &18|E:icon%=|
|00001300| 69 63 6f 6e 25 2b 31 3a | e7 69 63 6f 6e 25 3e 6d |icon%+1:|.icon%>m|
|00001310| 61 78 69 63 6f 6e 25 20 | 69 63 6f 6e 25 3d 6d 69 |axicon% |icon%=mi|
|00001320| 6e 69 63 6f 6e 25 0d 05 | d2 2c 20 20 20 20 20 f2 |nicon%..|., .|
|00001330| 73 65 74 43 61 72 65 74 | 28 77 69 6e 64 6f 77 25 |setCaret|(window%|
|00001340| 2c 69 63 6f 6e 25 2c 63 | 61 72 65 74 69 6e 64 78 |,icon%,c|aretindx|
|00001350| 25 29 0d 05 dc 3a 20 20 | 20 c9 20 26 31 38 46 3a |%)...: | . &18F:|
|00001360| 69 63 6f 6e 25 3d 69 63 | 6f 6e 25 2d 31 3a e7 69 |icon%=ic|on%-1:.i|
|00001370| 63 6f 6e 25 3c 6d 69 6e | 69 63 6f 6e 25 20 69 63 |con%<min|icon% ic|
|00001380| 6f 6e 25 3d 6d 61 78 69 | 63 6f 6e 25 0d 05 e6 2c |on%=maxi|con%...,|
|00001390| 20 20 20 20 20 f2 73 65 | 74 43 61 72 65 74 28 77 | .se|tCaret(w|
|000013a0| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 63 61 72 |indow%,i|con%,car|
|000013b0| 65 74 69 6e 64 78 25 29 | 0d 05 f0 21 20 20 20 7f |etindx%)|...! .|
|000013c0| 20 c8 99 20 22 57 69 6d | 70 5f 50 72 6f 63 65 73 | .. "Wim|p_Proces|
|000013d0| 73 4b 65 79 22 2c 63 68 | 25 0d 05 fa 06 20 cb 0d |sKey",ch|%.... ..|
|000013e0| 06 04 05 e1 0d 06 0e 05 | 20 0d 06 18 28 dd f2 73 |........| ...(..s|
|000013f0| 65 74 43 61 72 65 74 28 | 77 69 6e 64 6f 77 25 2c |etCaret(|window%,|
|00001400| 69 63 6f 6e 25 2c 63 61 | 72 65 74 69 6e 64 78 25 |icon%,ca|retindx%|
|00001410| 29 0d 06 22 0e 20 ea 20 | 6c 65 6e 67 74 68 25 0d |)..". . |length%.|
|00001420| 06 2c 2e 20 69 63 6f 6e | 49 6e 66 6f 25 21 30 20 |.,. icon|Info%!0 |
|00001430| 3d 20 77 69 6e 64 6f 77 | 25 3a 69 63 6f 6e 49 6e |= window|%:iconIn|
|00001440| 66 6f 25 21 34 20 3d 20 | 69 63 6f 6e 25 0d 06 36 |fo%!4 = |icon%..6|
|00001450| 23 20 c8 99 20 57 69 6d | 70 5f 47 65 74 49 63 6f |# .. Wim|p_GetIco|
|00001460| 6e 49 6e 66 6f 2c 2c 69 | 63 6f 6e 49 6e 66 6f 25 |nInfo,,i|conInfo%|
|00001470| 0d 06 40 26 20 6c 65 6e | 67 74 68 25 3d a4 62 75 |..@& len|gth%=.bu|
|00001480| 66 66 4c 65 6e 67 74 68 | 28 69 63 6f 6e 49 6e 66 |ffLength|(iconInf|
|00001490| 6f 25 21 32 38 29 0d 06 | 4a 2c 20 e7 20 63 61 72 |o%!28)..|J, . car|
|000014a0| 65 74 69 6e 64 78 25 3e | 6c 65 6e 67 74 68 25 20 |etindx%>|length% |
|000014b0| 63 61 72 65 74 69 6e 64 | 78 25 3d 6c 65 6e 67 74 |caretind|x%=lengt|
|000014c0| 68 25 0d 06 54 3f 20 c8 | 99 22 57 69 6d 70 5f 53 |h%..T? .|."Wimp_S|
|000014d0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|000014e0| 2c 77 69 6e 64 6f 77 25 | 2c 69 63 6f 6e 25 2c 30 |,window%|,icon%,0|
|000014f0| 2c 2d 31 2c 2d 31 2c 63 | 61 72 65 74 69 6e 64 78 |,-1,-1,c|aretindx|
|00001500| 25 0d 06 5e 05 e1 0d 06 | 68 05 20 0d 06 72 0b dd |%..^....|h. ..r..|
|00001510| 20 f2 6d 61 69 6c 0d 06 | 7c 23 72 65 6d 6f 76 65 | .mail..||#remove|
|00001520| 25 3d b9 3a f2 72 65 67 | 69 73 74 65 72 43 68 6f |%=.:.reg|isterCho|
|00001530| 69 63 65 73 28 a3 2c a3 | 29 0d 06 86 1d 74 6f 6e |ices(.,.|)....ton|
|00001540| 61 6d 65 24 3d a4 72 74 | 6f 7a 28 6d 61 69 6c 49 |ame$=.rt|oz(mailI|
|00001550| 63 6f 6e 73 25 29 0d 06 | 90 1d 63 63 24 3d a4 72 |cons%)..|..cc$=.r|
|00001560| 74 6f 7a 28 6d 61 69 6c | 49 63 6f 6e 73 25 2b 31 |toz(mail|Icons%+1|
|00001570| 30 30 29 0d 06 9a 22 73 | 75 62 6a 65 63 74 24 3d |00)..."s|ubject$=|
|00001580| a4 72 74 6f 7a 28 6d 61 | 69 6c 49 63 6f 6e 73 25 |.rtoz(ma|ilIcons%|
|00001590| 2b 32 30 30 29 0d 06 a4 | 42 64 75 6d 6d 79 25 3d |+200)...|Bdummy%=|
|000015a0| a4 74 6f 43 74 72 6c 28 | 6d 61 69 6c 49 63 6f 6e |.toCtrl(|mailIcon|
|000015b0| 73 25 2b 33 30 30 2c 62 | 75 66 66 65 72 25 29 3a |s%+300,b|uffer%):|
|000015c0| 66 72 6f 6d 6e 61 6d 24 | 3d a4 72 74 6f 7a 28 62 |fromnam$|=.rtoz(b|
|000015d0| 75 66 66 65 72 25 29 0d | 06 ae 22 66 69 6c 65 6e |uffer%).|.."filen|
|000015e0| 61 6d 24 3d a4 72 74 6f | 7a 28 6d 61 69 6c 49 63 |am$=.rto|z(mailIc|
|000015f0| 6f 6e 73 25 2b 34 30 30 | 29 0d 06 b8 24 e7 a9 28 |ons%+400|)...$..(|
|00001600| 74 6f 6e 61 6d 65 24 2b | 63 63 24 29 3c 34 20 ef |toname$+|cc$)<4 .|
|00001610| 37 3a 72 65 6d 6f 76 65 | 25 3d a3 3a e1 0d 06 c2 |7:remove|%=.:....|
|00001620| 23 66 25 3d 30 3a 68 25 | 3d 30 3a ee 85 20 ea 20 |#f%=0:h%|=0:.. . |
|00001630| d9 23 66 25 3a f2 65 72 | 72 6f 72 62 6f 78 3a e1 |.#f%:.er|rorbox:.|
|00001640| 0d 06 cc 2e e7 97 66 69 | 6c 65 6e 61 6d 24 3d 97 |......fi|lenam$=.|
|00001650| 22 3c 22 8c 20 66 25 3d | 8e 73 63 72 61 70 24 20 |"<". f%=|.scrap$ |
|00001660| 8b 20 66 25 3d 8e 66 69 | 6c 65 6e 61 6d 24 0d 06 |. f%=.fi|lenam$..|
|00001670| d6 18 e7 66 25 3d 30 20 | ef 37 3a 72 65 6d 6f 76 |...f%=0 |.7:remov|
|00001680| 65 25 3d a3 3a e1 0d 06 | e0 05 cd 0d 06 ea 07 ea |e%=.:...|........|
|00001690| 20 85 0d 06 f4 21 6d 61 | 69 6c 24 3d 66 6e 61 6d | ....!ma|il$=fnam|
|000016a0| 65 24 2b 22 24 2e 4d 61 | 69 6c 2e 50 6f 73 74 42 |e$+"$.Ma|il.PostB|
|000016b0| 6f 78 22 0d 06 fe 1d c8 | 99 20 22 4f 53 5f 46 69 |ox".....|. "OS_Fi|
|000016c0| 6c 65 22 2c 35 2c 6d 61 | 69 6c 24 20 b8 20 72 30 |le",5,ma|il$ . r0|
|000016d0| 0d 07 08 0c e7 20 72 30 | 3d 32 20 8c 0d 07 12 16 |..... r0|=2 .....|
|000016e0| 20 20 62 6f 78 25 3d 2d | 31 3a f5 62 6f 78 25 2b | box%=-|1:.box%+|
|000016f0| 3d 31 0d 07 1c 48 20 20 | ee 85 20 ea 20 fd 20 62 |=1...H |.. . . b|
|00001700| 6f 78 25 3e 39 3a f7 20 | 85 3a d9 23 66 25 3a d9 |ox%>9:. |.:.#f%:.|
|00001710| 23 68 25 3a f2 72 65 70 | 6f 72 74 28 32 30 30 31 |#h%:.rep|ort(2001|
|00001720| 2c 22 43 61 6e 27 74 20 | 6f 70 65 6e 20 70 6f 73 |,"Can't |open pos|
|00001730| 74 20 62 6f 78 2e 22 29 | 3a e1 0d 07 26 27 20 20 |t box.")|:...&' |
|00001740| 68 25 3d ad 28 6d 61 69 | 6c 24 2b 22 2e 22 2b c2 |h%=.(mai|l$+"."+.|
|00001750| c3 28 62 6f 78 25 2b 31 | 30 30 30 30 29 2c 32 29 |.(box%+1|0000),2)|
|00001760| 29 0d 07 30 1e 20 20 e7 | 68 25 3e 30 20 e7 a2 23 |)..0. .|h%>0 ..#|
|00001770| 68 25 3c 3e 30 20 d9 23 | 68 25 3a 68 25 3d 30 0d |h%<>0 .#|h%:h%=0.|
|00001780| 07 3a 15 20 20 fd 68 25 | 3c 3e 30 20 84 20 62 6f |.:. .h%|<>0 . bo|
|00001790| 78 25 3e 39 0d 07 44 3b | 20 20 e7 68 25 3d 30 20 |x%>9..D;| .h%=0 |
|000017a0| f7 20 85 3a d9 23 66 25 | 3a f2 72 65 70 6f 72 74 |. .:.#f%|:.report|
|000017b0| 28 32 30 30 31 2c 22 41 | 6c 6c 20 70 6f 73 74 20 |(2001,"A|ll post |
|000017c0| 62 6f 78 65 73 20 66 75 | 6c 6c 2e 22 29 3a e1 0d |boxes fu|ll."):..|
|000017d0| 07 4e 0c 20 20 6d 61 69 | 6c 3d 33 0d 07 58 05 cc |.N. mai|l=3..X..|
|000017e0| 0d 07 62 2e 20 20 6d 61 | 69 6c 24 3d 66 6e 61 6d |..b. ma|il$=fnam|
|000017f0| 65 24 2b 22 24 2e 22 2b | 74 6f 6e 61 6d 65 24 2b |e$+"$."+|toname$+|
|00001800| 22 2e 4d 61 69 6c 2e 49 | 6e 74 72 61 79 22 0d 07 |".Mail.I|ntray"..|
|00001810| 6c 52 20 20 ee 85 20 ea | 20 f7 20 85 3a d9 23 66 |lR .. .| . .:.#f|
|00001820| 25 3a d9 23 68 25 3a f2 | 72 65 70 6f 72 74 28 32 |%:.#h%:.|report(2|
|00001830| 30 30 32 2c 22 43 61 6e | 27 74 20 6f 70 65 6e 20 |002,"Can|'t open |
|00001840| 27 22 2b 6d 61 69 6c 24 | 2b 22 27 20 66 6f 72 20 |'"+mail$|+"' for |
|00001850| 64 69 72 65 63 74 20 6d | 61 69 6c 2e 22 29 3a e1 |direct m|ail."):.|
|00001860| 0d 07 76 0f 20 20 68 25 | 3d ad 6d 61 69 6c 24 0d |..v. h%|=.mail$.|
|00001870| 07 80 51 20 20 e7 68 25 | 3d 30 20 8c 20 d9 23 66 |..Q .h%|=0 . .#f|
|00001880| 25 3a f2 72 65 70 6f 72 | 74 28 32 30 30 32 2c 22 |%:.repor|t(2002,"|
|00001890| 43 61 6e 27 74 20 6d 61 | 69 6c 20 28 64 6f 65 73 |Can't ma|il (does|
|000018a0| 20 64 65 73 74 69 6e 61 | 74 69 6f 6e 20 69 6e 74 | destina|tion int|
|000018b0| 72 61 79 20 65 78 69 73 | 74 3f 29 2e 22 29 3a e1 |ray exis|t?)."):.|
|000018c0| 0d 07 8a 0f 20 20 cf 23 | 68 25 3d a2 23 68 25 0d |.... .#|h%=.#h%.|
|000018d0| 07 94 0c 20 20 6d 61 69 | 6c 3d 30 0d 07 9e 05 cd |... mai|l=0.....|
|000018e0| 0d 07 a8 22 ee 85 20 ea | 20 f7 20 85 3a d9 23 66 |...".. .| . .:.#f|
|000018f0| 25 3a d9 23 68 25 3a f2 | 65 72 72 6f 72 62 6f 78 |%:.#h%:.|errorbox|
|00001900| 3a e1 0d 07 b2 0e e7 20 | 6d 61 69 6c 3d 33 20 8c |:...... |mail=3 .|
|00001910| 0d 07 bc 1d d5 23 68 25 | 2c bd 31 30 2b 22 53 6f |.....#h%|,.10+"So|
|00001920| 6e 4f 66 45 63 6f 6d 61 | 69 6c 20 33 22 0d 07 c6 |nOfEcoma|il 3"...|
|00001930| 21 e7 a9 74 6f 6e 61 6d | 65 24 20 d5 23 68 25 2c |!..tonam|e$ .#h%,|
|00001940| 22 54 6f 3a 20 22 2b 74 | 6f 6e 61 6d 65 24 0d 07 |"To: "+t|oname$..|
|00001950| d0 19 e7 a9 63 63 24 20 | d5 23 68 25 2c 22 43 43 |....cc$ |.#h%,"CC|
|00001960| 3a 20 22 2b 63 63 24 0d | 07 da 05 cd 0d 07 e4 28 |: "+cc$.|.......(|
|00001970| e7 a9 73 75 62 6a 65 63 | 74 24 20 d5 23 68 25 2c |..subjec|t$ .#h%,|
|00001980| 22 53 75 62 6a 65 63 74 | 3a 20 22 2b 73 75 62 6a |"Subject|: "+subj|
|00001990| 65 63 74 24 0d 07 ee 22 | 6d 74 69 6d 65 24 3d 91 |ect$..."|mtime$=.|
|000019a0| 24 3a d5 23 68 25 2c 22 | 44 61 74 65 3a 20 22 2b |$:.#h%,"|Date: "+|
|000019b0| 6d 74 69 6d 65 24 0d 07 | f8 1a d5 23 68 25 2c 22 |mtime$..|...#h%,"|
|000019c0| 46 72 6f 6d 3a 20 22 2b | 66 72 6f 6d 6e 61 6d 24 |From: "+|fromnam$|
|000019d0| 0d 08 02 0a e7 61 63 6b | 20 8c 0d 08 0c 2e 20 20 |.....ack| ..... |
|000019e0| 61 24 3d 66 72 6f 6d 6e | 61 6d 24 3a 41 25 3d a7 |a$=fromn|am$:A%=.|
|000019f0| 61 24 2c bd 31 33 29 3a | e7 41 25 20 61 24 3d c0 |a$,.13):|.A% a$=.|
|00001a00| 61 24 2c 41 25 2d 31 29 | 0d 08 16 23 20 20 d5 23 |a$,A%-1)|...# .#|
|00001a10| 68 25 2c 22 52 65 74 75 | 72 6e 2d 52 65 63 65 69 |h%,"Retu|rn-Recei|
|00001a20| 70 74 2d 54 6f 3a 20 22 | 2b 61 24 0d 08 20 05 cd |pt-To: "|+a$.. ..|
|00001a30| 0d 08 2a 0b d5 23 68 25 | 2c 22 22 0d 08 34 11 f2 |..*..#h%|,""..4..|
|00001a40| 66 63 6f 70 79 28 66 25 | 2c 68 25 29 0d 08 3e 0b |fcopy(f%|,h%)..>.|
|00001a50| d5 23 68 25 2c 22 22 0d | 08 48 14 d9 23 68 25 3a |.#h%,"".|.H..#h%:|
|00001a60| 68 25 3d 30 3a cf 23 66 | 25 3d 30 0d 08 52 1d 43 |h%=0:.#f|%=0..R.C|
|00001a70| 25 3d a4 72 65 61 64 56 | 61 72 28 6c 6f 67 66 69 |%=.readV|ar(logfi|
|00001a80| 6c 65 2c 30 2c 2d 31 29 | 0d 08 5c 0b e7 43 25 3c |le,0,-1)|..\..C%<|
|00001a90| 30 20 8c 0d 08 66 1a 20 | 20 68 25 3d ad 22 3c 4d |0 ...f. | h%=."<M|
|00001aa0| 61 69 6c 24 4c 6f 67 46 | 69 6c 65 3e 22 0d 08 70 |ail$LogF|ile>"..p|
|00001ab0| 2c 20 20 e7 68 25 3d 30 | 20 68 25 3d ae 22 3c 4d |, .h%=0| h%=."<M|
|00001ac0| 61 69 6c 24 4c 6f 67 46 | 69 6c 65 3e 22 20 8b 20 |ail$LogF|ile>" . |
|00001ad0| cf 23 68 25 3d a2 23 68 | 25 0d 08 7a 18 20 20 d5 |.#h%=.#h|%..z. .|
|00001ae0| 23 68 25 2c c4 33 39 2c | 22 2d 2b 22 29 2b 22 2d |#h%,.39,|"-+")+"-|
|00001af0| 22 0d 08 84 35 20 20 d5 | 23 68 25 2c 22 41 74 20 |"...5 .|#h%,"At |
|00001b00| 22 2b 6d 74 69 6d 65 24 | 2b 22 20 6d 61 69 6c 20 |"+mtime$|+" mail |
|00001b10| 77 61 73 20 73 65 6e 74 | 20 74 6f 20 22 2b 74 6f |was sent| to "+to|
|00001b20| 6e 61 6d 65 24 3b 0d 08 | 8e 31 20 20 e7 a9 63 63 |name$;..|.1 ..cc|
|00001b30| 24 20 d5 23 68 25 2c bd | 31 30 2b 22 61 6e 64 20 |$ .#h%,.|10+"and |
|00001b40| 63 63 27 64 20 74 6f 20 | 22 2b 63 63 24 20 8b 20 |cc'd to |"+cc$ . |
|00001b50| d5 23 68 25 2c 31 30 0d | 08 98 27 20 20 e7 a9 73 |.#h%,10.|..' ..s|
|00001b60| 75 62 6a 65 63 74 24 20 | d5 23 68 25 2c 22 41 62 |ubject$ |.#h%,"Ab|
|00001b70| 6f 75 74 20 22 2b 73 75 | 62 6a 65 63 74 24 0d 08 |out "+su|bject$..|
|00001b80| a2 31 20 20 e7 61 63 6b | 20 d5 23 68 25 2c 22 41 |.1 .ack| .#h%,"A|
|00001b90| 63 6b 6e 6f 77 6c 65 64 | 67 65 20 72 65 63 65 69 |cknowled|ge recei|
|00001ba0| 70 74 20 6f 66 20 73 75 | 62 6a 65 63 74 2e 22 0d |pt of su|bject.".|
|00001bb0| 08 ac 4f 20 20 e7 c0 66 | 69 6c 65 6e 61 6d 24 2c |..O ..f|ilenam$,|
|00001bc0| 31 29 3d 22 3c 22 20 d5 | 23 68 25 2c 22 54 65 78 |1)="<" .|#h%,"Tex|
|00001bd0| 74 3a 22 3a f2 66 63 6f | 70 79 28 66 25 2c 68 25 |t:":.fco|py(f%,h%|
|00001be0| 29 20 8b 20 d5 23 68 25 | 2c 22 46 72 6f 6d 20 66 |) . .#h%|,"From f|
|00001bf0| 69 6c 65 20 22 2b 66 69 | 6c 65 6e 61 6d 24 0d 08 |ile "+fi|lenam$..|
|00001c00| b6 1c 20 20 d5 23 68 25 | 2c bd 31 30 2b c4 33 39 |.. .#h%|,.10+.39|
|00001c10| 2c 22 2b 2d 22 29 2b 22 | 2b 22 0d 08 c0 0a 20 20 |,"+-")+"|+".... |
|00001c20| d9 23 68 25 0d 08 ca 05 | cd 0d 08 d4 08 d9 23 66 |.#h%....|......#f|
|00001c30| 25 0d 08 de 05 e1 0d 08 | e8 05 20 0d 08 f2 13 dd |%.......|.. .....|
|00001c40| 20 f2 66 63 6f 70 79 28 | 66 25 2c 74 25 29 0d 08 | .fcopy(|f%,t%)..|
|00001c50| fc 0d e7 a2 23 66 25 3d | 30 20 e1 0d 09 06 0e 73 |....#f%=|0 .....s|
|00001c60| 74 61 72 74 25 3d 30 3a | f5 0d 09 10 24 c8 99 67 |tart%=0:|....$..g|
|00001c70| 70 25 2c 34 2c 66 25 2c | 62 75 66 66 65 72 25 2c |p%,4,f%,|buffer%,|
|00001c80| 26 32 30 30 20 b8 20 2c | 2c 2c 72 33 25 0d 09 1a |&200 . ,|,,r3%...|
|00001c90| 2a e7 72 33 25 3c 3e 26 | 32 30 30 20 c8 99 67 70 |*.r3%<>&|200 ..gp|
|00001ca0| 25 2c 32 2c 68 25 2c 62 | 75 66 66 65 72 25 2c 26 |%,2,h%,b|uffer%,&|
|00001cb0| 32 30 30 2d 72 33 25 0d | 09 24 14 73 74 61 72 74 |200-r3%.|.$.start|
|00001cc0| 25 2b 3d 26 32 30 30 2d | 72 33 25 0d 09 2e 11 fd |%+=&200-|r3%.....|
|00001cd0| 73 74 61 72 74 25 3e 3d | a2 23 66 25 0d 09 38 05 |start%>=|.#f%..8.|
|00001ce0| e1 0d 09 42 05 20 0d 09 | 4c 37 dd 20 f2 63 68 65 |...B. ..|L7. .che|
|00001cf0| 63 6b 6d 6f 75 73 65 28 | 6d 6f 75 73 65 78 25 2c |ckmouse(|mousex%,|
|00001d00| 6d 6f 75 73 65 79 25 2c | 62 25 2c 68 61 6e 64 6c |mousey%,|b%,handl|
|00001d10| 65 25 2c 69 63 6f 6e 25 | 2c 6f 62 25 29 0d 09 56 |e%,icon%|,ob%)..V|
|00001d20| 0c e7 28 62 25 80 32 29 | 8c 0d 09 60 12 20 20 f2 |..(b%.2)|...`. .|
|00001d30| 65 6e 64 44 69 61 6c 6f | 67 75 65 0d 09 6a 12 20 |endDialo|gue..j. |
|00001d40| 20 c8 8e 20 68 61 6e 64 | 6c 65 25 20 ca 0d 09 74 | .. hand|le% ...t|
|00001d50| 50 20 20 c9 20 2d 32 3a | 20 f2 64 6f 6d 65 6e 75 |P . -2:| .domenu|
|00001d60| 28 31 30 31 2c 22 3e 49 | 6e 66 6f 2c 46 65 74 63 |(101,">I|nfo,Fetc|
|00001d70| 68 20 4d 61 69 6c 2c 3c | 53 65 74 20 75 70 2c 53 |h Mail,<|Set up,S|
|00001d80| 61 76 65 20 63 68 6f 69 | 63 65 73 2c 51 75 69 74 |ave choi|ces,Quit|
|00001d90| 22 2c 22 4d 61 69 6c 20 | 4d 61 6e 22 29 0d 09 7e |","Mail |Man")..~|
|00001da0| 07 20 20 cb 0d 09 88 05 | cd 0d 09 92 0c e7 28 62 |. .....|......(b|
|00001db0| 25 80 35 29 8c 0d 09 9c | 12 20 20 c8 8e 20 68 61 |%.5)....|. .. ha|
|00001dc0| 6e 64 6c 65 25 20 ca 0d | 09 a6 24 20 20 c9 20 2d |ndle% ..|..$ . -|
|00001dd0| 32 3a 20 f2 6d 65 6e 75 | 73 65 6c 67 6f 28 22 46 |2: .menu|selgo("F|
|00001de0| 65 74 63 68 20 4d 61 69 | 6c 22 29 0d 09 b0 3b 20 |etch Mai|l")...; |
|00001df0| 20 c9 20 6d 61 69 6c 74 | 6f 25 3a 20 e7 69 63 6f | . mailt|o%: .ico|
|00001e00| 6e 25 3d 31 31 20 61 63 | 6b 3d ac 61 63 6b 3a f2 |n%=11 ac|k=.ack:.|
|00001e10| 73 65 74 4f 70 74 28 6d | 61 69 6c 74 6f 25 2c 31 |setOpt(m|ailto%,1|
|00001e20| 31 2c 61 63 6b 29 0d 09 | ba 16 20 20 c9 20 63 68 |1,ack)..|.. . ch|
|00001e30| 6f 69 63 65 73 77 69 6e | 64 6f 77 25 0d 09 c4 11 |oiceswin|dow%....|
|00001e40| 20 20 20 c8 8e 20 69 63 | 6f 6e 25 20 ca 0d 09 ce | .. ic|on% ....|
|00001e50| 2a 20 20 20 20 c9 20 30 | 3a 20 f2 72 65 67 69 73 |* . 0|: .regis|
|00001e60| 74 65 72 43 68 6f 69 63 | 65 73 28 b9 2c 20 28 62 |terChoic|es(., (b|
|00001e70| 25 80 31 29 3d 31 29 0d | 09 d8 34 20 20 20 20 c9 |%.1)=1).|..4 .|
|00001e80| 20 31 3a 20 e7 20 62 25 | 80 31 20 8c 20 f2 72 65 | 1: . b%|.1 . .re|
|00001e90| 64 72 61 77 43 68 6f 69 | 63 65 73 20 8b 20 c8 99 |drawChoi|ces . ..|
|00001ea0| 20 43 72 4d 65 6e 75 2c | 2c 2d 31 0d 09 e2 3f 20 | CrMenu,|,-1...? |
|00001eb0| 20 20 20 c9 20 36 3a 20 | 6e 65 77 42 6f 6e 67 3d | . 6: |newBong=|
|00001ec0| ac 6e 65 77 42 6f 6e 67 | 3a f2 73 65 74 4f 70 74 |.newBong|:.setOpt|
|00001ed0| 28 63 68 6f 69 63 65 73 | 77 69 6e 64 6f 77 25 2c |(choices|window%,|
|00001ee0| 36 2c 6e 65 77 42 6f 6e | 67 29 0d 09 ec 08 20 20 |6,newBon|g).... |
|00001ef0| 20 cb 0d 09 f6 07 20 20 | cb 0d 0a 00 05 cd 0d 0a | ..... |........|
|00001f00| 0a 05 e1 0d 0a 14 05 20 | 0d 0a 1e 0d dd 20 f2 66 |....... |..... .f|
|00001f10| 69 6e 69 73 68 0d 0a 28 | 17 c8 99 20 22 57 69 6d |inish..(|... "Wim|
|00001f20| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 0a 32 05 |p_CloseD|own"..2.|
|00001f30| e1 0d 0a 3c 05 20 0d 0a | 46 27 dd 20 f2 64 6f 6d |...<. ..|F'. .dom|
|00001f40| 65 6e 75 28 68 61 6e 64 | 6c 65 25 2c 6d 65 6e 75 |enu(hand|le%,menu|
|00001f50| 24 2c 6d 65 6e 75 74 69 | 74 6c 65 24 29 0d 0a 50 |$,menuti|tle$)..P|
|00001f60| 12 6d 65 6e 75 49 74 65 | 6d 73 25 20 3d 20 30 0d |.menuIte|ms% = 0.|
|00001f70| 0a 5a 17 6d 65 6e 75 68 | 61 6e 64 6c 65 25 3d 68 |.Z.menuh|andle%=h|
|00001f80| 61 6e 64 6c 65 25 0d 0a | 64 16 6d 65 6e 75 70 74 |andle%..|d.menupt|
|00001f90| 72 25 3d 6d 65 6e 75 64 | 61 74 61 25 0d 0a 6e 08 |r%=menud|ata%..n.|
|00001fa0| 69 25 3d 30 0d 0a 78 12 | 6d 65 6e 75 70 74 72 25 |i%=0..x.|menuptr%|
|00001fb0| 21 32 30 3d 34 34 0d 0a | 82 18 24 6d 65 6e 75 70 |!20=44..|..$menup|
|00001fc0| 74 72 25 3d 6d 65 6e 75 | 74 69 74 6c 65 24 0d 0a |tr%=menu|title$..|
|00001fd0| 8c 4a 6d 65 6e 75 70 74 | 72 25 3f 31 32 3d 60 74 |.Jmenupt|r%?12=`t|
|00001fe0| 66 63 6f 6c 3a 6d 65 6e | 75 70 74 72 25 3f 31 33 |fcol:men|uptr%?13|
|00001ff0| 3d 32 3a 6d 65 6e 75 70 | 74 72 25 3f 31 34 3d 60 |=2:menup|tr%?14=`|
|00002000| 77 66 63 6f 6c 3a 6d 65 | 6e 75 70 74 72 25 3f 31 |wfcol:me|nuptr%?1|
|00002010| 35 3d 60 77 62 63 6f 6c | 0d 0a 96 24 6d 65 6e 75 |5=`wbcol|...$menu|
|00002020| 70 74 72 25 21 31 36 3d | 32 33 30 2d 32 34 3a 6d |ptr%!16=|230-24:m|
|00002030| 65 6e 75 70 74 72 25 21 | 32 34 3d 30 0d 0a a0 10 |enuptr%!|24=0....|
|00002040| 6d 65 6e 75 70 74 72 25 | 2b 3d 32 38 0d 0a aa 3f |menuptr%|+=28...?|
|00002050| f5 20 69 74 65 6d 24 3d | a4 70 61 72 28 22 2c 22 |. item$=|.par(","|
|00002060| 29 3a f2 6d 65 6e 75 69 | 74 65 6d 28 69 74 65 6d |):.menui|tem(item|
|00002070| 24 29 3a 6d 65 6e 75 49 | 74 65 6d 73 25 2b 3d 31 |$):menuI|tems%+=1|
|00002080| 3a fd 20 69 74 65 6d 24 | 3d 22 22 0d 0a b4 23 6d |:. item$|=""...#m|
|00002090| 65 6e 75 70 74 72 25 21 | 2d 32 34 3d 28 6d 65 6e |enuptr%!|-24=(men|
|000020a0| 75 70 74 72 25 21 2d 32 | 34 29 84 26 38 30 0d 0a |uptr%!-2|4).&80..|
|000020b0| be 38 c8 99 20 43 72 4d | 65 6e 75 2c 2c 6d 65 6e |.8.. CrM|enu,,men|
|000020c0| 75 64 61 74 61 25 2c 6d | 6f 75 73 65 78 25 2d 36 |udata%,m|ousex%-6|
|000020d0| 34 2c 39 36 2b 28 6d 65 | 6e 75 49 74 65 6d 73 25 |4,96+(me|nuItems%|
|000020e0| 2d 31 29 2a 34 34 0d 0a | c8 05 e1 0d 0a d2 05 20 |-1)*44..|....... |
|000020f0| 0d 0a dc 50 dd 20 f2 6d | 65 6e 75 69 74 65 6d 28 |...P. .m|enuitem(|
|00002100| 74 65 78 74 24 29 20 3a | f4 20 4c 65 61 64 69 6e |text$) :|. Leadin|
|00002110| 67 20 63 68 61 72 61 63 | 74 65 72 20 6f 66 20 3e |g charac|ter of >|
|00002120| 20 6f 72 20 3c 20 68 61 | 73 20 73 70 65 63 69 61 | or < ha|s specia|
|00002130| 6c 20 69 6e 74 65 72 70 | 72 65 74 61 74 69 6f 6e |l interp|retation|
|00002140| 0d 0a e6 0b ea 20 6c 65 | 66 74 24 0d 0a f0 10 e7 |..... le|ft$.....|
|00002150| 20 74 65 78 74 24 3d 22 | 22 20 e1 0d 0a fa 0f 21 | text$="|" .....!|
|00002160| 6d 65 6e 75 70 74 72 25 | 3d 30 0d 0b 04 23 6c 65 |menuptr%|=0...#le|
|00002170| 66 74 24 20 3d 20 c0 74 | 65 78 74 24 2c 31 29 3a |ft$ = .t|ext$,1):|
|00002180| 6d 65 6e 75 70 74 72 25 | 21 34 3d 2d 31 0d 0b 0e |menuptr%|!4=-1...|
|00002190| 28 e7 20 6c 65 66 74 24 | 3d 22 3e 22 20 8c 20 6d |(. left$|=">" . m|
|000021a0| 65 6e 75 70 74 72 25 21 | 34 3d 69 6e 66 6f 77 69 |enuptr%!|4=infowi|
|000021b0| 6e 64 6f 77 25 0d 0b 18 | 37 e7 20 6c 65 66 74 24 |ndow%...|7. left$|
|000021c0| 3d 22 3c 22 20 8c 20 6d | 65 6e 75 70 74 72 25 21 |="<" . m|enuptr%!|
|000021d0| 34 3d 63 68 6f 69 63 65 | 73 77 69 6e 64 6f 77 25 |4=choice|swindow%|
|000021e0| 3a 21 6d 65 6e 75 70 74 | 72 25 3d 38 0d 0b 22 18 |:!menupt|r%=8..".|
|000021f0| 6d 65 6e 75 70 74 72 25 | 21 38 3d 26 30 37 30 30 |menuptr%|!8=&0700|
|00002200| 30 30 32 31 0d 0b 2c 4d | e7 20 6c 65 66 74 24 3d |0021..,M|. left$=|
|00002210| 22 3e 22 20 84 20 6c 65 | 66 74 24 3d 22 3c 22 20 |">" . le|ft$="<" |
|00002220| 8c 20 24 28 6d 65 6e 75 | 70 74 72 25 2b 31 32 29 |. $(menu|ptr%+12)|
|00002230| 3d c1 74 65 78 74 24 2c | 32 29 20 8b 20 24 28 6d |=.text$,|2) . $(m|
|00002240| 65 6e 75 70 74 72 25 2b | 31 32 29 3d 74 65 78 74 |enuptr%+|12)=text|
|00002250| 24 0d 0b 36 10 6d 65 6e | 75 70 74 72 25 2b 3d 32 |$..6.men|uptr%+=2|
|00002260| 34 0d 0b 40 05 e1 0d 0b | 4a 05 20 0d 0b 54 10 dd |4..@....|J. ..T..|
|00002270| 20 a4 70 61 72 28 73 65 | 70 24 29 0d 0b 5e 25 69 | .par(se|p$)..^%i|
|00002280| 31 25 3d 69 25 2b 31 3a | 69 25 3d a7 6d 65 6e 75 |1%=i%+1:|i%=.menu|
|00002290| 24 2b 73 65 70 24 2c 73 | 65 70 24 2c 69 31 25 29 |$+sep$,s|ep$,i1%)|
|000022a0| 0d 0b 68 17 3d c1 6d 65 | 6e 75 24 2c 69 31 25 2c |..h.=.me|nu$,i1%,|
|000022b0| 69 25 2d 69 31 25 29 0d | 0b 72 05 20 0d 0b 7c 14 |i%-i1%).|.r. ..|.|
|000022c0| dd a4 63 68 65 63 6b 55 | 50 28 66 69 6c 65 25 29 |..checkU|P(file%)|
|000022d0| 0d 0b 86 10 20 ea 20 78 | 25 2c 70 25 3a ea 20 85 |.... . x|%,p%:. .|
|000022e0| 0d 0b 90 98 20 ee 85 20 | ea 20 d9 23 66 69 6c 65 |.... .. |. .#file|
|000022f0| 25 3a e7 9f 3d 31 30 34 | 33 20 8c 20 f2 72 65 70 |%:..=104|3 . .rep|
|00002300| 6f 72 74 28 32 30 30 37 | 2c 20 22 4d 61 69 6c 20 |ort(2007|, "Mail |
|00002310| 63 61 6e 6e 6f 74 20 62 | 65 20 66 65 74 63 68 65 |cannot b|e fetche|
|00002320| 64 20 62 65 63 61 75 73 | 65 20 79 6f 75 20 64 6f |d becaus|e you do|
|00002330| 20 6e 6f 74 20 68 61 76 | 65 20 61 70 70 72 6f 70 | not hav|e approp|
|00002340| 72 69 61 74 65 20 61 63 | 63 65 73 73 20 74 6f 20 |riate ac|cess to |
|00002350| 74 68 65 20 6d 61 69 6c | 20 73 6f 75 72 63 65 20 |the mail| source |
|00002360| 66 69 6c 65 22 29 3a 3d | a3 20 8b 20 f2 65 72 72 |file"):=|. . .err|
|00002370| 6f 72 62 6f 78 3a 3d a3 | 0d 0b 9a 25 20 70 25 3d |orbox:=.|...% p%=|
|00002380| 8f 23 66 69 6c 65 25 3a | 78 25 3d 9a 23 66 69 6c |.#file%:|x%=.#fil|
|00002390| 65 25 3a cf 23 66 69 6c | 65 25 3d 70 25 0d 0b a4 |e%:.#fil|e%=p%...|
|000023a0| 06 3d b9 0d 0b ae 05 20 | 0d 0b b8 19 dd 20 f2 6d |.=..... |..... .m|
|000023b0| 65 6e 75 73 65 6c 65 63 | 74 28 6d 65 6e 75 73 25 |enuselec|t(menus%|
|000023c0| 29 0d 0b c2 2f c8 99 20 | 44 63 4d 65 6e 75 2c 2c |).../.. |DcMenu,,|
|000023d0| 6d 65 6e 75 64 61 74 61 | 25 2c 6d 65 6e 75 73 25 |menudata|%,menus%|
|000023e0| 2c c4 32 30 30 2c 22 20 | 22 29 b8 2c 2c 2c 61 24 |,.200," |").,,,a$|
|000023f0| 0d 0b cc 0f e7 20 61 24 | 3d 22 22 20 8c 20 e1 0d |..... a$|="" . ..|
|00002400| 0b d6 24 dd 20 f2 6d 65 | 6e 75 73 65 6c 67 6f 28 |..$. .me|nuselgo(|
|00002410| 61 24 29 20 6d 65 6e 75 | 68 61 6e 64 6c 65 25 3d |a$) menu|handle%=|
|00002420| 31 30 31 0d 0b e0 14 c8 | 8e 20 6d 65 6e 75 68 61 |101.....|. menuha|
|00002430| 6e 64 6c 65 25 20 ca 0d | 0b ea 20 c9 20 31 30 31 |ndle% ..|.. . 101|
|00002440| 3a 20 e7 20 61 24 3d 22 | 51 75 69 74 22 3a f2 66 |: . a$="|Quit":.f|
|00002450| 69 6e 69 73 68 3a e0 0d | 0b f4 19 20 20 e7 20 61 |inish:..|... . a|
|00002460| 24 3d 22 46 65 74 63 68 | 20 4d 61 69 6c 22 20 8c |$="Fetch| Mail" .|
|00002470| 0d 0b fe 2b 20 20 20 20 | 41 25 3d 30 3a 42 25 3d |...+ |A%=0:B%=|
|00002480| 30 3a 43 25 3d a4 72 65 | 61 64 56 61 72 28 6c 6f |0:C%=.re|adVar(lo|
|00002490| 67 66 69 6c 65 2c 30 2c | 2d 31 29 0d 0c 08 0b 20 |gfile,0,|-1).... |
|000024a0| 20 20 20 ea 20 85 0d 0c | 12 1d 20 20 20 20 ee 85 | . ...|.. ..|
|000024b0| 20 ea 20 d9 23 42 25 3a | f2 65 72 72 6f 72 62 6f | . .#B%:|.errorbo|
|000024c0| 78 3a e1 0d 0c 1c 85 20 | 20 20 20 e7 43 25 3e 3d |x:..... | .C%>=|
|000024d0| 30 20 85 20 32 30 30 30 | 2c 22 53 79 73 74 65 6d |0 . 2000|,"System|
|000024e0| 20 76 61 72 69 61 62 6c | 65 20 4d 61 69 6c 24 4c | variabl|e Mail$L|
|000024f0| 6f 67 46 69 6c 65 20 6e | 65 65 64 73 20 74 6f 20 |ogFile n|eeds to |
|00002500| 65 78 69 73 74 20 69 6e | 20 6f 72 64 65 72 20 74 |exist in| order t|
|00002510| 6f 20 46 65 74 63 68 20 | 4d 61 69 6c 2e 20 4d 61 |o Fetch |Mail. Ma|
|00002520| 69 6c 24 43 75 72 72 65 | 6e 74 20 69 73 20 61 20 |il$Curre|nt is a |
|00002530| 63 6f 70 79 20 6f 66 20 | 74 68 65 20 6c 61 73 74 |copy of |the last|
|00002540| 20 66 65 74 63 68 2e 22 | 0d 0c 26 21 20 20 20 20 | fetch."|..&! |
|00002550| 43 25 3d a4 72 65 61 64 | 56 61 72 28 63 75 72 72 |C%=.read|Var(curr|
|00002560| 65 6e 74 2c 30 2c 2d 31 | 29 0d 0c 30 2d 20 20 20 |ent,0,-1|)..0- |
|00002570| 20 42 25 3d ad 6d 6e 61 | 6d 65 24 3a e7 42 25 3d | B%=.mna|me$:.B%=|
|00002580| 30 20 8c e1 20 8b e7 20 | ac a4 63 68 65 63 6b 55 |0 .. .. |..checkU|
|00002590| 50 28 42 25 29 e1 0d 0c | 3a 32 20 20 20 20 e7 a2 |P(B%)...|:2 ..|
|000025a0| 23 42 25 3d 30 20 d9 23 | 42 25 3a 73 70 6e 61 6d |#B%=0 .#|B%:spnam|
|000025b0| 65 24 3d 22 2d 6d 61 69 | 6c 6e 6f 6e 65 22 3a f2 |e$="-mai|lnone":.|
|000025c0| 63 68 61 6e 67 65 3a e1 | 0d 0c 44 10 20 20 20 20 |change:.|..D. |
|000025d0| e7 20 43 25 3c 30 20 8c | 0d 0c 4e 1e 20 20 20 20 |. C%<0 .|..N. |
|000025e0| 20 20 43 25 3d ae 22 3c | 4d 61 69 6c 24 43 75 72 | C%=."<|Mail$Cur|
|000025f0| 72 65 6e 74 3e 22 0d 0c | 58 1e 20 20 20 20 20 20 |rent>"..|X. |
|00002600| 41 25 3d ad 22 3c 4d 61 | 69 6c 24 4c 6f 67 46 69 |A%=."<Ma|il$LogFi|
|00002610| 6c 65 3e 22 0d 0c 62 30 | 20 20 20 20 20 20 e7 41 |le>"..b0| .A|
|00002620| 25 3d 30 20 41 25 3d ae | 22 3c 4d 61 69 6c 24 4c |%=0 A%=.|"<Mail$L|
|00002630| 6f 67 46 69 6c 65 3e 22 | 20 8b 20 cf 23 41 25 3d |ogFile>"| . .#A%=|
|00002640| a2 23 41 25 0d 0c 6c 29 | 20 20 20 20 20 20 ee 85 |.#A%..l)| ..|
|00002650| 20 ea 20 d9 23 41 25 3a | d9 23 42 25 3a d9 23 43 | . .#A%:|.#B%:.#C|
|00002660| 25 3a f2 65 72 72 6f 72 | 62 6f 78 3a e1 0d 0c 76 |%:.error|box:...v|
|00002670| 29 20 20 20 20 20 20 f5 | 20 58 24 3d be 23 42 25 |) .| X$=.#B%|
|00002680| 3a d5 23 41 25 2c 58 24 | 3a d5 23 43 25 2c 58 24 |:.#A%,X$|:.#C%,X$|
|00002690| 3a fd c5 23 42 25 0d 0c | 80 1d 20 20 20 20 20 20 |:..#B%..|.. |
|000026a0| d9 23 41 25 3a d9 23 43 | 25 3a 41 25 3d 30 3a 43 |.#A%:.#C|%:A%=0:C|
|000026b0| 25 3d 30 0d 0c 8a 1f 20 | 20 20 20 20 20 ee 85 20 |%=0.... | .. |
|000026c0| ea 20 d9 23 42 25 3a f2 | 65 72 72 6f 72 62 6f 78 |. .#B%:.|errorbox|
|000026d0| 3a e1 0d 0c 94 36 20 20 | 20 20 20 20 a2 23 42 25 |:....6 | .#B%|
|000026e0| 3d 30 3a d9 23 42 25 3a | 42 25 3d 30 3a 73 70 6e |=0:.#B%:|B%=0:spn|
|000026f0| 61 6d 65 24 3d 22 2d 6d | 61 69 6c 6e 6f 6e 65 22 |ame$="-m|ailnone"|
|00002700| 3a f2 63 68 61 6e 67 65 | 0d 0c 9e 28 20 20 20 20 |:.change|...( |
|00002710| 20 20 ff 22 53 65 74 74 | 79 70 65 20 3c 4d 61 69 | ."Sett|ype <Mai|
|00002720| 6c 24 43 75 72 72 65 6e | 74 3e 20 54 65 78 74 22 |l$Curren|t> Text"|
|00002730| 0d 0c a8 40 20 20 20 20 | 20 20 62 75 66 66 65 72 |...@ | buffer|
|00002740| 25 21 31 32 3d 30 3a 62 | 75 66 66 65 72 25 21 31 |%!12=0:b|uffer%!1|
|00002750| 36 3d 35 3a 62 75 66 66 | 65 72 25 21 33 36 3d 30 |6=5:buff|er%!36=0|
|00002760| 3a 62 75 66 66 65 72 25 | 21 34 30 3d 26 46 46 46 |:buffer%|!40=&FFF|
|00002770| 0d 0c b2 42 20 20 20 20 | 20 20 43 25 3d a4 72 65 |...B | C%=.re|
|00002780| 61 64 56 61 72 28 63 75 | 72 72 65 6e 74 2c 62 75 |adVar(cu|rrent,bu|
|00002790| 66 66 65 72 25 2b 34 34 | 2c 26 31 30 30 29 3a 21 |ffer%+44|,&100):!|
|000027a0| 62 75 66 66 65 72 25 3d | 34 37 2b 43 25 2b 31 80 |buffer%=|47+C%+1.|
|000027b0| ac 33 0d 0c bc 2c 20 20 | 20 20 20 20 c8 99 20 22 |.3..., | .. "|
|000027c0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|000027d0| 22 2c 31 38 2c 62 75 66 | 66 65 72 25 2c 30 0d 0c |",18,buf|fer%,0..|
|000027e0| c6 09 20 20 20 20 cc 0d | 0c d0 1e 20 20 20 20 20 |.. ..|... |
|000027f0| 20 41 25 3d ad 22 3c 4d | 61 69 6c 24 4c 6f 67 46 | A%=."<M|ail$LogF|
|00002800| 69 6c 65 3e 22 0d 0c da | 30 20 20 20 20 20 20 e7 |ile>"...|0 .|
|00002810| 41 25 3d 30 20 41 25 3d | ae 22 3c 4d 61 69 6c 24 |A%=0 A%=|."<Mail$|
|00002820| 4c 6f 67 46 69 6c 65 3e | 22 20 8b 20 cf 23 41 25 |LogFile>|" . .#A%|
|00002830| 3d a2 23 41 25 0d 0c e4 | 24 20 20 20 20 20 20 ee |=.#A%...|$ .|
|00002840| 85 20 ea 20 d9 23 41 25 | 3a d9 23 42 25 3a f2 65 |. . .#A%|:.#B%:.e|
|00002850| 72 72 6f 72 62 6f 78 3a | e1 0d 0c ee 1b 20 20 20 |rrorbox:|..... |
|00002860| 20 20 20 f5 20 d5 23 41 | 25 2c be 23 42 25 3a fd | . .#A|%,.#B%:.|
|00002870| c5 23 42 25 0d 0c f8 13 | 20 20 20 20 20 20 d9 23 |.#B%....| .#|
|00002880| 41 25 3a 41 25 3d 30 0d | 0d 02 1f 20 20 20 20 20 |A%:A%=0.|... |
|00002890| 20 ee 85 20 ea 20 d9 23 | 42 25 3a f2 65 72 72 6f | .. . .#|B%:.erro|
|000028a0| 72 62 6f 78 3a e1 0d 0d | 0c 36 20 20 20 20 20 20 |rbox:...|.6 |
|000028b0| a2 23 42 25 3d 30 3a d9 | 23 42 25 3a 42 25 3d 30 |.#B%=0:.|#B%:B%=0|
|000028c0| 3a 73 70 6e 61 6d 65 24 | 3d 22 2d 6d 61 69 6c 6e |:spname$|="-mailn|
|000028d0| 6f 6e 65 22 3a f2 63 68 | 61 6e 67 65 0d 0d 16 28 |one":.ch|ange...(|
|000028e0| 20 20 20 20 20 20 ff 22 | 53 65 74 74 79 70 65 20 | ."|Settype |
|000028f0| 3c 4d 61 69 6c 24 4c 6f | 67 46 69 6c 65 3e 20 54 |<Mail$Lo|gFile> T|
|00002900| 65 78 74 22 0d 0d 20 40 | 20 20 20 20 20 20 62 75 |ext".. @| bu|
|00002910| 66 66 65 72 25 21 31 32 | 3d 30 3a 62 75 66 66 65 |ffer%!12|=0:buffe|
|00002920| 72 25 21 31 36 3d 35 3a | 62 75 66 66 65 72 25 21 |r%!16=5:|buffer%!|
|00002930| 33 36 3d 30 3a 62 75 66 | 66 65 72 25 21 34 30 3d |36=0:buf|fer%!40=|
|00002940| 26 46 46 46 0d 0d 2a 42 | 20 20 20 20 20 20 43 25 |&FFF..*B| C%|
|00002950| 3d a4 72 65 61 64 56 61 | 72 28 6c 6f 67 66 69 6c |=.readVa|r(logfil|
|00002960| 65 2c 62 75 66 66 65 72 | 25 2b 34 34 2c 26 31 30 |e,buffer|%+44,&10|
|00002970| 30 29 3a 21 62 75 66 66 | 65 72 25 3d 34 37 2b 43 |0):!buff|er%=47+C|
|00002980| 25 2b 31 80 ac 33 0d 0d | 34 2c 20 20 20 20 20 20 |%+1..3..|4, |
|00002990| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|000029a0| 73 61 67 65 22 2c 31 38 | 2c 62 75 66 66 65 72 25 |sage",18|,buffer%|
|000029b0| 2c 30 0d 0d 3e 0b 20 20 | 20 20 cd 3a e1 0d 0d 48 |,0..>. | .:...H|
|000029c0| 07 20 20 cd 0d 0d 52 28 | 20 20 e7 20 61 24 3d 22 |. ...R(| . a$="|
|000029d0| 53 61 76 65 20 63 68 6f | 69 63 65 73 22 20 8c 20 |Save cho|ices" . |
|000029e0| f2 73 61 76 65 43 68 6f | 69 63 65 73 0d 0d 5c 05 |.saveCho|ices..\.|
|000029f0| cb 0d 0d 66 05 e1 0d 0d | 70 05 20 0d 0d 7a 11 dd |...f....|p. ..z..|
|00002a00| f2 72 65 74 61 69 6e 43 | 68 65 63 6b 0d 0d 84 41 |.retainC|heck...A|
|00002a10| 20 e7 28 62 25 80 31 29 | 8c c8 99 20 43 72 4d 65 | .(b%.1)|... CrMe|
|00002a20| 6e 75 2c 2c 6d 65 6e 75 | 64 61 74 61 25 2c 6d 6f |nu,,menu|data%,mo|
|00002a30| 75 73 65 78 25 2d 36 34 | 2c 39 36 2b 28 6d 65 6e |usex%-64|,96+(men|
|00002a40| 75 49 74 65 6d 73 25 2d | 31 29 2a 34 34 0d 0d 8e |uItems%-|1)*44...|
|00002a50| 05 e1 0d 0d 98 05 20 0d | 0d a2 0b dd 20 f2 76 61 |...... .|.... .va|
|00002a60| 72 73 0d 0d ac 1e 57 69 | 6d 70 20 20 20 20 3d 20 |rs....Wi|mp = |
|00002a70| 28 31 3c 3c 31 38 29 20 | 2b 20 28 33 3c 3c 36 29 |(1<<18) |+ (3<<6)|
|00002a80| 0d 0d b6 14 43 72 65 61 | 74 65 57 20 3d 20 57 69 |....Crea|teW = Wi|
|00002a90| 6d 70 2b 31 0d 0d c0 14 | 4f 70 65 6e 57 20 20 20 |mp+1....|OpenW |
|00002aa0| 3d 20 57 69 6d 70 2b 35 | 0d 0d ca 14 43 6c 6f 73 |= Wimp+5|....Clos|
|00002ab0| 65 57 20 20 3d 20 57 69 | 6d 70 2b 36 0d 0d d4 14 |eW = Wi|mp+6....|
|00002ac0| 52 65 64 72 61 77 57 20 | 3d 20 57 69 6d 70 2b 38 |RedrawW |= Wimp+8|
|00002ad0| 0d 0d de 14 55 70 64 61 | 74 65 57 20 3d 20 57 69 |....Upda|teW = Wi|
|00002ae0| 6d 70 2b 39 0d 0d e8 15 | 47 65 74 52 20 20 20 20 |mp+9....|GetR |
|00002af0| 3d 20 57 69 6d 70 2b 31 | 30 0d 0d f2 15 47 65 74 |= Wimp+1|0....Get|
|00002b00| 57 20 20 20 20 3d 20 57 | 69 6d 70 2b 31 31 0d 0d |W = W|imp+11..|
|00002b10| fc 15 47 65 74 50 20 20 | 20 20 3d 20 57 69 6d 70 |..GetP | = Wimp|
|00002b20| 2b 31 35 0d 0e 06 15 44 | 72 61 67 20 20 20 20 3d |+15....D|rag =|
|00002b30| 20 57 69 6d 70 2b 31 36 | 0d 0e 10 15 43 72 4d 65 | Wimp+16|....CrMe|
|00002b40| 6e 75 20 20 3d 20 57 69 | 6d 70 2b 32 30 0d 0e 1a |nu = Wi|mp+20...|
|00002b50| 15 44 63 4d 65 6e 75 20 | 20 3d 20 57 69 6d 70 2b |.DcMenu | = Wimp+|
|00002b60| 32 31 0d 0e 24 39 c8 99 | 20 22 4f 53 5f 53 57 49 |21..$9..| "OS_SWI|
|00002b70| 4e 75 6d 62 65 72 46 72 | 6f 6d 53 74 72 69 6e 67 |NumberFr|omString|
|00002b80| 22 2c 2c 22 58 57 69 6d | 70 5f 50 6f 6c 6c 49 64 |",,"XWim|p_PollId|
|00002b90| 6c 65 22 20 b8 20 50 6f | 6c 6c 25 0d 0e 2e 3f c8 |le" . Po|ll%...?.|
|00002ba0| 99 20 22 4f 53 5f 53 57 | 49 4e 75 6d 62 65 72 46 |. "OS_SW|INumberF|
|00002bb0| 72 6f 6d 53 74 72 69 6e | 67 22 2c 2c 22 4f 53 5f |romStrin|g",,"OS_|
|00002bc0| 52 65 61 64 4d 6f 6e 6f | 74 6f 6e 69 63 54 69 6d |ReadMono|tonicTim|
|00002bd0| 65 22 20 b8 20 54 69 6d | 65 25 0d 0e 38 36 c8 99 |e" . Tim|e%..86..|
|00002be0| 20 22 4f 53 5f 53 57 49 | 4e 75 6d 62 65 72 46 72 | "OS_SWI|NumberFr|
|00002bf0| 6f 6d 53 74 72 69 6e 67 | 22 2c 2c 22 4f 53 5f 53 |omString|",,"OS_S|
|00002c00| 70 72 69 74 65 4f 70 22 | 20 b8 20 73 70 6f 70 25 |priteOp"| . spop%|
|00002c10| 0d 0e 42 30 c8 99 20 22 | 4f 53 5f 53 57 49 4e 75 |..B0.. "|OS_SWINu|
|00002c20| 6d 62 65 72 46 72 6f 6d | 53 74 72 69 6e 67 22 2c |mberFrom|String",|
|00002c30| 2c 22 4f 53 5f 47 42 50 | 42 22 20 b8 20 67 70 25 |,"OS_GBP|B" . gp%|
|00002c40| 0d 0e 4c 05 e1 0d 0e 56 | 05 20 0d 0e 60 18 dd f2 |..L....V|. ..`...|
|00002c50| 72 65 70 6f 72 74 28 65 | 72 72 25 2c 6d 65 73 73 |report(e|rr%,mess|
|00002c60| 24 29 0d 0e 6a 5a c8 99 | 20 44 72 61 67 2c 2c 2d |$)..jZ..| Drag,,-|
|00002c70| 31 3a 21 62 75 66 66 65 | 72 25 3d 65 72 72 25 3a |1:!buffe|r%=err%:|
|00002c80| 24 28 62 75 66 66 65 72 | 25 2b 34 29 3d 6d 65 73 |$(buffer|%+4)=mes|
|00002c90| 73 24 3a c8 99 22 57 69 | 6d 70 5f 52 65 70 6f 72 |s$:.."Wi|mp_Repor|
|00002ca0| 74 45 72 72 6f 72 22 2c | 62 75 66 66 65 72 25 2c |tError",|buffer%,|
|00002cb0| 31 2c 22 4d 61 69 6c 20 | 4d 61 6e 22 0d 0e 74 05 |1,"Mail |Man"..t.|
|00002cc0| e1 0d 0e 7e 05 20 0d 0e | 88 41 dd 20 f2 65 72 72 |...~. ..|.A. .err|
|00002cd0| 6f 72 62 6f 78 20 3a f4 | 20 52 65 70 6f 72 74 20 |orbox :.| Report |
|00002ce0| 65 72 72 6f 72 2c 20 77 | 69 74 68 20 6c 69 6e 65 |error, w|ith line|
|00002cf0| 20 6e 75 6d 62 65 72 20 | 69 66 20 65 72 72 6f 72 | number |if error|
|00002d00| 20 3c 20 32 30 30 30 0d | 0e 92 63 e7 20 28 9f 20 | < 2000.|..c. (. |
|00002d10| 3c 20 32 30 30 30 29 20 | 80 20 69 6e 74 65 72 6e |< 2000) |. intern|
|00002d20| 61 6c 25 20 8c 20 f2 72 | 65 70 6f 72 74 28 9f 2c |al% . .r|eport(.,|
|00002d30| f6 24 2b 22 20 28 69 6e | 74 65 72 6e 61 6c 20 65 |.$+" (in|ternal e|
|00002d40| 72 72 6f 72 20 63 6f 64 | 65 20 22 2b c3 9e 2b 22 |rror cod|e "+..+"|
|00002d50| 29 2e 22 2b bd 30 29 20 | 8b 20 f2 72 65 70 6f 72 |)."+.0) |. .repor|
|00002d60| 74 28 9f 2c f6 24 2b bd | 30 29 0d 0e 9c 05 e1 0d |t(.,.$+.|0)......|
|00002d70| 0e a6 05 20 0d 0e b0 0e | dd 20 a4 69 63 6f 6e 62 |... ....|. .iconb|
|00002d80| 61 72 0d 0e ba 4e 21 69 | 63 6f 6e 73 25 3d 2d 31 |ar...N!i|cons%=-1|
|00002d90| 3a 69 63 6f 6e 73 25 21 | 34 3d 30 3a 69 63 6f 6e |:icons%!|4=0:icon|
|00002da0| 73 25 21 38 3d 30 3a 69 | 63 6f 6e 73 25 21 31 32 |s%!8=0:i|cons%!12|
|00002db0| 3d 34 37 3a 69 63 6f 6e | 73 25 21 31 36 3d 36 38 |=47:icon|s%!16=68|
|00002dc0| 3a 69 63 6f 6e 73 25 21 | 32 30 3d 26 33 31 30 32 |:icons%!|20=&3102|
|00002dd0| 0d 0e c4 17 73 70 6e 61 | 6d 65 24 3d 22 2d 6d 61 |....spna|me$="-ma|
|00002de0| 69 6c 68 6f 6c 65 22 0d | 0e ce 27 de 20 69 63 6f |ilhole".|..'. ico|
|00002df0| 6e 73 25 21 32 34 20 31 | 32 3a 24 28 69 63 6f 6e |ns%!24 1|2:$(icon|
|00002e00| 73 25 21 32 34 29 3d 73 | 70 6e 61 6d 65 24 0d 0e |s%!24)=s|pname$..|
|00002e10| d8 23 69 63 6f 6e 73 25 | 21 32 38 3d 73 70 72 69 |.#icons%|!28=spri|
|00002e20| 74 65 73 25 3a 69 63 6f | 6e 73 25 21 33 32 3d 31 |tes%:ico|ns%!32=1|
|00002e30| 31 0d 0e e2 26 c8 99 20 | 22 57 69 6d 70 5f 43 72 |1...&.. |"Wimp_Cr|
|00002e40| 65 61 74 65 49 63 6f 6e | 22 2c 2c 69 63 6f 6e 73 |eateIcon|",,icons|
|00002e50| 25 20 b8 20 69 63 25 0d | 0e ec 08 3d 69 63 25 0d |% . ic%.|...=ic%.|
|00002e60| 0e f6 05 20 0d 0f 00 16 | dd 20 f2 6e 75 64 67 65 |... ....|. .nudge|
|00002e70| 28 6e 6f 64 65 6c 61 79 | 25 29 0d 0f 0a 20 ea 20 |(nodelay|%)... . |
|00002e80| 50 25 2c 66 30 25 2c 66 | 31 25 2c 66 32 25 2c 66 |P%,f0%,f|1%,f2%,f|
|00002e90| 33 25 2c 66 34 25 2c 66 | 35 25 0d 0f 14 10 e7 20 |3%,f4%,f|5%..... |
|00002ea0| 6e 6f 64 65 6c 61 79 25 | 20 8c 0d 0f 1e 39 20 20 |nodelay%| ....9 |
|00002eb0| c8 99 20 22 4e 65 74 46 | 53 5f 52 65 61 64 46 53 |.. "NetF|S_ReadFS|
|00002ec0| 54 69 6d 65 6f 75 74 73 | 22 20 b8 20 66 30 25 2c |Timeouts|" . f0%,|
|00002ed0| 66 31 25 2c 66 32 25 2c | 66 33 25 2c 66 34 25 2c |f1%,f2%,|f3%,f4%,|
|00002ee0| 66 35 25 0d 0f 28 2d 20 | 20 c8 99 20 22 4e 65 74 |f5%..(- | .. "Net|
|00002ef0| 46 53 5f 53 65 74 46 53 | 54 69 6d 65 6f 75 74 73 |FS_SetFS|Timeouts|
|00002f00| 22 2c 35 2c 34 2c 35 2c | 34 2c 31 30 30 2c 32 30 |",5,4,5,|4,100,20|
|00002f10| 0d 0f 32 33 20 20 c8 99 | 20 22 58 4f 53 5f 46 69 |..23 ..| "XOS_Fi|
|00002f20| 6c 65 22 2c 35 2c 6d 6e | 61 6d 65 24 20 b8 20 72 |le",5,mn|ame$ . r|
|00002f30| 30 2c 2c 72 32 2c 72 33 | 2c 72 34 2c 72 35 20 3b |0,,r2,r3|,r4,r5 ;|
|00002f40| 20 50 25 0d 0f 3c 36 20 | 20 c8 99 20 22 4e 65 74 | P%..<6 | .. "Net|
|00002f50| 46 53 5f 53 65 74 46 53 | 54 69 6d 65 6f 75 74 73 |FS_SetFS|Timeouts|
|00002f60| 22 2c 66 30 25 2c 66 31 | 25 2c 66 32 25 2c 66 33 |",f0%,f1|%,f2%,f3|
|00002f70| 25 2c 66 34 25 2c 66 35 | 25 0d 0f 46 10 20 20 e7 |%,f4%,f5|%..F. .|
|00002f80| 20 50 25 20 80 20 31 20 | 8c 0d 0f 50 1a 20 20 20 | P% . 1 |...P. |
|00002f90| 20 e7 20 64 65 6c 61 79 | 25 3c 3e 6c 6f 64 65 6c | . delay|%<>lodel|
|00002fa0| 25 20 8c 0d 0f 5a 22 20 | 20 20 20 20 20 64 65 6c |% ...Z" | del|
|00002fb0| 61 79 25 3d 6c 6f 64 65 | 6c 25 3a 63 6f 75 6e 74 |ay%=lode|l%:count|
|00002fc0| 25 3d 36 3a e1 0d 0f 64 | 09 20 20 20 20 cc 0d 0f |%=6:...d|. ...|
|00002fd0| 6e 46 20 20 20 20 20 20 | 63 6f 75 6e 74 25 2d 3d |nF |count%-=|
|00002fe0| 31 3a e7 63 6f 75 6e 74 | 25 3d 30 20 64 65 6c 61 |1:.count|%=0 dela|
|00002ff0| 79 25 3d 68 69 64 65 6c | 25 3a 73 70 6e 61 6d 65 |y%=hidel|%:spname|
|00003000| 24 3d 22 2d 6d 61 69 6c | 75 6e 6b 22 3a f2 63 68 |$="-mail|unk":.ch|
|00003010| 61 6e 67 65 0d 0f 78 0f | 20 20 20 20 20 20 f2 74 |ange..x.| .t|
|00003020| 69 63 6b 0d 0f 82 0b 20 | 20 20 20 20 20 e1 0d 0f |ick.... | ...|
|00003030| 8c 09 20 20 20 20 cd 0d | 0f 96 07 20 20 cc 0d 0f |.. ..|... ...|
|00003040| a0 15 20 20 20 20 64 65 | 6c 61 79 25 3d 68 69 64 |.. de|lay%=hid|
|00003050| 65 6c 25 0d 0f aa 07 20 | 20 cd 0d 0f b4 05 cc 0d |el%.... | .......|
|00003060| 0f be 33 20 20 c8 99 20 | 22 58 4f 53 5f 46 69 6c |..3 .. |"XOS_Fil|
|00003070| 65 22 2c 35 2c 6d 6e 61 | 6d 65 24 20 b8 20 72 30 |e",5,mna|me$ . r0|
|00003080| 2c 2c 72 32 2c 72 33 2c | 72 34 2c 72 35 20 3b 20 |,,r2,r3,|r4,r5 ; |
|00003090| 50 25 0d 0f c8 33 20 20 | e7 20 50 25 20 80 20 31 |P%...3 |. P% . 1|
|000030a0| 20 8c 20 73 70 6e 61 6d | 65 24 3d 22 2d 6d 61 69 | . spnam|e$="-mai|
|000030b0| 6c 75 6e 6b 22 3a f2 63 | 68 61 6e 67 65 3a f2 74 |lunk":.c|hange:.t|
|000030c0| 69 63 6b 3a e1 0d 0f d2 | 05 cd 0d 0f dc 0b c8 8e |ick:....|........|
|000030d0| 20 72 30 20 ca 0d 0f e6 | 2f c9 20 31 3a e7 20 72 | r0 ....|/. 1:. r|
|000030e0| 34 20 80 20 73 70 6e 61 | 6d 65 24 3c 3e 22 2d 6d |4 . spna|me$<>"-m|
|000030f0| 61 69 6c 66 75 6c 6c 22 | 20 80 20 62 6f 6e 67 20 |ailfull"| . bong |
|00003100| 8c 20 ef 37 0d 0f f0 32 | e7 20 72 34 20 73 70 6e |. .7...2|. r4 spn|
|00003110| 61 6d 65 24 3d 22 2d 6d | 61 69 6c 66 75 6c 6c 22 |ame$="-m|ailfull"|
|00003120| 20 8b 20 73 70 6e 61 6d | 65 24 3d 22 2d 6d 61 69 | . spnam|e$="-mai|
|00003130| 6c 6e 6f 6e 65 22 0d 0f | fa 18 7f 20 73 70 6e 61 |lnone"..|... spna|
|00003140| 6d 65 24 3d 22 2d 6d 61 | 69 6c 75 6e 6b 22 0d 10 |me$="-ma|ilunk"..|
|00003150| 04 05 cb 0d 10 0e 0b f2 | 63 68 61 6e 67 65 0d 10 |........|change..|
|00003160| 18 09 f2 74 69 63 6b 0d | 10 22 05 e1 0d 10 2c 05 |...tick.|."....,.|
|00003170| 20 0d 10 36 0b dd 20 f2 | 74 69 63 6b 0d 10 40 18 | ..6.. .|tick..@.|
|00003180| c8 99 20 54 69 6d 65 25 | 20 b8 20 74 69 6d 65 73 |.. Time%| . times|
|00003190| 6c 69 70 25 0d 10 4a 2a | c8 95 74 69 6d 65 73 6c |lip%..J*|..timesl|
|000031a0| 69 70 25 2d 74 69 6d 65 | 78 25 3e 3d 30 3a 74 69 |ip%-time|x%>=0:ti|
|000031b0| 6d 65 78 25 2b 3d 64 65 | 6c 61 79 25 3a ce 0d 10 |mex%+=de|lay%:...|
|000031c0| 54 05 e1 0d 10 5e 05 20 | 0d 10 68 0d dd 20 f2 63 |T....^. |..h.. .c|
|000031d0| 68 61 6e 67 65 0d 10 72 | 2a c8 99 20 73 70 6f 70 |hange..r|*.. spop|
|000031e0| 25 2c 26 31 31 38 2c 73 | 70 72 69 74 65 73 25 2c |%,&118,s|prites%,|
|000031f0| 73 70 6e 61 6d 65 24 20 | b8 2c 2c 73 72 63 25 0d |spname$ |.,,src%.|
|00003200| 10 7c 2f c8 99 20 73 70 | 6f 70 25 2c 26 31 31 38 |.|/.. sp|op%,&118|
|00003210| 2c 73 70 72 69 74 65 73 | 25 2c 22 2d 6d 61 69 6c |,sprites|%,"-mail|
|00003220| 68 6f 6c 65 22 20 b8 2c | 2c 64 65 73 74 25 0d 10 |hole" .,|,dest%..|
|00003230| 86 27 e3 7a 25 3d 34 34 | b8 21 73 72 63 25 2d 31 |.'.z%=44|.!src%-1|
|00003240| 88 34 3a 64 65 73 74 25 | 21 7a 25 3d 73 72 63 25 |.4:dest%|!z%=src%|
|00003250| 21 7a 25 3a ed 0d 10 90 | 26 21 71 25 3d 2d 31 3a |!z%:....|&!q%=-1:|
|00003260| 71 25 21 34 3d 69 63 6d | 61 69 6c 25 3a 71 25 21 |q%!4=icm|ail%:q%!|
|00003270| 38 3d 30 3a 71 25 21 31 | 32 3d 30 0d 10 9a 1e c8 |8=0:q%!1|2=0.....|
|00003280| 99 20 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |. "Wimp_|SetIconS|
|00003290| 74 61 74 65 22 2c 2c 71 | 25 0d 10 a4 05 e1 0d 10 |tate",,q|%.......|
|000032a0| ae 05 20 0d 10 b8 15 dd | 20 f2 70 6f 70 75 70 28 |.. .....| .popup(|
|000032b0| 68 61 6e 64 6c 65 25 29 | 0d 10 c2 12 f2 67 65 74 |handle%)|.....get|
|000032c0| 77 28 68 61 6e 64 6c 65 | 25 29 0d 10 cc 26 78 6f |w(handle|%)...&xo|
|000032d0| 25 3d 6d 6f 75 73 65 78 | 25 2d 28 78 30 25 2b 78 |%=mousex|%-(x0%+x|
|000032e0| 31 25 29 2f 32 3a 79 6f | 25 3d 39 36 2d 79 30 25 |1%)/2:yo|%=96-y0%|
|000032f0| 0d 10 d6 46 f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |...F.ope|n_window|
|00003300| 28 68 61 6e 64 6c 65 25 | 2c 78 30 25 2b 78 6f 25 |(handle%|,x0%+xo%|
|00003310| 2c 79 30 25 2b 79 6f 25 | 2c 78 31 25 2b 78 6f 25 |,y0%+yo%|,x1%+xo%|
|00003320| 2c 79 31 25 2b 79 6f 25 | 2c 73 63 78 25 2c 73 63 |,y1%+yo%|,scx%,sc|
|00003330| 79 25 2c 2d 31 29 0d 10 | e0 05 e1 0d 10 ea 05 20 |y%,-1)..|....... |
|00003340| 0d 10 f4 16 dd 20 f2 72 | 65 6f 70 65 6e 28 68 61 |..... .r|eopen(ha|
|00003350| 6e 64 6c 65 25 29 0d 10 | fe 12 f2 67 65 74 77 28 |ndle%)..|...getw(|
|00003360| 68 61 6e 64 6c 65 25 29 | 0d 11 08 46 f2 6f 70 65 |handle%)|...F.ope|
|00003370| 6e 5f 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |n_window|(handle%|
|00003380| 2c 78 6f 25 2c 79 6f 25 | 2c 78 31 25 2d 78 30 25 |,xo%,yo%|,x1%-x0%|
|00003390| 2b 78 6f 25 2c 79 31 25 | 2d 79 30 25 2b 79 6f 25 |+xo%,y1%|-y0%+yo%|
|000033a0| 2c 73 63 78 25 2c 73 63 | 79 25 2c 2d 31 29 0d 11 |,scx%,sc|y%,-1)..|
|000033b0| 12 05 e1 0d 11 1c 05 20 | 0d 11 26 3e dd 20 f2 6f |....... |..&>. .o|
|000033c0| 70 65 6e 5f 77 69 6e 64 | 6f 77 28 68 61 6e 64 6c |pen_wind|ow(handl|
|000033d0| 65 25 2c 78 30 25 2c 79 | 30 25 2c 78 31 25 2c 79 |e%,x0%,y|0%,x1%,y|
|000033e0| 31 25 2c 73 63 78 25 2c | 73 63 79 25 2c 62 68 61 |1%,scx%,|scy%,bha|
|000033f0| 6e 64 6c 65 25 29 0d 11 | 30 11 e7 68 61 6e 64 6c |ndle%)..|0..handl|
|00003400| 65 25 3d 2d 31 8c e1 0d | 11 3a 1f 71 25 21 30 3d |e%=-1...|.:.q%!0=|
|00003410| 68 61 6e 64 6c 65 25 3a | 71 25 21 32 38 3d 62 68 |handle%:|q%!28=bh|
|00003420| 61 6e 64 6c 65 25 0d 11 | 44 29 71 25 21 34 3d 78 |andle%..|D)q%!4=x|
|00003430| 30 25 3a 71 25 21 38 3d | 79 30 25 3a 71 25 21 31 |0%:q%!8=|y0%:q%!1|
|00003440| 32 3d 78 31 25 3a 71 25 | 21 31 36 3d 79 31 25 0d |2=x1%:q%|!16=y1%.|
|00003450| 11 4e 19 71 25 21 32 30 | 3d 73 63 78 25 3a 71 25 |.N.q%!20|=scx%:q%|
|00003460| 21 32 34 3d 73 63 79 25 | 0d 11 58 10 c8 99 20 4f |!24=scy%|..X... O|
|00003470| 70 65 6e 57 2c 2c 71 25 | 0d 11 62 05 e1 0d 11 6c |penW,,q%|..b....l|
|00003480| 05 20 0d 11 76 14 dd 20 | f2 67 65 74 77 28 68 61 |. ..v.. |.getw(ha|
|00003490| 6e 64 6c 65 25 29 0d 11 | 80 1b 21 71 25 3d 68 61 |ndle%)..|..!q%=ha|
|000034a0| 6e 64 6c 65 25 3a c8 99 | 20 47 65 74 57 2c 2c 71 |ndle%:..| GetW,,q|
|000034b0| 25 0d 11 8a 2b f2 69 6e | 66 6f 28 71 25 2b 34 29 |%...+.in|fo(q%+4)|
|000034c0| 3a 62 68 61 6e 64 6c 65 | 25 3d 71 25 21 32 38 3a |:bhandle|%=q%!28:|
|000034d0| 66 6c 61 67 73 25 3d 71 | 25 21 33 32 0d 11 94 05 |flags%=q|%!32....|
|000034e0| e1 0d 11 9e 05 20 0d 11 | a8 0f dd 20 f2 69 6e 66 |..... ..|... .inf|
|000034f0| 6f 28 71 25 29 0d 11 b2 | 3d 78 30 25 3d 21 71 25 |o(q%)...|=x0%=!q%|
|00003500| 3a 79 30 25 3d 71 25 21 | 34 3a 78 31 25 3d 71 25 |:y0%=q%!|4:x1%=q%|
|00003510| 21 38 3a 79 31 25 3d 71 | 25 21 31 32 3a 73 63 78 |!8:y1%=q|%!12:scx|
|00003520| 25 3d 71 25 21 31 36 3a | 73 63 79 25 3d 71 25 21 |%=q%!16:|scy%=q%!|
|00003530| 32 30 0d 11 bc 1d 62 78 | 25 3d 78 30 25 2d 73 63 |20....bx|%=x0%-sc|
|00003540| 78 25 3a 62 79 25 3d 79 | 31 25 2d 73 63 79 25 0d |x%:by%=y|1%-scy%.|
|00003550| 11 c6 05 e1 0d 11 d0 05 | 20 0d 11 da 2a dd 20 f2 |........| ...*. .|
|00003560| 75 70 64 61 74 65 28 68 | 61 6e 64 6c 65 25 2c 75 |update(h|andle%,u|
|00003570| 78 30 25 2c 75 79 30 25 | 2c 75 78 31 25 2c 75 79 |x0%,uy0%|,ux1%,uy|
|00003580| 31 25 29 0d 11 e4 39 21 | 71 25 3d 68 61 6e 64 6c |1%)...9!|q%=handl|
|00003590| 65 25 3a 71 25 21 34 3d | 75 78 30 25 3a 71 25 21 |e%:q%!4=|ux0%:q%!|
|000035a0| 38 3d 75 79 30 25 3a 71 | 25 21 31 32 3d 75 78 31 |8=uy0%:q|%!12=ux1|
|000035b0| 25 3a 71 25 21 31 36 3d | 75 79 31 25 0d 11 ee 26 |%:q%!16=|uy1%...&|
|000035c0| c8 99 20 55 70 64 61 74 | 65 57 2c 2c 71 25 20 b8 |.. Updat|eW,,q% .|
|000035d0| 20 6d 6f 72 65 25 3a f2 | 69 6e 66 6f 28 71 25 2b | more%:.|info(q%+|
|000035e0| 34 29 0d 11 f8 05 e1 0d | 12 02 05 20 0d 12 0c 1d |4)......|... ....|
|000035f0| dd 20 f2 72 65 64 72 61 | 77 5f 77 69 6e 64 6f 77 |. .redra|w_window|
|00003600| 28 68 61 6e 64 6c 65 25 | 29 0d 12 16 16 e7 68 61 |(handle%|).....ha|
|00003610| 6e 64 6c 65 25 3d 6d 61 | 69 6c 74 6f 25 20 8c 0d |ndle%=ma|ilto% ..|
|00003620| 12 20 0f 21 71 25 3d 68 | 61 6e 64 6c 65 25 0d 12 |. .!q%=h|andle%..|
|00003630| 2a 1a c8 99 20 52 65 64 | 72 61 77 57 2c 2c 71 25 |*... Red|rawW,,q%|
|00003640| 20 b8 20 6d 6f 72 65 25 | 0d 12 34 0f f2 69 6e 66 | . more%|..4..inf|
|00003650| 6f 28 71 25 2b 34 29 0d | 12 3e 05 cd 0d 12 48 05 |o(q%+4).|.>....H.|
|00003660| e1 0d 12 52 05 20 0d 12 | 5c 11 dd 20 f2 67 65 74 |...R. ..|\.. .get|
|00003670| 70 6f 69 6e 74 65 72 0d | 12 66 14 c8 99 20 47 65 |pointer.|.f... Ge|
|00003680| 74 50 2c 2c 62 75 66 66 | 65 72 25 0d 12 70 66 6d |tP,,buff|er%..pfm|
|00003690| 6f 75 73 65 78 25 3d 21 | 62 75 66 66 65 72 25 3a |ousex%=!|buffer%:|
|000036a0| 6d 6f 75 73 65 79 25 3d | 62 75 66 66 65 72 25 21 |mousey%=|buffer%!|
|000036b0| 34 3a 62 25 3d 62 75 66 | 66 65 72 25 21 38 3a 68 |4:b%=buf|fer%!8:h|
|000036c0| 61 6e 64 6c 65 25 3d 62 | 75 66 66 65 72 25 21 31 |andle%=b|uffer%!1|
|000036d0| 32 3a 69 63 6f 6e 25 3d | 62 75 66 66 65 72 25 21 |2:icon%=|buffer%!|
|000036e0| 31 36 3a 6f 62 25 3d 62 | 75 66 66 65 72 25 21 32 |16:ob%=b|uffer%!2|
|000036f0| 30 0d 12 7a 05 e1 0d 12 | 84 05 20 0d 12 8e 38 dd |0..z....|.. ...8.|
|00003700| 20 f2 63 6c 6f 73 65 5f | 77 69 6e 64 6f 77 28 68 | .close_|window(h|
|00003710| 61 6e 64 6c 65 25 29 3a | 21 71 25 3d 68 61 6e 64 |andle%):|!q%=hand|
|00003720| 6c 65 25 3a c8 99 20 43 | 6c 6f 73 65 57 2c 2c 71 |le%:.. C|loseW,,q|
|00003730| 25 3a e1 0d 12 98 05 20 | 0d 12 a2 22 dd f2 73 65 |%:..... |..."..se|
|00003740| 74 4f 70 74 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |tOpt(win|dow%,ico|
|00003750| 6e 25 2c 73 74 61 74 65 | 25 29 0d 12 ac 48 20 21 |n%,state|%)...H !|
|00003760| 6f 70 74 62 75 66 66 25 | 3d 77 69 6e 64 6f 77 25 |optbuff%|=window%|
|00003770| 3a 6f 70 74 62 75 66 66 | 25 21 34 3d 69 63 6f 6e |:optbuff|%!4=icon|
|00003780| 25 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |%:.. "Wi|mp_GetIc|
|00003790| 6f 6e 53 74 61 74 65 22 | 2c 2c 6f 70 74 62 75 66 |onState"|,,optbuf|
|000037a0| 66 25 0d 12 b6 3d 20 e7 | 73 74 61 74 65 25 20 24 |f%...= .|state% $|
|000037b0| 28 6f 70 74 62 75 66 66 | 25 2b 32 38 29 3d 22 6f |(optbuff|%+28)="o|
|000037c0| 70 74 6f 6e 22 20 8b 20 | 24 28 6f 70 74 62 75 66 |pton" . |$(optbuf|
|000037d0| 66 25 2b 32 38 29 3d 22 | 6f 70 74 6f 66 66 22 0d |f%+28)="|optoff".|
|000037e0| 12 c0 45 20 21 6f 70 74 | 62 75 66 66 25 3d 77 69 |..E !opt|buff%=wi|
|000037f0| 6e 64 6f 77 25 3a 6f 70 | 74 62 75 66 66 25 21 34 |ndow%:op|tbuff%!4|
|00003800| 3d 69 63 6f 6e 25 3a c8 | 99 22 57 69 6d 70 5f 44 |=icon%:.|."Wimp_D|
|00003810| 65 6c 65 74 65 49 63 6f | 6e 22 2c 2c 6f 70 74 62 |eleteIco|n",,optb|
|00003820| 75 66 66 25 0d 12 ca 37 | 20 6f 70 74 62 75 66 66 |uff%...7| optbuff|
|00003830| 25 21 34 3d 77 69 6e 64 | 6f 77 25 3a c8 99 22 57 |%!4=wind|ow%:.."W|
|00003840| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 22 2c |imp_Crea|teIcon",|
|00003850| 2c 6f 70 74 62 75 66 66 | 25 2b 34 0d 12 d4 45 20 |,optbuff|%+4...E |
|00003860| 21 71 25 3d 77 69 6e 64 | 6f 77 25 3a 71 25 21 34 |!q%=wind|ow%:q%!4|
|00003870| 3d 69 63 6f 6e 25 3a 71 | 25 21 38 3d 30 3a 71 25 |=icon%:q|%!8=0:q%|
|00003880| 21 31 32 3d 30 3a c8 99 | 20 22 57 69 6d 70 5f 53 |!12=0:..| "Wimp_S|
|00003890| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|000038a0| 0d 12 de 05 e1 0d 12 e8 | 05 20 0d 12 f2 1d dd a4 |........|. ......|
|000038b0| 68 65 6c 70 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |help(win|dow%,ico|
|000038c0| 6e 25 2c 74 6f 25 29 0d | 12 fc 0b 24 74 6f 25 3d |n%,to%).|...$to%=|
|000038d0| 22 22 0d 13 06 10 c8 8e | 20 77 69 6e 64 6f 77 25 |""......| window%|
|000038e0| 20 ca 0d 13 10 09 20 c9 | 20 2d 32 0d 13 1a 28 20 | ..... .| -2...( |
|000038f0| 20 24 74 6f 25 3d 22 54 | 68 69 73 20 69 73 20 74 | $to%="T|his is t|
|00003900| 68 65 20 4d 61 69 6c 4d | 61 6e 20 69 63 6f 6e 2e |he MailM|an icon.|
|00003910| 7c 4d 22 0d 13 24 1e 20 | 20 e7 20 73 70 6e 61 6d ||M"..$. | . spnam|
|00003920| 65 24 20 3d 20 22 2d 6d | 61 69 6c 75 6e 6b 22 20 |e$ = "-m|ailunk" |
|00003930| 8c 0d 13 2e 51 20 20 20 | 24 74 6f 25 20 2b 3d 20 |....Q |$to% += |
|00003940| 22 54 68 65 20 4d 61 69 | 6c 4d 61 6e 20 63 61 6e |"The Mai|lMan can|
|00003950| 6e 6f 74 20 66 69 6e 64 | 20 74 68 65 20 6e 65 74 |not find| the net|
|00003960| 77 6f 72 6b 20 6d 61 69 | 6c 69 6e 67 20 73 79 73 |work mai|ling sys|
|00003970| 74 65 6d 20 61 74 20 70 | 72 65 73 65 6e 74 2e 7c |tem at p|resent.||
|00003980| 4d 22 0d 13 38 07 20 20 | cc 0d 13 42 5b 20 20 20 |M"..8. |...B[ |
|00003990| 24 74 6f 25 20 2b 3d 20 | 22 44 72 61 67 20 74 65 |$to% += |"Drag te|
|000039a0| 78 74 20 66 69 6c 65 73 | 20 74 6f 20 74 68 65 20 |xt files| to the |
|000039b0| 69 63 6f 6e 20 74 6f 20 | 73 65 6e 64 20 74 68 65 |icon to |send the|
|000039c0| 6d 20 76 69 61 20 74 68 | 65 20 65 6c 65 63 74 72 |m via th|e electr|
|000039d0| 6f 6e 69 63 20 6d 61 69 | 6c 20 73 79 73 74 65 6d |onic mai|l system|
|000039e0| 2e 7c 4d 22 0d 13 4c 72 | 20 20 20 e7 20 73 70 6e |.|M"..Lr| . spn|
|000039f0| 61 6d 65 24 20 3d 20 22 | 2d 6d 61 69 6c 66 75 6c |ame$ = "|-mailful|
|00003a00| 6c 22 20 8c 20 24 74 6f | 25 20 2b 3d 20 22 54 68 |l" . $to|% += "Th|
|00003a10| 65 72 65 20 69 73 20 6d | 61 69 6c 20 77 61 69 74 |ere is m|ail wait|
|00003a20| 69 6e 67 20 74 6f 20 62 | 65 20 72 65 61 64 2e 20 |ing to b|e read. |
|00003a30| 43 6c 69 63 6b 20 53 45 | 4c 45 43 54 20 6f 6e 20 |Click SE|LECT on |
|00003a40| 74 68 65 20 69 63 6f 6e | 20 74 6f 20 66 65 74 63 |the icon| to fetc|
|00003a50| 68 20 69 74 2e 22 0d 13 | 56 07 20 20 cd 0d 13 60 |h it."..|V. ...`|
|00003a60| 0f 20 c9 20 6d 61 69 6c | 74 6f 25 3a 0d 13 6a 1a |. . mail|to%:..j.|
|00003a70| 20 20 24 74 6f 25 3d 22 | 43 6c 69 63 6b 20 53 45 | $to%="|Click SE|
|00003a80| 4c 45 43 54 20 22 0d 13 | 74 10 20 20 c8 8e 20 69 |LECT "..|t. .. i|
|00003a90| 63 6f 6e 25 20 ca 0d 13 | 7e 8a 20 20 20 c9 20 30 |con% ...|~. . 0|
|00003aa0| 3a 20 24 74 6f 25 2b 3d | 22 61 6e 64 20 74 79 70 |: $to%+=|"and typ|
|00003ab0| 65 20 74 68 65 20 6d 61 | 69 6c 20 6e 61 6d 65 20 |e the ma|il name |
|00003ac0| 6f 66 20 74 68 65 20 72 | 65 63 69 70 69 65 6e 74 |of the r|ecipient|
|00003ad0| 20 6f 66 20 74 68 65 20 | 6d 61 69 6c 2e 7c 4d 59 | of the |mail.|MY|
|00003ae0| 6f 75 20 6d 61 79 20 65 | 6e 74 65 72 20 6d 6f 72 |ou may e|nter mor|
|00003af0| 65 20 74 68 61 6e 20 6f | 6e 65 20 6e 61 6d 65 20 |e than o|ne name |
|00003b00| 62 79 20 73 65 70 61 72 | 61 74 69 6e 67 20 74 68 |by separ|ating th|
|00003b10| 65 6d 20 77 69 74 68 20 | 63 6f 6d 6d 61 73 2e 22 |em with |commas."|
|00003b20| 0d 13 88 a1 20 20 20 c9 | 20 31 3a 20 24 74 6f 25 |.... .| 1: $to%|
|00003b30| 2b 3d 22 61 6e 64 20 74 | 79 70 65 20 74 68 65 20 |+="and t|ype the |
|00003b40| 6d 61 69 6c 20 6e 61 6d | 65 20 6f 66 20 61 6e 79 |mail nam|e of any|
|00003b50| 6f 6e 65 20 74 6f 20 77 | 68 6f 6d 20 63 6f 70 69 |one to w|hom copi|
|00003b60| 65 73 20 6f 66 20 74 68 | 65 20 6d 61 69 6c 20 73 |es of th|e mail s|
|00003b70| 68 6f 75 6c 64 20 62 65 | 20 73 65 6e 74 2e 7c 4d |hould be| sent.|M|
|00003b80| 59 6f 75 20 6d 61 79 20 | 65 6e 74 65 72 20 6d 6f |You may |enter mo|
|00003b90| 72 65 20 74 68 61 6e 20 | 6f 6e 65 20 6e 61 6d 65 |re than |one name|
|00003ba0| 20 62 79 20 73 65 70 61 | 72 61 74 69 6e 67 20 74 | by sepa|rating t|
|00003bb0| 68 65 6d 20 77 69 74 68 | 20 63 6f 6d 6d 61 73 2e |hem with| commas.|
|00003bc0| 22 0d 13 92 60 20 20 20 | c9 20 32 3a 20 24 74 6f |"...` |. 2: $to|
|00003bd0| 25 2b 3d 22 61 6e 64 20 | 74 79 70 65 20 69 6e 20 |%+="and |type in |
|00003be0| 74 68 65 20 73 75 62 6a | 65 63 74 20 6f 66 20 74 |the subj|ect of t|
|00003bf0| 68 65 20 6d 61 69 6c 2e | 7c 4d 50 72 65 73 73 69 |he mail.||MPressi|
|00003c00| 6e 67 20 72 65 74 75 72 | 6e 20 68 65 72 65 20 73 |ng retur|n here s|
|00003c10| 65 6e 64 73 20 74 68 65 | 20 6d 61 69 6c 2e 7c 4d |ends the| mail.|M|
|00003c20| 22 0d 13 9c 77 20 20 20 | c9 20 33 3a 20 24 74 6f |"...w |. 3: $to|
|00003c30| 25 2b 3d 22 61 6e 64 20 | 74 79 70 65 20 74 68 65 |%+="and |type the|
|00003c40| 20 6e 61 6d 65 20 74 6f | 20 62 65 20 75 73 65 64 | name to| be used|
|00003c50| 20 66 6f 72 20 74 68 65 | 20 73 65 6e 64 65 72 20 | for the| sender |
|00003c60| 6f 66 20 74 68 65 20 6d | 61 69 6c 2e 7c 4d 59 6f |of the m|ail.|MYo|
|00003c70| 75 20 77 69 6c 6c 20 6e | 6f 74 20 75 73 75 61 6c |u will n|ot usual|
|00003c80| 6c 79 20 6e 65 65 64 20 | 74 6f 20 63 68 61 6e 67 |ly need |to chang|
|00003c90| 65 20 74 68 69 73 2e 22 | 0d 13 a6 68 20 20 20 c9 |e this."|...h .|
|00003ca0| 20 34 3a 20 24 74 6f 25 | 2b 3d 22 61 6e 64 20 74 | 4: $to%|+="and t|
|00003cb0| 79 70 65 20 69 6e 20 74 | 68 65 20 6e 61 6d 65 20 |ype in t|he name |
|00003cc0| 6f 66 20 74 68 65 20 66 | 69 6c 65 20 74 6f 20 73 |of the f|ile to s|
|00003cd0| 65 6e 64 2e 7c 4d 59 6f | 75 20 77 69 6c 6c 20 6e |end.|MYo|u will n|
|00003ce0| 6f 74 20 75 73 75 61 6c | 6c 79 20 6e 65 65 64 20 |ot usual|ly need |
|00003cf0| 74 6f 20 63 68 61 6e 67 | 65 20 74 68 69 73 2e 22 |to chang|e this."|
|00003d00| 0d 13 b0 82 20 20 20 c9 | 20 31 31 3a 20 24 74 6f |.... .| 11: $to|
|00003d10| 25 2b 3d 22 74 6f 20 73 | 65 74 20 77 68 65 74 68 |%+="to s|et wheth|
|00003d20| 65 72 20 61 6e 20 61 63 | 6b 6e 6f 77 6c 65 64 67 |er an ac|knowledg|
|00003d30| 65 6d 65 6e 74 20 6f 66 | 20 72 65 63 69 70 74 20 |ement of| recipt |
|00003d40| 6f 66 20 74 68 65 20 6d | 61 69 6c 20 69 73 20 74 |of the m|ail is t|
|00003d50| 6f 20 62 65 20 73 65 6e | 74 20 62 61 63 6b 2e 7c |o be sen|t back.||
|00003d60| 4d 54 68 65 20 63 75 72 | 72 65 6e 74 20 73 65 74 |MThe cur|rent set|
|00003d70| 74 69 6e 67 20 69 73 20 | 66 6f 72 20 6d 61 69 6c |ting is |for mail|
|00003d80| 20 22 0d 13 ba 4d 20 20 | 20 20 e7 20 61 63 6b 20 | "...M | . ack |
|00003d90| 8c 20 24 74 6f 25 2b 3d | 22 74 6f 20 62 65 20 61 |. $to%+=|"to be a|
|00003da0| 63 6b 6e 6f 77 6c 65 64 | 67 65 64 2e 22 20 8b 20 |cknowled|ged." . |
|00003db0| 24 74 6f 25 2b 3d 22 6e | 6f 74 20 74 6f 20 62 65 |$to%+="n|ot to be|
|00003dc0| 20 61 63 6b 6e 6f 77 6c | 65 64 67 65 64 2e 22 0d | acknowl|edged.".|
|00003dd0| 13 c4 11 20 20 20 7f 3a | 20 24 74 6f 25 3d 22 22 |... .:| $to%=""|
|00003de0| 0d 13 ce 07 20 20 cb 0d | 13 d8 15 20 c9 20 63 68 |.... ..|... . ch|
|00003df0| 6f 69 63 65 73 77 69 6e | 64 6f 77 25 0d 13 e2 1a |oiceswin|dow%....|
|00003e00| 20 20 24 74 6f 25 3d 22 | 43 6c 69 63 6b 20 53 45 | $to%="|Click SE|
|00003e10| 4c 45 43 54 20 22 0d 13 | ec 10 20 20 c8 8e 20 69 |LECT "..|.. .. i|
|00003e20| 63 6f 6e 25 20 ca 0d 13 | f6 33 20 20 20 c9 20 30 |con% ...|.3 . 0|
|00003e30| 3a 20 24 74 6f 25 2b 3d | 22 74 6f 20 73 65 74 20 |: $to%+=|"to set |
|00003e40| 74 68 65 20 69 6e 64 69 | 63 61 74 65 64 20 63 68 |the indi|cated ch|
|00003e50| 6f 69 63 65 73 2e 7c 4d | 22 0d 14 00 35 20 20 20 |oices.|M|"...5 |
|00003e60| c9 20 31 3a 20 24 74 6f | 25 2b 3d 22 74 6f 20 6c |. 1: $to|%+="to l|
|00003e70| 65 61 76 65 20 74 68 65 | 20 63 68 6f 69 63 65 73 |eave the| choices|
|00003e80| 20 75 6e 63 68 61 6e 67 | 65 64 2e 7c 4d 22 0d 14 | unchang|ed.|M"..|
|00003e90| 0a 5e 20 20 20 c9 20 32 | 3a 20 24 74 6f 25 2b 3d |.^ . 2|: $to%+=|
|00003ea0| 22 61 6e 64 20 74 79 70 | 65 20 69 6e 20 74 68 65 |"and typ|e in the|
|00003eb0| 20 6e 61 6d 65 20 6f 66 | 20 74 68 65 20 66 69 6c | name of| the fil|
|00003ec0| 65 20 75 73 65 64 20 74 | 6f 20 73 74 6f 72 65 20 |e used t|o store |
|00003ed0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 6d 61 69 6c |the curr|ent mail|
|00003ee0| 20 6d 65 73 73 61 67 65 | 2e 7c 4d 22 0d 14 14 65 | message|.|M"...e|
|00003ef0| 20 20 20 c9 20 33 3a 20 | 24 74 6f 25 2b 3d 22 61 | . 3: |$to%+="a|
|00003f00| 6e 64 20 74 79 70 65 20 | 69 6e 20 74 68 65 20 6e |nd type |in the n|
|00003f10| 61 6d 65 20 6f 66 20 74 | 68 65 20 66 69 6c 65 20 |ame of t|he file |
|00003f20| 75 73 65 64 20 74 6f 20 | 6b 65 65 70 20 61 20 70 |used to |keep a p|
|00003f30| 65 72 6d 61 6e 65 6e 74 | 20 6c 6f 67 20 6f 66 20 |ermanent| log of |
|00003f40| 6d 61 69 6c 20 6d 65 73 | 73 61 67 65 73 2e 7c 4d |mail mes|sages.|M|
|00003f50| 22 0d 14 1e 60 20 20 20 | c9 20 34 3a 20 24 74 6f |"...` |. 4: $to|
|00003f60| 25 2b 3d 22 61 6e 64 20 | 74 79 70 65 20 69 6e 20 |%+="and |type in |
|00003f70| 74 68 65 20 6e 61 6d 65 | 20 74 6f 20 62 65 20 75 |the name| to be u|
|00003f80| 73 65 64 20 61 73 20 74 | 68 65 20 73 65 6e 64 65 |sed as t|he sende|
|00003f90| 72 20 6f 66 20 6d 61 69 | 6c 20 6d 65 73 73 61 67 |r of mai|l messag|
|00003fa0| 65 73 20 62 79 20 64 65 | 66 61 75 6c 74 2e 7c 4d |es by de|fault.|M|
|00003fb0| 22 0d 14 28 52 20 20 20 | c9 20 35 3a 20 24 74 6f |"..(R |. 5: $to|
|00003fc0| 25 2b 3d 22 61 6e 64 20 | 74 79 70 65 20 69 6e 20 |%+="and |type in |
|00003fd0| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 74 68 65 20 |the name| of the |
|00003fe0| 6d 61 69 6c 20 69 6e 74 | 72 61 79 20 66 69 6c 65 |mail int|ray file|
|00003ff0| 20 6f 6e 20 74 68 65 20 | 6e 65 74 77 6f 72 6b 2e | on the |network.|
|00004000| 7c 4d 22 0d 14 32 75 20 | 20 20 c9 20 36 3a 20 24 ||M"..2u | . 6: $|
|00004010| 74 6f 25 2b 3d 22 74 6f | 20 73 65 74 20 77 68 65 |to%+="to| set whe|
|00004020| 74 68 65 72 20 74 68 65 | 20 4d 61 69 6c 4d 61 6e |ther the| MailMan|
|00004030| 20 77 69 6c 6c 20 62 6c | 65 65 70 20 77 68 65 6e | will bl|eep when|
|00004040| 20 6d 61 69 6c 20 61 72 | 72 69 76 65 73 2e 7c 4d | mail ar|rives.|M|
|00004050| 54 68 65 20 63 75 72 72 | 65 6e 74 20 73 65 74 74 |The curr|ent sett|
|00004060| 69 6e 67 20 69 73 20 66 | 6f 72 20 74 68 65 20 4d |ing is f|or the M|
|00004070| 61 69 6c 4d 61 6e 20 22 | 0d 14 3c 41 20 20 20 20 |ailMan "|..<A |
|00004080| e7 20 6e 65 77 42 6f 6e | 67 20 8c 20 24 74 6f 25 |. newBon|g . $to%|
|00004090| 20 2b 3d 20 22 74 6f 20 | 62 6c 65 65 70 2e 7c 4d | += "to |bleep.|M|
|000040a0| 22 20 8b 20 24 74 6f 25 | 2b 3d 22 6e 6f 74 20 74 |" . $to%|+="not t|
|000040b0| 6f 20 62 6c 65 65 70 2e | 22 0d 14 46 11 20 20 20 |o bleep.|"..F. |
|000040c0| 7f 3a 20 24 74 6f 25 3d | 22 22 0d 14 50 07 20 20 |.: $to%=|""..P. |
|000040d0| cb 0d 14 5a 05 cb 0d 14 | 64 10 3d 74 6f 25 2b a9 |...Z....|d.=to%+.|
|000040e0| 28 24 74 6f 25 29 0d 14 | 6e 05 20 0d 14 78 11 dd |($to%)..|n. ..x..|
|000040f0| f2 6e 6f 74 65 42 75 66 | 66 65 72 73 0d 14 82 0c |.noteBuf|fers....|
|00004100| 20 ea 20 69 63 6f 6e 25 | 0d 14 8c 21 20 69 63 6f | . icon%|...! ico|
|00004110| 6e 49 6e 66 6f 25 21 30 | 20 3d 20 63 68 6f 69 63 |nInfo%!0| = choic|
|00004120| 65 73 77 69 6e 64 6f 77 | 25 0d 14 96 69 20 e3 20 |eswindow|%...i . |
|00004130| 69 63 6f 6e 25 20 3d 20 | 32 20 b8 20 35 3a 69 63 |icon% = |2 . 5:ic|
|00004140| 6f 6e 49 6e 66 6f 25 21 | 34 20 3d 20 69 63 6f 6e |onInfo%!|4 = icon|
|00004150| 25 3a c8 99 20 57 69 6d | 70 5f 47 65 74 49 63 6f |%:.. Wim|p_GetIco|
|00004160| 6e 49 6e 66 6f 2c 2c 69 | 63 6f 6e 49 6e 66 6f 25 |nInfo,,i|conInfo%|
|00004170| 3a 63 68 6f 69 63 65 25 | 28 69 63 6f 6e 25 2d 32 |:choice%|(icon%-2|
|00004180| 29 20 3d 20 69 63 6f 6e | 49 6e 66 6f 25 21 32 38 |) = icon|Info%!28|
|00004190| 3a ed 0d 14 a0 05 e1 0d | 14 aa 05 20 0d 14 b4 19 |:.......|... ....|
|000041a0| dd a4 62 75 66 66 4c 65 | 6e 67 74 68 28 62 75 66 |..buffLe|ngth(buf|
|000041b0| 66 65 72 25 29 0d 14 be | 09 20 ea 20 6c 25 0d 14 |fer%)...|. . l%..|
|000041c0| c8 42 20 e3 20 6c 25 3d | 30 b8 32 35 35 3a e7 62 |.B . l%=|0.255:.b|
|000041d0| 75 66 66 65 72 25 3f 6c | 25 3d 31 33 20 84 20 62 |uffer%?l|%=13 . b|
|000041e0| 75 66 66 65 72 25 3f 6c | 25 3d 31 30 20 84 20 62 |uffer%?l|%=10 . b|
|000041f0| 75 66 66 65 72 25 3f 6c | 25 3d 30 20 8c 3d 6c 25 |uffer%?l|%=0 .=l%|
|00004200| 0d 14 d2 06 20 ed 0d 14 | dc 08 3d 32 35 35 0d 14 |.... ...|..=255..|
|00004210| e6 05 20 0d 14 f0 3c dd | a4 74 6f 43 74 72 6c 28 |.. ...<.|.toCtrl(|
|00004220| 66 72 6f 6d 25 2c 20 74 | 6f 25 29 20 3a f4 20 7c |from%, t|o%) :. ||
|00004230| 4d 20 2d 3e 20 63 68 2e | 63 6f 64 65 20 31 33 2c |M -> ch.|code 13,|
|00004240| 20 72 65 74 75 72 6e 73 | 20 6c 65 6e 67 74 68 0d | returns| length.|
|00004250| 14 fa 17 20 ea 20 66 25 | 2c 74 25 3a 66 25 3d 30 |... . f%|,t%:f%=0|
|00004260| 3a 74 25 3d 2d 31 0d 15 | 04 06 20 f5 0d 15 0e 65 |:t%=-1..|.. ....e|
|00004270| 20 74 25 2b 3d 31 3a e7 | 66 72 6f 6d 25 3f 66 25 | t%+=1:.|from%?f%|
|00004280| 3d 97 22 7c 22 80 28 66 | 72 6f 6d 25 3f 28 66 25 |=."|".(f|rom%?(f%|
|00004290| 2b 31 29 3d 97 22 4d 22 | 84 66 72 6f 6d 25 3f 28 |+1)=."M"|.from%?(|
|000042a0| 66 25 2b 31 29 3d 97 22 | 6d 22 29 8c 74 6f 25 3f |f%+1)=."|m").to%?|
|000042b0| 74 25 3d 31 33 3a 66 25 | 2b 3d 32 8b 74 6f 25 3f |t%=13:f%|+=2.to%?|
|000042c0| 74 25 3d 66 72 6f 6d 25 | 3f 66 25 3a 66 25 2b 3d |t%=from%|?f%:f%+=|
|000042d0| 31 0d 15 18 0f 20 fd 20 | 74 6f 25 3f 74 25 3d 30 |1.... . |to%?t%=0|
|000042e0| 0d 15 22 07 3d 74 25 0d | 15 2c 05 20 0d 15 36 24 |..".=t%.|.,. ..6$|
|000042f0| dd f2 72 65 67 69 73 74 | 65 72 43 68 6f 69 63 65 |..regist|erChoice|
|00004300| 73 28 63 68 65 63 6b 25 | 2c 20 6b 65 65 70 25 29 |s(check%|, keep%)|
|00004310| 0d 15 40 12 20 ea 20 69 | 25 2c 20 6c 65 6e 67 74 |..@. . i|%, lengt|
|00004320| 68 25 0d 15 4a 14 20 e3 | 20 69 25 3d 30 b8 6d 61 |h%..J. .| i%=0.ma|
|00004330| 78 56 61 72 73 25 0d 15 | 54 26 20 20 6c 65 6e 67 |xVars%..|T& leng|
|00004340| 74 68 25 3d a4 62 75 66 | 66 4c 65 6e 67 74 68 28 |th%=.buf|fLength(|
|00004350| 63 68 6f 69 63 65 25 28 | 69 25 29 29 0d 15 5e 1e |choice%(|i%))..^.|
|00004360| 20 20 e7 20 6c 65 6e 67 | 74 68 25 3d 30 20 8c 20 | . leng|th%=0 . |
|00004370| 6c 65 6e 67 74 68 25 3d | 2d 31 0d 15 68 3e 20 20 |length%=|-1..h> |
|00004380| c8 99 20 22 58 4f 53 5f | 53 65 74 56 61 72 56 61 |.. "XOS_|SetVarVa|
|00004390| 6c 22 2c 76 61 72 6e 61 | 6d 65 73 24 28 69 25 29 |l",varna|mes$(i%)|
|000043a0| 2c 63 68 6f 69 63 65 25 | 28 69 25 29 2c 6c 65 6e |,choice%|(i%),len|
|000043b0| 67 74 68 25 2c 30 2c 30 | 0d 15 72 06 20 ed 0d 15 |gth%,0,0|..r. ...|
|000043c0| 7c 3a 20 f2 73 65 74 4d | 61 69 6c 53 6f 75 72 63 ||: .setM|ailSourc|
|000043d0| 65 3a e7 20 63 68 65 63 | 6b 25 20 f2 63 68 65 63 |e:. chec|k% .chec|
|000043e0| 6b 4d 61 69 6c 53 6f 75 | 72 63 65 3a 62 6f 6e 67 |kMailSou|rce:bong|
|000043f0| 3d 6e 65 77 42 6f 6e 67 | 0d 15 86 0f 20 f2 6e 6f |=newBong|.... .no|
|00004400| 74 65 53 63 72 61 70 0d | 15 90 1d 20 e7 20 ac 6b |teScrap.|... . .k|
|00004410| 65 65 70 25 20 8c 20 c8 | 99 20 43 72 4d 65 6e 75 |eep% . .|. CrMenu|
|00004420| 2c 2c 2d 31 0d 15 9a 05 | e1 0d 15 a4 05 20 0d 15 |,,-1....|..... ..|
|00004430| ae 11 dd f2 73 61 76 65 | 43 68 6f 69 63 65 73 0d |....save|Choices.|
|00004440| 15 b8 4b 20 ea 20 69 25 | 2c 66 69 6c 65 25 2c 76 |..K . i%|,file%,v|
|00004450| 61 6c 75 65 24 3a ea 20 | 85 3a ee 85 20 ea 20 69 |alue$:. |.:.. . i|
|00004460| 6e 74 65 72 6e 61 6c 25 | 3d a3 3a d9 23 66 69 6c |nternal%|=.:.#fil|
|00004470| 65 25 3a f2 65 72 72 6f | 72 62 6f 78 3a 69 6e 74 |e%:.erro|rbox:int|
|00004480| 65 72 6e 61 6c 25 3d b9 | 3a e1 0d 15 c2 2c 20 66 |ernal%=.|:...., f|
|00004490| 69 6c 65 25 3d 30 3a 66 | 69 6c 65 25 3d ae 22 3c |ile%=0:f|ile%=."<|
|000044a0| 4d 61 69 6c 4d 61 6e 24 | 44 69 72 3e 2e 21 43 68 |MailMan$|Dir>.!Ch|
|000044b0| 6f 69 63 65 73 22 0d 15 | cc 14 20 e3 20 69 25 3d |oices"..|.. . i%=|
|000044c0| 30 b8 6d 61 78 56 61 72 | 73 25 0d 15 d6 60 20 20 |0.maxVar|s%...` |
|000044d0| 6c 65 6e 67 74 68 25 3d | a4 72 65 61 64 56 61 72 |length%=|.readVar|
|000044e0| 28 69 25 2c 62 75 66 66 | 65 72 25 2c 32 35 36 29 |(i%,buff|er%,256)|
|000044f0| 3a f2 66 72 6f 6d 43 74 | 72 6c 28 62 75 66 66 65 |:.fromCt|rl(buffe|
|00004500| 72 25 2c 20 63 68 6f 69 | 63 65 25 28 69 25 29 29 |r%, choi|ce%(i%))|
|00004510| 3a 76 61 6c 75 65 24 3d | a4 72 74 6f 7a 28 63 68 |:value$=|.rtoz(ch|
|00004520| 6f 69 63 65 25 28 69 25 | 29 29 0d 15 e0 35 20 20 |oice%(i%|))...5 |
|00004530| e7 20 76 61 6c 75 65 24 | 20 3c 3e 20 22 22 20 8c |. value$| <> "" .|
|00004540| 20 d5 23 66 69 6c 65 25 | 2c 69 25 2b 97 22 30 22 | .#file%|,i%+."0"|
|00004550| 3a d5 23 66 69 6c 65 25 | 2c 76 61 6c 75 65 24 0d |:.#file%|,value$.|
|00004560| 15 ea 06 20 ed 0d 15 f4 | 29 20 e7 20 62 6f 6e 67 |... ....|) . bong|
|00004570| 20 8c 20 d5 23 66 69 6c | 65 25 2c 97 22 39 22 3a | . .#fil|e%,."9":|
|00004580| d5 23 66 69 6c 65 25 2c | 22 42 6f 6e 67 22 0d 15 |.#file%,|"Bong"..|
|00004590| fe 0c 20 d9 23 66 69 6c | 65 25 0d 16 08 2b 20 ff |.. .#fil|e%...+ .|
|000045a0| 22 53 65 74 74 79 70 65 | 20 3c 4d 61 69 6c 4d 61 |"Settype| <MailMa|
|000045b0| 6e 24 44 69 72 3e 2e 21 | 43 68 6f 69 63 65 73 20 |n$Dir>.!|Choices |
|000045c0| 44 61 74 61 22 0d 16 12 | 05 e1 0d 16 1c 05 20 0d |Data"...|...... .|
|000045d0| 16 26 2e dd f2 66 72 6f | 6d 43 74 72 6c 28 66 72 |.&...fro|mCtrl(fr|
|000045e0| 6f 6d 25 2c 20 74 6f 25 | 29 20 3a f4 20 63 68 2e |om%, to%|) :. ch.|
|000045f0| 63 6f 64 65 20 31 33 20 | 2d 3e 20 7c 4d 0d 16 30 |code 13 |-> |M..0|
|00004600| 18 20 ea 20 66 25 2c 74 | 25 3a 66 25 3d 2d 31 3a |. . f%,t|%:f%=-1:|
|00004610| 74 25 3d 2d 31 0d 16 3a | 4e 20 20 f5 3a 66 25 2b |t%=-1..:|N .:f%+|
|00004620| 3d 31 3a 74 25 2b 3d 31 | 3a e7 66 72 6f 6d 25 3f |=1:t%+=1|:.from%?|
|00004630| 66 25 3d 31 33 8c 74 6f | 25 3f 74 25 3d 97 22 7c |f%=13.to|%?t%=."||
|00004640| 22 3a 74 25 2b 3d 31 3a | 74 6f 25 3f 74 25 3d 97 |":t%+=1:|to%?t%=.|
|00004650| 22 4d 22 8b 74 6f 25 3f | 74 25 3d 66 72 6f 6d 25 |"M".to%?|t%=from%|
|00004660| 3f 66 25 0d 16 44 11 20 | 20 fd 66 72 6f 6d 25 3f |?f%..D. | .from%?|
|00004670| 66 25 3d 30 0d 16 4e 05 | e1 0d 16 58 05 20 0d 16 |f%=0..N.|...X. ..|
|00004680| 62 13 dd f2 66 69 6c 6c | 49 6e 43 68 6f 69 63 65 |b...fill|InChoice|
|00004690| 73 0d 16 6c 12 20 ea 20 | 6c 65 6e 67 74 68 25 2c |s..l. . |length%,|
|000046a0| 20 69 25 0d 16 76 14 20 | e3 20 69 25 3d 30 b8 6d | i%..v. |. i%=0.m|
|000046b0| 61 78 56 61 72 73 25 0d | 16 80 46 20 20 6c 65 6e |axVars%.|..F len|
|000046c0| 67 74 68 25 3d a4 72 65 | 61 64 56 61 72 28 69 25 |gth%=.re|adVar(i%|
|000046d0| 2c 62 75 66 66 65 72 25 | 2c 32 35 36 29 3a f2 66 |,buffer%|,256):.f|
|000046e0| 72 6f 6d 43 74 72 6c 28 | 62 75 66 66 65 72 25 2c |romCtrl(|buffer%,|
|000046f0| 20 63 68 6f 69 63 65 25 | 28 69 25 29 29 0d 16 8a | choice%|(i%))...|
|00004700| 06 20 ed 0d 16 94 05 e1 | 0d 16 9e 05 20 0d 16 a8 |. ......|.... ...|
|00004710| 13 dd f2 73 65 74 4d 61 | 69 6c 53 6f 75 72 63 65 |...setMa|ilSource|
|00004720| 0d 16 b2 26 20 43 25 3d | a4 72 65 61 64 56 61 72 |...& C%=|.readVar|
|00004730| 28 73 6f 75 72 63 65 2c | 20 62 75 66 66 65 72 25 |(source,| buffer%|
|00004740| 2c 20 32 35 36 29 0d 16 | bc 57 20 e7 20 43 25 3d |, 256)..|.W . C%=|
|00004750| 30 20 8c 20 6d 6e 61 6d | 65 24 3d 22 6e 65 74 3a |0 . mnam|e$="net:|
|00004760| 26 2e 6d 61 69 6c 2e 69 | 6e 74 72 61 79 22 3a f2 |&.mail.i|ntray":.|
|00004770| 73 65 74 56 61 72 28 73 | 6f 75 72 63 65 2c 6d 6e |setVar(s|ource,mn|
|00004780| 61 6d 65 24 29 20 8b 20 | 6d 6e 61 6d 65 24 3d a4 |ame$) . |mname$=.|
|00004790| 72 74 6f 7a 28 62 75 66 | 66 65 72 25 29 0d 16 c6 |rtoz(buf|fer%)...|
|000047a0| 39 20 43 25 3d a7 6d 6e | 61 6d 65 24 2c 22 3a 22 |9 C%=.mn|ame$,":"|
|000047b0| 29 3a e7 c1 6d 6e 61 6d | 65 24 2c 43 25 2b 31 2c |):..mnam|e$,C%+1,|
|000047c0| 31 29 3d 22 3a 22 20 43 | 25 3d a7 6d 6e 61 6d 65 |1)=":" C|%=.mname|
|000047d0| 24 2c 22 2e 22 29 0d 16 | d0 17 20 66 6e 61 6d 65 |$,".")..|.. fname|
|000047e0| 24 3d c0 6d 6e 61 6d 65 | 24 2c 43 25 29 0d 16 da |$=.mname|$,C%)...|
|000047f0| 05 e1 0d 16 e4 05 20 0d | 16 ee 15 dd f2 63 68 65 |...... .|.....che|
|00004800| 63 6b 4d 61 69 6c 53 6f | 75 72 63 65 0d 16 f8 1a |ckMailSo|urce....|
|00004810| 20 ea 20 66 6c 61 67 73 | 25 2c 20 65 78 69 73 74 | . flags|%, exist|
|00004820| 73 25 3a ea 20 85 0d 17 | 02 2d 20 ee 85 20 ea 20 |s%:. ...|.- .. . |
|00004830| 69 6e 74 65 72 6e 61 6c | 25 3d a3 3a f2 65 72 72 |internal|%=.:.err|
|00004840| 6f 72 62 6f 78 3a 69 6e | 74 65 72 6e 61 6c 25 3d |orbox:in|ternal%=|
|00004850| b9 3a e1 0d 17 0c 24 20 | c8 99 20 22 4f 53 5f 46 |.:....$ |.. "OS_F|
|00004860| 69 6c 65 22 2c 35 2c 6d | 6e 61 6d 65 24 20 b8 20 |ile",5,m|name$ . |
|00004870| 65 78 69 73 74 73 25 0d | 17 16 12 20 e7 20 65 78 |exists%.|... . ex|
|00004880| 69 73 74 73 25 3d 30 20 | 8c 0d 17 20 62 20 20 21 |ists%=0 |... b !|
|00004890| 62 75 66 66 65 72 25 3d | 30 3a 24 28 62 75 66 66 |buffer%=|0:$(buff|
|000048a0| 65 72 25 2b 34 29 3d 22 | 4d 61 69 6c 20 73 6f 75 |er%+4)="|Mail sou|
|000048b0| 72 63 65 20 27 22 2b 6d | 6e 61 6d 65 24 2b 22 27 |rce '"+m|name$+"'|
|000048c0| 20 64 6f 65 73 20 6e 6f | 74 20 65 78 69 73 74 2e | does no|t exist.|
|000048d0| 20 44 6f 20 79 6f 75 20 | 77 61 6e 74 20 74 6f 20 | Do you |want to |
|000048e0| 63 72 65 61 74 65 20 69 | 74 3f 22 0d 17 2a 11 20 |create i|t?"..*. |
|000048f0| 20 c8 99 20 44 72 61 67 | 2c 2c 2d 31 0d 17 34 3d | .. Drag|,,-1..4=|
|00004900| 20 20 c8 99 20 22 57 69 | 6d 70 5f 52 65 70 6f 72 | .. "Wi|mp_Repor|
|00004910| 74 45 72 72 6f 72 22 2c | 62 75 66 66 65 72 25 2c |tError",|buffer%,|
|00004920| 26 31 33 2c 22 4d 61 69 | 6c 20 4d 61 6e 22 20 b8 |&13,"Mai|l Man" .|
|00004930| 20 2c 63 72 65 61 74 65 | 25 0d 17 3e 30 20 20 e7 | ,create|%..>0 .|
|00004940| 20 63 72 65 61 74 65 25 | 3c 3e 31 20 8c 20 e1 20 | create%|<>1 . . |
|00004950| 8b 20 e7 20 a4 63 72 65 | 61 74 65 54 72 65 65 28 |. . .cre|ateTree(|
|00004960| 6d 6e 61 6d 65 24 29 20 | 8c 0d 17 48 2e 20 20 20 |mname$) |...H. |
|00004970| c8 99 20 22 58 4f 53 5f | 43 4c 49 22 2c 22 63 72 |.. "XOS_|CLI","cr|
|00004980| 65 61 74 65 20 22 2b 6d | 6e 61 6d 65 24 20 b8 20 |eate "+m|name$ . |
|00004990| 3b 66 6c 61 67 73 25 0d | 17 52 1d 20 20 20 e7 20 |;flags%.|.R. . |
|000049a0| 28 66 6c 61 67 73 25 20 | 80 20 31 29 20 3d 20 30 |(flags% |. 1) = 0|
|000049b0| 20 8c 20 e1 0d 17 5c 21 | 20 20 20 ff 22 53 65 74 | . ...\!| ."Set|
|000049c0| 54 79 70 65 20 22 2b 6d | 6e 61 6d 65 24 2b 22 20 |Type "+m|name$+" |
|000049d0| 54 65 78 74 22 0d 17 66 | 07 20 20 cd 0d 17 70 3b |Text"..f|. ...p;|
|000049e0| 20 20 f2 72 65 70 6f 72 | 74 28 32 30 30 34 2c 22 | .repor|t(2004,"|
|000049f0| 54 68 65 20 6d 61 69 6c | 20 73 6f 75 72 63 65 20 |The mail| source |
|00004a00| 63 6f 75 6c 64 20 6e 6f | 74 20 62 65 20 63 72 65 |could no|t be cre|
|00004a10| 61 74 65 64 2e 22 29 0d | 17 7a 06 20 cd 0d 17 84 |ated.").|.z. ....|
|00004a20| 05 e1 0d 17 8e 05 20 0d | 17 98 17 dd a4 63 72 65 |...... .|.....cre|
|00004a30| 61 74 65 54 72 65 65 28 | 6e 61 6d 65 24 29 0d 17 |ateTree(|name$)..|
|00004a40| a2 47 20 f4 20 52 65 63 | 75 72 73 69 76 65 6c 79 |.G . Rec|ursively|
|00004a50| 20 73 74 72 69 70 20 6c | 65 61 66 20 6f 66 66 2c | strip l|eaf off,|
|00004a60| 20 74 65 73 74 20 66 6f | 72 20 65 78 69 73 74 65 | test fo|r existe|
|00004a70| 6e 63 65 20 61 6e 64 20 | 74 72 79 20 74 6f 20 63 |nce and |try to c|
|00004a80| 72 65 61 74 65 0d 17 ac | 2b 20 ea 20 69 25 2c 20 |reate...|+ . i%, |
|00004a90| 72 6f 6f 74 24 2c 20 65 | 78 69 73 74 73 25 2c 20 |root$, e|xists%, |
|00004aa0| 66 6c 61 67 73 25 2c 20 | 6d 69 64 24 3a ea 20 85 |flags%, |mid$:. .|
|00004ab0| 0d 17 b6 16 20 ee 85 20 | ea 20 f2 65 72 72 6f 72 |.... .. |. .error|
|00004ac0| 62 6f 78 3a 3d a3 0d 17 | c0 19 20 e3 20 69 25 3d |box:=...|.. . i%=|
|00004ad0| a9 6e 61 6d 65 24 20 b8 | 20 31 20 88 20 2d 31 0d |.name$ .| 1 . -1.|
|00004ae0| 17 ca 17 20 20 6d 69 64 | 24 3d c1 6e 61 6d 65 24 |... mid|$=.name$|
|00004af0| 2c 69 25 2c 31 29 0d 17 | d4 12 20 20 e7 20 6d 69 |,i%,1)..|.. . mi|
|00004b00| 64 24 3d 22 2e 22 20 8c | 0d 17 de 19 20 20 20 72 |d$="." .|.... r|
|00004b10| 6f 6f 74 24 3d c0 6e 61 | 6d 65 24 2c 69 25 2d 31 |oot$=.na|me$,i%-1|
|00004b20| 29 0d 17 e8 33 20 20 20 | c8 99 22 4f 53 5f 46 69 |)...3 |.."OS_Fi|
|00004b30| 6c 65 22 2c 35 2c 72 6f | 6f 74 24 20 b8 20 65 78 |le",5,ro|ot$ . ex|
|00004b40| 69 73 74 73 25 3a e7 20 | 65 78 69 73 74 73 25 20 |ists%:. |exists% |
|00004b50| 8c 20 3d b9 0d 17 f2 56 | 20 20 20 c8 99 22 58 4f |. =....V| .."XO|
|00004b60| 53 5f 43 4c 49 22 2c 22 | 63 64 69 72 20 22 2b 72 |S_CLI","|cdir "+r|
|00004b70| 6f 6f 74 24 20 b8 20 3b | 66 6c 61 67 73 25 3a e7 |oot$ . ;|flags%:.|
|00004b80| 20 28 66 6c 61 67 73 25 | 20 80 20 31 29 3d 31 20 | (flags%| . 1)=1 |
|00004b90| 8c 20 3d a4 63 72 65 61 | 74 65 54 72 65 65 28 72 |. =.crea|teTree(r|
|00004ba0| 6f 6f 74 24 29 20 8b 20 | 3d b9 0d 17 fc 07 20 20 |oot$) . |=..... |
|00004bb0| cc 0d 18 06 2c 20 20 20 | e7 20 6d 69 64 24 3d 22 |...., |. mid$="|
|00004bc0| 26 22 20 84 20 6d 69 64 | 24 3d 22 24 22 20 84 20 |&" . mid|$="$" . |
|00004bd0| 6d 69 64 24 3d 22 3a 22 | 20 8c 20 3d a3 0d 18 10 |mid$=":"| . =....|
|00004be0| 07 20 20 cd 0d 18 1a 06 | 20 ed 0d 18 24 06 3d a3 |. .....| ...$.=.|
|00004bf0| 0d 18 2e 05 20 0d 18 38 | 1f dd f2 73 65 74 46 69 |.... ..8|...setFi|
|00004c00| 6c 65 28 62 75 66 66 65 | 72 25 2c 69 25 2c 6c 65 |le(buffe|r%,i%,le|
|00004c10| 61 66 24 29 0d 18 42 28 | 20 ea 20 6c 65 6e 67 74 |af$)..B(| . lengt|
|00004c20| 68 25 2c 20 6e 61 6d 65 | 24 2c 20 74 65 6d 70 25 |h%, name|$, temp%|
|00004c30| 3a de 20 74 65 6d 70 25 | 20 32 35 36 0d 18 4c 23 |:. temp%| 256..L#|
|00004c40| 20 6c 65 6e 67 74 68 25 | 3d a4 72 65 61 64 56 61 | length%|=.readVa|
|00004c50| 72 28 69 25 2c 74 65 6d | 70 25 2c 32 35 36 29 0d |r(i%,tem|p%,256).|
|00004c60| 18 56 6a 20 e7 20 6c 65 | 6e 67 74 68 25 3d 30 20 |.Vj . le|ngth%=0 |
|00004c70| 8c 20 6e 61 6d 65 24 3d | a4 72 74 6f 7a 28 62 75 |. name$=|.rtoz(bu|
|00004c80| 66 66 65 72 25 29 2b 6c | 65 61 66 24 2b bd 30 3a |ffer%)+l|eaf$+.0:|
|00004c90| f2 73 65 74 56 61 72 28 | 69 25 2c 6e 61 6d 65 24 |.setVar(|i%,name$|
|00004ca0| 29 3a 24 63 68 6f 69 63 | 65 25 28 69 25 29 3d 6e |):$choic|e%(i%)=n|
|00004cb0| 61 6d 65 24 3a 63 68 6f | 69 63 65 25 28 69 25 29 |ame$:cho|ice%(i%)|
|00004cc0| 3f a9 6e 61 6d 65 24 3d | 30 0d 18 60 05 e1 0d 18 |?.name$=|0..`....|
|00004cd0| 6a 05 20 0d 18 74 0f dd | f2 6e 6f 74 65 53 63 72 |j. ..t..|.noteScr|
|00004ce0| 61 70 0d 18 7e 53 20 c8 | 99 20 22 58 4f 53 5f 52 |ap..~S .|. "XOS_R|
|00004cf0| 65 61 64 56 61 72 56 61 | 6c 22 2c 22 4d 61 69 6c |eadVarVa|l","Mail|
|00004d00| 24 53 63 72 61 70 22 2c | 62 75 66 66 65 72 25 2c |$Scrap",|buffer%,|
|00004d10| 32 35 36 2c 30 2c 33 20 | b8 20 2c 2c 73 63 72 61 |256,0,3 |. ,,scra|
|00004d20| 70 43 25 3a 62 75 66 66 | 65 72 25 3f 73 63 72 61 |pC%:buff|er%?scra|
|00004d30| 70 43 25 3d 30 0d 18 88 | 38 20 e7 20 73 63 72 61 |pC%=0...|8 . scra|
|00004d40| 70 43 25 3d 30 20 8c 20 | 73 63 72 61 70 43 25 3d |pC%=0 . |scrapC%=|
|00004d50| a4 72 65 61 64 56 61 72 | 28 63 75 72 72 65 6e 74 |.readVar|(current|
|00004d60| 2c 62 75 66 66 65 72 25 | 2c 32 35 36 29 0d 18 92 |,buffer%|,256)...|
|00004d70| 34 20 e7 20 73 63 72 61 | 70 43 25 3d 30 20 8c 20 |4 . scra|pC%=0 . |
|00004d80| 73 63 72 61 70 24 3d 22 | 22 20 8b 20 73 63 72 61 |scrap$="|" . scra|
|00004d90| 70 24 3d a4 72 74 6f 7a | 28 62 75 66 66 65 72 25 |p$=.rtoz|(buffer%|
|00004da0| 29 0d 18 9c 05 e1 0d 18 | a6 05 20 0d 18 b0 11 dd |).......|.. .....|
|00004db0| f2 72 65 61 64 43 68 6f | 69 63 65 73 0d 18 ba 23 |.readCho|ices...#|
|00004dc0| 20 ea 20 69 25 2c 66 69 | 6c 65 25 2c 76 61 72 6e | . i%,fi|le%,varn|
|00004dd0| 61 6d 65 24 2c 76 61 6c | 75 65 24 3a ea 20 85 0d |ame$,val|ue$:. ..|
|00004de0| 18 c4 35 20 ee 85 20 ea | 20 69 6e 74 65 72 6e 61 |..5 .. .| interna|
|00004df0| 6c 25 3d a3 3a f2 65 72 | 72 6f 72 62 6f 78 3a 69 |l%=.:.er|rorbox:i|
|00004e00| 6e 74 65 72 6e 61 6c 25 | 3d b9 3a d9 23 66 69 6c |nternal%|=.:.#fil|
|00004e10| 65 25 3a e1 0d 18 ce 2f | 20 66 69 6c 65 25 3d 8e |e%:..../| file%=.|
|00004e20| 22 3c 4d 61 69 6c 4d 61 | 6e 24 44 69 72 3e 2e 21 |"<MailMa|n$Dir>.!|
|00004e30| 43 68 6f 69 63 65 73 22 | 3a e7 66 69 6c 65 25 3d |Choices"|:.file%=|
|00004e40| 30 8c e1 0d 18 d8 11 20 | c8 95 20 ac 20 c5 23 66 |0...... |.. . .#f|
|00004e50| 69 6c 65 25 0d 18 e2 24 | 20 20 69 25 3d 9a 23 66 |ile%...$| i%=.#f|
|00004e60| 69 6c 65 25 2d 97 22 30 | 22 3a 76 61 6c 75 65 24 |ile%-."0|":value$|
|00004e70| 3d be 23 66 69 6c 65 25 | 0d 18 ec 1c 20 20 e7 20 |=.#file%|.... . |
|00004e80| 69 25 3e 3d 30 80 69 25 | 3c 3d 6d 61 78 56 61 72 |i%>=0.i%|<=maxVar|
|00004e90| 73 25 20 8c 0d 18 f6 36 | 20 20 20 43 25 3d a4 72 |s% ....6| C%=.r|
|00004ea0| 65 61 64 56 61 72 28 69 | 25 2c 30 2c 2d 31 29 3a |eadVar(i|%,0,-1):|
|00004eb0| e7 43 25 3d 30 20 8c 20 | f2 73 65 74 56 61 72 28 |.C%=0 . |.setVar(|
|00004ec0| 69 25 2c 76 61 6c 75 65 | 24 29 0d 19 00 07 20 20 |i%,value|$).... |
|00004ed0| cc 0d 19 0a 21 20 20 20 | e7 69 25 3d 39 80 76 61 |....! |.i%=9.va|
|00004ee0| 6c 75 65 24 3d 22 42 6f | 6e 67 22 8c 62 6f 6e 67 |lue$="Bo|ng".bong|
|00004ef0| 3d b9 0d 19 14 07 20 20 | cd 0d 19 1e 06 20 ce 0d |=..... |..... ..|
|00004f00| 19 28 0c 20 d9 23 66 69 | 6c 65 25 0d 19 32 05 e1 |.(. .#fi|le%..2..|
|00004f10| 0d 19 3c 05 20 0d 19 46 | 21 dd a4 72 65 61 64 56 |..<. ..F|!..readV|
|00004f20| 61 72 28 76 61 72 25 2c | 20 74 6f 25 2c 20 6d 61 |ar(var%,| to%, ma|
|00004f30| 78 42 75 66 25 29 0d 19 | 50 0e 20 ea 20 6c 65 6e |xBuf%)..|P. . len|
|00004f40| 67 74 68 25 0d 19 5a 44 | 20 c8 99 20 22 58 4f 53 |gth%..ZD| .. "XOS|
|00004f50| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 76 61 72 |_ReadVar|Val",var|
|00004f60| 6e 61 6d 65 73 24 28 76 | 61 72 25 29 2c 74 6f 25 |names$(v|ar%),to%|
|00004f70| 2c 6d 61 78 42 75 66 25 | 2c 30 2c 33 20 b8 20 2c |,maxBuf%|,0,3 . ,|
|00004f80| 2c 6c 65 6e 67 74 68 25 | 0d 19 64 22 20 e7 20 6d |,length%|..d" . m|
|00004f90| 61 78 42 75 66 25 3c 3e | 2d 31 20 8c 20 74 6f 25 |axBuf%<>|-1 . to%|
|00004fa0| 3f 6c 65 6e 67 74 68 25 | 3d 30 0d 19 6e 0c 3d 6c |?length%|=0..n.=l|
|00004fb0| 65 6e 67 74 68 25 0d 19 | 78 05 20 0d 19 82 19 dd |ength%..|x. .....|
|00004fc0| f2 73 65 74 56 61 72 28 | 76 61 72 25 2c 20 66 72 |.setVar(|var%, fr|
|00004fd0| 6f 6d 24 29 0d 19 8c 38 | 20 c8 99 20 22 58 4f 53 |om$)...8| .. "XOS|
|00004fe0| 5f 53 65 74 56 61 72 56 | 61 6c 22 2c 76 61 72 6e |_SetVarV|al",varn|
|00004ff0| 61 6d 65 73 24 28 76 61 | 72 25 29 2c 66 72 6f 6d |ames$(va|r%),from|
|00005000| 24 2c a9 66 72 6f 6d 24 | 2c 30 2c 30 0d 19 96 05 |$,.from$|,0,0....|
|00005010| e1 0d 19 a0 05 20 0d 19 | aa 13 dd f2 72 65 64 72 |..... ..|....redr|
|00005020| 61 77 43 68 6f 69 63 65 | 73 0d 19 b4 3f 20 f2 73 |awChoice|s...? .s|
|00005030| 74 61 72 74 43 68 6f 69 | 63 65 73 3a c8 99 20 22 |tartChoi|ces:.. "|
|00005040| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00005050| 22 2c 68 61 6e 64 6c 65 | 25 2c 30 2c 2d 31 30 32 |",handle|%,0,-102|
|00005060| 34 2c 31 32 38 30 2c 30 | 0d 19 be 23 20 c8 99 20 |4,1280,0|...# .. |
|00005070| 22 57 69 6d 70 5f 47 65 | 74 43 61 72 65 74 50 6f |"Wimp_Ge|tCaretPo|
|00005080| 73 69 74 69 6f 6e 22 2c | 2c 71 25 0d 19 c8 35 20 |sition",|,q%...5 |
|00005090| e7 20 21 71 25 3d 63 68 | 6f 69 63 65 73 77 69 6e |. !q%=ch|oiceswin|
|000050a0| 64 6f 77 25 20 8c 20 f2 | 73 65 74 43 61 72 65 74 |dow% . .|setCaret|
|000050b0| 28 21 71 25 2c 71 25 21 | 34 2c 71 25 21 32 30 29 |(!q%,q%!|4,q%!20)|
|000050c0| 0d 19 d2 05 e1 0d 19 dc | 05 20 0d 19 e6 3d dc 20 |........|. ...=. |
|000050d0| 22 4d 61 69 6c 24 43 75 | 72 72 65 6e 74 22 2c 22 |"Mail$Cu|rrent","|
|000050e0| 4d 61 69 6c 24 4c 6f 67 | 46 69 6c 65 22 2c 22 4d |Mail$Log|File","M|
|000050f0| 61 69 6c 24 4e 61 6d 65 | 22 2c 22 4d 61 69 6c 24 |ail$Name|","Mail$|
|00005100| 53 6f 75 72 63 65 22 0d | ff |Source".|. |
+--------+-------------------------+-------------------------+--------+--------+