/ Internet File Formats / InternetFileFormatsCD.bin / text / latex / mac / alpha.6.0.sit / Tcl / SystemCode / menus.tcl

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 6d 65 6e 75 73 2e | 74 63 6c 00 00 00 00 00 |..menus.|tcl.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 41 4c 46 | 41 01 00 00 00 00 00 00 |.TEXTALF|A.......|
|00000050| 00 00 00 00 00 1c e9 00 | 00 02 8a ac 2c bb 12 ac |........|....,...|
|00000060| 2c bb 12 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |,.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 e7 26 00 00 |........|.....&..|
|00000080| 23 20 4d 79 20 6d 65 6e | 75 73 2e 09 09 0d 0d 6d |# My men|us.....m|
|00000090| 65 6e 75 20 2d 6e 20 46 | 69 6c 65 20 2d 70 20 66 |enu -n F|ile -p f|
|000000a0| 69 6c 65 4d 65 6e 75 50 | 72 6f 63 20 7b 0d 09 22 |ileMenuP|roc {.."|
|000000b0| 2f 4e 6e 65 77 22 0d 09 | 22 2f 4f 6f 70 65 6e c9 |/Nnew"..|"/Oopen.|
|000000c0| 22 0d 09 7b 6d 65 6e 75 | 20 2d 6e 20 72 65 63 65 |"..{menu| -n rece|
|000000d0| 6e 74 20 7b 7d 7d 0d 09 | 22 3c 53 2f 57 63 6c 6f |nt {}}..|"<S/Wclo|
|000000e0| 73 65 22 0d 09 22 3c 53 | 3c 49 3c 4f 2f 57 63 6c |se".."<S|<I<O/Wcl|
|000000f0| 6f 73 65 41 6c 6c 22 0d | 09 22 28 2d 22 0d 09 22 |oseAll".|."(-".."|
|00000100| 3c 53 2f 53 73 61 76 65 | 22 0d 09 22 3c 53 3c 49 |<S/Ssave|".."<S<I|
|00000110| 3c 4f 2f 53 73 61 76 65 | 41 6c 6c 22 0d 09 22 3c |<O/Ssave|All".."<|
|00000120| 53 73 61 76 65 41 43 6f | 70 79 41 73 c9 22 0d 09 |SsaveACo|pyAs."..|
|00000130| 22 3c 53 73 61 76 65 41 | 73 c9 22 0d 09 22 72 65 |"<SsaveA|s.".."re|
|00000140| 76 65 72 74 22 0d 09 22 | 28 2d 22 0d 09 22 2f 59 |vert".."|(-".."/Y|
|00000150| 73 68 65 6c 6c 22 0d 09 | 22 28 2d 22 0d 09 22 70 |shell"..|"(-".."p|
|00000160| 61 67 65 53 65 74 75 70 | c9 22 0d 09 7b 6d 65 6e |ageSetup|."..{men|
|00000170| 75 20 2d 6e 20 70 72 69 | 6e 74 20 7b 7d 7d 0d 09 |u -n pri|nt {}}..|
|00000180| 22 28 2d 22 0d 09 22 2f | 51 71 75 69 74 22 0d 7d |"(-".."/|Qquit".}|
|00000190| 0d 0d 0d 70 72 6f 63 20 | 66 69 6c 65 4d 65 6e 75 |...proc |fileMenu|
|000001a0| 50 72 6f 63 20 7b 6d 65 | 6e 75 20 69 74 65 6d 7d |Proc {me|nu item}|
|000001b0| 20 7b 0d 09 69 66 20 7b | 24 69 74 65 6d 20 3d 3d | {..if {|$item ==|
|000001c0| 20 22 6f 70 65 6e 22 7d | 20 7b 0d 09 09 66 69 6e | "open"}| {...fin|
|000001d0| 64 46 69 6c 65 0d 09 7d | 20 65 6c 73 65 69 66 20 |dFile..}| elseif |
|000001e0| 7b 24 69 74 65 6d 20 3d | 3d 20 22 63 6c 6f 73 65 |{$item =|= "close|
|000001f0| 22 7d 20 7b 0d 09 09 6b | 69 6c 6c 57 69 6e 64 6f |"} {...k|illWindo|
|00000200| 77 0d 09 7d 20 65 6c 73 | 65 20 7b 0d 09 09 24 69 |w..} els|e {...$i|
|00000210| 74 65 6d 0d 09 7d 0d 7d | 0d 0d 0d 6d 65 6e 75 20 |tem..}.}|...menu |
|00000220| 2d 6e 20 45 64 69 74 20 | 7b 0d 09 22 2f 5a 75 6e |-n Edit |{.."/Zun|
|00000230| 64 6f 22 0d 09 22 2f 5a | 3c 49 3c 4f 72 65 64 6f |do".."/Z|<I<Oredo|
|00000240| 22 0d 09 22 2f 4c 6c 6f | 61 64 22 0d 09 22 28 2d |".."/Llo|ad".."(-|
|00000250| 22 0d 09 22 2f 58 3c 53 | 63 75 74 22 0d 09 22 2f |".."/X<S|cut".."/|
|00000260| 58 3c 53 3c 49 3c 4f 63 | 75 74 26 41 70 70 65 6e |X<S<I<Oc|ut&Appen|
|00000270| 64 22 0d 09 22 2f 43 3c | 53 63 6f 70 79 22 0d 09 |d".."/C<|Scopy"..|
|00000280| 22 2f 43 3c 53 3c 49 3c | 4f 63 6f 70 79 26 41 70 |"/C<S<I<|Ocopy&Ap|
|00000290| 70 65 6e 64 22 0d 09 22 | 2f 56 3c 53 70 61 73 74 |pend".."|/V<Spast|
|000002a0| 65 22 0d 09 22 2f 56 3c | 53 3c 49 3c 4f 70 61 73 |e".."/V<|S<I<Opas|
|000002b0| 74 65 50 6f 70 22 0d 09 | 22 28 2d 22 0d 09 22 2f |tePop"..|"(-".."/|
|000002c0| 60 3c 53 74 77 69 64 64 | 6c 65 22 0d 09 22 2f 60 |`<Stwidd|le".."/`|
|000002d0| 3c 53 3c 49 3c 4f 74 77 | 69 64 64 6c 65 57 6f 72 |<S<I<Otw|iddleWor|
|000002e0| 64 73 22 0d 09 22 79 61 | 6e 6b 22 0d 09 22 2f 41 |ds".."ya|nk".."/A|
|000002f0| 3c 53 73 65 6c 65 63 74 | 41 6c 6c 22 0d 09 22 2f |<Sselect|All".."/|
|00000300| 41 3c 53 3c 49 3c 4f 73 | 65 6c 65 63 74 50 61 72 |A<S<I<Os|electPar|
|00000310| 61 67 72 61 70 68 22 0d | 09 22 63 6c 65 61 72 22 |agraph".|."clear"|
|00000320| 0d 09 22 28 2d 22 0d 09 | 7b 2f 5b 3c 53 73 68 69 |.."(-"..|{/[<Sshi|
|00000330| 66 74 4c 65 66 74 7d 0d | 09 7b 2f 5b 3c 53 3c 49 |ftLeft}.|.{/[<S<I|
|00000340| 3c 4f 73 68 69 66 74 4c | 65 66 74 53 70 61 63 65 |<OshiftL|eftSpace|
|00000350| 7d 0d 09 7b 2f 5d 3c 53 | 73 68 69 66 74 52 69 67 |}..{/]<S|shiftRig|
|00000360| 68 74 7d 0d 09 7b 2f 5d | 3c 53 3c 49 3c 4f 73 68 |ht}..{/]|<S<I<Osh|
|00000370| 69 66 74 52 69 67 68 74 | 53 70 61 63 65 7d 0d 09 |iftRight|Space}..|
|00000380| 22 2f 42 62 61 6c 61 6e | 63 65 22 0d 09 22 28 2d |"/Bbalan|ce".."(-|
|00000390| 22 0d 09 22 76 69 65 77 | 53 61 76 65 64 53 65 74 |".."view|SavedSet|
|000003a0| 74 69 6e 67 c9 22 0d 09 | 22 72 65 6d 6f 76 65 53 |ting."..|"removeS|
|000003b0| 61 76 65 64 53 65 74 74 | 69 6e 67 c9 22 0d 09 22 |avedSett|ing.".."|
|000003c0| 65 64 69 74 50 72 65 66 | 73 2e 74 63 6c 22 0d 7d |editPref|s.tcl".}|
|000003d0| 0d 0d 6d 65 6e 75 20 2d | 6e 20 53 65 61 72 63 68 |..menu -|n Search|
|000003e0| 20 7b 0d 09 22 2f 46 3c | 53 66 69 6e 64 c9 22 0d | {.."/F<|Sfind.".|
|000003f0| 09 22 2f 46 3c 53 3c 49 | 3c 4f 73 65 61 72 63 68 |."/F<S<I|<Osearch|
|00000400| 53 74 61 72 74 22 0d 09 | 22 2f 47 3c 53 66 69 6e |Start"..|"/G<Sfin|
|00000410| 64 41 67 61 69 6e 22 0d | 09 22 2f 47 3c 53 3c 49 |dAgain".|."/G<S<I|
|00000420| 3c 4f 66 69 6e 64 41 67 | 61 69 6e 42 61 63 6b 77 |<OfindAg|ainBackw|
|00000430| 61 72 64 22 0d 09 22 2f | 48 3c 49 3c 4f 66 69 6e |ard".."/|H<I<Ofin|
|00000440| 64 49 6e 4e 65 78 74 46 | 69 6c 65 22 0d 09 22 28 |dInNextF|ile".."(|
|00000450| 2d 22 0d 09 22 2f 45 3c | 53 65 6e 74 65 72 53 65 |-".."/E<|SenterSe|
|00000460| 61 72 63 68 53 74 72 69 | 6e 67 22 0d 09 22 2f 45 |archStri|ng".."/E|
|00000470| 3c 53 3c 49 3c 4f 65 6e | 74 65 72 52 65 70 6c 61 |<S<I<Oen|terRepla|
|00000480| 63 65 53 74 72 69 6e 67 | 22 0d 09 22 28 2d 22 0d |ceString|".."(-".|
|00000490| 09 22 2f 52 72 65 70 6c | 61 63 65 22 0d 09 22 2f |."/Rrepl|ace".."/|
|000004a0| 48 72 65 70 6c 61 63 65 | 26 46 69 6e 64 41 67 61 |Hreplace|&FindAga|
|000004b0| 69 6e 22 0d 09 22 3c 53 | 2f 52 3c 4f 3c 49 72 65 |in".."<S|/R<O<Ire|
|000004c0| 70 6c 61 63 65 41 6c 6c | 22 0d 09 22 3c 53 2f 52 |placeAll|".."<S/R|
|000004d0| 3c 4f 3c 49 3c 42 72 65 | 70 6c 61 63 65 49 6e 46 |<O<I<Bre|placeInF|
|000004e0| 69 6c 65 73 65 74 22 0d | 09 22 28 2d 22 0d 09 22 |ileset".|."(-".."|
|000004f0| 2f 3d 6d 61 72 6b 48 69 | 6c 69 74 65 22 0d 09 22 |/=markHi|lite".."|
|00000500| 28 2d 22 0d 09 7b 6d 65 | 6e 75 20 2d 6e 20 6e 61 |(-"..{me|nu -n na|
|00000510| 6d 65 64 4d 61 72 6b 73 | 20 2d 70 20 6e 61 6d 65 |medMarks| -p name|
|00000520| 64 4d 61 72 6b 50 72 6f | 63 20 7b 0d 09 09 22 2f |dMarkPro|c {..."/|
|00000530| 4b 3c 4f 3c 53 73 65 74 | c9 22 0d 09 09 22 2f 4b |K<O<Sset|."..."/K|
|00000540| 3c 4f 3c 42 3c 53 6d 61 | 72 6b 46 69 6c 65 22 0d |<O<B<Sma|rkFile".|
|00000550| 09 09 22 2f 4b 3c 49 3c | 4f 67 6f 74 6f c9 22 0d |.."/K<I<|Ogoto.".|
|00000560| 09 09 22 72 65 6d 6f 76 | 65 c9 22 0d 09 09 22 28 |.."remov|e."..."(|
|00000570| 2d 22 0d 09 09 22 73 6f | 72 74 22 0d 09 09 22 73 |-"..."so|rt"..."s|
|00000580| 6f 72 74 42 79 50 6f 73 | 69 74 69 6f 6e 22 7d 7d |ortByPos|ition"}}|
|00000590| 0d 09 7b 6d 65 6e 75 20 | 2d 6e 20 75 6e 6e 61 6d |..{menu |-n unnam|
|000005a0| 65 64 4d 61 72 6b 20 2d | 70 20 75 6e 6e 61 6d 65 |edMark -|p unname|
|000005b0| 64 4d 61 72 6b 70 72 6f | 63 20 7b 0d 09 09 22 73 |dMarkpro|c {..."s|
|000005c0| 65 74 c9 22 0d 09 09 22 | 65 78 63 68 61 6e 67 65 |et."..."|exchange|
|000005d0| 50 6f 69 6e 74 41 6e 64 | 4d 61 72 6b 22 7d 7d 0d |PointAnd|Mark"}}.|
|000005e0| 09 7b 6d 65 6e 75 20 2d | 6e 20 6d 61 72 6b 53 74 |.{menu -|n markSt|
|000005f0| 61 63 6b 20 2d 70 20 6d | 61 72 6b 4d 65 6e 75 50 |ack -p m|arkMenuP|
|00000600| 72 6f 63 20 7b 20 22 2f | 2c 3c 42 70 75 73 68 22 |roc { "/|,<Bpush"|
|00000610| 20 22 2f 2e 3c 42 70 6f | 70 22 7d 7d 0d 09 7b 6d | "/.<Bpo|p"}}..{m|
|00000620| 65 6e 75 20 2d 6e 20 72 | 65 67 69 73 74 65 72 73 |enu -n r|egisters|
|00000630| 20 7b 20 70 6f 69 6e 74 | 54 6f 52 65 67 69 73 74 | { point|ToRegist|
|00000640| 65 72 20 6a 75 6d 70 54 | 6f 52 65 67 69 73 74 65 |er jumpT|oRegiste|
|00000650| 72 20 7d 7d 0d 7d 0d 0d | 70 72 6f 63 20 6e 61 6d |r }}.}..|proc nam|
|00000660| 65 64 4d 61 72 6b 50 72 | 6f 63 20 7b 6d 65 6e 75 |edMarkPr|oc {menu|
|00000670| 20 69 74 65 6d 7d 20 7b | 0d 09 73 77 69 74 63 68 | item} {|..switch|
|00000680| 20 24 69 74 65 6d 20 7b | 0d 09 09 22 6d 61 72 6b | $item {|..."mark|
|00000690| 46 69 6c 65 22 09 09 09 | 7b 6d 61 72 6b 46 69 6c |File"...|{markFil|
|000006a0| 65 3b 20 6d 65 73 73 61 | 67 65 20 22 46 69 6c 65 |e; messa|ge "File|
|000006b0| 20 6d 61 72 6b 65 64 2e | 22 7d 0d 09 09 22 73 65 | marked.|"}..."se|
|000006c0| 74 22 20 09 09 09 09 7b | 73 65 74 4e 61 6d 65 64 |t" ....{|setNamed|
|000006d0| 4d 61 72 6b 7d 0d 09 09 | 22 67 6f 74 6f 22 09 09 |Mark}...|"goto"..|
|000006e0| 09 09 7b 67 6f 74 6f 46 | 69 6c 65 4d 61 72 6b 7d |..{gotoF|ileMark}|
|000006f0| 0d 09 09 22 72 65 6d 6f | 76 65 22 09 09 09 7b 72 |..."remo|ve"...{r|
|00000700| 65 6d 6f 76 65 4e 61 6d | 65 64 4d 61 72 6b 7d 0d |emoveNam|edMark}.|
|00000710| 09 09 22 73 6f 72 74 22 | 09 09 09 09 7b 73 6f 72 |.."sort"|....{sor|
|00000720| 74 4d 61 72 6b 73 46 69 | 6c 65 7d 0d 09 09 22 73 |tMarksFi|le}..."s|
|00000730| 6f 72 74 42 79 50 6f 73 | 69 74 69 6f 6e 22 09 7b |ortByPos|ition".{|
|00000740| 6f 72 64 65 72 4d 61 72 | 6b 73 7d 0d 09 7d 0d 7d |orderMar|ks}..}.}|
|00000750| 0d 0d 70 72 6f 63 20 75 | 6e 6e 61 6d 65 64 4d 61 |..proc u|nnamedMa|
|00000760| 72 6b 70 72 6f 63 20 7b | 6d 65 6e 75 20 69 74 65 |rkproc {|menu ite|
|00000770| 6d 7d 20 7b 0d 09 73 77 | 69 74 63 68 20 24 69 74 |m} {..sw|itch $it|
|00000780| 65 6d 20 7b 0d 09 09 22 | 73 65 74 22 20 09 09 09 |em {..."|set" ...|
|00000790| 09 09 7b 73 65 74 4d 61 | 72 6b 7d 0d 09 09 22 65 |..{setMa|rk}..."e|
|000007a0| 78 63 68 61 6e 67 65 50 | 6f 69 6e 74 41 6e 64 4d |xchangeP|ointAndM|
|000007b0| 61 72 6b 22 09 7b 65 78 | 63 68 61 6e 67 65 50 6f |ark".{ex|changePo|
|000007c0| 69 6e 74 41 6e 64 4d 61 | 72 6b 7d 0d 09 09 22 68 |intAndMa|rk}..."h|
|000007d0| 69 6c 69 74 65 22 09 09 | 09 09 7b 6d 61 72 6b 48 |ilite"..|..{markH|
|000007e0| 69 6c 69 74 65 7d 0d 09 | 7d 0d 7d 0d 09 0d 70 72 |ilite}..|}.}...pr|
|000007f0| 6f 63 20 6d 61 72 6b 4d | 65 6e 75 50 72 6f 63 20 |oc markM|enuProc |
|00000800| 7b 6d 65 6e 75 20 69 74 | 65 6d 7d 20 7b 0d 09 73 |{menu it|em} {..s|
|00000810| 77 69 74 63 68 20 24 69 | 74 65 6d 20 7b 0d 09 09 |witch $i|tem {...|
|00000820| 22 70 75 73 68 22 20 09 | 7b 70 75 73 68 4d 61 72 |"push" .|{pushMar|
|00000830| 6b 7d 0d 09 09 22 70 6f | 70 22 09 7b 70 6f 70 4d |k}..."po|p".{popM|
|00000840| 61 72 6b 7d 0d 09 7d 0d | 7d 0d 09 09 0d 70 72 6f |ark}..}.|}....pro|
|00000850| 63 20 69 6e 73 74 61 6c | 6c 50 72 6f 63 20 7b 6d |c instal|lProc {m|
|00000860| 65 6e 75 20 69 74 65 6d | 7d 20 7b 0d 09 73 77 69 |enu item|} {..swi|
|00000870| 74 63 68 20 24 69 74 65 | 6d 20 7b 0d 09 09 22 45 |tch $ite|m {..."E|
|00000880| 6c 65 63 74 72 69 63 20 | 41 6c 69 61 73 22 20 09 |lectric |Alias" .|
|00000890| 7b 6c 6f 61 64 45 6c 65 | 63 74 72 69 63 41 6c 69 |{loadEle|ctricAli|
|000008a0| 61 73 7d 0d 09 09 22 4c | 61 54 65 58 20 32 2e 30 |as}..."L|aTeX 2.0|
|000008b0| 39 22 09 09 7b 6c 6f 61 | 64 4c 61 54 65 58 7d 0d |9"..{loa|dLaTeX}.|
|000008c0| 09 09 22 4c 61 54 65 58 | 32 65 22 09 09 09 7b 6c |.."LaTeX|2e"...{l|
|000008d0| 6f 61 64 4c 61 54 65 58 | 7d 0d 09 09 22 4d 61 63 |oadLaTeX|}..."Mac|
|000008e0| 50 65 72 6c 22 09 09 09 | 7b 6c 6f 61 64 4d 61 63 |Perl"...|{loadMac|
|000008f0| 50 65 72 6c 7d 0d 09 7d | 0d 7d 0d 0d 0d 6d 65 6e |Perl}..}|.}...men|
|00000900| 75 20 2d 6e 20 22 55 74 | 69 6c 73 22 20 7b 0d 09 |u -n "Ut|ils" {..|
|00000910| 09 7b 6d 65 6e 75 20 2d | 6e 20 66 69 6c 65 55 74 |.{menu -|n fileUt|
|00000920| 69 6c 73 20 7b 0d 09 09 | 09 22 69 6e 73 65 72 74 |ils {...|."insert|
|00000930| 50 61 74 68 4e 61 6d 65 | c9 22 0d 09 09 09 22 69 |PathName|."...."i|
|00000940| 6e 73 65 72 74 46 69 6c | 65 c9 22 0d 09 09 09 22 |nsertFil|e."...."|
|00000950| 66 69 6c 65 52 65 6d 6f | 76 65 c9 22 0d 09 09 09 |fileRemo|ve."....|
|00000960| 22 66 69 6c 65 49 6e 66 | 6f c9 22 0d 09 09 09 22 |"fileInf|o."...."|
|00000970| 77 6f 72 64 43 6f 75 6e | 74 22 7d 7d 0d 09 09 7b |wordCoun|t"}}...{|
|00000980| 6d 65 6e 75 20 2d 6d 20 | 2d 6e 20 63 6f 6d 70 61 |menu -m |-n compa|
|00000990| 72 65 20 2d 70 20 63 6f | 6d 70 61 72 65 50 72 6f |re -p co|mparePro|
|000009a0| 63 20 7b 0d 09 09 09 22 | 57 69 6e 64 6f 77 73 22 |c {...."|Windows"|
|000009b0| 0d 09 09 09 22 46 69 6c | 65 73 c9 22 0d 09 09 09 |...."Fil|es."....|
|000009c0| 22 44 69 72 65 63 74 6f | 72 69 65 73 c9 22 7d 7d |"Directo|ries."}}|
|000009d0| 0d 09 09 7b 6d 65 6e 75 | 20 2d 6e 20 61 73 63 69 |...{menu| -n asci|
|000009e0| 69 45 74 63 20 7b 0d 09 | 09 09 22 71 75 6f 74 65 |iEtc {..|.."quote|
|000009f0| 43 68 61 72 22 0d 09 09 | 09 22 28 2d 22 0d 09 09 |Char"...|."(-"...|
|00000a00| 09 22 6b 65 79 43 6f 64 | 65 22 0d 09 09 09 22 6b |."keyCod|e"...."k|
|00000a10| 65 79 41 73 63 69 69 22 | 0d 09 09 09 22 67 65 74 |eyAscii"|...."get|
|00000a20| 41 73 63 69 69 22 0d 09 | 09 09 22 69 6e 73 65 72 |Ascii"..|.."inser|
|00000a30| 74 41 73 63 69 69 22 7d | 7d 0d 09 09 22 28 2d 22 |tAscii"}|}..."(-"|
|00000a40| 0d 09 09 22 65 76 61 6c | 75 61 74 65 c9 22 0d 09 |..."eval|uate."..|
|00000a50| 09 7b 6d 65 6e 75 20 2d | 6e 20 4b 62 64 4d 61 63 |.{menu -|n KbdMac|
|00000a60| 72 6f 73 20 7b 0d 09 09 | 09 22 2f 71 73 74 61 72 |ros {...|."/qstar|
|00000a70| 74 4b 65 79 62 6f 61 72 | 64 4d 61 63 72 6f 22 0d |tKeyboar|dMacro".|
|00000a80| 09 09 09 22 2f 72 65 6e | 64 4b 65 79 62 6f 61 72 |..."/ren|dKeyboar|
|00000a90| 64 4d 61 63 72 6f 22 0d | 09 09 09 22 2f 73 65 78 |dMacro".|..."/sex|
|00000aa0| 65 63 75 74 65 4b 65 79 | 62 6f 61 72 64 4d 61 63 |ecuteKey|boardMac|
|00000ab0| 72 6f 22 0d 09 09 09 22 | 64 75 6d 70 4d 61 63 72 |ro"...."|dumpMacr|
|00000ac0| 6f 22 7d 7d 0d 09 09 22 | 28 2d 22 0d 09 09 22 73 |o"}}..."|(-"..."s|
|00000ad0| 6f 72 74 4c 69 6e 65 73 | 22 0d 09 09 22 2f 4c 3c |ortLines|"..."/L<|
|00000ae0| 49 3c 4f 73 70 65 6c 6c | 63 68 65 63 6b 57 69 6e |I<Ospell|checkWin|
|00000af0| 64 6f 77 22 0d 09 09 22 | 73 65 6e 64 55 72 6c 22 |dow"..."|sendUrl"|
|00000b00| 0d 09 09 22 28 2d 22 0d | 09 09 22 2f 4d 3c 49 3c |..."(-".|.."/M<I<|
|00000b10| 4f 6d 61 74 63 68 69 6e | 67 4c 69 6e 65 73 22 0d |Omatchin|gLines".|
|00000b20| 09 09 22 67 6f 74 6f 4d | 61 74 63 68 22 0d 09 09 |.."gotoM|atch"...|
|00000b30| 22 2f 69 6e 65 78 74 4d | 61 74 63 68 22 0d 09 09 |"/inextM|atch"...|
|00000b40| 22 28 2d 22 0d 09 09 7b | 6d 65 6e 75 20 2d 6e 20 |"(-"...{|menu -n |
|00000b50| 4e 61 6d 65 64 43 6c 69 | 70 62 6f 61 72 64 73 20 |NamedCli|pboards |
|00000b60| 2d 70 20 6e 61 6d 65 64 | 43 6c 69 70 4d 65 6e 75 |-p named|ClipMenu|
|00000b70| 50 72 6f 63 20 7b 22 63 | 6f 70 79 c9 22 20 22 63 |Proc {"c|opy." "c|
|00000b80| 75 74 c9 22 20 22 70 61 | 73 74 65 c9 22 7d 7d 0d |ut." "pa|ste."}}.|
|00000b90| 09 09 7b 6d 65 6e 75 20 | 2d 6d 20 2d 6e 20 69 6e |..{menu |-m -n in|
|00000ba0| 73 74 61 6c 6c 20 2d 70 | 20 69 6e 73 74 61 6c 6c |stall -p| install|
|00000bb0| 50 72 6f 63 20 7b 0d 09 | 09 09 22 45 6c 65 63 74 |Proc {..|.."Elect|
|00000bc0| 72 69 63 20 41 6c 69 61 | 73 22 0d 09 09 09 22 4d |ric Alia|s"...."M|
|00000bd0| 61 63 50 65 72 6c 22 0d | 09 09 09 22 28 2d 22 0d |acPerl".|..."(-".|
|00000be0| 09 09 09 22 4c 61 54 65 | 58 32 65 22 0d 09 09 09 |..."LaTe|X2e"....|
|00000bf0| 22 4c 61 54 65 58 20 32 | 2e 30 39 22 0d 09 09 7d |"LaTeX 2|.09"...}|
|00000c00| 7d 0d 09 09 6c 69 73 74 | 46 75 6e 63 74 69 6f 6e |}...list|Function|
|00000c10| 73 0d 7d 0d 0d 0d 70 72 | 6f 63 20 63 6f 6d 70 61 |s.}...pr|oc compa|
|00000c20| 72 65 50 72 6f 63 20 7b | 6d 65 6e 75 20 69 74 65 |reProc {|menu ite|
|00000c30| 6d 7d 20 7b 0d 09 63 61 | 74 63 68 20 7b 63 6f 6d |m} {..ca|tch {com|
|00000c40| 70 61 72 65 24 69 74 65 | 6d 7d 20 6d 73 67 0d 09 |pare$ite|m} msg..|
|00000c50| 6d 65 73 73 61 67 65 20 | 24 6d 73 67 0d 7d 0d 0d |message |$msg.}..|
|00000c60| 70 72 6f 63 20 6e 61 6d | 65 64 43 6c 69 70 4d 65 |proc nam|edClipMe|
|00000c70| 6e 75 50 72 6f 63 20 7b | 6d 65 6e 75 20 69 74 65 |nuProc {|menu ite|
|00000c80| 6d 7d 20 7b 0d 09 73 77 | 69 74 63 68 20 24 69 74 |m} {..sw|itch $it|
|00000c90| 65 6d 20 7b 0d 09 09 22 | 63 6f 70 79 22 20 09 09 |em {..."|copy" ..|
|00000ca0| 22 63 6f 70 79 4e 61 6d | 65 64 43 6c 69 70 62 6f |"copyNam|edClipbo|
|00000cb0| 61 72 64 22 0d 09 09 22 | 63 75 74 22 20 09 09 22 |ard"..."|cut" .."|
|00000cc0| 63 75 74 4e 61 6d 65 64 | 43 6c 69 70 62 6f 61 72 |cutNamed|Clipboar|
|00000cd0| 64 22 0d 09 09 22 70 61 | 73 74 65 22 20 09 22 70 |d"..."pa|ste" ."p|
|00000ce0| 61 73 74 65 4e 61 6d 65 | 64 43 6c 69 70 62 6f 61 |asteName|dClipboa|
|00000cf0| 72 64 22 0d 09 7d 0d 7d | 0d 0d 09 09 0d 6d 65 6e |rd"..}.}|.....men|
|00000d00| 75 09 2d 6e 20 4d 6f 64 | 65 20 7b 0d 09 09 7b 6d |u.-n Mod|e {...{m|
|00000d10| 65 6e 75 20 2d 73 20 2d | 6e 20 66 6c 61 67 73 20 |enu -s -|n flags |
|00000d20| 2d 70 20 65 64 69 74 46 | 6c 61 67 20 7b 7d 7d 0d |-p editF|lag {}}.|
|00000d30| 09 09 7b 6d 65 6e 75 20 | 2d 73 20 2d 6e 20 76 61 |..{menu |-s -n va|
|00000d40| 72 73 20 2d 70 20 65 64 | 69 74 56 61 72 20 7b 7d |rs -p ed|itVar {}|
|00000d50| 7d 0d 09 09 22 28 2d 22 | 0d 09 09 22 2f 6a 63 6d |}..."(-"|..."/jcm|
|00000d60| 64 44 6f 75 62 6c 65 43 | 6c 69 63 6b 22 0d 09 09 |dDoubleC|lick"...|
|00000d70| 22 2f 6b 64 65 73 63 72 | 69 62 65 42 69 6e 64 69 |"/kdescr|ibeBindi|
|00000d80| 6e 67 22 0d 09 09 22 6c | 69 73 74 42 69 6e 64 69 |ng"..."l|istBindi|
|00000d90| 6e 67 73 22 0d 09 09 7b | 6d 65 6e 75 20 2d 6e 20 |ngs"...{|menu -n |
|00000da0| 65 6d 61 63 73 20 7b 7d | 7d 0d 09 09 7b 6d 65 6e |emacs {}|}...{men|
|00000db0| 75 20 2d 6e 20 61 70 70 | 50 61 74 68 73 20 7b 7d |u -n app|Paths {}|
|00000dc0| 7d 0d 09 09 22 28 2d 22 | 0d 09 09 22 2f 6c 73 65 |}..."(-"|..."/lse|
|00000dd0| 74 46 6f 6e 74 73 54 61 | 62 73 c9 22 0d 09 09 22 |tFontsTa|bs."..."|
|00000de0| 28 2d 22 0d 09 09 7b 6d | 65 6e 75 20 2d 6d 20 2d |(-"...{m|enu -m -|
|00000df0| 6e 20 73 77 69 74 63 68 | 54 6f 20 2d 70 20 73 77 |n switch|To -p sw|
|00000e00| 69 74 63 68 50 72 6f 63 | 20 7b 7d 7d 0d 09 09 22 |itchProc| {}}..."|
|00000e10| 74 6f 6f 6c 73 65 72 76 | 65 72 53 68 65 6c 6c 22 |toolserv|erShell"|
|00000e20| 0d 7d 0d 0d 23 20 3d 3d | 3d 3d 20 4e 4f 54 45 3a |.}..# ==|== NOTE:|
|00000e30| 20 20 72 65 63 74 4d 61 | 72 6b 48 69 6c 69 74 65 |  rectMa|rkHilite|
|00000e40| 2c 20 6f 6e 65 73 70 61 | 63 65 2c 20 63 65 6e 74 |, onespa|ce, cent|
|00000e50| 65 72 52 65 64 72 61 77 | 2c 20 64 6f 54 61 62 0d |erRedraw|, doTab.|
|00000e60| 6d 65 6e 75 09 2d 6e 20 | 43 6f 6e 76 65 72 74 20 |menu.-n |Convert |
|00000e70| 7b 0d 09 09 22 2f 49 3c | 53 66 69 6c 6c 50 61 72 |{..."/I<|SfillPar|
|00000e80| 61 67 72 61 70 68 22 0d | 09 09 22 2f 49 3c 53 3c |agraph".|.."/I<S<|
|00000e90| 4f 3c 49 77 72 61 70 50 | 61 72 61 67 72 61 70 68 |O<IwrapP|aragraph|
|00000ea0| 22 0d 09 09 22 2f 49 3c | 53 3c 4f 3c 42 73 65 6e |"..."/I<|S<O<Bsen|
|00000eb0| 74 65 6e 63 65 50 61 72 | 61 67 72 61 70 68 22 0d |tencePar|agraph".|
|00000ec0| 09 09 22 2f 55 3c 53 3c | 4f 66 69 6c 6c 52 65 67 |.."/U<S<|OfillReg|
|00000ed0| 69 6f 6e 22 0d 09 09 22 | 2f 55 3c 53 3c 49 3c 4f |ion"..."|/U<S<I<O|
|00000ee0| 77 72 61 70 52 65 67 69 | 6f 6e 22 0d 09 09 22 3c |wrapRegi|on"..."<|
|00000ef0| 45 3c 53 70 61 72 61 67 | 72 61 70 68 54 6f 4c 69 |E<Sparag|raphToLi|
|00000f00| 6e 65 22 0d 09 09 22 3c | 53 6c 69 6e 65 54 6f 50 |ne"..."<|SlineToP|
|00000f10| 61 72 61 67 72 61 70 68 | 22 0d 09 09 22 28 2d 22 |aragraph|"..."(-"|
|00000f20| 0d 09 09 22 7a 61 70 49 | 6e 76 69 73 69 62 6c 65 |..."zapI|nvisible|
|00000f30| 73 22 0d 09 09 22 3c 53 | 73 70 61 63 65 73 54 6f |s"..."<S|spacesTo|
|00000f40| 54 61 62 73 22 0d 09 09 | 22 3c 53 74 61 62 73 54 |Tabs"...|"<StabsT|
|00000f50| 6f 53 70 61 63 65 73 22 | 0d 09 09 22 28 2d 22 0d |oSpaces"|..."(-".|
|00000f60| 09 09 7b 6d 65 6e 75 20 | 2d 6e 20 53 74 72 69 6e |..{menu |-n Strin|
|00000f70| 67 73 20 7b 0d 09 09 09 | 22 3c 53 72 65 6d 6f 76 |gs {....|"<Sremov|
|00000f80| 65 50 72 65 66 69 78 22 | 0d 09 09 09 22 3c 53 69 |ePrefix"|...."<Si|
|00000f90| 6e 73 65 72 74 50 72 65 | 66 69 78 22 0d 09 09 09 |nsertPre|fix"....|
|00000fa0| 22 3c 53 3c 45 72 65 6d | 6f 76 65 53 75 66 66 69 |"<S<Erem|oveSuffi|
|00000fb0| 78 22 0d 09 09 09 22 3c | 53 69 6e 73 65 72 74 53 |x"...."<|SinsertS|
|00000fc0| 75 66 66 69 78 22 0d 09 | 09 09 22 73 65 74 50 72 |uffix"..|.."setPr|
|00000fd0| 65 66 69 78 22 0d 09 09 | 09 22 73 65 74 53 75 66 |efix"...|."setSuf|
|00000fe0| 66 69 78 22 0d 09 09 09 | 7d 7d 0d 09 09 22 2f 44 |fix"....|}}..."/D|
|00000ff0| 3c 53 63 6f 6d 6d 65 6e | 74 4c 69 6e 65 22 0d 09 |<Scommen|tLine"..|
|00001000| 09 22 2f 44 3c 53 3c 49 | 3c 4f 75 6e 63 6f 6d 6d |."/D<S<I|<Ouncomm|
|00001010| 65 6e 74 4c 69 6e 65 22 | 0d 09 09 22 3c 53 75 6e |entLine"|..."<Sun|
|00001020| 63 6f 6d 6d 65 6e 74 42 | 6f 78 22 0d 09 09 22 3c |commentB|ox"..."<|
|00001030| 53 63 6f 6d 6d 65 6e 74 | 42 6f 78 22 0d 09 09 22 |Scomment|Box"..."|
|00001040| 3c 53 3c 45 69 6e 64 65 | 6e 74 52 65 67 69 6f 6e |<S<Einde|ntRegion|
|00001050| 22 0d 09 09 22 3c 53 69 | 6e 64 65 6e 74 4c 69 6e |"..."<Si|ndentLin|
|00001060| 65 22 0d 09 09 22 28 2d | 22 0d 09 09 22 3c 53 75 |e"..."(-|"..."<Su|
|00001070| 70 63 61 73 65 52 65 67 | 69 6f 6e 22 0d 09 09 22 |pcaseReg|ion"..."|
|00001080| 3c 53 64 6f 77 6e 63 61 | 73 65 52 65 67 69 6f 6e |<Sdownca|seRegion|
|00001090| 22 0d 7d 0d 0d 23 20 52 | 65 61 6c 20 4b 6c 75 64 |".}..# R|eal Klud|
|000010a0| 67 65 0d 70 72 6f 63 20 | 68 65 6c 70 4d 65 6e 75 |ge.proc |helpMenu|
|000010b0| 50 72 6f 63 20 7b 6d 65 | 6e 75 20 69 74 65 6d 7d |Proc {me|nu item}|
|000010c0| 20 7b 0d 09 67 6c 6f 62 | 61 6c 20 48 4f 4d 45 20 | {..glob|al HOME |
|000010d0| 68 65 6c 70 4d 65 6e 75 | 0d 09 0d 09 69 66 20 7b |helpMenu|....if {|
|000010e0| 24 6d 65 6e 75 20 3d 3d | 20 24 68 65 6c 70 4d 65 |$menu ==| $helpMe|
|000010f0| 6e 75 7d 20 7b 0d 09 09 | 65 64 69 74 20 2d 72 20 |nu} {...|edit -r |
|00001100| 24 48 4f 4d 45 3a 48 65 | 6c 70 3a 24 69 74 65 6d |$HOME:He|lp:$item|
|00001110| 0d 09 7d 20 65 6c 73 65 | 20 7b 0d 09 09 65 64 69 |..} else| {...edi|
|00001120| 74 20 2d 72 20 24 48 4f | 4d 45 3a 48 65 6c 70 3a |t -r $HO|ME:Help:|
|00001130| 24 6d 65 6e 75 3a 24 69 | 74 65 6d 0d 09 7d 0d 23 |$menu:$i|tem..}.#|
|00001140| 20 09 69 66 20 7b 24 69 | 74 65 6d 20 3d 3d 20 22 | .if {$i|tem == "|
|00001150| 4d 61 6e 75 61 6c 22 7d | 20 7b 0d 23 20 09 09 67 |Manual"}| {.# ..g|
|00001160| 6c 6f 62 61 6c 20 77 69 | 6e 4d 6f 64 65 73 0d 23 |lobal wi|nModes.#|
|00001170| 20 09 09 0d 23 20 09 09 | 73 65 74 20 6e 6d 20 5b | ...# ..|set nm [|
|00001180| 6c 69 6e 64 65 78 20 5b | 77 69 6e 4e 61 6d 65 73 |lindex [|winNames|
|00001190| 20 2d 66 5d 20 30 5d 0d | 23 20 09 09 73 65 74 20 | -f] 0].|# ..set |
|000011a0| 77 69 6e 4d 6f 64 65 73 | 28 24 6e 6d 29 20 48 65 |winModes|($nm) He|
|000011b0| 6c 70 0d 23 20 09 09 63 | 68 61 6e 67 65 4d 6f 64 |lp.# ..c|hangeMod|
|000011c0| 65 20 48 65 6c 70 0d 23 | 20 09 7d 0d 7d 0d 0d 70 |e Help.#| .}.}..p|
|000011d0| 72 6f 63 20 73 74 72 69 | 70 20 7b 61 72 67 7d 20 |roc stri|p {arg} |
|000011e0| 7b 0d 09 69 66 20 7b 5b | 72 65 67 73 75 62 20 2d |{..if {[|regsub -|
|000011f0| 61 6c 6c 20 7b 5c 5c 28 | 5b 5d 5b 5c 7b 5c 7d 5d |all {\\(|[][\{\}]|
|00001200| 29 7d 20 24 61 72 67 20 | 7b 5c 31 7d 20 76 5d 7d |)} $arg |{\1} v]}|
|00001210| 20 7b 72 65 74 75 72 6e | 20 24 76 7d 0d 09 72 65 | {return| $v}..re|
|00001220| 74 75 72 6e 20 24 61 72 | 67 0d 7d 0d 0d 73 65 74 |turn $ar|g.}..set|
|00001230| 20 6d 65 6e 20 7b 20 22 | 4d 61 6e 75 61 6c 22 20 | men { "|Manual" |
|00001240| 22 41 6c 70 68 61 20 43 | 6f 6d 6d 61 6e 64 73 22 |"Alpha C|ommands"|
|00001250| 20 22 54 63 6c 20 43 6f | 6d 6d 61 6e 64 73 22 20 | "Tcl Co|mmands" |
|00001260| 22 28 2d 22 20 22 52 65 | 61 64 6d 65 22 20 22 43 |"(-" "Re|adme" "C|
|00001270| 68 61 6e 67 65 73 22 20 | 22 54 6f 44 6f 22 20 22 |hanges" |"ToDo" "|
|00001280| 28 2d 22 20 7d 0d 0d 66 | 6f 72 65 61 63 68 20 66 |(-" }..f|oreach f|
|00001290| 20 5b 6c 73 6f 72 74 20 | 2d 69 67 6e 6f 72 65 20 | [lsort |-ignore |
|000012a0| 5b 67 6c 6f 62 20 22 24 | 48 4f 4d 45 3a 48 65 6c |[glob "$|HOME:Hel|
|000012b0| 70 3a 2a 22 5d 5d 20 7b | 0d 09 73 65 74 20 66 20 |p:*"]] {|..set f |
|000012c0| 5b 66 69 6c 65 20 74 61 | 69 6c 20 24 66 5d 0d 09 |[file ta|il $f]..|
|000012d0| 69 66 20 7b 28 24 66 20 | 21 3d 20 22 4d 61 6e 75 |if {($f |!= "Manu|
|000012e0| 61 6c 22 29 20 26 26 20 | 28 24 66 20 21 3d 20 22 |al") && |($f != "|
|000012f0| 52 65 61 64 6d 65 22 29 | 20 26 26 20 28 24 66 20 |Readme")| && ($f |
|00001300| 21 3d 20 22 43 68 61 6e | 67 65 73 22 29 20 26 26 |!= "Chan|ges") &&|
|00001310| 20 28 24 66 20 21 3d 20 | 22 54 6f 44 6f 22 29 20 | ($f != |"ToDo") |
|00001320| 26 26 20 28 24 66 20 21 | 3d 20 22 41 6c 70 68 61 |&& ($f !|= "Alpha|
|00001330| 20 43 6f 6d 6d 61 6e 64 | 73 22 29 20 26 26 20 28 | Command|s") && (|
|00001340| 24 66 20 21 3d 20 22 54 | 63 6c 20 43 6f 6d 6d 61 |$f != "T|cl Comma|
|00001350| 6e 64 73 22 29 7d 20 7b | 0d 09 09 6c 61 70 70 65 |nds")} {|...lappe|
|00001360| 6e 64 20 6d 65 6e 20 24 | 66 0d 09 7d 0d 7d 0d 6d |nd men $|f..}.}.m|
|00001370| 65 6e 75 20 2d 6e 20 24 | 68 65 6c 70 4d 65 6e 75 |enu -n $|helpMenu|
|00001380| 20 2d 73 20 2d 6d 20 2d | 70 20 68 65 6c 70 4d 65 | -s -m -|p helpMe|
|00001390| 6e 75 50 72 6f 63 20 24 | 6d 65 6e 0d 75 6e 73 65 |nuProc $|men.unse|
|000013a0| 74 20 6d 65 6e 0d 0d 0d | 70 72 6f 63 20 65 73 63 |t men...|proc esc|
|000013b0| 61 70 65 53 70 61 63 65 | 73 20 7b 73 74 72 7d 20 |apeSpace|s {str} |
|000013c0| 7b 0d 09 72 65 67 73 75 | 62 20 2d 61 6c 6c 20 7b |{..regsu|b -all {|
|000013d0| 20 7d 20 24 73 74 72 20 | 7b 5c 20 7d 20 73 74 72 | } $str |{\ } str|
|000013e0| 32 0d 09 72 65 74 75 72 | 6e 20 24 73 74 72 32 0d |2..retur|n $str2.|
|000013f0| 7d 0d 0d 0d 70 72 6f 63 | 20 62 75 69 6c 64 53 77 |}...proc| buildSw|
|00001400| 69 74 63 68 65 73 20 7b | 7d 20 7b 0d 09 67 6c 6f |itches {|} {..glo|
|00001410| 62 61 6c 20 73 77 69 74 | 63 68 41 70 70 73 0d 09 |bal swit|chApps..|
|00001420| 0d 09 6d 65 6e 75 20 2d | 6d 20 2d 6e 20 73 77 69 |..menu -|m -n swi|
|00001430| 74 63 68 54 6f 20 2d 70 | 20 73 77 69 74 63 68 50 |tchTo -p| switchP|
|00001440| 72 6f 63 20 7b 22 3c 4f | 3c 49 2f 4e 4e 6f 77 c9 |roc {"<O|<I/NNow.|
|00001450| 22 20 22 41 64 64 c9 22 | 20 22 52 65 6d 6f 76 65 |" "Add."| "Remove|
|00001460| c9 22 20 22 28 2d 22 7d | 0d 0d 09 69 66 20 7b 5b |." "(-"}|...if {[|
|00001470| 69 6e 66 6f 20 65 78 69 | 73 74 73 20 73 77 69 74 |info exi|sts swit|
|00001480| 63 68 41 70 70 73 5d 7d | 20 7b 0d 09 09 66 6f 72 |chApps]}| {...for|
|00001490| 65 61 63 68 20 61 70 70 | 20 24 73 77 69 74 63 68 |each app| $switch|
|000014a0| 41 70 70 73 20 7b 0d 09 | 09 09 6c 61 70 70 65 6e |Apps {..|..lappen|
|000014b0| 64 20 6e 61 6d 65 73 20 | 5b 66 69 6c 65 20 74 61 |d names |[file ta|
|000014c0| 69 6c 20 24 61 70 70 5d | 0d 09 09 7d 0d 09 09 66 |il $app]|...}...f|
|000014d0| 6f 72 65 61 63 68 20 6e | 61 6d 65 20 5b 6c 73 6f |oreach n|ame [lso|
|000014e0| 72 74 20 2d 69 67 6e 6f | 72 65 20 24 6e 61 6d 65 |rt -igno|re $name|
|000014f0| 73 5d 20 7b 0d 09 09 09 | 61 64 64 4d 65 6e 75 49 |s] {....|addMenuI|
|00001500| 74 65 6d 20 2d 6d 20 2d | 6c 20 22 62 6c 61 68 22 |tem -m -|l "blah"|
|00001510| 20 73 77 69 74 63 68 54 | 6f 20 24 6e 61 6d 65 0d | switchT|o $name.|
|00001520| 09 09 7d 0d 09 7d 0d 7d | 0d 0d 0d 70 72 6f 63 20 |..}..}.}|...proc |
|00001530| 73 77 69 74 63 68 50 72 | 6f 63 20 7b 6d 65 6e 75 |switchPr|oc {menu|
|00001540| 20 6e 61 6d 65 7d 20 7b | 0d 09 67 6c 6f 62 61 6c | name} {|..global|
|00001550| 20 73 77 69 74 63 68 54 | 6f 20 73 77 69 74 63 68 | switchT|o switch|
|00001560| 41 70 70 73 0d 0d 09 69 | 66 20 7b 24 6e 61 6d 65 |Apps...i|f {$name|
|00001570| 20 3d 3d 20 22 41 64 64 | 22 7d 20 7b 0d 09 09 73 | == "Add|"} {...s|
|00001580| 65 74 20 66 6e 61 6d 65 | 20 5b 67 65 74 66 69 6c |et fname| [getfil|
|00001590| 65 20 22 50 69 63 6b 20 | 61 6e 20 61 70 70 3a 22 |e "Pick |an app:"|
|000015a0| 5d 0d 09 09 6c 61 70 70 | 65 6e 64 20 73 77 69 74 |]...lapp|end swit|
|000015b0| 63 68 41 70 70 73 20 24 | 66 6e 61 6d 65 0d 09 09 |chApps $|fname...|
|000015c0| 61 64 64 44 65 66 20 73 | 77 69 74 63 68 41 70 70 |addDef s|witchApp|
|000015d0| 73 20 24 73 77 69 74 63 | 68 41 70 70 73 0d 09 09 |s $switc|hApps...|
|000015e0| 62 75 69 6c 64 53 77 69 | 74 63 68 65 73 0d 09 7d |buildSwi|tches..}|
|000015f0| 20 65 6c 73 65 69 66 20 | 7b 24 6e 61 6d 65 20 3d | elseif |{$name =|
|00001600| 3d 20 22 52 65 6d 6f 76 | 65 22 7d 20 7b 0d 09 09 |= "Remov|e"} {...|
|00001610| 66 6f 72 65 61 63 68 20 | 61 70 70 20 24 73 77 69 |foreach |app $swi|
|00001620| 74 63 68 41 70 70 73 20 | 7b 0d 09 09 09 6c 61 70 |tchApps |{....lap|
|00001630| 70 65 6e 64 20 61 70 70 | 73 20 5b 66 69 6c 65 20 |pend app|s [file |
|00001640| 74 61 69 6c 20 24 61 70 | 70 5d 0d 09 09 7d 0d 09 |tail $ap|p]...}..|
|00001650| 09 73 65 74 20 6e 61 6d | 65 20 5b 6c 69 73 74 70 |.set nam|e [listp|
|00001660| 69 63 6b 20 2d 70 20 22 | 52 65 6d 6f 76 65 20 77 |ick -p "|Remove w|
|00001670| 68 69 63 68 20 61 70 70 | 3f 22 20 24 61 70 70 73 |hich app|?" $apps|
|00001680| 5d 0d 09 09 69 66 20 7b | 5b 73 65 74 20 69 6e 64 |]...if {|[set ind|
|00001690| 20 5b 6c 73 65 61 72 63 | 68 20 24 73 77 69 74 63 | [lsearc|h $switc|
|000016a0| 68 41 70 70 73 20 22 2a | 24 6e 61 6d 65 22 5d 5d |hApps "*|$name"]]|
|000016b0| 20 3e 3d 20 30 7d 20 7b | 0d 09 09 09 73 65 74 20 | >= 0} {|....set |
|000016c0| 73 77 69 74 63 68 41 70 | 70 73 20 5b 6c 72 65 70 |switchAp|ps [lrep|
|000016d0| 6c 61 63 65 20 24 73 77 | 69 74 63 68 41 70 70 73 |lace $sw|itchApps|
|000016e0| 20 24 69 6e 64 20 24 69 | 6e 64 5d 0d 09 09 09 61 | $ind $i|nd]....a|
|000016f0| 64 64 44 65 66 20 73 77 | 69 74 63 68 41 70 70 73 |ddDef sw|itchApps|
|00001700| 20 24 73 77 69 74 63 68 | 41 70 70 73 0d 09 09 09 | $switch|Apps....|
|00001710| 62 75 69 6c 64 53 77 69 | 74 63 68 65 73 0d 09 09 |buildSwi|tches...|
|00001720| 7d 0d 09 7d 20 65 6c 73 | 65 69 66 20 7b 24 6e 61 |}..} els|eif {$na|
|00001730| 6d 65 20 3d 3d 20 22 4e | 6f 77 22 7d 20 7b 0d 09 |me == "N|ow"} {..|
|00001740| 09 73 77 69 74 63 68 41 | 70 70 0d 09 7d 20 65 6c |.switchA|pp..} el|
|00001750| 73 65 20 7b 0d 09 09 69 | 66 20 7b 5b 73 65 74 20 |se {...i|f {[set |
|00001760| 69 6e 64 20 5b 6c 73 65 | 61 72 63 68 20 24 73 77 |ind [lse|arch $sw|
|00001770| 69 74 63 68 41 70 70 73 | 20 22 2a 24 6e 61 6d 65 |itchApps| "*$name|
|00001780| 22 5d 5d 20 3e 3d 20 30 | 7d 20 7b 0d 09 09 09 69 |"]] >= 0|} {....i|
|00001790| 66 20 7b 5b 63 61 74 63 | 68 20 7b 73 77 69 74 63 |f {[catc|h {switc|
|000017a0| 68 54 6f 20 24 6e 61 6d | 65 7d 5d 7d 20 7b 0d 09 |hTo $nam|e}]} {..|
|000017b0| 09 09 09 6c 61 75 6e 63 | 68 20 2d 66 20 5b 6c 69 |...launc|h -f [li|
|000017c0| 6e 64 65 78 20 24 73 77 | 69 74 63 68 41 70 70 73 |ndex $sw|itchApps|
|000017d0| 20 24 69 6e 64 5d 0d 09 | 09 09 7d 0d 09 09 7d 0d | $ind]..|..}...}.|
|000017e0| 09 7d 0d 7d 0d 09 09 0d | 0d 70 72 6f 63 20 77 69 |.}.}....|.proc wi|
|000017f0| 6e 54 69 6c 65 50 72 6f | 63 20 7b 6d 65 6e 75 20 |nTilePro|c {menu |
|00001800| 69 74 65 6d 7d 20 7b 0d | 09 77 69 6e 24 69 74 65 |item} {.|.win$ite|
|00001810| 6d 0d 7d 0d 0d 6d 65 6e | 75 20 2d 6e 20 24 77 69 |m.}..men|u -n $wi|
|00001820| 6e 4d 65 6e 75 20 2d 70 | 20 6d 65 6e 75 57 69 6e |nMenu -p| menuWin|
|00001830| 20 7b 0d 09 09 7b 6d 65 | 6e 75 20 2d 6e 20 61 72 | {...{me|nu -n ar|
|00001840| 72 61 6e 67 65 20 2d 70 | 20 77 69 6e 54 69 6c 65 |range -p| winTile|
|00001850| 50 72 6f 63 20 7b 0d 09 | 09 09 22 2f 4a 76 65 72 |Proc {..|.."/Jver|
|00001860| 74 69 63 61 6c 6c 79 5e | 31 22 0d 09 09 09 22 2f |tically^|1"...."/|
|00001870| 4a 3c 4f 3c 49 68 6f 72 | 69 7a 6f 6e 74 61 6c 6c |J<O<Ihor|izontall|
|00001880| 79 5e 32 22 0d 09 09 09 | 22 74 69 6c 65 64 5e 33 |y^2"....|"tiled^3|
|00001890| 22 0d 09 09 09 22 6f 76 | 65 72 6c 61 79 5e 34 22 |"...."ov|erlay^4"|
|000018a0| 0d 09 09 09 22 28 2d 22 | 0d 09 09 09 7b 6d 65 6e |...."(-"|....{men|
|000018b0| 75 20 2d 6e 20 6f 74 68 | 65 72 20 7b 0d 09 09 09 |u -n oth|er {....|
|000018c0| 09 7b 62 75 66 66 65 72 | 4f 74 68 65 72 57 69 6e |.{buffer|OtherWin|
|000018d0| 64 6f 77 7d 0d 09 09 09 | 09 7b 63 68 6f 6f 73 65 |dow}....|.{choose|
|000018e0| 41 57 69 6e 64 6f 77 7d | 0d 09 09 09 09 7b 63 68 |AWindow}|.....{ch|
|000018f0| 6f 6f 73 65 57 69 6e 64 | 6f 77 53 74 61 74 75 73 |ooseWind|owStatus|
|00001900| 7d 0d 09 09 09 09 7b 69 | 63 6f 6e 69 66 79 7d 0d |}.....{i|conify}.|
|00001910| 09 09 09 09 7b 6b 69 6c | 6c 57 69 6e 64 6f 77 53 |....{kil|lWindowS|
|00001920| 74 61 74 75 73 7d 0d 09 | 09 09 09 7b 6e 65 78 74 |tatus}..|...{next|
|00001930| 57 69 6e 7d 0d 09 09 09 | 09 7b 6e 65 78 74 57 69 |Win}....|.{nextWi|
|00001940| 6e 64 6f 77 7d 0d 09 09 | 09 09 7b 6f 74 68 65 72 |ndow}...|..{other|
|00001950| 54 68 69 6e 67 7d 0d 09 | 09 09 09 7b 70 72 65 76 |Thing}..|...{prev|
|00001960| 57 69 6e 64 6f 77 7d 0d | 09 09 09 09 7b 73 68 72 |Window}.|....{shr|
|00001970| 69 6e 6b 46 75 6c 6c 7d | 0d 09 09 09 09 7b 73 68 |inkFull}|.....{sh|
|00001980| 72 69 6e 6b 48 69 67 68 | 7d 0d 09 09 09 09 7b 73 |rinkHigh|}.....{s|
|00001990| 68 72 69 6e 6b 4c 65 66 | 74 7d 0d 09 09 09 09 7b |hrinkLef|t}.....{|
|000019a0| 73 68 72 69 6e 6b 4c 6f | 77 7d 0d 09 09 09 09 7b |shrinkLo|w}.....{|
|000019b0| 73 68 72 69 6e 6b 52 69 | 67 68 74 7d 0d 09 09 09 |shrinkRi|ght}....|
|000019c0| 09 7b 73 69 6e 67 6c 65 | 50 61 67 65 7d 0d 09 09 |.{single|Page}...|
|000019d0| 09 09 7b 73 77 61 70 57 | 69 74 68 4e 65 78 74 7d |..{swapW|ithNext}|
|000019e0| 0d 09 09 09 09 7b 74 68 | 72 65 65 51 75 61 72 74 |.....{th|reeQuart|
|000019f0| 65 72 73 7d 0d 09 09 09 | 09 7b 77 69 6e 68 6f 72 |ers}....|.{winhor|
|00001a00| 69 7a 6f 6e 74 61 6c 6c | 79 7d 0d 09 09 09 09 7b |izontall|y}.....{|
|00001a10| 77 69 6e 6f 76 65 72 6c | 61 79 7d 0d 09 09 09 09 |winoverl|ay}.....|
|00001a20| 7b 77 69 6e 74 69 6c 65 | 64 7d 0d 09 09 09 09 7b |{wintile|d}.....{|
|00001a30| 77 69 6e 76 65 72 74 69 | 63 61 6c 6c 79 7d 0d 09 |winverti|cally}..|
|00001a40| 09 09 09 7b 7a 6f 6f 6d | 7d 0d 09 09 09 7d 7d 7d |...{zoom|}....}}}|
|00001a50| 7d 0d 09 09 22 28 2d 22 | 0d 09 09 22 2f 2f 3c 53 |}..."(-"|..."//<S|
|00001a60| 7a 6f 6f 6d 22 0d 09 09 | 22 2f 2f 3c 53 3c 49 3c |zoom"...|"//<S<I<|
|00001a70| 4f 73 69 6e 67 6c 65 50 | 61 67 65 22 0d 09 09 22 |OsingleP|age"..."|
|00001a80| 2f 59 3c 4f 3c 49 69 63 | 6f 6e 69 66 79 22 0d 09 |/Y<O<Iic|onify"..|
|00001a90| 09 22 73 70 6c 69 74 57 | 69 6e 64 6f 77 22 0d 09 |."splitW|indow"..|
|00001aa0| 09 22 2f 6f 74 6f 67 67 | 6c 65 53 63 72 6f 6c 6c |."/otogg|leScroll|
|00001ab0| 62 61 72 22 0d 09 09 22 | 28 2d 22 0d 09 09 22 3c |bar"..."|(-"..."<|
|00001ac0| 53 70 72 65 76 57 69 6e | 64 6f 77 22 0d 09 09 22 |SprevWin|dow"..."|
|00001ad0| 3c 53 6e 65 78 74 57 69 | 6e 64 6f 77 22 0d 09 09 |<SnextWi|ndow"...|
|00001ae0| 22 73 77 61 70 57 69 74 | 68 4e 65 78 74 22 0d 09 |"swapWit|hNext"..|
|00001af0| 09 22 3c 53 2f 3b 63 68 | 6f 6f 73 65 41 57 69 6e |."<S/;ch|ooseAWin|
|00001b00| 64 6f 77 22 0d 09 09 22 | 28 2d 22 0d 7d 0d 0d 23 |dow"..."|(-".}..#|
|00001b10| 20 57 65 20 6d 61 79 20 | 62 65 20 72 65 6c 6f 61 | We may |be reloa|
|00001b20| 64 69 6e 67 2c 20 73 6f | 20 61 64 64 20 77 68 61 |ding, so| add wha|
|00001b30| 74 65 76 65 72 20 77 69 | 6e 64 6f 77 73 20 77 65 |tever wi|ndows we|
|00001b40| 20 68 61 76 65 0d 69 66 | 20 7b 5b 69 6e 66 6f 20 | have.if| {[info |
|00001b50| 65 78 69 73 74 73 20 77 | 69 6e 4e 61 6d 65 54 6f |exists w|inNameTo|
|00001b60| 4e 75 6d 5d 7d 20 7b 0d | 09 73 65 74 20 6e 6d 73 |Num]} {.|.set nms|
|00001b70| 20 5b 61 72 72 61 79 20 | 6e 61 6d 65 73 20 77 69 | [array |names wi|
|00001b80| 6e 4e 61 6d 65 54 6f 4e | 75 6d 5d 0d 09 66 6f 72 |nNameToN|um]..for|
|00001b90| 65 61 63 68 20 6e 61 6d | 65 20 24 6e 6d 73 20 7b |each nam|e $nms {|
|00001ba0| 0d 09 09 72 65 67 65 78 | 70 20 7b 5b 5e 3a 5d 2a |...regex|p {[^:]*|
|00001bb0| 24 7d 20 24 6e 61 6d 65 | 20 69 74 65 6d 0d 09 09 |$} $name| item...|
|00001bc0| 73 65 74 20 6e 75 6d 20 | 24 77 69 6e 4e 61 6d 65 |set num |$winName|
|00001bd0| 54 6f 4e 75 6d 28 24 6e | 61 6d 65 29 0d 09 09 69 |ToNum($n|ame)...i|
|00001be0| 66 20 7b 24 6e 75 6d 20 | 3c 20 31 30 7d 20 09 7b |f {$num |< 10} .{|
|00001bf0| 0d 09 09 09 61 64 64 4d | 65 6e 75 49 74 65 6d 20 |....addM|enuItem |
|00001c00| 2d 6d 20 24 77 69 6e 4d | 65 6e 75 20 2f 24 6e 75 |-m $winM|enu /$nu|
|00001c10| 6d 24 69 74 65 6d 0d 09 | 09 7d 20 65 6c 73 65 20 |m$item..|.} else |
|00001c20| 7b 0d 09 09 09 61 64 64 | 4d 65 6e 75 49 74 65 6d |{....add|MenuItem|
|00001c30| 20 2d 6d 20 24 77 69 6e | 4d 65 6e 75 20 24 69 74 | -m $win|Menu $it|
|00001c40| 65 6d 0d 09 09 7d 0d 09 | 7d 0d 7d 0d 0d 69 6e 73 |em...}..|}.}..ins|
|00001c50| 65 72 74 4d 65 6e 75 20 | 22 46 69 6c 65 22 0d 69 |ertMenu |"File".i|
|00001c60| 6e 73 65 72 74 4d 65 6e | 75 20 22 45 64 69 74 22 |nsertMen|u "Edit"|
|00001c70| 0d 69 6e 73 65 72 74 4d | 65 6e 75 20 22 53 65 61 |.insertM|enu "Sea|
|00001c80| 72 63 68 22 0d 69 6e 73 | 65 72 74 4d 65 6e 75 20 |rch".ins|ertMenu |
|00001c90| 22 55 74 69 6c 73 22 0d | 69 6e 73 65 72 74 4d 65 |"Utils".|insertMe|
|00001ca0| 6e 75 20 22 4d 6f 64 65 | 22 0d 65 6e 61 62 6c 65 |nu "Mode|".enable|
|00001cb0| 4d 65 6e 75 49 74 65 6d | 20 4e 61 6d 65 64 43 6c |MenuItem| NamedCl|
|00001cc0| 69 70 62 6f 61 72 64 73 | 20 70 61 73 74 65 20 6f |ipboards| paste o|
|00001cd0| 66 66 0d 69 6e 73 65 72 | 74 4d 65 6e 75 20 22 43 |ff.inser|tMenu "C|
|00001ce0| 6f 6e 76 65 72 74 22 0d | 6d 65 6e 75 20 2d 6e 20 |onvert".|menu -n |
|00001cf0| 24 66 73 65 74 4d 65 6e | 75 4e 61 6d 65 20 7b 7d |$fsetMen|uName {}|
|00001d00| 3b 20 0d 69 6e 73 65 72 | 74 4d 65 6e 75 20 24 77 |; .inser|tMenu $w|
|00001d10| 69 6e 4d 65 6e 75 0d 0d | 63 61 74 63 68 20 7b 69 |inMenu..|catch {i|
|00001d20| 6e 73 65 72 74 4d 65 6e | 75 20 24 68 65 6c 70 4d |nsertMen|u $helpM|
|00001d30| 65 6e 75 7d 0d 0d 0d 6d | 65 6e 75 20 2d 6e 20 24 |enu}...m|enu -n $|
|00001d40| 74 65 72 72 4d 65 6e 75 | 20 7b 7d 0d 0d 6d 65 6e |terrMenu| {}..men|
|00001d50| 75 20 2d 6e 20 24 74 6f | 6f 6c 73 65 72 76 65 72 |u -n $to|olserver|
|00001d60| 4d 65 6e 75 20 7b 7d 0d | 0d 00 00 00 00 00 00 00 |Menu {}.|........|
|00001d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d80| 00 00 01 00 00 00 02 34 | 00 00 01 34 00 00 00 56 |.......4|...4...V|
|00001d90| ff f4 48 e7 01 18 28 6e | 00 08 7e 00 60 7c 70 14 |..H...(n|..~.`|p.|
|00001da0| c0 6c 00 24 66 70 2f 2c | 00 04 4e ba fe 6c 2d 40 |.l.$fp/,|..N..l-@|
|00001db0| 09 6d 65 6e 75 73 2e 74 | 63 6c 02 00 02 00 54 45 |.menus.t|cl....TE|
|00001dc0| 58 54 41 4c 46 41 01 00 | 00 34 01 40 00 00 00 01 |XTALFA..|.4.@....|
|00001dd0| 02 00 54 45 58 54 41 4c | 46 41 01 00 00 34 01 40 |..TEXTAL|FA...4.@|
|00001de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001df0| 00 00 aa 26 9e 45 00 00 | 1c e9 00 00 02 8a ff fc |...&.E..|........|
|00001e00| 48 68 ff ff 48 6b 00 1a | 2f 2d d0 28 4e ad 19 42 |Hh..Hk..|/-.(N..B|
|00001e10| 52 47 4f ef 00 18 28 6c | 00 0a 20 0c 66 80 30 07 |RGO...(l|.. .f.0.|
|00001e20| 4c df 18 80 4e 5e 4e 75 | 42 a7 48 78 00 02 48 78 |L...N^Nu|B.Hx..Hx|
|00001e30| 00 c8 4e ad 19 0a 2b 40 | d0 24 2e 80 4e ad 19 32 |..N...+@|.$..N..2|
|00001e40| 4f ef 00 0c 4e 75 4e 56 | ff fa 2d 6e 00 08 ff fc |O...NuNV|..-n....|
|00001e50| 3d 6e 00 0e ff fa 48 78 | 00 06 48 6e ff fa 2f 2d |=n....Hx|..Hn../-|
|00001e60| d0 24 4e ad 19 42 4e 5e | 4e 75 4e 56 ff f6 48 e7 |.$N..BN^|NuNV..H.|
|00001e70| 0f 08 20 6d d0 24 3d 68 | 00 06 ff fe 7e 02 7c 00 |.. m.$=h|....~.|.|
|00001e80| 00 00 00 04 00 01 00 01 | 00 00 00 dc 00 0a 00 00 |........|........|
|00001e90| 00 00 00 00 00 00 0d 66 | 69 6c 65 4d 65 6e 75 50 |.......f|ileMenuP|
|00001ea0| 72 6f 63 00 00 00 10 fe | 00 00 10 fe 0d 68 65 6c |roc.....|.....hel|
|00001eb0| 70 4d 65 6e 75 50 72 6f | 63 00 00 00 00 00 00 00 |pMenuPro|c.......|
|00001ec0| 00 00 11 6d 61 6b 65 4d | 65 6e 75 50 65 72 6d 61 |...makeM|enuPerma|
|00001ed0| 6e 65 6e 74 00 00 00 00 | 00 00 00 00 0d 6d 61 72 |nent....|.....mar|
|00001ee0| 6b 4d 65 6e 75 50 72 6f | 63 00 00 00 00 00 00 00 |kMenuPro|c.......|
|00001ef0| 00 00 11 6e 61 6d 65 64 | 43 6c 69 70 4d 65 6e 75 |...named|ClipMenu|
|00001f00| 50 72 6f 63 00 00 00 00 | 00 00 00 00 0d 6e 61 6d |Proc....|.....nam|
|00001f10| 65 64 4d 61 72 6b 50 72 | 6f 63 00 00 00 00 00 00 |edMarkPr|oc......|
|00001f20| 00 00 0b 72 65 6d 6f 76 | 65 4d 65 6e 75 00 00 00 |...remov|eMenu...|
|00001f30| 12 35 00 00 12 35 05 73 | 74 72 69 70 00 00 15 45 |.5...5.s|trip...E|
|00001f40| 00 00 15 45 0b 73 77 69 | 74 63 68 50 72 6f 63 00 |...E.swi|tchProc.|
|00001f50| 00 00 00 00 00 00 00 00 | 0f 75 6e 6e 61 6d 65 64 |........|.unnamed|
|00001f60| 4d 61 72 6b 70 72 6f 63 | 00 00 00 48 00 09 4d 6f |Markproc|...H..Mo|
|00001f70| 6e 61 63 6f 00 ab b7 30 | 00 00 12 00 00 a4 3f fc |naco...0|......?.|
|00001f80| 00 c2 e5 60 24 00 04 44 | 01 78 4d 00 ff fc 00 04 |...`$..D|.xM.....|
|00001f90| 00 04 00 28 00 02 02 5c | 03 1a 00 28 00 02 02 5c |...(...\|...(...\|
|00001fa0| 03 1a ac 2c 82 ed 00 00 | 0c 7d 00 00 0c 7d 00 00 |...,....|.}...}..|
|00001fb0| 0b 10 01 00 00 00 01 00 | 00 00 02 34 00 00 01 34 |........|...4...4|
|00001fc0| 00 00 00 56 00 a2 b5 88 | 12 00 00 00 00 1c 00 52 |...V....|.......R|
|00001fd0| 00 01 4d 50 53 52 00 01 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00001fe0| 00 2a 03 ef 00 00 00 00 | 00 08 00 ab bf 00 03 ed |.*......|........|
|00001ff0| ff ff 00 00 00 e8 00 ab | b9 3c 03 f0 ff ff 00 00 |........|.<......|
|00002000| 00 00 00 00 00 00 03 74 | 61 62 00 00 00 00 00 00 |.......t|ab......|
|00002010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+