home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1988-12-14 | 22.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| Truevision Targa Graphic (image/tga)
| magic
| Supported |
| 100%
| file
| Targa image data - RGBA - RLE 24941 x 25959 x 32 +30034 +18798 - 6-bit alpha - right - interleave "ersion 0.82"
| default (weak)
| |
| 99%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 20 56 65 72 73 69 6f 6e | 20 30 2e 38 32 0d 00 14 | Version| 0.82...|
|00000020| 3e f4 20 50 75 72 70 6f | 73 65 3a 20 70 72 69 6e |>. Purpo|se: prin|
|00000030| 74 65 72 20 69 6e 64 65 | 70 65 6e 64 65 6e 74 20 |ter inde|pendent |
|00000040| 70 61 72 74 20 6f 66 20 | 70 72 69 6e 74 65 72 20 |part of |printer |
|00000050| 61 70 70 6c 69 63 61 74 | 69 6f 6e 0d 00 1e 27 f4 |applicat|ion...'.|
|00000060| 20 41 75 74 68 6f 72 73 | 3a 20 44 54 65 65 2c 20 | Authors|: DTee, |
|00000070| 41 54 68 6f 6d 70 73 6f | 6e 2c 20 4e 52 65 65 76 |AThompso|n, NReev|
|00000080| 65 73 0d 00 28 1e c8 9b | 20 22 3c 50 44 72 69 76 |es..(...| "<PDriv|
|00000090| 65 72 24 64 69 72 3e 2e | 4c 69 62 72 61 72 79 22 |er$dir>.|Library"|
|000000a0| 0d 00 32 09 f2 69 6e 69 | 74 0d 00 3c 14 ee 20 85 |..2..ini|t..<.. .|
|000000b0| 20 f2 65 72 72 6f 72 28 | 9f 2c f6 24 29 0d 00 46 | .error(|.,.$)..F|
|000000c0| 05 f5 0d 00 50 2f 20 c8 | 99 20 22 57 69 6d 70 5f |....P/ .|. "Wimp_|
|000000d0| 50 6f 6c 6c 22 2c 70 6f | 6c 6c 5f 6d 61 73 6b 25 |Poll",po|ll_mask%|
|000000e0| 2c 65 76 65 6e 74 25 20 | b8 20 61 63 74 69 6f 6e |,event% |. action|
|000000f0| 25 0d 00 5a 13 20 f2 64 | 65 73 70 61 74 63 68 5f |%..Z. .d|espatch_|
|00000100| 70 6f 6c 6c 0d 00 64 07 | fd 20 a3 0d 00 6e 05 e0 |poll..d.|. ...n..|
|00000110| 0d 00 78 05 3a 0d 00 82 | 13 dd f2 64 65 73 70 61 |..x.:...|...despa|
|00000120| 74 63 68 5f 70 6f 6c 6c | 0d 00 8c 32 20 e7 20 ac |tch_poll|...2 . .|
|00000130| 20 a4 50 72 69 6e 74 65 | 72 5f 70 72 6f 63 65 73 | .Printe|r_proces|
|00000140| 73 5f 65 76 65 6e 74 28 | 61 63 74 69 6f 6e 25 2c |s_event(|action%,|
|00000150| 20 65 76 65 6e 74 25 29 | 20 8c 0d 00 96 12 20 20 | event%)| ..... |
|00000160| c8 8e 20 61 63 74 69 6f | 6e 25 20 ca 0d 00 a0 11 |.. actio|n% .....|
|00000170| 20 20 20 c9 20 30 3a 20 | f2 63 6f 70 79 0d 00 aa | . 0: |.copy...|
|00000180| 1c 20 20 20 c9 20 31 3a | 20 f2 72 65 64 72 61 77 |. . 1:| .redraw|
|00000190| 28 21 65 76 65 6e 74 25 | 29 0d 00 b4 2f 20 20 20 |(!event%|).../ |
|000001a0| 20 20 20 20 20 20 20 20 | e7 20 21 65 76 65 6e 74 | |. !event|
|000001b0| 25 3d 63 6f 6e 66 69 72 | 6d 25 20 8c 20 f2 65 6e |%=confir|m% . .en|
|000001c0| 64 63 6f 6e 66 69 72 6d | 0d 00 be 2d 20 20 20 c9 |dconfirm|...- .|
|000001d0| 20 32 3a 20 e7 20 21 65 | 76 65 6e 74 25 3c 3e 63 | 2: . !e|vent%<>c|
|000001e0| 6f 6e 66 69 72 6d 25 20 | 8c 20 f2 65 6e 64 63 6f |onfirm% |. .endco|
|000001f0| 6e 66 69 72 6d 0d 00 c8 | 61 20 20 20 20 20 20 20 |nfirm...|a |
|00000200| 20 20 20 20 f2 6f 70 65 | 6e 28 21 65 76 65 6e 74 | .ope|n(!event|
|00000210| 25 2c 65 76 65 6e 74 25 | 21 34 2c 65 76 65 6e 74 |%,event%|!4,event|
|00000220| 25 21 38 2c 65 76 65 6e | 74 25 21 31 32 2c 65 76 |%!8,even|t%!12,ev|
|00000230| 65 6e 74 25 21 31 36 2c | 65 76 65 6e 74 25 21 32 |ent%!16,|event%!2|
|00000240| 30 2c 65 76 65 6e 74 25 | 21 32 34 2c 65 76 65 6e |0,event%|!24,even|
|00000250| 74 25 21 32 38 29 0d 00 | d2 17 20 20 20 c9 20 33 |t%!28)..|.. . 3|
|00000260| 3a 20 f2 65 6e 64 63 6f | 6e 66 69 72 6d 0d 00 dc |: .endco|nfirm...|
|00000270| 1e 20 20 20 20 20 20 20 | 20 20 20 20 f2 63 6c 6f |. | .clo|
|00000280| 73 65 28 21 65 76 65 6e | 74 25 29 0d 00 e6 4b 20 |se(!even|t%)...K |
|00000290| 20 20 c9 20 36 3a 20 f2 | 6d 6f 75 73 65 28 21 65 | . 6: .|mouse(!e|
|000002a0| 76 65 6e 74 25 2c 65 76 | 65 6e 74 25 21 34 2c 65 |vent%,ev|ent%!4,e|
|000002b0| 76 65 6e 74 25 21 38 2c | 65 76 65 6e 74 25 21 31 |vent%!8,|event%!1|
|000002c0| 32 2c 65 76 65 6e 74 25 | 21 31 36 2c 65 76 65 6e |2,event%|!16,even|
|000002d0| 74 25 21 32 30 29 0d 00 | f0 1a 20 20 20 20 20 20 |t%!20)..|.. |
|000002e0| 20 20 20 20 20 f2 65 6e | 64 63 6f 6e 66 69 72 6d | .en|dconfirm|
|000002f0| 0d 00 fa 2c 20 20 20 c9 | 20 39 3a 20 f2 64 65 63 |..., .| 9: .dec|
|00000300| 6f 64 65 6d 65 6e 75 28 | 6d 65 6e 75 68 61 6e 64 |odemenu(|menuhand|
|00000310| 6c 65 25 2c 20 65 76 65 | 6e 74 25 29 0d 01 04 31 |le%, eve|nt%)...1|
|00000320| 20 20 20 20 20 20 20 20 | 20 20 20 f2 67 65 74 70 | | .getp|
|00000330| 6f 69 6e 74 65 72 3a e7 | 20 62 75 74 74 6f 6e 73 |ointer:.| buttons|
|00000340| 25 80 31 20 8c 20 f2 72 | 65 6d 65 6e 75 0d 01 0e |%.1 . .r|emenu...|
|00000350| 1f 20 20 20 c9 20 31 37 | 2c 31 38 3a f2 72 65 63 |. . 17|,18:.rec|
|00000360| 65 69 76 65 28 65 76 65 | 6e 74 25 29 0d 01 18 1c |eive(eve|nt%)....|
|00000370| 20 20 20 c9 20 31 39 3a | f2 62 6f 75 6e 63 65 64 | . 19:|.bounced|
|00000380| 28 65 76 65 6e 74 25 29 | 0d 01 22 07 20 20 cb 0d |(event%)|..". ..|
|00000390| 01 2c 06 20 cd 0d 01 36 | 05 e1 0d 01 40 05 3a 0d |.,. ...6|....@.:.|
|000003a0| 01 4a 15 dd 20 a4 70 5f | 66 69 65 6c 64 28 73 69 |.J.. .p_|field(si|
|000003b0| 7a 65 25 29 0d 01 54 1c | 20 70 72 69 6e 74 65 72 |ze%)..T.| printer|
|000003c0| 5f 66 69 65 6c 64 25 20 | 2b 3d 20 73 69 7a 65 25 |_field% |+= size%|
|000003d0| 0d 01 5e 1d 20 3d 20 70 | 72 69 6e 74 65 72 5f 66 |..^. = p|rinter_f|
|000003e0| 69 65 6c 64 25 20 2d 20 | 73 69 7a 65 25 0d 01 68 |ield% - |size%..h|
|000003f0| 05 3a 0d 01 72 0b dd 20 | f2 69 6e 69 74 0d 01 7c |.:..r.. |.init..||
|00000400| 07 ea 20 85 0d 01 86 0e | 69 6e 5f 66 69 6c 65 25 |.. .....|in_file%|
|00000410| 3d 30 0d 01 90 0f 6f 75 | 74 5f 66 69 6c 65 25 3d |=0....ou|t_file%=|
|00000420| 30 0d 01 9a 42 f4 20 64 | 65 66 69 6e 65 20 70 72 |0...B. d|efine pr|
|00000430| 69 6e 74 65 72 20 63 6c | 61 73 73 20 69 6e 64 65 |inter cl|ass inde|
|00000440| 70 65 6e 64 65 6e 74 20 | 66 69 65 6c 64 73 20 69 |pendent |fields i|
|00000450| 6e 20 70 72 69 6e 74 65 | 72 20 64 61 74 61 20 61 |n printe|r data a|
|00000460| 72 65 61 0d 01 a4 16 70 | 72 69 6e 74 65 72 5f 66 |rea....p|rinter_f|
|00000470| 69 65 6c 64 25 20 3d 20 | 30 0d 01 ae 27 20 20 6c |ield% = |0...' l|
|00000480| 69 73 74 5f 70 6f 69 6e | 74 65 72 5f 66 69 65 6c |ist_poin|ter_fiel|
|00000490| 64 25 20 3d 20 a4 70 5f | 66 69 65 6c 64 28 34 29 |d% = .p_|field(4)|
|000004a0| 0d 01 b8 27 20 20 20 20 | 20 20 20 20 20 70 78 72 |...' | pxr|
|000004b0| 65 73 5f 66 69 65 6c 64 | 25 20 3d 20 a4 70 5f 66 |es_field|% = .p_f|
|000004c0| 69 65 6c 64 28 34 29 0d | 01 c2 27 20 20 20 20 20 |ield(4).|..' |
|000004d0| 20 20 20 20 70 79 72 65 | 73 5f 66 69 65 6c 64 25 | pyre|s_field%|
|000004e0| 20 3d 20 a4 70 5f 66 69 | 65 6c 64 28 34 29 0d 01 | = .p_fi|eld(4)..|
|000004f0| cc 27 20 20 20 20 20 20 | 66 65 61 74 75 72 65 73 |.' |features|
|00000500| 5f 66 69 65 6c 64 25 20 | 3d 20 a4 70 5f 66 69 65 |_field% |= .p_fie|
|00000510| 6c 64 28 34 29 0d 01 d6 | 27 20 20 20 64 65 73 63 |ld(4)...|' desc|
|00000520| 72 69 70 74 69 6f 6e 5f | 66 69 65 6c 64 25 20 3d |ription_|field% =|
|00000530| 20 a4 70 5f 66 69 65 6c | 64 28 34 29 0d 01 e0 27 | .p_fiel|d(4)...'|
|00000540| 70 78 72 65 73 5f 68 61 | 6c 66 74 6f 6e 65 5f 66 |pxres_ha|lftone_f|
|00000550| 69 65 6c 64 25 20 3d 20 | a4 70 5f 66 69 65 6c 64 |ield% = |.p_field|
|00000560| 28 34 29 0d 01 ea 27 70 | 79 72 65 73 5f 68 61 6c |(4)...'p|yres_hal|
|00000570| 66 74 6f 6e 65 5f 66 69 | 65 6c 64 25 20 3d 20 a4 |ftone_fi|eld% = .|
|00000580| 70 5f 66 69 65 6c 64 28 | 34 29 0d 01 f4 27 70 72 |p_field(|4)...'pr|
|00000590| 69 6e 74 65 72 5f 6e 75 | 6d 62 65 72 5f 66 69 65 |inter_nu|mber_fie|
|000005a0| 6c 64 25 20 3d 20 a4 70 | 5f 66 69 65 6c 64 28 34 |ld% = .p|_field(4|
|000005b0| 29 0d 01 fe 27 20 20 20 | 20 70 61 67 65 5f 77 69 |)...' | page_wi|
|000005c0| 64 74 68 5f 66 69 65 6c | 64 25 20 3d 20 a4 70 5f |dth_fiel|d% = .p_|
|000005d0| 66 69 65 6c 64 28 34 29 | 0d 02 08 27 20 20 20 70 |field(4)|...' p|
|000005e0| 61 67 65 5f 68 65 69 67 | 68 74 5f 66 69 65 6c 64 |age_heig|ht_field|
|000005f0| 25 20 3d 20 a4 70 5f 66 | 69 65 6c 64 28 34 29 0d |% = .p_f|ield(4).|
|00000600| 02 12 27 20 20 20 70 61 | 67 65 5f 62 6f 74 74 6f |..' pa|ge_botto|
|00000610| 6d 5f 66 69 65 6c 64 25 | 20 3d 20 a4 70 5f 66 69 |m_field%| = .p_fi|
|00000620| 65 6c 64 28 34 29 0d 02 | 1c 27 20 20 20 20 20 20 |eld(4)..|.' |
|00000630| 70 61 67 65 5f 74 6f 70 | 5f 66 69 65 6c 64 25 20 |page_top|_field% |
|00000640| 3d 20 a4 70 5f 66 69 65 | 6c 64 28 34 29 0d 02 26 |= .p_fie|ld(4)..&|
|00000650| 27 20 20 20 20 20 70 61 | 67 65 5f 6c 65 66 74 5f |' pa|ge_left_|
|00000660| 66 69 65 6c 64 25 20 3d | 20 a4 70 5f 66 69 65 6c |field% =| .p_fiel|
|00000670| 64 28 34 29 0d 02 30 27 | 20 20 20 20 70 61 67 65 |d(4)..0'| page|
|00000680| 5f 72 69 67 68 74 5f 66 | 69 65 6c 64 25 20 3d 20 |_right_f|ield% = |
|00000690| a4 70 5f 66 69 65 6c 64 | 28 34 29 0d 02 3a 33 f4 |.p_field|(4)..:3.|
|000006a0| 20 64 65 66 69 6e 65 20 | 63 6c 61 73 73 20 69 6e | define |class in|
|000006b0| 64 65 70 65 6e 64 65 6e | 74 20 69 63 6f 6e 73 20 |dependen|t icons |
|000006c0| 69 6e 20 6d 61 69 6e 20 | 77 69 6e 64 6f 77 0d 02 |in main |window..|
|000006d0| 44 19 6d 61 69 6e 5f 64 | 65 73 63 72 69 70 74 69 |D.main_d|escripti|
|000006e0| 6f 6e 25 20 3d 20 31 0d | 02 4e 2f f4 20 6d 61 72 |on% = 1.|.N/. mar|
|000006f0| 6b 20 63 6f 6e 66 69 67 | 75 72 65 20 6f 70 74 69 |k config|ure opti|
|00000700| 6f 6e 73 20 61 73 20 75 | 6e 73 65 74 20 69 6e 69 |ons as u|nset ini|
|00000710| 74 69 61 6c 6c 79 0d 02 | 58 18 20 20 20 70 72 69 |tially..|X. pri|
|00000720| 6e 74 65 72 5f 70 74 72 | 25 20 3d 20 2d 31 0d 02 |nter_ptr|% = -1..|
|00000730| 62 17 70 72 69 6e 74 65 | 72 5f 63 6f 6e 66 69 67 |b.printe|r_config|
|00000740| 25 20 3d 20 30 0d 02 6c | 17 20 20 20 70 72 69 6e |% = 0..l|. prin|
|00000750| 74 65 72 5f 6e 65 77 25 | 20 3d 20 30 0d 02 76 18 |ter_new%| = 0..v.|
|00000760| 20 20 6c 6f 63 61 74 69 | 6f 6e 5f 70 74 72 25 20 | locati|on_ptr% |
|00000770| 3d 20 2d 31 0d 02 80 18 | 20 20 20 20 20 20 62 61 |= -1....| ba|
|00000780| 75 64 5f 70 74 72 25 20 | 3d 20 2d 31 0d 02 8a 18 |ud_ptr% |= -1....|
|00000790| 20 20 20 20 20 20 64 61 | 74 61 5f 70 74 72 25 20 | da|ta_ptr% |
|000007a0| 3d 20 2d 31 0d 02 94 18 | 20 20 20 20 20 20 20 58 |= -1....| X|
|000007b0| 4f 4e 5f 70 74 72 25 20 | 3d 20 2d 31 0d 02 9e 18 |ON_ptr% |= -1....|
|000007c0| 20 20 20 20 73 65 72 76 | 65 72 5f 70 74 72 25 20 | serv|er_ptr% |
|000007d0| 3d 20 2d 31 0d 02 a8 18 | 20 20 20 20 20 20 66 65 |= -1....| fe|
|000007e0| 65 64 5f 70 74 72 25 20 | 3d 20 2d 31 0d 02 b2 14 |ed_ptr% |= -1....|
|000007f0| f4 20 6d 65 73 73 61 67 | 65 20 76 61 6c 75 65 73 |. messag|e values|
|00000800| 0d 02 bc 22 4d 65 73 73 | 61 67 65 5f 50 72 69 6e |..."Mess|age_Prin|
|00000810| 74 46 69 6c 65 25 20 20 | 20 20 20 3d 26 38 30 31 |tFile% | =&801|
|00000820| 34 30 0d 02 c6 22 4d 65 | 73 73 61 67 65 5f 57 69 |40..."Me|ssage_Wi|
|00000830| 6c 6c 50 72 69 6e 74 25 | 20 20 20 20 20 3d 26 38 |llPrint%| =&8|
|00000840| 30 31 34 31 0d 02 d0 22 | 4d 65 73 73 61 67 65 5f |0141..."|Message_|
|00000850| 50 72 69 6e 74 53 61 76 | 65 25 20 20 20 20 20 3d |PrintSav|e% =|
|00000860| 26 38 30 31 34 32 0d 02 | da 22 4d 65 73 73 61 67 |&80142..|."Messag|
|00000870| 65 5f 50 72 69 6e 74 49 | 6e 69 74 25 20 20 20 20 |e_PrintI|nit% |
|00000880| 20 3d 26 38 30 31 34 33 | 0d 02 e4 22 4d 65 73 73 | =&80143|..."Mess|
|00000890| 61 67 65 5f 50 72 69 6e | 74 42 75 73 79 25 20 20 |age_Prin|tBusy% |
|000008a0| 20 20 20 3d 26 38 30 31 | 34 34 0d 02 ee 22 4d 65 | =&801|44..."Me|
|000008b0| 73 73 61 67 65 5f 50 72 | 69 6e 74 54 79 70 65 4f |ssage_Pr|intTypeO|
|000008c0| 64 64 25 20 20 3d 26 38 | 30 31 34 35 0d 02 f8 22 |dd% =&8|0145..."|
|000008d0| 4d 65 73 73 61 67 65 5f | 50 72 69 6e 74 54 79 70 |Message_|PrintTyp|
|000008e0| 65 4b 6e 6f 77 6e 25 3d | 26 38 30 31 34 36 0d 03 |eKnown%=|&80146..|
|000008f0| 02 22 4d 65 73 73 61 67 | 65 5f 53 65 74 50 72 69 |."Messag|e_SetPri|
|00000900| 6e 74 65 72 25 20 20 20 | 20 3d 26 38 30 31 34 37 |nter% | =&80147|
|00000910| 0d 03 0c 1d f4 20 64 69 | 6d 65 6e 73 69 6f 6e 20 |..... di|mension |
|00000920| 73 79 73 74 65 6d 20 61 | 72 72 61 79 73 0d 03 16 |system a|rrays...|
|00000930| 0d de 20 71 25 20 26 38 | 30 30 0d 03 20 11 de 20 |.. q% &8|00.. .. |
|00000940| 65 76 65 6e 74 25 20 26 | 38 30 30 0d 03 2a 10 6d |event% &|800..*.m|
|00000950| 61 78 62 75 66 25 3d 26 | 38 30 30 0d 03 34 30 de |axbuf%=&|800..40.|
|00000960| 20 63 75 72 62 75 66 25 | 20 6d 61 78 62 75 66 25 | curbuf%| maxbuf%|
|00000970| 3a 20 65 6e 64 62 75 66 | 25 20 3d 20 63 75 72 62 |: endbuf|% = curb|
|00000980| 75 66 25 2b 6d 61 78 62 | 75 66 25 0d 03 3e 2f de |uf%+maxb|uf%..>/.|
|00000990| 20 6d 65 6e 75 66 72 65 | 65 25 20 26 38 30 30 3a | menufre|e% &800:|
|000009a0| 20 6d 65 6e 75 65 6e 64 | 25 20 3d 20 6d 65 6e 75 | menuend|% = menu|
|000009b0| 66 72 65 65 25 2b 26 38 | 30 30 0d 03 48 12 de 20 |free%+&8|00..H.. |
|000009c0| 69 63 6f 6e 5f 62 75 66 | 25 20 34 30 0d 03 52 27 |icon_buf|% 40..R'|
|000009d0| de 20 74 65 78 74 5f 62 | 75 66 66 65 72 25 20 31 |. text_b|uffer% 1|
|000009e0| 32 2c 20 76 61 6c 69 64 | 5f 62 75 66 66 65 72 25 |2, valid|_buffer%|
|000009f0| 20 31 32 0d 03 5c 0f de | 20 62 6c 6f 63 6b 25 20 | 12..\..| block% |
|00000a00| 32 30 0d 03 66 14 de 20 | 65 72 72 6f 72 5f 62 6c |20..f.. |error_bl|
|00000a10| 6b 25 20 32 35 36 0d 03 | 70 0e de 20 6d 73 67 25 |k% 256..|p.. msg%|
|00000a20| 20 32 35 36 0d 03 7a 0e | 62 75 66 73 7a 25 3d 32 | 256..z.|bufsz%=2|
|00000a30| 35 36 0d 03 84 11 de 20 | 62 75 66 25 20 62 75 66 |56..... |buf% buf|
|00000a40| 73 7a 25 0d 03 8e 14 f4 | 20 73 65 74 20 75 70 20 |sz%.....| set up |
|00000a50| 63 6f 6c 6f 75 72 73 0d | 03 98 21 60 77 62 63 6f |colours.|..!`wbco|
|00000a60| 6c 3d 26 30 3a 60 77 66 | 63 6f 6c 3d 26 37 3a 60 |l=&0:`wf|col=&7:`|
|00000a70| 74 66 63 6f 6c 3d 26 37 | 0d 03 a2 18 f4 20 69 6e |tfcol=&7|..... in|
|00000a80| 69 74 69 61 6c 20 6d 61 | 73 6b 20 73 74 61 74 65 |itial ma|sk state|
|00000a90| 0d 03 ac 2f 70 6f 6c 6c | 5f 6d 61 73 6b 25 20 3d |.../poll|_mask% =|
|00000aa0| 20 ac 28 25 31 31 31 20 | 3c 3c 20 31 37 29 3a 20 | .(%111 |<< 17): |
|00000ab0| f4 20 6f 6e 6c 79 20 6d | 65 73 73 61 67 65 73 0d |. only m|essages.|
|00000ac0| 03 b6 3a 63 6f 6e 66 69 | 72 6d 5f 61 6e 73 77 65 |..:confi|rm_answe|
|00000ad0| 72 25 20 3d 20 30 20 3a | 20 f4 20 6e 6f 74 20 69 |r% = 0 :| . not i|
|00000ae0| 6e 73 69 64 65 20 46 4e | 63 6f 6e 66 69 72 6d 20 |nside FN|confirm |
|00000af0| 63 75 72 72 65 6e 74 6c | 79 0d 03 c0 17 f2 50 72 |currentl|y.....Pr|
|00000b00| 69 6e 74 65 72 5f 69 6e | 69 74 69 61 6c 69 73 65 |inter_in|itialise|
|00000b10| 0d 03 ca 1a 50 72 69 6e | 74 65 72 24 3d 50 72 69 |....Prin|ter$=Pri|
|00000b20| 6e 74 65 72 43 6c 61 73 | 73 24 0d 03 d4 11 73 61 |nterClas|s$....sa|
|00000b30| 76 65 5f 6e 61 6d 65 24 | 3d 22 22 0d 03 de 10 70 |ve_name$|=""....p|
|00000b40| 72 69 6e 74 5f 72 65 66 | 25 3d 30 0d 03 e8 16 f4 |rint_ref|%=0.....|
|00000b50| 20 20 49 6e 69 74 69 61 | 6c 69 73 65 20 57 49 4d | Initia|lise WIM|
|00000b60| 50 0d 03 f2 20 de 20 74 | 61 73 6b 69 64 25 20 35 |P... . t|askid% 5|
|00000b70| 3a 20 24 74 61 73 6b 69 | 64 25 3d 22 54 41 53 4b |: $taski|d%="TASK|
|00000b80| 22 0d 03 fc 3e c8 99 20 | 22 57 69 6d 70 5f 49 6e |"...>.. |"Wimp_In|
|00000b90| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 21 74 |itialise|",200,!t|
|00000ba0| 61 73 6b 69 64 25 2c 50 | 72 69 6e 74 65 72 24 20 |askid%,P|rinter$ |
|00000bb0| b8 20 2c 74 61 73 6b 5f | 68 61 6e 64 6c 65 25 0d |. ,task_|handle%.|
|00000bc0| 04 06 22 ee 20 85 20 ea | 20 f2 65 72 72 6f 72 28 |..". . .| .error(|
|00000bd0| 9f 2c 20 f6 24 29 3a f2 | 74 65 72 6d 69 6e 61 74 |., .$):.|terminat|
|00000be0| 65 0d 04 10 0d 6d 73 67 | 25 21 30 3d 32 30 0d 04 |e....msg|%!0=20..|
|00000bf0| 1a 0d 6d 73 67 25 21 31 | 32 3d 30 0d 04 24 1e 6d |..msg%!1|2=0..$.m|
|00000c00| 73 67 25 21 31 36 3d 4d | 65 73 73 61 67 65 5f 50 |sg%!16=M|essage_P|
|00000c10| 72 69 6e 74 49 6e 69 74 | 25 0d 04 2e 26 c8 99 20 |rintInit|%...&.. |
|00000c20| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00000c30| 65 22 2c 20 31 38 2c 20 | 6d 73 67 25 2c 20 30 0d |e", 18, |msg%, 0.|
|00000c40| 04 38 05 e1 0d 04 42 05 | 3a 0d 04 4c 0c dd 20 f2 |.8....B.|:..L.. .|
|00000c50| 69 6e 69 74 32 0d 04 56 | 08 ea 20 53 24 0d 04 60 |init2..V|.. S$..`|
|00000c60| 07 ea 20 85 0d 04 6a 1c | f4 20 6c 6f 61 64 20 74 |.. ...j.|. load t|
|00000c70| 68 65 20 74 65 6d 70 6c | 61 74 65 20 66 69 6c 65 |he templ|ate file|
|00000c80| 0d 04 74 35 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |..t5.. "|Wimp_Ope|
|00000c90| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 22 3c 50 44 |nTemplat|e",,"<PD|
|00000ca0| 72 69 76 65 72 24 64 69 | 72 3e 2e 54 65 6d 70 6c |river$di|r>.Templ|
|00000cb0| 61 74 65 73 22 0d 04 7e | 1b 6d 61 69 6e 25 20 3d |ates"..~|.main% =|
|00000cc0| 20 a4 77 69 6e 64 6f 77 | 28 22 6d 61 69 6e 22 29 | .window|("main")|
|00000cd0| 0d 04 88 21 63 6f 6e 66 | 69 72 6d 25 20 3d 20 a4 |...!conf|irm% = .|
|00000ce0| 77 69 6e 64 6f 77 28 22 | 63 6f 6e 66 69 72 6d 22 |window("|confirm"|
|00000cf0| 29 0d 04 92 1b 69 6e 66 | 6f 25 20 3d 20 a4 77 69 |)....inf|o% = .wi|
|00000d00| 6e 64 6f 77 28 22 69 6e | 66 6f 22 29 0d 04 9c 1b |ndow("in|fo")....|
|00000d10| f2 50 72 69 6e 74 65 72 | 5f 6c 6f 61 64 5f 74 65 |.Printer|_load_te|
|00000d20| 6d 70 6c 61 74 65 73 0d | 04 a6 1b c8 99 20 22 57 |mplates.|..... "W|
|00000d30| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00000d40| 65 22 0d 04 b0 16 70 72 | 69 6e 74 65 72 5f 74 79 |e"....pr|inter_ty|
|00000d50| 70 65 24 20 3d 20 22 22 | 0d 04 ba 15 69 63 70 72 |pe$ = ""|....icpr|
|00000d60| 69 6e 74 25 3d a4 69 63 | 6f 6e 62 61 72 0d 04 c4 |int%=.ic|onbar...|
|00000d70| 1a f4 20 63 72 65 61 74 | 65 20 74 68 65 20 6d 65 |.. creat|e the me|
|00000d80| 6e 75 20 74 72 65 65 0d | 04 ce 13 de 20 73 65 72 |nu tree.|.... ser|
|00000d90| 76 65 72 5f 6e 65 77 25 | 20 38 0d 04 d8 15 24 73 |ver_new%| 8....$s|
|00000da0| 65 72 76 65 72 5f 6e 65 | 77 25 20 3d 20 22 22 0d |erver_ne|w% = "".|
|00000db0| 04 e2 14 de 20 66 69 6c | 65 5f 6e 61 6d 65 25 20 |.... fil|e_name% |
|00000dc0| 32 30 31 0d 04 ec 3d c8 | 99 20 22 58 4f 53 5f 52 |201...=.|. "XOS_R|
|00000dd0| 65 61 64 56 61 72 56 61 | 6c 22 2c 22 50 72 69 6e |eadVarVa|l","Prin|
|00000de0| 74 65 72 54 79 70 65 24 | 35 22 2c 66 69 6c 65 5f |terType$|5",file_|
|00000df0| 6e 61 6d 65 25 2c 32 30 | 30 20 b8 20 2c 2c 4c 25 |name%,20|0 . ,,L%|
|00000e00| 0d 04 f6 0a e7 20 4c 25 | 20 8c 0d 05 00 17 20 66 |..... L%| ..... f|
|00000e10| 69 6c 65 5f 6e 61 6d 65 | 25 3f 4c 25 20 3d 20 31 |ile_name|%?L% = 1|
|00000e20| 33 0d 05 0a 05 cc 0d 05 | 14 2c 20 24 66 69 6c 65 |3.......|., $file|
|00000e30| 5f 6e 61 6d 65 25 3d 22 | 3c 50 44 72 69 76 65 72 |_name%="|<PDriver|
|00000e40| 24 44 69 72 3e 2e 5e 2e | 50 72 69 6e 74 44 61 74 |$Dir>.^.|PrintDat|
|00000e50| 61 22 0d 05 1e 05 cd 0d | 05 28 62 62 61 75 64 6d |a"......|.(bbaudm|
|00000e60| 25 20 3d 20 a4 63 72 6d | 65 6e 75 28 22 23 42 61 |% = .crm|enu("#Ba|
|00000e70| 75 64 3b 37 35 3b 31 35 | 30 3b 33 30 30 3b 31 32 |ud;75;15|0;300;12|
|00000e80| 30 30 3b 32 34 30 30 3b | 34 38 30 30 3b 39 36 30 |00;2400;|4800;960|
|00000e90| 30 3b 31 39 32 30 30 3b | 35 30 3b 31 31 30 3b 31 |0;19200;|50;110;1|
|00000ea0| 33 34 2e 35 3b 36 30 30 | 3b 31 38 30 30 3b 33 36 |34.5;600|;1800;36|
|00000eb0| 30 30 3b 37 32 30 30 22 | 29 0d 05 32 25 62 69 74 |00;7200"|)..2%bit|
|00000ec0| 73 6d 25 20 3d 20 a4 63 | 72 6d 65 6e 75 28 22 23 |sm% = .c|rmenu("#|
|00000ed0| 42 69 74 73 3b 35 3b 36 | 3b 37 3b 38 22 29 0d 05 |Bits;5;6|;7;8")..|
|00000ee0| 3c 3e 70 61 72 69 74 79 | 6d 25 20 3d 20 a4 63 72 |<>parity|m% = .cr|
|00000ef0| 6d 65 6e 75 28 22 23 50 | 61 72 69 74 79 3b 6f 66 |menu("#P|arity;of|
|00000f00| 66 3b 6f 64 64 3b 65 76 | 65 6e 3b 31 20 6f 6e 20 |f;odd;ev|en;1 on |
|00000f10| 54 58 3b 30 20 6f 6e 20 | 54 58 22 29 0d 05 46 53 |TX;0 on |TX")..FS|
|00000f20| 73 74 6f 70 6d 25 20 3d | 20 a4 63 72 6d 65 6e 75 |stopm% =| .crmenu|
|00000f30| 28 22 23 53 74 6f 70 20 | 62 69 74 73 3b 31 3b 32 |("#Stop |bits;1;2|
|00000f40| 20 28 31 2e 35 20 69 66 | 20 35 20 62 69 74 73 20 | (1.5 if| 5 bits |
|00000f50| 70 61 72 69 74 79 2c 31 | 20 69 66 20 38 20 62 69 |parity,1| if 8 bi|
|00000f60| 74 73 20 6e 6f 20 70 61 | 72 69 74 79 29 22 29 0d |ts no pa|rity)").|
|00000f70| 05 50 51 64 61 74 61 6d | 25 20 3d 20 a4 63 72 6d |.PQdatam|% = .crm|
|00000f80| 65 6e 75 28 22 23 44 61 | 74 61 20 66 6f 72 6d 61 |enu("#Da|ta forma|
|00000f90| 74 3b 42 69 74 73 3e 62 | 69 74 73 6d 25 3b 50 61 |t;Bits>b|itsm%;Pa|
|00000fa0| 72 69 74 79 3e 70 61 72 | 69 74 79 6d 25 3b 53 74 |rity>par|itym%;St|
|00000fb0| 6f 70 20 62 69 74 73 3e | 73 74 6f 70 6d 25 22 29 |op bits>|stopm%")|
|00000fc0| 0d 05 5a 50 73 65 72 69 | 61 6c 6d 25 20 3d 20 a4 |..ZPseri|alm% = .|
|00000fd0| 63 72 6d 65 6e 75 28 22 | 23 53 65 72 69 61 6c 3b |crmenu("|#Serial;|
|00000fe0| 42 61 75 64 20 72 61 74 | 65 3e 62 61 75 64 6d 25 |Baud rat|e>baudm%|
|00000ff0| 3b 44 61 74 61 20 66 6f | 72 6d 61 74 3e 64 61 74 |;Data fo|rmat>dat|
|00001000| 61 6d 25 3b 58 4f 4e 20 | 2f 20 58 4f 46 46 22 29 |am%;XON |/ XOFF")|
|00001010| 0d 05 64 36 6e 65 74 70 | 72 69 6e 74 6d 25 20 3d |..d6netp|rintm% =|
|00001020| 20 a4 63 72 6d 65 6e 75 | 28 22 23 4e 65 74 20 70 | .crmenu|("#Net p|
|00001030| 72 69 6e 74 3b 24 73 65 | 72 76 65 72 5f 6e 65 77 |rint;$se|rver_new|
|00001040| 25 28 38 29 22 29 0d 05 | 6e 36 66 69 6c 65 6d 65 |%(8)")..|n6fileme|
|00001050| 6e 75 25 20 3d 20 a4 63 | 72 6d 65 6e 75 28 22 23 |nu% = .c|rmenu("#|
|00001060| 46 69 6c 65 20 6e 61 6d | 65 3b 24 66 69 6c 65 5f |File nam|e;$file_|
|00001070| 6e 61 6d 65 25 28 32 30 | 30 29 22 29 0d 05 78 91 |name%(20|0)")..x.|
|00001080| 70 72 69 6e 74 6d 65 6e | 75 25 20 3d 20 a4 63 72 |printmen|u% = .cr|
|00001090| 6d 65 6e 75 28 22 23 22 | 2b 50 72 69 6e 74 65 72 |menu("#"|+Printer|
|000010a0| 24 2b 22 3b 49 6e 66 6f | 3e 69 6e 66 6f 25 23 3b |$+";Info|>info%#;|
|000010b0| 50 61 72 61 6c 6c 65 6c | 3b 53 65 72 69 61 6c 3e |Parallel|;Serial>|
|000010c0| 73 65 72 69 61 6c 6d 25 | 3b 4e 65 74 77 6f 72 6b |serialm%|;Network|
|000010d0| 3e 6e 65 74 70 72 69 6e | 74 6d 25 3b 46 69 6c 65 |>netprin|tm%;File|
|000010e0| 3e 66 69 6c 65 6d 65 6e | 75 25 23 3b 53 61 76 65 |>filemen|u%#;Save|
|000010f0| 20 63 68 6f 69 63 65 73 | 3b 53 74 6f 70 20 70 72 | choices|;Stop pr|
|00001100| 69 6e 74 69 6e 67 3b 51 | 75 69 74 22 29 0d 05 82 |inting;Q|uit")...|
|00001110| 17 f2 73 65 74 5f 70 72 | 69 6e 74 5f 73 74 61 74 |..set_pr|int_stat|
|00001120| 65 28 a3 29 0d 05 8c 0d | f2 64 65 66 61 75 6c 74 |e(.)....|.default|
|00001130| 73 0d 05 96 1e f2 50 72 | 69 6e 74 65 72 5f 73 65 |s.....Pr|inter_se|
|00001140| 74 5f 69 6e 69 74 69 61 | 6c 5f 73 74 61 74 65 0d |t_initia|l_state.|
|00001150| 05 a0 19 ee 20 85 20 ea | 20 f2 65 72 72 6f 72 28 |.... . .| .error(|
|00001160| 9f 2c 20 f6 24 29 3a e1 | 0d 05 aa 10 f2 63 68 61 |., .$):.|.....cha|
|00001170| 6e 67 65 5f 69 63 6f 6e | 0d 05 b4 05 e1 0d 05 be |nge_icon|........|
|00001180| 05 3a 0d 05 c8 11 dd 20 | f2 53 61 76 65 43 6f 6e |.:..... |.SaveCon|
|00001190| 66 69 67 0d 05 d2 25 6f | 75 74 5f 66 69 6c 65 25 |fig...%o|ut_file%|
|000011a0| 3d ad 22 3c 50 44 72 69 | 76 65 72 24 64 69 72 3e |=."<PDri|ver$dir>|
|000011b0| 2e 50 72 44 61 74 61 22 | 0d 05 dc 1a e7 20 70 72 |.PrData"|..... pr|
|000011c0| 69 6e 74 65 72 5f 70 74 | 72 25 20 3c 3e 20 2d 31 |inter_pt|r% <> -1|
|000011d0| 20 8c 0d 05 e6 28 20 e7 | 20 70 72 69 6e 74 65 72 | ....( .| printer|
|000011e0| 5f 63 6f 6e 66 69 67 25 | 20 3c 3e 20 70 72 69 6e |_config%| <> prin|
|000011f0| 74 65 72 5f 6e 65 77 25 | 20 8c 0d 05 f0 20 20 20 |ter_new%| .... |
|00001200| cf 23 6f 75 74 5f 66 69 | 6c 65 25 20 3d 20 70 72 |.#out_fi|le% = pr|
|00001210| 69 6e 74 65 72 5f 70 74 | 72 25 0d 05 fa 28 20 20 |inter_pt|r%...( |
|00001220| d5 23 6f 75 74 5f 66 69 | 6c 65 25 2c c2 22 30 22 |.#out_fi|le%,."0"|
|00001230| 2b c3 70 72 69 6e 74 65 | 72 5f 6e 65 77 25 2c 32 |+.printe|r_new%,2|
|00001240| 29 3b 0d 06 04 24 20 20 | 70 72 69 6e 74 65 72 5f |);...$ |printer_|
|00001250| 63 6f 6e 66 69 67 25 20 | 3d 20 70 72 69 6e 74 65 |config% |= printe|
|00001260| 72 5f 6e 65 77 25 0d 06 | 0e 06 20 cd 0d 06 18 05 |r_new%..|.. .....|
|00001270| cd 0d 06 22 3d e7 20 6c | 6f 63 61 74 69 6f 6e 5f |..."=. l|ocation_|
|00001280| 6e 65 77 25 3d 35 20 80 | 20 a4 6c 6f 77 65 72 63 |new%=5 .| .lowerc|
|00001290| 61 73 65 28 c0 24 66 69 | 6c 65 5f 6e 61 6d 65 25 |ase(.$fi|le_name%|
|000012a0| 2c 35 29 29 3d 22 6e 75 | 6c 6c 3a 22 20 8c 0d 06 |,5))="nu|ll:" ...|
|000012b0| 2c 2a 20 e7 20 6c 6f 63 | 61 74 69 6f 6e 5f 63 6f |,* . loc|ation_co|
|000012c0| 6e 66 69 67 25 20 3c 3e | 20 6c 6f 63 61 74 69 6f |nfig% <>| locatio|
|000012d0| 6e 5f 6e 65 77 25 20 8c | 0d 06 36 1d 20 20 e7 20 |n_new% .|..6. . |
|000012e0| 6c 6f 63 61 74 69 6f 6e | 5f 70 74 72 25 20 3c 3e |location|_ptr% <>|
|000012f0| 20 2d 31 20 8c 0d 06 40 | 22 20 20 20 cf 23 6f 75 | -1 ...@|" .#ou|
|00001300| 74 5f 66 69 6c 65 25 20 | 3d 20 6c 6f 63 61 74 69 |t_file% |= locati|
|00001310| 6f 6e 5f 70 74 72 25 0d | 06 4a 17 20 20 20 d5 23 |on_ptr%.|.J. .#|
|00001320| 6f 75 74 5f 66 69 6c 65 | 25 2c 22 30 22 3b 0d 06 |out_file|%,"0";..|
|00001330| 54 07 20 20 cd 0d 06 5e | 24 20 20 6c 6f 63 61 74 |T. ...^|$ locat|
|00001340| 69 6f 6e 5f 63 6f 6e 66 | 69 67 25 3d 6c 6f 63 61 |ion_conf|ig%=loca|
|00001350| 74 69 6f 6e 5f 6e 65 77 | 25 0d 06 68 06 20 cd 0d |tion_new|%..h. ..|
|00001360| 06 72 23 20 c8 99 22 4f | 53 5f 43 4c 49 22 2c 22 |.r# .."O|S_CLI","|
|00001370| 43 6f 6e 66 69 67 75 72 | 65 20 50 72 69 6e 74 20 |Configur|e Print |
|00001380| 30 22 0d 06 7c 05 cc 0d | 06 86 2a 20 e7 20 6c 6f |0"..|...|..* . lo|
|00001390| 63 61 74 69 6f 6e 5f 63 | 6f 6e 66 69 67 25 20 3c |cation_c|onfig% <|
|000013a0| 3e 20 6c 6f 63 61 74 69 | 6f 6e 5f 6e 65 77 25 20 |> locati|on_new% |
|000013b0| 8c 0d 06 90 1d 20 20 e7 | 20 6c 6f 63 61 74 69 6f |..... .| locatio|
|000013c0| 6e 5f 70 74 72 25 20 3c | 3e 20 2d 31 20 8c 0d 06 |n_ptr% <|> -1 ...|
|000013d0| 9a 22 20 20 20 cf 23 6f | 75 74 5f 66 69 6c 65 25 |." .#o|ut_file%|
|000013e0| 20 3d 20 6c 6f 63 61 74 | 69 6f 6e 5f 70 74 72 25 | = locat|ion_ptr%|
|000013f0| 0d 06 a4 22 20 20 20 d5 | 23 6f 75 74 5f 66 69 6c |..." .|#out_fil|
|00001400| 65 25 2c c3 6c 6f 63 61 | 74 69 6f 6e 5f 6e 65 77 |e%,.loca|tion_new|
|00001410| 25 3b 0d 06 ae 07 20 20 | cd 0d 06 b8 24 20 20 6c |%;.... |....$ l|
|00001420| 6f 63 61 74 69 6f 6e 5f | 63 6f 6e 66 69 67 25 3d |ocation_|config%=|
|00001430| 6c 6f 63 61 74 69 6f 6e | 5f 6e 65 77 25 0d 06 c2 |location|_new%...|
|00001440| 06 20 cd 0d 06 cc 32 20 | c8 99 22 58 4f 53 5f 43 |. ....2 |.."XOS_C|
|00001450| 4c 49 22 2c 22 43 6f 6e | 66 69 67 75 72 65 20 50 |LI","Con|figure P|
|00001460| 72 69 6e 74 20 22 2b c3 | 6c 6f 63 61 74 69 6f 6e |rint "+.|location|
|00001470| 5f 6e 65 77 25 0d 06 d6 | 05 cd 0d 06 e0 21 e7 20 |_new%...|.....!. |
|00001480| 62 61 75 64 5f 63 6f 6e | 66 69 67 25 20 3c 3e 20 |baud_con|fig% <> |
|00001490| 62 61 75 64 5f 6e 65 77 | 25 20 8c 0d 06 ea 18 20 |baud_new|% ..... |
|000014a0| e7 20 62 61 75 64 5f 70 | 74 72 25 20 3c 3e 20 2d |. baud_p|tr% <> -|
|000014b0| 31 20 8c 0d 06 f4 1b 20 | 20 cf 23 6f 75 74 5f 66 |1 ..... | .#out_f|
|000014c0| 69 6c 65 25 3d 62 61 75 | 64 5f 70 74 72 25 0d 06 |ile%=bau|d_ptr%..|
|000014d0| fe 1d 20 20 d5 23 6f 75 | 74 5f 66 69 6c 65 25 2c |.. .#ou|t_file%,|
|000014e0| c3 62 61 75 64 5f 6e 65 | 77 25 3b 0d 07 08 06 20 |.baud_ne|w%;.... |
|000014f0| cd 0d 07 12 1d 20 62 61 | 75 64 5f 63 6f 6e 66 69 |..... ba|ud_confi|
|00001500| 67 25 20 3d 20 62 61 75 | 64 5f 6e 65 77 25 0d 07 |g% = bau|d_new%..|
|00001510| 1c 05 cd 0d 07 26 52 e7 | 20 6c 6f 63 61 74 69 6f |.....&R.| locatio|
|00001520| 6e 5f 6e 65 77 25 3d 32 | 20 80 20 62 61 75 64 5f |n_new%=2| . baud_|
|00001530| 6e 65 77 25 3c 3d 37 20 | 8c 20 c8 99 22 4f 53 5f |new%<=7 |. .."OS_|
|00001540| 43 4c 49 22 2c 22 43 6f | 6e 66 69 67 75 72 65 20 |CLI","Co|nfigure |
|00001550| 42 61 75 64 20 22 2b c3 | 28 62 61 75 64 5f 6e 65 |Baud "+.|(baud_ne|
|00001560| 77 25 2b 31 29 0d 07 30 | 21 e7 20 64 61 74 61 5f |w%+1)..0|!. data_|
|00001570| 63 6f 6e 66 69 67 25 20 | 3c 3e 20 64 61 74 61 5f |config% |<> data_|
|00001580| 6e 65 77 25 20 8c 0d 07 | 3a 18 20 e7 20 64 61 74 |new% ...|:. . dat|
|00001590| 61 5f 70 74 72 25 20 3c | 3e 20 2d 31 20 8c 0d 07 |a_ptr% <|> -1 ...|
|000015a0| 44 1b 20 20 cf 23 6f 75 | 74 5f 66 69 6c 65 25 3d |D. .#ou|t_file%=|
|000015b0| 64 61 74 61 5f 70 74 72 | 25 0d 07 4e 28 20 20 41 |data_ptr|%..N( A|
|000015c0| 24 3d c3 7e 28 64 61 74 | 61 5f 6e 65 77 25 29 3a |$=.~(dat|a_new%):|
|000015d0| e7 20 a9 41 24 3d 31 20 | 41 24 3d 22 30 22 2b 41 |. .A$=1 |A$="0"+A|
|000015e0| 24 0d 07 58 19 20 20 d5 | 23 6f 75 74 5f 66 69 6c |$..X. .|#out_fil|
|000015f0| 65 25 2c 22 26 22 2b 41 | 24 3b 0d 07 62 06 20 cd |e%,"&"+A|$;..b. .|
|00001600| 0d 07 6c 1d 20 64 61 74 | 61 5f 63 6f 6e 66 69 67 |..l. dat|a_config|
|00001610| 25 20 3d 20 64 61 74 61 | 5f 6e 65 77 25 0d 07 76 |% = data|_new%..v|
|00001620| 05 cd 0d 07 80 1f e7 20 | 58 4f 4e 5f 63 6f 6e 66 |....... |XON_conf|
|00001630| 69 67 25 20 3c 3e 20 58 | 4f 4e 5f 6e 65 77 25 20 |ig% <> X|ON_new% |
|00001640| 8c 0d 07 8a 17 20 e7 20 | 58 4f 4e 5f 70 74 72 25 |..... . |XON_ptr%|
|00001650| 20 3c 3e 20 2d 31 20 8c | 0d 07 94 1a 20 20 cf 23 | <> -1 .|.... .#|
|00001660| 6f 75 74 5f 66 69 6c 65 | 25 3d 58 4f 4e 5f 70 74 |out_file|%=XON_pt|
|00001670| 72 25 0d 07 9e 1c 20 20 | d5 23 6f 75 74 5f 66 69 |r%.... |.#out_fi|
|00001680| 6c 65 25 2c c3 58 4f 4e | 5f 6e 65 77 25 3b 0d 07 |le%,.XON|_new%;..|
|00001690| a8 06 20 cd 0d 07 b2 1b | 20 58 4f 4e 5f 63 6f 6e |.. .....| XON_con|
|000016a0| 66 69 67 25 20 3d 20 58 | 4f 4e 5f 6e 65 77 25 0d |fig% = X|ON_new%.|
|000016b0| 07 bc 05 cd 0d 07 c6 26 | e7 20 73 65 72 76 65 72 |.......&|. server|
|000016c0| 5f 63 6f 6e 66 69 67 24 | 20 3c 3e 20 24 73 65 72 |_config$| <> $ser|
|000016d0| 76 65 72 5f 6e 65 77 25 | 20 8c 0d 07 d0 1a 20 e7 |ver_new%| ..... .|
|000016e0| 20 73 65 72 76 65 72 5f | 70 74 72 25 20 3c 3e 20 | server_|ptr% <> |
|000016f0| 2d 31 20 8c 0d 07 da 1d | 20 20 cf 23 6f 75 74 5f |-1 .....| .#out_|
|00001700| 66 69 6c 65 25 3d 73 65 | 72 76 65 72 5f 70 74 72 |file%=se|rver_ptr|
|00001710| 25 0d 07 e4 35 20 20 d5 | 23 6f 75 74 5f 66 69 6c |%...5 .|#out_fil|
|00001720| 65 25 2c 24 73 65 72 76 | 65 72 5f 6e 65 77 25 2b |e%,$serv|er_new%+|
|00001730| c4 38 2d a9 24 73 65 72 | 76 65 72 5f 6e 65 77 25 |.8-.$ser|ver_new%|
|00001740| 2c 22 3b 22 29 3b 0d 07 | ee 06 20 cd 0d 07 f8 22 |,";");..|.. ...."|
|00001750| 20 73 65 72 76 65 72 5f | 63 6f 6e 66 69 67 24 20 | server_|config$ |
|00001760| 3d 20 24 73 65 72 76 65 | 72 5f 6e 65 77 25 0d 08 |= $serve|r_new%..|
|00001770| 02 05 cd 0d 08 0c 17 e7 | 20 6c 6f 63 61 74 69 6f |........| locatio|
|00001780| 6e 5f 6e 65 77 25 3d 34 | 20 8c 0d 08 16 2d 20 c8 |n_new%=4| ....- .|
|00001790| 99 22 58 4f 53 5f 43 4c | 49 22 2c 22 43 6f 6e 66 |."XOS_CL|I","Conf|
|000017a0| 69 67 75 72 65 20 50 53 | 20 22 2b 24 73 65 72 76 |igure PS| "+$serv|
|000017b0| 65 72 5f 6e 65 77 25 0d | 08 20 23 20 c8 99 22 58 |er_new%.|. # .."X|
|000017c0| 4f 53 5f 43 4c 49 22 2c | 22 50 53 20 22 2b 24 73 |OS_CLI",|"PS "+$s|
|000017d0| 65 72 76 65 72 5f 6e 65 | 77 25 0d 08 2a 05 cd 0d |erver_ne|w%..*...|
|000017e0| 08 34 18 f2 50 72 69 6e | 74 65 72 5f 41 6d 65 6e |.4..Prin|ter_Amen|
|000017f0| 64 43 6f 6e 66 69 67 0d | 08 3e 1b d9 23 6f 75 74 |dConfig.|.>..#out|
|00001800| 5f 66 69 6c 65 25 3a 6f | 75 74 5f 66 69 6c 65 25 |_file%:o|ut_file%|
|00001810| 3d 30 0d 08 48 05 e1 0d | 08 52 05 3a 0d 08 5c 0f |=0..H...|.R.:..\.|
|00001820| dd f2 74 65 72 6d 69 6e | 61 74 65 0d 08 66 14 2a |..termin|ate..f.*|
|00001830| 75 6e 73 65 74 20 24 50 | 72 69 6e 74 69 6e 67 0d |unset $P|rinting.|
|00001840| 08 70 1c ee 20 85 20 c8 | 99 22 57 69 6d 70 5f 43 |.p.. . .|."Wimp_C|
|00001850| 6c 6f 73 65 44 6f 77 6e | 22 3a e0 0d 08 7a 16 f2 |loseDown|":...z..|
|00001860| 50 72 69 6e 74 65 72 5f | 74 65 72 6d 69 6e 61 74 |Printer_|terminat|
|00001870| 65 0d 08 84 34 e7 20 69 | 6e 5f 66 69 6c 65 25 3c |e...4. i|n_file%<|
|00001880| 3e 30 20 c8 99 22 58 4f | 53 5f 46 69 6e 64 22 2c |>0 .."XO|S_Find",|
|00001890| 30 2c 69 6e 5f 66 69 6c | 65 25 3a 69 6e 5f 66 69 |0,in_fil|e%:in_fi|
|000018a0| 6c 65 25 3d 30 0d 08 8e | 46 e7 20 6f 75 74 5f 66 |le%=0...|F. out_f|
|000018b0| 69 6c 65 25 3c 3e 30 20 | f2 45 73 63 4f 6e 3a c8 |ile%<>0 |.EscOn:.|
|000018c0| 99 22 58 4f 53 5f 46 69 | 6e 64 22 2c 30 2c 6f 75 |."XOS_Fi|nd",0,ou|
|000018d0| 74 5f 66 69 6c 65 25 3a | 6f 75 74 5f 66 69 6c 65 |t_file%:|out_file|
|000018e0| 25 3d 30 3a f2 45 73 63 | 4f 66 66 0d 08 98 16 c8 |%=0:.Esc|Off.....|
|000018f0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 44 6f 77 6e |."Wimp_C|loseDown|
|00001900| 22 0d 08 a2 05 e0 0d 08 | ac 05 3a 0d 08 b6 0f dd |".......|..:.....|
|00001910| 20 f2 64 65 66 61 75 6c | 74 73 0d 08 c0 14 ea 20 | .defaul|ts..... |
|00001920| 72 61 6d 76 61 6c 25 2c | 20 74 65 6d 70 25 0d 08 |ramval%,| temp%..|
|00001930| ca 1a 64 61 74 61 5f 6e | 65 77 25 3d 64 61 74 61 |..data_n|ew%=data|
|00001940| 5f 63 6f 6e 66 69 67 25 | 0d 08 d4 29 f2 73 65 74 |_config%|...).set|
|00001950| 5f 74 69 63 6b 28 62 69 | 74 73 6d 25 2c 33 2d 28 |_tick(bi|tsm%,3-(|
|00001960| 64 61 74 61 5f 6e 65 77 | 25 20 80 20 33 29 2c 31 |data_new|% . 3),1|
|00001970| 29 0d 08 de 1a e7 20 64 | 61 74 61 5f 6e 65 77 25 |)..... d|ata_new%|
|00001980| 20 80 20 28 31 3c 3c 33 | 29 20 8c 0d 08 e8 33 20 | . (1<<3|) ....3 |
|00001990| f2 73 65 74 5f 74 69 63 | 6b 28 70 61 72 69 74 79 |.set_tic|k(parity|
|000019a0| 6d 25 2c 28 28 64 61 74 | 61 5f 6e 65 77 25 20 3e |m%,((dat|a_new% >|
|000019b0| 3e 20 34 29 20 80 20 33 | 29 2b 31 2c 31 29 0d 08 |> 4) . 3|)+1,1)..|
|000019c0| f2 05 cc 0d 08 fc 1c 20 | f2 73 65 74 5f 74 69 63 |....... |.set_tic|
|000019d0| 6b 28 70 61 72 69 74 79 | 6d 25 2c 30 2c 31 29 0d |k(parity|m%,0,1).|
|000019e0| 09 06 05 cd 0d 09 10 2a | f2 73 65 74 5f 74 69 63 |.......*|.set_tic|
|000019f0| 6b 28 73 74 6f 70 6d 25 | 2c 28 64 61 74 61 5f 6e |k(stopm%|,(data_n|
|00001a00| 65 77 25 3e 3e 32 29 20 | 80 20 31 2c 31 29 0d 09 |ew%>>2) |. 1,1)..|
|00001a10| 1a 24 f2 73 65 74 5f 74 | 69 63 6b 28 73 65 72 69 |.$.set_t|ick(seri|
|00001a20| 61 6c 6d 25 2c 20 32 2c | 20 58 4f 4e 5f 6e 65 77 |alm%, 2,| XON_new|
|00001a30| 25 29 0d 09 24 23 c8 99 | 20 22 4f 53 5f 42 79 74 |%)..$#..| "OS_Byt|
|00001a40| 65 22 2c 20 31 36 31 2c | 20 31 35 20 b8 20 2c 2c |e", 161,| 15 . ,,|
|00001a50| 74 65 6d 70 25 0d 09 2e | 3e e7 20 62 61 75 64 5f |temp%...|>. baud_|
|00001a60| 70 74 72 25 20 3d 20 2d | 31 20 8c 20 62 61 75 64 |ptr% = -|1 . baud|
|00001a70| 5f 63 6f 6e 66 69 67 25 | 20 3d 20 28 74 65 6d 70 |_config%| = (temp|
|00001a80| 25 20 80 20 25 30 30 30 | 31 31 31 30 30 29 20 3e |% . %000|11100) >|
|00001a90| 3e 20 32 0d 09 38 1c 62 | 61 75 64 5f 6e 65 77 25 |> 2..8.b|aud_new%|
|00001aa0| 20 3d 20 62 61 75 64 5f | 63 6f 6e 66 69 67 25 0d | = baud_|config%.|
|00001ab0| 09 42 44 e7 20 6c 6f 63 | 61 74 69 6f 6e 5f 70 74 |.BD. loc|ation_pt|
|00001ac0| 72 25 3d 2d 31 20 8c 20 | 6c 6f 63 61 74 69 6f 6e |r%=-1 . |location|
|00001ad0| 5f 63 6f 6e 66 69 67 25 | 20 3d 20 28 74 65 6d 70 |_config%| = (temp|
|00001ae0| 25 20 80 20 25 31 31 31 | 30 30 30 30 30 29 20 3e |% . %111|00000) >|
|00001af0| 3e 20 35 0d 09 4c 1c e7 | 20 6c 6f 63 61 74 69 6f |> 5..L..| locatio|
|00001b00| 6e 5f 63 6f 6e 66 69 67 | 25 20 3d 20 32 20 8c 0d |n_config|% = 2 ..|
|00001b10| 09 56 1e 20 c8 99 22 4f | 53 5f 42 79 74 65 22 2c |.V. .."O|S_Byte",|
|00001b20| 38 2c 62 61 75 64 5f 6e | 65 77 25 2b 31 0d 09 60 |8,baud_n|ew%+1..`|
|00001b30| 1e 20 c8 99 22 4f 53 5f | 42 79 74 65 22 2c 37 2c |. .."OS_|Byte",7,|
|00001b40| 62 61 75 64 5f 6e 65 77 | 25 2b 31 0d 09 6a 20 20 |baud_new|%+1..j |
|00001b50| c8 99 22 4f 53 5f 53 65 | 72 69 61 6c 4f 70 22 2c |.."OS_Se|rialOp",|
|00001b60| 31 2c 64 61 74 61 5f 6e | 65 77 25 0d 09 74 22 20 |1,data_n|ew%..t" |
|00001b70| c8 99 22 4f 53 5f 53 65 | 72 69 61 6c 4f 70 22 2c |.."OS_Se|rialOp",|
|00001b80| 30 2c 58 4f 4e 5f 6e 65 | 77 25 2c ac 31 0d 09 7e |0,XON_ne|w%,.1..~|
|00001b90| 14 20 f2 50 72 69 6e 74 | 65 72 5f 49 67 6e 6f 72 |. .Print|er_Ignor|
|00001ba0| 65 0d 09 88 1f 20 f2 50 | 72 69 6e 74 65 72 5f 58 |e.... .P|rinter_X|
|00001bb0| 6f 6e 58 6f 66 66 28 58 | 4f 4e 5f 6e 65 77 25 29 |onXoff(X|ON_new%)|
|00001bc0| 0d 09 92 05 cd 0d 09 9c | 45 e7 20 6c 6f 63 61 74 |........|E. locat|
|00001bd0| 69 6f 6e 5f 63 6f 6e 66 | 69 67 25 20 3d 20 30 20 |ion_conf|ig% = 0 |
|00001be0| 8c 20 24 66 69 6c 65 5f | 6e 61 6d 65 25 20 3d 20 |. $file_|name% = |
|00001bf0| 22 6e 75 6c 6c 3a 22 3a | 6c 6f 63 61 74 69 6f 6e |"null:":|location|
|00001c00| 5f 63 6f 6e 66 69 67 25 | 3d 35 0d 09 a6 23 f2 73 |_config%|=5...#.s|
|00001c10| 65 74 5f 74 69 63 6b 28 | 62 61 75 64 6d 25 2c 20 |et_tick(|baudm%, |
|00001c20| 62 61 75 64 5f 6e 65 77 | 25 2c 20 31 29 0d 09 b0 |baud_new|%, 1)...|
|00001c30| 19 c8 8e 20 6c 6f 63 61 | 74 69 6f 6e 5f 63 6f 6e |... loca|tion_con|
|00001c40| 66 69 67 25 20 ca 0d 09 | ba 27 20 20 20 c9 20 31 |fig% ...|.' . 1|
|00001c50| 3a 20 f2 73 65 74 5f 74 | 69 63 6b 28 70 72 69 6e |: .set_t|ick(prin|
|00001c60| 74 6d 65 6e 75 25 2c 20 | 31 2c 20 31 29 0d 09 c4 |tmenu%, |1, 1)...|
|00001c70| 27 20 20 20 c9 20 32 3a | 20 f2 73 65 74 5f 74 69 |' . 2:| .set_ti|
|00001c80| 63 6b 28 70 72 69 6e 74 | 6d 65 6e 75 25 2c 20 32 |ck(print|menu%, 2|
|00001c90| 2c 20 31 29 0d 09 ce 27 | 20 20 20 c9 20 34 3a 20 |, 1)...'| . 4: |
|00001ca0| f2 73 65 74 5f 74 69 63 | 6b 28 70 72 69 6e 74 6d |.set_tic|k(printm|
|00001cb0| 65 6e 75 25 2c 20 33 2c | 20 31 29 0d 09 d8 27 20 |enu%, 3,| 1)...' |
|00001cc0| 20 20 c9 20 35 3a 20 f2 | 73 65 74 5f 74 69 63 6b | . 5: .|set_tick|
|00001cd0| 28 70 72 69 6e 74 6d 65 | 6e 75 25 2c 20 34 2c 20 |(printme|nu%, 4, |
|00001ce0| 31 29 0d 09 e2 05 cb 0d | 09 ec 24 6c 6f 63 61 74 |1)......|..$locat|
|00001cf0| 69 6f 6e 5f 6e 65 77 25 | 20 3d 20 6c 6f 63 61 74 |ion_new%| = locat|
|00001d00| 69 6f 6e 5f 63 6f 6e 66 | 69 67 25 0d 09 f6 1c e7 |ion_conf|ig%.....|
|00001d10| 20 6c 6f 63 61 74 69 6f | 6e 5f 6e 65 77 25 3d 35 | locatio|n_new%=5|
|00001d20| 20 f2 73 74 61 6d 70 0d | 0a 00 18 e7 20 73 65 72 | .stamp.|.... ser|
|00001d30| 76 65 72 5f 70 74 72 25 | 20 3d 20 2d 31 20 8c 0d |ver_ptr%| = -1 ..|
|00001d40| 0a 0a 23 20 c8 99 20 22 | 4f 53 5f 42 79 74 65 22 |..# .. "|OS_Byte"|
|00001d50| 2c 20 31 36 31 2c 20 33 | 20 b8 20 2c 2c 74 65 6d |, 161, 3| . ,,tem|
|00001d60| 70 25 0d 0a 14 12 20 e7 | 20 74 65 6d 70 25 20 3d |p%.... .| temp% =|
|00001d70| 20 30 20 8c 0d 0a 1e 24 | 20 20 c8 99 20 22 4f 53 | 0 ....$| .. "OS|
|00001d80| 5f 42 79 74 65 22 2c 20 | 31 36 31 2c 20 34 20 b8 |_Byte", |161, 4 .|
|00001d90| 20 2c 2c 74 65 6d 70 25 | 0d 0a 28 1f 20 20 73 65 | ,,temp%|..(. se|
|00001da0| 72 76 65 72 5f 63 6f 6e | 66 69 67 24 20 3d 20 bd |rver_con|fig$ = .|
|00001db0| 28 74 65 6d 70 25 29 0d | 0a 32 13 20 20 72 61 6d |(temp%).|.2. ram|
|00001dc0| 76 61 6c 25 20 3d 20 26 | 39 39 0d 0a 3c 07 20 20 |val% = &|99..<. |
|00001dd0| f5 0d 0a 46 2b 20 20 20 | c8 99 20 22 4f 53 5f 42 |...F+ |.. "OS_B|
|00001de0| 79 74 65 22 2c 20 31 36 | 31 2c 20 72 61 6d 76 61 |yte", 16|1, ramva|
|00001df0| 6c 25 20 b8 20 2c 2c 74 | 65 6d 70 25 0d 0a 50 3d |l% . ,,t|emp%..P=|
|00001e00| 20 20 20 e7 20 74 65 6d | 70 25 20 3e 33 32 20 73 | . tem|p% >32 s|
|00001e10| 65 72 76 65 72 5f 63 6f | 6e 66 69 67 24 20 3d 20 |erver_co|nfig$ = |
|00001e20| 73 65 72 76 65 72 5f 63 | 6f 6e 66 69 67 24 20 2b |server_c|onfig$ +|
|00001e30| 20 bd 28 74 65 6d 70 25 | 29 0d 0a 5a 13 20 20 20 | .(temp%|)..Z. |
|00001e40| 72 61 6d 76 61 6c 25 20 | 2b 3d 20 31 0d 0a 64 23 |ramval% |+= 1..d#|
|00001e50| 20 20 fd 20 74 65 6d 70 | 25 20 3c 3d 20 33 32 20 | . temp|% <= 32 |
|00001e60| 84 20 72 61 6d 76 61 6c | 25 20 3d 20 26 39 45 0d |. ramval|% = &9E.|
|00001e70| 0a 6e 06 20 cc 0d 0a 78 | 23 20 20 73 65 72 76 65 |.n. ...x|# serve|
|00001e80| 72 5f 63 6f 6e 66 69 67 | 24 20 3d 20 22 2e 22 2b |r_config|$ = "."+|
|00001e90| c3 28 74 65 6d 70 25 29 | 0d 0a 82 24 20 20 c8 99 |.(temp%)|...$ ..|
|00001ea0| 20 22 4f 53 5f 42 79 74 | 65 22 2c 20 31 36 31 2c | "OS_Byt|e", 161,|
|00001eb0| 20 34 20 b8 20 2c 2c 74 | 65 6d 70 25 0d 0a 8c 30 | 4 . ,,t|emp%...0|
|00001ec0| 20 20 73 65 72 76 65 72 | 5f 63 6f 6e 66 69 67 24 | server|_config$|
|00001ed0| 20 3d 20 c3 28 74 65 6d | 70 25 29 20 2b 20 73 65 | = .(tem|p%) + se|
|00001ee0| 72 76 65 72 5f 63 6f 6e | 66 69 67 24 0d 0a 96 06 |rver_con|fig$....|
|00001ef0| 20 cd 0d 0a a0 05 cd 0d | 0a aa 21 24 73 65 72 76 | .......|..!$serv|
|00001f00| 65 72 5f 6e 65 77 25 20 | 3d 20 73 65 72 76 65 72 |er_new% |= server|
|00001f10| 5f 63 6f 6e 66 69 67 24 | 0d 0a b4 05 e1 0d 0a be |_config$|........|
|00001f20| 05 3a 0d 0a c8 16 dd 20 | f2 72 65 64 72 61 77 28 |.:..... |.redraw(|
|00001f30| 68 61 6e 64 6c 65 25 29 | 0d 0a d2 05 e1 0d 0a dc |handle%)|........|
|00001f40| 05 3a 0d 0a e6 18 dd 20 | f2 72 65 63 65 69 76 65 |.:..... |.receive|
|00001f50| 28 6d 65 73 73 61 67 65 | 25 29 0d 0a f0 29 ea 20 |(message|%)...). |
|00001f60| 6d 79 5f 72 65 66 25 2c | 20 74 79 70 65 24 2c 20 |my_ref%,| type$, |
|00001f70| 6f 70 74 69 6f 6e 24 2c | 20 49 25 2c 20 70 66 6c |option$,| I%, pfl|
|00001f80| 61 67 25 0d 0a fa 18 6d | 79 5f 72 65 66 25 20 3d |ag%....m|y_ref% =|
|00001f90| 20 6d 65 73 73 61 67 65 | 25 21 38 0d 0b 04 14 c8 | message|%!8.....|
|00001fa0| 8e 20 6d 65 73 73 61 67 | 65 25 21 31 36 20 ca 0d |. messag|e%!16 ..|
|00001fb0| 0b 0e 1b 20 c9 20 30 2c | 4d 65 73 73 61 67 65 5f |... . 0,|Message_|
|00001fc0| 50 72 69 6e 74 42 75 73 | 79 25 0d 0b 18 11 20 20 |PrintBus|y%.... |
|00001fd0| f2 65 6e 64 63 6f 6e 66 | 69 72 6d 0d 0b 22 10 20 |.endconf|irm..". |
|00001fe0| 20 f2 74 65 72 6d 69 6e | 61 74 65 0d 0b 2c 1b 20 | .termin|ate..,. |
|00001ff0| c9 20 31 2c 4d 65 73 73 | 61 67 65 5f 50 72 69 6e |. 1,Mess|age_Prin|
|00002000| 74 53 61 76 65 25 0d 0b | 36 34 20 20 f4 20 73 61 |tSave%..|64 . sa|
|00002010| 76 65 20 6f 6e 74 6f 20 | 6f 75 72 20 69 63 6f 6e |ve onto |our icon|
|00002020| 3b 20 72 65 70 6c 79 20 | 77 69 74 68 20 50 72 69 |; reply |with Pri|
|00002030| 6e 74 20 6d 65 73 73 61 | 67 65 0d 0b 40 28 20 20 |nt messa|ge..@( |
|00002040| e3 20 49 25 3d 30 b8 32 | 35 32 88 34 3a 6d 73 67 |. I%=0.2|52.4:msg|
|00002050| 25 21 49 25 3d 6d 65 73 | 73 61 67 65 25 21 49 25 |%!I%=mes|sage%!I%|
|00002060| 3a ed 0d 0b 4a 11 20 20 | f2 65 6e 64 63 6f 6e 66 |:...J. |.endconf|
|00002070| 69 72 6d 0d 0b 54 3f 20 | 20 e7 20 70 72 69 6e 74 |irm..T? | . print|
|00002080| 5f 72 65 66 25 20 8c 20 | f2 6d 6f 61 6e 28 22 43 |_ref% . |.moan("C|
|00002090| 61 6e 20 6f 6e 6c 79 20 | 70 72 69 6e 74 20 6f 6e |an only |print on|
|000020a0| 65 20 66 69 6c 65 20 61 | 74 20 61 20 74 69 6d 65 |e file a|t a time|
|000020b0| 22 29 0d 0b 5e 23 20 20 | 73 61 76 65 5f 6e 61 6d |")..^# |save_nam|
|000020c0| 65 24 3d a4 72 74 6f 7a | 28 6d 65 73 73 61 67 65 |e$=.rtoz|(message|
|000020d0| 25 2b 34 34 29 0d 0b 68 | 13 20 20 e7 20 70 72 69 |%+44)..h|. . pri|
|000020e0| 6e 74 5f 6f 6e 25 20 8c | 0d 0b 72 18 20 20 20 e7 |nt_on% .|..r. .|
|000020f0| 20 6d 65 73 73 61 67 65 | 25 21 31 36 3d 31 20 8c | message|%!16=1 .|
|00002100| 0d 0b 7c 21 20 20 20 20 | f2 6d 6f 61 6e 28 22 41 |..|! |.moan("A|
|00002110| 6c 72 65 61 64 79 20 70 | 72 69 6e 74 69 6e 67 22 |lready p|rinting"|
|00002120| 29 0d 0b 86 08 20 20 20 | cc 0d 0b 90 13 20 20 20 |).... |..... |
|00002130| 20 6d 73 67 25 21 30 20 | 3d 20 32 30 0d 0b 9a 19 | msg%!0 |= 20....|
|00002140| 20 20 20 20 6d 73 67 25 | 21 31 32 20 3d 20 6d 79 | msg%|!12 = my|
|00002150| 5f 72 65 66 25 0d 0b a4 | 24 20 20 20 20 6d 73 67 |_ref%...|$ msg|
|00002160| 25 21 31 36 20 3d 20 4d | 65 73 73 61 67 65 5f 50 |%!16 = M|essage_P|
|00002170| 72 69 6e 74 42 75 73 79 | 25 0d 0b ae 2f 20 20 20 |rintBusy|%.../ |
|00002180| 20 c8 99 20 22 57 69 6d | 70 5f 53 65 6e 64 4d 65 | .. "Wim|p_SendMe|
|00002190| 73 73 61 67 65 22 2c 20 | 31 37 2c 20 6d 73 67 25 |ssage", |17, msg%|
|000021a0| 2c 20 6d 73 67 25 21 34 | 0d 0b b8 08 20 20 20 cd |, msg%!4|.... .|
|000021b0| 0d 0b c2 07 20 20 cc 0d | 0b cc 18 20 20 20 6d 73 |.... ..|... ms|
|000021c0| 67 25 21 31 32 20 3d 20 | 6d 79 5f 72 65 66 25 0d |g%!12 = |my_ref%.|
|000021d0| 0b d6 23 20 20 20 6d 73 | 67 25 21 31 36 20 3d 20 |..# ms|g%!16 = |
|000021e0| 4d 65 73 73 61 67 65 5f | 50 72 69 6e 74 46 69 6c |Message_|PrintFil|
|000021f0| 65 25 0d 0b e0 18 20 20 | 20 e7 20 6d 65 73 73 61 |e%.... | . messa|
|00002200| 67 65 25 21 31 36 3d 31 | 20 8c 0d 0b ea 13 20 20 |ge%!16=1| ..... |
|00002210| 20 20 6d 73 67 25 21 30 | 20 3d 20 36 30 0d 0b f4 | msg%!0| = 60...|
|00002220| 26 20 20 20 20 24 28 6d | 73 67 25 2b 34 34 29 20 |& $(m|sg%+44) |
|00002230| 3d 20 22 3c 50 72 69 6e | 74 65 72 24 53 63 72 61 |= "<Prin|ter$Scra|
|00002240| 70 3e 22 0d 0b fe 13 20 | 20 20 20 6d 73 67 25 3f |p>".... | msg%?|
|00002250| 35 39 20 3d 20 30 0d 0c | 08 08 20 20 20 cd 0d 0c |59 = 0..|.. ...|
|00002260| 12 2e 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |.. .. |"Wimp_Se|
|00002270| 6e 64 4d 65 73 73 61 67 | 65 22 2c 20 31 38 2c 20 |ndMessag|e", 18, |
|00002280| 6d 73 67 25 2c 20 6d 73 | 67 25 21 34 0d 0c 1c 1a |msg%, ms|g%!4....|
|00002290| 20 20 20 6d 73 67 25 21 | 34 20 3d 20 6d 65 73 73 | msg%!|4 = mess|
|000022a0| 61 67 65 25 21 34 0d 0c | 26 18 20 20 20 70 72 69 |age%!4..|&. pri|
|000022b0| 6e 74 5f 72 65 66 25 3d | 6d 73 67 25 21 38 0d 0c |nt_ref%=|msg%!8..|
|000022c0| 30 07 20 20 cd 0d 0c 3a | 08 20 c9 20 33 0d 0c 44 |0. ...:|. . 3..D|
|000022d0| 11 20 20 f2 65 6e 64 63 | 6f 6e 66 69 72 6d 0d 0c |. .endc|onfirm..|
|000022e0| 4e 59 20 20 e7 20 70 72 | 69 6e 74 5f 72 65 66 25 |NY . pr|int_ref%|
|000022f0| 20 e7 20 70 72 69 6e 74 | 5f 72 65 66 25 3c 3e 6d | . print|_ref%<>m|
|00002300| 65 73 73 61 67 65 25 21 | 31 32 20 8c 20 f2 6d 6f |essage%!|12 . .mo|
|00002310| 61 6e 28 22 43 61 6e 20 | 6f 6e 6c 79 20 70 72 69 |an("Can |only pri|
|00002320| 6e 74 20 6f 6e 65 20 66 | 69 6c 65 20 61 74 20 61 |nt one f|ile at a|
|00002330| 20 74 69 6d 65 22 29 0d | 0c 58 12 20 20 70 72 69 | time").|.X. pri|
|00002340| 6e 74 5f 72 65 66 25 3d | 30 0d 0c 62 14 20 20 e7 |nt_ref%=|0..b. .|
|00002350| 20 70 72 69 6e 74 5f 6f | 6e 25 20 20 8c 0d 0c 6c | print_o|n% ...l|
|00002360| 20 20 20 20 f2 6d 6f 61 | 6e 28 22 41 6c 72 65 61 | .moa|n("Alrea|
|00002370| 64 79 20 70 72 69 6e 74 | 69 6e 67 22 29 0d 0c 76 |dy print|ing")..v|
|00002380| 07 20 20 cc 0d 0c 80 29 | 20 20 20 e3 20 49 25 3d |. ....)| . I%=|
|00002390| 30 b8 32 35 32 88 34 3a | 6d 73 67 25 21 49 25 3d |0.252.4:|msg%!I%=|
|000023a0| 6d 65 73 73 61 67 65 25 | 21 49 25 3a ed 0d 0c 8a |message%|!I%:....|
|000023b0| 22 20 20 20 66 69 6c 65 | 6e 61 6d 24 3d a4 72 74 |" file|nam$=.rt|
|000023c0| 6f 7a 28 6d 65 73 73 61 | 67 65 25 2b 34 34 29 0d |oz(messa|ge%+44).|
|000023d0| 0c 94 1c 20 20 20 6d 65 | 73 73 61 67 65 25 21 31 |... me|ssage%!1|
|000023e0| 32 20 3d 20 6d 79 5f 72 | 65 66 25 0d 0c 9e 33 20 |2 = my_r|ef%...3 |
|000023f0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d | .. "Wi|mp_SendM|
|00002400| 65 73 73 61 67 65 22 2c | 31 39 2c 6d 65 73 73 61 |essage",|19,messa|
|00002410| 67 65 25 2c 6d 65 73 73 | 61 67 65 25 21 34 0d 0c |ge%,mess|age%!4..|
|00002420| a8 36 20 20 20 f4 20 6a | 75 73 74 20 61 63 6b 20 |.6 . j|ust ack |
|00002430| 74 68 65 20 6d 65 73 73 | 61 67 65 20 69 6e 20 63 |the mess|age in c|
|00002440| 61 73 65 20 46 4e 63 6f | 6e 66 69 72 6d 20 63 61 |ase FNco|nfirm ca|
|00002450| 6c 6c 65 64 0d 0c b2 19 | 20 20 20 46 74 79 70 65 |lled....| Ftype|
|00002460| 25 3d 6d 65 73 73 61 67 | 65 25 21 34 30 0d 0c bc |%=messag|e%!40...|
|00002470| 14 20 20 20 74 79 70 65 | 5f 73 74 61 74 65 25 3d |. type|_state%=|
|00002480| 30 0d 0c c6 1e 20 20 20 | e7 20 46 74 79 70 65 25 |0.... |. Ftype%|
|00002490| 3c 3e 4f 75 74 70 75 74 | 54 79 70 65 25 20 8c 0d |<>Output|Type% ..|
|000024a0| 0c d0 11 20 20 20 20 6d | 73 67 25 21 31 32 3d 30 |... m|sg%!12=0|
|000024b0| 0d 0c da 25 20 20 20 20 | 6d 73 67 25 21 31 36 3d |...% |msg%!16=|
|000024c0| 4d 65 73 73 61 67 65 5f | 50 72 69 6e 74 54 79 70 |Message_|PrintTyp|
|000024d0| 65 4f 64 64 25 0d 0c e4 | 29 20 20 20 20 c8 99 22 |eOdd%...|) .."|
|000024e0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|000024f0| 22 2c 20 31 38 2c 20 6d | 73 67 25 2c 20 30 0d 0c |", 18, m|sg%, 0..|
|00002500| ee 19 20 20 20 20 70 72 | 69 6e 74 5f 72 65 66 25 |.. pr|int_ref%|
|00002510| 3d 6d 73 67 25 21 38 0d | 0c f8 09 20 20 20 20 f5 |=msg%!8.|... .|
|00002520| 0d 0d 02 33 20 20 20 20 | 20 c8 99 20 22 57 69 6d |...3 | .. "Wim|
|00002530| 70 5f 50 6f 6c 6c 22 2c | 70 6f 6c 6c 5f 6d 61 73 |p_Poll",|poll_mas|
|00002540| 6b 25 2c 65 76 65 6e 74 | 25 20 b8 20 61 63 74 69 |k%,event|% . acti|
|00002550| 6f 6e 25 0d 0d 0c 17 20 | 20 20 20 20 f2 64 65 73 |on%.... | .des|
|00002560| 70 61 74 63 68 5f 70 6f | 6c 6c 0d 0d 16 15 20 20 |patch_po|ll.... |
|00002570| 20 20 fd 20 74 79 70 65 | 5f 73 74 61 74 65 25 0d | . type|_state%.|
|00002580| 0d 20 08 20 20 20 cd 0d | 0d 2a 0f 20 20 20 70 66 |. . ..|.*. pf|
|00002590| 6c 61 67 25 3d a3 0d 0d | 34 18 20 20 20 e7 20 74 |lag%=...|4. . t|
|000025a0| 79 70 65 5f 73 74 61 74 | 65 25 3d 32 20 8c 0d 0d |ype_stat|e%=2 ...|
|000025b0| 3e 3e 20 20 20 20 e7 20 | 66 69 6c 65 6e 61 6d 24 |>> . |filenam$|
|000025c0| 20 3d 20 22 3c 50 72 69 | 6e 74 65 72 24 53 63 72 | = "<Pri|nter$Scr|
|000025d0| 61 70 3e 22 20 8c 20 ff | 28 22 72 65 6d 6f 76 65 |ap>" . .|("remove|
|000025e0| 20 22 2b 66 69 6c 65 6e | 61 6d 24 29 0d 0d 48 22 | "+filen|am$)..H"|
|000025f0| 20 20 20 20 69 6e 5f 66 | 69 6c 65 25 3d 8e 22 3c | in_f|ile%=."<|
|00002600| 50 72 69 6e 74 65 72 24 | 54 65 6d 70 3e 22 0d 0d |Printer$|Temp>"..|
|00002610| 52 17 20 20 20 20 e7 20 | 69 6e 5f 66 69 6c 65 25 |R. . |in_file%|
|00002620| 3c 3e 30 20 8c 0d 0d 5c | 24 20 20 20 20 20 66 69 |<>0 ...\|$ fi|
|00002630| 6c 65 6e 61 6d 24 20 3d | 20 22 3c 50 72 69 6e 74 |lenam$ =| "<Print|
|00002640| 65 72 24 54 65 6d 70 3e | 22 0d 0d 66 1e 20 20 20 |er$Temp>|"..f. |
|00002650| 20 20 d9 23 69 6e 5f 66 | 69 6c 65 25 3a 69 6e 5f | .#in_f|ile%:in_|
|00002660| 66 69 6c 65 25 3d 30 0d | 0d 70 11 20 20 20 20 20 |file%=0.|.p. |
|00002670| 70 66 6c 61 67 25 3d b9 | 0d 0d 7a 09 20 20 20 20 |pflag%=.|..z. |
|00002680| cd 0d 0d 84 08 20 20 20 | cc 0d 0d 8e 17 20 20 20 |..... |..... |
|00002690| 20 e7 20 a4 63 68 65 63 | 6b 5f 74 79 70 65 20 8c | . .chec|k_type .|
|000026a0| 0d 0d 98 19 20 20 20 20 | 20 e7 20 41 6c 69 61 73 |.... | . Alias|
|000026b0| 24 20 3c 3e 20 22 22 20 | 8c 0d 0d a2 31 20 20 20 |$ <> "" |....1 |
|000026c0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 74 61 72 | .. "W|imp_Star|
|000026d0| 74 54 61 73 6b 22 2c 41 | 6c 69 61 73 24 2b 22 20 |tTask",A|lias$+" |
|000026e0| 22 2b 66 69 6c 65 6e 61 | 6d 24 0d 0d ac 24 20 20 |"+filena|m$...$ |
|000026f0| 20 20 20 20 69 6e 5f 66 | 69 6c 65 25 3d 8e 22 3c | in_f|ile%=."<|
|00002700| 50 72 69 6e 74 65 72 24 | 54 65 6d 70 3e 22 0d 0d |Printer$|Temp>"..|
|00002710| b6 19 20 20 20 20 20 20 | e7 20 69 6e 5f 66 69 6c |.. |. in_fil|
|00002720| 65 25 3c 3e 30 20 8c 0d | 0d c0 26 20 20 20 20 20 |e%<>0 ..|..& |
|00002730| 20 20 66 69 6c 65 6e 61 | 6d 24 20 3d 20 22 3c 50 | filena|m$ = "<P|
|00002740| 72 69 6e 74 65 72 24 54 | 65 6d 70 3e 22 0d 0d ca |rinter$T|emp>"...|
|00002750| 41 20 20 20 20 20 20 20 | e7 20 66 69 6c 65 6e 61 |A |. filena|
|00002760| 6d 24 20 3d 20 22 3c 50 | 72 69 6e 74 65 72 24 53 |m$ = "<P|rinter$S|
|00002770| 63 72 61 70 3e 22 20 8c | 20 ff 28 22 72 65 6d 6f |crap>" .| .("remo|
|00002780| 76 65 20 22 2b 66 69 6c | 65 6e 61 6d 24 29 0d 0d |ve "+fil|enam$)..|
|00002790| d4 20 20 20 20 20 20 20 | 20 d9 23 69 6e 5f 66 69 |. | .#in_fi|
|000027a0| 6c 65 25 3a 69 6e 5f 66 | 69 6c 65 25 3d 30 0d 0d |le%:in_f|ile%=0..|
|000027b0| de 13 20 20 20 20 20 20 | 20 70 66 6c 61 67 25 3d |.. | pflag%=|
|000027c0| b9 0d 0d e8 0b 20 20 20 | 20 20 20 cd 0d 0d f2 0a |..... | .....|
|000027d0| 20 20 20 20 20 cc 0d 0d | fc 12 20 20 20 20 20 20 | ...|.. |
|000027e0| 70 66 6c 61 67 25 3d b9 | 0d 0e 06 0a 20 20 20 20 |pflag%=.|.... |
|000027f0| 20 cd 0d 0e 10 09 20 20 | 20 20 cd 0d 0e 1a 08 20 | ..... | ..... |
|00002800| 20 20 cd 0d 0e 24 11 20 | 20 20 e7 20 70 66 6c 61 | ...$. | . pfla|
|00002810| 67 25 20 8c 0d 0e 2e 1d | 20 20 20 20 e7 20 6c 6f |g% .....| . lo|
|00002820| 63 61 74 69 6f 6e 5f 6e | 65 77 25 20 3d 20 34 20 |cation_n|ew% = 4 |
|00002830| 8c 0d 0e 38 2f 20 20 20 | 20 20 74 79 70 65 24 20 |...8/ | type$ |
|00002840| 3d 20 22 6e 65 74 70 72 | 69 6e 74 23 22 2b 70 72 |= "netpr|int#"+pr|
|00002850| 69 6e 74 65 72 5f 74 79 | 70 65 24 2b 22 3a 24 22 |inter_ty|pe$+":$"|
|00002860| 0d 0e 42 09 20 20 20 20 | cc 0d 0e 4c 42 20 20 20 |..B. |...LB |
|00002870| 20 20 e7 20 6c 6f 63 61 | 74 69 6f 6e 5f 6e 65 77 | . loca|tion_new|
|00002880| 25 20 3d 20 35 20 8c 20 | ff 28 22 73 65 74 20 50 |% = 5 . |.("set P|
|00002890| 72 69 6e 74 65 72 54 79 | 70 65 24 35 20 22 2b 24 |rinterTy|pe$5 "+$|
|000028a0| 66 69 6c 65 5f 6e 61 6d | 65 25 29 0d 0e 56 1a 20 |file_nam|e%)..V. |
|000028b0| 20 20 20 20 74 79 70 65 | 24 3d 22 70 72 69 6e 74 | type|$="print|
|000028c0| 65 72 3a 24 22 0d 0e 60 | 24 20 20 20 20 20 c8 99 |er:$"..`|$ ..|
|000028d0| 22 4f 53 5f 42 79 74 65 | 22 2c 35 2c 6c 6f 63 61 |"OS_Byte|",5,loca|
|000028e0| 74 69 6f 6e 5f 6e 65 77 | 25 0d 0e 6a 09 20 20 20 |tion_new|%..j. |
|000028f0| 20 cd 0d 0e 74 2b 20 20 | 20 20 f4 20 66 69 6c 65 | ...t+ | . file|
|00002900| 6e 61 6d 24 20 69 73 20 | 61 6c 73 6f 20 75 73 65 |nam$ is |also use|
|00002910| 64 20 69 6e 20 50 52 4f | 43 63 6f 70 79 0d 0e 7e |d in PRO|Ccopy..~|
|00002920| 1f 20 20 20 20 69 6e 5f | 66 69 6c 65 25 20 20 3d |. in_|file% =|
|00002930| 20 8e 28 66 69 6c 65 6e | 61 6d 24 29 0d 0e 88 18 | .(filen|am$)....|
|00002940| 20 20 20 20 e7 20 69 6e | 5f 66 69 6c 65 25 20 3d | . in|_file% =|
|00002950| 20 30 20 8c 0d 0e 92 38 | 20 20 20 20 20 f2 6d 6f | 0 ....8| .mo|
|00002960| 61 6e 28 22 43 61 6e 27 | 74 20 6f 70 65 6e 20 27 |an("Can'|t open '|
|00002970| 22 2b 66 69 6c 65 6e 61 | 6d 24 2b 22 27 20 66 6f |"+filena|m$+"' fo|
|00002980| 72 20 70 72 69 6e 74 69 | 6e 67 22 29 0d 0e 9c 09 |r printi|ng")....|
|00002990| 20 20 20 20 cd 0d 0e a6 | 26 20 20 20 20 6f 75 74 | ....|& out|
|000029a0| 5f 66 69 6c 65 25 20 3d | 20 ae 28 74 79 70 65 24 |_file% =| .(type$|
|000029b0| 2b 22 2e 6f 75 74 70 75 | 74 22 29 0d 0e b0 19 20 |+".outpu|t").... |
|000029c0| 20 20 20 e7 20 6f 75 74 | 5f 66 69 6c 65 25 20 3d | . out|_file% =|
|000029d0| 20 30 20 8c 0d 0e ba 1e | 20 20 20 20 20 d9 23 69 | 0 .....| .#i|
|000029e0| 6e 5f 66 69 6c 65 25 3a | 69 6e 5f 66 69 6c 65 25 |n_file%:|in_file%|
|000029f0| 3d 30 0d 0e c4 3c 20 20 | 20 20 20 f2 6d 6f 61 6e |=0...< | .moan|
|00002a00| 28 22 43 61 6e 27 74 20 | 6f 70 65 6e 20 27 22 2b |("Can't |open '"+|
|00002a10| 74 79 70 65 24 2b 22 2e | 6f 75 74 70 75 74 27 20 |type$+".|output' |
|00002a20| 66 6f 72 20 70 72 69 6e | 74 69 6e 67 22 29 0d 0e |for prin|ting")..|
|00002a30| ce 09 20 20 20 20 cd 0d | 0e d8 1b 20 20 20 20 f2 |.. ..|... .|
|00002a40| 73 65 74 5f 70 72 69 6e | 74 5f 73 74 61 74 65 28 |set_prin|t_state(|
|00002a50| b9 29 0d 0e e2 21 20 20 | 20 20 f2 63 68 61 6e 67 |.)...! | .chang|
|00002a60| 65 5f 69 63 6f 6e 3a f2 | 75 70 64 61 74 65 5f 69 |e_icon:.|update_i|
|00002a70| 63 6f 6e 0d 0e ec 13 20 | 20 20 20 70 62 75 66 25 |con.... | pbuf%|
|00002a80| 3d 96 28 2d 34 29 0d 0e | f6 0f 20 20 20 20 73 65 |=.(-4)..|.. se|
|00002a90| 6e 74 25 3d a3 0d 0f 00 | 17 20 20 20 20 f2 50 72 |nt%=....|. .Pr|
|00002aa0| 69 6e 74 65 72 5f 48 65 | 61 64 65 72 0d 0f 0a 08 |inter_He|ader....|
|00002ab0| 20 20 20 cd 0d 0f 14 29 | 20 20 20 f4 20 69 6e 64 | ....)| . ind|
|00002ac0| 69 63 61 74 65 20 77 65 | 20 72 65 63 65 69 76 65 |icate we| receive|
|00002ad0| 64 20 74 68 65 20 66 69 | 6c 65 20 4f 4b 0d 0f 1e |d the fi|le OK...|
|00002ae0| 13 20 20 20 6d 73 67 25 | 21 30 20 20 3d 20 32 30 |. msg%|!0 = 20|
|00002af0| 0d 0f 28 18 20 20 20 6d | 73 67 25 21 31 32 20 3d |..(. m|sg%!12 =|
|00002b00| 20 6d 79 5f 72 65 66 25 | 0d 0f 32 12 20 20 20 6d | my_ref%|..2. m|
|00002b10| 73 67 25 21 31 36 20 3d | 20 34 0d 0f 3c 13 20 20 |sg%!16 =| 4..<. |
|00002b20| 20 6d 73 67 25 21 33 36 | 20 3d 20 2d 31 0d 0f 46 | msg%!36| = -1..F|
|00002b30| 2d 20 20 20 c8 99 22 57 | 69 6d 70 5f 53 65 6e 64 |- .."W|imp_Send|
|00002b40| 4d 65 73 73 61 67 65 22 | 2c 20 31 37 2c 20 6d 73 |Message"|, 17, ms|
|00002b50| 67 25 2c 20 6d 73 67 25 | 21 34 0d 0f 50 07 20 20 |g%, msg%|!4..P. |
|00002b60| cd 0d 0f 5a 1b 20 c9 20 | 26 35 30 32 3a 20 f4 20 |...Z. . |&502: . |
|00002b70| 68 65 6c 70 20 72 65 71 | 75 65 73 74 0d 0f 64 d9 |help req|uest..d.|
|00002b80| 20 20 e7 20 6d 65 73 73 | 61 67 65 25 21 33 32 3d | . mess|age%!32=|
|00002b90| 2d 32 20 80 20 6d 65 73 | 73 61 67 65 25 21 33 36 |-2 . mes|sage%!36|
|00002ba0| 3d 69 63 70 72 69 6e 74 | 25 20 f2 68 65 6c 70 72 |=icprint|% .helpr|
|00002bb0| 65 70 6c 79 28 22 54 68 | 69 73 20 69 73 20 74 68 |eply("Th|is is th|
|00002bc0| 65 20 22 2b 46 75 6c 6c | 50 72 69 6e 74 65 72 43 |e "+Full|PrinterC|
|00002bd0| 6c 61 73 73 24 2b 22 20 | 70 72 69 6e 74 65 72 20 |lass$+" |printer |
|00002be0| 69 63 6f 6e 2e 7c 4d 44 | 72 6f 70 20 74 65 78 74 |icon.|MD|rop text|
|00002bf0| 20 66 69 6c 65 73 20 6f | 6e 20 74 6f 20 69 74 20 | files o|n to it |
|00002c00| 74 6f 20 70 72 69 6e 74 | 20 74 68 65 6d 2e 7c 4d |to print| them.|M|
|00002c10| 43 6c 69 63 6b 20 4d 45 | 4e 55 20 6f 72 20 53 45 |Click ME|NU or SE|
|00002c20| 4c 45 43 54 20 74 6f 20 | 73 65 74 20 74 68 65 20 |LECT to |set the |
|00002c30| 70 72 69 6e 74 65 72 20 | 6f 70 74 69 6f 6e 73 2e |printer |options.|
|00002c40| 22 2c 6d 79 5f 72 65 66 | 25 2c 6d 65 73 73 61 67 |",my_ref|%,messag|
|00002c50| 65 25 21 34 29 0d 0f 6e | 19 20 c9 20 4d 65 73 73 |e%!4)..n|. . Mess|
|00002c60| 61 67 65 5f 57 69 6c 6c | 50 72 69 6e 74 25 0d 0f |age_Will|Print%..|
|00002c70| 78 12 20 20 70 72 69 6e | 74 5f 72 65 66 25 3d 30 |x. prin|t_ref%=0|
|00002c80| 0d 0f 82 19 20 c9 20 4d | 65 73 73 61 67 65 5f 50 |.... . M|essage_P|
|00002c90| 72 69 6e 74 49 6e 69 74 | 25 0d 0f 8c 23 20 20 e7 |rintInit|%...# .|
|00002ca0| 20 70 6f 6c 6c 5f 6d 61 | 73 6b 25 3c 3e ac 28 25 | poll_ma|sk%<>.(%|
|00002cb0| 31 31 31 20 3c 3c 20 31 | 37 29 20 8c 0d 0f 96 14 |111 << 1|7) .....|
|00002cc0| 20 20 20 e7 20 70 72 69 | 6e 74 5f 6f 6e 25 20 8c | . pri|nt_on% .|
|00002cd0| 0d 0f a0 11 20 20 20 20 | 6d 73 67 25 21 30 3d 32 |.... |msg%!0=2|
|00002ce0| 30 0d 0f aa 17 20 20 20 | 20 6d 73 67 25 21 31 32 |0.... | msg%!12|
|00002cf0| 3d 6d 79 5f 72 65 66 25 | 0d 0f b4 22 20 20 20 20 |=my_ref%|..." |
|00002d00| 6d 73 67 25 21 31 36 3d | 4d 65 73 73 61 67 65 5f |msg%!16=|Message_|
|00002d10| 50 72 69 6e 74 42 75 73 | 79 25 0d 0f be 33 20 20 |PrintBus|y%...3 |
|00002d20| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d | .. "Wi|mp_SendM|
|00002d30| 65 73 73 61 67 65 22 2c | 20 31 37 2c 20 6d 73 67 |essage",| 17, msg|
|00002d40| 25 2c 20 6d 65 73 73 61 | 67 65 25 21 34 0d 0f c8 |%, messa|ge%!4...|
|00002d50| 08 20 20 20 cc 0d 0f d2 | 12 20 20 20 20 f2 74 65 |. ....|. .te|
|00002d60| 72 6d 69 6e 61 74 65 0d | 0f dc 08 20 20 20 cd 0d |rminate.|... ..|
|00002d70| 0f e6 07 20 20 cd 0d 0f | f0 1e 20 c9 20 4d 65 73 |... ...|.. . Mes|
|00002d80| 73 61 67 65 5f 50 72 69 | 6e 74 54 79 70 65 4b 6e |sage_Pri|ntTypeKn|
|00002d90| 6f 77 6e 25 0d 0f fa 18 | 20 20 46 74 79 70 65 25 |own%....| Ftype%|
|00002da0| 3d 6d 65 73 73 61 67 65 | 25 21 34 30 0d 10 04 13 |=message|%!40....|
|00002db0| 20 20 74 79 70 65 5f 73 | 74 61 74 65 25 3d 32 0d | type_s|tate%=2.|
|00002dc0| 10 0e 12 20 20 70 72 69 | 6e 74 5f 72 65 66 25 3d |... pri|nt_ref%=|
|00002dd0| 30 0d 10 18 05 cb 0d 10 | 22 05 e1 0d 10 2c 05 3a |0.......|"....,.:|
|00002de0| 0d 10 36 21 dd f2 68 65 | 6c 70 72 65 70 6c 79 28 |..6!..he|lpreply(|
|00002df0| 68 65 6c 70 24 2c 20 72 | 65 66 25 2c 20 74 6f 25 |help$, r|ef%, to%|
|00002e00| 29 0d 10 40 14 6d 73 67 | 25 21 30 20 20 20 20 20 |)..@.msg|%!0 |
|00002e10| 3d 20 32 35 36 0d 10 4a | 15 6d 73 67 25 21 31 32 |= 256..J|.msg%!12|
|00002e20| 20 20 20 20 3d 20 72 65 | 66 25 0d 10 54 15 6d 73 | = re|f%..T.ms|
|00002e30| 67 25 21 31 36 20 20 20 | 20 3d 20 26 35 30 33 0d |g%!16 | = &503.|
|00002e40| 10 5e 16 24 28 6d 73 67 | 25 2b 32 30 29 20 3d 20 |.^.$(msg|%+20) = |
|00002e50| 68 65 6c 70 24 0d 10 68 | 1c f2 7a 65 72 6f 5f 74 |help$..h|..zero_t|
|00002e60| 65 72 6d 69 6e 61 74 65 | 28 6d 73 67 25 2b 32 30 |erminate|(msg%+20|
|00002e70| 29 0d 10 72 28 c8 99 20 | 22 57 69 6d 70 5f 53 65 |)..r(.. |"Wimp_Se|
|00002e80| 6e 64 4d 65 73 73 61 67 | 65 22 2c 20 31 37 2c 20 |ndMessag|e", 17, |
|00002e90| 6d 73 67 25 2c 20 74 6f | 25 0d 10 7c 05 e1 0d 10 |msg%, to|%..|....|
|00002ea0| 86 05 3a 0d 10 90 17 dd | f2 62 6f 75 6e 63 65 64 |..:.....|.bounced|
|00002eb0| 28 6d 65 73 73 61 67 65 | 25 29 0d 10 9a 14 c8 8e |(message|%)......|
|00002ec0| 20 6d 65 73 73 61 67 65 | 25 21 31 36 20 ca 0d 10 | message|%!16 ...|
|00002ed0| a4 19 20 c9 20 4d 65 73 | 73 61 67 65 5f 50 72 69 |.. . Mes|sage_Pri|
|00002ee0| 6e 74 46 69 6c 65 25 0d | 10 ae 12 20 20 70 72 69 |ntFile%.|... pri|
|00002ef0| 6e 74 5f 72 65 66 25 3d | 30 0d 10 b8 47 20 20 f4 |nt_ref%=|0...G .|
|00002f00| 20 6d 75 73 74 20 62 65 | 20 61 6e 20 61 70 70 20 | must be| an app |
|00002f10| 74 68 61 74 20 63 61 6e | 27 74 20 64 6f 20 69 74 |that can|'t do it|
|00002f20| 73 20 6f 77 6e 20 70 72 | 69 6e 74 69 6e 67 3b 20 |s own pr|inting; |
|00002f30| 72 65 70 6c 79 20 74 6f | 20 6d 65 73 73 61 67 65 |reply to| message|
|00002f40| 0d 10 c2 15 20 20 f4 20 | 73 74 69 6c 6c 20 69 6e |.... . |still in|
|00002f50| 20 6d 73 67 25 0d 10 cc | 11 20 20 f2 65 6e 64 63 | msg%...|. .endc|
|00002f60| 6f 6e 66 69 72 6d 0d 10 | d6 16 20 20 e7 20 ac 20 |onfirm..|.. . . |
|00002f70| 70 72 69 6e 74 5f 6f 6e | 25 20 20 8c 0d 10 e0 45 |print_on|% ....E|
|00002f80| 20 20 20 f4 20 63 61 6e | 27 74 20 61 73 6b 20 66 | . can|'t ask f|
|00002f90| 6f 72 20 63 6f 6e 66 69 | 72 6d 61 74 69 6f 6e 20 |or confi|rmation |
|00002fa0| 6f 66 20 73 74 75 70 69 | 64 20 74 79 70 65 73 20 |of stupi|d types |
|00002fb0| 61 73 20 61 6e 20 61 66 | 66 69 72 6d 61 74 69 76 |as an af|firmativ|
|00002fc0| 65 0d 10 ea 41 20 20 20 | f4 20 63 6c 69 63 6b 20 |e...A |. click |
|00002fd0| 77 69 6c 6c 20 70 72 6f | 62 61 62 6c 79 20 73 68 |will pro|bably sh|
|00002fe0| 75 74 20 64 6f 77 6e 20 | 74 68 65 20 74 72 61 6e |ut down |the tran|
|00002ff0| 73 66 65 72 20 61 74 20 | 74 68 65 20 73 6f 75 72 |sfer at |the sour|
|00003000| 63 65 0d 10 f4 15 20 20 | 20 6d 73 67 25 21 31 36 |ce.... | msg%!16|
|00003010| 20 20 20 20 3d 20 32 0d | 10 fe 2b 20 20 20 6d 73 | = 2.|..+ ms|
|00003020| 67 25 21 33 36 20 20 20 | 20 3d 20 2d 31 20 3a 20 |g%!36 | = -1 : |
|00003030| f4 20 66 69 6c 65 20 69 | 73 20 6e 6f 74 20 73 61 |. file i|s not sa|
|00003040| 66 65 0d 11 08 2e 20 20 | 20 c8 99 20 22 57 69 6d |fe.... | .. "Wim|
|00003050| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 20 |p_SendMe|ssage", |
|00003060| 31 37 2c 20 6d 73 67 25 | 2c 20 6d 73 67 25 21 34 |17, msg%|, msg%!4|
|00003070| 0d 11 12 07 20 20 cc 0d | 11 1c 20 20 20 20 f2 6d |.... ..|.. .m|
|00003080| 6f 61 6e 28 22 41 6c 72 | 65 61 64 79 20 70 72 69 |oan("Alr|eady pri|
|00003090| 6e 74 69 6e 67 22 29 0d | 11 26 07 20 20 cd 0d 11 |nting").|.&. ...|
|000030a0| 30 19 20 c9 20 4d 65 73 | 73 61 67 65 5f 50 72 69 |0. . Mes|sage_Pri|
|000030b0| 6e 74 49 6e 69 74 25 0d | 11 3a 0c 20 20 f2 69 6e |ntInit%.|.:. .in|
|000030c0| 69 74 32 0d 11 44 12 20 | 20 70 6f 6c 6c 5f 6d 61 |it2..D. | poll_ma|
|000030d0| 73 6b 25 3d 31 0d 11 4e | 1c 20 c9 20 4d 65 73 73 |sk%=1..N|. . Mess|
|000030e0| 61 67 65 5f 50 72 69 6e | 74 54 79 70 65 4f 64 64 |age_Prin|tTypeOdd|
|000030f0| 25 0d 11 58 13 20 20 74 | 79 70 65 5f 73 74 61 74 |%..X. t|ype_stat|
|00003100| 65 25 3d 31 0d 11 62 12 | 20 20 70 72 69 6e 74 5f |e%=1..b.| print_|
|00003110| 72 65 66 25 3d 30 0d 11 | 6c 05 cb 0d 11 76 05 e1 |ref%=0..|l....v..|
|00003120| 0d 11 80 05 3a 0d 11 8a | 10 dd a4 63 68 65 63 6b |....:...|...check|
|00003130| 5f 74 79 70 65 0d 11 94 | 14 ea 20 4c 25 2c 70 73 |_type...|.. L%,ps|
|00003140| 72 25 2c 20 74 79 70 65 | 24 0d 11 9e 0d 41 6c 69 |r%, type|$....Ali|
|00003150| 61 73 24 3d 22 22 0d 11 | a8 40 f4 20 69 66 20 61 |as$=""..|.@. if a|
|00003160| 6e 20 41 6c 69 61 73 24 | 40 50 72 69 6e 74 54 79 |n Alias$|@PrintTy|
|00003170| 70 65 5f 3c 46 74 79 70 | 65 25 3e 20 65 78 69 73 |pe_<Ftyp|e%> exis|
|00003180| 74 73 20 74 68 65 6e 20 | 70 72 69 6e 74 20 76 69 |ts then |print vi|
|00003190| 61 20 74 68 61 74 0d 11 | b2 14 74 79 70 65 24 20 |a that..|..type$ |
|000031a0| 3d 20 c3 7e 46 74 79 70 | 65 25 0d 11 bc 2f e7 20 |= .~Ftyp|e%.../. |
|000031b0| a9 74 79 70 65 24 20 3c | 20 33 20 8c 20 74 79 70 |.type$ <| 3 . typ|
|000031c0| 65 24 20 3d 20 c4 33 2d | a9 74 79 70 65 24 2c 22 |e$ = .3-|.type$,"|
|000031d0| 30 22 29 2b 74 79 70 65 | 24 0d 11 c6 3b c8 99 22 |0")+type|$...;.."|
|000031e0| 58 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 22 2c |XOS_Read|VarVal",|
|000031f0| 22 41 6c 69 61 73 24 40 | 50 72 69 6e 74 54 79 70 |"Alias$@|PrintTyp|
|00003200| 65 5f 22 2b 74 79 70 65 | 24 2c 2c 2d 31 20 b8 20 |e_"+type|$,,-1 . |
|00003210| 2c 2c 4c 25 0d 11 d0 2e | e7 20 4c 25 20 3c 20 30 |,,L%....|. L% < 0|
|00003220| 20 8c 20 41 6c 69 61 73 | 24 3d 22 40 50 72 69 6e | . Alias|$="@Prin|
|00003230| 74 54 79 70 65 5f 22 2b | 74 79 70 65 24 3a 20 3d |tType_"+|type$: =|
|00003240| 20 b9 0d 11 da 4d e7 20 | 46 74 79 70 65 25 20 3d | ....M. |Ftype% =|
|00003250| 20 26 46 46 46 20 84 20 | 46 74 79 70 65 25 20 3d | &FFF . |Ftype% =|
|00003260| 20 26 46 46 45 20 84 20 | 46 74 79 70 65 25 20 3d | &FFE . |Ftype% =|
|00003270| 20 26 46 45 42 20 84 20 | 46 74 79 70 65 25 3d 4f | &FEB . |Ftype%=O|
|00003280| 75 74 70 75 74 54 79 70 | 65 25 20 8c 20 3d b9 0d |utputTyp|e% . =..|
|00003290| 11 e4 35 f4 20 74 65 78 | 74 2c 20 65 78 65 63 20 |..5. tex|t, exec |
|000032a0| 61 6e 64 20 6f 62 65 79 | 20 66 69 6c 65 73 20 61 |and obey| files a|
|000032b0| 72 65 20 61 6c 6c 20 73 | 74 72 61 69 67 68 74 20 |re all s|traight |
|000032c0| 74 65 78 74 0d 11 ee 38 | e7 20 46 74 79 70 65 25 |text...8|. Ftype%|
|000032d0| 20 3d 20 26 31 30 30 30 | 20 8c 20 f2 6d 6f 61 6e | = &1000| . .moan|
|000032e0| 28 22 43 61 6e 6e 6f 74 | 20 70 72 69 6e 74 20 64 |("Cannot| print d|
|000032f0| 69 72 65 63 74 6f 72 69 | 65 73 22 29 0d 11 f8 39 |irectori|es")...9|
|00003300| e7 20 46 74 79 70 65 25 | 20 3d 20 26 32 30 30 30 |. Ftype%| = &2000|
|00003310| 20 8c 20 f2 6d 6f 61 6e | 28 22 43 61 6e 6e 6f 74 | . .moan|("Cannot|
|00003320| 20 70 72 69 6e 74 20 61 | 70 70 6c 69 63 61 74 69 | print a|pplicati|
|00003330| 6f 6e 73 22 29 0d 12 02 | 16 e7 20 46 74 79 70 65 |ons")...|.. Ftype|
|00003340| 25 20 3d 20 26 33 30 30 | 30 20 8c 0d 12 0c 1f 20 |% = &300|0 ..... |
|00003350| 24 65 72 72 6f 72 5f 62 | 6c 6b 25 20 3d 20 22 61 |$error_b|lk% = "a|
|00003360| 6e 20 75 6e 74 79 70 65 | 64 22 0d 12 16 05 cc 0d |n untype|d"......|
|00003370| 12 20 45 20 c8 99 22 58 | 4f 53 5f 52 65 61 64 56 |. E .."X|OS_ReadV|
|00003380| 61 72 56 61 6c 22 2c 22 | 46 69 6c 65 24 54 79 70 |arVal","|File$Typ|
|00003390| 65 5f 22 2b 74 79 70 65 | 24 2c 65 72 72 6f 72 5f |e_"+type|$,error_|
|000033a0| 62 6c 6b 25 2c 31 30 30 | 20 b8 20 2c 2c 4c 25 3b |blk%,100| . ,,L%;|
|000033b0| 70 73 72 25 0d 12 2a 44 | 20 e7 20 70 73 72 25 20 |psr%..*D| . psr% |
|000033c0| 80 20 31 20 8c 20 24 65 | 72 72 6f 72 5f 62 6c 6b |. 1 . $e|rror_blk|
|000033d0| 25 3d 22 74 79 70 65 20 | 26 22 2b c3 7e 46 74 79 |%="type |&"+.~Fty|
|000033e0| 70 65 25 20 8b 20 65 72 | 72 6f 72 5f 62 6c 6b 25 |pe% . er|ror_blk%|
|000033f0| 3f 4c 25 20 3d 20 31 33 | 0d 12 34 05 cd 0d 12 3e |?L% = 13|..4....>|
|00003400| 50 3d a4 63 6f 6e 66 69 | 72 6d 28 22 54 68 69 73 |P=.confi|rm("This|
|00003410| 20 69 73 20 61 20 22 2b | 24 65 72 72 6f 72 5f 62 | is a "+|$error_b|
|00003420| 6c 6b 25 2b 22 20 66 69 | 6c 65 3b 20 64 6f 20 79 |lk%+" fi|le; do y|
|00003430| 6f 75 20 72 65 61 6c 6c | 79 20 77 61 6e 74 20 74 |ou reall|y want t|
|00003440| 6f 20 70 72 69 6e 74 20 | 69 74 3f 22 29 0d 12 48 |o print |it?")..H|
|00003450| 05 3a 0d 12 52 17 dd a4 | 63 6f 6e 66 69 72 6d 28 |.:..R...|confirm(|
|00003460| 6d 65 73 73 61 67 65 24 | 29 0d 12 5c 11 ea 20 53 |message$|)..\.. S|
|00003470| 25 2c 20 61 63 74 69 6f | 6e 25 0d 12 66 1c 53 25 |%, actio|n%..f.S%|
|00003480| 3d a4 69 63 6f 6e 61 64 | 64 72 28 63 6f 6e 66 69 |=.iconad|dr(confi|
|00003490| 72 6d 25 2c 30 29 0d 12 | 70 10 24 53 25 3d 6d 65 |rm%,0)..|p.$S%=me|
|000034a0| 73 73 61 67 65 24 0d 12 | 7a 0f f2 67 65 74 70 6f |ssage$..|z..getpo|
|000034b0| 69 6e 74 65 72 0d 12 84 | 3a c8 99 20 22 57 69 6d |inter...|:.. "Wim|
|000034c0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 63 |p_Create|Menu",,c|
|000034d0| 6f 6e 66 69 72 6d 25 2c | 6d 6f 75 73 65 78 25 2d |onfirm%,|mousex%-|
|000034e0| 32 30 30 2c 6d 6f 75 73 | 65 79 25 2b 32 30 30 0d |200,mous|ey%+200.|
|000034f0| 12 8e 17 63 6f 6e 66 69 | 72 6d 5f 61 6e 73 77 65 |...confi|rm_answe|
|00003500| 72 25 20 3d 20 32 0d 12 | 98 05 f5 0d 12 a2 2f 20 |r% = 2..|....../ |
|00003510| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 70 |.. "Wimp|_Poll",p|
|00003520| 6f 6c 6c 5f 6d 61 73 6b | 25 2c 65 76 65 6e 74 25 |oll_mask|%,event%|
|00003530| 20 b8 20 61 63 74 69 6f | 6e 25 0d 12 ac 13 20 f2 | . actio|n%.... .|
|00003540| 64 65 73 70 61 74 63 68 | 5f 70 6f 6c 6c 0d 12 b6 |despatch|_poll...|
|00003550| 1a fd 20 63 6f 6e 66 69 | 72 6d 5f 61 6e 73 77 65 |.. confi|rm_answe|
|00003560| 72 25 20 3c 3e 20 32 0d | 12 c0 14 f2 63 6c 6f 73 |r% <> 2.|....clos|
|00003570| 65 28 63 6f 6e 66 69 72 | 6d 25 29 0d 12 ca 14 3d |e(confir|m%)....=|
|00003580| 63 6f 6e 66 69 72 6d 5f | 61 6e 73 77 65 72 25 0d |confirm_|answer%.|
|00003590| 12 d4 05 3a 0d 12 de 10 | dd f2 65 6e 64 63 6f 6e |...:....|..endcon|
|000035a0| 66 69 72 6d 0d 12 e8 2d | e7 20 63 6f 6e 66 69 72 |firm...-|. confir|
|000035b0| 6d 5f 61 6e 73 77 65 72 | 25 20 3d 20 32 20 8c 20 |m_answer|% = 2 . |
|000035c0| 63 6f 6e 66 69 72 6d 5f | 61 6e 73 77 65 72 25 3d |confirm_|answer%=|
|000035d0| a3 0d 12 f2 2e f4 20 46 | 4e 63 6f 6e 66 69 72 6d |...... F|Nconfirm|
|000035e0| 20 63 6c 6f 73 65 73 20 | 74 68 65 20 77 69 6e 64 | closes |the wind|
|000035f0| 6f 77 20 69 66 20 6e 65 | 63 65 73 73 61 72 79 0d |ow if ne|cessary.|
|00003600| 12 fc 05 e1 0d 13 06 05 | 3a 0d 13 10 0f dd 20 a4 |........|:..... .|
|00003610| 72 74 6f 7a 28 73 25 29 | 0d 13 1a 08 ea 20 6e 24 |rtoz(s%)|..... n$|
|00003620| 0d 13 24 1a c8 95 3f 73 | 25 3a 6e 24 2b 3d bd 3f |..$...?s|%:n$+=.?|
|00003630| 73 25 3a 73 25 2b 3d 31 | 3a ce 0d 13 2e 07 3d 6e |s%:s%+=1|:.....=n|
|00003640| 24 0d 13 38 05 3a 0d 13 | 42 0b dd 20 f2 63 6f 70 |$..8.:..|B.. .cop|
|00003650| 79 0d 13 4c 08 ea 20 4c | 25 0d 13 56 07 ea 20 85 |y..L.. L|%..V.. .|
|00003660| 0d 13 60 2c ee 20 85 20 | ea 20 f7 20 85 3a f2 65 |..`,. . |. . .:.e|
|00003670| 72 72 6f 72 28 9f 2c 20 | f6 24 29 3a f2 73 74 6f |rror(., |.$):.sto|
|00003680| 70 5f 70 72 69 6e 74 69 | 6e 67 3a e1 0d 13 6a 0d |p_printi|ng:...j.|
|00003690| e7 20 73 65 6e 74 25 20 | 8c 0d 13 74 15 20 e7 20 |. sent% |...t. . |
|000036a0| 96 28 2d 34 29 3e 3d 70 | 62 75 66 25 20 8c 0d 13 |.(-4)>=p|buf% ...|
|000036b0| 7e 15 20 20 f2 50 72 69 | 6e 74 65 72 5f 46 6f 6f |~. .Pri|nter_Foo|
|000036c0| 74 65 72 0d 13 88 1b 20 | 20 d9 23 69 6e 5f 66 69 |ter.... | .#in_fi|
|000036d0| 6c 65 25 3a 69 6e 5f 66 | 69 6c 65 25 3d 30 0d 13 |le%:in_f|ile%=0..|
|000036e0| 92 2c 20 20 f2 45 73 63 | 4f 6e 3a d9 23 6f 75 74 |., .Esc|On:.#out|
|000036f0| 5f 66 69 6c 65 25 3a 6f | 75 74 5f 66 69 6c 65 25 |_file%:o|ut_file%|
|00003700| 3d 30 3a f2 45 73 63 4f | 66 66 0d 13 9c 14 20 20 |=0:.EscO|ff.... |
|00003710| f2 73 74 6f 70 5f 70 72 | 69 6e 74 69 6e 67 0d 13 |.stop_pr|inting..|
|00003720| a6 06 20 cd 0d 13 b0 05 | cc 0d 13 ba 2a 20 e7 20 |.. .....|....* . |
|00003730| 6c 6f 63 61 74 69 6f 6e | 5f 6e 65 77 25 3d 31 20 |location|_new%=1 |
|00003740| 84 20 6c 6f 63 61 74 69 | 6f 6e 5f 6e 65 77 25 3d |. locati|on_new%=|
|00003750| 32 20 8c 0d 13 c4 0e 20 | 20 4c 25 3d 96 28 2d 34 |2 ..... | L%=.(-4|
|00003760| 29 0d 13 ce 1b 20 20 e7 | 20 4c 25 3e 62 75 66 73 |).... .| L%>bufs|
|00003770| 7a 25 20 4c 25 3d 62 75 | 66 73 7a 25 0d 13 d8 06 |z% L%=bu|fsz%....|
|00003780| 20 cc 0d 13 e2 0c 20 20 | 4c 25 3d 31 32 38 0d 13 | ..... |L%=128..|
|00003790| ec 06 20 cd 0d 13 f6 1c | 20 73 65 6e 74 25 3d a4 |.. .....| sent%=.|
|000037a0| 50 72 69 6e 74 65 72 5f | 53 65 6e 64 28 4c 25 29 |Printer_|Send(L%)|
|000037b0| 0d 14 00 05 cd 0d 14 0a | 05 e1 0d 14 14 05 3a 0d |........|......:.|
|000037c0| 14 1e 13 dd f2 73 74 6f | 70 5f 70 72 69 6e 74 69 |.....sto|p_printi|
|000037d0| 6e 67 0d 14 28 17 f2 73 | 65 74 5f 70 72 69 6e 74 |ng..(..s|et_print|
|000037e0| 5f 73 74 61 74 65 28 a3 | 29 0d 14 32 1d f2 63 68 |_state(.|)..2..ch|
|000037f0| 61 6e 67 65 5f 69 63 6f | 6e 3a f2 75 70 64 61 74 |ange_ico|n:.updat|
|00003800| 65 5f 69 63 6f 6e 0d 14 | 3c 31 e7 20 69 6e 5f 66 |e_icon..|<1. in_f|
|00003810| 69 6c 65 25 20 c8 99 22 | 58 4f 53 5f 46 69 6e 64 |ile% .."|XOS_Find|
|00003820| 22 2c 30 2c 69 6e 5f 66 | 69 6c 65 25 3a 69 6e 5f |",0,in_f|ile%:in_|
|00003830| 66 69 6c 65 25 3d 30 0d | 14 46 43 e7 20 6f 75 74 |file%=0.|.FC. out|
|00003840| 5f 66 69 6c 65 25 20 f2 | 45 73 63 4f 6e 3a c8 99 |_file% .|EscOn:..|
|00003850| 22 58 4f 53 5f 46 69 6e | 64 22 2c 30 2c 6f 75 74 |"XOS_Fin|d",0,out|
|00003860| 5f 66 69 6c 65 25 3a 6f | 75 74 5f 66 69 6c 65 25 |_file%:o|ut_file%|
|00003870| 3d 30 3a f2 45 73 63 4f | 66 66 0d 14 50 3a e7 20 |=0:.EscO|ff..P:. |
|00003880| 66 69 6c 65 6e 61 6d 24 | 20 3d 20 22 3c 50 72 69 |filenam$| = "<Pri|
|00003890| 6e 74 65 72 24 53 63 72 | 61 70 3e 22 20 8c 20 ff |nter$Scr|ap>" . .|
|000038a0| 28 22 72 65 6d 6f 76 65 | 20 22 2b 66 69 6c 65 6e |("remove| "+filen|
|000038b0| 61 6d 24 29 0d 14 5a 39 | e7 20 66 69 6c 65 6e 61 |am$)..Z9|. filena|
|000038c0| 6d 24 20 3d 20 22 3c 50 | 72 69 6e 74 65 72 24 54 |m$ = "<P|rinter$T|
|000038d0| 65 6d 70 3e 22 20 8c 20 | ff 28 22 72 65 6d 6f 76 |emp>" . |.("remov|
|000038e0| 65 20 22 2b 66 69 6c 65 | 6e 61 6d 24 29 0d 14 64 |e "+file|nam$)..d|
|000038f0| 2e f4 20 64 65 6c 65 74 | 65 20 74 68 65 20 73 63 |.. delet|e the sc|
|00003900| 72 61 70 20 66 69 6c 65 | 3a 20 6e 6f 77 20 66 69 |rap file|: now fi|
|00003910| 6e 69 73 68 65 64 20 77 | 69 74 68 0d 14 6e 10 f2 |nished w|ith..n..|
|00003920| 75 70 64 61 74 65 5f 69 | 63 6f 6e 0d 14 78 05 e1 |update_i|con..x..|
|00003930| 0d 14 82 05 3a 0d 14 8c | 40 dd 20 f2 6d 6f 75 73 |....:...|@. .mous|
|00003940| 65 28 6d 6f 75 73 65 78 | 25 2c 6d 6f 75 73 65 79 |e(mousex|%,mousey|
|00003950| 25 2c 62 75 74 74 6f 6e | 73 25 2c 68 61 6e 64 6c |%,button|s%,handl|
|00003960| 65 25 2c 69 63 6f 6e 25 | 2c 6f 6c 64 62 75 74 74 |e%,icon%|,oldbutt|
|00003970| 6f 6e 73 25 29 0d 14 96 | 11 c8 8e 20 62 75 74 74 |ons%)...|... butt|
|00003980| 6f 6e 73 25 20 ca 0d 14 | a0 1b 20 c9 20 34 3a 20 |ons% ...|.. . 4: |
|00003990| f4 20 6c 65 66 74 20 68 | 61 6e 64 20 63 6c 69 63 |. left h|and clic|
|000039a0| 6b 0d 14 aa 12 20 20 c8 | 8e 20 68 61 6e 64 6c 65 |k.... .|. handle|
|000039b0| 25 20 ca 0d 14 b4 0c 20 | 20 20 c9 20 2d 32 3a 0d |% ..... | . -2:.|
|000039c0| 14 be 15 20 20 20 20 f2 | 66 72 6f 6e 74 28 6d 61 |... .|front(ma|
|000039d0| 69 6e 25 29 0d 14 c8 12 | 20 20 20 c9 20 63 6f 6e |in%)....| . con|
|000039e0| 66 69 72 6d 25 3a 0d 14 | d2 25 20 20 20 20 e7 20 |firm%:..|.% . |
|000039f0| 69 63 6f 6e 25 3d 31 20 | 8c 20 63 6f 6e 66 69 72 |icon%=1 |. confir|
|00003a00| 6d 5f 61 6e 73 77 65 72 | 25 3d b9 0d 14 dc 25 20 |m_answer|%=....% |
|00003a10| 20 20 20 e7 20 69 63 6f | 6e 25 3d 32 20 8c 20 63 | . ico|n%=2 . c|
|00003a20| 6f 6e 66 69 72 6d 5f 61 | 6e 73 77 65 72 25 3d a3 |onfirm_a|nswer%=.|
|00003a30| 0d 14 e6 07 20 20 cb 0d | 14 f0 17 20 c9 20 32 3a |.... ..|... . 2:|
|00003a40| 20 f4 20 6d 65 6e 75 20 | 62 75 74 74 6f 6e 0d 14 | . menu |button..|
|00003a50| fa 12 20 20 c8 8e 20 68 | 61 6e 64 6c 65 25 20 ca |.. .. h|andle% .|
|00003a60| 0d 15 04 1e 20 20 20 c9 | 20 2d 32 3a 20 f2 6d 65 |.... .| -2: .me|
|00003a70| 6e 75 28 70 72 69 6e 74 | 6d 65 6e 75 25 29 0d 15 |nu(print|menu%)..|
|00003a80| 0e 06 20 cb 0d 15 18 05 | cb 0d 15 22 05 e1 0d 15 |.. .....|..."....|
|00003a90| 2c 05 3a 0d 15 36 25 dd | 20 f2 64 65 63 6f 64 65 |,.:..6%.| .decode|
|00003aa0| 6d 65 6e 75 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |menu(men|uhandle%|
|00003ab0| 2c 6d 65 6e 75 73 25 29 | 0d 15 40 14 c8 8e 20 6d |,menus%)|..@... m|
|00003ac0| 65 6e 75 68 61 6e 64 6c | 65 25 20 ca 0d 15 4a 11 |enuhandl|e% ...J.|
|00003ad0| 20 c9 20 70 72 69 6e 74 | 6d 65 6e 75 25 0d 15 54 | . print|menu%..T|
|00003ae0| 23 20 20 e7 20 70 72 69 | 6e 74 5f 6f 6e 25 20 80 |# . pri|nt_on% .|
|00003af0| 20 28 21 6d 65 6e 75 73 | 25 3c 35 29 20 8c 20 e1 | (!menus|%<5) . .|
|00003b00| 0d 15 5e 12 20 20 c8 8e | 20 21 6d 65 6e 75 73 25 |..^. ..| !menus%|
|00003b10| 20 ca 0d 15 68 0a 20 20 | 20 c9 20 31 0d 15 72 21 | ...h. | . 1..r!|
|00003b20| 20 20 20 20 f2 74 69 63 | 6b 69 74 28 70 72 69 6e | .tic|kit(prin|
|00003b30| 74 6d 65 6e 75 25 2c 20 | 31 2c 20 34 29 0d 15 7c |tmenu%, |1, 4)..||
|00003b40| 19 20 20 20 20 6c 6f 63 | 61 74 69 6f 6e 5f 6e 65 |. loc|ation_ne|
|00003b50| 77 25 20 3d 20 31 0d 15 | 86 0f 20 20 20 20 2a 46 |w% = 1..|.. *F|
|00003b60| 58 20 35 2c 31 0d 15 90 | 0a 20 20 20 c9 20 32 0d |X 5,1...|. . 2.|
|00003b70| 15 9a 17 20 20 20 20 f2 | 50 72 69 6e 74 65 72 5f |... .|Printer_|
|00003b80| 49 67 6e 6f 72 65 0d 15 | a4 27 20 20 20 20 f2 64 |Ignore..|.' .d|
|00003b90| 65 63 6f 64 65 6d 65 6e | 75 28 73 65 72 69 61 6c |ecodemen|u(serial|
|00003ba0| 6d 25 2c 20 6d 65 6e 75 | 73 25 2b 34 29 0d 15 ae |m%, menu|s%+4)...|
|00003bb0| 21 20 20 20 20 f2 74 69 | 63 6b 69 74 28 70 72 69 |! .ti|ckit(pri|
|00003bc0| 6e 74 6d 65 6e 75 25 2c | 20 32 2c 20 34 29 0d 15 |ntmenu%,| 2, 4)..|
|00003bd0| b8 19 20 20 20 20 6c 6f | 63 61 74 69 6f 6e 5f 6e |.. lo|cation_n|
|00003be0| 65 77 25 20 3d 20 32 0d | 15 c2 24 20 20 20 20 c8 |ew% = 2.|..$ .|
|00003bf0| 99 20 22 4f 53 5f 42 79 | 74 65 22 2c 20 38 2c 20 |. "OS_By|te", 8, |
|00003c00| 62 61 75 64 5f 6e 65 77 | 25 2b 31 0d 15 cc 24 20 |baud_new|%+1...$ |
|00003c10| 20 20 20 c8 99 20 22 4f | 53 5f 42 79 74 65 22 2c | .. "O|S_Byte",|
|00003c20| 20 37 2c 20 62 61 75 64 | 5f 6e 65 77 25 2b 31 0d | 7, baud|_new%+1.|
|00003c30| 15 d6 24 20 20 20 20 c8 | 99 20 22 4f 53 5f 53 65 |..$ .|. "OS_Se|
|00003c40| 72 69 61 6c 4f 70 22 2c | 31 2c 64 61 74 61 5f 6e |rialOp",|1,data_n|
|00003c50| 65 77 25 0d 15 e0 27 20 | 20 20 20 c8 99 20 22 4f |ew%...' | .. "O|
|00003c60| 53 5f 53 65 72 69 61 6c | 4f 70 22 2c 30 2c 58 4f |S_Serial|Op",0,XO|
|00003c70| 4e 5f 6e 65 77 25 2c ac | 20 31 0d 15 ea 22 20 20 |N_new%,.| 1..." |
|00003c80| 20 20 f2 50 72 69 6e 74 | 65 72 5f 58 6f 6e 58 6f | .Print|er_XonXo|
|00003c90| 66 66 28 58 4f 4e 5f 6e | 65 77 25 29 0d 15 f4 0f |ff(XON_n|ew%)....|
|00003ca0| 20 20 20 20 2a 46 58 20 | 35 2c 32 0d 15 fe 0a 20 | *FX |5,2.... |
|00003cb0| 20 20 c9 20 33 0d 16 08 | 29 20 20 20 20 f2 64 65 | . 3...|) .de|
|00003cc0| 63 6f 64 65 6d 65 6e 75 | 28 6e 65 74 70 72 69 6e |codemenu|(netprin|
|00003cd0| 74 6d 25 2c 20 6d 65 6e | 75 73 25 2b 34 29 0d 16 |tm%, men|us%+4)..|
|00003ce0| 12 21 20 20 20 20 f2 74 | 69 63 6b 69 74 28 70 72 |.! .t|ickit(pr|
|00003cf0| 69 6e 74 6d 65 6e 75 25 | 2c 20 33 2c 20 34 29 0d |intmenu%|, 3, 4).|
|00003d00| 16 1c 19 20 20 20 20 6c | 6f 63 61 74 69 6f 6e 5f |... l|ocation_|
|00003d10| 6e 65 77 25 20 3d 20 34 | 0d 16 26 27 20 20 20 20 |new% = 4|..&' |
|00003d20| c8 99 20 22 58 4f 53 5f | 43 4c 49 22 2c 22 50 53 |.. "XOS_|CLI","PS|
|00003d30| 20 22 2b 24 73 65 72 76 | 65 72 5f 6e 65 77 25 0d | "+$serv|er_new%.|
|00003d40| 16 30 0f 20 20 20 20 2a | 46 58 20 35 2c 34 0d 16 |.0. *|FX 5,4..|
|00003d50| 3a 0a 20 20 20 c9 20 34 | 0d 16 44 17 20 20 20 20 |:. . 4|..D. |
|00003d60| 6c 6f 63 61 74 69 6f 6e | 5f 6e 65 77 25 3d 35 0d |location|_new%=5.|
|00003d70| 16 4e 21 20 20 20 20 f2 | 74 69 63 6b 69 74 28 70 |.N! .|tickit(p|
|00003d80| 72 69 6e 74 6d 65 6e 75 | 25 2c 20 34 2c 20 34 29 |rintmenu|%, 4, 4)|
|00003d90| 0d 16 58 42 20 20 20 20 | e7 20 a9 24 66 69 6c 65 |..XB |. .$file|
|00003da0| 5f 6e 61 6d 65 25 3d 30 | 20 8c 20 24 66 69 6c 65 |_name%=0| . $file|
|00003db0| 5f 6e 61 6d 65 25 3d 22 | 3c 50 44 72 69 76 65 72 |_name%="|<PDriver|
|00003dc0| 24 44 69 72 3e 2e 5e 2e | 50 72 69 6e 74 44 61 74 |$Dir>.^.|PrintDat|
|00003dd0| 61 22 0d 16 62 35 20 20 | 20 20 c8 99 20 22 58 4f |a"..b5 | .. "XO|
|00003de0| 53 5f 43 4c 49 22 2c 22 | 53 65 74 20 50 72 69 6e |S_CLI","|Set Prin|
|00003df0| 74 65 72 54 79 70 65 24 | 35 20 22 2b 24 66 69 6c |terType$|5 "+$fil|
|00003e00| 65 5f 6e 61 6d 65 25 0d | 16 6c 0e 20 20 20 20 f2 |e_name%.|.l. .|
|00003e10| 73 74 61 6d 70 0d 16 76 | 0f 20 20 20 20 2a 46 58 |stamp..v|. *FX|
|00003e20| 20 35 2c 35 0d 16 80 0a | 20 20 20 c9 20 35 0d 16 | 5,5....| . 5..|
|00003e30| 8a 13 20 20 20 20 f2 53 | 61 76 65 43 6f 6e 66 69 |.. .S|aveConfi|
|00003e40| 67 0d 16 94 0a 20 20 20 | c9 20 36 0d 16 9e 15 20 |g.... |. 6.... |
|00003e50| 20 20 20 e7 20 70 72 69 | 6e 74 5f 6f 6e 25 20 8c | . pri|nt_on% .|
|00003e60| 0d 16 a8 11 20 20 20 20 | 20 2a 46 58 20 32 31 2c |.... | *FX 21,|
|00003e70| 33 0d 16 b2 17 20 20 20 | 20 20 f2 73 74 6f 70 5f |3.... | .stop_|
|00003e80| 70 72 69 6e 74 69 6e 67 | 0d 16 bc 09 20 20 20 20 |printing|.... |
|00003e90| cd 0d 16 c6 0a 20 20 20 | c9 20 37 0d 16 d0 15 20 |..... |. 7.... |
|00003ea0| 20 20 20 e7 20 70 72 69 | 6e 74 5f 6f 6e 25 20 8c | . pri|nt_on% .|
|00003eb0| 0d 16 da 11 20 20 20 20 | 20 2a 46 58 20 32 31 2c |.... | *FX 21,|
|00003ec0| 33 0d 16 e4 17 20 20 20 | 20 20 f2 73 74 6f 70 5f |3.... | .stop_|
|00003ed0| 70 72 69 6e 74 69 6e 67 | 0d 16 ee 09 20 20 20 20 |printing|.... |
|00003ee0| cd 0d 16 f8 12 20 20 20 | 20 f2 74 65 72 6d 69 6e |..... | .termin|
|00003ef0| 61 74 65 0d 17 02 07 20 | 20 cb 0d 17 0c 12 20 20 |ate.... | ..... |
|00003f00| f2 63 68 61 6e 67 65 5f | 69 63 6f 6e 0d 17 16 0f |.change_|icon....|
|00003f10| 20 c9 20 73 65 72 69 61 | 6c 6d 25 0d 17 20 12 20 | . seria|lm%.. . |
|00003f20| 20 c8 8e 20 21 6d 65 6e | 75 73 25 20 ca 0d 17 2a | .. !men|us% ...*|
|00003f30| 0a 20 20 20 c9 20 30 0d | 17 34 25 20 20 20 20 f2 |. . 0.|.4% .|
|00003f40| 64 65 63 6f 64 65 6d 65 | 6e 75 28 62 61 75 64 6d |decodeme|nu(baudm|
|00003f50| 25 2c 20 6d 65 6e 75 73 | 25 2b 34 29 0d 17 3e 0a |%, menus|%+4)..>.|
|00003f60| 20 20 20 c9 20 31 0d 17 | 48 25 20 20 20 20 f2 64 | . 1..|H% .d|
|00003f70| 65 63 6f 64 65 6d 65 6e | 75 28 64 61 74 61 6d 25 |ecodemen|u(datam%|
|00003f80| 2c 20 6d 65 6e 75 73 25 | 2b 34 29 0d 17 52 0a 20 |, menus%|+4)..R. |
|00003f90| 20 20 c9 20 32 0d 17 5c | 1f 20 20 20 20 58 4f 4e | . 2..\|. XON|
|00003fa0| 5f 6e 65 77 25 20 3d 20 | 58 4f 4e 5f 6e 65 77 25 |_new% = |XON_new%|
|00003fb0| 20 82 20 31 0d 17 66 26 | 20 20 20 20 f2 73 65 74 | . 1..f&| .set|
|00003fc0| 5f 74 69 63 6b 28 73 65 | 72 69 61 6c 6d 25 2c 32 |_tick(se|rialm%,2|
|00003fd0| 2c 58 4f 4e 5f 6e 65 77 | 25 29 0d 17 70 07 20 20 |,XON_new|%)..p. |
|00003fe0| cb 0d 17 7a 0d 20 c9 20 | 62 61 75 64 6d 25 0d 17 |...z. . |baudm%..|
|00003ff0| 84 17 20 20 e7 20 21 6d | 65 6e 75 73 25 20 3c 3e |.. . !m|enus% <>|
|00004000| 20 2d 31 20 8c 0d 17 8e | 23 20 20 20 f2 74 69 63 | -1 ....|# .tic|
|00004010| 6b 69 74 28 62 61 75 64 | 6d 25 2c 20 21 6d 65 6e |kit(baud|m%, !men|
|00004020| 75 73 25 2c 20 31 34 29 | 0d 17 98 18 20 20 20 62 |us%, 14)|.... b|
|00004030| 61 75 64 5f 6e 65 77 25 | 3d 21 6d 65 6e 75 73 25 |aud_new%|=!menus%|
|00004040| 0d 17 a2 07 20 20 cd 0d | 17 ac 0d 20 c9 20 64 61 |.... ..|... . da|
|00004050| 74 61 6d 25 0d 17 b6 12 | 20 20 c8 8e 20 21 6d 65 |tam%....| .. !me|
|00004060| 6e 75 73 25 20 ca 0d 17 | c0 0a 20 20 20 c9 20 30 |nus% ...|.. . 0|
|00004070| 0d 17 ca 25 20 20 20 20 | f2 64 65 63 6f 64 65 6d |...% |.decodem|
|00004080| 65 6e 75 28 62 69 74 73 | 6d 25 2c 20 6d 65 6e 75 |enu(bits|m%, menu|
|00004090| 73 25 2b 34 29 0d 17 d4 | 0a 20 20 20 c9 20 31 0d |s%+4)...|. . 1.|
|000040a0| 17 de 27 20 20 20 20 f2 | 64 65 63 6f 64 65 6d 65 |..' .|decodeme|
|000040b0| 6e 75 28 70 61 72 69 74 | 79 6d 25 2c 20 6d 65 6e |nu(parit|ym%, men|
|000040c0| 75 73 25 2b 34 29 0d 17 | e8 0a 20 20 20 c9 20 32 |us%+4)..|.. . 2|
|000040d0| 0d 17 f2 25 20 20 20 20 | f2 64 65 63 6f 64 65 6d |...% |.decodem|
|000040e0| 65 6e 75 28 73 74 6f 70 | 6d 25 2c 20 6d 65 6e 75 |enu(stop|m%, menu|
|000040f0| 73 25 2b 34 29 0d 17 fc | 07 20 20 cb 0d 18 06 0d |s%+4)...|. .....|
|00004100| 20 c9 20 62 69 74 73 6d | 25 0d 18 10 17 20 20 e7 | . bitsm|%.... .|
|00004110| 20 21 6d 65 6e 75 73 25 | 20 3c 3e 20 2d 31 20 8c | !menus%| <> -1 .|
|00004120| 0d 18 1a 30 20 20 20 64 | 61 74 61 5f 6e 65 77 25 |...0 d|ata_new%|
|00004130| 3d 28 64 61 74 61 5f 6e | 65 77 25 20 80 20 25 31 |=(data_n|ew% . %1|
|00004140| 31 31 31 30 30 29 2b 33 | 2d 21 6d 65 6e 75 73 25 |11100)+3|-!menus%|
|00004150| 0d 18 24 22 20 20 20 f2 | 74 69 63 6b 69 74 28 62 |..$" .|tickit(b|
|00004160| 69 74 73 6d 25 2c 20 21 | 6d 65 6e 75 73 25 2c 20 |itsm%, !|menus%, |
|00004170| 33 29 0d 18 2e 07 20 20 | cd 0d 18 38 0f 20 c9 20 |3).... |...8. . |
|00004180| 70 61 72 69 74 79 6d 25 | 0d 18 42 17 20 20 e7 20 |paritym%|..B. . |
|00004190| 21 6d 65 6e 75 73 25 20 | 3c 3e 20 2d 31 20 8c 0d |!menus% |<> -1 ..|
|000041a0| 18 4c 12 20 20 20 e7 20 | 21 6d 65 6e 75 73 25 20 |.L. . |!menus% |
|000041b0| 8c 0d 18 56 39 20 20 20 | 20 64 61 74 61 5f 6e 65 |...V9 | data_ne|
|000041c0| 77 25 20 3d 20 28 64 61 | 74 61 5f 6e 65 77 25 20 |w% = (da|ta_new% |
|000041d0| 80 20 25 31 31 31 29 2b | 38 2b 28 28 21 6d 65 6e |. %111)+|8+((!men|
|000041e0| 75 73 25 2d 31 29 3c 3c | 34 29 0d 18 60 08 20 20 |us%-1)<<|4)..`. |
|000041f0| 20 cc 0d 18 6a 27 20 20 | 20 20 64 61 74 61 5f 6e | ...j' | data_n|
|00004200| 65 77 25 20 3d 20 64 61 | 74 61 5f 6e 65 77 25 20 |ew% = da|ta_new% |
|00004210| 80 20 ac 28 31 3c 3c 33 | 29 0d 18 74 08 20 20 20 |. .(1<<3|)..t. |
|00004220| cd 0d 18 7e 24 20 20 20 | f2 74 69 63 6b 69 74 28 |...~$ |.tickit(|
|00004230| 70 61 72 69 74 79 6d 25 | 2c 20 21 6d 65 6e 75 73 |paritym%|, !menus|
|00004240| 25 2c 20 34 29 0d 18 88 | 07 20 20 cd 0d 18 92 0d |%, 4)...|. .....|
|00004250| 20 c9 20 73 74 6f 70 6d | 25 0d 18 9c 17 20 20 e7 | . stopm|%.... .|
|00004260| 20 21 6d 65 6e 75 73 25 | 20 3c 3e 20 2d 31 20 8c | !menus%| <> -1 .|
|00004270| 0d 18 a6 35 20 20 20 64 | 61 74 61 5f 6e 65 77 25 |...5 d|ata_new%|
|00004280| 3d 28 64 61 74 61 5f 6e | 65 77 25 20 80 20 25 31 |=(data_n|ew% . %1|
|00004290| 31 31 30 31 31 29 20 82 | 20 28 21 6d 65 6e 75 73 |11011) .| (!menus|
|000042a0| 25 3c 3c 32 29 0d 18 b0 | 22 20 20 20 f2 74 69 63 |%<<2)...|" .tic|
|000042b0| 6b 69 74 28 73 74 6f 70 | 6d 25 2c 20 21 6d 65 6e |kit(stop|m%, !men|
|000042c0| 75 73 25 2c 20 31 29 0d | 18 ba 07 20 20 cd 0d 18 |us%, 1).|... ...|
|000042d0| c4 05 cb 0d 18 ce 10 f2 | 75 70 64 61 74 65 5f 69 |........|update_i|
|000042e0| 63 6f 6e 0d 18 d8 05 e1 | 0d 18 e2 05 3a 0d 18 ec |con.....|....:...|
|000042f0| 12 dd 20 f2 75 70 64 61 | 74 65 5f 69 63 6f 6e 0d |.. .upda|te_icon.|
|00004300| 18 f6 12 62 6c 6f 63 6b | 25 21 30 20 20 3d 20 2d |...block|%!0 = -|
|00004310| 32 0d 19 00 18 62 6c 6f | 63 6b 25 21 34 20 20 3d |2....blo|ck%!4 =|
|00004320| 20 69 63 70 72 69 6e 74 | 25 0d 19 0a 11 62 6c 6f | icprint|%....blo|
|00004330| 63 6b 25 21 38 20 20 3d | 20 30 0d 19 14 11 62 6c |ck%!8 =| 0....bl|
|00004340| 6f 63 6b 25 21 31 32 20 | 3d 20 30 0d 19 1e 22 c8 |ock%!12 |= 0...".|
|00004350| 99 20 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |. "Wimp_|SetIconS|
|00004360| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 19 28 |tate",,b|lock%..(|
|00004370| 05 e1 0d 19 32 05 3a 0d | 19 3c 24 dd 20 f2 74 69 |....2.:.|.<$. .ti|
|00004380| 63 6b 69 74 28 6d 65 6e | 75 25 2c 20 69 74 65 6d |ckit(men|u%, item|
|00004390| 25 2c 20 6e 69 74 65 6d | 73 25 29 0d 19 46 08 ea |%, nitem|s%)..F..|
|000043a0| 20 49 25 0d 19 50 14 e3 | 20 49 25 3d 30 20 b8 20 | I%..P..| I%=0 . |
|000043b0| 6e 69 74 65 6d 73 25 0d | 19 5a 1d 20 20 f2 73 65 |nitems%.|.Z. .se|
|000043c0| 74 5f 74 69 63 6b 28 6d | 65 6e 75 25 2c 20 49 25 |t_tick(m|enu%, I%|
|000043d0| 2c 20 30 29 0d 19 64 05 | ed 0d 19 6e 1e f2 73 65 |, 0)..d.|...n..se|
|000043e0| 74 5f 74 69 63 6b 28 6d | 65 6e 75 25 2c 20 69 74 |t_tick(m|enu%, it|
|000043f0| 65 6d 25 2c 20 31 29 0d | 19 78 05 e1 0d 19 82 05 |em%, 1).|.x......|
|00004400| 3a 0d 19 8c 10 dd 20 f2 | 66 72 6f 6e 74 28 68 25 |:..... .|front(h%|
|00004410| 29 0d 19 96 0a 21 71 25 | 3d 68 25 0d 19 a0 2b c8 |)....!q%|=h%...+.|
|00004420| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|00004430| 77 53 74 61 74 65 22 2c | 2c 71 25 20 3a 20 71 25 |wState",|,q% : q%|
|00004440| 21 32 38 3d 2d 31 0d 19 | aa 1c c8 99 20 22 57 69 |!28=-1..|.... "Wi|
|00004450| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00004460| 71 25 0d 19 b4 05 e1 0d | 19 be 05 3a 0d 19 c8 37 |q%......|...:...7|
|00004470| dd 20 f2 6f 70 65 6e 28 | 68 61 6e 64 6c 65 25 2c |. .open(|handle%,|
|00004480| 78 30 25 2c 79 30 25 2c | 78 31 25 2c 79 31 25 2c |x0%,y0%,|x1%,y1%,|
|00004490| 73 63 78 25 2c 73 63 79 | 25 2c 62 68 61 6e 64 6c |scx%,scy|%,bhandl|
|000044a0| 65 25 29 0d 19 d2 0f 21 | 71 25 3d 68 61 6e 64 6c |e%)....!|q%=handl|
|000044b0| 65 25 0d 19 dc 29 71 25 | 21 34 3d 78 30 25 3a 71 |e%...)q%|!4=x0%:q|
|000044c0| 25 21 38 3d 79 30 25 3a | 71 25 21 31 32 3d 78 31 |%!8=y0%:|q%!12=x1|
|000044d0| 25 3a 71 25 21 31 36 3d | 79 31 25 0d 19 e6 19 71 |%:q%!16=|y1%....q|
|000044e0| 25 21 32 30 3d 73 63 78 | 25 3a 71 25 21 32 34 3d |%!20=scx|%:q%!24=|
|000044f0| 73 63 79 25 0d 19 f0 12 | 71 25 21 32 38 3d 62 68 |scy%....|q%!28=bh|
|00004500| 61 6e 64 6c 65 25 0d 19 | fa 1c c8 99 20 22 57 69 |andle%..|.... "Wi|
|00004510| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00004520| 71 25 0d 1a 04 05 e1 0d | 1a 0e 05 3a 0d 1a 18 15 |q%......|...:....|
|00004530| dd 20 f2 63 6c 6f 73 65 | 28 68 61 6e 64 6c 65 25 |. .close|(handle%|
|00004540| 29 0d 1a 22 29 21 71 25 | 3d 68 61 6e 64 6c 65 25 |)..")!q%|=handle%|
|00004550| 3a c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |:.. "Wim|p_CloseW|
|00004560| 69 6e 64 6f 77 22 2c 2c | 71 25 0d 1a 2c 05 e1 0d |indow",,|q%..,...|
|00004570| 1a 36 05 3a 0d 1a 40 11 | dd 20 a4 77 69 6e 64 6f |.6.:..@.|. .windo|
|00004580| 77 28 61 24 29 0d 1a 4a | 08 ea 20 63 25 0d 1a 54 |w(a$)..J|.. c%..T|
|00004590| 48 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |H.. "Wim|p_LoadTe|
|000045a0| 6d 70 6c 61 74 65 22 2c | 2c 71 25 2c 63 75 72 62 |mplate",|,q%,curb|
|000045b0| 75 66 25 2c 65 6e 64 62 | 75 66 25 2c 2d 31 2c 61 |uf%,endb|uf%,-1,a|
|000045c0| 24 2c 30 20 b8 20 2c 2c | 63 75 72 62 75 66 25 2c |$,0 . ,,|curbuf%,|
|000045d0| 2c 2c 2c 63 25 0d 1a 5e | 31 e7 20 63 25 3d 30 20 |,,,c%..^|1. c%=0 |
|000045e0| 8c 20 f2 6d 6f 61 6e 28 | 22 54 65 6d 70 6c 61 74 |. .moan(|"Templat|
|000045f0| 65 20 27 22 2b 61 24 2b | 22 27 20 6e 6f 74 20 66 |e '"+a$+|"' not f|
|00004600| 6f 75 6e 64 22 29 0d 1a | 68 23 c8 99 20 22 57 69 |ound")..|h#.. "Wi|
|00004610| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00004620| 2c 2c 71 25 20 b8 20 63 | 25 0d 1a 72 07 3d 63 25 |,,q% . c|%..r.=c%|
|00004630| 0d 1a 7c 05 3a 0d 1a 86 | 16 dd 20 a4 69 63 6f 6e |..|.:...|.. .icon|
|00004640| 61 64 64 72 28 68 25 2c | 69 25 29 0d 1a 90 2d 21 |addr(h%,|i%)...-!|
|00004650| 71 25 3d 68 25 3a 71 25 | 21 34 3d 69 25 3a c8 99 |q%=h%:q%|!4=i%:..|
|00004660| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00004670| 61 74 65 22 2c 2c 71 25 | 0d 1a 9a 38 e7 20 28 71 |ate",,q%|...8. (q|
|00004680| 25 21 32 34 20 80 20 26 | 31 30 30 29 3d 30 20 8c |%!24 . &|100)=0 .|
|00004690| 20 f2 6d 6f 61 6e 28 22 | 49 63 6f 6e 20 69 73 20 | .moan("|Icon is |
|000046a0| 6e 6f 74 20 69 6e 64 69 | 72 65 63 74 65 64 22 29 |not indi|rected")|
|000046b0| 0d 1a a4 0a 3d 71 25 21 | 32 38 0d 1a ae 05 3a 0d |....=q%!|28....:.|
|000046c0| 1a b8 0f dd 20 f2 6d 65 | 6e 75 28 6d 25 29 0d 1a |.... .me|nu(m%)..|
|000046d0| c2 08 ea 20 59 25 0d 1a | cc 10 59 25 20 3d 20 6d |... Y%..|..Y% = m|
|000046e0| 6f 75 73 65 79 25 0d 1a | d6 15 e7 20 59 25 3c 34 |ousey%..|... Y%<4|
|000046f0| 39 36 20 8c 20 59 25 3d | 34 39 36 0d 1a e0 12 6d |96 . Y%=|496....m|
|00004700| 65 6e 75 68 61 6e 64 6c | 65 25 3d 6d 25 0d 1a ea |enuhandl|e%=m%...|
|00004710| 33 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |3.. "Wim|p_Create|
|00004720| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 68 61 6e 64 6c |Menu",,m|enuhandl|
|00004730| 65 25 2c 6d 6f 75 73 65 | 78 25 2d 36 36 2c 59 25 |e%,mouse|x%-66,Y%|
|00004740| 0d 1a f4 05 e1 0d 1a fe | 05 3a 0d 1b 08 0d dd 20 |........|.:..... |
|00004750| f2 72 65 6d 65 6e 75 0d | 1b 12 08 ea 20 59 25 0d |.remenu.|.... Y%.|
|00004760| 1b 1c 10 59 25 20 3d 20 | 6d 6f 75 73 65 79 25 0d |...Y% = |mousey%.|
|00004770| 1b 26 19 e7 20 59 25 20 | 3c 20 33 30 30 20 8c 20 |.&.. Y% |< 300 . |
|00004780| 59 25 20 3d 20 33 31 36 | 0d 1b 30 45 c8 99 20 22 |Y% = 316|..0E.. "|
|00004790| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|000047a0| 2c 2c 6d 65 6e 75 68 61 | 6e 64 6c 65 25 2c 6d 6f |,,menuha|ndle%,mo|
|000047b0| 75 73 65 78 25 2d 36 36 | 2c 59 25 20 3a f4 20 64 |usex%-66|,Y% :. d|
|000047c0| 65 66 61 75 6c 74 20 63 | 6f 6f 72 64 73 0d 1b 3a |efault c|oords..:|
|000047d0| 05 e1 0d 1b 44 05 3a 0d | 1b 4e 14 dd 20 a4 63 72 |....D.:.|.N.. .cr|
|000047e0| 6d 65 6e 75 28 6d 65 6e | 75 24 29 0d 1b 58 37 e7 |menu(men|u$)..X7.|
|000047f0| 20 6d 65 6e 75 66 72 65 | 65 25 2b 32 38 20 3e 20 | menufre|e%+28 > |
|00004800| 6d 65 6e 75 65 6e 64 25 | 20 8c 20 f2 6d 6f 61 6e |menuend%| . .moan|
|00004810| 28 22 4d 65 6e 75 20 61 | 72 65 61 20 66 75 6c 6c |("Menu a|rea full|
|00004820| 22 29 0d 1b 62 0b ea 20 | 6d 25 2c 69 25 0d 1b 6c |")..b.. |m%,i%..l|
|00004830| 16 6d 65 6e 75 70 74 72 | 25 3d 6d 65 6e 75 66 72 |.menuptr|%=menufr|
|00004840| 65 65 25 0d 1b 76 08 69 | 25 3d 30 0d 1b 80 3f e7 |ee%..v.i|%=0...?.|
|00004850| 20 c0 6d 65 6e 75 24 2c | 31 29 3d 22 23 22 20 8c | .menu$,|1)="#" .|
|00004860| 20 69 25 3d 31 3a 6d 65 | 6e 75 74 69 74 6c 65 24 | i%=1:me|nutitle$|
|00004870| 3d a4 70 61 72 28 22 3b | 22 29 20 8b 20 6d 65 6e |=.par(";|") . men|
|00004880| 75 74 69 74 6c 65 24 3d | 22 22 0d 1b 8a 18 24 6d |utitle$=|""....$m|
|00004890| 65 6e 75 70 74 72 25 3d | 6d 65 6e 75 74 69 74 6c |enuptr%=|menutitl|
|000048a0| 65 24 0d 1b 94 4a 6d 65 | 6e 75 70 74 72 25 3f 31 |e$...Jme|nuptr%?1|
|000048b0| 32 3d 60 74 66 63 6f 6c | 3a 6d 65 6e 75 70 74 72 |2=`tfcol|:menuptr|
|000048c0| 25 3f 31 33 3d 32 3a 6d | 65 6e 75 70 74 72 25 3f |%?13=2:m|enuptr%?|
|000048d0| 31 34 3d 60 77 66 63 6f | 6c 3a 6d 65 6e 75 70 74 |14=`wfco|l:menupt|
|000048e0| 72 25 3f 31 35 3d 60 77 | 62 63 6f 6c 0d 1b 9e 33 |r%?15=`w|bcol...3|
|000048f0| 6d 65 6e 75 70 74 72 25 | 21 31 36 3d 31 39 36 2d |menuptr%|!16=196-|
|00004900| 32 34 3a 6d 65 6e 75 70 | 74 72 25 21 32 30 3d 34 |24:menup|tr%!20=4|
|00004910| 34 3a 6d 65 6e 75 70 74 | 72 25 21 32 34 3d 30 0d |4:menupt|r%!24=0.|
|00004920| 1b a8 24 6d 65 6e 75 70 | 74 72 25 2b 3d 32 38 3a |..$menup|tr%+=28:|
|00004930| 6d 61 78 78 25 3d a9 6d | 65 6e 75 74 69 74 6c 65 |maxx%=.m|enutitle|
|00004940| 24 2d 33 0d 1b b2 31 f5 | 20 69 74 65 6d 24 3d a4 |$-3...1.| item$=.|
|00004950| 70 61 72 28 22 3b 22 29 | 3a f2 6d 65 6e 75 69 74 |par(";")|:.menuit|
|00004960| 65 6d 28 69 74 65 6d 24 | 29 3a fd 20 69 74 65 6d |em(item$|):. item|
|00004970| 24 3d 22 22 0d 1b bc 24 | 6d 25 3d 6d 65 6e 75 66 |$=""...$|m%=menuf|
|00004980| 72 65 65 25 3a 6d 25 21 | 31 36 3d 28 6d 61 78 78 |ree%:m%!|16=(maxx|
|00004990| 25 2a 38 2b 36 29 2a 32 | 0d 1b c6 16 6d 65 6e 75 |%*8+6)*2|....menu|
|000049a0| 66 72 65 65 25 3d 6d 65 | 6e 75 70 74 72 25 0d 1b |free%=me|nuptr%..|
|000049b0| d0 07 3d 6d 25 0d 1b da | 05 3a 0d 1b e4 16 dd 20 |..=m%...|.:..... |
|000049c0| f2 6d 65 6e 75 69 74 65 | 6d 28 74 65 78 74 24 29 |.menuite|m(text$)|
|000049d0| 0d 1b ee 32 e7 20 74 65 | 78 74 24 3d 22 22 20 8c |...2. te|xt$="" .|
|000049e0| 20 6d 65 6e 75 70 74 72 | 25 21 2d 32 34 3d 28 6d | menuptr|%!-24=(m|
|000049f0| 65 6e 75 70 74 72 25 21 | 2d 32 34 29 84 26 38 30 |enuptr%!|-24).&80|
|00004a00| 3a e1 0d 1b f8 36 e7 20 | 6d 65 6e 75 70 74 72 25 |:....6. |menuptr%|
|00004a10| 2b 32 34 20 3e 20 6d 65 | 6e 75 65 6e 64 25 20 8c |+24 > me|nuend% .|
|00004a20| 20 f2 6d 6f 61 6e 28 22 | 4d 65 6e 75 20 61 72 65 | .moan("|Menu are|
|00004a30| 61 20 66 75 6c 6c 22 29 | 0d 1c 02 0f ea 69 25 2c |a full")|.....i%,|
|00004a40| 66 6c 67 25 2c 56 25 0d | 1c 0c 0c 66 6c 67 25 3d |flg%,V%.|...flg%=|
|00004a50| 26 30 30 0d 1c 16 12 69 | 25 3d a7 74 65 78 74 24 |&00....i|%=.text$|
|00004a60| 2c 22 3e 22 29 0d 1c 20 | 36 e7 20 c2 74 65 78 74 |,">").. |6. .text|
|00004a70| 24 2c 31 29 3d 22 23 22 | 20 8c 20 74 65 78 74 24 |$,1)="#"| . text$|
|00004a80| 3d c0 74 65 78 74 24 2c | a9 74 65 78 74 24 2d 31 |=.text$,|.text$-1|
|00004a90| 29 3a 66 6c 67 25 2b 3d | 26 30 32 0d 1c 2a 3d e7 |):flg%+=|&02..*=.|
|00004aa0| 69 25 3e 30 8c 73 75 62 | 70 74 72 25 3d a0 c1 74 |i%>0.sub|ptr%=..t|
|00004ab0| 65 78 74 24 2c 69 25 2b | 31 29 3a 74 65 78 74 24 |ext$,i%+|1):text$|
|00004ac0| 3d c0 74 65 78 74 24 2c | 69 25 2d 31 29 8b 73 75 |=.text$,|i%-1).su|
|00004ad0| 62 70 74 72 25 3d 2d 31 | 0d 1c 34 13 6d 65 6e 75 |bptr%=-1|..4.menu|
|00004ae0| 70 74 72 25 21 30 3d 66 | 6c 67 25 0d 1c 3e 16 6d |ptr%!0=f|lg%..>.m|
|00004af0| 65 6e 75 70 74 72 25 21 | 34 3d 73 75 62 70 74 72 |enuptr%!|4=subptr|
|00004b00| 25 0d 1c 48 18 6d 65 6e | 75 70 74 72 25 21 38 3d |%..H.men|uptr%!8=|
|00004b10| 26 30 37 30 30 30 30 32 | 31 0d 1c 52 13 e7 c0 74 |&0700002|1..R...t|
|00004b20| 65 78 74 24 2c 31 29 3d | 22 24 22 8c 0d 1c 5c 13 |ext$,1)=|"$"...\.|
|00004b30| 20 21 6d 65 6e 75 70 74 | 72 25 2b 3d 26 30 34 0d | !menupt|r%+=&04.|
|00004b40| 1c 66 15 20 6d 65 6e 75 | 70 74 72 25 21 38 2b 3d |.f. menu|ptr%!8+=|
|00004b50| 26 31 30 38 0d 1c 70 13 | 20 69 25 3d a7 74 65 78 |&108..p.| i%=.tex|
|00004b60| 74 24 2c 22 28 22 29 0d | 1c 7a 34 20 e7 69 25 3e |t$,"(").|.z4 .i%>|
|00004b70| 30 8c 4c 25 3d bb c1 74 | 65 78 74 24 2c 69 25 2b |0.L%=..t|ext$,i%+|
|00004b80| 31 29 3a 74 65 78 74 24 | 3d c0 74 65 78 74 24 2c |1):text$|=.text$,|
|00004b90| 69 25 2d 31 29 8b 4c 25 | 3d 31 32 0d 1c 84 0c 20 |i%-1).L%|=12.... |
|00004ba0| 56 25 20 3d 20 2d 31 0d | 1c 8e 1b 20 6d 65 6e 75 |V% = -1.|... menu|
|00004bb0| 70 74 72 25 21 31 32 3d | a0 c1 74 65 78 74 24 2c |ptr%!12=|..text$,|
|00004bc0| 32 29 0d 1c 98 13 20 6d | 65 6e 75 70 74 72 25 21 |2).... m|enuptr%!|
|00004bd0| 31 36 3d 2d 31 0d 1c a2 | 13 20 6d 65 6e 75 70 74 |16=-1...|. menupt|
|00004be0| 72 25 21 32 30 3d 4c 25 | 0d 1c ac 13 20 74 65 78 |r%!20=L%|.... tex|
|00004bf0| 74 24 3d c4 4c 25 2c 22 | 20 22 29 0d 1c b6 1a 20 |t$=.L%,"| ").... |
|00004c00| e7 20 6d 61 78 78 25 3c | 32 30 20 8c 20 6d 61 78 |. maxx%<|20 . max|
|00004c10| 78 25 3d 32 30 0d 1c c0 | 05 cc 0d 1c ca 11 20 e7 |x%=20...|...... .|
|00004c20| a9 74 65 78 74 24 3c 3d | 31 32 8c 0d 1c d4 1a 20 |.text$<=|12..... |
|00004c30| 20 24 28 6d 65 6e 75 70 | 74 72 25 2b 31 32 29 3d | $(menup|tr%+12)=|
|00004c40| 74 65 78 74 24 0d 1c de | 28 20 cc 20 49 25 3d a4 |text$...|( . I%=.|
|00004c50| 77 6f 72 6b 73 70 61 63 | 65 28 a9 74 65 78 74 24 |workspac|e(.text$|
|00004c60| 2b 31 29 3a 24 49 25 3d | 74 65 78 74 24 0d 1c e8 |+1):$I%=|text$...|
|00004c70| 38 20 20 6d 65 6e 75 70 | 74 72 25 21 31 32 3d 49 |8 menup|tr%!12=I|
|00004c80| 25 3a 6d 65 6e 75 70 74 | 72 25 21 31 36 3d 2d 31 |%:menupt|r%!16=-1|
|00004c90| 3a 6d 65 6e 75 70 74 72 | 25 21 32 30 3d a9 74 65 |:menuptr|%!20=.te|
|00004ca0| 78 74 24 2b 31 0d 1c f2 | 22 20 20 6d 65 6e 75 70 |xt$+1...|" menup|
|00004cb0| 74 72 25 21 38 3d 6d 65 | 6e 75 70 74 72 25 21 38 |tr%!8=me|nuptr%!8|
|00004cc0| 20 84 20 26 31 30 30 0d | 1c fc 06 20 cd 0d 1d 06 | . &100.|... ....|
|00004cd0| 1f e7 a9 74 65 78 74 24 | 3e 6d 61 78 78 25 20 8c |...text$|>maxx% .|
|00004ce0| 6d 61 78 78 25 3d a9 74 | 65 78 74 24 0d 1d 10 05 |maxx%=.t|ext$....|
|00004cf0| cd 0d 1d 1a 10 6d 65 6e | 75 70 74 72 25 2b 3d 32 |.....men|uptr%+=2|
|00004d00| 34 0d 1d 24 05 e1 0d 1d | 2e 05 3a 0d 1d 38 14 dd |4..$....|..:..8..|
|00004d10| 20 a4 77 6f 72 6b 73 70 | 61 63 65 28 4c 25 29 0d | .worksp|ace(L%).|
|00004d20| 1d 42 0b de 20 4c 25 20 | 4c 25 0d 1d 4c 08 3d 20 |.B.. L% |L%..L.= |
|00004d30| 4c 25 0d 1d 56 05 3a 0d | 1d 60 10 dd 20 a4 70 61 |L%..V.:.|.`.. .pa|
|00004d40| 72 28 73 65 70 24 29 0d | 1d 6a 25 69 31 25 3d 69 |r(sep$).|.j%i1%=i|
|00004d50| 25 2b 31 3a 69 25 3d a7 | 6d 65 6e 75 24 2b 73 65 |%+1:i%=.|menu$+se|
|00004d60| 70 24 2c 73 65 70 24 2c | 69 31 25 29 0d 1d 74 17 |p$,sep$,|i1%)..t.|
|00004d70| 3d c1 6d 65 6e 75 24 2c | 69 31 25 2c 69 25 2d 69 |=.menu$,|i1%,i%-i|
|00004d80| 31 25 29 0d 1d 7e 05 3a | 0d 1d 88 20 dd 20 f2 73 |1%)..~.:|... . .s|
|00004d90| 68 61 64 65 28 6d 65 6e | 75 68 61 6e 64 6c 65 25 |hade(men|uhandle%|
|00004da0| 2c 20 69 74 65 6d 25 29 | 0d 1d 92 45 6d 65 6e 75 |, item%)|...Emenu|
|00004db0| 68 61 6e 64 6c 65 25 21 | 28 32 38 2b 38 2b 32 34 |handle%!|(28+8+24|
|00004dc0| 2a 69 74 65 6d 25 29 3d | 6d 65 6e 75 68 61 6e 64 |*item%)=|menuhand|
|00004dd0| 6c 65 25 21 28 32 38 2b | 38 2b 32 34 2a 69 74 65 |le%!(28+|8+24*ite|
|00004de0| 6d 25 29 82 26 34 30 30 | 30 30 30 3a e1 0d 1d 9c |m%).&400|000:....|
|00004df0| 05 3a 0d 1d a6 5b dd 20 | a4 73 68 61 64 65 5f 73 |.:...[. |.shade_s|
|00004e00| 74 61 74 75 73 28 6d 65 | 6e 75 68 61 6e 64 6c 65 |tatus(me|nuhandle|
|00004e10| 25 2c 69 74 65 6d 25 29 | 20 3d 20 2d 28 28 6d 65 |%,item%)| = -((me|
|00004e20| 6e 75 68 61 6e 64 6c 65 | 25 21 28 32 38 2b 38 2b |nuhandle|%!(28+8+|
|00004e30| 32 34 2a 69 74 65 6d 25 | 29 20 80 20 26 34 30 30 |24*item%|) . &400|
|00004e40| 30 30 30 29 3d 26 34 30 | 30 30 30 30 29 0d 1d b0 |000)=&40|0000)...|
|00004e50| 05 3a 0d 1d ba 2c dd 20 | f2 73 65 74 5f 73 68 61 |.:...,. |.set_sha|
|00004e60| 64 65 28 6d 65 6e 75 68 | 61 6e 64 6c 65 25 2c 20 |de(menuh|andle%, |
|00004e70| 69 74 65 6d 25 2c 20 76 | 61 6c 75 65 25 29 0d 1d |item%, v|alue%)..|
|00004e80| c4 09 ea 20 73 74 25 0d | 1d ce 2b 73 74 25 20 3d |... st%.|..+st% =|
|00004e90| 20 a4 73 68 61 64 65 5f | 73 74 61 74 75 73 28 6d | .shade_|status(m|
|00004ea0| 65 6e 75 68 61 6e 64 6c | 65 25 2c 20 69 74 65 6d |enuhandl|e%, item|
|00004eb0| 25 29 0d 1d d8 30 e7 20 | 76 61 6c 75 65 25 20 3c |%)...0. |value% <|
|00004ec0| 3e 20 73 74 25 20 8c 20 | f2 73 68 61 64 65 28 6d |> st% . |.shade(m|
|00004ed0| 65 6e 75 68 61 6e 64 6c | 65 25 2c 20 69 74 65 6d |enuhandl|e%, item|
|00004ee0| 25 29 0d 1d e2 05 e1 0d | 1d ec 05 3a 0d 1d f6 1e |%)......|...:....|
|00004ef0| dd 20 f2 74 69 63 6b 28 | 6d 65 6e 75 68 61 6e 64 |. .tick(|menuhand|
|00004f00| 6c 65 25 2c 69 74 65 6d | 25 29 0d 1e 00 3b 6d 65 |le%,item|%)...;me|
|00004f10| 6e 75 68 61 6e 64 6c 65 | 25 21 28 32 38 2b 32 34 |nuhandle|%!(28+24|
|00004f20| 2a 69 74 65 6d 25 29 3d | 6d 65 6e 75 68 61 6e 64 |*item%)=|menuhand|
|00004f30| 6c 65 25 21 28 32 38 2b | 32 34 2a 69 74 65 6d 25 |le%!(28+|24*item%|
|00004f40| 29 82 26 30 31 0d 1e 0a | 05 e1 0d 1e 14 05 3a 0d |).&01...|......:.|
|00004f50| 1e 1e 44 dd 20 a4 74 69 | 63 6b 5f 73 74 61 74 75 |..D. .ti|ck_statu|
|00004f60| 73 28 6d 65 6e 75 68 61 | 6e 64 6c 65 25 2c 20 69 |s(menuha|ndle%, i|
|00004f70| 74 65 6d 25 29 20 3d 20 | 6d 65 6e 75 68 61 6e 64 |tem%) = |menuhand|
|00004f80| 6c 65 25 21 28 32 38 2b | 32 34 2a 69 74 65 6d 25 |le%!(28+|24*item%|
|00004f90| 29 80 31 0d 1e 28 05 3a | 0d 1e 32 2b dd 20 f2 73 |).1..(.:|..2+. .s|
|00004fa0| 65 74 5f 74 69 63 6b 28 | 6d 65 6e 75 68 61 6e 64 |et_tick(|menuhand|
|00004fb0| 6c 65 25 2c 20 69 74 65 | 6d 25 2c 20 76 61 6c 75 |le%, ite|m%, valu|
|00004fc0| 65 25 29 0d 1e 3c 4a e7 | 20 a4 74 69 63 6b 5f 73 |e%)..<J.| .tick_s|
|00004fd0| 74 61 74 75 73 28 6d 65 | 6e 75 68 61 6e 64 6c 65 |tatus(me|nuhandle|
|00004fe0| 25 2c 20 69 74 65 6d 25 | 29 3c 3e 76 61 6c 75 65 |%, item%|)<>value|
|00004ff0| 25 20 8c 20 f2 74 69 63 | 6b 28 6d 65 6e 75 68 61 |% . .tic|k(menuha|
|00005000| 6e 64 6c 65 25 2c 20 69 | 74 65 6d 25 29 0d 1e 46 |ndle%, i|tem%)..F|
|00005010| 05 e1 0d 1e 50 05 3a 0d | 1e 5a 1d dd 20 f2 73 65 |....P.:.|.Z.. .se|
|00005020| 74 5f 70 72 69 6e 74 5f | 73 74 61 74 65 28 66 6c |t_print_|state(fl|
|00005030| 61 67 25 29 0d 1e 64 23 | f2 73 65 74 5f 73 68 61 |ag%)..d#|.set_sha|
|00005040| 64 65 28 70 72 69 6e 74 | 6d 65 6e 75 25 2c 31 2c |de(print|menu%,1,|
|00005050| 2d 66 6c 61 67 25 29 0d | 1e 6e 23 f2 73 65 74 5f |-flag%).|.n#.set_|
|00005060| 73 68 61 64 65 28 70 72 | 69 6e 74 6d 65 6e 75 25 |shade(pr|intmenu%|
|00005070| 2c 32 2c 2d 66 6c 61 67 | 25 29 0d 1e 78 23 f2 73 |,2,-flag|%)..x#.s|
|00005080| 65 74 5f 73 68 61 64 65 | 28 70 72 69 6e 74 6d 65 |et_shade|(printme|
|00005090| 6e 75 25 2c 33 2c 2d 66 | 6c 61 67 25 29 0d 1e 82 |nu%,3,-f|lag%)...|
|000050a0| 23 f2 73 65 74 5f 73 68 | 61 64 65 28 70 72 69 6e |#.set_sh|ade(prin|
|000050b0| 74 6d 65 6e 75 25 2c 34 | 2c 2d 66 6c 61 67 25 29 |tmenu%,4|,-flag%)|
|000050c0| 0d 1e 8c 23 f2 73 65 74 | 5f 73 68 61 64 65 28 70 |...#.set|_shade(p|
|000050d0| 72 69 6e 74 6d 65 6e 75 | 25 2c 35 2c 2d 66 6c 61 |rintmenu|%,5,-fla|
|000050e0| 67 25 29 0d 1e 96 26 f2 | 73 65 74 5f 73 68 61 64 |g%)...&.|set_shad|
|000050f0| 65 28 70 72 69 6e 74 6d | 65 6e 75 25 2c 36 2c 28 |e(printm|enu%,6,(|
|00005100| 31 2b 66 6c 61 67 25 29 | 29 0d 1e a0 23 f2 73 65 |1+flag%)|)...#.se|
|00005110| 74 5f 73 68 61 64 65 28 | 70 72 69 6e 74 6d 65 6e |t_shade(|printmen|
|00005120| 75 25 2c 37 2c 2d 66 6c | 61 67 25 29 0d 1e aa 13 |u%,7,-fl|ag%)....|
|00005130| 70 72 69 6e 74 5f 6f 6e | 25 3d 66 6c 61 67 25 0d |print_on|%=flag%.|
|00005140| 1e b4 2c 70 6f 6c 6c 5f | 6d 61 73 6b 25 3d 28 70 |..,poll_|mask%=(p|
|00005150| 6f 6c 6c 5f 6d 61 73 6b | 25 20 80 20 ac 31 29 20 |oll_mask|% . .1) |
|00005160| 84 20 28 31 2b 66 6c 61 | 67 25 29 0d 1e be 0d e7 |. (1+fla|g%).....|
|00005170| 20 66 6c 61 67 25 20 8c | 0d 1e c8 17 20 2a 73 65 | flag% .|.... *se|
|00005180| 74 20 24 50 72 69 6e 74 | 69 6e 67 20 22 54 22 0d |t $Print|ing "T".|
|00005190| 1e d2 05 cc 0d 1e dc 15 | 20 2a 75 6e 73 65 74 20 |........| *unset |
|000051a0| 24 50 72 69 6e 74 69 6e | 67 0d 1e e6 05 cd 0d 1e |$Printin|g.......|
|000051b0| f0 05 e1 0d 1e fa 05 3a | 0d 1f 04 25 dd 20 a4 72 |.......:|...%. .r|
|000051c0| 65 61 64 5f 69 63 6f 6e | 5f 64 61 74 61 28 68 61 |ead_icon|_data(ha|
|000051d0| 6e 64 6c 65 25 2c 20 69 | 63 6f 6e 25 29 0d 1f 0e |ndle%, i|con%)...|
|000051e0| 19 21 69 63 6f 6e 5f 62 | 75 66 25 20 20 3d 20 68 |.!icon_b|uf% = h|
|000051f0| 61 6e 64 6c 65 25 0d 1f | 18 17 69 63 6f 6e 5f 62 |andle%..|..icon_b|
|00005200| 75 66 25 21 34 20 3d 20 | 69 63 6f 6e 25 0d 1f 22 |uf%!4 = |icon%.."|
|00005210| 27 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |'.. "Wim|p_GetIco|
|00005220| 6e 53 74 61 74 65 22 2c | 20 2c 20 69 63 6f 6e 5f |nState",| , icon_|
|00005230| 62 75 66 25 0d 1f 2c 43 | e7 20 69 63 6f 6e 5f 62 |buf%..,C|. icon_b|
|00005240| 75 66 25 21 32 38 20 3c | 20 63 75 72 62 75 66 25 |uf%!28 <| curbuf%|
|00005250| 20 8c 20 3d 24 28 69 63 | 6f 6e 5f 62 75 66 25 21 | . =$(ic|on_buf%!|
|00005260| 32 38 29 20 8b 20 3d 20 | 24 28 69 63 6f 6e 5f 62 |28) . = |$(icon_b|
|00005270| 75 66 25 2b 32 38 29 0d | 1f 36 05 3a 0d 1f 40 32 |uf%+28).|.6.:..@2|
|00005280| dd 20 f2 73 65 74 5f 69 | 63 6f 6e 5f 73 74 61 74 |. .set_i|con_stat|
|00005290| 65 28 68 61 6e 64 6c 65 | 25 2c 20 69 63 6f 6e 25 |e(handle|%, icon%|
|000052a0| 2c 20 65 6f 72 25 2c 20 | 6d 61 73 6b 25 29 0d 1f |, eor%, |mask%)..|
|000052b0| 4a 19 21 69 63 6f 6e 5f | 62 75 66 25 20 20 3d 20 |J.!icon_|buf% = |
|000052c0| 68 61 6e 64 6c 65 25 0d | 1f 54 17 69 63 6f 6e 5f |handle%.|.T.icon_|
|000052d0| 62 75 66 25 21 34 20 3d | 20 69 63 6f 6e 25 0d 1f |buf%!4 =| icon%..|
|000052e0| 5e 16 69 63 6f 6e 5f 62 | 75 66 25 21 38 20 3d 20 |^.icon_b|uf%!8 = |
|000052f0| 65 6f 72 25 0d 1f 68 18 | 69 63 6f 6e 5f 62 75 66 |eor%..h.|icon_buf|
|00005300| 25 21 31 32 20 3d 20 6d | 61 73 6b 25 0d 1f 72 25 |%!12 = m|ask%..r%|
|00005310| c8 99 20 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e |.. "Wimp|_SetIcon|
|00005320| 53 74 61 74 65 22 2c 2c | 69 63 6f 6e 5f 62 75 66 |State",,|icon_buf|
|00005330| 25 0d 1f 7c 05 e1 0d 1f | 86 05 3a 0d 1f 90 0e dd |%..|....|..:.....|
|00005340| 20 a4 69 63 6f 6e 62 61 | 72 0d 1f 9a 08 ea 20 49 | .iconba|r..... I|
|00005350| 25 0d 1f a4 13 69 63 6f | 6e 5f 62 75 66 25 21 30 |%....ico|n_buf%!0|
|00005360| 20 3d 2d 32 0d 1f ae 12 | 69 63 6f 6e 5f 62 75 66 | =-2....|icon_buf|
|00005370| 25 21 34 20 3d 30 0d 1f | b8 14 69 63 6f 6e 5f 62 |%!4 =0..|..icon_b|
|00005380| 75 66 25 21 38 20 3d 2d | 31 36 0d 1f c2 14 69 63 |uf%!8 =-|16....ic|
|00005390| 6f 6e 5f 62 75 66 25 21 | 31 32 3d 31 34 34 0d 1f |on_buf%!|12=144..|
|000053a0| cc 14 69 63 6f 6e 5f 62 | 75 66 25 21 31 36 3d 20 |..icon_b|uf%!16= |
|000053b0| 38 36 0d 1f d6 47 69 63 | 6f 6e 5f 62 75 66 25 21 |86...Gic|on_buf%!|
|000053c0| 32 30 3d 20 26 31 37 30 | 30 33 31 32 42 3a 20 20 |20= &170|0312B: |
|000053d0| f4 20 30 30 30 31 20 30 | 31 31 31 20 30 30 30 30 |. 0001 0|111 0000|
|000053e0| 20 30 30 30 30 20 30 30 | 31 31 20 30 30 30 31 20 | 0000 00|11 0001 |
|000053f0| 30 30 31 30 20 31 30 31 | 31 0d 1f e0 23 24 74 65 |0010 101|1...#$te|
|00005400| 78 74 5f 62 75 66 66 65 | 72 25 20 20 20 3d 20 70 |xt_buffe|r% = p|
|00005410| 72 69 6e 74 65 72 5f 74 | 79 70 65 24 0d 1f ea 23 |rinter_t|ype$...#|
|00005420| 24 76 61 6c 69 64 5f 62 | 75 66 66 65 72 25 20 20 |$valid_b|uffer% |
|00005430| 3d 20 22 53 21 22 2b 50 | 72 69 6e 74 65 72 24 0d |= "S!"+P|rinter$.|
|00005440| 1f f4 1e 69 63 6f 6e 5f | 62 75 66 25 21 32 34 3d |...icon_|buf%!24=|
|00005450| 20 74 65 78 74 5f 62 75 | 66 66 65 72 25 0d 1f fe | text_bu|ffer%...|
|00005460| 20 69 63 6f 6e 5f 62 75 | 66 25 21 32 38 20 3d 20 | icon_bu|f%!28 = |
|00005470| 76 61 6c 69 64 5f 62 75 | 66 66 65 72 25 0d 20 08 |valid_bu|ffer%. .|
|00005480| 25 69 63 6f 6e 5f 62 75 | 66 25 21 33 32 20 3d 20 |%icon_bu|f%!32 = |
|00005490| a9 28 24 74 65 78 74 5f | 62 75 66 66 65 72 25 29 |.($text_|buffer%)|
|000054a0| 2b 31 0d 20 12 28 c8 99 | 20 22 57 69 6d 70 5f 43 |+1. .(..| "Wimp_C|
|000054b0| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 69 63 6f 6e |reateIco|n",,icon|
|000054c0| 5f 62 75 66 25 20 b8 20 | 49 25 0d 20 1c 07 3d 49 |_buf% . |I%. ..=I|
|000054d0| 25 0d 20 26 05 3a 0d 20 | 30 12 dd 20 f2 63 68 61 |%. &.:. |0.. .cha|
|000054e0| 6e 67 65 5f 69 63 6f 6e | 0d 20 3a 0e f2 73 65 74 |nge_icon|. :..set|
|000054f0| 5f 70 74 79 70 65 0d 20 | 44 21 24 74 65 78 74 5f |_ptype. |D!$text_|
|00005500| 62 75 66 66 65 72 25 20 | 3d 20 70 72 69 6e 74 65 |buffer% |= printe|
|00005510| 72 5f 74 79 70 65 24 0d | 20 4e 05 e1 0d 20 58 05 |r_type$.| N... X.|
|00005520| 3a 0d 20 62 0f dd f2 73 | 65 74 5f 70 74 79 70 65 |:. b...s|et_ptype|
|00005530| 0d 20 6c 11 e7 20 70 72 | 69 6e 74 5f 6f 6e 25 20 |. l.. pr|int_on% |
|00005540| 8c 0d 20 76 1f 20 70 72 | 69 6e 74 65 72 5f 74 79 |.. v. pr|inter_ty|
|00005550| 70 65 24 20 3d 20 22 50 | 72 69 6e 74 69 6e 67 22 |pe$ = "P|rinting"|
|00005560| 0d 20 80 05 cc 0d 20 8a | 1f c8 99 22 4f 53 5f 42 |. .... .|..."OS_B|
|00005570| 79 74 65 22 2c 35 2c 6c | 6f 63 61 74 69 6f 6e 5f |yte",5,l|ocation_|
|00005580| 6e 65 77 25 0d 20 94 16 | c8 8e 20 6c 6f 63 61 74 |new%. ..|.. locat|
|00005590| 69 6f 6e 5f 6e 65 77 25 | 20 ca 0d 20 9e 24 20 c9 |ion_new%| .. .$ .|
|000055a0| 20 31 3a 20 70 72 69 6e | 74 65 72 5f 74 79 70 65 | 1: prin|ter_type|
|000055b0| 24 20 3d 20 22 50 61 72 | 61 6c 6c 65 6c 22 0d 20 |$ = "Par|allel". |
|000055c0| a8 22 20 c9 20 32 3a 20 | 70 72 69 6e 74 65 72 5f |." . 2: |printer_|
|000055d0| 74 79 70 65 24 20 3d 20 | 22 53 65 72 69 61 6c 22 |type$ = |"Serial"|
|000055e0| 0d 20 b2 26 20 c9 20 34 | 3a 20 70 72 69 6e 74 65 |. .& . 4|: printe|
|000055f0| 72 5f 74 79 70 65 24 20 | 3d 20 24 73 65 72 76 65 |r_type$ |= $serve|
|00005600| 72 5f 6e 65 77 25 0d 20 | bc 09 20 c9 20 35 3a 0d |r_new%. |.. . 5:.|
|00005610| 20 c6 2d 20 20 e7 20 a4 | 6c 6f 77 65 72 63 61 73 | .- . .|lowercas|
|00005620| 65 28 c0 24 66 69 6c 65 | 5f 6e 61 6d 65 25 2c 35 |e(.$file|_name%,5|
|00005630| 29 29 3d 22 6e 75 6c 6c | 3a 22 20 8c 0d 20 d0 21 |))="null|:" .. .!|
|00005640| 20 20 20 70 72 69 6e 74 | 65 72 5f 74 79 70 65 24 | print|er_type$|
|00005650| 20 3d 20 22 54 6f 20 6e | 75 6c 6c 3a 22 0d 20 da | = "To n|ull:". .|
|00005660| 07 20 20 cc 0d 20 e4 20 | 20 20 20 70 72 69 6e 74 |. .. . | print|
|00005670| 65 72 5f 74 79 70 65 24 | 20 3d 20 22 54 6f 20 66 |er_type$| = "To f|
|00005680| 69 6c 65 22 0d 20 ee 07 | 20 20 cd 0d 20 f8 30 20 |ile". ..| .. .0 |
|00005690| 20 ff 28 22 73 65 74 20 | 50 72 69 6e 74 65 72 54 | .("set |PrinterT|
|000056a0| 79 70 65 24 35 20 22 22 | 22 2b 24 66 69 6c 65 5f |ype$5 ""|"+$file_|
|000056b0| 6e 61 6d 65 25 2b 22 22 | 22 22 29 0d 21 02 05 cb |name%+""|"").!...|
|000056c0| 0d 21 0c 05 cd 0d 21 16 | 05 e1 0d 21 20 05 3a 0d |.!....!.|...! .:.|
|000056d0| 21 2a 11 dd 20 f2 67 65 | 74 70 6f 69 6e 74 65 72 |!*.. .ge|tpointer|
|000056e0| 0d 21 34 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |.!4 .. "|Wimp_Get|
|000056f0| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 71 25 |PointerI|nfo",,q%|
|00005700| 0d 21 3e 2a 6d 6f 75 73 | 65 78 25 3d 21 71 25 3a |.!>*mous|ex%=!q%:|
|00005710| 6d 6f 75 73 65 79 25 3d | 71 25 21 34 3a 62 75 74 |mousey%=|q%!4:but|
|00005720| 74 6f 6e 73 25 3d 71 25 | 21 38 0d 21 48 1d 68 61 |tons%=q%|!8.!H.ha|
|00005730| 6e 64 6c 65 25 3d 71 25 | 21 31 32 3a 69 63 6f 6e |ndle%=q%|!12:icon|
|00005740| 25 3d 71 25 21 31 36 0d | 21 52 05 e1 0d 21 5c 05 |%=q%!16.|!R...!\.|
|00005750| 3a 0d 21 66 14 dd 20 f2 | 6d 6f 61 6e 28 72 65 70 |:.!f.. .|moan(rep|
|00005760| 6f 72 74 24 29 0d 21 70 | 14 85 20 26 32 30 30 30 |ort$).!p|.. &2000|
|00005770| 30 2c 72 65 70 6f 72 74 | 24 0d 21 7a 05 3a 0d 21 |0,report|$.!z.:.!|
|00005780| 84 1b dd 20 f2 65 72 72 | 6f 72 28 65 72 72 25 2c |... .err|or(err%,|
|00005790| 20 72 65 70 6f 72 74 24 | 29 0d 21 8e 0b ea 20 73 | report$|).!... s|
|000057a0| 74 6f 70 25 0d 21 98 0b | f2 45 73 63 4f 66 66 0d |top%.!..|.EscOff.|
|000057b0| 21 a2 27 73 74 6f 70 25 | 3d 28 72 65 70 6f 72 74 |!.'stop%|=(report|
|000057c0| 24 3c 3e 22 41 6c 72 65 | 61 64 79 20 70 72 69 6e |$<>"Alre|ady prin|
|000057d0| 74 69 6e 67 22 29 0d 21 | ac 56 e7 20 28 65 72 72 |ting").!|.V. (err|
|000057e0| 25 3c 26 31 30 31 30 30 | 20 84 20 65 72 72 25 3e |%<&10100| . err%>|
|000057f0| 26 32 30 30 30 30 29 20 | 80 20 65 72 72 25 3c 3e |&20000) |. err%<>|
|00005800| 31 37 20 8c 20 72 65 70 | 6f 72 74 24 3d 72 65 70 |17 . rep|ort$=rep|
|00005810| 6f 72 74 24 2b 22 20 69 | 6e 74 65 72 6e 61 6c 20 |ort$+" i|nternal |
|00005820| 65 72 72 6f 72 20 22 2b | c3 28 9e 29 0d 21 b6 16 |error "+|.(.).!..|
|00005830| 21 65 72 72 6f 72 5f 62 | 6c 6b 25 20 3d 20 65 72 |!error_b|lk% = er|
|00005840| 72 25 0d 21 c0 1b 24 28 | 65 72 72 6f 72 5f 62 6c |r%.!..$(|error_bl|
|00005850| 6b 25 2b 34 29 3d 72 65 | 70 6f 72 74 24 0d 21 ca |k%+4)=re|port$.!.|
|00005860| 21 f2 7a 65 72 6f 5f 74 | 65 72 6d 69 6e 61 74 65 |!.zero_t|erminate|
|00005870| 28 65 72 72 6f 72 5f 62 | 6c 6b 25 2b 34 29 0d 21 |(error_b|lk%+4).!|
|00005880| d4 22 e7 20 73 74 6f 70 | 25 20 e7 20 70 72 69 6e |.". stop|% . prin|
|00005890| 74 5f 6f 6e 25 20 8c 20 | 2a 46 58 20 32 31 2c 33 |t_on% . |*FX 21,3|
|000058a0| 0d 21 de 32 c8 99 20 22 | 57 69 6d 70 5f 52 65 70 |.!.2.. "|Wimp_Rep|
|000058b0| 6f 72 74 45 72 72 6f 72 | 22 2c 20 65 72 72 6f 72 |ortError|", error|
|000058c0| 5f 62 6c 6b 25 2c 20 31 | 2c 20 50 72 69 6e 74 65 |_blk%, 1|, Printe|
|000058d0| 72 24 0d 21 e8 0f f2 65 | 6e 64 63 6f 6e 66 69 72 |r$.!...e|ndconfir|
|000058e0| 6d 0d 21 f2 0d e7 20 73 | 74 6f 70 25 20 8c 0d 21 |m.!... s|top% ..!|
|000058f0| fc 1f 20 e7 20 70 72 69 | 6e 74 5f 6f 6e 25 20 f2 |.. . pri|nt_on% .|
|00005900| 73 74 6f 70 5f 70 72 69 | 6e 74 69 6e 67 0d 22 06 |stop_pri|nting.".|
|00005910| 32 20 e7 20 69 6e 5f 66 | 69 6c 65 25 20 c8 99 22 |2 . in_f|ile% .."|
|00005920| 58 4f 53 5f 46 69 6e 64 | 22 2c 30 2c 69 6e 5f 66 |XOS_Find|",0,in_f|
|00005930| 69 6c 65 25 3a 69 6e 5f | 66 69 6c 65 25 3d 30 0d |ile%:in_|file%=0.|
|00005940| 22 10 44 20 e7 20 6f 75 | 74 5f 66 69 6c 65 25 20 |".D . ou|t_file% |
|00005950| f2 45 73 63 4f 6e 3a c8 | 99 22 58 4f 53 5f 46 69 |.EscOn:.|."XOS_Fi|
|00005960| 6e 64 22 2c 30 2c 6f 75 | 74 5f 66 69 6c 65 25 3a |nd",0,ou|t_file%:|
|00005970| 6f 75 74 5f 66 69 6c 65 | 25 3d 30 3a f2 45 73 63 |out_file|%=0:.Esc|
|00005980| 4f 66 66 0d 22 1a 05 cd | 0d 22 24 05 e1 0d 22 2e |Off."...|."$...".|
|00005990| 05 3a 0d 22 38 18 dd f2 | 7a 65 72 6f 5f 74 65 72 |.:."8...|zero_ter|
|000059a0| 6d 69 6e 61 74 65 28 53 | 25 29 0d 22 42 0f 53 25 |minate(S|%)."B.S%|
|000059b0| 3f a9 24 53 25 20 3d 20 | 30 0d 22 4c 05 e1 0d 22 |?.$S% = |0."L..."|
|000059c0| 56 05 3a 0d 22 60 13 dd | a4 6c 6f 77 65 72 63 61 |V.:."`..|.lowerca|
|000059d0| 73 65 28 53 24 29 0d 22 | 6a 0c ea 20 52 24 2c 20 |se(S$)."|j.. R$, |
|000059e0| 43 25 0d 22 74 09 52 24 | 3d 22 22 0d 22 7e 0c c8 |C%."t.R$|=""."~..|
|000059f0| 95 20 a9 53 24 3e 30 0d | 22 88 11 20 43 25 20 3d |. .S$>0.|".. C% =|
|00005a00| 20 97 c0 53 24 2c 31 29 | 0d 22 92 14 20 53 24 20 | ..S$,1)|.".. S$ |
|00005a10| 3d 20 c2 53 24 2c a9 53 | 24 2d 31 29 0d 22 9c 32 |= .S$,.S|$-1).".2|
|00005a20| 20 e7 20 43 25 3e 3d 97 | 22 41 22 20 80 20 43 25 | . C%>=.|"A" . C%|
|00005a30| 3c 3d 97 22 5a 22 20 8c | 20 43 25 20 3d 20 43 25 |<=."Z" .| C% = C%|
|00005a40| 20 2d 20 97 22 41 22 20 | 2b 20 97 22 61 22 0d 22 | - ."A" |+ ."a"."|
|00005a50| a6 0e 20 52 24 20 2b 3d | 20 bd 43 25 0d 22 b0 05 |.. R$ +=| .C%."..|
|00005a60| ce 0d 22 ba 07 3d 52 24 | 0d 22 c4 05 3a 0d 22 ce |.."..=R$|."..:.".|
|00005a70| 0c dd 20 f2 73 74 61 6d | 70 0d 22 d8 0b ea 20 6c |.. .stam|p."... l|
|00005a80| 6f 61 64 25 0d 22 e2 07 | ea 20 85 0d 22 ec 0b ee |oad%."..|. .."...|
|00005a90| 20 85 20 ea 20 e1 0d 22 | f6 27 c8 99 20 22 4f 53 | . . .."|.'.. "OS|
|00005aa0| 5f 46 69 6c 65 22 2c 35 | 2c 66 69 6c 65 5f 6e 61 |_File",5|,file_na|
|00005ab0| 6d 65 25 20 b8 20 2c 2c | 6c 6f 61 64 25 0d 23 00 |me% . ,,|load%.#.|
|00005ac0| 53 e7 20 28 6c 6f 61 64 | 25 3e 3e 3e 38 29 20 3c |S. (load|%>>>8) <|
|00005ad0| 3e 20 26 46 46 46 30 30 | 30 20 2b 20 4f 75 74 70 |> &FFF00|0 + Outp|
|00005ae0| 75 74 54 79 70 65 25 20 | 8c 20 c8 99 20 22 4f 53 |utType% |. .. "OS|
|00005af0| 5f 46 69 6c 65 22 2c 31 | 31 2c 66 69 6c 65 5f 6e |_File",1|1,file_n|
|00005b00| 61 6d 65 25 2c 4f 75 74 | 70 75 74 54 79 70 65 25 |ame%,Out|putType%|
|00005b10| 0d 23 0a 05 e1 0d 23 14 | 05 3a 0d 23 1e 0c dd 20 |.#....#.|.:.#... |
|00005b20| f2 45 73 63 4f 6e 0d 23 | 28 0b 2a 46 58 20 32 32 |.EscOn.#|(.*FX 22|
|00005b30| 39 0d 23 32 05 e1 0d 23 | 3c 05 3a 0d 23 46 0d dd |9.#2...#|<.:.#F..|
|00005b40| 20 f2 45 73 63 4f 66 66 | 0d 23 50 0d 2a 46 58 20 | .EscOff|.#P.*FX |
|00005b50| 32 32 39 2c 31 0d 23 5a | 05 e1 0d ff |229,1.#Z|.... |
+--------+-------------------------+-------------------------+--------+--------+
