/ APDL Public Domain 1 / APDL_PD1A.iso / printing / labels / label / !Label / Label

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0d f4 20 3e 20 | 4c 61 62 65 6c 0d 00 14 |..... > |Label...|
|00000010| 04 0d 00 1e 20 ee 20 85 | 20 f2 65 72 72 6f 72 20 |.... . .| .error |
|00000020| 3a 20 f2 63 6c 6f 73 65 | 5f 64 6f 77 6e 20 3a 20 |: .close|_down : |
|00000030| e0 0d 00 28 04 0d 00 32 | 05 3a 0d 00 3c 23 3a 20 |...(...2|.:..<#: |
|00000040| f4 20 49 6e 69 74 69 61 | 6c 69 73 65 20 57 69 6d |. Initia|lise Wim|
|00000050| 70 20 65 6e 76 69 72 6f | 6e 6d 65 6e 74 0d 00 46 |p enviro|nment..F|
|00000060| 05 3a 0d 00 50 04 0d 00 | 5a 15 c8 99 20 22 48 6f |.:..P...|Z... "Ho|
|00000070| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 00 64 18 c8 |urglass_|On"..d..|
|00000080| 99 20 22 4f 53 5f 47 65 | 74 45 6e 76 22 20 b8 20 |. "OS_Ge|tEnv" . |
|00000090| 63 6d 64 0d 00 6e 04 0d | 00 78 10 f2 77 69 6d 70 |cmd..n..|.x..wimp|
|000000a0| 5f 63 6f 6e 73 74 73 0d | 00 82 1b f2 76 61 72 69 |_consts.|....vari|
|000000b0| 61 62 6c 65 73 20 3a 20 | f2 74 65 6d 70 5f 76 61 |ables : |.temp_va|
|000000c0| 72 73 0d 00 8c 25 76 65 | 72 73 20 3d 20 a4 77 69 |rs...%ve|rs = .wi|
|000000d0| 6d 70 5f 69 6e 69 74 28 | 62 6c 6b 2c 22 4c 61 62 |mp_init(|blk,"Lab|
|000000e0| 65 6c 6c 65 72 22 29 0d | 00 96 04 0d 00 a0 20 e7 |eller").|...... .|
|000000f0| 20 a4 67 65 74 65 6e 76 | 28 22 57 69 6d 70 24 53 | .getenv|("Wimp$S|
|00000100| 63 72 61 70 22 29 3d 22 | 22 20 8c 0d 00 aa 28 20 |crap")="|" ....( |
|00000110| 85 20 a2 20 30 2c 22 3c | 57 69 6d 70 24 53 63 72 |. . 0,"<|Wimp$Scr|
|00000120| 61 70 3e 20 69 73 20 6e | 6f 74 20 64 65 66 69 6e |ap> is n|ot defin|
|00000130| 65 64 22 0d 00 b4 05 cd | 0d 00 be 04 0d 00 c8 32 |ed".....|.......2|
|00000140| 73 70 72 69 74 65 73 20 | 3d 20 a4 6c 6f 61 64 5f |sprites |= .load_|
|00000150| 73 70 72 69 74 65 73 28 | 22 3c 4c 61 62 65 6c 24 |sprites(|"<Label$|
|00000160| 44 69 72 3e 2e 53 70 72 | 69 74 65 73 22 29 0d 00 |Dir>.Spr|ites")..|
|00000170| d2 1f 69 5f 69 63 6f 6e | 20 3d 20 a4 69 63 6f 6e |..i_icon| = .icon|
|00000180| 62 61 72 28 22 21 6c 61 | 62 65 6c 22 29 0d 00 dc |bar("!la|bel")...|
|00000190| 04 0d 00 e6 33 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |....3.. |"Wimp_Op|
|000001a0| 65 6e 54 65 6d 70 6c 61 | 74 65 22 2c 2c 22 3c 4c |enTempla|te",,"<L|
|000001b0| 61 62 65 6c 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |abel$Dir|>.Templa|
|000001c0| 74 65 73 22 0d 00 f0 20 | 77 5f 69 6e 66 6f 20 3d |tes"... |w_info =|
|000001d0| 20 a4 6c 6f 61 64 5f 64 | 65 66 28 22 49 4e 46 4f | .load_d|ef("INFO|
|000001e0| 22 2c 30 29 0d 00 fa 27 | 77 5f 66 69 6c 65 20 3d |",0)...'|w_file =|
|000001f0| 20 a4 6c 6f 61 64 5f 64 | 65 66 28 22 46 49 4c 45 | .load_d|ef("FILE|
|00000200| 53 22 2c 73 70 72 69 74 | 65 73 29 0d 01 04 29 77 |S",sprit|es)...)w|
|00000210| 5f 73 65 74 20 3d 20 a4 | 6c 6f 61 64 5f 64 65 66 |_set = .|load_def|
|00000220| 28 22 53 45 54 54 49 4e | 47 53 22 2c 73 70 72 69 |("SETTIN|GS",spri|
|00000230| 74 65 73 29 0d 01 0e 25 | 77 5f 64 69 6d 20 3d 20 |tes)...%|w_dim = |
|00000240| a4 6c 6f 61 64 5f 64 65 | 66 28 22 44 49 4d 45 4e |.load_de|f("DIMEN|
|00000250| 53 49 4f 4e 53 22 2c 30 | 29 0d 01 18 26 77 5f 73 |SIONS",0|)...&w_s|
|00000260| 61 76 65 20 3d 20 a4 6c | 6f 61 64 5f 64 65 66 28 |ave = .l|oad_def(|
|00000270| 22 53 41 56 45 22 2c 73 | 70 72 69 74 65 73 29 0d |"SAVE",s|prites).|
|00000280| 01 22 2c 77 5f 74 65 78 | 74 20 3d 20 a4 6c 6f 61 |.",w_tex|t = .loa|
|00000290| 64 5f 64 65 66 28 22 54 | 45 58 54 22 2c 30 29 20 |d_def("T|EXT",0) |
|000002a0| 3a 20 f2 67 65 74 5f 69 | 63 6f 6e 0d 01 2c 1b c8 |: .get_i|con..,..|
|000002b0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 54 65 6d |. "Wimp_|CloseTem|
|000002c0| 70 6c 61 74 65 22 0d 01 | 36 04 0d 01 40 3b 69 5f |plate"..|6...@;i_|
|000002d0| 66 5f 64 61 74 61 20 3d | 20 34 20 3a 20 69 5f 66 |f_data =| 4 : i_f|
|000002e0| 5f 73 65 74 20 3d 20 33 | 20 3a 20 69 5f 66 5f 70 |_set = 3| : i_f_p|
|000002f0| 72 74 20 3d 20 35 20 3a | 20 69 5f 66 5f 74 79 70 |rt = 5 :| i_f_typ|
|00000300| 65 20 3d 20 30 0d 01 4a | 4d 69 5f 64 5f 77 69 64 |e = 0..J|Mi_d_wid|
|00000310| 74 68 20 3d 20 37 20 3a | 20 69 5f 64 5f 68 70 20 |th = 7 :| i_d_hp |
|00000320| 3d 20 38 20 3a 20 69 5f | 64 5f 6f 66 66 20 3d 20 |= 8 : i_|d_off = |
|00000330| 31 31 20 3a 20 69 5f 64 | 5f 69 6e 64 20 3d 20 31 |11 : i_d|_ind = 1|
|00000340| 32 20 3a 20 69 5f 64 5f | 68 65 69 67 68 74 20 3d |2 : i_d_|height =|
|00000350| 20 39 0d 01 54 3d 69 5f | 64 5f 76 70 20 3d 20 31 | 9..T=i_|d_vp = 1|
|00000360| 30 20 3a 20 69 5f 64 5f | 75 6e 69 74 20 3d 20 31 |0 : i_d_|unit = 1|
|00000370| 34 20 3a 20 69 5f 64 5f | 75 70 20 3d 20 31 35 20 |4 : i_d_|up = 15 |
|00000380| 3a 20 69 5f 64 5f 64 6f | 77 6e 20 3d 20 31 36 0d |: i_d_do|wn = 16.|
|00000390| 01 5e 42 69 5f 73 5f 73 | 31 20 3d 20 35 20 3a 20 |.^Bi_s_s|1 = 5 : |
|000003a0| 69 5f 73 5f 73 32 20 3d | 20 36 20 3a 20 69 5f 73 |i_s_s2 =| 6 : i_s|
|000003b0| 5f 73 33 20 3d 20 37 20 | 3a 20 69 5f 73 5f 6a 6c |_s3 = 7 |: i_s_jl|
|000003c0| 20 3d 20 38 20 3a 20 69 | 5f 73 5f 6a 63 20 3d 20 | = 8 : i|_s_jc = |
|000003d0| 39 0d 01 68 4e 69 5f 73 | 5f 6a 72 20 3d 20 31 30 |9..hNi_s|_jr = 10|
|000003e0| 20 3a 20 69 5f 73 5f 6e | 6f 72 6d 20 3d 20 31 38 | : i_s_n|orm = 18|
|000003f0| 20 3a 20 69 5f 73 5f 6e | 6c 71 20 3d 20 31 39 20 | : i_s_n|lq = 19 |
|00000400| 3a 20 69 5f 73 5f 62 6f | 6c 64 20 3d 20 32 30 20 |: i_s_bo|ld = 20 |
|00000410| 3a 20 69 5f 73 5f 69 74 | 61 6c 20 3d 20 32 31 0d |: i_s_it|al = 21.|
|00000420| 01 72 4d 69 5f 73 5f 72 | 65 64 20 3d 20 32 32 20 |.rMi_s_r|ed = 22 |
|00000430| 3a 20 69 5f 73 5f 75 6e | 64 65 72 20 3d 20 32 33 |: i_s_un|der = 23|
|00000440| 20 3a 20 69 5f 73 5f 70 | 35 20 3d 20 31 31 20 3a | : i_s_p|5 = 11 :|
|00000450| 20 69 5f 73 5f 70 31 30 | 20 3d 20 31 32 20 3a 20 | i_s_p10| = 12 : |
|00000460| 69 5f 73 5f 70 31 32 20 | 3d 20 31 33 0d 01 7c 3a |i_s_p12 |= 13..|:|
|00000470| 69 5f 73 5f 70 31 37 20 | 3d 20 31 34 20 3a 20 69 |i_s_p17 |= 14 : i|
|00000480| 5f 73 5f 6c 34 20 3d 20 | 31 35 20 3a 20 69 5f 73 |_s_l4 = |15 : i_s|
|00000490| 5f 6c 36 20 3d 20 31 36 | 20 3a 20 69 5f 73 5f 6c |_l6 = 16| : i_s_l|
|000004a0| 38 20 3d 20 31 37 0d 01 | 86 0f 69 5f 74 5f 64 65 |8 = 17..|..i_t_de|
|000004b0| 66 20 3d 20 30 0d 01 90 | 2c 69 5f 76 5f 69 63 6f |f = 0...|,i_v_ico|
|000004c0| 6e 20 3d 20 30 20 3a 20 | 69 5f 76 5f 6e 61 6d 65 |n = 0 : |i_v_name|
|000004d0| 20 3d 20 31 20 3a 20 69 | 5f 76 5f 6f 6b 20 3d 20 | = 1 : i|_v_ok = |
|000004e0| 32 0d 01 9a 35 65 73 67 | 5f 73 5f 73 74 6f 63 6b |2...5esg|_s_stock|
|000004f0| 20 3d 20 31 20 3a 20 65 | 73 67 5f 73 5f 6a 75 73 | = 1 : e|sg_s_jus|
|00000500| 74 20 3d 20 32 20 3a 20 | 65 73 67 5f 73 5f 74 79 |t = 2 : |esg_s_ty|
|00000510| 70 65 20 3d 20 35 0d 01 | a4 22 65 73 67 5f 73 5f |pe = 5..|."esg_s_|
|00000520| 70 69 74 20 3d 20 33 20 | 3a 20 65 73 67 5f 73 5f |pit = 3 |: esg_s_|
|00000530| 6c 69 6e 65 20 3d 20 34 | 0d 01 ae 11 65 73 67 5f |line = 4|....esg_|
|00000540| 64 5f 73 65 74 20 3d 20 | 31 0d 01 b8 11 46 20 3d |d_set = |1....F =|
|00000550| 20 a3 20 3a 20 54 20 3d | 20 b9 0d 01 c2 04 0d 01 | . : T =| .......|
|00000560| cc 05 3a 0d 01 d6 45 3a | 20 f4 20 46 69 6c 65 20 |..:...E:| . File |
|00000570| 74 79 70 65 20 6e 75 6d | 62 65 72 20 2d 20 63 68 |type num|ber - ch|
|00000580| 61 6e 67 65 20 74 68 69 | 73 20 69 66 20 6e 65 63 |ange thi|s if nec|
|00000590| 65 73 73 61 72 79 20 74 | 6f 20 61 76 6f 69 64 20 |essary t|o avoid |
|000005a0| 63 6c 61 73 68 69 6e 67 | 0d 01 e0 46 3a 20 f4 20 |clashing|...F: . |
|000005b0| 28 61 6c 73 6f 20 72 65 | 6e 61 6d 65 20 73 70 72 |(also re|name spr|
|000005c0| 69 74 65 73 20 69 6e 20 | 21 53 70 72 69 74 65 73 |ites in |!Sprites|
|000005d0| 20 61 6e 64 20 53 70 72 | 69 74 65 73 20 66 69 6c | and Spr|ites fil|
|000005e0| 65 73 2c 20 61 6e 64 20 | 63 68 61 6e 67 65 0d 01 |es, and |change..|
|000005f0| ea 26 3a 20 f4 20 76 61 | 72 69 61 62 6c 65 20 64 |.&: . va|riable d|
|00000600| 65 66 69 6e 69 74 69 6f | 6e 73 20 69 6e 20 21 42 |efinitio|ns in !B|
|00000610| 6f 6f 74 29 0d 01 f4 05 | 3a 0d 01 fe 04 0d 02 08 |oot)....|:.......|
|00000620| 13 66 69 6c 65 74 79 70 | 65 20 3d 20 26 34 30 37 |.filetyp|e = &407|
|00000630| 0d 02 12 04 0d 02 1c 3a | 73 65 74 66 69 6c 65 24 |.......:|setfile$|
|00000640| 20 3d 20 22 22 20 3a 20 | 6c 61 62 66 69 6c 65 24 | = "" : |labfile$|
|00000650| 20 3d 20 22 22 20 3a 20 | 65 6e 74 65 72 20 3d 20 | = "" : |enter = |
|00000660| 54 20 3a 20 64 69 72 65 | 63 74 20 3d 20 46 0d 02 |T : dire|ct = F..|
|00000670| 26 27 73 63 72 61 70 66 | 69 6c 65 24 20 3d 20 a4 |&'scrapf|ile$ = .|
|00000680| 67 65 74 65 6e 76 28 22 | 4c 61 62 65 6c 24 53 63 |getenv("|Label$Sc|
|00000690| 72 61 70 22 29 0d 02 30 | 60 e7 20 73 63 72 61 70 |rap")..0|`. scrap|
|000006a0| 66 69 6c 65 24 3d 22 22 | 20 8c 20 f2 77 61 72 6e |file$=""| . .warn|
|000006b0| 28 22 3c 4c 61 62 65 6c | 24 53 63 72 61 70 3e 20 |("<Label|$Scrap> |
|000006c0| 69 73 20 6e 6f 74 20 64 | 65 66 69 6e 65 64 2c 20 |is not d|efined, |
|000006d0| 6d 61 69 6c 20 6d 65 72 | 67 65 20 6d 6f 64 65 20 |mail mer|ge mode |
|000006e0| 77 69 6c 6c 20 62 65 20 | 75 6e 61 76 61 69 6c 61 |will be |unavaila|
|000006f0| 62 6c 65 22 29 0d 02 3a | 0d f2 64 65 66 61 75 6c |ble")..:|..defaul|
|00000700| 74 73 0d 02 44 04 0d 02 | 4e 0f 6c 6f 61 64 5f 6f |ts..D...|N.load_o|
|00000710| 6b 20 3d 20 46 0d 02 58 | 44 c8 99 20 22 58 4f 53 |k = F..X|D.. "XOS|
|00000720| 5f 52 65 61 64 41 72 67 | 73 22 2c 22 70 61 72 61 |_ReadArg|s","para|
|00000730| 6d 2f 6b 2c 71 75 69 74 | 2f 73 2c 2c 2c 2c 2c 2c |m/k,quit|/s,,,,,,|
|00000740| 2c 2c 2c 22 2c 63 6d 64 | 2c 62 6c 6b 2c 34 30 30 |,,,",cmd|,blk,400|
|00000750| 20 b8 20 3b 66 6c 61 67 | 73 0d 02 62 1a e7 20 28 | . ;flag|s..b.. (|
|00000760| 66 6c 61 67 73 20 80 20 | 31 29 3d 31 20 8c 20 8d |flags . |1)=1 . .|
|00000770| 74 5e 42 0d 02 6c 0f 20 | 70 70 20 3d 20 62 6c 6b |t^B..l. |pp = blk|
|00000780| 21 30 0d 02 76 0e 20 e7 | 20 70 70 3c 3e 30 20 8c |!0..v. .| pp<>0 .|
|00000790| 0d 02 80 0f 20 20 f2 7a | 65 72 6f 28 70 70 29 0d |....  .z|ero(pp).|
|000007a0| 02 8a 1b 20 20 f2 6c 6f | 61 64 5f 70 61 72 61 6d |...  .lo|ad_param|
|000007b0| 73 28 24 70 70 2c 54 2c | 54 29 0d 02 94 06 20 cc |s($pp,T,|T).... .|
|000007c0| 0d 02 9e 2e 20 20 f2 6c | 6f 61 64 5f 70 61 72 61 |....  .l|oad_para|
|000007d0| 6d 73 28 22 3c 4c 61 62 | 65 6c 24 44 69 72 3e 2e |ms("<Lab|el$Dir>.|
|000007e0| 44 65 66 61 75 6c 74 73 | 22 2c 54 2c 46 29 0d 02 |Defaults|",T,F)..|
|000007f0| a8 06 20 cd 0d 02 b2 05 | cd 0d 02 bc 18 e7 20 ac |.. .....|...... .|
|00000800| 20 6c 6f 61 64 5f 6f 6b | 20 8c 20 e5 20 8d 54 74 | load_ok| . . .Tt|
|00000810| 43 0d 02 c6 0d f2 63 6c | 72 5f 74 65 78 74 0d 02 |C.....cl|r_text..|
|00000820| d0 04 0d 02 da 0e 64 69 | 72 65 63 74 20 3d 20 46 |......di|rect = F|
|00000830| 0d 02 e4 07 ea 20 85 0d | 02 ee 1d ee 20 85 20 ea |..... ..|.... . .|
|00000840| 20 64 69 72 65 63 74 20 | 3d 20 54 20 3a 20 e5 20 | direct |= T : . |
|00000850| 8d 54 42 43 0d 02 f8 16 | c8 99 20 22 58 50 44 72 |.TBC....|.. "XPDr|
|00000860| 69 76 65 72 5f 49 6e 66 | 6f 22 0d 03 02 07 f7 20 |iver_Inf|o"..... |
|00000870| 85 0d 03 0c 04 0d 03 16 | 16 c8 99 20 22 48 6f 75 |........|... "Hou|
|00000880| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 03 20 2b f2 |rglass_O|ff".. +.|
|00000890| 70 6f 6c 6c 28 22 69 64 | 6c 65 22 2c 52 6d 5f 4e |poll("id|le",Rm_N|
|000008a0| 75 6c 6c 2b 52 6d 5f 45 | 6e 74 65 72 2b 52 6d 5f |ull+Rm_E|nter+Rm_|
|000008b0| 4c 65 61 76 65 29 0d 03 | 2a 2d e7 20 73 63 72 61 |Leave)..|*-. scra|
|000008c0| 70 66 69 6c 65 24 3c 3e | 22 22 20 8c 20 ff 20 22 |pfile$<>|"" . . "|
|000008d0| 52 65 6d 6f 76 65 20 22 | 2b 73 63 72 61 70 66 69 |Remove "|+scrapfi|
|000008e0| 6c 65 24 0d 03 34 0f f2 | 63 6c 6f 73 65 5f 64 6f |le$..4..|close_do|
|000008f0| 77 6e 0d 03 3e 05 e0 0d | 03 48 04 0d 03 52 0e dd |wn..>...|.H...R..|
|00000900| 20 f2 7a 65 72 6f 28 73 | 29 0d 03 5c 05 3a 0d 03 | .zero(s|)..\.:..|
|00000910| 66 35 3a 20 f4 20 43 52 | 2d 74 65 72 6d 69 6e 61 |f5: . CR|-termina|
|00000920| 74 65 20 74 68 65 20 67 | 69 76 65 6e 20 7a 65 72 |te the g|iven zer|
|00000930| 6f 2d 74 65 72 6d 69 6e | 61 74 65 64 20 73 74 72 |o-termin|ated str|
|00000940| 69 6e 67 0d 03 70 05 3a | 0d 03 7a 0d 20 e7 20 73 |ing..p.:|..z. . s|
|00000950| 3c 3e 30 20 8c 0d 03 84 | 1c 20 20 c8 95 20 3f 73 |<>0 ....|.  .. ?s|
|00000960| 3e 3d 33 32 20 3a 20 73 | 20 2b 3d 20 31 20 3a 20 |>=32 : s| += 1 : |
|00000970| ce 0d 03 8e 0d 20 20 3f | 73 20 3d 20 31 33 0d 03 |.....  ?|s = 13..|
|00000980| 98 06 20 cd 0d 03 a2 05 | e1 0d 03 ac 04 0d 03 b6 |.. .....|........|
|00000990| 18 dd 20 f2 68 65 6c 70 | 28 77 69 6e 64 6f 77 2c |.. .help|(window,|
|000009a0| 69 63 6f 6e 29 0d 03 c0 | 0b ea 20 62 6c 6f 63 6b |icon)...|.. block|
|000009b0| 0d 03 ca 05 3a 0d 03 d4 | 2c 3a 20 f4 20 53 65 6e |....:...|,: . Sen|
|000009c0| 64 20 62 61 63 6b 20 61 | 6e 20 61 70 70 72 6f 70 |d back a|n approp|
|000009d0| 72 69 61 74 65 20 68 65 | 6c 70 20 73 74 72 69 6e |riate he|lp strin|
|000009e0| 67 0d 03 de 05 3a 0d 03 | e8 2c 20 6c 69 6e 65 31 |g....:..|., line1|
|000009f0| 24 20 3d 20 22 22 20 3a | 20 6c 69 6e 65 32 24 20 |$ = "" :| line2$ |
|00000a00| 3d 20 22 22 20 3a 20 6c | 69 6e 65 33 24 20 3d 20 |= "" : l|ine3$ = |
|00000a10| 22 22 0d 03 f2 15 20 62 | 6c 6f 63 6b 20 3d 20 62 |"".... b|lock = b|
|00000a20| 6c 6b 2b 26 31 30 30 0d | 03 fc 10 20 c8 8e 20 77 |lk+&100.|... .. w|
|00000a30| 69 6e 64 6f 77 20 ca 0d | 04 06 0b 20 20 c9 20 2d |indow ..|...  . -|
|00000a40| 32 3a 0d 04 10 4a 20 20 | 20 6c 69 6e 65 31 24 20 |2:...J  | line1$ |
|00000a50| 3d 20 22 54 68 69 73 20 | 69 73 20 74 68 65 20 4c |= "This |is the L|
|00000a60| 61 62 65 6c 6c 65 72 20 | 69 63 6f 6e 2e 20 20 43 |abeller |icon.  C|
|00000a70| 6c 69 63 6b 20 4d 45 4e | 55 20 66 6f 72 20 63 6f |lick MEN|U for co|
|00000a80| 6e 74 72 6f 6c 20 6d 65 | 6e 75 2e 22 0d 04 1a 4e |ntrol me|nu."...N|
|00000a90| 20 20 20 6c 69 6e 65 32 | 24 20 3d 20 22 44 72 61 |   line2|$ = "Dra|
|00000aa0| 67 20 61 20 70 61 72 61 | 6d 65 74 65 72 20 6f 72 |g a para|meter or|
|00000ab0| 20 74 65 78 74 20 66 69 | 6c 65 20 68 65 72 65 20 | text fi|le here |
|00000ac0| 74 6f 20 6c 6f 61 64 20 | 73 65 74 74 69 6e 67 73 |to load |settings|
|00000ad0| 20 6f 72 20 74 65 78 74 | 2e 22 0d 04 24 44 20 20 | or text|."..$D  |
|00000ae0| 20 e7 20 65 6e 74 65 72 | 20 8c 20 6c 69 6e 65 33 | . enter| . line3|
|00000af0| 24 20 3d 20 22 43 6c 69 | 63 6b 20 53 45 4c 45 43 |$ = "Cli|ck SELEC|
|00000b00| 54 20 74 6f 20 64 69 73 | 70 6c 61 79 20 74 68 65 |T to dis|play the|
|00000b10| 20 74 65 78 74 20 77 69 | 6e 64 6f 77 2e 22 0d 04 | text wi|ndow."..|
|00000b20| 2e 0f 20 20 c9 20 77 5f | 66 69 6c 65 3a 0d 04 38 |..  . w_|file:..8|
|00000b30| 45 20 20 20 6c 69 6e 65 | 31 24 20 3d 20 22 54 68 |E   line|1$ = "Th|
|00000b40| 69 73 20 73 68 6f 77 73 | 20 74 68 65 20 6c 61 73 |is shows| the las|
|00000b50| 74 20 66 69 6c 65 6e 61 | 6d 65 73 20 75 73 65 64 |t filena|mes used|
|00000b60| 20 74 6f 20 6c 6f 61 64 | 20 6f 72 20 73 61 76 65 | to load| or save|
|00000b70| 2e 22 0d 04 42 0e 20 20 | c9 20 77 5f 64 69 6d 3a |."..B.  |. w_dim:|
|00000b80| 0d 04 4c 4e 20 20 20 6c | 69 6e 65 31 24 20 3d 20 |..LN   l|ine1$ = |
|00000b90| 22 54 68 69 73 20 77 69 | 6e 64 6f 77 20 61 6c 6c |"This wi|ndow all|
|00000ba0| 6f 77 73 20 74 68 65 20 | 64 69 6d 65 6e 73 69 6f |ows the |dimensio|
|00000bb0| 6e 73 20 6f 66 20 74 68 | 65 20 6c 61 62 65 6c 20 |ns of th|e label |
|00000bc0| 74 6f 20 62 65 20 73 65 | 74 20 75 70 2e 22 0d 04 |to be se|t up."..|
|00000bd0| 56 10 20 20 20 c8 8e 20 | 69 63 6f 6e 20 ca 0d 04 |V.   .. |icon ...|
|00000be0| 60 14 20 20 20 20 c9 20 | 69 5f 64 5f 77 69 64 74 |`.    . |i_d_widt|
|00000bf0| 68 3a 0d 04 6a 48 20 20 | 20 20 20 6c 69 6e 65 32 |h:..jH  |   line2|
|00000c00| 24 20 3d 20 22 43 6c 69 | 63 6b 20 74 6f 20 73 65 |$ = "Cli|ck to se|
|00000c10| 74 20 74 68 65 20 6c 61 | 62 65 6c 20 77 69 64 74 |t the la|bel widt|
|00000c20| 68 20 61 76 61 69 6c 61 | 62 6c 65 20 66 6f 72 20 |h availa|ble for |
|00000c30| 70 72 69 6e 74 69 6e 67 | 2e 22 0d 04 74 11 20 20 |printing|."..t.  |
|00000c40| 20 20 c9 20 69 5f 64 5f | 68 70 3a 0d 04 7e 48 20 |  . i_d_|hp:..~H |
|00000c50| 20 20 20 20 6c 69 6e 65 | 32 24 20 3d 20 22 43 6c |    line|2$ = "Cl|
|00000c60| 69 63 6b 20 74 6f 20 73 | 65 74 20 74 68 65 20 68 |ick to s|et the h|
|00000c70| 6f 72 69 7a 6f 6e 74 61 | 6c 20 64 69 73 74 61 6e |orizonta|l distan|
|00000c80| 63 65 20 62 65 74 77 65 | 65 6e 20 6c 61 62 65 6c |ce betwe|en label|
|00000c90| 73 2e 22 0d 04 88 12 20 | 20 20 20 c9 20 69 5f 64 |s.".... |   . i_d|
|00000ca0| 5f 6f 66 66 3a 0d 04 92 | 43 20 20 20 20 20 6c 69 |_off:...|C     li|
|00000cb0| 6e 65 32 24 20 3d 20 22 | 43 6c 69 63 6b 20 74 6f |ne2$ = "|Click to|
|00000cc0| 20 73 65 74 20 74 68 65 | 20 6f 66 66 73 65 74 20 | set the| offset |
|00000cd0| 6f 66 20 74 68 65 20 66 | 69 72 73 74 20 6c 61 62 |of the f|irst lab|
|00000ce0| 65 6c 20 66 72 6f 6d 22 | 0d 04 9c 30 20 20 20 20 |el from"|...0    |
|00000cf0| 20 6c 69 6e 65 33 24 20 | 3d 20 22 74 68 65 20 70 | line3$ |= "the p|
|00000d00| 72 69 6e 74 65 72 27 73 | 20 68 6f 6d 65 20 70 6f |rinter's| home po|
|00000d10| 73 69 74 69 6f 6e 2e 22 | 0d 04 a6 12 20 20 20 20 |sition."|....    |
|00000d20| c9 20 69 5f 64 5f 69 6e | 64 3a 0d 04 b0 51 20 20 |. i_d_in|d:...Q  |
|00000d30| 20 20 20 6c 69 6e 65 32 | 24 20 3d 20 22 43 6c 69 |   line2|$ = "Cli|
|00000d40| 63 6b 20 74 6f 20 73 65 | 74 20 74 68 65 20 6c 65 |ck to se|t the le|
|00000d50| 66 74 20 6d 61 72 67 69 | 6e 20 74 68 61 74 20 77 |ft margi|n that w|
|00000d60| 69 6c 6c 20 62 65 20 6c | 65 66 74 20 6f 6e 20 65 |ill be l|eft on e|
|00000d70| 61 63 68 20 6c 61 62 65 | 6c 2e 22 0d 04 ba 15 20 |ach labe|l.".... |
|00000d80| 20 20 20 c9 20 69 5f 64 | 5f 68 65 69 67 68 74 3a |   . i_d|_height:|
|00000d90| 0d 04 c4 49 20 20 20 20 | 20 6c 69 6e 65 32 24 20 |...I    | line2$ |
|00000da0| 3d 20 22 43 6c 69 63 6b | 20 74 6f 20 73 65 74 20 |= "Click| to set |
|00000db0| 74 68 65 20 6c 61 62 65 | 6c 20 68 65 69 67 68 74 |the labe|l height|
|00000dc0| 20 61 76 61 69 6c 61 62 | 6c 65 20 66 6f 72 20 70 | availab|le for p|
|00000dd0| 72 69 6e 74 69 6e 67 2e | 22 0d 04 ce 11 20 20 20 |rinting.|"....   |
|00000de0| 20 c9 20 69 5f 64 5f 76 | 70 3a 0d 04 d8 46 20 20 | . i_d_v|p:...F  |
|00000df0| 20 20 20 6c 69 6e 65 32 | 24 20 3d 20 22 43 6c 69 |   line2|$ = "Cli|
|00000e00| 63 6b 20 74 6f 20 73 65 | 74 20 74 68 65 20 76 65 |ck to se|t the ve|
|00000e10| 72 74 69 63 61 6c 20 64 | 69 73 74 61 6e 63 65 20 |rtical d|istance |
|00000e20| 62 65 74 77 65 65 6e 20 | 6c 61 62 65 6c 73 2e 22 |between |labels."|
|00000e30| 0d 04 e2 13 20 20 20 20 | c9 20 69 5f 64 5f 75 6e |....    |. i_d_un|
|00000e40| 69 74 3a 0d 04 ec 3e 20 | 20 20 20 20 6c 69 6e 65 |it:...> |    line|
|00000e50| 32 24 20 3d 20 22 43 6c | 69 63 6b 20 74 6f 20 73 |2$ = "Cl|ick to s|
|00000e60| 65 74 20 74 68 65 20 75 | 6e 69 74 73 20 6f 66 20 |et the u|nits of |
|00000e70| 6d 65 61 73 75 72 65 6d | 65 6e 74 20 75 73 65 64 |measurem|ent used|
|00000e80| 22 0d 04 f6 3d 20 20 20 | 20 20 6c 69 6e 65 33 24 |"...=   |  line3$|
|00000e90| 20 3d 20 22 28 4f 6e 6c | 79 20 27 69 6e 63 68 65 | = "(Onl|y 'inche|
|00000ea0| 73 27 20 61 72 65 20 73 | 75 70 70 6f 72 74 65 64 |s' are s|upported|
|00000eb0| 20 61 74 20 70 72 65 73 | 65 6e 74 29 2e 22 0d 05 | at pres|ent)."..|
|00000ec0| 00 11 20 20 20 20 c9 20 | 69 5f 64 5f 75 70 3a 0d |..    . |i_d_up:.|
|00000ed0| 05 0a 53 20 20 20 20 20 | e7 20 73 65 74 74 69 6e |..S     |. settin|
|00000ee0| 67 3e 30 20 8c 20 6c 69 | 6e 65 32 24 20 3d 20 22 |g>0 . li|ne2$ = "|
|00000ef0| 43 6c 69 63 6b 20 6f 72 | 20 68 6f 6c 64 20 74 6f |Click or| hold to|
|00000f00| 20 69 6e 63 72 65 61 73 | 65 20 74 68 65 20 73 65 | increas|e the se|
|00000f10| 6c 65 63 74 65 64 20 64 | 69 6d 65 6e 73 69 6f 6e |lected d|imension|
|00000f20| 2e 22 0d 05 14 13 20 20 | 20 20 c9 20 69 5f 64 5f |."....  |  . i_d_|
|00000f30| 64 6f 77 6e 3a 0d 05 1e | 53 20 20 20 20 20 e7 20 |down:...|S     . |
|00000f40| 73 65 74 74 69 6e 67 3e | 30 20 8c 20 6c 69 6e 65 |setting>|0 . line|
|00000f50| 32 24 20 3d 20 22 43 6c | 69 63 6b 20 6f 72 20 68 |2$ = "Cl|ick or h|
|00000f60| 6f 6c 64 20 74 6f 20 64 | 65 63 72 65 61 73 65 20 |old to d|ecrease |
|00000f70| 74 68 65 20 73 65 6c 65 | 63 74 65 64 20 64 69 6d |the sele|cted dim|
|00000f80| 65 6e 73 69 6f 6e 2e 22 | 0d 05 28 0a 20 20 20 20 |ension."|..(.    |
|00000f90| 7f 3a 0d 05 32 3e 20 20 | 20 20 20 6c 69 6e 65 32 |.:..2>  |   line2|
|00000fa0| 24 20 3d 20 22 43 6c 69 | 63 6b 20 84 20 77 68 65 |$ = "Cli|ck . whe|
|00000fb0| 6e 20 74 68 65 20 73 65 | 74 74 69 6e 67 73 20 61 |n the se|ttings a|
|00000fc0| 72 65 20 61 73 20 72 65 | 71 75 69 72 65 64 2e 22 |re as re|quired."|
|00000fd0| 0d 05 3c 08 20 20 20 cb | 0d 05 46 0e 20 20 c9 20 |..<.   .|..F.  . |
|00000fe0| 77 5f 73 65 74 3a 0d 05 | 50 43 20 20 20 6c 69 6e |w_set:..|PC   lin|
|00000ff0| 65 31 24 20 3d 20 22 54 | 68 69 73 20 77 69 6e 64 |e1$ = "T|his wind|
|00001000| 6f 77 20 61 6c 6c 6f 77 | 73 20 70 72 69 6e 74 69 |ow allow|s printi|
|00001010| 6e 67 20 6f 70 74 69 6f | 6e 73 20 74 6f 20 62 65 |ng optio|ns to be|
|00001020| 20 73 65 74 20 75 70 2e | 22 0d 05 5a 10 20 20 20 | set up.|"..Z.   |
|00001030| c8 8e 20 69 63 6f 6e 20 | ca 0d 05 64 1f 20 20 20 |.. icon |...d.   |
|00001040| 20 c9 20 69 5f 73 5f 73 | 31 2c 69 5f 73 5f 73 32 | . i_s_s|1,i_s_s2|
|00001050| 2c 69 5f 73 5f 73 33 3a | 0d 05 6e 40 20 20 20 20 |,i_s_s3:|..n@    |
|00001060| 20 6c 69 6e 65 32 24 20 | 3d 20 22 53 65 6c 65 63 | line2$ |= "Selec|
|00001070| 74 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |t the nu|mber of |
|00001080| 6c 61 62 65 6c 73 20 61 | 63 72 6f 73 73 20 74 68 |labels a|cross th|
|00001090| 65 20 70 61 67 65 2e 22 | 0d 05 78 11 20 20 20 20 |e page."|..x.    |
|000010a0| c9 20 69 5f 73 5f 6a 6c | 3a 0d 05 82 33 20 20 20 |. i_s_jl|:...3   |
|000010b0| 20 20 6c 69 6e 65 32 24 | 20 3d 20 22 53 65 6c 65 |  line2$| = "Sele|
|000010c0| 63 74 20 66 6f 72 20 6c | 65 66 74 2d 6a 75 73 74 |ct for l|eft-just|
|000010d0| 69 66 69 65 64 20 74 65 | 78 74 2e 22 0d 05 8c 11 |ified te|xt."....|
|000010e0| 20 20 20 20 c9 20 69 5f | 73 5f 6a 63 3a 0d 05 96 |    . i_|s_jc:...|
|000010f0| 2d 20 20 20 20 20 6c 69 | 6e 65 32 24 20 3d 20 22 |-     li|ne2$ = "|
|00001100| 53 65 6c 65 63 74 20 66 | 6f 72 20 63 65 6e 74 65 |Select f|or cente|
|00001110| 72 65 64 20 74 65 78 74 | 2e 22 0d 05 a0 11 20 20 |red text|."....  |
|00001120| 20 20 c9 20 69 5f 73 5f | 6a 72 3a 0d 05 aa 34 20 |  . i_s_|jr:...4 |
|00001130| 20 20 20 20 6c 69 6e 65 | 32 24 20 3d 20 22 53 65 |    line|2$ = "Se|
|00001140| 6c 65 63 74 20 66 6f 72 | 20 72 69 67 68 74 2d 6a |lect for| right-j|
|00001150| 75 73 74 69 66 69 65 64 | 20 74 65 78 74 2e 22 0d |ustified| text.".|
|00001160| 05 b4 13 20 20 20 20 c9 | 20 69 5f 73 5f 6e 6f 72 |...    .| i_s_nor|
|00001170| 6d 3a 0d 05 be 38 20 20 | 20 20 20 6c 69 6e 65 32 |m:...8  |   line2|
|00001180| 24 20 3d 20 22 53 65 6c | 65 63 74 20 66 6f 72 20 |$ = "Sel|ect for |
|00001190| 6e 6f 72 6d 61 6c 20 28 | 75 6e 61 64 6f 72 6e 65 |normal (|unadorne|
|000011a0| 64 29 20 70 72 69 6e 74 | 2e 22 0d 05 c8 12 20 20 |d) print|."....  |
|000011b0| 20 20 c9 20 69 5f 73 5f | 6e 6c 71 3a 0d 05 d2 42 |  . i_s_|nlq:...B|
|000011c0| 20 20 20 20 20 6c 69 6e | 65 32 24 20 3d 20 22 53 |     lin|e2$ = "S|
|000011d0| 65 6c 65 63 74 20 74 6f | 20 70 72 69 6e 74 20 69 |elect to| print i|
|000011e0| 6e 20 61 20 4e 65 61 72 | 20 4c 65 74 74 65 72 20 |n a Near| Letter |
|000011f0| 51 75 61 6c 69 74 79 20 | 66 6f 6e 74 2e 22 0d 05 |Quality |font."..|
|00001200| dc 13 20 20 20 20 c9 20 | 69 5f 73 5f 62 6f 6c 64 |..    . |i_s_bold|
|00001210| 3a 0d 05 e6 35 20 20 20 | 20 20 6c 69 6e 65 32 24 |:...5   |  line2$|
|00001220| 20 3d 20 22 53 65 6c 65 | 63 74 20 74 6f 20 70 72 | = "Sele|ct to pr|
|00001230| 69 6e 74 20 74 68 65 20 | 74 65 78 74 20 69 6e 20 |int the |text in |
|00001240| 62 6f 6c 64 2e 22 0d 05 | f0 13 20 20 20 20 c9 20 |bold."..|..    . |
|00001250| 69 5f 73 5f 69 74 61 6c | 3a 0d 05 fa 38 20 20 20 |i_s_ital|:...8   |
|00001260| 20 20 6c 69 6e 65 32 24 | 20 3d 20 22 53 65 6c 65 |  line2$| = "Sele|
|00001270| 63 74 20 74 6f 20 70 72 | 69 6e 74 20 74 68 65 20 |ct to pr|int the |
|00001280| 74 65 78 74 20 69 6e 20 | 69 74 61 6c 69 63 73 2e |text in |italics.|
|00001290| 22 0d 06 04 12 20 20 20 | 20 c9 20 69 5f 73 5f 72 |"....   | . i_s_r|
|000012a0| 65 64 3a 0d 06 0e 44 20 | 20 20 20 20 6c 69 6e 65 |ed:...D |    line|
|000012b0| 32 24 20 3d 20 22 53 65 | 6c 65 63 74 20 74 6f 20 |2$ = "Se|lect to |
|000012c0| 70 72 69 6e 74 20 74 68 | 65 20 74 65 78 74 20 69 |print th|e text i|
|000012d0| 6e 20 61 6e 20 61 6c 74 | 65 72 6e 61 74 65 20 63 |n an alt|ernate c|
|000012e0| 6f 6c 6f 75 72 2e 22 0d | 06 18 14 20 20 20 20 c9 |olour.".|...    .|
|000012f0| 20 69 5f 73 5f 75 6e 64 | 65 72 3a 0d 06 22 38 20 | i_s_und|er:.."8 |
|00001300| 20 20 20 20 6c 69 6e 65 | 32 24 20 3d 20 22 53 65 |    line|2$ = "Se|
|00001310| 6c 65 63 74 20 74 6f 20 | 70 72 69 6e 74 20 74 68 |lect to |print th|
|00001320| 65 20 74 65 78 74 20 75 | 6e 64 65 72 6c 69 6e 65 |e text u|nderline|
|00001330| 64 2e 22 0d 06 2c 29 20 | 20 20 20 c9 20 69 5f 73 |d."..,) |   . i_s|
|00001340| 5f 70 35 2c 69 5f 73 5f | 70 31 30 2c 69 5f 73 5f |_p5,i_s_|p10,i_s_|
|00001350| 70 31 32 2c 69 5f 73 5f | 70 31 37 3a 0d 06 36 3c |p12,i_s_|p17:..6<|
|00001360| 20 20 20 20 20 6c 69 6e | 65 32 24 20 3d 20 22 53 |     lin|e2$ = "S|
|00001370| 65 6c 65 63 74 20 74 68 | 65 20 68 6f 72 69 7a 6f |elect th|e horizo|
|00001380| 6e 74 61 6c 20 28 63 68 | 61 72 61 63 74 65 72 29 |ntal (ch|aracter)|
|00001390| 20 70 69 74 63 68 2e 22 | 0d 06 40 1f 20 20 20 20 | pitch."|..@.    |
|000013a0| c9 20 69 5f 73 5f 6c 34 | 2c 69 5f 73 5f 6c 36 2c |. i_s_l4|,i_s_l6,|
|000013b0| 69 5f 73 5f 6c 38 3a 0d | 06 4a 35 20 20 20 20 20 |i_s_l8:.|.J5     |
|000013c0| 6c 69 6e 65 32 24 20 3d | 20 22 53 65 6c 65 63 74 |line2$ =| "Select|
|000013d0| 20 74 68 65 20 76 65 72 | 74 69 63 61 6c 20 28 6c | the ver|tical (l|
|000013e0| 69 6e 65 29 20 70 69 74 | 63 68 2e 22 0d 06 54 0a |ine) pit|ch."..T.|
|000013f0| 20 20 20 20 7f 3a 0d 06 | 5e 3e 20 20 20 20 20 6c |    .:..|^>     l|
|00001400| 69 6e 65 32 24 20 3d 20 | 22 43 6c 69 63 6b 20 84 |ine2$ = |"Click .|
|00001410| 20 77 68 65 6e 20 74 68 | 65 20 73 65 74 74 69 6e | when th|e settin|
|00001420| 67 73 20 61 72 65 20 61 | 73 20 72 65 71 75 69 72 |gs are a|s requir|
|00001430| 65 64 2e 22 0d 06 68 08 | 20 20 20 cb 0d 06 72 0f |ed."..h.|   ...r.|
|00001440| 20 20 c9 20 77 5f 74 65 | 78 74 3a 0d 06 7c 35 20 |  . w_te|xt:..|5 |
|00001450| 20 20 6c 69 6e 65 31 24 | 20 3d 20 22 45 6e 74 65 |  line1$| = "Ente|
|00001460| 72 20 74 68 65 20 6c 61 | 62 65 6c 20 74 65 78 74 |r the la|bel text|
|00001470| 20 69 6e 20 74 68 69 73 | 20 77 69 6e 64 6f 77 22 | in this| window"|
|00001480| 0d 06 86 3e 20 20 20 e7 | 20 69 63 6f 6e 3e 3d 30 |...>   .| icon>=0|
|00001490| 20 8c 20 6c 69 6e 65 31 | 24 20 2b 3d 20 22 20 2d | . line1|$ += " -|
|000014a0| 20 74 68 69 73 20 69 73 | 20 74 65 78 74 20 6c 69 | this is| text li|
|000014b0| 6e 65 20 22 2b c3 28 69 | 63 6f 6e 2b 31 29 0d 06 |ne "+.(i|con+1)..|
|000014c0| 90 14 20 20 20 6c 69 6e | 65 31 24 20 2b 3d 20 22 |..   lin|e1$ += "|
|000014d0| 2e 22 0d 06 9a 28 20 20 | 20 c8 99 20 22 57 69 6d |."...(  | .. "Wim|
|000014e0| 70 5f 47 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_GetCar|etPositi|
|000014f0| 6f 6e 22 2c 2c 62 6c 6f | 63 6b 0d 06 a4 19 20 20 |on",,blo|ck....  |
|00001500| 20 e7 20 62 6c 6f 63 6b | 21 30 3d 77 5f 74 65 78 | . block|!0=w_tex|
|00001510| 74 20 8c 0d 06 ae 5b 20 | 20 20 20 6c 69 6e 65 32 |t ....[ |   line2|
|00001520| 24 20 3d 20 22 88 20 89 | 20 8a 20 8b 2c 20 52 65 |$ = ". .| . ., Re|
|00001530| 74 75 72 6e 20 6f 72 20 | 54 61 62 20 6d 6f 76 65 |turn or |Tab move|
|00001540| 20 74 68 65 20 63 75 72 | 73 6f 72 2e 20 20 45 73 | the cur|sor.  Es|
|00001550| 63 61 70 65 20 63 6c 65 | 61 72 73 20 74 68 65 20 |cape cle|ars the |
|00001560| 63 75 72 72 65 6e 74 20 | 6c 69 6e 65 2e 22 0d 06 |current |line."..|
|00001570| b8 42 20 20 20 20 6c 69 | 6e 65 33 24 20 3d 20 22 |.B    li|ne3$ = "|
|00001580| 49 6e 73 65 72 74 20 61 | 6e 64 20 53 68 69 66 74 |Insert a|nd Shift|
|00001590| 2d 49 6e 73 65 72 74 20 | 69 6e 73 65 72 74 20 6f |-Insert |insert o|
|000015a0| 72 20 64 65 6c 65 74 65 | 20 6c 69 6e 65 73 2e 22 |r delete| lines."|
|000015b0| 0d 06 c2 08 20 20 20 cc | 0d 06 cc 42 20 20 20 20 |....   .|...B    |
|000015c0| 6c 69 6e 65 32 24 20 3d | 20 22 43 6c 69 63 6b 20 |line2$ =| "Click |
|000015d0| 53 45 4c 45 43 54 20 74 | 6f 20 70 6f 73 69 74 69 |SELECT t|o positi|
|000015e0| 6f 6e 20 74 68 65 20 63 | 75 72 73 6f 72 20 66 6f |on the c|ursor fo|
|000015f0| 72 20 74 79 70 69 6e 67 | 2e 22 0d 06 d6 08 20 20 |r typing|."....  |
|00001600| 20 cd 0d 06 e0 06 20 cb | 0d 06 ea 04 0d 06 f4 37 | ..... .|.......7|
|00001610| 20 24 28 62 6c 6b 2b 32 | 30 29 20 3d 20 6c 69 6e | $(blk+2|0) = lin|
|00001620| 65 31 24 2b 22 7c 4d 22 | 2b 6c 69 6e 65 32 24 2b |e1$+"|M"|+line2$+|
|00001630| 22 7c 4d 22 2b 6c 69 6e | 65 33 24 2b 22 7c 4d 22 |"|M"+lin|e3$+"|M"|
|00001640| 2b bd 30 0d 06 fe 13 20 | 62 6c 6b 21 31 32 20 3d |+.0.... |blk!12 =|
|00001650| 20 62 6c 6b 21 38 0d 07 | 08 19 20 62 6c 6b 21 31 | blk!8..|.. blk!1|
|00001660| 36 20 3d 20 4d 73 67 5f | 48 65 6c 70 52 65 70 0d |6 = Msg_|HelpRep.|
|00001670| 07 12 1e 20 62 6c 6b 21 | 30 20 3d 20 32 30 2b a9 |... blk!|0 = 20+.|
|00001680| 28 24 28 62 6c 6b 2b 32 | 30 29 29 2b 32 0d 07 1c |($(blk+2|0))+2...|
|00001690| 1c 20 62 6c 6b 21 30 20 | 3d 20 34 2b 34 2a 28 62 |. blk!0 |= 4+4*(b|
|000016a0| 6c 6b 21 30 20 81 20 34 | 29 0d 07 26 2f 20 c8 99 |lk!0 . 4|)..&/ ..|
|000016b0| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|000016c0| 67 65 22 2c 52 63 5f 4d | 65 73 73 61 67 65 2c 62 |ge",Rc_M|essage,b|
|000016d0| 6c 6b 2c 62 6c 6b 21 34 | 0d 07 30 05 e1 0d 07 3a |lk,blk!4|..0....:|
|000016e0| 04 0d 07 44 11 dd 20 f2 | 73 68 6f 77 5f 66 69 6c |...D.. .|show_fil|
|000016f0| 65 73 0d 07 4e 05 3a 0d | 07 58 39 3a 20 f4 20 50 |es..N.:.|.X9: . P|
|00001700| 6f 70 20 75 70 20 74 68 | 65 20 66 69 6c 65 20 69 |op up th|e file i|
|00001710| 6e 66 6f 20 77 69 6e 64 | 6f 77 20 61 73 20 61 20 |nfo wind|ow as a |
|00001720| 28 74 72 61 6e 73 69 65 | 6e 74 29 20 6d 65 6e 75 |(transie|nt) menu|
|00001730| 0d 07 62 05 3a 0d 07 6c | 0f 20 f2 66 69 6c 65 5f |..b.:..l|. .file_|
|00001740| 69 6e 66 6f 0d 07 76 29 | 20 c8 99 20 22 57 69 6d |info..v)| .. "Wim|
|00001750| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 77 |p_Create|Menu",,w|
|00001760| 5f 66 69 6c 65 2c 35 30 | 30 2c 34 30 30 0d 07 80 |_file,50|0,400...|
|00001770| 05 e1 0d 07 8a 04 0d 07 | 94 0d dd 20 f2 6f 75 74 |........|... .out|
|00001780| 6c 61 62 0d 07 9e 16 ea | 20 4a 25 2c 6c 69 24 2c |lab.....| J%,li$,|
|00001790| 73 65 70 24 2c 74 65 73 | 74 0d 07 a8 05 3a 0d 07 |sep$,tes|t....:..|
|000017a0| b2 28 3a 20 f4 20 4f 75 | 74 70 75 74 20 6f 6e 65 |.(: . Ou|tput one|
|000017b0| 20 6c 61 62 65 6c 20 6f | 72 20 74 65 73 74 20 70 | label o|r test p|
|000017c0| 61 74 74 65 72 6e 0d 07 | bc 05 3a 0d 07 c6 38 20 |attern..|..:...8 |
|000017d0| 73 65 70 24 20 3d 20 c4 | a8 28 28 70 61 72 61 6d |sep$ = .|.((param|
|000017e0| 28 70 5f 68 70 29 2d 70 | 61 72 61 6d 28 70 5f 77 |(p_hp)-p|aram(p_w|
|000017f0| 69 64 74 68 29 29 2a 63 | 70 69 2b 2e 31 29 2c 22 |idth))*c|pi+.1),"|
|00001800| 20 22 29 0d 07 d0 17 20 | 74 65 73 74 20 3d 20 6e | ").... |test = n|
|00001810| 5f 63 6f 70 69 65 73 3d | 2d 31 0d 07 da 05 3a 0d |_copies=|-1....:.|
|00001820| 07 e4 17 20 e3 20 4a 25 | 20 3d 20 31 20 b8 20 6e |... . J%| = 1 . n|
|00001830| 5f 6c 69 6e 65 73 0d 07 | ee 42 20 20 6c 69 24 20 |_lines..|.B  li$ |
|00001840| 3d 20 c4 a8 28 70 61 72 | 61 6d 28 70 5f 6f 66 66 |= ..(par|am(p_off|
|00001850| 29 2a 63 70 69 2b 2e 31 | 29 2c 22 20 22 29 20 20 |)*cpi+.1|)," ")  |
|00001860| 20 20 20 20 20 20 20 20 | 3a 20 f4 20 66 69 72 73 |        |: . firs|
|00001870| 74 20 6f 66 66 73 65 74 | 0d 07 f8 49 20 20 6c 69 |t offset|...I  li|
|00001880| 24 20 2b 3d 20 a4 6d 61 | 6b 65 6c 69 6e 65 28 74 |$ += .ma|keline(t|
|00001890| 65 73 74 2c 4a 25 2c 31 | 29 20 20 20 20 20 20 20 |est,J%,1|)       |
|000018a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000018b0| 20 20 3a 20 f4 20 66 69 | 72 73 74 20 6c 61 62 65 |  : . fi|rst labe|
|000018c0| 6c 0d 08 02 11 20 20 e7 | 20 73 74 6f 63 6b 3e 31 |l....  .| stock>1|
|000018d0| 20 8c 0d 08 0c 4a 20 20 | 20 6c 69 24 20 2b 3d 20 | ....J  | li$ += |
|000018e0| 73 65 70 24 2b a4 6d 61 | 6b 65 6c 69 6e 65 28 74 |sep$+.ma|keline(t|
|000018f0| 65 73 74 2c 4a 25 2c 32 | 29 20 20 20 20 20 20 20 |est,J%,2|)       |
|00001900| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a 20 f4 20 |        |    : . |
|00001910| 73 65 63 6f 6e 64 20 6c | 61 62 65 6c 0d 08 16 12 |second l|abel....|
|00001920| 20 20 20 e7 20 73 74 6f | 63 6b 3e 32 20 8c 0d 08 |   . sto|ck>2 ...|
|00001930| 20 49 20 20 20 20 6c 69 | 24 20 2b 3d 20 73 65 70 | I    li|$ += sep|
|00001940| 24 2b a4 6d 61 6b 65 6c | 69 6e 65 28 74 65 73 74 |$+.makel|ine(test|
|00001950| 2c 4a 25 2c 33 29 20 20 | 20 20 20 20 20 20 20 20 |,J%,3)  |        |
|00001960| 20 20 20 20 20 20 20 20 | 3a 20 f4 20 74 68 69 72 |        |: . thir|
|00001970| 64 20 6c 61 62 65 6c 0d | 08 2a 08 20 20 20 cd 0d |d label.|.*.   ..|
|00001980| 08 34 07 20 20 cd 0d 08 | 35 2d 20 20 c8 95 20 c2 |.4.  ...|5-  .. .|
|00001990| 6c 69 24 2c 31 29 3d 22 | 20 22 3a 20 6c 69 24 20 |li$,1)="| ": li$ |
|000019a0| 3d 20 c0 6c 69 24 2c a9 | 28 6c 69 24 29 2d 31 29 |= .li$,.|(li$)-1)|
|000019b0| 3a 20 ce 0d 08 3e 10 20 | 20 d5 20 23 70 72 74 2c |: ...>. | . #prt,|
|000019c0| 6c 69 24 0d 08 48 06 20 | ed 0d 08 52 05 3a 0d 08 |li$..H. |...R.:..|
|000019d0| 5c 2f 20 e7 20 70 61 72 | 61 6d 28 70 5f 76 70 29 |\/ . par|am(p_vp)|
|000019e0| 3c 3e 70 61 72 61 6d 28 | 70 5f 68 65 69 67 68 74 |<>param(|p_height|
|000019f0| 29 20 8c 20 d5 20 23 70 | 72 74 2c 31 32 0d 08 66 |) . . #p|rt,12..f|
|00001a00| 05 e1 0d 08 70 04 0d 08 | 7a 1e dd 20 a4 6d 61 6b |....p...|z.. .mak|
|00001a10| 65 6c 69 6e 65 28 74 65 | 73 74 2c 6c 69 6e 65 2c |eline(te|st,line,|
|00001a20| 70 6f 73 29 0d 08 84 11 | ea 20 6c 69 24 2c 6c 77 |pos)....|. li$,lw|
|00001a30| 2c 69 6e 64 24 0d 08 8e | 05 3a 0d 08 98 2a 3a 20 |,ind$...|.:...*: |
|00001a40| f4 20 41 73 73 65 6d 62 | 6c 65 20 6f 6e 65 20 6c |. Assemb|le one l|
|00001a50| 61 62 65 6c 20 6f 72 20 | 74 65 73 74 20 70 61 74 |abel or |test pat|
|00001a60| 74 65 72 6e 0d 08 a2 05 | 3a 0d 08 ac 0e 20 20 e7 |tern....|:....  .|
|00001a70| 20 74 65 73 74 20 8c 0d | 08 b6 40 20 20 20 6c 69 | test ..|..@   li|
|00001a80| 24 20 3d 20 c4 6e 5f 63 | 68 61 72 73 2c 22 58 22 |$ = .n_c|hars,"X"|
|00001a90| 29 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |)       |        |
|00001aa0| 20 20 20 20 20 20 20 3a | 20 f4 20 54 65 73 74 20 |       :| . Test |
|00001ab0| 70 61 74 74 65 72 6e 0d | 08 c0 07 20 20 cc 0d 08 |pattern.|...  ...|
|00001ac0| ca 46 20 20 20 6c 69 24 | 20 3d 20 c0 6c 69 6e 65 |.F   li$| = .line|
|00001ad0| 24 28 6c 69 6e 65 2c 70 | 6f 73 29 2c 6e 5f 63 68 |$(line,p|os),n_ch|
|00001ae0| 61 72 73 29 20 20 20 20 | 20 20 20 20 20 20 20 20 |ars)    |        |
|00001af0| 3a 20 f4 20 4c 69 6e 65 | 20 66 72 6f 6d 20 73 6f |: . Line| from so|
|00001b00| 75 72 63 65 0d 08 d4 07 | 20 20 cd 0d 08 de 19 20 |urce....|  ..... |
|00001b10| 20 6c 77 20 3d 20 6e 5f | 63 68 61 72 73 2d a9 28 | lw = n_|chars-.(|
|00001b20| 6c 69 24 29 0d 08 e8 1f | 20 20 6c 69 24 20 3d 20 |li$)....|  li$ = |
|00001b30| 75 6e 64 65 72 31 24 2b | 6c 69 24 2b 75 6e 64 65 |under1$+|li$+unde|
|00001b40| 72 30 24 0d 08 f2 05 3a | 0d 08 fc 0f 20 20 c8 8e |r0$....:|....  ..|
|00001b50| 20 6a 75 73 74 20 ca 0d | 09 06 1b 20 20 20 c9 20 | just ..|...   . |
|00001b60| 31 3a 20 6c 69 24 20 2b | 3d 20 c4 6c 77 2c 22 20 |1: li$ +|= .lw," |
|00001b70| 22 29 0d 09 10 34 20 20 | 20 c9 20 32 3a 20 6c 69 |")...4  | . 2: li|
|00001b80| 24 20 3d 20 c4 6c 77 20 | 81 20 32 2c 22 20 22 29 |$ = .lw |. 2," ")|
|00001b90| 2b 6c 69 24 2b c4 6c 77 | 2d 28 6c 77 20 81 20 32 |+li$+.lw|-(lw . 2|
|00001ba0| 29 2c 22 20 22 29 0d 09 | 1a 1e 20 20 20 c9 20 33 |)," ")..|..   . 3|
|00001bb0| 3a 20 6c 69 24 20 3d 20 | c4 6c 77 2c 22 20 22 29 |: li$ = |.lw," ")|
|00001bc0| 2b 6c 69 24 0d 09 24 07 | 20 20 cb 0d 09 2e 05 3a |+li$..$.|  .....:|
|00001bd0| 0d 09 38 3e 20 20 69 6e | 64 24 20 3d 20 c4 a8 28 |..8>  in|d$ = ..(|
|00001be0| 70 61 72 61 6d 28 70 5f | 69 6e 64 29 2a 63 70 69 |param(p_|ind)*cpi|
|00001bf0| 2b 2e 31 29 2c 22 20 22 | 29 20 20 20 20 20 3a 20 |+.1)," "|)     : |
|00001c00| f4 20 50 72 69 6e 74 20 | 69 6e 64 65 6e 74 0d 09 |. Print |indent..|
|00001c10| 42 2d 20 20 e7 20 6a 75 | 73 74 3d 33 20 8c 20 6c |B-  . ju|st=3 . l|
|00001c20| 69 24 20 2b 3d 20 69 6e | 64 24 20 8b 20 6c 69 24 |i$ += in|d$ . li$|
|00001c30| 20 3d 20 69 6e 64 24 2b | 6c 69 24 0d 09 4c 05 3a | = ind$+|li$..L.:|
|00001c40| 0d 09 56 09 3d 20 6c 69 | 24 0d 09 60 04 0d 09 6a |..V.= li|$..`...j|
|00001c50| 14 dd 20 f2 6f 75 74 70 | 75 74 28 66 69 6c 65 24 |.. .outp|ut(file$|
|00001c60| 29 0d 09 74 12 ea 20 4a | 25 2c 4e 25 2c 64 66 2c |)..t.. J|%,N%,df,|
|00001c70| 6c 69 24 0d 09 7e 07 ea | 20 85 0d 09 88 05 3a 0d |li$..~..| .....:.|
|00001c80| 09 92 46 3a 20 f4 20 4f | 75 74 70 75 74 20 74 68 |..F: . O|utput th|
|00001c90| 65 20 6c 61 62 65 6c 73 | 20 66 72 6f 6d 20 69 6e |e labels| from in|
|00001ca0| 70 75 74 20 74 65 78 74 | 20 6f 72 20 64 61 74 61 |put text| or data|
|00001cb0| 20 66 69 6c 65 20 61 73 | 20 61 70 70 72 6f 70 72 | file as| appropr|
|00001cc0| 69 61 74 65 2e 0d 09 9c | 44 3a 20 f4 20 4e 75 6d |iate....|D: . Num|
|00001cd0| 62 65 72 20 72 65 71 75 | 65 73 74 65 64 20 69 73 |ber requ|ested is|
|00001ce0| 20 69 6e 20 74 68 65 20 | 67 6c 6f 62 61 6c 20 27 | in the |global '|
|00001cf0| 6e 5f 63 6f 70 69 65 73 | 27 20 28 2d 31 20 3d 3e |n_copies|' (-1 =>|
|00001d00| 20 6c 69 6e 65 20 75 70 | 2c 0d 09 a6 19 3a 20 f4 | line up|,....: .|
|00001d10| 20 2d 32 20 3d 3e 20 66 | 6f 72 6d 20 66 65 65 64 | -2 => f|orm feed|
|00001d20| 29 2e 0d 09 b0 05 3a 0d | 09 ba 13 20 70 72 74 20 |).....:.|... prt |
|00001d30| 3d 20 ae 28 66 69 6c 65 | 24 29 0d 09 c4 0f 20 e7 |= .(file|$).... .|
|00001d40| 20 70 72 74 3c 3d 30 20 | 8c 0d 09 ce 35 20 20 f2 | prt<=0 |....5  .|
|00001d50| 77 61 72 6e 28 22 43 6f | 75 6c 64 6e 27 74 20 6f |warn("Co|uldn't o|
|00001d60| 70 65 6e 20 70 72 69 6e | 74 65 72 20 66 69 6c 65 |pen prin|ter file|
|00001d70| 20 27 22 2b 66 69 6c 65 | 24 2b 22 27 22 29 0d 09 | '"+file|$+"'")..|
|00001d80| d8 06 20 cc 0d 09 e2 17 | 20 20 c8 99 20 22 48 6f |.. .....|  .. "Ho|
|00001d90| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 09 ec 05 3a |urglass_|On"....:|
|00001da0| 0d 09 f6 2e 3a 20 f4 20 | 45 6e 61 62 6c 65 20 45 |....: . |Enable E|
|00001db0| 73 63 61 70 65 20 77 68 | 69 6c 65 20 6f 75 74 70 |scape wh|ile outp|
|00001dc0| 75 74 20 69 6e 20 70 72 | 6f 67 72 65 73 73 0d 0a |ut in pr|ogress..|
|00001dd0| 00 05 3a 0d 0a 0a 5d 20 | ee 20 85 20 ea 20 e7 20 |..:...] |. . . . |
|00001de0| 9f 3c 3e 31 37 20 8c 20 | f7 20 85 20 3a 20 85 20 |.<>17 . |. . : . |
|00001df0| 9f 2c f6 24 2b 22 20 28 | 6c 69 6e 65 20 22 2b c3 |.,.$+" (|line "+.|
|00001e00| 9e 2b 22 29 22 20 8b 20 | f2 77 61 72 6e 28 22 45 |.+")" . |.warn("E|
|00001e10| 73 63 61 70 65 20 2d 20 | 70 72 69 6e 74 20 61 62 |scape - |print ab|
|00001e20| 6f 72 74 65 64 22 29 20 | 3a 20 e5 20 8d 54 44 4b |orted") |: . .TDK|
|00001e30| 0d 0a 14 19 20 c8 99 20 | 22 4f 53 5f 42 79 74 65 |.... .. |"OS_Byte|
|00001e40| 22 2c 32 32 39 2c 30 2c | 30 0d 0a 1e 0f 20 20 f2 |",229,0,|0....  .|
|00001e50| 69 6e 69 74 5f 70 72 74 | 0d 0a 28 05 3a 0d 0a 32 |init_prt|..(.:..2|
|00001e60| 15 20 20 e7 20 6e 5f 63 | 6f 70 69 65 73 3d 2d 32 |.  . n_c|opies=-2|
|00001e70| 20 8c 0d 0a 3c 10 20 20 | 20 d5 20 23 70 72 74 2c | ...<.  | . #prt,|
|00001e80| 31 32 0d 0a 46 0d 20 20 | 20 e5 20 8d 54 58 4b 0d |12..F.  | . .TXK.|
|00001e90| 0a 50 07 20 20 cd 0d 0a | 5a 05 3a 0d 0a 64 1f 20 |.P.  ...|Z.:..d. |
|00001ea0| 20 e7 20 65 6e 74 65 72 | 20 84 20 28 6e 5f 63 6f | . enter| . (n_co|
|00001eb0| 70 69 65 73 3d 2d 31 29 | 20 8c 0d 0a 6e 19 20 20 |pies=-1)| ...n.  |
|00001ec0| 20 76 6f 69 64 20 3d 20 | a4 72 65 61 64 73 65 74 | void = |.readset|
|00001ed0| 28 30 29 0d 0a 78 3f 20 | 20 20 4e 25 20 3d 20 28 |(0)..x? |  N% = (|
|00001ee0| 6e 5f 63 6f 70 69 65 73 | 2b 73 74 6f 63 6b 2d 31 |n_copies|+stock-1|
|00001ef0| 29 20 81 20 73 74 6f 63 | 6b 20 3a 20 e7 20 6e 5f |) . stoc|k : . n_|
|00001f00| 63 6f 70 69 65 73 3d 2d | 31 20 8c 20 4e 25 20 3d |copies=-|1 . N% =|
|00001f10| 20 31 0d 0a 82 22 20 20 | 20 e3 20 4a 25 20 3d 20 | 1..."  | . J% = |
|00001f20| 31 20 b8 20 4e 25 20 3a | 20 f2 6f 75 74 6c 61 62 |1 . N% :| .outlab|
|00001f30| 20 3a 20 ed 0d 0a 8c 07 | 20 20 cc 0d 0a 96 17 20 | : .....|  ..... |
|00001f40| 20 20 64 66 20 3d 20 8e | 28 6c 61 62 66 69 6c 65 |  df = .|(labfile|
|00001f50| 24 29 0d 0a a0 10 20 20 | 20 e7 20 64 66 3c 3d 30 |$)....  | . df<=0|
|00001f60| 20 8c 0d 0a aa 3d 20 20 | 20 20 f2 77 61 72 6e 28 | ....=  |  .warn(|
|00001f70| 22 43 6f 75 6c 64 6e 27 | 74 20 6f 70 65 6e 20 6c |"Couldn'|t open l|
|00001f80| 61 62 65 6c 20 64 61 74 | 61 20 66 69 6c 65 20 27 |abel dat|a file '|
|00001f90| 22 2b 6c 61 62 66 69 6c | 65 24 2b 22 27 22 29 0d |"+labfil|e$+"'").|
|00001fa0| 0a b4 0e 20 20 20 20 e5 | 20 8d 54 76 4b 0d 0a be |...    .| .TvK...|
|00001fb0| 08 20 20 20 cd 0d 0a c8 | 0e 20 20 20 65 6f 66 20 |.   ....|.   eof |
|00001fc0| 3d 20 46 0d 0a d2 11 20 | 20 20 c8 95 20 28 ac 20 |= F.... |  .. (. |
|00001fd0| 65 6f 66 29 0d 0a dc 18 | 20 20 20 20 e7 20 a4 72 |eof)....|    . .r|
|00001fe0| 65 61 64 73 65 74 28 64 | 66 29 20 8c 0d 0a e6 2a |eadset(d|f) ....*|
|00001ff0| 20 20 20 20 20 e3 20 4a | 25 20 3d 20 31 20 b8 20 |     . J|% = 1 . |
|00002000| 6e 5f 63 6f 70 69 65 73 | 20 3a 20 f2 6f 75 74 6c |n_copies| : .outl|
|00002010| 61 62 20 3a 20 ed 0d 0a | f0 09 20 20 20 20 cd 0d |ab : ...|..    ..|
|00002020| 0a fa 08 20 20 20 ce 0d | 0b 04 0c 20 20 20 d9 20 |...   ..|...   . |
|00002030| 23 64 66 0d 0b 0e 07 20 | 20 cd 0d 0b 18 05 3a 0d |#df.... | .....:.|
|00002040| 0b 22 39 3a 20 f4 20 43 | 6c 65 61 72 20 61 6e 64 |."9: . C|lear and|
|00002050| 20 64 69 73 61 62 6c 65 | 20 45 73 63 61 70 65 20 | disable| Escape |
|00002060| 62 65 66 6f 72 65 20 72 | 65 74 75 72 6e 69 6e 67 |before r|eturning|
|00002070| 20 74 6f 20 57 69 6d 70 | 0d 0b 2c 05 3a 0d 0b 36 | to Wimp|..,.:..6|
|00002080| 16 20 20 c8 99 20 22 4f | 53 5f 42 79 74 65 22 2c |.  .. "O|S_Byte",|
|00002090| 31 32 34 0d 0b 40 1a 20 | 20 c8 99 20 22 4f 53 5f |124..@. | .. "OS_|
|000020a0| 42 79 74 65 22 2c 32 32 | 39 2c 31 2c 30 0d 0b 4a |Byte",22|9,1,0..J|
|000020b0| 09 20 20 f7 20 85 0d 0b | 54 0c 20 20 d9 20 23 70 |.  . ...|T.  . #p|
|000020c0| 72 74 0d 0b 5e 18 20 20 | c8 99 20 22 48 6f 75 72 |rt..^.  |.. "Hour|
|000020d0| 67 6c 61 73 73 5f 4f 66 | 66 22 0d 0b 68 06 20 cd |glass_Of|f"..h. .|
|000020e0| 0d 0b 72 05 e1 0d 0b 7c | 04 0d 0b 86 12 dd 20 a4 |..r....||...... .|
|000020f0| 72 65 61 64 73 65 74 28 | 64 66 29 0d 0b 90 0f ea |readset(|df).....|
|00002100| 20 61 6e 79 2c 49 25 2c | 4a 25 0d 0b 9a 05 3a 0d | any,I%,|J%....:.|
|00002110| 0b a4 4b 3a 20 f4 20 46 | 69 6c 6c 20 75 70 20 74 |..K: . F|ill up t|
|00002120| 68 65 20 6c 69 6e 65 20 | 61 72 72 61 79 20 77 69 |he line |array wi|
|00002130| 74 68 20 6c 61 62 65 6c | 20 73 74 72 69 6e 67 73 |th label| strings|
|00002140| 2c 20 66 72 6f 6d 20 74 | 68 65 20 72 65 71 75 69 |, from t|he requi|
|00002150| 72 65 64 20 73 6f 75 72 | 63 65 0d 0b ae 05 3a 0d |red sour|ce....:.|
|00002160| 0b b8 44 3a 20 f4 20 49 | 66 20 74 68 65 20 65 6e |..D: . I|f the en|
|00002170| 64 20 6f 66 20 66 69 6c | 65 20 69 73 20 72 65 61 |d of fil|e is rea|
|00002180| 63 68 65 64 2c 20 73 65 | 74 20 74 68 65 20 67 6c |ched, se|t the gl|
|00002190| 6f 62 61 6c 20 27 65 6f | 66 27 20 74 6f 20 54 52 |obal 'eo|f' to TR|
|000021a0| 55 45 2e 0d 0b c2 32 3a | 20 f4 20 52 65 74 75 72 |UE....2:| . Retur|
|000021b0| 6e 20 54 52 55 45 20 69 | 66 20 74 68 65 72 65 20 |n TRUE i|f there |
|000021c0| 69 73 20 61 6e 79 74 68 | 69 6e 67 20 74 6f 20 70 |is anyth|ing to p|
|000021d0| 72 69 6e 74 2e 0d 0b cc | 05 3a 0d 0b d6 0d 20 e7 |rint....|.:.... .|
|000021e0| 20 64 66 3d 30 20 8c 0d | 0b e0 22 20 20 e3 20 49 | df=0 ..|.."  . I|
|000021f0| 25 20 3d 20 31 20 b8 20 | 33 32 20 3a 20 e3 20 4a |% = 1 . |32 : . J|
|00002200| 25 20 3d 20 31 20 b8 20 | 33 0d 0b ea 1d 20 20 20 |% = 1 . |3....   |
|00002210| 6c 69 6e 65 24 28 49 25 | 2c 4a 25 29 20 3d 20 24 |line$(I%|,J%) = $|
|00002220| 6c 70 28 49 25 29 0d 0b | f4 0b 20 20 ed 20 3a 20 |lp(I%)..|..  . : |
|00002230| ed 0d 0b fe 0d 20 20 61 | 6e 79 20 3d 20 54 0d 0c |.....  a|ny = T..|
|00002240| 08 06 20 cc 0d 0c 12 3e | 20 20 e3 20 49 25 20 3d |.. ....>|  . I% =|
|00002250| 20 31 20 b8 20 33 32 20 | 3a 20 e3 20 4a 25 20 3d | 1 . 32 |: . J% =|
|00002260| 20 31 20 b8 20 33 20 3a | 20 6c 69 6e 65 24 28 49 | 1 . 3 :| line$(I|
|00002270| 25 2c 4a 25 29 20 3d 20 | 22 22 20 3a 20 ed 20 3a |%,J%) = |"" : . :|
|00002280| 20 ed 0d 0c 1c 0d 20 20 | 61 6e 79 20 3d 20 46 0d | .....  |any = F.|
|00002290| 0c 26 16 20 20 e3 20 49 | 25 20 3d 20 31 20 b8 20 |.&.  . I|% = 1 . |
|000022a0| 73 74 6f 63 6b 0d 0c 30 | 0d 20 20 20 4a 25 20 3d |stock..0|.   J% =|
|000022b0| 20 31 0d 0c 3a 08 20 20 | 20 f5 0d 0c 44 1a 20 20 | 1..:.  | ...D.  |
|000022c0| 20 20 6c 69 24 20 3d 20 | a4 67 65 74 6c 69 6e 65 |  li$ = |.getline|
|000022d0| 28 64 66 29 0d 0c 4e 19 | 20 20 20 20 e7 20 6c 69 |(df)..N.|    . li|
|000022e0| 24 3d 65 6f 66 24 20 8c | 20 8d 74 7c 4c 0d 0c 58 |$=eof$ .| .t|L..X|
|000022f0| 12 20 20 20 fd 20 6c 69 | 24 3c 3e 64 65 6c 24 0d |.   . li|$<>del$.|
|00002300| 0c 62 13 20 20 20 c8 95 | 20 6c 69 24 3c 3e 64 65 |.b.   ..| li$<>de|
|00002310| 6c 24 0d 0c 6c 0f 20 20 | 20 20 61 6e 79 20 3d 20 |l$..l.  |  any = |
|00002320| 54 0d 0c 76 25 20 20 20 | 20 e7 20 4a 25 3c 3d 33 |T..v%   | . J%<=3|
|00002330| 32 20 8c 20 6c 69 6e 65 | 24 28 4a 25 2c 49 25 29 |2 . line|$(J%,I%)|
|00002340| 20 3d 20 6c 69 24 0d 0c | 80 0f 20 20 20 20 4a 25 | = li$..|..    J%|
|00002350| 20 2b 3d 20 31 0d 0c 8a | 1a 20 20 20 20 6c 69 24 | += 1...|.    li$|
|00002360| 20 3d 20 a4 67 65 74 6c | 69 6e 65 28 64 66 29 0d | = .getl|ine(df).|
|00002370| 0c 94 19 20 20 20 20 e7 | 20 6c 69 24 3d 65 6f 66 |...    .| li$=eof|
|00002380| 24 20 8c 20 8d 74 7c 4c | 0d 0c 9e 08 20 20 20 ce |$ . .t|L|....   .|
|00002390| 0d 0c a8 07 20 20 ed 0d | 0c b2 06 20 cd 0d 0c bc |....  ..|... ....|
|000023a0| 09 3d 20 61 6e 79 0d 0c | c6 04 0d 0c d0 11 dd 20 |.= any..|....... |
|000023b0| a4 67 65 74 6c 69 6e 65 | 28 66 29 0d 0c da 09 ea |.getline|(f).....|
|000023c0| 20 6c 69 24 0d 0c e4 05 | 3a 0d 0c ee 35 3a 20 f4 | li$....|:...5: .|
|000023d0| 20 52 65 61 64 20 61 20 | 6c 69 6e 65 20 6f 66 20 | Read a |line of |
|000023e0| 74 65 78 74 20 66 72 6f | 6d 20 74 68 65 20 6c 61 |text fro|m the la|
|000023f0| 62 65 6c 20 64 61 74 61 | 20 66 69 6c 65 2e 0d 0c |bel data| file...|
|00002400| f8 42 3a 20 f4 20 52 65 | 74 75 72 6e 20 74 68 65 |.B: . Re|turn the|
|00002410| 20 6c 69 6e 65 2c 20 6f | 72 20 65 6f 66 2f 64 65 | line, o|r eof/de|
|00002420| 6c 69 6d 69 74 65 72 20 | 69 6e 64 69 63 61 74 6f |limiter |indicato|
|00002430| 72 20 61 73 20 61 70 70 | 72 6f 70 72 69 61 74 65 |r as app|ropriate|
|00002440| 0d 0d 02 05 3a 0d 0d 0c | 0c 20 e7 20 c5 23 66 20 |....:...|. . .#f |
|00002450| 8c 0d 0d 16 0d 20 20 65 | 6f 66 20 3d 20 54 0d 0d |.....  e|of = T..|
|00002460| 20 10 20 20 6c 69 24 20 | 3d 20 65 6f 66 24 0d 0d | .  li$ |= eof$..|
|00002470| 2a 06 20 cc 0d 0d 34 0f | 20 20 6c 69 24 20 3d 20 |*. ...4.|  li$ = |
|00002480| be 23 66 0d 0d 3e 20 20 | 20 e7 20 a4 64 65 6c 69 |.#f..>  | . .deli|
|00002490| 6d 28 6c 69 24 29 20 8c | 20 6c 69 24 20 3d 20 64 |m(li$) .| li$ = d|
|000024a0| 65 6c 24 0d 0d 48 06 20 | cd 0d 0d 52 09 3d 20 6c |el$..H. |...R.= l|
|000024b0| 69 24 0d 0d 5c 04 0d 0d | 66 0f dd 20 f2 69 6e 69 |i$..\...|f.. .ini|
|000024c0| 74 5f 70 72 74 0d 0d 70 | 0b ea 20 69 6e 69 74 24 |t_prt..p|.. init$|
|000024d0| 0d 0d 7a 05 3a 0d 0d 84 | 1d 3a 20 f4 20 53 65 74 |..z.:...|.: . Set|
|000024e0| 20 75 70 20 70 72 69 6e | 74 65 72 20 66 6f 72 6d | up prin|ter form|
|000024f0| 61 74 0d 0d 8e 05 3a 0d | 0d 98 45 20 69 6e 69 74 |at....:.|..E init|
|00002500| 24 20 3d 20 65 73 63 24 | 2b 22 40 22 20 3a 20 20 |$ = esc$|+"@" :  |
|00002510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002520| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002530| f4 20 49 6e 69 74 69 61 | 6c 69 73 65 0d 0d a2 05 |. Initia|lise....|
|00002540| 3a 0d 0d ac 0d 20 c8 8e | 20 63 70 69 20 ca 0d 0d |:.... ..| cpi ...|
|00002550| b6 44 20 20 c9 20 35 3a | 20 20 69 6e 69 74 24 20 |.D  . 5:|  init$ |
|00002560| 2b 3d 20 65 73 63 24 2b | 22 57 31 22 20 3a 20 20 |+= esc$+|"W1" :  |
|00002570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002580| 20 20 20 20 f4 20 44 6f | 75 62 6c 65 20 77 69 64 |    . Do|uble wid|
|00002590| 74 68 0d 0d c0 0b 20 20 | c9 20 31 30 3a 0d 0d ca |th....  |. 10:...|
|000025a0| 43 20 20 c9 20 31 32 3a | 20 69 6e 69 74 24 20 2b |C  . 12:| init$ +|
|000025b0| 3d 20 65 73 63 24 2b 22 | 4d 22 20 3a 20 20 20 20 |= esc$+"|M" :    |
|000025c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000025d0| 20 20 20 f4 20 45 6c 69 | 74 65 20 70 69 74 63 68 |   . Eli|te pitch|
|000025e0| 0d 0d d4 44 20 20 c9 20 | 31 37 3a 20 69 6e 69 74 |...D  . |17: init|
|000025f0| 24 20 2b 3d 20 bd 28 31 | 35 29 20 3a 20 20 20 20 |$ += .(1|5) :    |
|00002600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002610| 20 20 20 f4 20 43 6f 6e | 64 65 6e 73 65 64 20 70 |   . Con|densed p|
|00002620| 69 74 63 68 0d 0d de 06 | 20 cb 0d 0d e8 05 3a 0d |itch....| .....:.|
|00002630| 0d f2 0d 20 c8 8e 20 6c | 70 69 20 ca 0d 0d fc 49 |... .. l|pi ....I|
|00002640| 20 20 c9 20 34 3a 20 20 | 69 6e 69 74 24 20 2b 3d |  . 4:  |init$ +=|
|00002650| 20 65 73 63 24 2b 22 33 | 36 22 20 3a 20 20 20 20 | esc$+"3|6" :    |
|00002660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002670| 20 20 f4 20 35 34 2f 32 | 31 36 20 6c 69 6e 65 20 |  . 54/2|16 line |
|00002680| 70 69 74 63 68 0d 0e 06 | 0a 20 20 c9 20 36 3a 0d |pitch...|.  . 6:.|
|00002690| 0e 10 46 20 20 c9 20 38 | 3a 20 20 69 6e 69 74 24 |..F  . 8|:  init$|
|000026a0| 20 2b 3d 20 65 73 63 24 | 2b 22 30 22 20 3a 20 20 | += esc$|+"0" :  |
|000026b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000026c0| 20 20 20 20 20 f4 20 31 | 2f 38 20 6c 69 6e 65 20 |     . 1|/8 line |
|000026d0| 70 69 74 63 68 0d 0e 1a | 06 20 cb 0d 0e 24 05 3a |pitch...|. ...$.:|
|000026e0| 0d 0e 2e 38 20 e7 20 28 | 74 5f 74 79 70 65 20 80 |...8 . (|t_type .|
|000026f0| 20 25 30 30 30 30 31 29 | 3e 30 20 8c 20 69 6e 69 | %00001)|>0 . ini|
|00002700| 74 24 20 2b 3d 20 65 73 | 63 24 2b 22 78 31 22 20 |t$ += es|c$+"x1" |
|00002710| 3a 20 20 f4 20 4e 4c 51 | 0d 0e 38 39 20 e7 20 28 |:  . NLQ|..89 . (|
|00002720| 74 5f 74 79 70 65 20 80 | 20 25 30 30 30 31 30 29 |t_type .| %00010)|
|00002730| 3e 30 20 8c 20 69 6e 69 | 74 24 20 2b 3d 20 65 73 |>0 . ini|t$ += es|
|00002740| 63 24 2b 22 47 22 20 3a | 20 20 20 f4 20 42 6f 6c |c$+"G" :|   . Bol|
|00002750| 64 0d 0e 42 3b 20 e7 20 | 28 74 5f 74 79 70 65 20 |d..B; . |(t_type |
|00002760| 80 20 25 30 30 31 30 30 | 29 3e 30 20 8c 20 69 6e |. %00100|)>0 . in|
|00002770| 69 74 24 20 2b 3d 20 65 | 73 63 24 2b 22 34 22 20 |it$ += e|sc$+"4" |
|00002780| 3a 20 20 20 f4 20 49 74 | 61 6c 69 63 0d 0e 4c 38 |:   . It|alic..L8|
|00002790| 20 e7 20 28 74 5f 74 79 | 70 65 20 80 20 25 30 31 | . (t_ty|pe . %01|
|000027a0| 30 30 30 29 3e 30 20 8c | 20 69 6e 69 74 24 20 2b |000)>0 .| init$ +|
|000027b0| 3d 20 65 73 63 24 2b 22 | 72 31 22 20 3a 20 20 f4 |= esc$+"|r1" :  .|
|000027c0| 20 52 65 64 0d 0e 56 04 | 0d 0e 60 1c 20 e7 20 28 | Red..V.|..`. . (|
|000027d0| 74 5f 74 79 70 65 20 80 | 20 25 31 30 30 30 30 29 |t_type .| %10000)|
|000027e0| 3e 30 20 8c 0d 0e 6a 44 | 20 20 75 6e 64 65 72 31 |>0 ...jD|  under1|
|000027f0| 24 20 3d 20 65 73 63 24 | 2b 22 2d 31 22 20 3a 20 |$ = esc$|+"-1" : |
|00002800| 75 6e 64 65 72 30 24 20 | 3d 20 65 73 63 24 2b 22 |under0$ |= esc$+"|
|00002810| 2d 30 22 20 3a 20 20 20 | 20 20 20 20 20 f4 20 55 |-0" :   |     . U|
|00002820| 6e 64 65 72 6c 69 6e 65 | 0d 0e 74 06 20 cc 0d 0e |nderline|..t. ...|
|00002830| 7e 47 20 20 75 6e 64 65 | 72 31 24 20 3d 20 22 22 |~G  unde|r1$ = ""|
|00002840| 20 3a 20 75 6e 64 65 72 | 30 24 20 3d 20 22 22 20 | : under|0$ = "" |
|00002850| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00002860| 20 20 20 20 20 20 20 f4 | 20 4e 6f 20 75 6e 64 65 |       .| No unde|
|00002870| 72 6c 69 6e 65 0d 0e 88 | 06 20 cd 0d 0e 92 04 0d |rline...|. ......|
|00002880| 0e 9c 42 20 69 6e 69 74 | 24 20 2b 3d 20 65 73 63 |..B init|$ += esc|
|00002890| 24 2b 22 43 22 2b bd 28 | a8 28 70 61 72 61 6d 28 |$+"C"+.(|.(param(|
|000028a0| 70 5f 76 70 29 2a 6c 70 | 69 2b 2e 31 29 29 20 3a |p_vp)*lp|i+.1)) :|
|000028b0| 20 20 20 f4 20 46 6f 72 | 6d 20 28 6c 69 6e 65 73 |   . For|m (lines|
|000028c0| 29 0d 0e a6 05 3a 0d 0e | b0 12 20 d5 20 23 70 72 |)....:..|.. . #pr|
|000028d0| 74 2c 69 6e 69 74 24 3b | 0d 0e ba 05 e1 0d 0e c4 |t,init$;|........|
|000028e0| 04 0d 0e ce 18 dd 20 a4 | 6d 65 73 73 61 67 65 5f |...... .|message_|
|000028f0| 69 64 6c 65 28 62 6c 6b | 29 0d 0e d8 1c ea 20 73 |idle(blk|)..... s|
|00002900| 70 24 2c 66 69 6c 65 24 | 2c 64 70 2c 73 61 66 65 |p$,file$|,dp,safe|
|00002910| 2c 74 79 70 65 0d 0e e2 | 11 ea 20 62 62 31 2c 62 |,type...|.. bb1,b|
|00002920| 62 32 2c 62 62 33 0d 0e | ec 05 3a 0d 0e f6 28 3a |b2,bb3..|..:...(:|
|00002930| 20 f4 20 4d 65 73 73 61 | 67 65 20 72 65 63 65 69 | . Messa|ge recei|
|00002940| 76 65 64 20 69 6e 20 69 | 64 6c 65 20 70 72 6f 63 |ved in i|dle proc|
|00002950| 65 73 73 0d 0f 00 05 3a | 0d 0f 0a 10 20 c8 8e 20 |ess....:|.... .. |
|00002960| 62 6c 6b 21 31 36 20 ca | 0d 0f 14 05 3a 0d 0f 1e |blk!16 .|....:...|
|00002970| 11 20 20 c9 20 4d 73 67 | 5f 48 65 6c 70 3a 0d 0f |.  . Msg|_Help:..|
|00002980| 28 1b 20 20 20 f2 68 65 | 6c 70 28 62 6c 6b 21 33 |(.   .he|lp(blk!3|
|00002990| 32 2c 62 6c 6b 21 33 36 | 29 0d 0f 32 05 3a 0d 0f |2,blk!36|)..2.:..|
|000029a0| 3c 15 20 20 c9 20 4d 73 | 67 5f 4d 65 6e 75 57 61 |<.  . Ms|g_MenuWa|
|000029b0| 72 6e 3a 0d 0f 46 31 20 | 20 20 62 62 31 20 3d 20 |rn:..F1 |  bb1 = |
|000029c0| 62 6c 6b 21 32 30 20 3a | 20 62 62 32 20 3d 20 62 |blk!20 :| bb2 = b|
|000029d0| 6c 6b 21 32 34 20 3a 20 | 62 62 33 20 3d 20 62 6c |lk!24 : |bb3 = bl|
|000029e0| 6b 21 32 38 0d 0f 50 12 | 20 20 20 c8 8e 20 62 6c |k!28..P.|   .. bl|
|000029f0| 6b 21 33 32 20 ca 0d 0f | 5a 12 20 20 20 20 c9 20 |k!32 ...|Z.    . |
|00002a00| 69 6d 5f 66 69 6c 65 3a | 0d 0f 64 13 20 20 20 20 |im_file:|..d.    |
|00002a10| 20 f2 66 69 6c 65 5f 69 | 6e 66 6f 0d 0f 6e 12 20 | .file_i|nfo..n. |
|00002a20| 20 20 20 c9 20 69 6d 5f | 73 61 76 65 3a 0d 0f 78 |   . im_|save:..x|
|00002a30| 18 20 20 20 20 20 73 61 | 76 69 6e 67 20 3d 20 62 |.     sa|ving = b|
|00002a40| 6c 6b 21 33 36 0d 0f 82 | 14 20 20 20 20 20 c8 8e |lk!36...|.     ..|
|00002a50| 20 73 61 76 69 6e 67 20 | ca 0d 0f 8c 14 20 20 20 | saving |.....   |
|00002a60| 20 20 20 c9 20 73 6d 5f | 74 65 78 74 3a 0d 0f 96 |   . sm_|text:...|
|00002a70| 1b 20 20 20 20 20 20 20 | 73 70 24 20 3d 20 22 66 |.       |sp$ = "f|
|00002a80| 69 6c 65 5f 66 66 66 22 | 0d 0f a0 41 20 20 20 20 |ile_fff"|...A    |
|00002a90| 20 20 20 e7 20 6c 61 62 | 66 69 6c 65 24 3d 22 22 |   . lab|file$=""|
|00002aa0| 20 8c 20 66 69 6c 65 24 | 20 3d 20 22 4c 61 62 65 | . file$| = "Labe|
|00002ab0| 6c 46 69 6c 65 22 20 8b | 20 66 69 6c 65 24 20 3d |lFile" .| file$ =|
|00002ac0| 20 6c 61 62 66 69 6c 65 | 24 0d 0f aa 13 20 20 20 | labfile|$....   |
|00002ad0| 20 20 20 c9 20 73 6d 5f | 73 65 74 3a 0d 0f b4 2f |   . sm_|set:.../|
|00002ae0| 20 20 20 20 20 20 20 73 | 70 24 20 3d 20 22 66 69 |       s|p$ = "fi|
|00002af0| 6c 65 5f 22 2b c2 22 30 | 30 30 22 2b c3 7e 28 66 |le_"+."0|00"+.~(f|
|00002b00| 69 6c 65 74 79 70 65 29 | 2c 33 29 0d 0f be 41 20 |iletype)|,3)...A |
|00002b10| 20 20 20 20 20 20 e7 20 | 73 65 74 66 69 6c 65 24 |      . |setfile$|
|00002b20| 3d 22 22 20 8c 20 66 69 | 6c 65 24 20 3d 20 22 50 |="" . fi|le$ = "P|
|00002b30| 61 72 61 6d 46 69 6c 65 | 22 20 8b 20 66 69 6c 65 |aramFile|" . file|
|00002b40| 24 20 3d 20 73 65 74 66 | 69 6c 65 24 0d 0f c8 0c |$ = setf|ile$....|
|00002b50| 20 20 20 20 20 20 7f 3a | 0d 0f d2 26 20 20 20 20 |      .:|...&    |
|00002b60| 20 20 20 73 70 24 20 3d | 20 22 65 72 72 6f 72 21 |   sp$ =| "error!|
|00002b70| 22 20 3a 20 66 69 6c 65 | 24 20 3d 20 22 22 0d 0f |" : file|$ = ""..|
|00002b80| dc 0a 20 20 20 20 20 cb | 0d 0f e6 31 20 20 20 20 |..     .|...1    |
|00002b90| 20 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .. "OS_|SpriteOp|
|00002ba0| 22 2c 26 31 31 39 2c 73 | 70 72 69 74 65 73 2c 22 |",&119,s|prites,"|
|00002bb0| 66 69 6c 65 5f 78 78 78 | 22 0d 0f f0 35 20 20 20 |file_xxx|"...5   |
|00002bc0| 20 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |  .. "OS|_SpriteO|
|00002bd0| 70 22 2c 26 31 31 42 2c | 73 70 72 69 74 65 73 2c |p",&11B,|sprites,|
|00002be0| 73 70 24 2c 22 66 69 6c | 65 5f 78 78 78 22 0d 0f |sp$,"fil|e_xxx"..|
|00002bf0| fa 29 20 20 20 20 20 f2 | 73 65 74 5f 74 65 78 74 |.)     .|set_text|
|00002c00| 28 77 5f 73 61 76 65 2c | 69 5f 76 5f 6e 61 6d 65 |(w_save,|i_v_name|
|00002c10| 2c 66 69 6c 65 24 29 0d | 10 04 08 20 20 20 cb 0d |,file$).|...   ..|
|00002c20| 10 0e 2b 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 |..+   ..| "Wimp_C|
|00002c30| 72 65 61 74 65 53 75 62 | 4d 65 6e 75 22 2c 2c 62 |reateSub|Menu",,b|
|00002c40| 62 31 2c 62 62 32 2c 62 | 62 33 0d 10 18 05 3a 0d |b1,bb2,b|b3....:.|
|00002c50| 10 22 18 20 20 c9 20 4d | 73 67 5f 44 61 74 61 53 |.".  . M|sg_DataS|
|00002c60| 61 76 65 41 63 6b 3a 0d | 10 2c 35 20 20 20 64 70 |aveAck:.|.,5   dp|
|00002c70| 20 3d 20 62 6c 6b 2b 34 | 34 20 3a 20 f5 20 3a 20 | = blk+4|4 : . : |
|00002c80| 64 70 20 2b 3d 20 31 20 | 3a 20 fd 20 3f 64 70 3d |dp += 1 |: . ?dp=|
|00002c90| 30 20 3a 20 3f 64 70 20 | 3d 20 31 33 0d 10 36 2e |0 : ?dp |= 13..6.|
|00002ca0| 20 20 20 66 69 6c 65 24 | 20 3d 20 24 28 62 6c 6b |   file$| = $(blk|
|00002cb0| 2b 34 34 29 20 3a 20 73 | 61 66 65 20 3d 20 28 62 |+44) : s|afe = (b|
|00002cc0| 6c 6b 21 33 36 3c 3e 2d | 31 29 0d 10 40 19 20 20 |lk!36<>-|1)..@.  |
|00002cd0| 20 e7 20 73 61 76 69 6e | 67 3d 73 6d 5f 74 65 78 | . savin|g=sm_tex|
|00002ce0| 74 20 8c 0d 10 4a 1e 20 | 20 20 20 f2 73 61 76 65 |t ...J. |   .save|
|00002cf0| 5f 74 65 78 74 28 66 69 | 6c 65 24 2c 73 61 66 65 |_text(fi|le$,safe|
|00002d00| 29 0d 10 54 08 20 20 20 | cc 0d 10 5e 20 20 20 20 |)..T.   |...^    |
|00002d10| 20 f2 73 61 76 65 5f 70 | 61 72 61 6d 73 28 66 69 | .save_p|arams(fi|
|00002d20| 6c 65 24 2c 73 61 66 65 | 29 0d 10 68 08 20 20 20 |le$,safe|)..h.   |
|00002d30| cd 0d 10 72 2d 20 20 20 | c8 99 20 22 57 69 6d 70 |...r-   |.. "Wimp|
|00002d40| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 2d 31 |_CreateM|enu",,-1|
|00002d50| 20 3a 20 73 61 76 69 6e | 67 20 3d 20 2d 31 0d 10 | : savin|g = -1..|
|00002d60| 7c 2d 20 20 20 62 6c 6b | 21 31 36 20 3d 20 4d 73 ||-   blk|!16 = Ms|
|00002d70| 67 5f 44 61 74 61 4c 6f | 61 64 20 3a 20 62 6c 6b |g_DataLo|ad : blk|
|00002d80| 21 31 32 20 3d 20 62 6c | 6b 21 38 0d 10 86 1d 20 |!12 = bl|k!8.... |
|00002d90| 20 20 3f 28 62 6c 6b 2b | 34 34 2b a9 28 66 69 6c |  ?(blk+|44+.(fil|
|00002da0| 65 24 29 29 20 3d 20 30 | 0d 10 90 34 20 20 20 c8 |e$)) = 0|...4   .|
|00002db0| 99 20 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |. "Wimp_|SendMess|
|00002dc0| 61 67 65 22 2c 52 63 5f | 4d 65 73 73 61 67 65 52 |age",Rc_|MessageR|
|00002dd0| 65 63 2c 62 6c 6b 2c 62 | 6c 6b 21 34 0d 10 9a 05 |ec,blk,b|lk!4....|
|00002de0| 3a 0d 10 a4 15 20 20 c9 | 20 4d 73 67 5f 44 61 74 |:....  .| Msg_Dat|
|00002df0| 61 4c 6f 61 64 3a 0d 10 | ae 35 20 20 20 64 70 20 |aLoad:..|.5   dp |
|00002e00| 3d 20 62 6c 6b 2b 34 34 | 20 3a 20 f5 20 3a 20 64 |= blk+44| : . : d|
|00002e10| 70 20 2b 3d 20 31 20 3a | 20 fd 20 3f 64 70 3d 30 |p += 1 :| . ?dp=0|
|00002e20| 20 3a 20 3f 64 70 20 3d | 20 31 33 0d 10 b8 3c 20 | : ?dp =| 13...< |
|00002e30| 20 20 66 69 6c 65 24 20 | 3d 20 24 28 62 6c 6b 2b |  file$ |= $(blk+|
|00002e40| 34 34 29 20 3a 20 74 79 | 70 65 20 3d 20 62 6c 6b |44) : ty|pe = blk|
|00002e50| 21 34 30 20 3a 20 73 61 | 66 65 20 3d 20 28 62 6c |!40 : sa|fe = (bl|
|00002e60| 6b 21 31 32 3d 30 29 0d | 10 c2 24 20 20 20 e7 20 |k!12=0).|..$   . |
|00002e70| 74 79 70 65 3d 66 69 6c | 65 74 79 70 65 20 84 20 |type=fil|etype . |
|00002e80| 74 79 70 65 3d 26 46 46 | 46 20 8c 0d 10 cc 31 20 |type=&FF|F ....1 |
|00002e90| 20 20 20 62 6c 6b 21 31 | 36 20 3d 20 4d 73 67 5f |   blk!1|6 = Msg_|
|00002ea0| 44 61 74 61 4c 6f 61 64 | 41 63 6b 20 3a 20 62 6c |DataLoad|Ack : bl|
|00002eb0| 6b 21 31 32 20 3d 20 62 | 6c 6b 21 38 0d 10 d6 32 |k!12 = b|lk!8...2|
|00002ec0| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 6e |    .. "|Wimp_Sen|
|00002ed0| 64 4d 65 73 73 61 67 65 | 22 2c 52 63 5f 4d 65 73 |dMessage|",Rc_Mes|
|00002ee0| 73 61 67 65 2c 62 6c 6b | 2c 62 6c 6b 21 34 0d 10 |sage,blk|,blk!4..|
|00002ef0| e0 19 20 20 20 20 e7 20 | 74 79 70 65 3d 66 69 6c |..    . |type=fil|
|00002f00| 65 74 79 70 65 20 8c 0d | 10 ea 26 20 20 20 20 20 |etype ..|..&     |
|00002f10| f2 6c 6f 61 64 5f 70 61 | 72 61 6d 73 28 66 69 6c |.load_pa|rams(fil|
|00002f20| 65 24 2c 73 61 66 65 2c | 73 61 66 65 29 0d 10 f4 |e$,safe,|safe)...|
|00002f30| 09 20 20 20 20 cc 0d 10 | fe 1f 20 20 20 20 20 f2 |.    ...|..     .|
|00002f40| 6c 6f 61 64 5f 74 65 78 | 74 28 66 69 6c 65 24 2c |load_tex|t(file$,|
|00002f50| 73 61 66 65 29 0d 11 08 | 27 20 20 20 20 20 e7 20 |safe)...|'     . |
|00002f60| 65 6e 74 65 72 20 8c 20 | f2 77 69 6d 70 5f 6f 70 |enter . |.wimp_op|
|00002f70| 65 6e 28 77 5f 74 65 78 | 74 2c 54 29 0d 11 12 09 |en(w_tex|t,T)....|
|00002f80| 20 20 20 20 cd 0d 11 1c | 08 20 20 20 cd 0d 11 26 |    ....|.   ...&|
|00002f90| 05 3a 0d 11 30 15 20 20 | c9 20 4d 73 67 5f 44 61 |.:..0.  |. Msg_Da|
|00002fa0| 74 61 4f 70 65 6e 3a 0d | 11 3a 21 20 20 20 e7 20 |taOpen:.|.:!   . |
|00002fb0| 62 6c 6b 21 34 30 3d 66 | 69 6c 65 74 79 70 65 20 |blk!40=f|iletype |
|00002fc0| 8c 20 e5 20 8d 74 6e 50 | 0d 11 44 05 3a 0d 11 4e |. . .tnP|..D.:..N|
|00002fd0| 15 20 20 c9 20 4d 73 67 | 5f 44 61 74 61 53 61 76 |.  . Msg|_DataSav|
|00002fe0| 65 3a 0d 11 58 14 20 20 | 20 74 79 70 65 20 3d 20 |e:..X.  | type = |
|00002ff0| 62 6c 6b 21 34 30 0d 11 | 62 24 20 20 20 e7 20 74 |blk!40..|b$   . t|
|00003000| 79 70 65 3d 66 69 6c 65 | 74 79 70 65 20 84 20 74 |ype=file|type . t|
|00003010| 79 70 65 3d 26 46 46 46 | 20 8c 0d 11 6c 25 20 20 |ype=&FFF| ...l%  |
|00003020| 20 20 24 28 62 6c 6b 2b | 34 34 29 20 3d 20 22 3c |  $(blk+|44) = "<|
|00003030| 57 69 6d 70 24 53 63 72 | 61 70 3e 22 2b bd 30 0d |Wimp$Scr|ap>"+.0.|
|00003040| 11 76 20 20 20 20 20 62 | 6c 6b 21 33 36 20 3d 20 |.v     b|lk!36 = |
|00003050| 2d 31 20 3a 20 62 6c 6b | 21 30 20 3d 20 36 30 0d |-1 : blk|!0 = 60.|
|00003060| 11 80 31 20 20 20 20 62 | 6c 6b 21 31 36 20 3d 20 |..1    b|lk!16 = |
|00003070| 4d 73 67 5f 44 61 74 61 | 53 61 76 65 41 63 6b 20 |Msg_Data|SaveAck |
|00003080| 3a 20 62 6c 6b 21 31 32 | 20 3d 20 62 6c 6b 21 38 |: blk!12| = blk!8|
|00003090| 0d 11 8a 32 20 20 20 20 | c8 99 20 22 57 69 6d 70 |...2    |.. "Wimp|
|000030a0| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 52 63 |_SendMes|sage",Rc|
|000030b0| 5f 4d 65 73 73 61 67 65 | 2c 62 6c 6b 2c 62 6c 6b |_Message|,blk,blk|
|000030c0| 21 34 0d 11 94 08 20 20 | 20 cd 0d 11 9e 05 3a 0d |!4....  | .....:.|
|000030d0| 11 a8 16 20 20 c9 20 4d | 73 67 5f 50 72 69 6e 74 |...  . M|sg_Print|
|000030e0| 42 75 73 79 3a 0d 11 b2 | 1f 20 20 20 f2 77 61 72 |Busy:...|.   .war|
|000030f0| 6e 28 22 50 72 69 6e 74 | 65 72 20 69 73 20 62 75 |n("Print|er is bu|
|00003100| 73 79 22 29 0d 11 bc 05 | 3a 0d 11 c6 16 20 20 c9 |sy")....|:....  .|
|00003110| 20 4d 73 67 5f 50 72 69 | 6e 74 46 69 6c 65 3a 0d | Msg_Pri|ntFile:.|
|00003120| 11 d0 35 20 20 20 64 70 | 20 3d 20 62 6c 6b 2b 34 |..5   dp| = blk+4|
|00003130| 34 20 3a 20 f5 20 3a 20 | 64 70 20 2b 3d 20 31 20 |4 : . : |dp += 1 |
|00003140| 3a 20 fd 20 3f 64 70 3d | 30 20 3a 20 3f 64 70 20 |: . ?dp=|0 : ?dp |
|00003150| 3d 20 31 33 0d 11 da 18 | 20 20 20 66 69 6c 65 24 |= 13....|   file$|
|00003160| 20 3d 20 24 28 62 6c 6b | 2b 34 34 29 0d 11 e4 15 | = $(blk|+44)....|
|00003170| 20 20 20 f2 6f 75 74 70 | 75 74 28 66 69 6c 65 24 |   .outp|ut(file$|
|00003180| 29 0d 11 e5 20 20 20 20 | ff 20 22 53 65 74 54 79 |)...    |. "SetTy|
|00003190| 70 65 20 22 2b 66 69 6c | 65 24 2b 22 20 46 46 34 |pe "+fil|e$+" FF4|
|000031a0| 22 0d 11 ee 1b 20 20 20 | 24 28 62 6c 6b 2b 34 34 |"....   |$(blk+44|
|000031b0| 29 20 3d 20 66 69 6c 65 | 24 2b bd 30 0d 11 f8 14 |) = file|$+.0....|
|000031c0| 20 20 20 62 6c 6b 21 34 | 30 20 3d 20 26 46 46 34 |   blk!4|0 = &FF4|
|000031d0| 0d 12 02 15 20 20 20 62 | 6c 6b 21 31 32 20 3d 20 |....   b|lk!12 = |
|000031e0| 62 6c 6b 21 38 0d 12 0c | 1c 20 20 20 62 6c 6b 21 |blk!8...|.   blk!|
|000031f0| 31 36 20 3d 20 4d 73 67 | 5f 44 61 74 61 4c 6f 61 |16 = Msg|_DataLoa|
|00003200| 64 0d 12 16 31 20 20 20 | c8 99 20 22 57 69 6d 70 |d...1   |.. "Wimp|
|00003210| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 52 63 |_SendMes|sage",Rc|
|00003220| 5f 4d 65 73 73 61 67 65 | 2c 62 6c 6b 2c 62 6c 6b |_Message|,blk,blk|
|00003230| 21 34 0d 12 20 05 3a 0d | 12 2a 06 20 cb 0d 12 34 |!4.. .:.|.*. ...4|
|00003240| 07 3d 20 31 0d 12 3e 04 | 0d 12 48 14 dd 20 a4 6e |.= 1..>.|..H.. .n|
|00003250| 61 6b 5f 69 64 6c 65 28 | 62 6c 6b 29 0d 12 52 05 |ak_idle(|blk)..R.|
|00003260| 3a 0d 12 5c 27 3a 20 f4 | 20 41 20 72 65 63 6f 72 |:..\': .| A recor|
|00003270| 64 65 64 20 6d 65 73 73 | 61 67 65 20 6e 6f 74 20 |ded mess|age not |
|00003280| 72 65 63 65 69 76 65 64 | 0d 12 66 05 3a 0d 12 70 |received|..f.:..p|
|00003290| 10 20 c8 8e 20 62 6c 6b | 21 31 36 20 ca 0d 12 7a |. .. blk|!16 ...z|
|000032a0| 16 20 20 c9 20 4d 73 67 | 5f 50 72 69 6e 74 53 61 |.  . Msg|_PrintSa|
|000032b0| 76 65 3a 0d 12 84 42 20 | 20 20 f2 77 61 72 6e 28 |ve:...B |  .warn(|
|000032c0| 22 4e 6f 20 72 65 73 70 | 6f 6e 73 65 20 66 72 6f |"No resp|onse fro|
|000032d0| 6d 20 70 72 69 6e 74 65 | 72 20 64 72 69 76 65 72 |m printe|r driver|
|000032e0| 20 2d 20 69 73 20 69 74 | 20 69 6e 73 74 61 6c 6c | - is it| install|
|000032f0| 65 64 3f 22 29 0d 12 8e | 15 20 20 c9 20 4d 73 67 |ed?")...|.  . Msg|
|00003300| 5f 44 61 74 61 4c 6f 61 | 64 3a 0d 12 98 1e 20 20 |_DataLoa|d:....  |
|00003310| 20 ff 20 22 52 65 6d 6f | 76 65 20 3c 57 69 6d 70 | . "Remo|ve <Wimp|
|00003320| 24 53 63 72 61 70 3e 22 | 0d 12 a2 33 20 20 20 f2 |$Scrap>"|...3   .|
|00003330| 77 61 72 6e 28 22 44 61 | 74 61 20 74 72 61 6e 73 |warn("Da|ta trans|
|00003340| 66 65 72 20 66 61 69 6c | 65 64 2c 20 72 65 63 65 |fer fail|ed, rece|
|00003350| 69 76 65 72 20 64 65 61 | 64 22 29 0d 12 ac 06 20 |iver dea|d").... |
|00003360| cb 0d 12 b6 07 3d 20 31 | 0d 12 c0 04 0d 12 ca 11 |.....= 1|........|
|00003370| dd 20 f2 70 72 69 6e 74 | 28 6e 75 6d 29 0d 12 d4 |. .print|(num)...|
|00003380| 05 3a 0d 12 de 39 3a 20 | f4 20 47 6f 69 6e 67 20 |.:...9: |. Going |
|00003390| 74 6f 20 70 72 69 6e 74 | 20 73 6f 6d 65 74 68 69 |to print| somethi|
|000033a0| 6e 67 3a 20 20 6e 75 6d | 20 3d 20 6e 75 6d 62 65 |ng:  num| = numbe|
|000033b0| 72 20 6f 66 20 63 6f 70 | 69 65 73 0d 12 e8 31 3a |r of cop|ies...1:|
|000033c0| 20 f4 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .      |        |
|000033d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2d |        |       -|
|000033e0| 31 20 3d 3e 20 6c 69 6e | 65 20 75 70 0d 12 f2 33 |1 => lin|e up...3|
|000033f0| 3a 20 f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |: .     |        |
|00003400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003410| 2d 32 20 3d 3e 20 66 6f | 72 6d 20 66 65 65 64 0d |-2 => fo|rm feed.|
|00003420| 12 fc 05 3a 0d 13 10 13 | 20 6e 5f 63 6f 70 69 65 |...:....| n_copie|
|00003430| 73 20 3d 20 6e 75 6d 0d | 13 1a 11 20 e7 20 ac 20 |s = num.|... . . |
|00003440| 64 69 72 65 63 74 20 8c | 0d 13 24 10 20 20 62 6c |direct .|..$.  bl|
|00003450| 6b 21 30 20 3d 20 36 30 | 0d 13 2e 10 20 20 62 6c |k!0 = 60|....  bl|
|00003460| 6b 21 31 32 20 3d 20 30 | 0d 13 38 1c 20 20 62 6c |k!12 = 0|..8.  bl|
|00003470| 6b 21 31 36 20 3d 20 4d | 73 67 5f 50 72 69 6e 74 |k!16 = M|sg_Print|
|00003480| 53 61 76 65 0d 13 42 14 | 20 20 24 28 62 6c 6b 2b |Save..B.|  $(blk+|
|00003490| 34 34 29 20 3d 20 bd 30 | 0d 13 4c 2f 20 20 c8 99 |44) = .0|..L/  ..|
|000034a0| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|000034b0| 67 65 22 2c 52 63 5f 4d | 65 73 73 61 67 65 52 65 |ge",Rc_M|essageRe|
|000034c0| 63 2c 62 6c 6b 2c 30 0d | 13 56 06 20 cc 0d 13 60 |c,blk,0.|.V. ...`|
|000034d0| 19 20 20 f2 6f 75 74 70 | 75 74 28 22 70 72 69 6e |.  .outp|ut("prin|
|000034e0| 74 65 72 3a 22 29 0d 13 | 6a 06 20 cd 0d 13 74 05 |ter:")..|j. ...t.|
|000034f0| e1 0d 13 7e 04 0d 13 92 | 1c dd 20 f2 6c 6f 61 64 |...~....|.. .load|
|00003500| 5f 74 65 78 74 28 66 69 | 6c 65 24 2c 73 61 66 65 |_text(fi|le$,safe|
|00003510| 29 0d 13 9c 17 ea 20 69 | 66 2c 4a 25 2c 6c 69 6e |)..... i|f,J%,lin|
|00003520| 65 24 2c 66 6c 61 67 73 | 0d 13 a6 05 3a 0d 13 b0 |e$,flags|....:...|
|00003530| 4b 3a 20 f4 20 4c 6f 61 | 64 20 74 68 65 20 6c 61 |K: . Loa|d the la|
|00003540| 62 65 6c 20 74 65 78 74 | 20 66 72 6f 6d 20 61 20 |bel text| from a |
|00003550| 66 69 6c 65 20 2d 20 69 | 66 20 69 6e 20 6d 61 69 |file - i|f in mai|
|00003560| 6c 20 6d 65 72 67 65 20 | 6d 6f 64 65 20 61 6e 64 |l merge |mode and|
|00003570| 20 6c 6f 61 64 69 6e 67 | 0d 13 ba 3f 3a 20 f4 20 | loading|...?: . |
|00003580| 66 72 6f 6d 20 61 6e 6f | 74 68 65 72 20 61 70 70 |from ano|ther app|
|00003590| 6c 69 63 61 74 69 6f 6e | 2c 20 63 6f 70 79 20 74 |lication|, copy t|
|000035a0| 68 65 20 64 61 74 61 20 | 74 6f 20 61 20 73 63 72 |he data |to a scr|
|000035b0| 61 70 20 66 69 6c 65 0d | 13 c4 05 3a 0d 13 ce 12 |ap file.|...:....|
|000035c0| 20 69 66 20 3d 20 8e 28 | 66 69 6c 65 24 29 0d 13 | if = .(|file$)..|
|000035d0| d8 0d 20 e7 20 69 66 3d | 30 20 8c 0d 13 e2 33 20 |.. . if=|0 ....3 |
|000035e0| 20 f2 77 61 72 6e 28 22 | 43 6f 75 6c 64 20 6e 6f | .warn("|Could no|
|000035f0| 74 20 6c 6f 61 64 20 74 | 65 78 74 20 66 72 6f 6d |t load t|ext from|
|00003600| 20 27 22 2b 66 69 6c 65 | 24 2b 22 27 22 29 0d 13 | '"+file|$+"'")..|
|00003610| ec 06 20 cc 0d 13 f6 0f | 20 20 e7 20 65 6e 74 65 |.. .....|  . ente|
|00003620| 72 20 8c 0d 14 00 30 20 | 20 20 e3 20 4a 25 20 3d |r ....0 |  . J% =|
|00003630| 20 31 20 b8 20 33 32 20 | 3a 20 24 6c 70 28 4a 25 | 1 . 32 |: $lp(J%|
|00003640| 29 20 3d 20 22 22 20 3a | 20 ed 20 3a 20 4a 25 20 |) = "" :| . : J% |
|00003650| 3d 20 31 0d 14 0a 1d 20 | 20 20 c8 95 20 28 ac 20 |= 1.... |  .. (. |
|00003660| c5 23 69 66 29 20 80 20 | 28 4a 25 3c 3d 33 32 29 |.#if) . |(J%<=32)|
|00003670| 0d 14 14 14 20 20 20 20 | 6c 69 6e 65 24 20 3d 20 |....    |line$ = |
|00003680| be 23 69 66 0d 14 1e 19 | 20 20 20 20 e7 20 a4 64 |.#if....|    . .d|
|00003690| 65 6c 69 6d 28 6c 69 6e | 65 24 29 20 8c 0d 14 28 |elim(lin|e$) ...(|
|000036a0| 13 20 20 20 20 20 4a 25 | 20 3d 20 39 39 39 39 39 |.     J%| = 99999|
|000036b0| 0d 14 32 09 20 20 20 20 | cc 0d 14 3c 22 20 20 20 |..2.    |...<"   |
|000036c0| 20 20 24 6c 70 28 4a 25 | 29 20 3d 20 6c 69 6e 65 |  $lp(J%|) = line|
|000036d0| 24 20 3a 20 4a 25 20 2b | 3d 20 31 0d 14 46 09 20 |$ : J% +|= 1..F. |
|000036e0| 20 20 20 cd 0d 14 50 08 | 20 20 20 ce 0d 14 5a 0c |   ...P.|   ...Z.|
|000036f0| 20 20 20 d9 20 23 69 66 | 0d 14 64 0f 20 20 20 e7 |   . #if|..d.   .|
|00003700| 20 73 61 66 65 20 8c 0d | 14 6e 18 20 20 20 20 6c | safe ..|.n.    l|
|00003710| 61 62 66 69 6c 65 24 20 | 3d 20 66 69 6c 65 24 0d |abfile$ |= file$.|
|00003720| 14 78 08 20 20 20 cc 0d | 14 82 19 20 20 20 20 ff |.x.   ..|...    .|
|00003730| 20 22 52 65 6d 6f 76 65 | 20 22 2b 66 69 6c 65 24 | "Remove| "+file$|
|00003740| 0d 14 8c 15 20 20 20 20 | 6c 61 62 66 69 6c 65 24 |....    |labfile$|
|00003750| 20 3d 20 22 22 0d 14 96 | 08 20 20 20 cd 0d 14 a0 | = ""...|.   ....|
|00003760| 07 20 20 cc 0d 14 aa 0c | 20 20 20 d9 20 23 69 66 |.  .....|   . #if|
|00003770| 0d 14 b4 0f 20 20 20 e7 | 20 73 61 66 65 20 8c 0d |....   .| safe ..|
|00003780| 14 be 18 20 20 20 20 6c | 61 62 66 69 6c 65 24 20 |...    l|abfile$ |
|00003790| 3d 20 66 69 6c 65 24 0d | 14 c8 08 20 20 20 cc 0d |= file$.|...   ..|
|000037a0| 14 d2 48 20 20 20 20 c8 | 99 20 22 58 4f 53 5f 46 |..H    .|. "XOS_F|
|000037b0| 53 43 6f 6e 74 72 6f 6c | 22 2c 32 36 2c 66 69 6c |SControl|",26,fil|
|000037c0| 65 24 2c 73 63 72 61 70 | 66 69 6c 65 24 2c 25 31 |e$,scrap|file$,%1|
|000037d0| 30 30 30 31 30 30 31 30 | 30 30 30 30 31 30 20 b8 |00010010|000010 .|
|000037e0| 20 3b 66 6c 61 67 73 0d | 14 dc 71 20 20 20 20 e7 | ;flags.|..q    .|
|000037f0| 20 28 66 6c 61 67 73 20 | 80 20 31 29 3e 30 20 8c | (flags |. 1)>0 .|
|00003800| 20 f2 77 61 72 6e 28 22 | 43 6f 75 6c 64 20 6e 6f | .warn("|Could no|
|00003810| 74 20 6d 6f 76 65 20 27 | 22 2b 66 69 6c 65 24 2b |t move '|"+file$+|
|00003820| 22 27 20 74 6f 20 73 63 | 72 61 70 20 66 69 6c 65 |"' to sc|rap file|
|00003830| 20 27 22 2b 73 63 72 61 | 70 66 69 6c 65 24 2b 22 | '"+scra|pfile$+"|
|00003840| 27 2c 20 63 68 65 63 6b | 20 3c 4c 61 62 65 6c 24 |', check| <Label$|
|00003850| 53 63 72 61 70 3e 22 29 | 0d 14 e6 1d 20 20 20 20 |Scrap>")|....    |
|00003860| 6c 61 62 66 69 6c 65 24 | 20 3d 20 73 63 72 61 70 |labfile$| = scrap|
|00003870| 66 69 6c 65 24 0d 14 f0 | 19 20 20 20 20 ff 20 22 |file$...|.    . "|
|00003880| 52 65 6d 6f 76 65 20 22 | 2b 66 69 6c 65 24 0d 14 |Remove "|+file$..|
|00003890| fa 08 20 20 20 cd 0d 15 | 04 07 20 20 cd 0d 15 0e |..   ...|..  ....|
|000038a0| 26 20 20 f2 73 69 7a 65 | 5f 74 65 78 74 20 3a 20 |&  .size|_text : |
|000038b0| f4 20 72 65 64 72 61 77 | 73 20 61 6c 6c 20 69 63 |. redraw|s all ic|
|000038c0| 6f 6e 73 0d 15 18 48 20 | 20 f2 6e 65 77 5f 6a 75 |ons...H | .new_ju|
|000038d0| 73 74 20 3a 20 f4 20 46 | 69 78 65 64 20 62 75 67 |st : . F|ixed bug|
|000038e0| 20 77 68 65 72 65 20 6c | 6f 61 64 65 64 20 74 65 | where l|oaded te|
|000038f0| 78 74 20 77 61 73 20 61 | 6c 77 61 79 73 20 6c 65 |xt was a|lways le|
|00003900| 66 74 2d 6a 20 28 32 2e | 30 31 29 0d 15 22 11 20 |ft-j (2.|01)..". |
|00003910| 20 f2 73 68 6f 77 5f 66 | 69 6c 65 73 0d 15 2c 06 | .show_f|iles..,.|
|00003920| 20 cd 0d 15 36 05 e1 0d | 15 40 04 0d 15 4a 13 dd | ...6...|.@...J..|
|00003930| 20 a4 67 65 74 65 6e 76 | 28 76 61 72 24 29 0d 15 | .getenv|(var$)..|
|00003940| 54 09 ea 20 6c 65 6e 0d | 15 5e 05 3a 0d 15 68 31 |T.. len.|.^.:..h1|
|00003950| 3a 20 f4 20 4c 6f 6f 6b | 20 75 70 20 74 68 65 20 |: . Look| up the |
|00003960| 76 61 6c 75 65 20 6f 66 | 20 74 68 61 74 20 73 79 |value of| that sy|
|00003970| 73 74 65 6d 20 76 61 72 | 69 61 62 6c 65 0d 15 72 |stem var|iable..r|
|00003980| 05 3a 0d 15 7c 31 20 c8 | 99 20 22 58 4f 53 5f 52 |.:..|1 .|. "XOS_R|
|00003990| 65 61 64 56 61 72 56 61 | 6c 22 2c 76 61 72 24 2c |eadVarVa|l",var$,|
|000039a0| 62 6c 6b 2c 31 30 30 2c | 30 2c 33 20 b8 20 2c 2c |blk,100,|0,3 . ,,|
|000039b0| 6c 65 6e 0d 15 86 11 20 | 62 6c 6b 3f 6c 65 6e 20 |len.... |blk?len |
|000039c0| 3d 20 31 33 0d 15 90 0a | 3d 20 24 62 6c 6b 0d 15 |= 13....|= $blk..|
|000039d0| 9a 04 0d 15 a4 0f dd 20 | f2 6e 65 77 5f 6a 75 73 |....... |.new_jus|
|000039e0| 74 0d 15 ae 05 3a 0d 15 | b8 44 3a 20 f4 20 43 68 |t....:..|.D: . Ch|
|000039f0| 61 6e 67 65 20 61 6c 6c | 20 74 68 65 20 74 65 78 |ange all| the tex|
|00003a00| 74 20 69 63 6f 6e 20 66 | 6c 61 67 73 20 74 6f 20 |t icon f|lags to |
|00003a10| 72 65 66 6c 65 63 74 20 | 74 68 65 20 6a 75 73 74 |reflect |the just|
|00003a20| 69 66 79 20 6f 70 74 69 | 6f 6e 0d 15 c2 05 3a 0d |ify opti|on....:.|
|00003a30| 15 cc 13 20 6a 75 73 74 | 5f 66 6c 61 67 73 20 3d |... just|_flags =|
|00003a40| 20 30 0d 15 d6 0e 20 c8 | 8e 20 6a 75 73 74 20 ca | 0.... .|. just .|
|00003a50| 0d 15 e0 1a 20 20 c9 20 | 31 3a 20 20 6a 75 73 74 |....  . |1:  just|
|00003a60| 5f 66 6c 61 67 73 20 3d | 20 30 0d 15 ea 25 20 20 |_flags =| 0...%  |
|00003a70| c9 20 32 3a 20 20 6a 75 | 73 74 5f 66 6c 61 67 73 |. 2:  ju|st_flags|
|00003a80| 20 3d 20 49 66 5f 48 6f | 72 69 7a 43 65 6e 74 0d | = If_Ho|rizCent.|
|00003a90| 15 f4 25 20 20 c9 20 33 | 3a 20 20 6a 75 73 74 5f |..%  . 3|:  just_|
|00003aa0| 66 6c 61 67 73 20 3d 20 | 49 66 5f 52 69 67 68 74 |flags = |If_Right|
|00003ab0| 4a 75 73 74 0d 15 fe 06 | 20 cb 0d 16 08 05 3a 0d |Just....| .....:.|
|00003ac0| 16 12 19 20 e3 20 4a 25 | 20 3d 20 30 20 b8 20 6e |... . J%| = 0 . n|
|00003ad0| 5f 6c 69 6e 65 73 2d 31 | 0d 16 1c 32 20 20 f2 75 |_lines-1|...2  .u|
|00003ae0| 70 64 61 74 65 5f 69 63 | 6f 6e 28 77 5f 74 65 78 |pdate_ic|on(w_tex|
|00003af0| 74 2c 4a 25 2c 6a 75 73 | 74 5f 66 6c 61 67 73 2c |t,J%,jus|t_flags,|
|00003b00| 6a 75 73 74 5f 6d 61 73 | 6b 29 0d 16 26 06 20 ed |just_mas|k)..&. .|
|00003b10| 0d 16 30 11 20 f2 72 65 | 64 72 61 77 5f 74 65 78 |..0. .re|draw_tex|
|00003b20| 74 0d 16 3a 05 e1 0d 16 | 44 04 0d 16 4e 10 dd 20 |t..:....|D...N.. |
|00003b30| f2 73 69 7a 65 5f 74 65 | 78 74 0d 16 58 20 ea 20 |.size_te|xt..X . |
|00003b40| 77 61 73 5f 6f 70 65 6e | 2c 62 6c 6f 63 6b 2c 69 |was_open|,block,i|
|00003b50| 70 74 72 2c 62 65 68 69 | 6e 64 0d 16 62 05 3a 0d |ptr,behi|nd..b.:.|
|00003b60| 16 6c 40 3a 20 f4 20 52 | 65 73 69 7a 65 20 74 68 |.l@: . R|esize th|
|00003b70| 65 20 74 65 78 74 20 77 | 69 6e 64 6f 77 20 61 63 |e text w|indow ac|
|00003b80| 63 6f 72 64 69 6e 67 20 | 74 6f 20 74 68 65 20 63 |cording |to the c|
|00003b90| 75 72 72 65 6e 74 20 73 | 65 74 74 69 6e 67 73 0d |urrent s|ettings.|
|00003ba0| 16 76 05 3a 0d 16 80 32 | 20 77 61 73 5f 6f 70 65 |.v.:...2| was_ope|
|00003bb0| 6e 20 3d 20 a4 69 73 5f | 6f 70 65 6e 28 77 5f 74 |n = .is_|open(w_t|
|00003bc0| 65 78 74 29 20 3a 20 62 | 65 68 69 6e 64 20 3d 20 |ext) : b|ehind = |
|00003bd0| 62 6c 6b 21 32 38 0d 16 | 8a 25 20 e7 20 77 61 73 |blk!28..|.% . was|
|00003be0| 5f 6f 70 65 6e 20 8c 20 | f2 77 69 6d 70 5f 63 6c |_open . |.wimp_cl|
|00003bf0| 6f 73 65 28 77 5f 74 65 | 78 74 29 0d 16 94 25 20 |ose(w_te|xt)...% |
|00003c00| 6e 5f 6c 69 6e 65 73 20 | 3d 20 a8 28 70 61 72 61 |n_lines |= .(para|
|00003c10| 6d 28 70 5f 68 65 69 67 | 68 74 29 2a 6c 70 69 29 |m(p_heig|ht)*lpi)|
|00003c20| 0d 16 9e 36 20 6e 5f 63 | 68 61 72 73 20 3d 20 a8 |...6 n_c|hars = .|
|00003c30| 28 28 70 61 72 61 6d 28 | 70 5f 77 69 64 74 68 29 |((param(|p_width)|
|00003c40| 2d 70 61 72 61 6d 28 70 | 5f 69 6e 64 29 29 2a 63 |-param(p|_ind))*c|
|00003c50| 70 69 2b 2e 31 29 0d 16 | a8 13 20 62 6c 6b 21 30 |pi+.1)..|.. blk!0|
|00003c60| 20 3d 20 77 5f 74 65 78 | 74 0d 16 b2 21 20 c8 99 | = w_tex|t...! ..|
|00003c70| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00003c80| 49 6e 66 6f 22 2c 2c 62 | 6c 6b 0d 16 bc 20 20 c8 |Info",,b|lk...  .|
|00003c90| 99 20 22 57 69 6d 70 5f | 44 65 6c 65 74 65 57 69 |. "Wimp_|DeleteWi|
|00003ca0| 6e 64 6f 77 22 2c 2c 62 | 6c 6b 0d 16 c6 12 20 62 |ndow",,b|lk.... b|
|00003cb0| 6c 6f 63 6b 20 3d 20 62 | 6c 6b 2b 34 0d 16 d0 29 |lock = b|lk+4...)|
|00003cc0| 20 62 6c 6f 63 6b 21 38 | 34 20 3d 20 6e 5f 6c 69 | block!8|4 = n_li|
|00003cd0| 6e 65 73 20 3a 20 69 70 | 74 72 20 3d 20 62 6c 6f |nes : ip|tr = blo|
|00003ce0| 63 6b 2b 38 38 0d 16 da | 05 3a 0d 16 e4 17 20 e3 |ck+88...|.:.... .|
|00003cf0| 20 4a 25 20 3d 20 31 20 | b8 20 6e 5f 6c 69 6e 65 | J% = 1 |. n_line|
|00003d00| 73 0d 16 ee 31 20 20 e3 | 20 4b 25 20 3d 20 30 20 |s...1  .| K% = 0 |
|00003d10| b8 20 32 38 20 88 20 34 | 20 3a 20 69 70 74 72 21 |. 28 . 4| : iptr!|
|00003d20| 4b 25 20 3d 20 6c 69 6e | 65 5f 69 21 4b 25 20 3a |K% = lin|e_i!K% :|
|00003d30| 20 ed 0d 16 f8 48 20 20 | 69 70 74 72 21 34 20 3d | ....H  |iptr!4 =|
|00003d40| 20 2d 6c 69 6e 65 5f 73 | 70 2a 4a 25 20 3a 20 69 | -line_s|p*J% : i|
|00003d50| 70 74 72 21 38 20 3d 20 | 6e 5f 63 68 61 72 73 2a |ptr!8 = |n_chars*|
|00003d60| 31 36 2b 38 20 3a 20 69 | 70 74 72 21 31 32 20 3d |16+8 : i|ptr!12 =|
|00003d70| 20 69 70 74 72 21 34 2b | 34 30 0d 17 02 2c 20 20 | iptr!4+|40...,  |
|00003d80| 69 70 74 72 21 32 30 20 | 3d 20 6c 70 28 4a 25 29 |iptr!20 |= lp(J%)|
|00003d90| 20 3a 20 69 70 74 72 21 | 32 38 20 3d 20 6e 5f 63 | : iptr!|28 = n_c|
|00003da0| 68 61 72 73 2b 31 0d 17 | 0c 19 20 20 6c 70 28 4a |hars+1..|..  lp(J|
|00003db0| 25 29 3f 6e 5f 63 68 61 | 72 73 20 3d 20 31 33 0d |%)?n_cha|rs = 13.|
|00003dc0| 17 16 10 20 20 69 70 74 | 72 20 2b 3d 20 33 32 0d |...  ipt|r += 32.|
|00003dd0| 17 20 06 20 ed 0d 17 2a | 05 3a 0d 17 34 3c 20 62 |. . ...*|.:..4< b|
|00003de0| 6c 6f 63 6b 21 34 34 20 | 3d 20 2d 34 2d 6c 69 6e |lock!44 |= -4-lin|
|00003df0| 65 5f 73 70 2a 6e 5f 6c | 69 6e 65 73 20 3a 20 62 |e_sp*n_l|ines : b|
|00003e00| 6c 6f 63 6b 21 34 38 20 | 3d 20 6e 5f 63 68 61 72 |lock!48 |= n_char|
|00003e10| 73 2a 31 36 2b 38 0d 17 | 3e 05 3a 0d 17 48 2b 20 |s*16+8..|>.:..H+ |
|00003e20| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00003e30| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 20 b8 20 |indow",,|block . |
|00003e40| 77 5f 74 65 78 74 0d 17 | 52 11 20 e7 20 77 61 73 |w_text..|R. . was|
|00003e50| 5f 6f 70 65 6e 20 8c 0d | 17 5c 14 20 20 62 6c 6b |_open ..|.\.  blk|
|00003e60| 21 30 20 3d 20 77 5f 74 | 65 78 74 0d 17 66 15 20 |!0 = w_t|ext..f. |
|00003e70| 20 62 6c 6b 21 32 38 20 | 3d 20 62 65 68 69 6e 64 | blk!28 |= behind|
|00003e80| 0d 17 70 1f 20 20 c8 99 | 20 22 57 69 6d 70 5f 4f |..p.  ..| "Wimp_O|
|00003e90| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6b 0d |penWindo|w",,blk.|
|00003ea0| 17 7a 06 20 cd 0d 17 84 | 05 e1 0d 17 8e 04 0d 17 |.z. ....|........|
|00003eb0| 98 0f dd 20 f2 67 65 74 | 5f 69 63 6f 6e 0d 17 a2 |... .get|_icon...|
|00003ec0| 05 3a 0d 17 ac 48 3a 20 | f4 20 52 65 61 64 20 74 |.:...H: |. Read t|
|00003ed0| 68 65 20 64 65 66 69 6e | 69 74 69 6f 6e 20 6f 66 |he defin|ition of|
|00003ee0| 20 61 20 74 65 78 74 20 | 6c 69 6e 65 20 69 63 6f | a text |line ico|
|00003ef0| 6e 20 66 72 6f 6d 20 74 | 68 65 20 77 69 6e 64 6f |n from t|he windo|
|00003f00| 77 20 74 65 6d 70 6c 61 | 74 65 0d 17 b6 05 3a 0d |w templa|te....:.|
|00003f10| 17 c0 12 20 de 20 6c 69 | 6e 65 5f 69 20 33 32 2b |... . li|ne_i 32+|
|00003f20| 38 0d 17 ca 25 20 6c 69 | 6e 65 5f 69 21 30 20 3d |8...% li|ne_i!0 =|
|00003f30| 20 77 5f 74 65 78 74 20 | 3a 20 6c 69 6e 65 5f 69 | w_text |: line_i|
|00003f40| 21 34 20 3d 20 30 0d 17 | d4 23 20 c8 99 20 22 57 |!4 = 0..|.# .. "W|
|00003f50| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00003f60| 22 2c 2c 6c 69 6e 65 5f | 69 0d 17 de 10 20 6c 69 |",,line_|i.... li|
|00003f70| 6e 65 5f 69 20 2b 3d 20 | 38 0d 17 e8 05 e1 0d 17 |ne_i += |8.......|
|00003f80| f2 04 0d 17 fc 1c dd 20 | f2 73 61 76 65 5f 74 65 |....... |.save_te|
|00003f90| 78 74 28 66 69 6c 65 24 | 2c 73 61 66 65 29 0d 18 |xt(file$|,safe)..|
|00003fa0| 06 08 ea 20 4a 25 0d 18 | 10 05 3a 0d 18 1a 25 3a |... J%..|..:...%:|
|00003fb0| 20 f4 20 53 61 76 65 20 | 74 68 65 20 6c 61 62 65 | . Save |the labe|
|00003fc0| 6c 20 74 65 78 74 20 74 | 6f 20 61 20 66 69 6c 65 |l text t|o a file|
|00003fd0| 0d 18 24 05 3a 0d 18 2e | 12 20 6f 66 20 3d 20 ae |..$.:...|. of = .|
|00003fe0| 28 66 69 6c 65 24 29 0d | 18 38 0d 20 e7 20 6f 66 |(file$).|.8. . of|
|00003ff0| 3d 30 20 8c 0d 18 42 31 | 20 20 f2 77 61 72 6e 28 |=0 ...B1|  .warn(|
|00004000| 22 43 6f 75 6c 64 20 6e | 6f 74 20 73 61 76 65 20 |"Could n|ot save |
|00004010| 74 65 78 74 20 74 6f 20 | 27 22 2b 66 69 6c 65 24 |text to |'"+file$|
|00004020| 2b 22 27 22 29 0d 18 4c | 06 20 cc 0d 18 56 18 20 |+"'")..L|. ...V. |
|00004030| 20 e3 20 4a 25 20 3d 20 | 31 20 b8 20 6e 5f 6c 69 | . J% = |1 . n_li|
|00004040| 6e 65 73 0d 18 60 14 20 | 20 20 d5 20 23 6f 66 2c |nes..`. |  . #of,|
|00004050| 24 6c 70 28 4a 25 29 0d | 18 6a 07 20 20 ed 0d 18 |$lp(J%).|.j.  ...|
|00004060| 74 12 20 20 d5 20 23 6f | 66 2c 64 65 6c 69 6d 24 |t.  . #o|f,delim$|
|00004070| 0d 18 7e 0b 20 20 d9 20 | 23 6f 66 0d 18 88 20 20 |..~.  . |#of...  |
|00004080| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 31 38 | .. "OS_|File",18|
|00004090| 2c 66 69 6c 65 24 2c 26 | 46 46 46 0d 18 92 1f 20 |,file$,&|FFF.... |
|000040a0| 20 e7 20 73 61 66 65 20 | 8c 20 6c 61 62 66 69 6c | . safe |. labfil|
|000040b0| 65 24 20 3d 20 66 69 6c | 65 24 0d 18 9c 06 20 cd |e$ = fil|e$.... .|
|000040c0| 0d 18 a6 05 e1 0d 18 b0 | 04 0d 18 ba 13 dd 20 a4 |........|...... .|
|000040d0| 64 65 6c 69 6d 28 74 65 | 73 74 24 29 0d 18 c4 05 |delim(te|st$)....|
|000040e0| 3a 0d 18 ce 3c 3a 20 f4 | 20 53 65 65 20 69 66 20 |:...<: .| See if |
|000040f0| 74 68 61 74 20 6c 69 6e | 65 20 6d 61 74 63 68 65 |that lin|e matche|
|00004100| 73 20 74 68 65 20 63 75 | 72 72 65 6e 74 6c 79 20 |s the cu|rrently |
|00004110| 73 65 74 20 64 65 6c 69 | 6d 69 74 65 72 0d 18 d8 |set deli|miter...|
|00004120| 05 3a 0d 18 e2 25 20 e7 | 20 28 64 65 6c 69 6d 24 |.:...% .| (delim$|
|00004130| 3d 22 22 29 20 80 20 28 | 74 65 73 74 24 3d 22 22 |="") . (|test$=""|
|00004140| 29 20 8c 20 3d 20 54 0d | 18 ec 36 20 e7 20 28 64 |) . = T.|..6 . (d|
|00004150| 65 6c 69 6d 24 3c 3e 22 | 22 29 20 80 20 28 c0 74 |elim$<>"|") . (.t|
|00004160| 65 73 74 24 2c a9 28 64 | 65 6c 69 6d 24 29 29 3d |est$,.(d|elim$))=|
|00004170| 64 65 6c 69 6d 24 29 20 | 8c 20 3d 20 54 0d 18 f6 |delim$) |. = T...|
|00004180| 07 3d 20 46 0d 19 00 04 | 0d 19 0a 1e dd 20 f2 73 |.= F....|..... .s|
|00004190| 61 76 65 5f 70 61 72 61 | 6d 73 28 66 69 6c 65 24 |ave_para|ms(file$|
|000041a0| 2c 73 61 66 65 29 0d 19 | 14 08 ea 20 6f 66 0d 19 |,safe)..|... of..|
|000041b0| 1e 05 3a 0d 19 28 32 3a | 20 f4 20 53 61 76 65 20 |..:..(2:| . Save |
|000041c0| 74 68 65 20 73 65 74 74 | 69 6e 67 73 20 61 6e 64 |the sett|ings and|
|000041d0| 20 64 69 6d 65 6e 73 69 | 6f 6e 73 20 74 6f 20 61 | dimensi|ons to a|
|000041e0| 20 66 69 6c 65 0d 19 32 | 05 3a 0d 19 3c 12 20 6f | file..2|.:..<. o|
|000041f0| 66 20 3d 20 ae 28 66 69 | 6c 65 24 29 0d 19 46 0d |f = .(fi|le$)..F.|
|00004200| 20 e7 20 6f 66 3d 30 20 | 8c 0d 19 50 35 20 20 f2 | . of=0 |...P5  .|
|00004210| 77 61 72 6e 28 22 43 6f | 75 6c 64 20 6e 6f 74 20 |warn("Co|uld not |
|00004220| 73 61 76 65 20 73 65 74 | 74 69 6e 67 73 20 74 6f |save set|tings to|
|00004230| 20 27 22 2b 66 69 6c 65 | 24 2b 22 27 22 29 0d 19 | '"+file|$+"'")..|
|00004240| 5a 06 20 cc 0d 19 64 1e | 20 20 f1 20 23 6f 66 2c |Z. ...d.|  . #of,|
|00004250| 73 74 6f 63 6b 2c 6a 75 | 73 74 2c 63 70 69 2c 6c |stock,ju|st,cpi,l|
|00004260| 70 69 0d 19 6e 40 20 20 | f1 20 23 6f 66 2c 70 61 |pi..n@  |. #of,pa|
|00004270| 72 61 6d 28 70 5f 77 69 | 64 74 68 29 2c 70 61 72 |ram(p_wi|dth),par|
|00004280| 61 6d 28 70 5f 68 70 29 | 2c 70 61 72 61 6d 28 70 |am(p_hp)|,param(p|
|00004290| 5f 6f 66 66 29 2c 70 61 | 72 61 6d 28 70 5f 69 6e |_off),pa|ram(p_in|
|000042a0| 64 29 0d 19 78 27 20 20 | f1 20 23 6f 66 2c 70 61 |d)..x'  |. #of,pa|
|000042b0| 72 61 6d 28 70 5f 68 65 | 69 67 68 74 29 2c 70 61 |ram(p_he|ight),pa|
|000042c0| 72 61 6d 28 70 5f 76 70 | 29 0d 19 82 12 20 20 f1 |ram(p_vp|)....  .|
|000042d0| 20 23 6f 66 2c 74 5f 74 | 79 70 65 0d 19 8c 0d 20 | #of,t_t|ype.... |
|000042e0| 20 f1 20 23 6f 66 2c 30 | 0d 19 96 0b 20 20 d9 20 | . #of,0|....  . |
|000042f0| 23 6f 66 0d 19 a0 24 20 | 20 c8 99 20 22 4f 53 5f |#of...$ | .. "OS_|
|00004300| 46 69 6c 65 22 2c 31 38 | 2c 66 69 6c 65 24 2c 66 |File",18|,file$,f|
|00004310| 69 6c 65 74 79 70 65 0d | 19 aa 1f 20 20 e7 20 73 |iletype.|...  . s|
|00004320| 61 66 65 20 8c 20 73 65 | 74 66 69 6c 65 24 20 3d |afe . se|tfile$ =|
|00004330| 20 66 69 6c 65 24 0d 19 | b4 06 20 cd 0d 19 be 05 | file$..|.. .....|
|00004340| e1 0d 19 c8 04 0d 19 d2 | 25 dd 20 f2 6c 6f 61 64 |........|%. .load|
|00004350| 5f 70 61 72 61 6d 73 28 | 66 69 6c 65 24 2c 73 61 |_params(|file$,sa|
|00004360| 66 65 2c 75 70 64 61 74 | 65 29 0d 19 dc 08 ea 20 |fe,updat|e)..... |
|00004370| 69 66 0d 19 e6 05 3a 0d | 19 f0 34 3a 20 f4 20 4c |if....:.|..4: . L|
|00004380| 6f 61 64 20 74 68 65 20 | 73 65 74 74 69 6e 67 73 |oad the |settings|
|00004390| 20 61 6e 64 20 64 69 6d | 65 6e 73 69 6f 6e 73 20 | and dim|ensions |
|000043a0| 66 72 6f 6d 20 61 20 66 | 69 6c 65 0d 19 fa 05 3a |from a f|ile....:|
|000043b0| 0d 1a 04 12 20 69 66 20 | 3d 20 8e 28 66 69 6c 65 |.... if |= .(file|
|000043c0| 24 29 0d 1a 0e 0d 20 e7 | 20 69 66 3d 30 20 8c 0d |$).... .| if=0 ..|
|000043d0| 1a 18 37 20 20 f2 77 61 | 72 6e 28 22 43 6f 75 6c |..7  .wa|rn("Coul|
|000043e0| 64 20 6e 6f 74 20 6c 6f | 61 64 20 73 65 74 74 69 |d not lo|ad setti|
|000043f0| 6e 67 73 20 66 72 6f 6d | 20 27 22 2b 66 69 6c 65 |ngs from| '"+file|
|00004400| 24 2b 22 27 22 29 0d 1a | 22 06 20 cc 0d 1a 2c 1e |$+"'")..|". ...,.|
|00004410| 20 20 e8 20 23 69 66 2c | 73 74 6f 63 6b 2c 6a 75 |  . #if,|stock,ju|
|00004420| 73 74 2c 63 70 69 2c 6c | 70 69 0d 1a 36 40 20 20 |st,cpi,l|pi..6@  |
|00004430| e8 20 23 69 66 2c 70 61 | 72 61 6d 28 70 5f 77 69 |. #if,pa|ram(p_wi|
|00004440| 64 74 68 29 2c 70 61 72 | 61 6d 28 70 5f 68 70 29 |dth),par|am(p_hp)|
|00004450| 2c 70 61 72 61 6d 28 70 | 5f 6f 66 66 29 2c 70 61 |,param(p|_off),pa|
|00004460| 72 61 6d 28 70 5f 69 6e | 64 29 0d 1a 40 27 20 20 |ram(p_in|d)..@'  |
|00004470| e8 20 23 69 66 2c 70 61 | 72 61 6d 28 70 5f 68 65 |. #if,pa|ram(p_he|
|00004480| 69 67 68 74 29 2c 70 61 | 72 61 6d 28 70 5f 76 70 |ight),pa|ram(p_vp|
|00004490| 29 0d 1a 4a 12 20 20 e8 | 20 23 69 66 2c 74 5f 74 |)..J.  .| #if,t_t|
|000044a0| 79 70 65 0d 1a 54 0b 20 | 20 d9 20 23 69 66 0d 1a |ype..T. | . #if..|
|000044b0| 5e 3f 20 20 e7 20 75 70 | 64 61 74 65 20 8c 20 73 |^?  . up|date . s|
|000044c0| 65 74 66 69 6c 65 24 20 | 3d 20 66 69 6c 65 24 20 |etfile$ |= file$ |
|000044d0| 3a 20 f2 73 68 6f 77 5f | 66 69 6c 65 73 20 8b 20 |: .show_|files . |
|000044e0| 73 65 74 66 69 6c 65 24 | 20 3d 20 22 22 0d 1a 68 |setfile$| = ""..h|
|000044f0| 22 20 20 e7 20 ac 20 73 | 61 66 65 20 8c 20 ff 20 |"  . . s|afe . . |
|00004500| 22 52 65 6d 6f 76 65 20 | 22 2b 66 69 6c 65 24 0d |"Remove |"+file$.|
|00004510| 1a 72 17 20 20 f2 73 65 | 74 73 65 74 20 3a 20 f2 |.r.  .se|tset : .|
|00004520| 64 69 6d 73 65 74 0d 1a | 7c 1c 20 20 f2 73 69 7a |dimset..||.  .siz|
|00004530| 65 5f 74 65 78 74 20 3a | 20 f2 6e 65 77 5f 6a 75 |e_text :| .new_ju|
|00004540| 73 74 0d 1a 86 11 20 20 | 6c 6f 61 64 5f 6f 6b 20 |st....  |load_ok |
|00004550| 3d 20 54 0d 1a 90 06 20 | cd 0d 1a 9a 05 e1 0d 1a |= T.... |........|
|00004560| a4 04 0d 1a ae 11 dd 20 | f2 64 69 6d 65 6e 73 69 |....... |.dimensi|
|00004570| 6f 6e 73 0d 1a b8 0c 20 | f2 64 69 6d 73 65 74 0d |ons.... |.dimset.|
|00004580| 1a c2 18 20 f2 77 69 6d | 70 5f 6f 70 65 6e 28 77 |... .wim|p_open(w|
|00004590| 5f 64 69 6d 2c 54 29 0d | 1a cc 06 20 f5 0d 1a d6 |_dim,T).|... ....|
|000045a0| 33 20 20 f2 70 6f 6c 6c | 28 22 64 69 6d 22 2c 52 |3  .poll|("dim",R|
|000045b0| 6d 5f 4e 75 6c 6c 2b 52 | 6d 5f 4b 65 79 2b 52 6d |m_Null+R|m_Key+Rm|
|000045c0| 5f 45 6e 74 65 72 2b 52 | 6d 5f 4c 65 61 76 65 29 |_Enter+R|m_Leave)|
|000045d0| 0d 1a e0 18 20 fd 20 a4 | 63 68 65 63 6b 20 84 20 |.... . .|check . |
|000045e0| 66 69 6e 69 73 68 3c 30 | 0d 1a ea 17 20 f2 77 69 |finish<0|.... .wi|
|000045f0| 6d 70 5f 63 6c 6f 73 65 | 28 77 5f 64 69 6d 29 0d |mp_close|(w_dim).|
|00004600| 1a f4 05 3a 0d 1a fe 0f | 20 f2 73 69 7a 65 5f 74 |...:....| .size_t|
|00004610| 65 78 74 0d 1b 08 05 e1 | 0d 1b 12 04 0d 1b 1c 0d |ext.....|........|
|00004620| dd 20 f2 64 69 6d 73 65 | 74 0d 1b 26 05 3a 0d 1b |. .dimse|t..&.:..|
|00004630| 30 29 3a 20 f4 20 53 65 | 74 20 75 70 20 61 6c 6c |0): . Se|t up all|
|00004640| 20 74 68 65 20 64 69 6d | 65 6e 73 69 6f 6e 20 64 | the dim|ension d|
|00004650| 69 73 70 6c 61 79 73 0d | 1b 3a 05 3a 0d 1b 44 32 |isplays.|.:.:..D2|
|00004660| 20 f2 73 65 74 5f 74 65 | 78 74 28 77 5f 64 69 6d | .set_te|xt(w_dim|
|00004670| 2c 69 5f 64 5f 77 69 64 | 74 68 2c a4 64 65 63 32 |,i_d_wid|th,.dec2|
|00004680| 28 70 5f 77 69 64 74 68 | 2c 63 70 69 29 29 0d 1b |(p_width|,cpi))..|
|00004690| 4e 34 20 f2 73 65 74 5f | 74 65 78 74 28 77 5f 64 |N4 .set_|text(w_d|
|000046a0| 69 6d 2c 69 5f 64 5f 68 | 65 69 67 68 74 2c a4 64 |im,i_d_h|eight,.d|
|000046b0| 65 63 32 28 70 5f 68 65 | 69 67 68 74 2c 6c 70 69 |ec2(p_he|ight,lpi|
|000046c0| 29 29 0d 1b 58 2c 20 f2 | 73 65 74 5f 74 65 78 74 |))..X, .|set_text|
|000046d0| 28 77 5f 64 69 6d 2c 69 | 5f 64 5f 68 70 2c a4 64 |(w_dim,i|_d_hp,.d|
|000046e0| 65 63 32 28 70 5f 68 70 | 2c 63 70 69 29 29 0d 1b |ec2(p_hp|,cpi))..|
|000046f0| 62 2c 20 f2 73 65 74 5f | 74 65 78 74 28 77 5f 64 |b, .set_|text(w_d|
|00004700| 69 6d 2c 69 5f 64 5f 76 | 70 2c a4 64 65 63 32 28 |im,i_d_v|p,.dec2(|
|00004710| 70 5f 76 70 2c 6c 70 69 | 29 29 0d 1b 6c 2e 20 f2 |p_vp,lpi|))..l. .|
|00004720| 73 65 74 5f 74 65 78 74 | 28 77 5f 64 69 6d 2c 69 |set_text|(w_dim,i|
|00004730| 5f 64 5f 6f 66 66 2c a4 | 64 65 63 32 28 70 5f 6f |_d_off,.|dec2(p_o|
|00004740| 66 66 2c 63 70 69 29 29 | 0d 1b 76 2e 20 f2 73 65 |ff,cpi))|..v. .se|
|00004750| 74 5f 74 65 78 74 28 77 | 5f 64 69 6d 2c 69 5f 64 |t_text(w|_dim,i_d|
|00004760| 5f 69 6e 64 2c a4 64 65 | 63 32 28 70 5f 69 6e 64 |_ind,.de|c2(p_ind|
|00004770| 2c 63 70 69 29 29 0d 1b | 80 24 20 f2 73 65 74 5f |,cpi))..|.$ .set_|
|00004780| 74 65 78 74 28 77 5f 64 | 69 6d 2c 69 5f 64 5f 75 |text(w_d|im,i_d_u|
|00004790| 6e 69 74 2c 75 6e 69 74 | 24 29 0d 1b 8a 3c 20 e7 |nit,unit|$)...< .|
|000047a0| 20 73 65 74 74 69 6e 67 | 3e 3d 30 20 8c 20 f2 69 | setting|>=0 . .i|
|000047b0| 63 6f 6e 73 65 6c 28 77 | 5f 64 69 6d 2c 73 65 74 |consel(w|_dim,set|
|000047c0| 74 69 6e 67 2c 46 29 20 | 3a 20 73 65 74 74 69 6e |ting,F) |: settin|
|000047d0| 67 20 3d 20 2d 31 0d 1b | 94 28 20 76 6f 69 64 20 |g = -1..|.( void |
|000047e0| 3d 20 a4 73 65 6c 65 63 | 74 5f 64 69 6d 28 77 5f |= .selec|t_dim(w_|
|000047f0| 64 69 6d 2c 69 5f 64 5f | 77 69 64 74 68 29 0d 1b |dim,i_d_|width)..|
|00004800| 9e 05 e1 0d 1b a8 04 0d | 1b b2 05 3a 0d 1b bc 28 |........|...:...(|
|00004810| 3a 20 f4 20 45 76 65 6e | 74 20 68 61 6e 64 6c 65 |: . Even|t handle|
|00004820| 72 73 20 66 6f 72 20 73 | 69 7a 65 73 20 70 72 6f |rs for s|izes pro|
|00004830| 63 65 73 73 0d 1b c6 05 | 3a 0d 1b d0 04 0d 1b da |cess....|:.......|
|00004840| 34 dd 20 a4 6f 70 65 6e | 5f 64 69 6d 28 77 69 6e |4. .open|_dim(win|
|00004850| 64 6f 77 2c 6e 65 77 29 | 20 3d 20 a4 6f 70 65 6e |dow,new)| = .open|
|00004860| 5f 69 64 6c 65 28 77 69 | 6e 64 6f 77 2c 6e 65 77 |_idle(wi|ndow,new|
|00004870| 29 0d 1b e4 2c dd 20 a4 | 6d 65 73 73 61 67 65 5f |)...,. .|message_|
|00004880| 64 69 6d 28 62 6c 6b 29 | 20 3d 20 a4 6d 65 73 73 |dim(blk)| = .mess|
|00004890| 61 67 65 5f 69 64 6c 65 | 28 62 6c 6b 29 0d 1b ee |age_idle|(blk)...|
|000048a0| 04 0d 1b f8 1c dd 20 a4 | 6d 65 6e 75 5f 64 69 6d |...... .|menu_dim|
|000048b0| 28 77 69 6e 64 6f 77 2c | 69 63 6f 6e 29 0d 1c 02 |(window,|icon)...|
|000048c0| 08 ea 20 6d 70 0d 1c 0c | 21 20 e7 20 77 69 6e 64 |.. mp...|! . wind|
|000048d0| 6f 77 3d 2d 32 20 8c 20 | f2 6d 61 6b 65 5f 6d 65 |ow=-2 . |.make_me|
|000048e0| 6e 75 73 28 54 29 0d 1c | 16 08 3d 20 6d 70 0d 1c |nus(T)..|..= mp..|
|000048f0| 20 04 0d 1c 2a 40 dd 20 | a4 63 68 6f 6f 73 65 5f | ...*@. |.choose_|
|00004900| 64 69 6d 28 73 65 6c 31 | 2c 73 65 6c 32 2c 73 65 |dim(sel1|,sel2,se|
|00004910| 6c 33 29 20 3d 20 a4 63 | 68 6f 6f 73 65 5f 69 64 |l3) = .c|hoose_id|
|00004920| 6c 65 28 73 65 6c 31 2c | 73 65 6c 32 2c 73 65 6c |le(sel1,|sel2,sel|
|00004930| 33 29 0d 1c 34 04 0d 1c | 3e 0f dd 20 a4 71 75 69 |3)..4...|>.. .qui|
|00004940| 74 5f 64 69 6d 0d 1c 48 | 10 20 66 69 6e 69 73 68 |t_dim..H|. finish|
|00004950| 20 3d 20 2d 31 0d 1c 52 | 07 3d 20 31 0d 1c 5c 04 | = -1..R|.= 1..\.|
|00004960| 0d 1c 66 18 dd 20 a4 63 | 6c 6f 73 65 5f 64 69 6d |..f.. .c|lose_dim|
|00004970| 28 77 69 6e 64 6f 77 29 | 0d 1c 70 2c 20 e7 20 77 |(window)|..p, . w|
|00004980| 69 6e 64 6f 77 3d 77 5f | 64 69 6d 20 8c 20 66 69 |indow=w_|dim . fi|
|00004990| 6e 69 73 68 20 3d 20 31 | 20 3a 20 3d 20 31 20 8b |nish = 1| : = 1 .|
|000049a0| 20 3d 20 30 0d 1c 7a 04 | 0d 1c 84 1e dd 20 a4 73 | = 0..z.|..... .s|
|000049b0| 65 6c 65 63 74 5f 64 69 | 6d 28 77 69 6e 64 6f 77 |elect_di|m(window|
|000049c0| 2c 69 63 6f 6e 29 0d 1c | 8e 05 3a 0d 1c 98 2e 3a |,icon)..|..:....:|
|000049d0| 20 f4 20 53 65 6c 65 63 | 74 20 6f 76 65 72 20 61 | . Selec|t over a|
|000049e0| 20 64 69 6d 65 6e 73 69 | 6f 6e 73 20 77 69 6e 64 | dimensi|ons wind|
|000049f0| 6f 77 20 62 75 74 74 6f | 6e 0d 1c a2 05 3a 0d 1c |ow butto|n....:..|
|00004a00| ac 1f 20 e7 20 77 69 6e | 64 6f 77 3d 77 5f 64 69 |.. . win|dow=w_di|
|00004a10| 6d 20 80 20 69 63 6f 6e | 3e 3d 30 20 8c 0d 1c b6 |m . icon|>=0 ....|
|00004a20| 0f 20 20 c8 8e 20 69 63 | 6f 6e 20 ca 0d 1c c0 3e |.  .. ic|on ....>|
|00004a30| 20 20 20 c9 20 69 5f 64 | 5f 77 69 64 74 68 3a 20 |   . i_d|_width: |
|00004a40| 20 f2 73 74 61 72 74 5f | 61 64 6a 28 70 5f 77 69 | .start_|adj(p_wi|
|00004a50| 64 74 68 2c 69 63 6f 6e | 2c 2d 70 5f 68 70 2c 2d |dth,icon|,-p_hp,-|
|00004a60| 70 5f 69 6e 64 2c 63 70 | 69 29 0d 1c ca 3a 20 20 |p_ind,cp|i)...:  |
|00004a70| 20 c9 20 69 5f 64 5f 68 | 65 69 67 68 74 3a 20 f2 | . i_d_h|eight: .|
|00004a80| 73 74 61 72 74 5f 61 64 | 6a 28 70 5f 68 65 69 67 |start_ad|j(p_heig|
|00004a90| 68 74 2c 69 63 6f 6e 2c | 2d 70 5f 76 70 2c 30 2c |ht,icon,|-p_vp,0,|
|00004aa0| 6c 70 69 29 0d 1c d4 20 | 20 20 20 c9 20 69 5f 64 |lpi)... |   . i_d|
|00004ab0| 5f 68 70 3a 20 20 20 20 | 20 e7 20 73 74 6f 63 6b |_hp:    | . stock|
|00004ac0| 3d 31 20 8c 0d 1c de 57 | 20 20 20 20 20 20 20 20 |=1 ....W|        |
|00004ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 77 61 |        |     .wa|
|00004ae0| 72 6e 28 22 54 68 69 73 | 20 73 65 74 74 69 6e 67 |rn("This| setting|
|00004af0| 20 69 73 20 6e 6f 74 20 | 61 70 70 6c 69 63 61 62 | is not |applicab|
|00004b00| 6c 65 20 74 6f 20 73 69 | 6e 67 6c 65 2d 73 74 6f |le to si|ngle-sto|
|00004b10| 63 6b 20 6c 61 62 65 6c | 73 22 29 0d 1c e8 19 20 |ck label|s").... |
|00004b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004b30| 20 20 20 cc 0d 1c f2 3d | 20 20 20 20 20 20 20 20 |   ....=|        |
|00004b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 73 74 |        |     .st|
|00004b50| 61 72 74 5f 61 64 6a 28 | 70 5f 68 70 2c 69 63 6f |art_adj(|p_hp,ico|
|00004b60| 6e 2c 34 2c 2d 70 5f 77 | 69 64 74 68 2c 63 70 69 |n,4,-p_w|idth,cpi|
|00004b70| 29 0d 1c fc 19 20 20 20 | 20 20 20 20 20 20 20 20 |)....   |        |
|00004b80| 20 20 20 20 20 20 20 20 | 20 cd 0d 1d 06 3a 20 20 |        | ....:  |
|00004b90| 20 c9 20 69 5f 64 5f 76 | 70 3a 20 20 20 20 20 f2 | . i_d_v|p:     .|
|00004ba0| 73 74 61 72 74 5f 61 64 | 6a 28 70 5f 76 70 2c 69 |start_ad|j(p_vp,i|
|00004bb0| 63 6f 6e 2c 34 2c 2d 70 | 5f 68 65 69 67 68 74 2c |con,4,-p|_height,|
|00004bc0| 6c 70 69 29 0d 1d 10 33 | 20 20 20 c9 20 69 5f 64 |lpi)...3|   . i_d|
|00004bd0| 5f 6f 66 66 3a 20 20 20 | 20 f2 73 74 61 72 74 5f |_off:   | .start_|
|00004be0| 61 64 6a 28 70 5f 6f 66 | 66 2c 69 63 6f 6e 2c 31 |adj(p_of|f,icon,1|
|00004bf0| 2c 30 2c 63 70 69 29 0d | 1d 1a 3a 20 20 20 c9 20 |,0,cpi).|..:   . |
|00004c00| 69 5f 64 5f 69 6e 64 3a | 20 20 20 20 f2 73 74 61 |i_d_ind:|    .sta|
|00004c10| 72 74 5f 61 64 6a 28 70 | 5f 69 6e 64 2c 69 63 6f |rt_adj(p|_ind,ico|
|00004c20| 6e 2c 2d 70 5f 77 69 64 | 74 68 2c 30 2c 63 70 69 |n,-p_wid|th,0,cpi|
|00004c30| 29 0d 1d 24 04 0d 1d 2e | 22 20 20 20 c9 20 69 5f |)..$....|"   . i_|
|00004c40| 64 5f 75 70 3a 20 20 20 | 20 20 e7 20 73 65 74 74 |d_up:   |  . sett|
|00004c50| 69 6e 67 3e 30 20 8c 0d | 1d 38 2e 20 20 20 20 20 |ing>0 ..|.8.     |
|00004c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004c70| 70 61 72 61 6d 28 73 65 | 74 5f 69 78 29 20 2b 3d |param(se|t_ix) +=|
|00004c80| 20 73 74 65 70 0d 1d 42 | 46 20 20 20 20 20 20 20 | step..B|F       |
|00004c90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 e7 20 |        |      . |
|00004ca0| 70 61 72 61 6d 28 73 65 | 74 5f 69 78 29 3e 75 70 |param(se|t_ix)>up|
|00004cb0| 6c 69 6d 20 8c 20 70 61 | 72 61 6d 28 73 65 74 5f |lim . pa|ram(set_|
|00004cc0| 69 78 29 20 3d 20 75 70 | 6c 69 6d 0d 1d 4c 43 20 |ix) = up|lim..LC |
|00004cd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004ce0| 20 20 20 20 f2 73 65 74 | 5f 74 65 78 74 28 77 5f |    .set|_text(w_|
|00004cf0| 64 69 6d 2c 73 65 74 74 | 69 6e 67 2c a4 64 65 63 |dim,sett|ing,.dec|
|00004d00| 32 28 73 65 74 5f 69 78 | 2c 72 6e 64 29 29 0d 1d |2(set_ix|,rnd))..|
|00004d10| 56 19 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |V.      |        |
|00004d20| 20 20 20 20 20 20 cd 0d | 1d 60 22 20 20 20 c9 20 |      ..|.`"   . |
|00004d30| 69 5f 64 5f 64 6f 77 6e | 3a 20 20 20 e7 20 73 65 |i_d_down|:   . se|
|00004d40| 74 74 69 6e 67 3e 30 20 | 8c 0d 1d 6a 2e 20 20 20 |tting>0 |...j.   |
|00004d50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004d60| 20 20 70 61 72 61 6d 28 | 73 65 74 5f 69 78 29 20 |  param(|set_ix) |
|00004d70| 2d 3d 20 73 74 65 70 0d | 1d 74 48 20 20 20 20 20 |-= step.|.tH     |
|00004d80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004d90| e7 20 70 61 72 61 6d 28 | 73 65 74 5f 69 78 29 3c |. param(|set_ix)<|
|00004da0| 6c 6f 77 6c 69 6d 20 8c | 20 70 61 72 61 6d 28 73 |lowlim .| param(s|
|00004db0| 65 74 5f 69 78 29 20 3d | 20 6c 6f 77 6c 69 6d 0d |et_ix) =| lowlim.|
|00004dc0| 1d 7e 43 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.~C     |        |
|00004dd0| 20 20 20 20 20 20 20 20 | f2 73 65 74 5f 74 65 78 |        |.set_tex|
|00004de0| 74 28 77 5f 64 69 6d 2c | 73 65 74 74 69 6e 67 2c |t(w_dim,|setting,|
|00004df0| a4 64 65 63 32 28 73 65 | 74 5f 69 78 2c 72 6e 64 |.dec2(se|t_ix,rnd|
|00004e00| 29 29 0d 1d 88 19 20 20 | 20 20 20 20 20 20 20 20 |))....  |        |
|00004e10| 20 20 20 20 20 20 20 20 | 20 20 cd 0d 1d 92 4e 20 |        |  ....N |
|00004e20| 20 20 c9 20 69 5f 64 5f | 75 6e 69 74 3a 20 20 20 |  . i_d_|unit:   |
|00004e30| f2 77 61 72 6e 28 22 54 | 68 69 73 20 70 72 6f 67 |.warn("T|his prog|
|00004e40| 72 61 6d 20 6f 6e 6c 79 | 20 73 75 70 70 6f 72 74 |ram only| support|
|00004e50| 73 20 22 22 69 6e 63 68 | 65 73 22 22 20 61 74 20 |s ""inch|es"" at |
|00004e60| 70 72 65 73 65 6e 74 22 | 29 0d 1d 9c 07 20 20 cb |present"|)....  .|
|00004e70| 0d 1d a6 06 20 cd 0d 1d | b0 07 3d 20 31 0d 1d ba |.... ...|..= 1...|
|00004e80| 04 0d 1d c4 2c dd 20 f2 | 73 74 61 72 74 5f 61 64 |....,. .|start_ad|
|00004e90| 6a 28 77 68 61 74 2c 69 | 63 6f 6e 2c 75 70 70 65 |j(what,i|con,uppe|
|00004ea0| 72 2c 6c 6f 77 65 72 2c | 69 6e 63 72 29 0d 1d ce |r,lower,|incr)...|
|00004eb0| 05 3a 0d 1d d8 35 3a 20 | f4 20 4e 6f 74 65 20 74 |.:...5: |. Note t|
|00004ec0| 68 61 74 20 77 65 20 61 | 72 65 20 6e 6f 77 20 61 |hat we a|re now a|
|00004ed0| 64 6a 75 73 74 69 6e 67 | 20 74 68 61 74 20 70 61 |djusting| that pa|
|00004ee0| 72 61 6d 65 74 65 72 0d | 1d e2 05 3a 0d 1d ec 2c |rameter.|...:...,|
|00004ef0| 20 e7 20 73 65 74 74 69 | 6e 67 3e 30 20 8c 20 f2 | . setti|ng>0 . .|
|00004f00| 69 63 6f 6e 73 65 6c 28 | 77 5f 64 69 6d 2c 73 65 |iconsel(|w_dim,se|
|00004f10| 74 74 69 6e 67 2c 46 29 | 0d 1d f6 1b 20 f2 69 63 |tting,F)|.... .ic|
|00004f20| 6f 6e 73 65 6c 28 77 5f | 64 69 6d 2c 69 63 6f 6e |onsel(w_|dim,icon|
|00004f30| 2c 54 29 0d 1e 00 23 20 | 73 65 74 5f 69 78 20 3d |,T)...# |set_ix =|
|00004f40| 20 77 68 61 74 20 3a 20 | 73 65 74 74 69 6e 67 20 | what : |setting |
|00004f50| 3d 20 69 63 6f 6e 0d 1e | 0a 40 20 75 70 6c 69 6d |= icon..|.@ uplim|
|00004f60| 20 3d 20 75 70 70 65 72 | 20 3a 20 6c 6f 77 6c 69 | = upper| : lowli|
|00004f70| 6d 20 3d 20 6c 6f 77 65 | 72 20 3a 20 73 74 65 70 |m = lowe|r : step|
|00004f80| 20 3d 20 31 2f 69 6e 63 | 72 20 3a 20 72 6e 64 20 | = 1/inc|r : rnd |
|00004f90| 3d 20 69 6e 63 72 0d 1e | 14 26 20 e7 20 75 70 6c |= incr..|.& . upl|
|00004fa0| 69 6d 3c 30 20 8c 20 75 | 70 6c 69 6d 20 3d 20 70 |im<0 . u|plim = p|
|00004fb0| 61 72 61 6d 28 2d 75 70 | 6c 69 6d 29 0d 1e 1e 29 |aram(-up|lim)...)|
|00004fc0| 20 e7 20 6c 6f 77 6c 69 | 6d 3c 30 20 8c 20 6c 6f | . lowli|m<0 . lo|
|00004fd0| 77 6c 69 6d 20 3d 20 70 | 61 72 61 6d 28 2d 6c 6f |wlim = p|aram(-lo|
|00004fe0| 77 6c 69 6d 29 0d 1e 28 | 05 e1 0d 1e 32 04 0d 1e |wlim)..(|....2...|
|00004ff0| 3c 15 dd 20 a4 64 65 63 | 32 28 69 78 2c 72 6f 75 |<.. .dec|2(ix,rou|
|00005000| 6e 64 29 0d 1e 46 0b ea | 20 40 25 2c 78 78 0d 1e |nd)..F..| @%,xx..|
|00005010| 50 05 3a 0d 1e 5a 49 3a | 20 f4 20 46 6f 72 6d 61 |P.:..ZI:| . Forma|
|00005020| 74 20 61 20 70 61 72 61 | 6d 65 74 65 72 20 69 6e |t a para|meter in|
|00005030| 74 6f 20 61 20 73 74 72 | 69 6e 67 20 77 69 74 68 |to a str|ing with|
|00005040| 20 32 20 64 65 63 69 6d | 61 6c 20 70 6c 61 63 65 | 2 decim|al place|
|00005050| 73 2c 20 61 6e 64 20 72 | 6f 75 6e 64 0d 1e 64 05 |s, and r|ound..d.|
|00005060| 3a 0d 1e 6e 24 20 40 25 | 20 3d 20 26 30 31 30 32 |:..n$ @%| = &0102|
|00005070| 30 32 30 35 20 3a 20 78 | 78 20 3d 20 70 61 72 61 |0205 : x|x = para|
|00005080| 6d 28 69 78 29 0d 1e 78 | 2c 20 70 61 72 61 6d 28 |m(ix)..x|, param(|
|00005090| 69 78 29 20 3d 20 a8 28 | 70 61 72 61 6d 28 69 78 |ix) = .(|param(ix|
|000050a0| 29 2a 72 6f 75 6e 64 2b | 2e 35 29 2f 72 6f 75 6e |)*round+|.5)/roun|
|000050b0| 64 0d 1e 82 12 3d 20 c3 | 28 70 61 72 61 6d 28 69 |d....= .|(param(i|
|000050c0| 78 29 29 0d 1e 8c 04 0d | 1e 96 0f dd 20 f2 64 65 |x)).....|.... .de|
|000050d0| 66 61 75 6c 74 73 0d 1e | a0 05 3a 0d 1e aa 34 3a |faults..|..:...4:|
|000050e0| 20 f4 20 52 65 74 75 72 | 6e 20 61 6c 6c 20 73 65 | . Retur|n all se|
|000050f0| 74 74 69 6e 67 73 20 61 | 6e 64 20 73 69 7a 65 73 |ttings a|nd sizes|
|00005100| 20 74 6f 20 74 68 65 20 | 64 65 66 61 75 6c 74 0d | to the |default.|
|00005110| 1e b4 05 3a 0d 1e be 21 | 20 75 6e 69 74 24 20 3d |...:...!| unit$ =|
|00005120| 20 22 69 6e 63 68 65 73 | 22 20 3a 20 77 69 64 74 | "inches|" : widt|
|00005130| 68 20 3d 20 38 0d 1e c8 | 2c 20 e7 20 73 65 74 74 |h = 8...|, . sett|
|00005140| 69 6e 67 3e 30 20 8c 20 | f2 69 63 6f 6e 73 65 6c |ing>0 . |.iconsel|
|00005150| 28 77 5f 73 65 74 2c 73 | 65 74 74 69 6e 67 2c 46 |(w_set,s|etting,F|
|00005160| 29 0d 1e d2 10 20 73 65 | 74 74 69 6e 67 20 3d 20 |).... se|tting = |
|00005170| 30 0d 1e dc 15 20 64 65 | 6c 69 6d 24 20 3d 20 22 |0.... de|lim$ = "|
|00005180| 25 25 25 25 25 22 0d 1e | e6 05 e1 0d 1e f0 04 0d |%%%%%"..|........|
|00005190| 1e fa 0f dd 20 f2 73 65 | 74 74 69 6e 67 73 0d 1f |.... .se|ttings..|
|000051a0| 04 1e ea 20 6f 6c 64 5f | 6a 75 73 74 2c 6f 6c 64 |... old_|just,old|
|000051b0| 5f 63 70 69 2c 6f 6c 64 | 5f 6c 70 69 0d 1f 0e 05 |_cpi,old|_lpi....|
|000051c0| 3a 0d 1f 18 26 3a 20 f4 | 20 53 65 74 74 69 6e 67 |:...&: .| Setting|
|000051d0| 20 6f 70 74 69 6f 6e 73 | 20 61 63 74 69 6f 6e 20 | options| action |
|000051e0| 70 72 6f 63 65 73 73 0d | 1f 22 05 3a 0d 1f 2c 34 |process.|.".:..,4|
|000051f0| 20 6f 6c 64 5f 6a 75 73 | 74 20 3d 20 6a 75 73 74 | old_jus|t = just|
|00005200| 20 3a 20 6f 6c 64 5f 63 | 70 69 20 3d 20 63 70 69 | : old_c|pi = cpi|
|00005210| 20 3a 20 6f 6c 64 5f 6c | 70 69 20 3d 20 6c 70 69 | : old_l|pi = lpi|
|00005220| 0d 1f 36 0c 20 f2 73 65 | 74 73 65 74 0d 1f 40 18 |..6. .se|tset..@.|
|00005230| 20 f2 77 69 6d 70 5f 6f | 70 65 6e 28 77 5f 73 65 | .wimp_o|pen(w_se|
|00005240| 74 2c 54 29 0d 1f 4a 06 | 20 f5 0d 1f 54 33 20 20 |t,T)..J.| ...T3  |
|00005250| f2 70 6f 6c 6c 28 22 73 | 65 74 22 2c 52 6d 5f 4e |.poll("s|et",Rm_N|
|00005260| 75 6c 6c 2b 52 6d 5f 4b | 65 79 2b 52 6d 5f 45 6e |ull+Rm_K|ey+Rm_En|
|00005270| 74 65 72 2b 52 6d 5f 4c | 65 61 76 65 29 0d 1f 5e |ter+Rm_L|eave)..^|
|00005280| 18 20 fd 20 a4 63 68 65 | 63 6b 20 84 20 66 69 6e |. . .che|ck . fin|
|00005290| 69 73 68 3c 30 0d 1f 68 | 17 20 f2 77 69 6d 70 5f |ish<0..h|. .wimp_|
|000052a0| 63 6c 6f 73 65 28 77 5f | 73 65 74 29 0d 1f 72 05 |close(w_|set)..r.|
|000052b0| 3a 0d 1f 7c 2f 20 e7 20 | 63 70 69 3c 3e 6f 6c 64 |:..|/ . |cpi<>old|
|000052c0| 5f 63 70 69 20 84 20 6c | 70 69 3c 3e 6f 6c 64 5f |_cpi . l|pi<>old_|
|000052d0| 6c 70 69 20 8c 20 f2 73 | 69 7a 65 5f 74 65 78 74 |lpi . .s|ize_text|
|000052e0| 0d 1f 86 21 20 e7 20 6a | 75 73 74 3c 3e 6f 6c 64 |...! . j|ust<>old|
|000052f0| 5f 6a 75 73 74 20 8c 20 | f2 6e 65 77 5f 6a 75 73 |_just . |.new_jus|
|00005300| 74 0d 1f 90 05 e1 0d 1f | 9a 04 0d 1f a4 0d dd 20 |t.......|....... |
|00005310| f2 73 65 74 73 65 74 0d | 1f ae 05 3a 0d 1f b8 42 |.setset.|...:...B|
|00005320| 3a 20 f4 20 53 65 74 20 | 75 70 20 74 68 65 20 73 |: . Set |up the s|
|00005330| 65 74 74 69 6e 67 20 77 | 69 6e 64 6f 77 20 62 75 |etting w|indow bu|
|00005340| 74 74 6f 6e 73 20 66 72 | 6f 6d 20 74 68 65 20 63 |ttons fr|om the c|
|00005350| 75 72 72 65 6e 74 20 63 | 68 6f 69 63 65 73 0d 1f |urrent c|hoices..|
|00005360| c2 05 3a 0d 1f cc 1f 20 | f2 65 73 67 6f 66 66 28 |..:.... |.esgoff(|
|00005370| 77 5f 73 65 74 2c 65 73 | 67 5f 73 5f 73 74 6f 63 |w_set,es|g_s_stoc|
|00005380| 6b 29 0d 1f d6 1e 20 f2 | 65 73 67 6f 66 66 28 77 |k).... .|esgoff(w|
|00005390| 5f 73 65 74 2c 65 73 67 | 5f 73 5f 6a 75 73 74 29 |_set,esg|_s_just)|
|000053a0| 0d 1f e0 1e 20 f2 65 73 | 67 6f 66 66 28 77 5f 73 |.... .es|goff(w_s|
|000053b0| 65 74 2c 65 73 67 5f 73 | 5f 74 79 70 65 29 0d 1f |et,esg_s|_type)..|
|000053c0| ea 1d 20 f2 65 73 67 6f | 66 66 28 77 5f 73 65 74 |.. .esgo|ff(w_set|
|000053d0| 2c 65 73 67 5f 73 5f 70 | 69 74 29 0d 1f f4 1e 20 |,esg_s_p|it).... |
|000053e0| f2 65 73 67 6f 66 66 28 | 77 5f 73 65 74 2c 65 73 |.esgoff(|w_set,es|
|000053f0| 67 5f 73 5f 6c 69 6e 65 | 29 0d 1f fe 05 3a 0d 20 |g_s_line|)....:. |
|00005400| 08 0f 20 c8 8e 20 73 74 | 6f 63 6b 20 ca 0d 20 12 |.. .. st|ock .. .|
|00005410| 23 20 20 c9 20 31 3a 20 | f2 69 63 6f 6e 73 65 6c |#  . 1: |.iconsel|
|00005420| 28 77 5f 73 65 74 2c 69 | 5f 73 5f 73 31 2c 54 29 |(w_set,i|_s_s1,T)|
|00005430| 0d 20 1c 23 20 20 c9 20 | 32 3a 20 f2 69 63 6f 6e |. .#  . |2: .icon|
|00005440| 73 65 6c 28 77 5f 73 65 | 74 2c 69 5f 73 5f 73 32 |sel(w_se|t,i_s_s2|
|00005450| 2c 54 29 0d 20 26 23 20 | 20 c9 20 33 3a 20 f2 69 |,T). &# | . 3: .i|
|00005460| 63 6f 6e 73 65 6c 28 77 | 5f 73 65 74 2c 69 5f 73 |consel(w|_set,i_s|
|00005470| 5f 73 33 2c 54 29 0d 20 | 30 06 20 cb 0d 20 3a 05 |_s3,T). |0. .. :.|
|00005480| 3a 0d 20 44 0e 20 c8 8e | 20 6a 75 73 74 20 ca 0d |:. D. ..| just ..|
|00005490| 20 4e 23 20 20 c9 20 31 | 3a 20 f2 69 63 6f 6e 73 | N#  . 1|: .icons|
|000054a0| 65 6c 28 77 5f 73 65 74 | 2c 69 5f 73 5f 6a 6c 2c |el(w_set|,i_s_jl,|
|000054b0| 54 29 0d 20 58 23 20 20 | c9 20 32 3a 20 f2 69 63 |T). X#  |. 2: .ic|
|000054c0| 6f 6e 73 65 6c 28 77 5f | 73 65 74 2c 69 5f 73 5f |onsel(w_|set,i_s_|
|000054d0| 6a 63 2c 54 29 0d 20 62 | 23 20 20 c9 20 33 3a 20 |jc,T). b|#  . 3: |
|000054e0| f2 69 63 6f 6e 73 65 6c | 28 77 5f 73 65 74 2c 69 |.iconsel|(w_set,i|
|000054f0| 5f 73 5f 6a 72 2c 54 29 | 0d 20 6c 06 20 cb 0d 20 |_s_jr,T)|. l. .. |
|00005500| 76 05 3a 0d 20 80 0d 20 | c8 8e 20 63 70 69 20 ca |v.:. .. |.. cpi .|
|00005510| 0d 20 8a 23 20 20 c9 20 | 35 3a 20 f2 69 63 6f 6e |. .#  . |5: .icon|
|00005520| 73 65 6c 28 77 5f 73 65 | 74 2c 69 5f 73 5f 70 35 |sel(w_se|t,i_s_p5|
|00005530| 2c 54 29 0d 20 94 25 20 | 20 c9 20 31 30 3a 20 f2 |,T). .% | . 10: .|
|00005540| 69 63 6f 6e 73 65 6c 28 | 77 5f 73 65 74 2c 69 5f |iconsel(|w_set,i_|
|00005550| 73 5f 70 31 30 2c 54 29 | 0d 20 9e 25 20 20 c9 20 |s_p10,T)|. .%  . |
|00005560| 31 32 3a 20 f2 69 63 6f | 6e 73 65 6c 28 77 5f 73 |12: .ico|nsel(w_s|
|00005570| 65 74 2c 69 5f 73 5f 70 | 31 32 2c 54 29 0d 20 a8 |et,i_s_p|12,T). .|
|00005580| 25 20 20 c9 20 31 37 3a | 20 f2 69 63 6f 6e 73 65 |%  . 17:| .iconse|
|00005590| 6c 28 77 5f 73 65 74 2c | 69 5f 73 5f 70 31 37 2c |l(w_set,|i_s_p17,|
|000055a0| 54 29 0d 20 b2 06 20 cb | 0d 20 bc 05 3a 0d 20 c6 |T). .. .|. ..:. .|
|000055b0| 0d 20 c8 8e 20 6c 70 69 | 20 ca 0d 20 d0 23 20 20 |. .. lpi| .. .#  |
|000055c0| c9 20 34 3a 20 f2 69 63 | 6f 6e 73 65 6c 28 77 5f |. 4: .ic|onsel(w_|
|000055d0| 73 65 74 2c 69 5f 73 5f | 6c 34 2c 54 29 0d 20 da |set,i_s_|l4,T). .|
|000055e0| 23 20 20 c9 20 36 3a 20 | f2 69 63 6f 6e 73 65 6c |#  . 6: |.iconsel|
|000055f0| 28 77 5f 73 65 74 2c 69 | 5f 73 5f 6c 36 2c 54 29 |(w_set,i|_s_l6,T)|
|00005600| 0d 20 e4 23 20 20 c9 20 | 38 3a 20 f2 69 63 6f 6e |. .#  . |8: .icon|
|00005610| 73 65 6c 28 77 5f 73 65 | 74 2c 69 5f 73 5f 6c 38 |sel(w_se|t,i_s_l8|
|00005620| 2c 54 29 0d 20 ee 06 20 | cb 0d 20 f8 05 3a 0d 21 |,T). .. |.. ..:.!|
|00005630| 02 16 20 e7 20 74 5f 74 | 79 70 65 3d 25 30 30 30 |.. . t_t|ype=%000|
|00005640| 30 30 20 8c 0d 21 0c 20 | 20 20 f2 69 63 6f 6e 73 |00 ..!. |  .icons|
|00005650| 65 6c 28 77 5f 73 65 74 | 2c 69 5f 73 5f 6e 6f 72 |el(w_set|,i_s_nor|
|00005660| 6d 2c 54 29 0d 21 16 06 | 20 cc 0d 21 20 37 20 20 |m,T).!..| ..! 7  |
|00005670| e7 20 28 74 5f 74 79 70 | 65 20 80 20 25 30 30 30 |. (t_typ|e . %000|
|00005680| 30 31 29 3e 30 20 8c 20 | f2 69 63 6f 6e 73 65 6c |01)>0 . |.iconsel|
|00005690| 28 77 5f 73 65 74 2c 69 | 5f 73 5f 6e 6c 71 2c 54 |(w_set,i|_s_nlq,T|
|000056a0| 29 0d 21 2a 38 20 20 e7 | 20 28 74 5f 74 79 70 65 |).!*8  .| (t_type|
|000056b0| 20 80 20 25 30 30 30 31 | 30 29 3e 30 20 8c 20 f2 | . %0001|0)>0 . .|
|000056c0| 69 63 6f 6e 73 65 6c 28 | 77 5f 73 65 74 2c 69 5f |iconsel(|w_set,i_|
|000056d0| 73 5f 62 6f 6c 64 2c 54 | 29 0d 21 34 38 20 20 e7 |s_bold,T|).!48  .|
|000056e0| 20 28 74 5f 74 79 70 65 | 20 80 20 25 30 30 31 30 | (t_type| . %0010|
|000056f0| 30 29 3e 30 20 8c 20 f2 | 69 63 6f 6e 73 65 6c 28 |0)>0 . .|iconsel(|
|00005700| 77 5f 73 65 74 2c 69 5f | 73 5f 69 74 61 6c 2c 54 |w_set,i_|s_ital,T|
|00005710| 29 0d 21 3e 37 20 20 e7 | 20 28 74 5f 74 79 70 65 |).!>7  .| (t_type|
|00005720| 20 80 20 25 30 31 30 30 | 30 29 3e 30 20 8c 20 f2 | . %0100|0)>0 . .|
|00005730| 69 63 6f 6e 73 65 6c 28 | 77 5f 73 65 74 2c 69 5f |iconsel(|w_set,i_|
|00005740| 73 5f 72 65 64 2c 54 29 | 0d 21 48 39 20 20 e7 20 |s_red,T)|.!H9  . |
|00005750| 28 74 5f 74 79 70 65 20 | 80 20 25 31 30 30 30 30 |(t_type |. %10000|
|00005760| 29 3e 30 20 8c 20 f2 69 | 63 6f 6e 73 65 6c 28 77 |)>0 . .i|consel(w|
|00005770| 5f 73 65 74 2c 69 5f 73 | 5f 75 6e 64 65 72 2c 54 |_set,i_s|_under,T|
|00005780| 29 0d 21 52 06 20 cd 0d | 21 5c 05 3a 0d 21 66 05 |).!R. ..|!\.:.!f.|
|00005790| e1 0d 21 70 04 0d 21 7a | 05 3a 0d 21 84 2b 3a 20 |..!p..!z|.:.!.+: |
|000057a0| f4 20 45 76 65 6e 74 20 | 68 61 6e 64 6c 65 72 73 |. Event |handlers|
|000057b0| 20 66 6f 72 20 73 65 74 | 74 69 6e 67 73 20 70 72 | for set|tings pr|
|000057c0| 6f 63 65 73 73 0d 21 8e | 05 3a 0d 21 98 04 0d 21 |ocess.!.|.:.!...!|
|000057d0| a2 34 dd 20 a4 6f 70 65 | 6e 5f 73 65 74 28 77 69 |.4. .ope|n_set(wi|
|000057e0| 6e 64 6f 77 2c 6e 65 77 | 29 20 3d 20 a4 6f 70 65 |ndow,new|) = .ope|
|000057f0| 6e 5f 69 64 6c 65 28 77 | 69 6e 64 6f 77 2c 6e 65 |n_idle(w|indow,ne|
|00005800| 77 29 0d 21 ac 2c dd 20 | a4 6d 65 73 73 61 67 65 |w).!.,. |.message|
|00005810| 5f 73 65 74 28 62 6c 6b | 29 20 3d 20 a4 6d 65 73 |_set(blk|) = .mes|
|00005820| 73 61 67 65 5f 69 64 6c | 65 28 62 6c 6b 29 0d 21 |sage_idl|e(blk).!|
|00005830| b6 04 0d 21 c0 1c dd 20 | a4 6d 65 6e 75 5f 73 65 |...!... |.menu_se|
|00005840| 74 28 77 69 6e 64 6f 77 | 2c 69 63 6f 6e 29 0d 21 |t(window|,icon).!|
|00005850| ca 08 ea 20 6d 70 0d 21 | d4 21 20 e7 20 77 69 6e |... mp.!|.! . win|
|00005860| 64 6f 77 3d 2d 32 20 8c | 20 f2 6d 61 6b 65 5f 6d |dow=-2 .| .make_m|
|00005870| 65 6e 75 73 28 54 29 0d | 21 de 08 3d 20 6d 70 0d |enus(T).|!..= mp.|
|00005880| 21 e8 04 0d 21 f2 40 dd | 20 a4 63 68 6f 6f 73 65 |!...!.@.| .choose|
|00005890| 5f 73 65 74 28 73 65 6c | 31 2c 73 65 6c 32 2c 73 |_set(sel|1,sel2,s|
|000058a0| 65 6c 33 29 20 3d 20 a4 | 63 68 6f 6f 73 65 5f 69 |el3) = .|choose_i|
|000058b0| 64 6c 65 28 73 65 6c 31 | 2c 73 65 6c 32 2c 73 65 |dle(sel1|,sel2,se|
|000058c0| 6c 33 29 0d 21 fc 04 0d | 22 06 0f dd 20 a4 71 75 |l3).!...|"... .qu|
|000058d0| 69 74 5f 73 65 74 0d 22 | 10 10 20 66 69 6e 69 73 |it_set."|.. finis|
|000058e0| 68 20 3d 20 2d 31 0d 22 | 1a 07 3d 20 31 0d 22 24 |h = -1."|..= 1."$|
|000058f0| 04 0d 22 2e 18 dd 20 a4 | 63 6c 6f 73 65 5f 73 65 |.."... .|close_se|
|00005900| 74 28 77 69 6e 64 6f 77 | 29 0d 22 38 2c 20 e7 20 |t(window|)."8, . |
|00005910| 77 69 6e 64 6f 77 3d 77 | 5f 73 65 74 20 8c 20 66 |window=w|_set . f|
|00005920| 69 6e 69 73 68 20 3d 20 | 31 20 3a 20 3d 20 31 20 |inish = |1 : = 1 |
|00005930| 8b 20 3d 20 30 0d 22 42 | 04 0d 22 4c 1e dd 20 a4 |. = 0."B|.."L.. .|
|00005940| 73 65 6c 65 63 74 5f 73 | 65 74 28 77 69 6e 64 6f |select_s|et(windo|
|00005950| 77 2c 69 63 6f 6e 29 0d | 22 56 18 ea 20 6f 5f 6a |w,icon).|"V.. o_j|
|00005960| 75 73 74 2c 6f 5f 63 70 | 69 2c 6f 5f 6c 70 69 0d |ust,o_cp|i,o_lpi.|
|00005970| 22 60 05 3a 0d 22 6a 48 | 3a 20 f4 20 53 65 6c 65 |"`.:."jH|: . Sele|
|00005980| 63 74 20 6f 76 65 72 20 | 61 20 73 65 74 74 69 6e |ct over |a settin|
|00005990| 67 20 77 69 6e 64 6f 77 | 20 62 75 74 74 6f 6e 20 |g window| button |
|000059a0| 2d 20 75 70 64 61 74 65 | 20 63 68 6f 69 63 65 73 |- update| choices|
|000059b0| 20 61 73 20 72 65 71 75 | 69 72 65 64 0d 22 74 05 | as requ|ired."t.|
|000059c0| 3a 0d 22 7e 1f 20 e7 20 | 77 69 6e 64 6f 77 3d 77 |:."~. . |window=w|
|000059d0| 5f 73 65 74 20 80 20 69 | 63 6f 6e 3e 3d 30 20 8c |_set . i|con>=0 .|
|000059e0| 0d 22 88 2f 20 20 6f 5f | 6a 75 73 74 20 3d 20 6a |."./  o_|just = j|
|000059f0| 75 73 74 20 3a 20 6f 5f | 63 70 69 20 3d 20 63 70 |ust : o_|cpi = cp|
|00005a00| 69 20 3a 20 6f 5f 6c 70 | 69 20 3d 20 6c 70 69 0d |i : o_lp|i = lpi.|
|00005a10| 22 92 05 3a 0d 22 9c 0f | 20 20 c8 8e 20 69 63 6f |"..:."..|  .. ico|
|00005a20| 6e 20 ca 0d 22 a6 3b 20 | 20 20 c9 20 69 5f 73 5f |n ..".; |  . i_s_|
|00005a30| 73 31 3a 20 20 20 20 f2 | 65 73 67 6f 66 66 28 77 |s1:    .|esgoff(w|
|00005a40| 69 6e 64 6f 77 2c 65 73 | 67 5f 73 5f 73 74 6f 63 |indow,es|g_s_stoc|
|00005a50| 6b 29 20 3a 20 73 74 6f | 63 6b 20 3d 20 31 0d 22 |k) : sto|ck = 1."|
|00005a60| b0 3b 20 20 20 c9 20 69 | 5f 73 5f 73 32 3a 20 20 |.;   . i|_s_s2:  |
|00005a70| 20 20 f2 65 73 67 6f 66 | 66 28 77 69 6e 64 6f 77 |  .esgof|f(window|
|00005a80| 2c 65 73 67 5f 73 5f 73 | 74 6f 63 6b 29 20 3a 20 |,esg_s_s|tock) : |
|00005a90| 73 74 6f 63 6b 20 3d 20 | 32 0d 22 ba 3b 20 20 20 |stock = |2.".;   |
|00005aa0| c9 20 69 5f 73 5f 73 33 | 3a 20 20 20 20 f2 65 73 |. i_s_s3|:    .es|
|00005ab0| 67 6f 66 66 28 77 69 6e | 64 6f 77 2c 65 73 67 5f |goff(win|dow,esg_|
|00005ac0| 73 5f 73 74 6f 63 6b 29 | 20 3a 20 73 74 6f 63 6b |s_stock)| : stock|
|00005ad0| 20 3d 20 33 0d 22 c4 39 | 20 20 20 c9 20 69 5f 73 | = 3.".9|   . i_s|
|00005ae0| 5f 6a 6c 3a 20 20 20 20 | f2 65 73 67 6f 66 66 28 |_jl:    |.esgoff(|
|00005af0| 77 69 6e 64 6f 77 2c 65 | 73 67 5f 73 5f 6a 75 73 |window,e|sg_s_jus|
|00005b00| 74 29 20 3a 20 6a 75 73 | 74 20 3d 20 31 0d 22 ce |t) : jus|t = 1.".|
|00005b10| 39 20 20 20 c9 20 69 5f | 73 5f 6a 63 3a 20 20 20 |9   . i_|s_jc:   |
|00005b20| 20 f2 65 73 67 6f 66 66 | 28 77 69 6e 64 6f 77 2c | .esgoff|(window,|
|00005b30| 65 73 67 5f 73 5f 6a 75 | 73 74 29 20 3a 20 6a 75 |esg_s_ju|st) : ju|
|00005b40| 73 74 20 3d 20 32 0d 22 | d8 39 20 20 20 c9 20 69 |st = 2."|.9   . i|
|00005b50| 5f 73 5f 6a 72 3a 20 20 | 20 20 f2 65 73 67 6f 66 |_s_jr:  |  .esgof|
|00005b60| 66 28 77 69 6e 64 6f 77 | 2c 65 73 67 5f 73 5f 6a |f(window|,esg_s_j|
|00005b70| 75 73 74 29 20 3a 20 6a | 75 73 74 20 3d 20 33 0d |ust) : j|ust = 3.|
|00005b80| 22 e2 40 20 20 20 c9 20 | 69 5f 73 5f 6e 6f 72 6d |".@   . |i_s_norm|
|00005b90| 3a 20 20 f2 65 73 67 6f | 66 66 28 77 69 6e 64 6f |:  .esgo|ff(windo|
|00005ba0| 77 2c 65 73 67 5f 73 5f | 74 79 70 65 29 20 3a 20 |w,esg_s_|type) : |
|00005bb0| 74 5f 74 79 70 65 20 3d | 20 25 30 30 30 30 30 0d |t_type =| %00000.|
|00005bc0| 22 ec 26 20 20 20 c9 20 | 69 5f 73 5f 6e 6c 71 3a |".&   . |i_s_nlq:|
|00005bd0| 20 20 20 f2 74 79 70 65 | 28 69 63 6f 6e 2c 25 30 |   .type|(icon,%0|
|00005be0| 30 30 30 31 29 0d 22 f6 | 26 20 20 20 c9 20 69 5f |0001).".|&   . i_|
|00005bf0| 73 5f 62 6f 6c 64 3a 20 | 20 f2 74 79 70 65 28 69 |s_bold: | .type(i|
|00005c00| 63 6f 6e 2c 25 30 30 30 | 31 30 29 0d 23 00 26 20 |con,%000|10).#.& |
|00005c10| 20 20 c9 20 69 5f 73 5f | 69 74 61 6c 3a 20 20 f2 |  . i_s_|ital:  .|
|00005c20| 74 79 70 65 28 69 63 6f | 6e 2c 25 30 30 31 30 30 |type(ico|n,%00100|
|00005c30| 29 0d 23 0a 26 20 20 20 | c9 20 69 5f 73 5f 72 65 |).#.&   |. i_s_re|
|00005c40| 64 3a 20 20 20 f2 74 79 | 70 65 28 69 63 6f 6e 2c |d:   .ty|pe(icon,|
|00005c50| 25 30 31 30 30 30 29 0d | 23 14 26 20 20 20 c9 20 |%01000).|#.&   . |
|00005c60| 69 5f 73 5f 75 6e 64 65 | 72 3a 20 f2 74 79 70 65 |i_s_unde|r: .type|
|00005c70| 28 69 63 6f 6e 2c 25 31 | 30 30 30 30 29 0d 23 1e |(icon,%1|0000).#.|
|00005c80| 37 20 20 20 c9 20 69 5f | 73 5f 70 35 3a 20 20 20 |7   . i_|s_p5:   |
|00005c90| 20 f2 65 73 67 6f 66 66 | 28 77 69 6e 64 6f 77 2c | .esgoff|(window,|
|00005ca0| 65 73 67 5f 73 5f 70 69 | 74 29 20 3a 20 63 70 69 |esg_s_pi|t) : cpi|
|00005cb0| 20 3d 20 35 0d 23 28 38 | 20 20 20 c9 20 69 5f 73 | = 5.#(8|   . i_s|
|00005cc0| 5f 70 31 30 3a 20 20 20 | f2 65 73 67 6f 66 66 28 |_p10:   |.esgoff(|
|00005cd0| 77 69 6e 64 6f 77 2c 65 | 73 67 5f 73 5f 70 69 74 |window,e|sg_s_pit|
|00005ce0| 29 20 3a 20 63 70 69 20 | 3d 20 31 30 0d 23 32 38 |) : cpi |= 10.#28|
|00005cf0| 20 20 20 c9 20 69 5f 73 | 5f 70 31 32 3a 20 20 20 |   . i_s|_p12:   |
|00005d00| f2 65 73 67 6f 66 66 28 | 77 69 6e 64 6f 77 2c 65 |.esgoff(|window,e|
|00005d10| 73 67 5f 73 5f 70 69 74 | 29 20 3a 20 63 70 69 20 |sg_s_pit|) : cpi |
|00005d20| 3d 20 31 32 0d 23 3c 38 | 20 20 20 c9 20 69 5f 73 |= 12.#<8|   . i_s|
|00005d30| 5f 70 31 37 3a 20 20 20 | f2 65 73 67 6f 66 66 28 |_p17:   |.esgoff(|
|00005d40| 77 69 6e 64 6f 77 2c 65 | 73 67 5f 73 5f 70 69 74 |window,e|sg_s_pit|
|00005d50| 29 20 3a 20 63 70 69 20 | 3d 20 31 37 0d 23 46 38 |) : cpi |= 17.#F8|
|00005d60| 20 20 20 c9 20 69 5f 73 | 5f 6c 34 3a 20 20 20 20 |   . i_s|_l4:    |
|00005d70| f2 65 73 67 6f 66 66 28 | 77 69 6e 64 6f 77 2c 65 |.esgoff(|window,e|
|00005d80| 73 67 5f 73 5f 6c 69 6e | 65 29 20 3a 20 6c 70 69 |sg_s_lin|e) : lpi|
|00005d90| 20 3d 20 34 0d 23 50 38 | 20 20 20 c9 20 69 5f 73 | = 4.#P8|   . i_s|
|00005da0| 5f 6c 36 3a 20 20 20 20 | f2 65 73 67 6f 66 66 28 |_l6:    |.esgoff(|
|00005db0| 77 69 6e 64 6f 77 2c 65 | 73 67 5f 73 5f 6c 69 6e |window,e|sg_s_lin|
|00005dc0| 65 29 20 3a 20 6c 70 69 | 20 3d 20 36 0d 23 5a 38 |e) : lpi| = 6.#Z8|
|00005dd0| 20 20 20 c9 20 69 5f 73 | 5f 6c 38 3a 20 20 20 20 |   . i_s|_l8:    |
|00005de0| f2 65 73 67 6f 66 66 28 | 77 69 6e 64 6f 77 2c 65 |.esgoff(|window,e|
|00005df0| 73 67 5f 73 5f 6c 69 6e | 65 29 20 3a 20 6c 70 69 |sg_s_lin|e) : lpi|
|00005e00| 20 3d 20 38 0d 23 64 07 | 20 20 cb 0d 23 6e 29 20 | = 8.#d.|  ..#n) |
|00005e10| 20 e7 20 69 63 6f 6e 3e | 3d 30 20 8c 20 f2 69 63 | . icon>|=0 . .ic|
|00005e20| 6f 6e 73 65 6c 28 77 69 | 6e 64 6f 77 2c 69 63 6f |onsel(wi|ndow,ico|
|00005e30| 6e 2c 54 29 0d 23 78 05 | 3a 0d 23 82 06 20 cd 0d |n,T).#x.|:.#.. ..|
|00005e40| 23 8c 07 3d 20 31 0d 23 | 96 04 0d 23 a0 18 dd 20 |#..= 1.#|...#... |
|00005e50| f2 74 79 70 65 28 f8 20 | 69 63 6f 6e 2c 6d 61 73 |.type(. |icon,mas|
|00005e60| 6b 29 0d 23 aa 05 3a 0d | 23 b4 2a 3a 20 f4 20 41 |k).#..:.|#.*: . A|
|00005e70| 20 74 79 70 65 20 65 6e | 68 61 6e 63 65 6d 65 6e | type en|hancemen|
|00005e80| 74 20 62 75 74 74 6f 6e | 20 63 6c 69 63 6b 65 64 |t button| clicked|
|00005e90| 2e 0d 23 be 43 3a 20 f4 | 20 49 66 20 6f 75 74 20 |..#.C: .| If out |
|00005ea0| 6f 70 74 69 6f 6e 20 69 | 73 20 6e 6f 74 20 61 6c |option i|s not al|
|00005eb0| 72 65 61 64 79 20 73 65 | 6c 65 63 74 65 64 2c 20 |ready se|lected, |
|00005ec0| 73 65 6c 65 63 74 20 6f | 75 72 73 65 6c 76 65 73 |select o|urselves|
|00005ed0| 20 61 6e 64 0d 23 c8 48 | 3a 20 f4 20 64 65 73 65 | and.#.H|: . dese|
|00005ee0| 6c 65 63 74 20 4e 6f 72 | 6d 61 6c 2e 20 20 49 66 |lect Nor|mal.  If|
|00005ef0| 20 77 65 27 72 65 20 61 | 6c 72 65 61 64 79 20 73 | we're a|lready s|
|00005f00| 65 6c 65 63 74 65 64 2c | 20 74 75 72 6e 20 6f 75 |elected,| turn ou|
|00005f10| 72 20 62 75 74 74 6f 6e | 20 61 6e 64 0d 23 d2 48 |r button| and.#.H|
|00005f20| 3a 20 f4 20 65 6e 68 61 | 6e 63 65 6d 65 6e 74 20 |: . enha|ncement |
|00005f30| 6f 66 66 2e 20 20 49 66 | 20 6e 6f 20 6d 6f 72 65 |off.  If| no more|
|00005f40| 20 65 6e 68 61 6e 63 65 | 6d 65 6e 74 73 20 72 65 | enhance|ments re|
|00005f50| 6d 61 69 6e 2c 20 73 65 | 6c 65 63 74 20 4e 6f 72 |main, se|lect Nor|
|00005f60| 6d 61 6c 2e 0d 23 dc 05 | 3a 0d 23 e6 1a 20 e7 20 |mal..#..|:.#.. . |
|00005f70| 28 74 5f 74 79 70 65 20 | 80 20 6d 61 73 6b 29 3d |(t_type |. mask)=|
|00005f80| 30 20 8c 0d 23 f0 20 20 | 20 f2 69 63 6f 6e 73 65 |0 ..#.  | .iconse|
|00005f90| 6c 28 77 5f 73 65 74 2c | 69 5f 73 5f 6e 6f 72 6d |l(w_set,|i_s_norm|
|00005fa0| 2c 46 29 0d 23 fa 1c 20 | 20 74 5f 74 79 70 65 20 |,F).#.. | t_type |
|00005fb0| 3d 20 74 5f 74 79 70 65 | 20 84 20 6d 61 73 6b 0d |= t_type| . mask.|
|00005fc0| 24 04 06 20 cc 0d 24 0e | 20 20 20 74 5f 74 79 70 |$.. ..$.|   t_typ|
|00005fd0| 65 20 3d 20 74 5f 74 79 | 70 65 20 80 20 28 ac 20 |e = t_ty|pe . (. |
|00005fe0| 6d 61 73 6b 29 0d 24 18 | 1c 20 20 f2 69 63 6f 6e |mask).$.|.  .icon|
|00005ff0| 73 65 6c 28 77 5f 73 65 | 74 2c 69 63 6f 6e 2c 46 |sel(w_se|t,icon,F|
|00006000| 29 0d 24 22 33 20 20 e7 | 20 28 74 5f 74 79 70 65 |).$"3  .| (t_type|
|00006010| 3d 25 30 30 30 30 30 29 | 20 69 63 6f 6e 20 3d 20 |=%00000)| icon = |
|00006020| 69 5f 73 5f 6e 6f 72 6d | 20 8b 20 69 63 6f 6e 20 |i_s_norm| . icon |
|00006030| 3d 20 2d 31 0d 24 2c 06 | 20 cd 0d 24 36 05 e1 0d |= -1.$,.| ..$6...|
|00006040| 24 40 04 0d 24 4a 16 dd | 20 f2 65 73 67 6f 66 66 |$@..$J..| .esgoff|
|00006050| 28 77 69 6e 2c 65 73 67 | 29 0d 24 54 0e ea 20 62 |(win,esg|).$T.. b|
|00006060| 6c 6f 63 6b 2c 62 70 0d | 24 5e 05 3a 0d 24 68 2d |lock,bp.|$^.:.$h-|
|00006070| 3a 20 f4 20 44 65 73 65 | 6c 65 63 74 20 61 6c 6c |: . Dese|lect all|
|00006080| 20 74 68 65 20 69 63 6f | 6e 73 20 69 6e 20 61 20 | the ico|ns in a |
|00006090| 67 69 76 65 6e 20 45 53 | 47 0d 24 72 3e 3a 20 f4 |given ES|G.$r>: .|
|000060a0| 20 55 73 65 20 61 20 70 | 73 65 75 64 6f 20 64 61 | Use a p|seudo da|
|000060b0| 74 61 20 62 6c 6f 63 6b | 20 61 20 67 6f 6f 64 20 |ta block| a good |
|000060c0| 77 61 79 20 75 70 20 74 | 68 65 20 73 74 61 6e 64 |way up t|he stand|
|000060d0| 61 72 64 20 6f 6e 65 0d | 24 7c 05 3a 0d 24 86 22 |ard one.|$|.:.$."|
|000060e0| 20 62 6c 6f 63 6b 20 3d | 20 62 6c 6b 2b 26 31 30 | block =| blk+&10|
|000060f0| 30 20 3a 20 62 70 20 3d | 20 62 6c 6f 63 6b 0d 24 |0 : bp =| block.$|
|00006100| 90 41 20 c8 99 20 22 57 | 69 6d 70 5f 57 68 69 63 |.A .. "W|imp_Whic|
|00006110| 68 49 63 6f 6e 22 2c 77 | 69 6e 2c 62 6c 6f 63 6b |hIcon",w|in,block|
|00006120| 2c 31 35 3c 3c 53 68 5f | 49 63 6f 6e 45 53 47 2c |,15<<Sh_|IconESG,|
|00006130| 65 73 67 3c 3c 53 68 5f | 49 63 6f 6e 45 53 47 0d |esg<<Sh_|IconESG.|
|00006140| 24 9a 0e 20 c8 95 20 21 | 62 70 3e 3d 30 0d 24 a4 |$.. .. !|bp>=0.$.|
|00006150| 19 20 20 f2 69 63 6f 6e | 73 65 6c 28 77 69 6e 2c |.  .icon|sel(win,|
|00006160| 21 62 70 2c 46 29 0d 24 | ae 0d 20 20 62 70 20 2b |!bp,F).$|..  bp +|
|00006170| 3d 20 34 0d 24 b8 06 20 | ce 0d 24 c2 05 e1 0d 24 |= 4.$.. |..$....$|
|00006180| cc 04 0d 24 d6 1c dd 20 | f2 69 63 6f 6e 73 65 6c |...$... |.iconsel|
|00006190| 28 77 69 6e 2c 69 63 6f | 6e 2c 6e 65 77 29 0d 24 |(win,ico|n,new).$|
|000061a0| e0 05 3a 0d 24 ea 30 3a | 20 f4 20 43 68 61 6e 67 |..:.$.0:| . Chang|
|000061b0| 65 20 74 68 65 20 27 68 | 69 67 68 6c 69 67 68 74 |e the 'h|ighlight|
|000061c0| 65 64 27 20 66 6c 61 67 | 20 6f 66 20 61 6e 20 69 |ed' flag| of an i|
|000061d0| 63 6f 6e 0d 24 f4 05 3a | 0d 24 fe 10 20 62 6c 6b |con.$..:|.$.. blk|
|000061e0| 21 30 20 3d 20 77 69 6e | 0d 25 08 11 20 62 6c 6b |!0 = win|.%.. blk|
|000061f0| 21 34 20 3d 20 69 63 6f | 6e 0d 25 12 2c 20 e7 20 |!4 = ico|n.%., . |
|00006200| 6e 65 77 20 8c 20 62 6c | 6b 21 38 20 3d 20 49 66 |new . bl|k!8 = If|
|00006210| 5f 49 6e 76 65 72 74 65 | 64 20 8b 20 62 6c 6b 21 |_Inverte|d . blk!|
|00006220| 38 20 3d 20 30 0d 25 1c | 19 20 62 6c 6b 21 31 32 |8 = 0.%.|. blk!12|
|00006230| 20 3d 20 49 66 5f 49 6e | 76 65 72 74 65 64 0d 25 | = If_In|verted.%|
|00006240| 26 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 49 |&  .. "W|imp_SetI|
|00006250| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 62 6c 6b 0d 25 |conState|",,blk.%|
|00006260| 30 05 e1 0d 25 3a 04 0d | 25 44 05 3a 0d 25 4e 27 |0...%:..|%D.:.%N'|
|00006270| 3a 20 f4 20 45 76 65 6e | 74 20 68 61 6e 64 6c 65 |: . Even|t handle|
|00006280| 72 73 20 66 6f 72 20 69 | 64 6c 65 20 70 72 6f 63 |rs for i|dle proc|
|00006290| 65 73 73 0d 25 58 05 3a | 0d 25 62 04 0d 25 6c 1c |ess.%X.:|.%b..%l.|
|000062a0| dd 20 a4 6f 70 65 6e 5f | 69 64 6c 65 28 77 69 6e |. .open_|idle(win|
|000062b0| 64 6f 77 2c 6e 65 77 29 | 0d 25 76 13 20 62 6c 6b |dow,new)|.%v. blk|
|000062c0| 21 30 20 3d 20 77 69 6e | 64 6f 77 0d 25 80 0c 20 |!0 = win|dow.%.. |
|000062d0| e7 20 6e 65 77 20 8c 0d | 25 8a 22 20 20 c8 99 20 |. new ..|%."  .. |
|000062e0| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 49 |"Wimp_Ge|tWindowI|
|000062f0| 6e 66 6f 22 2c 2c 62 6c | 6b 0d 25 94 11 20 20 62 |nfo",,bl|k.%..  b|
|00006300| 6c 6b 21 32 38 20 3d 20 | 2d 31 0d 25 9e 06 20 cd |lk!28 = |-1.%.. .|
|00006310| 0d 25 a8 49 20 e7 20 77 | 69 6e 64 6f 77 3d 77 5f |.%.I . w|indow=w_|
|00006320| 74 65 78 74 20 8c 20 62 | 6c 6b 21 32 34 20 3d 20 |text . b|lk!24 = |
|00006330| 2d 6c 69 6e 65 5f 73 70 | 2a a8 28 2d 28 62 6c 6b |-line_sp|*.(-(blk|
|00006340| 21 32 34 2d 6c 69 6e 65 | 5f 73 70 2f 32 29 20 81 |!24-line|_sp/2) .|
|00006350| 20 6c 69 6e 65 5f 73 70 | 29 0d 25 b2 1e 20 c8 99 | line_sp|).%.. ..|
|00006360| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00006370| 77 22 2c 2c 62 6c 6b 0d | 25 bc 07 3d 20 31 0d 25 |w",,blk.|%..= 1.%|
|00006380| c6 04 0d 25 d0 1d dd 20 | a4 63 6c 6f 73 65 5f 69 |...%... |.close_i|
|00006390| 64 6c 65 28 77 69 6e 64 | 6f 77 29 20 3d 20 30 0d |dle(wind|ow) = 0.|
|000063a0| 25 da 04 0d 25 e4 20 dd | 20 a4 6b 65 79 5f 69 64 |%...%. .| .key_id|
|000063b0| 6c 65 28 77 69 6e 64 6f | 77 2c 69 63 6f 6e 2c 6b |le(windo|w,icon,k|
|000063c0| 65 79 29 0d 25 ee 11 ea | 20 6c 69 6e 65 2c 6c 65 |ey).%...| line,le|
|000063d0| 6e 2c 4a 25 0d 25 f8 05 | 3a 0d 26 02 29 3a 20 f4 |n,J%.%..|:.&.): .|
|000063e0| 20 4b 65 79 20 70 72 65 | 73 73 2c 20 69 6e 20 53 | Key pre|ss, in S|
|000063f0| 61 76 65 20 6f 72 20 74 | 65 78 74 20 77 69 6e 64 |ave or t|ext wind|
+--------+-------------------------+-------------------------+--------+--------+