Hex Artifact Content Вы: nobody
Вход

Artifact 8770c6e051712b925a9d24cb99edc429a9040b44:


0000: ef bb bf 24 65 6e 67 69 6e 65 20 4a 53 63 72 69  ...$engine JScri
0010: 70 74 0d 0a 24 75 6e 61 6d 65 20 74 65 78 74 45  pt..$uname textE
0020: 64 69 74 6f 72 45 78 74 0d 0a 24 64 6e 61 6d 65  ditorExt..$dname
0030: 20 d0 a0 d0 b0 d1 81 d1 88 d0 b8 d1 80 d0 b5 d0   ...............
0040: bd d0 b8 d0 b5 20 d1 80 d0 b5 d0 b4 d0 b0 d0 ba  ..... ..........
0050: d1 82 d0 be d1 80 d0 b0 20 d1 82 d0 b5 d0 ba d1  ........ .......
0060: 81 d1 82 d0 be d0 b2 0d 0a 24 61 64 64 69 6e 20  .........$addin 
0070: 67 6c 6f 62 61 6c 0d 0a 24 61 64 64 69 6e 20 73  global..$addin s
0080: 74 64 6c 69 62 0d 0a 0d 0a 2f 2a 20 3d 3d 3d 3d  tdlib..../* ====
0090: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
00a0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
00b0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
00c0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
00d0: 3d 3d 0d 0a 0d 0a 41 55 54 48 4f 52 3a 20 d0 92  ==....AUTHOR: ..
00e0: d0 b0 d1 81 d0 b8 d0 bb d0 b8 d0 b9 20 d0 a4 d1  ............ ...
00f0: 80 d0 be d0 bb d0 be d0 b2 20 61 6b 61 20 d0 9f  ......... aka ..
0100: d0 b0 d0 bb d1 8b d1 87 2c 20 70 61 6c 79 74 73  ........, palyts
0110: 68 40 6d 61 69 6c 2e 72 75 0d 0a 0d 0a 44 41 54  h@mail.ru....DAT
0120: 45 3a 20 30 32 2e 30 39 2e 32 30 31 31 0d 0a 0d  E: 02.09.2011...
0130: 0a 43 4f 4d 4d 45 4e 54 3a 20 0d 0a 0d 0a 20 20  .COMMENT: ....  
0140: 20 31 2e 20 d0 9c d0 b0 d0 ba d1 80 d0 be d1 81   1. ............
0150: d1 8b 20 d0 9d d0 b0 d0 b9 d1 82 d0 b8 d0 92 d1  .. .............
0160: 8b d0 b4 d0 b5 d0 bb d0 b5 d0 bd d0 bd d1 8b d0  ................
0170: b9 d0 a2 d0 b5 d0 ba d1 81 d1 82 d0 92 d0 bd d0  ................
0180: b8 d0 b7 20 d0 b8 20 d0 9d d0 b0 d0 b9 d1 82 d0  ... .. .........
0190: b8 d0 92 d1 8b d0 b4 d0 b5 d0 bb d0 b5 d0 bd d0  ................
01a0: bd d1 8b d0 b9 d0 a2 d0 b5 d0 ba d1 81 d1 82 d0  ................
01b0: 92 d0 b2 d0 b5 d1 80 d1 85 2e 20 0d 0a d0 93 d0  .......... .....
01c0: be d1 80 d1 8f d1 87 d0 b8 d0 b5 20 d0 ba d0 bb  ........... ....
01d0: d0 b0 d0 b2 d0 b8 d1 88 d0 b8 20 43 74 72 6c 20  .......... Ctrl 
01e0: 2b 20 44 6f 77 6e 20 d0 b8 20 43 74 72 6c 20 2b  + Down .. Ctrl +
01f0: 20 55 70 2e 0d 0a 0d 0a 20 20 20 32 2e 20 d0 9c   Up.....   2. ..
0200: d0 b0 d0 ba d1 80 d0 be d1 81 20 d0 9a d0 bb d0  .......... .....
0210: be d0 bd d0 b8 d1 80 d0 be d0 b2 d0 b0 d1 82 d1  ................
0220: 8c d0 a2 d0 b5 d0 ba d1 81 d1 82 2e 20 d0 9f d0  ............ ...
0230: be d0 b7 d0 b2 d0 be d0 bb d1 8f d0 b5 d1 82 20  ............... 
0240: d1 81 d0 ba d0 be d0 bf d0 b8 d1 80 d0 be d0 b2  ................
0250: d0 b0 d1 82 d1 8c 20 d0 b2 d1 8b d0 b4 d0 b5 d0  ...... .........
0260: bb d0 b5 d0 bd d0 bd d1 8b d0 b9 20 d1 84 d1 80  ........... ....
0270: d0 b0 d0 b3 d0 bc d0 b5 d0 bd d1 82 20 0d 0a d1  ............ ...
0280: 82 d0 b5 d0 ba d1 81 d1 82 d0 b0 20 d0 b1 d0 b5  ........... ....
0290: d0 b7 20 d0 b8 d1 81 d0 bf d0 be d0 bb d1 8c d0  .. .............
02a0: b7 d0 be d0 b2 d0 b0 d0 bd d0 b8 d1 8f 20 d0 b1  ............. ..
02b0: d1 83 d1 84 d0 b5 d1 80 d0 b0 20 d0 be d0 b1 d0  .......... .....
02c0: bc d0 b5 d0 bd d0 b0 2e 20 d0 93 d0 be d1 80 d1  ........ .......
02d0: 8f d1 87 d0 b8 d0 b5 20 d0 ba d0 bb d0 b0 d0 b2  ....... ........
02e0: d0 b8 d1 88 d0 b8 20 43 74 72 6c 20 2b 20 44 2e  ...... Ctrl + D.
02f0: 0d 0a 0d 0a 20 20 20 33 2e 20 d0 9c d0 b0 d0 ba  ....   3. ......
0300: d1 80 d0 be d1 81 d1 8b 20 4f 6e 50 72 65 73 73  ........ OnPress
0310: 45 6e 74 65 72 49 6e 43 6f 6d 6d 65 6e 74 2c 20  EnterInComment, 
0320: 4f 6e 50 72 65 73 73 42 61 63 6b 73 70 61 63 65  OnPressBackspace
0330: 49 6e 43 6f 6d 6d 65 6e 74 2c 20 0d 0a 4f 6e 50  InComment, ..OnP
0340: 72 65 73 73 44 65 6c 65 74 65 49 6e 43 6f 6d 6d  ressDeleteInComm
0350: 65 6e 74 20 d0 bf d1 80 d0 b5 d0 b4 d0 bd d0 b0  ent ............
0360: d0 b7 d0 bd d0 b0 d1 87 d0 b5 d0 bd d1 8b 20 d0  .............. .
0370: b4 d0 bb d1 8f 20 d0 b1 d0 be d0 bb d0 b5 d0 b5  ..... ..........
0380: 20 d1 83 d0 b4 d0 be d0 b1 d0 bd d0 be d0 b3 d0   ...............
0390: be 20 d1 80 d0 b5 d0 b4 d0 b0 d0 ba d1 82 d0 b8  . ..............
03a0: d1 80 d0 be d0 b2 d0 b0 d0 bd d0 b8 d1 8f 20 0d  .............. .
03b0: 0a d0 bc d0 bd d0 be d0 b3 d0 be d1 81 d1 82 d1  ................
03c0: 80 d0 be d1 87 d0 bd d1 8b d1 85 20 d0 ba d0 be  ........... ....
03d0: d0 bc d0 bc d0 b5 d0 bd d1 82 d0 b0 d1 80 d0 b8  ................
03e0: d0 b5 d0 b2 2e 20 d0 92 d1 8b d0 b7 d1 8b d0 b2  ..... ..........
03f0: d0 b0 d1 8e d1 82 d1 81 d1 8f 20 d0 bd d0 b5 d1  .......... .....
0400: 8f d0 b2 d0 bd d0 be 20 d0 bf d1 80 d0 b8 20 d0  ....... ...... .
0410: bd d0 b0 d0 b6 d0 b0 d1 82 d0 b8 d0 b8 20 d1 81  ............. ..
0420: d0 be d0 be d1 82 d0 b2 d0 b5 d1 82 d1 81 d1 82  ................
0430: d0 b2 d1 83 d1 8e d1 89 d0 b8 d1 85 20 0d 0a d0  ............ ...
0440: ba d0 bb d0 b0 d0 b2 d0 b8 d1 88 2e 0d 0a 0d 0a  ................
0450: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0460: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0470: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0480: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d  ================
0490: 3d 3d 3d 3d 3d 3d 3d 3d 3d 20 2a 2f 0d 0a 0d 0a  ========= */....
04a0: 67 6c 6f 62 61 6c 2e 63 6f 6e 6e 65 63 74 47 6c  global.connectGl
04b0: 6f 62 61 6c 73 28 53 65 6c 66 53 63 72 69 70 74  obals(SelfScript
04c0: 29 3b 0d 0a 0d 0a 73 74 64 6c 69 62 2e 72 65 71  );....stdlib.req
04d0: 75 69 72 65 28 27 54 65 78 74 57 69 6e 64 6f 77  uire('TextWindow
04e0: 2e 6a 73 27 2c 20 53 65 6c 66 53 63 72 69 70 74  .js', SelfScript
04f0: 29 3b 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 67  );....function g
0500: 65 74 50 72 65 64 65 66 69 6e 65 64 48 6f 74 6b  etPredefinedHotk
0510: 65 79 73 28 70 72 65 64 65 66 29 7b 0d 0a 20 20  eys(predef){..  
0520: 20 20 70 72 65 64 65 66 2e 73 65 74 56 65 72 73    predef.setVers
0530: 69 6f 6e 28 37 29 3b 0d 0a 20 20 20 20 70 72 65  ion(7);..    pre
0540: 64 65 66 2e 61 64 64 28 22 d0 9d d0 b0 d0 b9 d1  def.add(".......
0550: 82 d0 b8 d0 92 d1 8b d0 b4 d0 b5 d0 bb d0 b5 d0  ................
0560: bd d0 bd d1 8b d0 b9 d0 a2 d0 b5 d0 ba d1 81 d1  ................
0570: 82 d0 92 d0 bd d0 b8 d0 b7 22 2c 20 22 43 74 72  .........", "Ctr
0580: 6c 20 2b 20 44 6f 77 6e 22 29 3b 0d 0a 20 20 20  l + Down");..   
0590: 20 70 72 65 64 65 66 2e 61 64 64 28 22 d0 9d d0   predef.add("...
05a0: b0 d0 b9 d1 82 d0 b8 d0 92 d1 8b d0 b4 d0 b5 d0  ................
05b0: bb d0 b5 d0 bd d0 bd d1 8b d0 b9 d0 a2 d0 b5 d0  ................
05c0: ba d1 81 d1 82 d0 92 d0 b2 d0 b5 d1 80 d1 85 22  ..............."
05d0: 2c 20 22 43 74 72 6c 20 2b 20 55 70 22 29 3b 0d  , "Ctrl + Up");.
05e0: 0a 20 20 20 20 70 72 65 64 65 66 2e 61 64 64 28  .    predef.add(
05f0: 22 d0 9a d0 bb d0 be d0 bd d0 b8 d1 80 d0 be d0  "...............
0600: b2 d0 b0 d1 82 d1 8c d0 a2 d0 b5 d0 ba d1 81 d1  ................
0610: 82 22 2c 20 22 43 74 72 6c 20 2b 20 44 22 29 3b  .", "Ctrl + D");
0620: 0d 0a 20 20 20 20 70 72 65 64 65 66 2e 61 64 64  ..    predef.add
0630: 28 22 4f 6e 50 72 65 73 73 45 6e 74 65 72 49 6e  ("OnPressEnterIn
0640: 43 6f 6d 6d 65 6e 74 22 2c 20 22 45 6e 74 65 72  Comment", "Enter
0650: 22 29 3b 0d 0a 20 20 20 20 70 72 65 64 65 66 2e  ");..    predef.
0660: 61 64 64 28 22 4f 6e 50 72 65 73 73 44 65 6c 65  add("OnPressDele
0670: 74 65 49 6e 43 6f 6d 6d 65 6e 74 22 2c 20 22 44  teInComment", "D
0680: 65 6c 22 29 3b 0d 0a 20 20 20 20 70 72 65 64 65  el");..    prede
0690: 66 2e 61 64 64 28 22 4f 6e 50 72 65 73 73 42 61  f.add("OnPressBa
06a0: 63 6b 73 70 61 63 65 49 6e 43 6f 6d 6d 65 6e 74  ckspaceInComment
06b0: 22 2c 20 22 42 6b 53 70 61 63 65 22 29 3b 0d 0a  ", "BkSpace");..
06c0: 20 20 20 20 70 72 65 64 65 66 2e 61 64 64 28 22      predef.add("
06d0: 4f 6e 50 72 65 73 73 42 61 63 6b 73 70 61 63 65  OnPressBackspace
06e0: 49 6e 42 72 61 63 6b 65 74 22 2c 20 22 42 6b 53  InBracket", "BkS
06f0: 70 61 63 65 22 29 3b 0d 0a 20 20 20 20 70 72 65  pace");..    pre
0700: 64 65 66 2e 61 64 64 28 22 4f 6e 50 72 65 73 73  def.add("OnPress
0710: 44 65 6c 49 6e 42 72 61 63 6b 65 74 22 2c 20 22  DelInBracket", "
0720: 44 65 6c 22 29 3b 0d 0a 20 20 20 20 70 72 65 64  Del");..    pred
0730: 65 66 2e 61 64 64 28 22 d0 9f d1 80 d0 b5 d0 be  ef.add("........
0740: d0 b1 d1 80 d0 b0 d0 b7 d0 be d0 b2 d0 b0 d1 82  ................
0750: d1 8c 20 d1 80 d0 b5 d0 b3 d0 b8 d1 81 d1 82 d1  .. .............
0760: 80 3a 20 d0 9f d0 a0 d0 9e d0 9f d0 98 d0 a1 d0  .: .............
0770: 9d d0 ab d0 95 22 2c 20 22 43 74 72 6c 20 2b 20  .....", "Ctrl + 
0780: 53 68 69 66 74 20 2b 20 55 22 29 3b 0d 0a 20 20  Shift + U");..  
0790: 20 20 70 72 65 64 65 66 2e 61 64 64 28 22 d0 9f    predef.add("..
07a0: d1 80 d0 b5 d0 be d0 b1 d1 80 d0 b0 d0 b7 d0 be  ................
07b0: d0 b2 d0 b0 d1 82 d1 8c 20 d1 80 d0 b5 d0 b3 d0  ........ .......
07c0: b8 d1 81 d1 82 d1 80 3a 20 d1 81 d1 82 d1 80 d0  .......: .......
07d0: be d1 87 d0 bd d1 8b d0 b5 22 2c 20 22 43 74 72  .........", "Ctr
07e0: 6c 20 2b 20 55 22 29 3b 0d 0a 7d 0d 0a 0d 0a 66  l + U");..}....f
07f0: 75 6e 63 74 69 6f 6e 20 6d 61 63 72 6f 73 d0 9d  unction macros..
0800: d0 b0 d0 b9 d1 82 d0 b8 d0 92 d1 8b d0 b4 d0 b5  ................
0810: d0 bb d0 b5 d0 bd d0 bd d1 8b d0 b9 d0 a2 d0 b5  ................
0820: d0 ba d1 81 d1 82 d0 92 d0 bd d0 b8 d0 b7 28 29  ..............()
0830: 7b 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 73 65  {..    return se
0840: 6c 65 63 74 4e 65 78 74 50 61 74 74 65 72 6e 28  lectNextPattern(
0850: 31 29 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69  1);..}....functi
0860: 6f 6e 20 6d 61 63 72 6f 73 d0 9d d0 b0 d0 b9 d1  on macros.......
0870: 82 d0 b8 d0 92 d1 8b d0 b4 d0 b5 d0 bb d0 b5 d0  ................
0880: bd d0 bd d1 8b d0 b9 d0 a2 d0 b5 d0 ba d1 81 d1  ................
0890: 82 d0 92 d0 b2 d0 b5 d1 80 d1 85 28 29 7b 0d 0a  ...........(){..
08a0: 20 20 20 20 72 65 74 75 72 6e 20 73 65 6c 65 63      return selec
08b0: 74 4e 65 78 74 50 61 74 74 65 72 6e 28 2d 31 29  tNextPattern(-1)
08c0: 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e  ;..}....function
08d0: 20 6d 61 63 72 6f 73 d0 9f d0 be d0 bc d0 b5 d0   macros.........
08e0: bd d1 8f d1 82 d1 8c d0 9e d0 bf d0 b5 d1 80 d0  ................
08f0: b0 d0 bd d0 b4 d1 8b d0 9f d1 80 d0 b8 d1 81 d0  ................
0900: b2 d0 b0 d0 b8 d0 b2 d0 b0 d0 bd d0 b8 d1 8f d0  ................
0910: 9c d0 b5 d1 81 d1 82 d0 b0 d0 bc d0 b8 28 29 20  .............() 
0920: 7b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72  {..    ..    var
0930: 20 77 20 3d 20 47 65 74 54 65 78 74 57 69 6e 64   w = GetTextWind
0940: 6f 77 28 29 3b 20 0d 0a 20 20 20 20 69 66 20 28  ow(); ..    if (
0950: 21 77 29 20 72 65 74 75 72 6e 20 66 61 6c 73 65  !w) return false
0960: 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72  ;..    ..    var
0970: 20 73 65 6c 54 65 78 74 20 3d 20 77 2e 47 65 74   selText = w.Get
0980: 53 65 6c 65 63 74 65 64 54 65 78 74 28 29 3b 0d  SelectedText();.
0990: 0a 20 20 20 20 69 66 20 28 73 65 6c 54 65 78 74  .    if (selText
09a0: 20 3d 3d 20 27 27 29 20 72 65 74 75 72 6e 20 66   == '') return f
09b0: 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20 20 20  alse;..    ..   
09c0: 20 76 61 72 20 73 65 6c 20 3d 20 77 2e 47 65 74   var sel = w.Get
09d0: 53 65 6c 65 63 74 69 6f 6e 28 29 3b 0d 0a 20 20  Selection();..  
09e0: 20 20 0d 0a 20 20 20 20 76 61 72 20 6c 69 6e 65    ..    var line
09f0: 73 20 3d 20 53 74 72 69 6e 67 55 74 69 6c 73 2e  s = StringUtils.
0a00: 74 6f 4c 69 6e 65 73 28 73 65 6c 54 65 78 74 29  toLines(selText)
0a10: 3b 0d 0a 20 20 20 20 66 6f 72 28 76 61 72 20 6c  ;..    for(var l
0a20: 69 6e 65 4e 6f 20 3d 20 30 3b 20 6c 69 6e 65 4e  ineNo = 0; lineN
0a30: 6f 20 3c 20 6c 69 6e 65 73 2e 6c 65 6e 67 74 68  o < lines.length
0a40: 3b 20 6c 69 6e 65 4e 6f 2b 2b 29 0d 0a 20 20 20  ; lineNo++)..   
0a50: 20 20 20 20 20 6c 69 6e 65 73 5b 6c 69 6e 65 4e       lines[lineN
0a60: 6f 5d 20 3d 20 6c 69 6e 65 73 5b 6c 69 6e 65 4e  o] = lines[lineN
0a70: 6f 5d 2e 72 65 70 6c 61 63 65 28 2f 28 5c 73 2a  o].replace(/(\s*
0a80: 29 28 5c 53 2a 2e 2b 3f 29 5c 73 2a 3d 5c 73 2a  )(\S*.+?)\s*=\s*
0a90: 28 5c 53 2a 2e 2b 29 5c 73 2a 3b 2f 2c 20 22 24  (\S*.+)\s*;/, "$
0aa0: 31 24 33 3d 24 32 3b 22 29 3b 0d 0a 20 20 20 20  1$3=$2;");..    
0ab0: 0d 0a 20 20 20 20 77 2e 53 65 74 53 65 6c 65 63  ..    w.SetSelec
0ac0: 74 65 64 54 65 78 74 28 53 74 72 69 6e 67 55 74  tedText(StringUt
0ad0: 69 6c 73 2e 66 72 6f 6d 4c 69 6e 65 73 28 6c 69  ils.fromLines(li
0ae0: 6e 65 73 29 29 3b 0d 0a 20 20 20 20 2f 2f 20 d0  nes));..    // .
0af0: 92 d0 be d1 81 d1 81 d1 82 d0 b0 d0 bd d0 be d0  ................
0b00: b2 d0 b8 d0 bc 20 d0 b8 d1 81 d1 85 d0 be d0 b4  ..... ..........
0b10: d0 bd d0 be d0 b5 20 d0 b2 d1 8b d0 b4 d0 b5 d0  ...... .........
0b20: bb d0 b5 d0 bd d0 b8 d0 b5 2e 0d 0a 20 20 20 20  ............    
0b30: 77 2e 53 65 74 53 65 6c 65 63 74 69 6f 6e 28 73  w.SetSelection(s
0b40: 65 6c 2e 62 65 67 69 6e 52 6f 77 2c 20 73 65 6c  el.beginRow, sel
0b50: 2e 62 65 67 69 6e 43 6f 6c 2c 20 73 65 6c 2e 65  .beginCol, sel.e
0b60: 6e 64 52 6f 77 2c 20 73 65 6c 2e 65 6e 64 43 6f  ndRow, sel.endCo
0b70: 6c 29 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 69  l);..    ..    i
0b80: 66 20 28 6c 69 6e 65 73 2e 6c 65 6e 67 74 68 20  f (lines.length 
0b90: 3e 20 31 29 0d 0a 20 20 20 20 7b 0d 0a 20 20 20  > 1)..    {..   
0ba0: 20 20 20 20 20 2f 2f 20 d0 95 d1 81 d0 bb d0 b8       // ........
0bb0: 20 d0 b1 d1 8b d0 bb d0 be 20 d0 b2 d1 8b d0 b4   ........ ......
0bc0: d0 b5 d0 bb d0 b5 d0 bd d0 be 20 d0 bd d0 b5 d1  .......... .....
0bd0: 81 d0 ba d0 be d0 bb d1 8c d0 ba d0 be 20 d1 81  ............. ..
0be0: d1 82 d1 80 d0 be d0 ba 2c 20 d0 b2 d1 8b d1 80  ........, ......
0bf0: d0 be d0 b2 d0 bd d1 8f d0 b5 d0 bc 20 d0 b2 20  ............ .. 
0c00: d0 bd d0 b8 d1 85 20 d0 bf d0 be 20 d0 b7 d0 bd  ...... .... ....
0c10: d0 b0 d0 ba d0 b0 d0 bc 20 27 3d 27 2e 0d 0a 20  ........ '='... 
0c20: 20 20 20 20 20 20 20 76 61 72 20 66 6f 72 6d 61         var forma
0c30: 74 53 63 72 69 70 74 20 3d 20 61 64 64 69 6e 73  tScript = addins
0c40: 2e 62 79 55 6e 69 71 75 65 4e 61 6d 65 28 27 66  .byUniqueName('f
0c50: 6f 72 6d 61 74 5f 73 63 72 69 70 74 27 29 3b 0d  ormat_script');.
0c60: 0a 20 20 20 20 20 20 20 20 69 66 20 28 66 6f 72  .        if (for
0c70: 6d 61 74 53 63 72 69 70 74 29 0d 0a 20 20 20 20  matScript)..    
0c80: 20 20 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 20      {..         
0c90: 20 20 20 66 6f 72 6d 61 74 53 63 72 69 70 74 2e     formatScript.
0ca0: 69 6e 76 6f 6b 65 4d 61 63 72 6f 73 28 27 d0 92  invokeMacros('..
0cb0: d1 8b d1 80 d0 be d0 b2 d0 bd d1 8f d1 82 d1 8c  ................
0cc0: d0 97 d0 bd d0 b0 d0 ba d0 b8 d0 a0 d0 b0 d0 b2  ................
0cd0: d0 bd d0 be 27 29 3b 0d 0a 20 20 20 20 20 20 20  ....');..       
0ce0: 20 20 20 20 20 2f 2f 20 d0 98 20 d1 81 d0 bd d0       // .. .....
0cf0: be d0 b2 d0 b0 20 d0 b2 d0 be d1 81 d1 81 d1 82  ..... ..........
0d00: d0 b0 d0 bd d0 be d0 b2 d0 b8 d0 bc 20 d0 b8 d1  ............ ...
0d10: 81 d1 85 d0 be d0 b4 d0 bd d0 be d0 b5 20 d0 b2  ............. ..
0d20: d1 8b d0 b4 d0 b5 d0 bb d0 b5 d0 bd d0 b8 d0 b5  ................
0d30: 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 77  ...            w
0d40: 2e 53 65 74 53 65 6c 65 63 74 69 6f 6e 28 73 65  .SetSelection(se
0d50: 6c 2e 62 65 67 69 6e 52 6f 77 2c 20 73 65 6c 2e  l.beginRow, sel.
0d60: 62 65 67 69 6e 43 6f 6c 2c 20 73 65 6c 2e 65 6e  beginCol, sel.en
0d70: 64 52 6f 77 2c 20 73 65 6c 2e 65 6e 64 43 6f 6c  dRow, sel.endCol
0d80: 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a  );            ..
0d90: 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 7d          }..    }
0da0: 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 74 72 75  ..    return tru
0db0: 65 3b 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 53 63 72  e;..}....SelfScr
0dc0: 69 70 74 2e 53 65 6c 66 5b 27 6d 61 63 72 6f 73  ipt.Self['macros
0dd0: d0 9f d1 80 d0 b5 d0 be d0 b1 d1 80 d0 b0 d0 b7  ................
0de0: d0 be d0 b2 d0 b0 d1 82 d1 8c 20 d1 80 d0 b5 d0  .......... .....
0df0: b3 d0 b8 d1 81 d1 82 d1 80 3a 20 d0 9f d0 a0 d0  .........: .....
0e00: 9e d0 9f d0 98 d0 a1 d0 9d d0 ab d0 95 27 5d 20  .............'] 
0e10: 3d 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b 0d 0a  = function() {..
0e20: 20 20 20 20 72 65 74 75 72 6e 20 70 72 6f 63 65      return proce
0e30: 73 73 53 65 6c 65 63 74 65 64 54 65 78 74 28 66  ssSelectedText(f
0e40: 75 6e 63 74 69 6f 6e 28 73 65 6c 54 65 78 74 29  unction(selText)
0e50: 7b 20 72 65 74 75 72 6e 20 73 65 6c 54 65 78 74  { return selText
0e60: 2e 74 6f 55 70 70 65 72 43 61 73 65 28 29 3b 20  .toUpperCase(); 
0e70: 7d 29 3b 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 53 63  });..}....SelfSc
0e80: 72 69 70 74 2e 53 65 6c 66 5b 27 6d 61 63 72 6f  ript.Self['macro
0e90: 73 d0 9f d1 80 d0 b5 d0 be d0 b1 d1 80 d0 b0 d0  s...............
0ea0: b7 d0 be d0 b2 d0 b0 d1 82 d1 8c 20 d1 80 d0 b5  ........... ....
0eb0: d0 b3 d0 b8 d1 81 d1 82 d1 80 3a 20 d1 81 d1 82  ..........: ....
0ec0: d1 80 d0 be d1 87 d0 bd d1 8b d0 b5 27 5d 20 3d  ............'] =
0ed0: 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b 0d 0a 20   function() {.. 
0ee0: 20 20 20 72 65 74 75 72 6e 20 70 72 6f 63 65 73     return proces
0ef0: 73 53 65 6c 65 63 74 65 64 54 65 78 74 28 66 75  sSelectedText(fu
0f00: 6e 63 74 69 6f 6e 28 73 65 6c 54 65 78 74 29 7b  nction(selText){
0f10: 20 72 65 74 75 72 6e 20 73 65 6c 54 65 78 74 2e   return selText.
0f20: 74 6f 4c 6f 77 65 72 43 61 73 65 28 29 3b 20 7d  toLowerCase(); }
0f30: 29 3b 0d 0a 7d 0d 0a 0d 0a 53 65 6c 66 53 63 72  );..}....SelfScr
0f40: 69 70 74 2e 53 65 6c 66 5b 27 6d 61 63 72 6f 73  ipt.Self['macros
0f50: d0 92 d1 8b d0 b4 d0 b5 d0 bb d0 b8 d1 82 d1 8c  ................
0f60: 20 d1 82 d0 b5 d0 ba d1 81 d1 82 20 d0 b2 20 d1   .......... .. .
0f70: 81 d0 ba d0 be d0 b1 d0 ba d0 b0 d1 85 27 5d 20  .............'] 
0f80: 3d 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b 0d 0a  = function() {..
0f90: 0d 0a 20 20 20 20 76 61 72 20 77 20 3d 20 47 65  ..    var w = Ge
0fa0: 74 54 65 78 74 57 69 6e 64 6f 77 28 29 3b 20 0d  tTextWindow(); .
0fb0: 0a 20 20 20 20 69 66 20 28 21 77 29 20 72 65 74  .    if (!w) ret
0fc0: 75 72 6e 20 66 61 6c 73 65 3b 20 20 20 20 0d 0a  urn false;    ..
0fd0: 20 20 20 20 20 20 20 20 0d 0a 20 20 20 20 76 61          ..    va
0fe0: 72 20 73 65 6c 20 3d 20 77 2e 47 65 74 43 61 72  r sel = w.GetCar
0ff0: 65 74 50 6f 73 28 29 3b 0d 0a 20 20 20 20 0d 0a  etPos();..    ..
1000: 20 20 20 20 76 61 72 20 73 74 61 72 74 50 6f 73      var startPos
1010: 20 3d 20 7b 20 27 72 6f 77 27 20 3a 20 73 65 6c   = { 'row' : sel
1020: 2e 62 65 67 69 6e 52 6f 77 2d 31 2c 20 27 63 6f  .beginRow-1, 'co
1030: 6c 27 20 3a 20 73 65 6c 2e 62 65 67 69 6e 43 6f  l' : sel.beginCo
1040: 6c 2d 31 20 7d 3b 0d 0a 20 20 20 20 0d 0a 20 20  l-1 };..    ..  
1050: 20 20 76 61 72 20 6c 69 6e 65 73 20 3d 20 77 2e    var lines = w.
1060: 47 65 74 4c 69 6e 65 73 28 29 3b 20 20 20 20 0d  GetLines();    .
1070: 0a 20 20 20 20 76 61 72 20 66 6f 75 6e 64 4f 70  .    var foundOp
1080: 65 6e 69 6e 67 42 72 61 63 65 20 3d 20 66 61 6c  eningBrace = fal
1090: 73 65 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 77  se;..    ..    w
10a0: 68 69 6c 65 20 28 74 72 75 65 29 0d 0a 20 20 20  hile (true)..   
10b0: 20 7b 0d 0a 20 20 20 20 20 20 20 20 76 61 72 20   {..        var 
10c0: 6c 69 6e 65 20 3d 20 6c 69 6e 65 73 5b 73 74 61  line = lines[sta
10d0: 72 74 50 6f 73 2e 72 6f 77 5d 3b 0d 0a 20 20 20  rtPos.row];..   
10e0: 20 20 20 20 20 77 68 69 6c 65 20 28 73 74 61 72       while (star
10f0: 74 50 6f 73 2e 63 6f 6c 20 3e 20 2d 31 29 20 0d  tPos.col > -1) .
1100: 0a 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20  .        {..    
1110: 20 20 20 20 20 20 20 20 69 66 20 28 6c 69 6e 65          if (line
1120: 2e 63 68 61 72 41 74 28 73 74 61 72 74 50 6f 73  .charAt(startPos
1130: 2e 63 6f 6c 29 20 3d 3d 20 27 28 27 29 0d 0a 20  .col) == '(').. 
1140: 20 20 20 20 20 20 20 20 20 20 20 7b 0d 0a 20 20             {..  
1150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f                fo
1160: 75 6e 64 4f 70 65 6e 69 6e 67 42 72 61 63 65 20  undOpeningBrace 
1170: 3d 20 74 72 75 65 3b 0d 0a 20 20 20 20 20 20 20  = true;..       
1180: 20 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0d           break;.
1190: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a  .            }..
11a0: 20 20 20 20 20 20 20 20 20 20 20 20 73 74 61 72              star
11b0: 74 50 6f 73 2e 63 6f 6c 2d 2d 3b 20 0d 0a 20 20  tPos.col--; ..  
11c0: 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20        }..       
11d0: 20 0d 0a 20 20 20 20 20 20 20 20 69 66 20 28 66   ..        if (f
11e0: 6f 75 6e 64 4f 70 65 6e 69 6e 67 42 72 61 63 65  oundOpeningBrace
11f0: 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 62  )..            b
1200: 72 65 61 6b 3b 0d 0a 20 20 20 20 20 20 20 20 0d  reak;..        .
1210: 0a 20 20 20 20 20 20 20 20 73 74 61 72 74 50 6f  .        startPo
1220: 73 2e 72 6f 77 2d 2d 3b 0d 0a 20 20 20 20 20 20  s.row--;..      
1230: 20 20 69 66 20 28 73 74 61 72 74 50 6f 73 2e 72    if (startPos.r
1240: 6f 77 20 3c 20 30 29 0d 0a 20 20 20 20 20 20 20  ow < 0)..       
1250: 20 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20       break;..   
1260: 20 20 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20           ..     
1270: 20 20 20 73 74 61 72 74 50 6f 73 2e 63 6f 6c 20     startPos.col 
1280: 3d 20 6c 69 6e 65 73 5b 73 74 61 72 74 50 6f 73  = lines[startPos
1290: 2e 72 6f 77 5d 2e 6c 65 6e 67 74 68 20 2d 20 31  .row].length - 1
12a0: 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 0d 0a  ;..    }..    ..
12b0: 20 20 20 20 69 66 20 28 21 66 6f 75 6e 64 4f 70      if (!foundOp
12c0: 65 6e 69 6e 67 42 72 61 63 65 29 0d 0a 20 20 20  eningBrace)..   
12d0: 20 20 20 20 20 72 65 74 75 72 6e 20 66 61 6c 73       return fals
12e0: 65 3b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20 20  e;..        ..  
12f0: 20 20 2f 2a 20 d0 a1 d1 87 d0 b5 d1 82 d1 87 d0    /* ...........
1300: b8 d0 ba 20 d0 bd d0 b5 d0 bf d0 b0 d1 80 d0 bd  ... ............
1310: d1 8b d1 85 20 d1 81 d0 ba d0 be d0 b1 d0 be d0  .... ...........
1320: ba 2e 20 d0 95 d1 81 d0 bb d0 b8 20 d0 b2 d1 81  .. ........ ....
1330: d1 82 d1 80 d0 b5 d1 87 d0 b0 d0 b5 d1 82 d1 81  ................
1340: d1 8f 20 d0 be d1 82 d0 ba d1 80 d1 8b d0 b2 d0  .. .............
1350: b0 d1 8e d1 89 d0 b0 d1 8f d1 81 d1 8f 20 d1 81  ............. ..
1360: d0 ba d0 be d0 b1 d0 ba d0 b0 20 2d 20 d0 bf d1  .......... - ...
1370: 80 d0 b8 d0 b1 d0 b0 d0 b2 d0 bb d1 8f d0 b5 d0  ................
1380: bc 20 31 2c 20 0d 0a 20 20 20 20 d0 b5 d1 81 d0  . 1, ..    .....
1390: bb d0 b8 20 d0 b7 d0 b0 d0 ba d1 80 d1 8b d0 b2  ... ............
13a0: d0 b0 d1 8e d1 89 d0 b0 d1 8f 20 2d 20 d0 b2 d1  .......... - ...
13b0: 8b d1 87 d0 b8 d1 82 d0 b0 d0 b5 d0 bc 20 31 2e  ............. 1.
13c0: 20 d0 9a d0 be d0 b3 d0 b4 d0 b0 20 d0 b7 d0 bd   .......... ....
13d0: d0 b0 d1 87 d0 b5 d0 bd d0 b8 d0 b5 20 d1 81 d1  ............ ...
13e0: 82 d0 b0 d0 bd d0 be d0 b2 d0 b8 d1 82 d1 81 d1  ................
13f0: 8f 20 d1 80 d0 b0 d0 b2 d0 bd d1 8b d0 bc 20 30  . ............ 0
1400: 2c 20 d0 b7 d0 bd d0 b0 d1 87 d0 b8 d1 82 20 d0  , ............ .
1410: bc d1 8b 20 d0 bd d0 b0 d1 88 d0 bb d0 b8 20 0d  ... .......... .
1420: 0a 20 20 20 20 d0 bf d0 b0 d1 80 d0 bd d1 83 d1  .    ...........
1430: 8e 20 d0 b7 d0 b0 d0 ba d1 80 d1 8b d0 b2 d0 b0  . ..............
1440: d1 8e d1 89 d1 83 d1 8e 20 d1 81 d0 ba d0 be d0  ........ .......
1450: b1 d0 ba d1 83 20 d0 b8 20 d0 bf d0 be d0 b8 d1  ..... .. .......
1460: 81 d0 ba 20 d0 bc d0 be d0 b6 d0 bd d0 be 20 d0  ... .......... .
1470: bf d1 80 d0 b5 d0 ba d1 80 d0 b0 d1 82 d0 b8 d1  ................
1480: 82 d1 8c 2e 20 2a 2f 0d 0a 20 20 20 20 76 61 72  .... */..    var
1490: 20 6e 6f 74 50 61 69 72 65 64 43 6f 75 6e 74 20   notPairedCount 
14a0: 3d 20 31 3b 20 0d 0a 20 20 20 20 0d 0a 20 20 20  = 1; ..    ..   
14b0: 20 76 61 72 20 65 6e 64 50 6f 73 20 3d 20 7b 20   var endPos = { 
14c0: 27 72 6f 77 27 20 3a 20 73 74 61 72 74 50 6f 73  'row' : startPos
14d0: 2e 72 6f 77 2c 20 27 63 6f 6c 27 20 3a 20 73 74  .row, 'col' : st
14e0: 61 72 74 50 6f 73 2e 63 6f 6c 20 2b 20 31 20 7d  artPos.col + 1 }
14f0: 3b 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 65 6e  ;..    while (en
1500: 64 50 6f 73 2e 72 6f 77 20 3c 20 6c 69 6e 65 73  dPos.row < lines
1510: 2e 6c 65 6e 67 74 68 29 0d 0a 20 20 20 20 7b 0d  .length)..    {.
1520: 0a 20 20 20 20 20 20 20 20 76 61 72 20 6c 69 6e  .        var lin
1530: 65 20 3d 20 6c 69 6e 65 73 5b 65 6e 64 50 6f 73  e = lines[endPos
1540: 2e 72 6f 77 5d 3b 0d 0a 20 20 20 20 20 20 20 20  .row];..        
1550: 77 68 69 6c 65 20 28 65 6e 64 50 6f 73 2e 63 6f  while (endPos.co
1560: 6c 20 3c 20 6c 69 6e 65 2e 6c 65 6e 67 74 68 29  l < line.length)
1570: 0d 0a 20 20 20 20 20 20 20 20 7b 0d 0a 20 20 20  ..        {..   
1580: 20 20 20 20 20 20 20 20 20 73 77 69 74 63 68 20           switch 
1590: 28 6c 69 6e 65 2e 63 68 61 72 41 74 28 65 6e 64  (line.charAt(end
15a0: 50 6f 73 2e 63 6f 6c 29 29 0d 0a 20 20 20 20 20  Pos.col))..     
15b0: 20 20 20 20 20 20 20 7b 0d 0a 20 20 20 20 20 20         {..      
15c0: 20 20 20 20 20 20 63 61 73 65 20 27 28 27 3a 0d        case '(':.
15d0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
15e0: 20 6e 6f 74 50 61 69 72 65 64 43 6f 75 6e 74 2b   notPairedCount+
15f0: 2b 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  +;..            
1600: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20      break;..    
1610: 20 20 20 20 20 20 20 20 63 61 73 65 20 27 29 27          case ')'
1620: 3a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  :..             
1630: 20 20 20 6e 6f 74 50 61 69 72 65 64 43 6f 75 6e     notPairedCoun
1640: 74 2d 2d 3b 0d 0a 20 20 20 20 20 20 20 20 20 20  t--;..          
1650: 20 20 20 20 20 20 62 72 65 61 6b 3b 20 20 20 20        break;    
1660: 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 20 20              ..  
1670: 20 20 20 20 20 20 20 20 20 20 64 65 66 61 75 6c            defaul
1680: 74 3a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  t:..            
1690: 20 20 20 20 62 72 65 61 6b 3b 0d 0a 20 20 20 20      break;..    
16a0: 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 20          }..     
16b0: 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20 20 20         ..       
16c0: 20 20 20 20 20 69 66 20 28 21 6e 6f 74 50 61 69       if (!notPai
16d0: 72 65 64 43 6f 75 6e 74 29 0d 0a 20 20 20 20 20  redCount)..     
16e0: 20 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b             break
16f0: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 0d  ;..            .
1700: 0a 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64  .            end
1710: 50 6f 73 2e 63 6f 6c 2b 2b 3b 0d 0a 20 20 20 20  Pos.col++;..    
1720: 20 20 20 20 7d 0d 0a 20 20 20 20 20 20 20 20 0d      }..        .
1730: 0a 20 20 20 20 20 20 20 20 69 66 20 28 21 6e 6f  .        if (!no
1740: 74 50 61 69 72 65 64 43 6f 75 6e 74 29 0d 0a 20  tPairedCount).. 
1750: 20 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b             break
1760: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 0d  ;..            .
1770: 0a 20 20 20 20 20 20 20 20 65 6e 64 50 6f 73 2e  .        endPos.
1780: 72 6f 77 2b 2b 3b 0d 0a 20 20 20 20 7d 0d 0a 20  row++;..    }.. 
1790: 20 20 20 0d 0a 20 20 20 20 69 66 20 28 6e 6f 74     ..    if (not
17a0: 50 61 69 72 65 64 43 6f 75 6e 74 29 0d 0a 20 20  PairedCount)..  
17b0: 20 20 7b 0d 0a 20 20 20 20 20 20 20 20 44 6f 4d    {..        DoM
17c0: 65 73 73 61 67 65 42 6f 78 28 27 d0 9d d0 b5 20  essageBox('.... 
17d0: d0 be d0 b1 d0 bd d0 b0 d1 80 d1 83 d0 b6 d0 b5  ................
17e0: d0 bd d0 be 20 d0 bf d0 b0 d1 80 d0 bd d0 be d0  .... ...........
17f0: b9 20 d1 81 d0 ba d0 be d0 b1 d0 ba d0 b8 20 d0  . ............ .
1800: b4 d0 bb d1 8f 20 d1 81 d0 ba d0 be d0 b1 d0 ba  ..... ..........
1810: d0 b8 20 d0 b2 20 d0 bf d0 be d0 b7 d0 b8 d1 86  .. .. ..........
1820: d0 b8 d0 b8 20 28 27 20 2b 20 28 73 74 61 72 74  .... (' + (start
1830: 50 6f 73 2e 72 6f 77 20 2b 20 31 29 20 2b 20 27  Pos.row + 1) + '
1840: 2c 20 27 20 2b 20 28 73 74 61 72 74 50 6f 73 2e  , ' + (startPos.
1850: 63 6f 6c 20 2b 20 31 29 20 2b 20 27 29 21 27 29  col + 1) + ')!')
1860: 3b 0d 0a 20 20 20 20 20 20 20 20 77 2e 53 65 74  ;..        w.Set
1870: 53 65 6c 65 63 74 69 6f 6e 28 73 74 61 72 74 50  Selection(startP
1880: 6f 73 2e 72 6f 77 20 2b 20 31 2c 20 73 74 61 72  os.row + 1, star
1890: 74 50 6f 73 2e 63 6f 6c 20 2b 20 31 2c 20 73 74  tPos.col + 1, st
18a0: 61 72 74 50 6f 73 2e 72 6f 77 20 2b 20 31 2c 20  artPos.row + 1, 
18b0: 73 74 61 72 74 50 6f 73 2e 63 6f 6c 20 2b 20 32  startPos.col + 2
18c0: 29 3b 0d 0a 20 20 20 20 20 20 20 20 72 65 74 75  );..        retu
18d0: 72 6e 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 7d  rn false;..    }
18e0: 0d 0a 20 20 20 20 0d 0a 20 20 20 20 2f 2a 20 d0  ..    ..    /* .
18f0: 9d d0 b5 20 d0 b7 d0 b0 d0 b1 d1 8b d0 b2 d0 b0  ... ............
1900: d0 b5 d0 bc 2c 20 d1 87 d1 82 d0 be 20 d1 83 20  ...., ...... .. 
1910: d0 bd d0 b0 d1 81 20 d0 bd d1 83 d0 bc d0 b5 d1  ...... .........
1920: 80 d0 b0 d1 86 d0 b8 d1 8f 20 d1 81 d1 82 d1 80  ......... ......
1930: d0 be d0 ba 20 d0 b8 20 d0 ba d0 be d0 bb d0 be  .... .. ........
1940: d0 bd d0 be d0 ba 20 d0 bd d0 b0 d1 87 d0 b8 d0  ...... .........
1950: bd d0 b0 d0 b5 d1 82 d1 81 d1 8f 20 d1 81 20 31  ........... .. 1
1960: 2c 20 0d 0a 20 20 20 20 d0 b0 20 d0 b8 d0 bd d0  , ..    .. .....
1970: b4 d0 b5 d0 ba d1 81 d1 8b 20 d1 8d d0 bb d0 b5  ......... ......
1980: d0 bc d0 b5 d0 bd d1 82 d0 be d0 b2 20 d0 bc d0  ............ ...
1990: b0 d1 81 d1 81 d0 b8 d0 b2 d0 b0 20 d0 b8 20 d0  ........... .. .
19a0: b8 d0 bd d0 b4 d0 b5 d0 ba d1 81 d1 8b 20 d1 81  ............. ..
19b0: d0 b8 d0 bc d0 b2 d0 be d0 bb d0 be d0 b2 20 d0  .............. .
19c0: b2 20 d1 81 d1 82 d1 80 d0 be d0 ba d0 b5 20 2d  . ............ -
19d0: 20 d1 81 20 d0 bd d1 83 d0 bb d1 8f 2e 20 2a 2f   .. ......... */
19e0: 0d 0a 20 20 20 20 77 2e 53 65 74 53 65 6c 65 63  ..    w.SetSelec
19f0: 74 69 6f 6e 28 73 74 61 72 74 50 6f 73 2e 72 6f  tion(startPos.ro
1a00: 77 20 2b 20 31 2c 20 73 74 61 72 74 50 6f 73 2e  w + 1, startPos.
1a10: 63 6f 6c 20 2b 20 32 2c 20 65 6e 64 50 6f 73 2e  col + 2, endPos.
1a20: 72 6f 77 20 2b 20 31 2c 20 65 6e 64 50 6f 73 2e  row + 1, endPos.
1a30: 63 6f 6c 20 2b 20 31 29 3b 0d 0a 20 20 20 20 72  col + 1);..    r
1a40: 65 74 75 72 6e 20 74 72 75 65 3b 0d 0a 7d 0d 0a  eturn true;..}..
1a50: 0d 0a 53 65 6c 66 53 63 72 69 70 74 2e 53 65 6c  ..SelfScript.Sel
1a60: 66 5b 27 6d 61 63 72 6f 73 d0 97 d0 b0 d0 bc d0  f['macros.......
1a70: b5 d0 bd d0 b8 d1 82 d1 8c 20 d1 82 d0 b0 d0 b1  ......... ......
1a80: d1 83 d0 bb d1 8f d1 86 d0 b8 d1 8e 20 d0 b2 20  ............ .. 
1a90: d0 be d1 82 d1 81 d1 82 d1 83 d0 bf d0 b0 d1 85  ................
1aa0: 20 d0 bd d0 b0 20 d0 bf d1 80 d0 be d0 b1 d0 b5   .... ..........
1ab0: d0 bb d1 8b 27 5d 20 3d 20 66 75 6e 63 74 69 6f  ....'] = functio
1ac0: 6e 28 29 20 7b 0d 0a 09 72 65 74 75 72 6e 20 72  n() {...return r
1ad0: 65 70 6c 61 63 65 54 61 62 73 54 6f 53 70 61 63  eplaceTabsToSpac
1ae0: 65 73 49 6e 53 65 6c 65 63 74 65 64 54 65 78 74  esInSelectedText
1af0: 28 29 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69  ();..}....functi
1b00: 6f 6e 20 72 65 70 6c 61 63 65 54 61 62 73 54 6f  on replaceTabsTo
1b10: 53 70 61 63 65 73 49 6e 53 65 6c 65 63 74 65 64  SpacesInSelected
1b20: 54 65 78 74 28 64 6f 4e 6f 74 52 65 73 74 6f 72  Text(doNotRestor
1b30: 65 53 65 6c 65 63 74 69 6f 6e 29 20 7b 09 0d 0a  eSelection) {...
1b40: 20 20 20 20 72 65 74 75 72 6e 20 70 72 6f 63 65      return proce
1b50: 73 73 53 65 6c 65 63 74 65 64 54 65 78 74 28 66  ssSelectedText(f
1b60: 75 6e 63 74 69 6f 6e 28 73 65 6c 54 65 78 74 29  unction(selText)
1b70: 7b 0d 0a 20 20 20 20 20 20 20 20 76 61 72 20 74  {..        var t
1b80: 61 62 53 69 7a 65 20 3d 20 70 72 6f 66 69 6c 65  abSize = profile
1b90: 52 6f 6f 74 2e 67 65 74 56 61 6c 75 65 28 22 4d  Root.getValue("M
1ba0: 6f 64 75 6c 65 54 65 78 74 45 64 69 74 6f 72 2f  oduleTextEditor/
1bb0: 54 61 62 53 69 7a 65 22 29 3b 0d 0a 20 20 20 20  TabSize");..    
1bc0: 20 20 20 20 76 61 72 20 73 70 61 63 65 73 20 3d      var spaces =
1bd0: 20 27 27 3b 20 66 6f 72 20 28 76 61 72 20 69 3d   ''; for (var i=
1be0: 30 3b 20 69 3c 74 61 62 53 69 7a 65 3b 20 69 2b  0; i<tabSize; i+
1bf0: 2b 29 20 7b 20 73 70 61 63 65 73 20 2b 3d 20 27  +) { spaces += '
1c00: 20 27 20 7d 3b 0d 0a 20 20 20 20 20 20 20 20 72   ' };..        r
1c10: 65 74 75 72 6e 20 73 65 6c 54 65 78 74 2e 72 65  eturn selText.re
1c20: 70 6c 61 63 65 28 2f 5e 28 28 3c 5b 5e 3e 5d 2b  place(/^((<[^>]+
1c30: 3e 7c 5c 74 29 2b 29 2f 67 6d 2c 20 66 75 6e 63  >|\t)+)/gm, func
1c40: 74 69 6f 6e 28 6d 61 74 63 68 2c 20 70 31 2c 20  tion(match, p1, 
1c50: 6f 66 66 73 65 74 2c 20 73 29 20 7b 0d 0a 20 20  offset, s) {..  
1c60: 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e            return
1c70: 20 70 31 2e 72 65 70 6c 61 63 65 28 2f 5c 74 2f   p1.replace(/\t/
1c80: 67 2c 20 73 70 61 63 65 73 29 3b 0d 0a 20 20 20  g, spaces);..   
1c90: 20 20 20 20 20 7d 29 3b 0d 0a 20 20 20 20 7d 2c       });..    },
1ca0: 20 64 6f 4e 6f 74 52 65 73 74 6f 72 65 53 65 6c   doNotRestoreSel
1cb0: 65 63 74 69 6f 6e 29 3b 0d 0a 7d 0d 0a 0d 0a 66  ection);..}....f
1cc0: 75 6e 63 74 69 6f 6e 20 73 65 6c 65 63 74 4e 65  unction selectNe
1cd0: 78 74 50 61 74 74 65 72 6e 28 64 69 72 29 7b 0d  xtPattern(dir){.
1ce0: 0a 20 20 20 20 2f 2f 64 65 62 75 67 67 65 72 3b  .    //debugger;
1cf0: 0d 0a 20 20 20 20 76 61 72 20 77 20 3d 20 47 65  ..    var w = Ge
1d00: 74 54 65 78 74 57 69 6e 64 6f 77 28 29 3b 20 2f  tTextWindow(); /
1d10: 2f 73 6e 65 67 6f 70 61 74 2e 61 63 74 69 76 65  /snegopat.active
1d20: 54 65 78 74 57 69 6e 64 6f 77 28 29 3b 0d 0a 20  TextWindow();.. 
1d30: 20 20 20 69 66 20 28 21 77 29 20 72 65 74 75 72     if (!w) retur
1d40: 6e 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a  n false;..    ..
1d50: 2f 2f 64 65 62 75 67 67 65 72 3b 20 20 20 20 0d  //debugger;    .
1d60: 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72 20 73  .    ..    var s
1d70: 65 6c 20 3d 20 77 2e 67 65 74 53 65 6c 65 63 74  el = w.getSelect
1d80: 69 6f 6e 28 29 3b 0d 0a 20 20 20 20 76 61 72 20  ion();..    var 
1d90: 73 65 6c 54 65 78 74 20 3d 20 77 2e 73 65 6c 65  selText = w.sele
1da0: 63 74 65 64 54 65 78 74 28 29 3b 0d 0a 20 20 20  ctedText();..   
1db0: 20 69 66 20 28 73 65 6c 54 65 78 74 20 3d 3d 20   if (selText == 
1dc0: 27 27 29 20 72 65 74 75 72 6e 20 66 61 6c 73 65  '') return false
1dd0: 3b 0d 0a 0d 0a 20 20 20 20 76 61 72 20 72 6f 77  ;....    var row
1de0: 20 3d 20 64 69 72 20 3c 20 30 20 3f 20 0d 0a 20   = dir < 0 ? .. 
1df0: 20 20 20 20 20 20 20 73 65 61 72 63 68 50 61 74         searchPat
1e00: 74 65 72 6e 55 70 28 77 2c 20 73 65 6c 54 65 78  ternUp(w, selTex
1e10: 74 2c 20 73 65 6c 2e 62 65 67 69 6e 52 6f 77 29  t, sel.beginRow)
1e20: 20 3a 0d 0a 20 20 20 20 20 20 20 20 73 65 61 72   :..        sear
1e30: 63 68 50 61 74 74 65 72 6e 44 6f 77 6e 28 77 2c  chPatternDown(w,
1e40: 20 73 65 6c 54 65 78 74 2c 20 73 65 6c 2e 62 65   selText, sel.be
1e50: 67 69 6e 52 6f 77 29 3b 0d 0a 20 20 20 20 0d 0a  ginRow);..    ..
1e60: 20 20 20 20 69 66 20 28 21 72 6f 77 29 20 72 65      if (!row) re
1e70: 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 20 20 20  turn false;..   
1e80: 20 76 61 72 20 73 74 72 20 3d 20 77 2e 6c 69 6e   var str = w.lin
1e90: 65 28 72 6f 77 29 3b 0d 0a 20 20 20 20 76 61 72  e(row);..    var
1ea0: 20 63 6f 6c 20 3d 20 31 20 2b 20 73 74 72 2e 69   col = 1 + str.i
1eb0: 6e 64 65 78 4f 66 28 73 65 6c 54 65 78 74 29 3b  ndexOf(selText);
1ec0: 0d 0a 20 20 20 20 0d 0a 20 20 20 20 77 2e 73 65  ..    ..    w.se
1ed0: 74 43 61 72 65 74 50 6f 73 28 31 2c 20 31 29 3b  tCaretPos(1, 1);
1ee0: 0d 0a 20 20 20 20 77 2e 73 65 74 53 65 6c 65 63  ..    w.setSelec
1ef0: 74 69 6f 6e 28 72 6f 77 2c 20 63 6f 6c 2c 20 72  tion(row, col, r
1f00: 6f 77 2c 20 63 6f 6c 20 2b 20 73 65 6c 54 65 78  ow, col + selTex
1f10: 74 2e 6c 65 6e 67 74 68 29 3b 0d 0a 20 20 20 20  t.length);..    
1f20: 77 2e 73 65 74 43 61 72 65 74 50 6f 73 28 72 6f  w.setCaretPos(ro
1f30: 77 2c 20 63 6f 6c 29 3b 0d 0a 20 20 20 20 77 2e  w, col);..    w.
1f40: 73 65 74 53 65 6c 65 63 74 69 6f 6e 28 72 6f 77  setSelection(row
1f50: 2c 20 63 6f 6c 2c 20 72 6f 77 2c 20 63 6f 6c 20  , col, row, col 
1f60: 2b 20 73 65 6c 54 65 78 74 2e 6c 65 6e 67 74 68  + selText.length
1f70: 29 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 72 65  );..    ..    re
1f80: 74 75 72 6e 20 74 72 75 65 3b 0d 0a 7d 0d 0a 0d  turn true;..}...
1f90: 0a 66 75 6e 63 74 69 6f 6e 20 73 65 61 72 63 68  .function search
1fa0: 50 61 74 74 65 72 6e 44 6f 77 6e 28 64 6f 63 2c  PatternDown(doc,
1fb0: 20 70 61 74 74 65 72 6e 2c 20 73 74 61 72 74 52   pattern, startR
1fc0: 6f 77 29 7b 0d 0a 20 20 20 20 76 61 72 20 71 20  ow){..    var q 
1fd0: 3d 20 30 3b 0d 0a 20 20 20 20 66 6f 72 20 28 76  = 0;..    for (v
1fe0: 61 72 20 69 20 3d 20 73 74 61 72 74 52 6f 77 20  ar i = startRow 
1ff0: 2b 20 31 3b 20 69 20 3c 3d 20 64 6f 63 2e 6c 69  + 1; i <= doc.li
2000: 6e 65 73 43 6f 75 6e 74 28 29 3b 20 69 2b 2b 29  nesCount(); i++)
2010: 7b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20 20 20  {..        ..   
2020: 20 20 20 20 20 69 66 20 28 2b 2b 71 20 3e 20 31       if (++q > 1
2030: 30 30 30 30 29 20 72 65 74 75 72 6e 20 6e 75 6c  0000) return nul
2040: 6c 3b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20 20  l;..        ..  
2050: 20 20 20 20 20 20 76 61 72 20 73 74 72 20 3d 20        var str = 
2060: 64 6f 63 2e 6c 69 6e 65 28 69 29 3b 0d 0a 20 20  doc.line(i);..  
2070: 20 20 20 20 20 20 76 61 72 20 6a 20 3d 20 73 74        var j = st
2080: 72 2e 69 6e 64 65 78 4f 66 28 70 61 74 74 65 72  r.indexOf(patter
2090: 6e 29 3b 0d 0a 20 20 20 20 20 20 20 20 69 66 20  n);..        if 
20a0: 28 6a 20 3e 20 2d 31 29 20 72 65 74 75 72 6e 20  (j > -1) return 
20b0: 69 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 72  i;..    }..    r
20c0: 65 74 75 72 6e 20 6e 75 6c 6c 3b 0d 0a 7d 0d 0a  eturn null;..}..
20d0: 0d 0a 66 75 6e 63 74 69 6f 6e 20 73 65 61 72 63  ..function searc
20e0: 68 50 61 74 74 65 72 6e 55 70 28 64 6f 63 2c 20  hPatternUp(doc, 
20f0: 70 61 74 74 65 72 6e 2c 20 73 74 61 72 74 52 6f  pattern, startRo
2100: 77 29 7b 0d 0a 2f 2f 64 65 62 75 67 67 65 72 3b  w){..//debugger;
2110: 20 20 20 20 0d 0a 20 20 20 20 76 61 72 20 71 20      ..    var q 
2120: 3d 20 30 3b 0d 0a 20 20 20 20 66 6f 72 20 28 76  = 0;..    for (v
2130: 61 72 20 69 20 3d 20 73 74 61 72 74 52 6f 77 20  ar i = startRow 
2140: 2d 20 31 3b 20 69 20 3e 3d 20 31 3b 20 69 2d 2d  - 1; i >= 1; i--
2150: 29 7b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20 20  ){..        ..  
2160: 20 20 20 20 20 20 69 66 20 28 2b 2b 71 20 3e 20        if (++q > 
2170: 31 30 30 30 30 29 20 72 65 74 75 72 6e 20 6e 75  10000) return nu
2180: 6c 6c 3b 0d 0a 20 20 20 20 20 20 20 20 0d 0a 20  ll;..        .. 
2190: 20 20 20 20 20 20 20 76 61 72 20 73 74 72 20 3d         var str =
21a0: 20 64 6f 63 2e 6c 69 6e 65 28 69 29 3b 0d 0a 20   doc.line(i);.. 
21b0: 20 20 20 20 20 20 20 76 61 72 20 6a 20 3d 20 73         var j = s
21c0: 74 72 2e 69 6e 64 65 78 4f 66 28 70 61 74 74 65  tr.indexOf(patte
21d0: 72 6e 29 3b 0d 0a 20 20 20 20 20 20 20 20 69 66  rn);..        if
21e0: 20 28 6a 20 3e 20 2d 31 29 20 72 65 74 75 72 6e   (j > -1) return
21f0: 20 69 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20   i;..    }..    
2200: 72 65 74 75 72 6e 20 6e 75 6c 6c 3b 0d 0a 7d 0d  return null;..}.
2210: 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 6d 61 63 72  ...function macr
2220: 6f 73 d0 9a d0 bb d0 be d0 bd d0 b8 d1 80 d0 be  os..............
2230: d0 b2 d0 b0 d1 82 d1 8c d0 a2 d0 b5 d0 ba d1 81  ................
2240: d1 82 28 29 7b 0d 0a 20 20 20 20 76 61 72 20 77  ..(){..    var w
2250: 20 3d 20 47 65 74 54 65 78 74 57 69 6e 64 6f 77   = GetTextWindow
2260: 28 29 3b 2f 2f 73 6e 65 67 6f 70 61 74 2e 61 63  ();//snegopat.ac
2270: 74 69 76 65 54 65 78 74 57 69 6e 64 6f 77 28 29  tiveTextWindow()
2280: 3b 0d 0a 20 20 20 20 69 66 20 28 21 77 29 20 72  ;..    if (!w) r
2290: 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 20 20  eturn false;..  
22a0: 20 20 0d 0a 20 20 20 20 76 61 72 20 73 65 6c 20    ..    var sel 
22b0: 3d 20 77 2e 67 65 74 53 65 6c 65 63 74 69 6f 6e  = w.getSelection
22c0: 28 29 3b 0d 0a 20 20 20 20 76 61 72 20 73 65 6c  ();..    var sel
22d0: 54 65 78 74 20 3d 20 77 2e 73 65 6c 65 63 74 65  Text = w.selecte
22e0: 64 54 65 78 74 28 29 3b 0d 0a 20 20 20 20 69 66  dText();..    if
22f0: 20 28 73 65 6c 54 65 78 74 20 21 3d 20 27 27 29   (selText != '')
2300: 7b 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 20  {            .. 
2310: 20 20 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65         w.SetSele
2320: 63 74 65 64 54 65 78 74 28 73 65 6c 54 65 78 74  ctedText(selText
2330: 20 2b 20 22 5c 6e 22 20 2b 20 73 65 6c 54 65 78   + "\n" + selTex
2340: 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20  t);..    }..    
2350: 65 6c 73 65 7b 0d 0a 20 20 20 20 20 20 20 20 2f  else{..        /
2360: 2f 20 d0 95 d1 81 d0 bb d0 b8 20 d0 bd d0 b8 d1  / ........ .....
2370: 87 d0 b5 d0 b3 d0 be 20 d0 bd d0 b5 20 d0 b2 d1  ....... .... ...
2380: 8b d0 b4 d0 b5 d0 bb d0 b5 d0 bd d0 be 2c 20 d1  ............., .
2390: 81 d0 ba d0 bb d0 be d0 bd d0 b8 d1 80 d1 83 d0  ................
23a0: b5 d0 bc 20 d1 82 d0 b5 d0 ba d1 83 d1 89 d1 83  ... ............
23b0: d1 8e 20 d1 81 d1 82 d1 80 d0 be d0 ba d1 83 0d  .. .............
23c0: 0a 20 20 20 20 20 20 20 20 76 61 72 20 70 6f 73  .        var pos
23d0: 20 3d 20 77 2e 67 65 74 43 61 72 65 74 50 6f 73   = w.getCaretPos
23e0: 28 29 3b 0d 0a 20 20 20 20 20 20 20 20 77 2e 73  ();..        w.s
23f0: 65 74 53 65 6c 65 63 74 69 6f 6e 28 70 6f 73 2e  etSelection(pos.
2400: 62 65 67 69 6e 52 6f 77 2c 20 31 2c 20 70 6f 73  beginRow, 1, pos
2410: 2e 62 65 67 69 6e 52 6f 77 2c 20 31 20 2b 20 77  .beginRow, 1 + w
2420: 2e 6c 69 6e 65 28 70 6f 73 2e 62 65 67 69 6e 52  .line(pos.beginR
2430: 6f 77 29 2e 6c 65 6e 67 74 68 29 3b 0d 0a 20 20  ow).length);..  
2440: 20 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65 63        w.SetSelec
2450: 74 65 64 54 65 78 74 28 77 2e 73 65 6c 65 63 74  tedText(w.select
2460: 65 64 54 65 78 74 28 29 20 2b 20 22 5c 6e 22 20  edText() + "\n" 
2470: 2b 20 77 2e 73 65 6c 65 63 74 65 64 54 65 78 74  + w.selectedText
2480: 28 29 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20 20  ());..    }..   
2490: 20 72 65 74 75 72 6e 20 74 72 75 65 3b 0d 0a 7d   return true;..}
24a0: 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 6d 61 63  ....function mac
24b0: 72 6f 73 4f 6e 50 72 65 73 73 45 6e 74 65 72 49  rosOnPressEnterI
24c0: 6e 43 6f 6d 6d 65 6e 74 28 29 7b 0d 0a 20 20 20  nComment(){..   
24d0: 20 76 61 72 20 77 20 3d 20 47 65 74 54 65 78 74   var w = GetText
24e0: 57 69 6e 64 6f 77 28 29 3b 2f 2f 73 6e 65 67 6f  Window();//snego
24f0: 70 61 74 2e 61 63 74 69 76 65 54 65 78 74 57 69  pat.activeTextWi
2500: 6e 64 6f 77 28 29 3b 0d 0a 20 20 20 20 69 66 20  ndow();..    if 
2510: 28 21 77 29 20 72 65 74 75 72 6e 20 66 61 6c 73  (!w) return fals
2520: 65 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 76 61  e;..    ..    va
2530: 72 20 70 6f 73 20 3d 20 77 2e 67 65 74 43 61 72  r pos = w.getCar
2540: 65 74 50 6f 73 28 29 3b 0d 0a 20 20 20 20 76 61  etPos();..    va
2550: 72 20 73 74 72 20 3d 20 77 2e 6c 69 6e 65 28 70  r str = w.line(p
2560: 6f 73 2e 62 65 67 69 6e 52 6f 77 29 3b 0d 0a 20  os.beginRow);.. 
2570: 20 20 20 69 66 20 28 73 74 72 2e 6d 61 74 63 68     if (str.match
2580: 28 2f 5e 5c 73 2a 5c 2f 5c 2f 5c 73 2a 5b 5e 5c  (/^\s*\/\/\s*[^\
2590: 73 5d 2b 2f 69 67 29 29 20 7b 20 20 20 20 20 0d  s]+/ig)) {     .
25a0: 0a 0d 0a 20 20 20 20 20 20 20 20 2f 2f 20 d0 95  ...        // ..
25b0: d1 81 d0 bb d0 b8 20 d0 ba d1 83 d1 80 d1 81 d0  ...... .........
25c0: be d1 80 20 d1 83 d1 81 d1 82 d0 b0 d0 bd d0 be  ... ............
25d0: d0 b2 d0 bb d0 b5 d0 bd 20 d0 bb d0 b5 d0 b2 d0  ........ .......
25e0: b5 d0 b5 20 d1 81 d0 b8 d0 bc d0 b2 d0 be d0 bb  ... ............
25f0: d0 be d0 b2 20 d0 ba d0 be d0 bc d0 bc d0 b5 d0  .... ...........
2600: bd d1 82 d0 b0 d1 80 d0 b8 d1 8f 2c 20 d1 82 d0  ..........., ...
2610: be 20 d0 bd d0 b5 20 d0 be d0 b1 d1 80 d0 b0 d0  . .... .........
2620: b1 d0 b0 d1 82 d1 8b d0 b2 d0 b0 d0 b5 d0 bc 20  ............... 
2630: d0 bd d0 b0 d0 b6 d0 b0 d1 82 d0 b8 d0 b5 2c 0d  ..............,.
2640: 0a 20 20 20 20 20 20 20 20 2f 2f 20 d1 87 d1 82  .        // ....
2650: d0 be d0 b1 d1 8b 20 d0 b4 d0 be d0 b1 d0 b0 d0  ...... .........
2660: b2 d0 bb d1 8f d0 bb d0 b0 d1 81 d1 8c 20 d0 bf  ............. ..
2670: d1 83 d1 81 d1 82 d0 b0 d1 8f 20 d1 81 d1 82 d1  .......... .....
2680: 80 d0 be d0 ba d0 b0 2c 20 d0 ba d0 b0 d0 ba 20  ......., ...... 
2690: d0 b8 20 d0 be d0 b6 d0 b8 d0 b4 d0 b0 d0 b5 d1  .. .............
26a0: 82 d1 81 d1 8f 2e 0d 0a 20 20 20 20 20 20 20 20  ........        
26b0: 69 66 20 28 70 6f 73 2e 62 65 67 69 6e 43 6f 6c  if (pos.beginCol
26c0: 20 3c 3d 20 73 74 72 2e 73 65 61 72 63 68 28 27   <= str.search('
26d0: 2f 2f 27 29 20 2b 20 31 29 0d 0a 20 20 20 20 20  //') + 1)..     
26e0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 66 61         return fa
26f0: 6c 73 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20  lse;....        
2700: 2f 2f 20 d0 ad d1 82 d0 be 20 d0 bd d0 b5 d0 bf  // ...... ......
2710: d1 83 d1 81 d1 82 d0 be d0 b9 20 d0 ba d0 be d0  .......... .....
2720: bc d0 bc d0 b5 d0 bd d1 82 d0 b0 d1 80 d0 b8 d0  ................
2730: b9 20 2d 20 d0 b4 d0 be d0 b1 d0 b0 d0 b2 d0 bb  . - ............
2740: d1 8f d0 b5 d0 bc 20 d0 ba d0 be d0 bc d0 bc d0  ...... .........
2750: b5 d0 bd d1 82 d0 b0 d1 80 d0 b8 d0 b9 20 d0 bd  ............. ..
2760: d0 b8 d0 b6 d0 b5 20 0d 0a 20 20 20 20 20 20 20  ...... ..       
2770: 20 2f 2f 20 d1 81 20 d0 be d1 82 d1 81 d1 82 d1   // .. .........
2780: 83 d0 bf d0 be d0 bc 20 d0 ba d0 b0 d0 ba 20 d0  ....... ...... .
2790: b2 20 d0 bf d1 80 d0 b5 d0 b4 d1 8b d0 b4 d1 83  . ..............
27a0: d1 89 d0 b5 d0 b9 20 d1 81 d1 82 d1 80 d0 be d0  ...... .........
27b0: ba d0 b5 2e 0d 0a 20 20 20 20 20 20 20 20 76 61  ......        va
27c0: 72 20 6e 65 77 53 74 72 20 3d 20 67 65 74 43 6f  r newStr = getCo
27d0: 6d 6d 65 6e 74 53 74 72 69 6e 67 48 65 61 64 65  mmentStringHeade
27e0: 72 28 73 74 72 29 3b 0d 0a 0d 0a 20 20 20 20 20  r(str);....     
27f0: 20 20 20 2f 2f 20 d0 95 d1 81 d0 bb d0 b8 20 d1     // ........ .
2800: 81 d0 bf d1 80 d0 b0 d0 b2 d0 b0 20 d0 be d1 82  ........... ....
2810: 20 d0 ba d1 83 d1 80 d1 81 d0 be d1 80 d0 b0 20   .............. 
2820: d0 b5 d1 81 d1 82 d1 8c 20 d1 82 d0 b5 d0 ba d1  ........ .......
2830: 81 d1 82 2c 20 d0 bf d0 b5 d1 80 d0 b5 d0 bd d0  ..., ...........
2840: b5 d1 81 d0 b5 d0 bc 20 d0 b5 d0 b3 d0 be 20 0d  ....... ...... .
2850: 0a 20 20 20 20 20 20 20 20 2f 2f 20 d0 bd d0 b0  .        // ....
2860: 20 d0 bd d0 be d0 b2 d1 83 d1 8e 20 d1 81 d1 82   .......... ....
2870: d1 80 d0 be d0 ba d1 83 20 d0 ba d0 be d0 bc d0  ........ .......
2880: bc d0 b5 d0 bd d1 82 d0 b0 d1 80 d0 b8 d1 8f 2e  ................
2890: 0d 0a 20 20 20 20 20 20 20 20 69 66 20 28 73 74  ..        if (st
28a0: 72 2e 6c 65 6e 67 74 68 20 3e 3d 20 70 6f 73 2e  r.length >= pos.
28b0: 65 6e 64 43 6f 6c 29 20 7b 0d 0a 20 20 20 20 20  endCol) {..     
28c0: 20 20 20 20 20 20 20 76 61 72 20 74 61 69 6c 20         var tail 
28d0: 3d 20 73 74 72 2e 73 75 62 73 74 72 28 70 6f 73  = str.substr(pos
28e0: 2e 62 65 67 69 6e 43 6f 6c 20 2d 20 31 2c 20 73  .beginCol - 1, s
28f0: 74 72 2e 6c 65 6e 67 74 68 20 2d 20 70 6f 73 2e  tr.length - pos.
2900: 62 65 67 69 6e 43 6f 6c 20 2b 20 31 29 3b 0d 0a  beginCol + 1);..
2910: 20 20 20 20 20 20 20 20 20 20 20 20 77 2e 52 65              w.Re
2920: 70 6c 61 63 65 4c 69 6e 65 28 70 6f 73 2e 62 65  placeLine(pos.be
2930: 67 69 6e 52 6f 77 2c 20 73 74 72 2e 73 75 62 73  ginRow, str.subs
2940: 74 72 28 30 2c 20 70 6f 73 2e 62 65 67 69 6e 43  tr(0, pos.beginC
2950: 6f 6c 20 2d 20 31 29 29 3b 20 20 20 20 2f 2f 20  ol - 1));    // 
2960: d0 be d1 82 d1 80 d0 b5 d0 b7 d0 b0 d0 b5 d0 bc  ................
2970: 20 d1 85 d0 b2 d0 be d1 81 d1 82 20 d0 be d1 82   .......... ....
2980: 20 d1 82 d0 b5 d0 ba d1 83 d1 89 d0 b5 d0 b9 20   .............. 
2990: d1 81 d1 82 d1 80 d0 be d0 ba d0 b8 0d 0a 20 20  ..............  
29a0: 20 20 20 20 20 20 20 20 20 20 6e 65 77 53 74 72            newStr
29b0: 20 3d 20 6e 65 77 53 74 72 20 2b 20 74 61 69 6c   = newStr + tail
29c0: 2e 72 65 70 6c 61 63 65 28 2f 5e 5c 73 2a 2f 69  .replace(/^\s*/i
29d0: 67 2c 20 22 22 29 3b 0d 0a 20 20 20 20 20 20 20  g, "");..       
29e0: 20 7d 0d 0a 20 20 20 20 20 20 20 20 76 61 72 20   }..        var 
29f0: 6e 65 77 43 61 72 65 74 52 6f 77 20 3d 20 31 20  newCaretRow = 1 
2a00: 2b 20 70 6f 73 2e 62 65 67 69 6e 52 6f 77 3b 0d  + pos.beginRow;.
2a10: 0a 20 20 20 20 20 20 20 20 77 2e 49 6e 73 65 72  .        w.Inser
2a20: 74 4c 69 6e 65 28 6e 65 77 43 61 72 65 74 52 6f  tLine(newCaretRo
2a30: 77 2c 20 6e 65 77 53 74 72 29 3b 0d 0a 20 20 20  w, newStr);..   
2a40: 20 20 20 20 20 77 2e 73 65 74 43 61 72 65 74 50       w.setCaretP
2a50: 6f 73 28 6e 65 77 43 61 72 65 74 52 6f 77 2c 20  os(newCaretRow, 
2a60: 31 20 2b 20 6e 65 77 53 74 72 2e 6c 65 6e 67 74  1 + newStr.lengt
2a70: 68 29 3b 0d 0a 20 20 20 20 20 20 20 20 72 65 74  h);..        ret
2a80: 75 72 6e 20 74 72 75 65 3b 0d 0a 20 20 20 20 7d  urn true;..    }
2a90: 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 66 61 6c  ..    return fal
2aa0: 73 65 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69  se;..}....functi
2ab0: 6f 6e 20 6d 61 63 72 6f 73 4f 6e 50 72 65 73 73  on macrosOnPress
2ac0: 44 65 6c 65 74 65 49 6e 43 6f 6d 6d 65 6e 74 28  DeleteInComment(
2ad0: 29 7b 0d 0a 20 20 20 20 76 61 72 20 77 20 3d 20  ){..    var w = 
2ae0: 47 65 74 54 65 78 74 57 69 6e 64 6f 77 28 29 3b  GetTextWindow();
2af0: 2f 2f 73 6e 65 67 6f 70 61 74 2e 61 63 74 69 76  //snegopat.activ
2b00: 65 54 65 78 74 57 69 6e 64 6f 77 28 29 3b 0d 0a  eTextWindow();..
2b10: 20 20 20 20 69 66 20 28 21 77 29 20 72 65 74 75      if (!w) retu
2b20: 72 6e 20 66 61 6c 73 65 3b 0d 0a 0d 0a 20 20 20  rn false;....   
2b30: 20 69 66 20 28 77 2e 73 65 6c 65 63 74 65 64 54   if (w.selectedT
2b40: 65 78 74 28 29 20 21 3d 20 22 22 29 7b 0d 0a 20  ext() != ""){.. 
2b50: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 66 61         return fa
2b60: 6c 73 65 3b 20 20 20 20 2f 2f 2f 20 54 4f 44 4f  lse;    /// TODO
2b70: 3a 20 d0 be d0 b1 d1 80 d0 b0 d0 b1 d0 be d1 82  : ..............
2b80: d0 b0 d1 82 d1 8c 20 d1 8d d1 82 d0 be d1 82 20  ...... ........ 
2b90: d0 b2 d0 b0 d1 80 d0 b8 d0 b0 d0 bd d1 82 2e 0d  ................
2ba0: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 0d 0a 20 20  .    }..    ..  
2bb0: 20 20 76 61 72 20 70 6f 73 20 3d 20 77 2e 67 65    var pos = w.ge
2bc0: 74 43 61 72 65 74 50 6f 73 28 29 3b 0d 0a 20 20  tCaretPos();..  
2bd0: 20 20 0d 0a 20 20 20 20 69 66 20 28 70 6f 73 2e    ..    if (pos.
2be0: 62 65 67 69 6e 52 6f 77 20 3d 3d 20 77 2e 6c 69  beginRow == w.li
2bf0: 6e 65 73 43 6f 75 6e 74 29 20 72 65 74 75 72 6e  nesCount) return
2c00: 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20   false;..    .. 
2c10: 20 20 20 76 61 72 20 73 74 72 20 3d 20 77 2e 6c     var str = w.l
2c20: 69 6e 65 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77  ine(pos.beginRow
2c30: 29 3b 0d 0a 20 20 20 20 0d 0a 20 20 20 20 69 66  );..    ..    if
2c40: 20 28 21 69 73 43 6f 6d 6d 65 6e 74 53 74 72 69   (!isCommentStri
2c50: 6e 67 28 73 74 72 29 29 20 72 65 74 75 72 6e 20  ng(str)) return 
2c60: 66 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20 20  false;..    ..  
2c70: 20 20 69 66 20 28 70 6f 73 2e 65 6e 64 43 6f 6c    if (pos.endCol
2c80: 20 3e 20 73 74 72 2e 6c 65 6e 67 74 68 29 7b 0d   > str.length){.
2c90: 0a 20 20 20 20 20 20 20 20 2f 2f 20 d0 9a d1 83  .        // ....
2ca0: d1 80 d1 81 d0 be d1 80 20 d1 81 d1 82 d0 be d0  ........ .......
2cb0: b8 d1 82 20 d0 b2 20 d1 81 d0 b0 d0 bc d0 be d0  ... .. .........
2cc0: bc 20 d0 ba d0 be d0 bd d1 86 d0 b5 20 d1 81 d1  . .......... ...
2cd0: 82 d1 80 d0 be d0 ba d0 b8 20 d0 b8 20 d0 bf d1  ......... .. ...
2ce0: 80 d0 b8 20 d0 bd d0 b0 d0 b6 d0 b0 d1 82 d0 b8  ... ............
2cf0: d0 b8 20 0d 0a 20 20 20 20 20 20 20 20 2f 2f 20  .. ..        // 
2d00: 44 65 6c 65 74 65 20 d1 81 d0 bb d0 b5 d0 b4 d1  Delete .........
2d10: 83 d1 8e d1 89 d0 b0 d1 8f 20 d1 81 d1 82 d1 80  ......... ......
2d20: d0 be d0 ba d0 b0 20 d0 b4 d0 be d0 bb d0 b6 d0  ...... .........
2d30: bd d0 b0 20 d0 bf d1 80 d0 b8 d0 ba d0 bb d0 b5  ... ............
2d40: d0 b8 d1 82 d1 8c d1 81 d1 8f 20 d0 b2 20 d0 ba  .......... .. ..
2d50: d0 be d0 bd d0 b5 d1 86 20 d1 82 d0 b5 d0 ba d1  ........ .......
2d60: 83 d1 89 d0 b5 d0 b9 2e 0d 0a 20 20 20 20 20 20  ..........      
2d70: 20 20 76 61 72 20 6e 65 77 54 61 69 6c 20 3d 20    var newTail = 
2d80: 77 2e 6c 69 6e 65 28 31 20 2b 20 70 6f 73 2e 62  w.line(1 + pos.b
2d90: 65 67 69 6e 52 6f 77 29 3b 0d 0a 20 20 20 20 20  eginRow);..     
2da0: 20 20 20 0d 0a 20 20 20 20 20 20 20 20 69 66 20     ..        if 
2db0: 28 21 69 73 43 6f 6d 6d 65 6e 74 53 74 72 69 6e  (!isCommentStrin
2dc0: 67 28 6e 65 77 54 61 69 6c 29 29 20 72 65 74 75  g(newTail)) retu
2dd0: 72 6e 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 20  rn false;..     
2de0: 20 20 20 0d 0a 20 20 20 20 20 20 20 20 6e 65 77     ..        new
2df0: 54 61 69 6c 20 3d 20 6e 65 77 54 61 69 6c 2e 72  Tail = newTail.r
2e00: 65 70 6c 61 63 65 28 2f 5e 5c 73 2a 5c 2f 5c 2f  eplace(/^\s*\/\/
2e10: 2a 5c 2f 5c 73 2a 2f 69 67 2c 20 22 22 29 3b 20  *\/\s*/ig, ""); 
2e20: 0d 0a 20 20 20 20 20 20 20 20 69 66 20 28 73 74  ..        if (st
2e30: 72 2e 6d 61 74 63 68 28 2f 5b 5e 5c 73 5d 24 2f  r.match(/[^\s]$/
2e40: 69 67 29 29 20 6e 65 77 54 61 69 6c 20 3d 20 22  ig)) newTail = "
2e50: 20 22 20 2b 20 6e 65 77 54 61 69 6c 3b 0d 0a 20   " + newTail;.. 
2e60: 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20 20 20         ..       
2e70: 20 77 2e 52 65 70 6c 61 63 65 4c 69 6e 65 28 70   w.ReplaceLine(p
2e80: 6f 73 2e 62 65 67 69 6e 52 6f 77 2c 20 73 74 72  os.beginRow, str
2e90: 20 2b 20 6e 65 77 54 61 69 6c 29 3b 0d 0a 20 20   + newTail);..  
2ea0: 20 20 20 20 20 20 77 2e 44 65 6c 65 74 65 4c 69        w.DeleteLi
2eb0: 6e 65 28 31 20 2b 20 70 6f 73 2e 62 65 67 69 6e  ne(1 + pos.begin
2ec0: 52 6f 77 29 3b 0d 0a 20 20 20 20 20 20 20 20 77  Row);..        w
2ed0: 2e 73 65 74 43 61 72 65 74 50 6f 73 28 70 6f 73  .setCaretPos(pos
2ee0: 2e 62 65 67 69 6e 52 6f 77 2c 20 70 6f 73 2e 62  .beginRow, pos.b
2ef0: 65 67 69 6e 43 6f 6c 29 3b 0d 0a 20 20 20 20 20  eginCol);..     
2f00: 20 20 20 72 65 74 75 72 6e 20 74 72 75 65 3b 0d     return true;.
2f10: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 72 65 74 75  .    }..    retu
2f20: 72 6e 20 66 61 6c 73 65 3b 0d 0a 7d 0d 0a 0d 0a  rn false;..}....
2f30: 66 75 6e 63 74 69 6f 6e 20 6d 61 63 72 6f 73 4f  function macrosO
2f40: 6e 50 72 65 73 73 42 61 63 6b 73 70 61 63 65 49  nPressBackspaceI
2f50: 6e 43 6f 6d 6d 65 6e 74 28 29 7b 0d 0a 20 20 20  nComment(){..   
2f60: 20 76 61 72 20 77 20 3d 20 47 65 74 54 65 78 74   var w = GetText
2f70: 57 69 6e 64 6f 77 28 29 3b 2f 2f 73 6e 65 67 6f  Window();//snego
2f80: 70 61 74 2e 61 63 74 69 76 65 54 65 78 74 57 69  pat.activeTextWi
2f90: 6e 64 6f 77 28 29 3b 0d 0a 20 20 20 20 69 66 20  ndow();..    if 
2fa0: 28 21 77 29 20 72 65 74 75 72 6e 20 66 61 6c 73  (!w) return fals
2fb0: 65 3b 0d 0a 0d 0a 20 20 20 20 69 66 20 28 77 2e  e;....    if (w.
2fc0: 73 65 6c 65 63 74 65 64 54 65 78 74 28 29 20 21  selectedText() !
2fd0: 3d 20 22 22 29 7b 0d 0a 20 20 20 20 20 20 20 20  = ""){..        
2fe0: 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 20 20 20  return false;   
2ff0: 20 2f 2f 2f 20 54 4f 44 4f 3a 20 d0 be d0 b1 d1   /// TODO: .....
3000: 80 d0 b0 d0 b1 d0 be d1 82 d0 b0 d1 82 d1 8c 20  ............... 
3010: d1 8d d1 82 d0 be d1 82 20 d0 b2 d0 b0 d1 80 d0  ........ .......
3020: b8 d0 b0 d0 bd d1 82 2e 0d 0a 20 20 20 20 7d 0d  ..........    }.
3030: 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72 20 70  .    ..    var p
3040: 6f 73 20 3d 20 77 2e 67 65 74 43 61 72 65 74 50  os = w.getCaretP
3050: 6f 73 28 29 3b 0d 0a 20 20 20 20 69 66 20 28 70  os();..    if (p
3060: 6f 73 2e 62 65 67 69 6e 52 6f 77 20 3d 3d 20 31  os.beginRow == 1
3070: 29 20 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 20  ) return false; 
3080: 20 20 20 2f 2f 20 d0 98 20 d1 82 d0 b0 d0 ba 20     // .. ...... 
3090: d1 83 d0 b6 d0 b5 20 d1 81 d1 82 d0 be d0 b8 d0  ...... .........
30a0: bc 20 d0 b2 20 d0 bf d0 b5 d1 80 d0 b2 d0 be d0  . .. ...........
30b0: b9 20 d1 81 d1 82 d1 80 d0 be d0 ba d0 b5 2e 0d  . ..............
30c0: 0a 20 20 20 20 0d 0a 20 20 20 20 2f 2f 20 d0 9e  .    ..    // ..
30d0: d0 b1 d1 80 d0 b0 d0 b1 d0 b0 d1 82 d1 8b d0 b2  ................
30e0: d0 b0 d0 b5 d0 bc 20 d1 82 d0 be d0 bb d1 8c d0  ...... .........
30f0: ba d0 be 20 d0 b5 d1 81 d0 bb d0 b8 20 d1 81 d1  ... ........ ...
3100: 82 d0 be d0 b8 d0 bc 20 20 d0 b2 20 d1 81 d0 b0  .......  .. ....
3110: d0 bc d0 be d0 bc 20 d0 bd d0 b0 d1 87 d0 b0 d0  ...... .........
3120: bb d0 b5 20 d1 81 d1 82 d1 80 d0 be d0 ba d0 b8  ... ............
3130: 20 d0 b8 20 0d 0a 20 20 20 20 2f 2f 20 d0 b5 d1   .. ..    // ...
3140: 81 d0 bb d0 b8 20 d1 8d d1 82 d0 b0 20 d0 b8 20  ..... ...... .. 
3150: d0 bf d1 80 d0 b5 d0 b4 d1 8b d0 b4 d1 83 d1 89  ................
3160: d0 b0 d1 8f 20 d1 81 d1 82 d1 80 d0 be d0 ba d0  .... ...........
3170: b8 20 d1 8f d0 b2 d0 bb d1 8f d1 8e d1 82 d1 81  . ..............
3180: d1 8f 20 d0 ba d0 be d0 bc d0 bc d0 b5 d0 bd d1  .. .............
3190: 82 d0 b0 d1 80 d0 b8 d1 8f d0 bc d0 b8 2e 0d 0a  ................
31a0: 20 20 20 20 69 66 20 28 70 6f 73 2e 62 65 67 69      if (pos.begi
31b0: 6e 43 6f 6c 20 3e 20 31 29 20 72 65 74 75 72 6e  nCol > 1) return
31c0: 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20   false;..    .. 
31d0: 20 20 20 76 61 72 20 73 74 72 20 3d 20 77 2e 6c     var str = w.l
31e0: 69 6e 65 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77  ine(pos.beginRow
31f0: 29 3b 0d 0a 20 20 20 20 69 66 20 28 21 69 73 43  );..    if (!isC
3200: 6f 6d 6d 65 6e 74 53 74 72 69 6e 67 28 73 74 72  ommentString(str
3210: 29 29 20 72 65 74 75 72 6e 20 66 61 6c 73 65 3b  )) return false;
3220: 0d 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72 20  ..    ..    var 
3230: 70 72 65 76 53 74 72 20 3d 20 77 2e 6c 69 6e 65  prevStr = w.line
3240: 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77 20 2d 20  (pos.beginRow - 
3250: 31 29 3b 0d 0a 20 20 20 20 69 66 20 28 21 69 73  1);..    if (!is
3260: 43 6f 6d 6d 65 6e 74 53 74 72 69 6e 67 28 70 72  CommentString(pr
3270: 65 76 53 74 72 29 29 20 72 65 74 75 72 6e 20 66  evStr)) return f
3280: 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20 20 20  alse;..    ..   
3290: 20 2f 2f 20 d0 9a d1 83 d1 80 d1 81 d0 be d1 80   // ............
32a0: 20 d1 81 d1 82 d0 be d0 b8 d1 82 20 d0 b2 20 d1   .......... .. .
32b0: 81 d0 b0 d0 bc d0 be d0 bc 20 d0 bd d0 b0 d1 87  ......... ......
32c0: d0 b0 d0 bb d0 b5 20 d1 81 d1 82 d1 80 d0 be d0  ...... .........
32d0: ba d0 b8 20 d0 b8 20 d0 bf d1 80 d0 b8 20 d0 bd  ... .. ...... ..
32e0: d0 b0 d0 b6 d0 b0 d1 82 d0 b8 d0 b8 20 0d 0a 20  ............ .. 
32f0: 20 20 20 2f 2f 20 42 61 63 6b 73 70 61 63 65 20     // Backspace 
3300: d1 82 d0 b5 d0 ba d1 83 d1 89 d0 b0 d1 8f 20 d1  .............. .
3310: 81 d1 82 d1 80 d0 be d0 ba d0 b0 20 d0 b4 d0 be  ........... ....
3320: d0 bb d0 b6 d0 bd d0 b0 20 d0 bf d1 80 d0 b8 d0  ........ .......
3330: ba d0 bb d0 b5 d0 b8 d1 82 d1 8c d1 81 d1 8f 20  ............... 
3340: d0 b2 20 d0 ba d0 be d0 bd d0 b5 d1 86 20 d0 bf  .. .......... ..
3350: d1 80 d0 b5 d0 b4 d1 8b d0 b4 d1 83 d1 89 d0 b5  ................
3360: d0 b9 2e 0d 0a 20 20 20 20 76 61 72 20 6e 65 77  .....    var new
3370: 54 61 69 6c 20 3d 20 73 74 72 2e 72 65 70 6c 61  Tail = str.repla
3380: 63 65 28 2f 5e 5c 73 2a 5c 2f 5c 2f 2a 5c 2f 5c  ce(/^\s*\/\/*\/\
3390: 73 2a 2f 69 67 2c 20 22 22 29 3b 20 0d 0a 20 20  s*/ig, ""); ..  
33a0: 20 20 69 66 20 28 70 72 65 76 53 74 72 2e 6d 61    if (prevStr.ma
33b0: 74 63 68 28 2f 5b 5e 5c 73 5d 24 2f 69 67 29 29  tch(/[^\s]$/ig))
33c0: 20 6e 65 77 54 61 69 6c 20 3d 20 22 20 22 20 2b   newTail = " " +
33d0: 20 6e 65 77 54 61 69 6c 3b 0d 0a 20 20 20 20 0d   newTail;..    .
33e0: 0a 20 20 20 20 77 2e 73 65 74 53 65 6c 65 63 74  .    w.setSelect
33f0: 69 6f 6e 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77  ion(pos.beginRow
3400: 20 2d 20 31 2c 20 31 2c 20 70 6f 73 2e 62 65 67   - 1, 1, pos.beg
3410: 69 6e 52 6f 77 2c 20 0d 0a 20 20 20 20 20 20 20  inRow, ..       
3420: 20 77 2e 6c 69 6e 65 28 70 6f 73 2e 62 65 67 69   w.line(pos.begi
3430: 6e 52 6f 77 29 2e 6c 65 6e 67 74 68 20 2b 20 31  nRow).length + 1
3440: 29 3b 0d 0a 20 20 20 20 77 2e 53 65 74 53 65 6c  );..    w.SetSel
3450: 65 63 74 65 64 54 65 78 74 28 70 72 65 76 53 74  ectedText(prevSt
3460: 72 20 2b 20 6e 65 77 54 61 69 6c 29 3b 0d 0a 20  r + newTail);.. 
3470: 20 20 20 0d 0a 20 20 20 20 77 2e 73 65 74 43 61     ..    w.setCa
3480: 72 65 74 50 6f 73 28 70 6f 73 2e 62 65 67 69 6e  retPos(pos.begin
3490: 52 6f 77 20 2d 20 31 2c 20 31 20 2b 20 70 72 65  Row - 1, 1 + pre
34a0: 76 53 74 72 2e 6c 65 6e 67 74 68 29 3b 0d 0a 20  vStr.length);.. 
34b0: 20 20 20 0d 0a 20 20 20 20 72 65 74 75 72 6e 20     ..    return 
34c0: 74 72 75 65 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63  true;..}....func
34d0: 74 69 6f 6e 20 69 73 43 6f 6d 6d 65 6e 74 53 74  tion isCommentSt
34e0: 72 69 6e 67 28 73 74 72 29 7b 0d 0a 20 20 20 20  ring(str){..    
34f0: 72 65 74 75 72 6e 20 6e 75 6c 6c 20 21 3d 20 73  return null != s
3500: 74 72 2e 6d 61 74 63 68 28 2f 5e 5c 73 2a 5c 2f  tr.match(/^\s*\/
3510: 5c 2f 2f 69 67 29 3b 0d 0a 7d 0d 0a 0d 0a 66 75  \//ig);..}....fu
3520: 6e 63 74 69 6f 6e 20 67 65 74 54 65 78 74 42 6c  nction getTextBl
3530: 6f 63 6b 4f 66 66 73 65 74 28 73 74 72 29 7b 0d  ockOffset(str){.
3540: 0a 20 20 20 20 76 61 72 20 6d 61 74 63 68 20 3d  .    var match =
3550: 20 73 74 72 2e 6d 61 74 63 68 28 2f 5e 28 5b 5c   str.match(/^([\
3560: 73 5d 2b 29 2f 69 67 29 3b 0d 0a 20 20 20 20 76  s]+)/ig);..    v
3570: 61 72 20 72 65 73 20 3d 20 21 6d 61 74 63 68 20  ar res = !match 
3580: 3f 20 22 22 20 3a 20 6d 61 74 63 68 5b 30 5d 3b  ? "" : match[0];
3590: 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 72 65 73  ..    return res
35a0: 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e  ;..}....function
35b0: 20 67 65 74 43 6f 6d 6d 65 6e 74 53 74 72 69 6e   getCommentStrin
35c0: 67 48 65 61 64 65 72 28 73 74 72 29 7b 0d 0a 20  gHeader(str){.. 
35d0: 20 20 20 76 61 72 20 6d 61 74 63 68 20 3d 20 73     var match = s
35e0: 74 72 2e 6d 61 74 63 68 28 2f 5e 28 5b 5c 73 5d  tr.match(/^([\s]
35f0: 2a 5c 2f 5c 2f 2a 5c 2f 5b 5c 73 5d 3f 29 2a 2f  *\/\/*\/[\s]?)*/
3600: 69 67 29 3b 0d 0a 20 20 20 20 76 61 72 20 72 65  ig);..    var re
3610: 73 20 3d 20 21 6d 61 74 63 68 20 3f 20 22 22 20  s = !match ? "" 
3620: 3a 20 6d 61 74 63 68 5b 30 5d 3b 0d 0a 20 20 20  : match[0];..   
3630: 20 72 65 74 75 72 6e 20 72 65 73 3b 0d 0a 7d 0d   return res;..}.
3640: 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 70 72 6f 63  ...function proc
3650: 65 73 73 53 65 6c 65 63 74 65 64 54 65 78 74 28  essSelectedText(
3660: 73 65 6c 54 65 78 74 48 61 6e 64 6c 65 72 2c 20  selTextHandler, 
3670: 64 6f 4e 6f 74 52 65 73 74 6f 72 65 53 65 6c 65  doNotRestoreSele
3680: 63 74 69 6f 6e 29 20 7b 0d 0a 20 20 20 20 0d 0a  ction) {..    ..
3690: 20 20 20 20 76 61 72 20 77 20 3d 20 47 65 74 54      var w = GetT
36a0: 65 78 74 57 69 6e 64 6f 77 28 29 3b 20 0d 0a 20  extWindow(); .. 
36b0: 20 20 20 69 66 20 28 21 77 29 20 72 65 74 75 72     if (!w) retur
36c0: 6e 20 66 61 6c 73 65 3b 20 20 20 20 0d 0a 20 20  n false;    ..  
36d0: 20 20 0d 0a 20 20 20 20 76 61 72 20 73 65 6c 20    ..    var sel 
36e0: 3d 20 77 2e 47 65 74 53 65 6c 65 63 74 69 6f 6e  = w.GetSelection
36f0: 28 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 0d  ();            .
3700: 0a 20 20 20 20 76 61 72 20 73 65 6c 54 65 78 74  .    var selText
3710: 20 3d 20 77 2e 47 65 74 53 65 6c 65 63 74 65 64   = w.GetSelected
3720: 54 65 78 74 28 29 3b 0d 0a 20 20 20 20 0d 0a 20  Text();..    .. 
3730: 20 20 20 74 72 79 20 0d 0a 20 20 20 20 7b 0d 0a     try ..    {..
3740: 20 20 20 20 20 20 20 20 73 65 6c 54 65 78 74 20          selText 
3750: 3d 20 73 65 6c 54 65 78 74 48 61 6e 64 6c 65 72  = selTextHandler
3760: 2e 63 61 6c 6c 28 6e 75 6c 6c 2c 20 73 65 6c 54  .call(null, selT
3770: 65 78 74 29 3b 0d 0a 20 20 20 20 7d 0d 0a 20 20  ext);..    }..  
3780: 20 20 63 61 74 63 68 20 28 65 29 0d 0a 20 20 20    catch (e)..   
3790: 20 7b 0d 0a 20 20 20 20 20 20 20 4d 65 73 73 61   {..       Messa
37a0: 67 65 28 65 2e 64 65 73 63 72 69 70 74 69 6f 6e  ge(e.description
37b0: 29 3b 0d 0a 20 20 20 20 20 20 20 72 65 74 75 72  );..       retur
37c0: 6e 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 7d 20  n false;..    } 
37d0: 20 20 20 20 20 20 20 0d 0a 20 20 20 20 0d 0a 20         ..    .. 
37e0: 20 20 20 77 2e 53 65 74 53 65 6c 65 63 74 65 64     w.SetSelected
37f0: 54 65 78 74 28 73 65 6c 54 65 78 74 29 3b 0d 0a  Text(selText);..
3800: 20 20 20 20 0d 0a 20 20 20 20 2f 2f 20 d0 92 d0      ..    // ...
3810: be d1 81 d1 81 d1 82 d0 b0 d0 bd d0 be d0 b2 d0  ................
3820: b8 d0 bc 20 d0 b8 d1 81 d1 85 d0 be d0 b4 d0 bd  ... ............
3830: d0 be d0 b5 20 d0 b2 d1 8b d0 b4 d0 b5 d0 bb d0  .... ...........
3840: b5 d0 bd d0 b8 d0 b5 2e 0d 0a 20 20 20 20 69 66  ..........    if
3850: 20 28 21 64 6f 4e 6f 74 52 65 73 74 6f 72 65 53   (!doNotRestoreS
3860: 65 6c 65 63 74 69 6f 6e 29 0d 0a 20 20 20 20 20  election)..     
3870: 20 20 20 77 2e 53 65 74 53 65 6c 65 63 74 69 6f     w.SetSelectio
3880: 6e 28 73 65 6c 2e 62 65 67 69 6e 52 6f 77 2c 20  n(sel.beginRow, 
3890: 73 65 6c 2e 62 65 67 69 6e 43 6f 6c 2c 20 73 65  sel.beginCol, se
38a0: 6c 2e 65 6e 64 52 6f 77 2c 20 73 65 6c 2e 65 6e  l.endRow, sel.en
38b0: 64 43 6f 6c 29 3b 0d 0a 20 20 20 20 72 65 74 75  dCol);..    retu
38c0: 72 6e 20 74 72 75 65 3b 0d 0a 7d 0d 0a 0d 0a 53  rn true;..}....S
38d0: 65 6c 66 53 63 72 69 70 74 2e 53 65 6c 66 5b 27  elfScript.Self['
38e0: 6d 61 63 72 6f 73 d0 a3 d1 81 d1 82 d0 b0 d0 bd  macros..........
38f0: d0 be d0 b2 d0 b8 d1 82 d1 8c 20 d1 81 d0 b8 d0  .......... .....
3900: bc d0 b2 d0 be d0 bb 20 7c 20 d0 b2 20 d1 81 d1  ....... | .. ...
3910: 82 d1 80 d0 be d0 ba d0 b5 2f d0 b2 d1 8b d0 b4  ........./......
3920: d0 b5 d0 bb d0 b5 d0 bd d0 b8 d0 b8 27 5d 20 3d  ............'] =
3930: 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b 0d 0a 20   function() {.. 
3940: 20 20 0d 0a 20 20 20 20 76 61 72 20 77 20 3d 20    ..    var w = 
3950: 47 65 74 54 65 78 74 57 69 6e 64 6f 77 28 29 3b  GetTextWindow();
3960: 20 2f 2f d0 9f d0 be d0 bb d1 83 d1 87 d0 b8 d0   //.............
3970: bc 20 d0 b0 d0 ba d1 82 d0 b8 d0 b2 d0 bd d0 be  . ..............
3980: d0 b5 20 d1 82 d0 b5 d0 ba d1 81 d1 82 d0 be d0  .. .............
3990: b2 d0 be d0 b5 20 d0 be d0 ba d0 bd d0 be 0d 0a  ..... ..........
39a0: 20 20 20 20 69 66 20 28 21 77 29 20 72 65 74 75      if (!w) retu
39b0: 72 6e 20 66 61 6c 73 65 3b 20 20 20 0d 0a 20 20  rn false;   ..  
39c0: 20 0d 0a 20 20 20 20 2f 2f 20 d0 9f d1 80 d0 be   ..    // ......
39d0: d0 b2 d0 b5 d1 80 d0 b5 d0 bc 20 d0 b5 d1 81 d1  .......... .....
39e0: 82 d1 8c 20 d0 bb d0 b8 20 d0 b2 d1 8b d0 b4 d0  ... .... .......
39f0: b5 d0 bb d0 b5 d0 bd d0 bd d1 8b d0 b9 20 d1 82  ............. ..
3a00: d0 b5 d0 ba d1 81 2c 20 d0 b5 d1 81 d0 bb d0 b8  ......, ........
3a10: 20 d0 bd d0 b5 d1 82 2c 20 d1 82 d0 be 20 d0 b2   ......, .... ..
3a20: d1 8b d0 b4 d0 b5 d0 bb d0 b8 d0 bc 20 d1 82 d0  ............ ...
3a30: b5 d0 ba d1 83 d1 89 d1 83 d1 8e 20 d1 81 d1 82  ........... ....
3a40: d1 80 d0 be d0 ba d1 83 20 2c 20 d0 b2 20 d1 80  ........ , .. ..
3a50: d0 b5 d0 b7 d1 83 d0 bb d1 8c d1 82 d0 b0 d1 82  ................
3a60: d0 b5 20 d0 be d0 b1 d1 80 d0 b0 d0 b1 d0 be d1  .. .............
3a70: 82 d0 b0 d0 b5 d0 bc 20 d0 b2 d1 8b d0 b4 d0 b5  ....... ........
3a80: d0 bb d0 b5 d0 bd d0 bd d1 8b d0 b9 20 d1 82 d0  ............ ...
3a90: b5 d0 ba d1 81 d1 82 20 d0 b8 20 d0 b2 d0 b5 d1  ....... .. .....
3aa0: 80 d0 bd d0 b5 d0 bc 20 d0 bd d0 b0 20 d0 bc d0  ....... .... ...
3ab0: b5 d1 81 d1 82 d0 be 2e 0d 0a 20 20 20 20 76 61  ..........    va
3ac0: 72 20 73 65 6c 54 65 78 74 20 3d 20 77 2e 47 65  r selText = w.Ge
3ad0: 74 53 65 6c 65 63 74 65 64 54 65 78 74 28 29 3b  tSelectedText();
3ae0: 0d 0a 20 20 20 20 69 66 20 28 73 65 6c 54 65 78  ..    if (selTex
3af0: 74 2e 6c 65 6e 67 74 68 3d 3d 30 29 20 7b 0d 0a  t.length==0) {..
3b00: 20 20 20 20 20 20 20 20 76 61 72 20 70 6f 73 20          var pos 
3b10: 3d 20 77 2e 67 65 74 43 61 72 65 74 50 6f 73 28  = w.getCaretPos(
3b20: 29 3b 0d 0a 20 20 20 20 20 20 20 20 77 2e 73 65  );..        w.se
3b30: 74 53 65 6c 65 63 74 69 6f 6e 28 70 6f 73 2e 62  tSelection(pos.b
3b40: 65 67 69 6e 52 6f 77 2c 20 31 2c 20 70 6f 73 2e  eginRow, 1, pos.
3b50: 62 65 67 69 6e 52 6f 77 2c 20 31 20 2b 20 77 2e  beginRow, 1 + w.
3b60: 6c 69 6e 65 28 70 6f 73 2e 62 65 67 69 6e 52 6f  line(pos.beginRo
3b70: 77 29 2e 6c 65 6e 67 74 68 29 3b 0d 0a 20 20 20  w).length);..   
3b80: 20 20 20 20 20 76 61 72 20 74 65 78 74 20 3d 20       var text = 
3b90: 77 2e 47 65 74 53 65 6c 65 63 74 65 64 54 65 78  w.GetSelectedTex
3ba0: 74 28 29 3b 0d 0a 20 20 20 20 7d 20 65 6c 73 65  t();..    } else
3bb0: 20 7b 0d 0a 20 20 20 20 20 20 20 20 76 61 72 20   {..        var 
3bc0: 74 65 78 74 20 3d 20 73 65 6c 54 65 78 74 3b 0d  text = selText;.
3bd0: 0a 20 20 20 20 7d 0d 0a 20 20 20 20 77 2e 53 65  .    }..    w.Se
3be0: 74 53 65 6c 65 63 74 65 64 54 65 78 74 28 73 65  tSelectedText(se
3bf0: 74 53 79 6d 62 6f 6c 49 6e 42 65 67 69 6e 6e 4c  tSymbolInBeginnL
3c00: 69 6e 65 28 74 65 78 74 2c 20 22 7c 20 22 29 29  ine(text, "| "))
3c10: 3b 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 74 72  ;..    return tr
3c20: 75 65 3b 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69  ue;..}....functi
3c30: 6f 6e 20 73 65 74 53 79 6d 62 6f 6c 49 6e 42 65  on setSymbolInBe
3c40: 67 69 6e 6e 4c 69 6e 65 28 74 65 78 74 2c 20 73  ginnLine(text, s
3c50: 79 6d 62 6f 6c 29 7b 0d 0a 20 20 20 20 76 61 72  ymbol){..    var
3c60: 20 72 65 73 75 6c 74 20 3d 20 22 22 3b 0d 0a 20   result = "";.. 
3c70: 20 20 20 76 61 72 20 4c 69 6e 65 73 20 3d 20 74     var Lines = t
3c80: 65 78 74 2e 73 70 6c 69 74 28 27 5c 6e 27 29 3b  ext.split('\n');
3c90: 0d 0a 20 20 20 20 69 66 20 28 4c 69 6e 65 73 2e  ..    if (Lines.
3ca0: 6c 65 6e 67 74 68 20 3d 3d 20 30 20 26 26 20 73  length == 0 && s
3cb0: 74 72 2e 69 6e 64 65 78 4f 66 28 73 79 6d 62 6f  tr.indexOf(symbo
3cc0: 6c 29 20 3d 3d 20 2d 31 29 7b 0d 0a 20 20 20 20  l) == -1){..    
3cd0: 20 20 20 20 72 65 73 75 6c 74 20 3d 20 72 65 73      result = res
3ce0: 75 6c 74 2b 74 65 78 74 2e 72 65 70 6c 61 63 65  ult+text.replace
3cf0: 28 2f 5e 5c 73 2a 2f 2c 20 22 24 26 22 2b 22 22  (/^\s*/, "$&"+""
3d00: 2b 73 79 6d 62 6f 6c 2b 22 22 29 3b 0d 0a 20 20  +symbol+"");..  
3d10: 20 20 7d 0d 0a 20 20 20 20 66 6f 72 20 28 76 61    }..    for (va
3d20: 72 20 69 3d 30 3b 20 69 3c 4c 69 6e 65 73 2e 6c  r i=0; i<Lines.l
3d30: 65 6e 67 74 68 3b 20 69 2b 2b 29 7b 0d 0a 20 20  ength; i++){..  
3d40: 20 20 20 20 20 20 76 61 72 20 73 74 72 20 3d 20        var str = 
3d50: 4c 69 6e 65 73 5b 69 5d 3b 0d 0a 20 20 20 20 20  Lines[i];..     
3d60: 20 20 20 69 66 20 28 73 74 72 2e 69 6e 64 65 78     if (str.index
3d70: 4f 66 28 73 79 6d 62 6f 6c 29 20 3d 3d 20 2d 31  Of(symbol) == -1
3d80: 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 73  )..            s
3d90: 74 72 20 3d 20 73 74 72 2e 72 65 70 6c 61 63 65  tr = str.replace
3da0: 28 2f 5e 5c 73 2a 2f 2c 20 22 24 26 22 2b 22 22  (/^\s*/, "$&"+""
3db0: 2b 73 79 6d 62 6f 6c 2b 22 22 29 3b 0d 0a 20 20  +symbol+"");..  
3dc0: 20 20 20 20 20 20 20 20 20 0d 0a 20 20 20 20 20           ..     
3dd0: 20 20 20 72 65 73 75 6c 74 20 3d 20 72 65 73 75     result = resu
3de0: 6c 74 2b 73 74 72 2b 28 28 28 4c 69 6e 65 73 2e  lt+str+(((Lines.
3df0: 6c 65 6e 67 74 68 2d 31 29 3d 3d 69 29 3f 22 22  length-1)==i)?""
3e00: 3a 22 5c 6e 22 29 3b 0d 0a 20 20 20 20 7d 0d 0a  :"\n");..    }..
3e10: 20 20 20 20 72 65 74 75 72 6e 20 72 65 73 75 6c      return resul
3e20: 74 0d 0a 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e  t..}....function
3e30: 20 6d 61 63 72 6f 73 4f 6e 50 72 65 73 73 42 61   macrosOnPressBa
3e40: 63 6b 73 70 61 63 65 49 6e 42 72 61 63 6b 65 74  ckspaceInBracket
3e50: 28 29 7b 0d 0a 20 20 20 20 76 61 72 20 77 20 3d  (){..    var w =
3e60: 20 47 65 74 54 65 78 74 57 69 6e 64 6f 77 28 29   GetTextWindow()
3e70: 3b 2f 2f 73 6e 65 67 6f 70 61 74 2e 61 63 74 69  ;//snegopat.acti
3e80: 76 65 54 65 78 74 57 69 6e 64 6f 77 28 29 3b 0d  veTextWindow();.
3e90: 0a 20 20 20 20 69 66 20 28 21 77 29 20 72 65 74  .    if (!w) ret
3ea0: 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 0d 0a 20 20  urn false;....  
3eb0: 20 20 69 66 20 28 77 2e 73 65 6c 65 63 74 65 64    if (w.selected
3ec0: 54 65 78 74 28 29 20 21 3d 20 22 22 29 7b 0d 0a  Text() != ""){..
3ed0: 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 66          return f
3ee0: 61 6c 73 65 3b 20 20 20 20 2f 2f 2f 20 54 4f 44  alse;    /// TOD
3ef0: 4f 3a 20 d0 be d0 b1 d1 80 d0 b0 d0 b1 d0 be d1  O: .............
3f00: 82 d0 b0 d1 82 d1 8c 20 d1 8d d1 82 d0 be d1 82  ....... ........
3f10: 20 d0 b2 d0 b0 d1 80 d0 b8 d0 b0 d0 bd d1 82 2e   ...............
3f20: 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 0d 0a 20  ..    }..    .. 
3f30: 20 20 20 76 61 72 20 70 6f 73 20 3d 20 77 2e 67     var pos = w.g
3f40: 65 74 43 61 72 65 74 50 6f 73 28 29 3b 0d 0a 20  etCaretPos();.. 
3f50: 20 20 20 0d 0a 20 20 20 20 76 61 72 20 62 65 67     ..    var beg
3f60: 69 6e 52 6f 77 20 3d 20 70 6f 73 2e 62 65 67 69  inRow = pos.begi
3f70: 6e 52 6f 77 3b 0d 0a 20 20 20 20 76 61 72 20 77  nRow;..    var w
3f80: 6f 72 64 42 65 67 50 6f 73 20 3d 20 70 6f 73 2e  ordBegPos = pos.
3f90: 62 65 67 69 6e 43 6f 6c 20 2d 20 31 3b 0d 0a 20  beginCol - 1;.. 
3fa0: 20 20 20 76 61 72 20 6c 69 6e 65 20 3d 20 77 2e     var line = w.
3fb0: 47 65 74 4c 69 6e 65 28 70 6f 73 2e 62 65 67 69  GetLine(pos.begi
3fc0: 6e 52 6f 77 29 3b 0d 0a 20 20 20 20 76 61 72 20  nRow);..    var 
3fd0: 63 75 72 43 68 61 72 20 3d 20 6c 69 6e 65 2e 63  curChar = line.c
3fe0: 68 61 72 41 74 28 77 6f 72 64 42 65 67 50 6f 73  harAt(wordBegPos
3ff0: 29 3b 0d 0a 20 20 20 20 69 66 20 28 77 6f 72 64  );..    if (word
4000: 42 65 67 50 6f 73 3e 30 29 20 7b 0d 0a 20 20 20  BegPos>0) {..   
4010: 20 20 20 20 20 76 61 72 20 77 6f 72 64 42 61 63       var wordBac
4020: 6b 73 70 20 3d 20 77 6f 72 64 42 65 67 50 6f 73  ksp = wordBegPos
4030: 2d 31 3b 0d 0a 20 20 20 20 20 20 20 20 69 66 20  -1;..        if 
4040: 28 63 75 72 43 68 61 72 3d 3d 22 29 22 20 26 26  (curChar==")" &&
4050: 20 6c 69 6e 65 2e 63 68 61 72 41 74 28 77 6f 72   line.charAt(wor
4060: 64 42 61 63 6b 73 70 29 3d 3d 22 28 22 29 20 7b  dBacksp)=="(") {
4070: 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f  ..            //
4080: 64 65 62 75 67 67 65 72 3b 0d 0a 20 20 20 20 20  debugger;..     
4090: 20 20 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65         w.SetSele
40a0: 63 74 69 6f 6e 28 70 6f 73 2e 62 65 67 69 6e 52  ction(pos.beginR
40b0: 6f 77 2c 20 77 6f 72 64 42 61 63 6b 73 70 2b 31  ow, wordBacksp+1
40c0: 2c 20 70 6f 73 2e 62 65 67 69 6e 52 6f 77 2c 20  , pos.beginRow, 
40d0: 77 6f 72 64 42 65 67 50 6f 73 2b 32 29 3b 0d 0a  wordBegPos+2);..
40e0: 20 20 20 20 20 20 20 20 20 20 20 20 77 2e 53 65              w.Se
40f0: 74 53 65 6c 65 63 74 65 64 54 65 78 74 28 22 22  tSelectedText(""
4100: 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20  );..            
4110: 77 2e 73 65 74 43 61 72 65 74 50 6f 73 28 70 6f  w.setCaretPos(po
4120: 73 2e 62 65 67 69 6e 52 6f 77 2c 20 28 6c 69 6e  s.beginRow, (lin
4130: 65 2e 63 68 61 72 41 74 28 77 6f 72 64 42 65 67  e.charAt(wordBeg
4140: 50 6f 73 2b 31 29 3d 3d 22 3b 22 29 3f 77 6f 72  Pos+1)==";")?wor
4150: 64 42 65 67 50 6f 73 2b 31 3a 77 6f 72 64 42 61  dBegPos+1:wordBa
4160: 63 6b 73 70 2b 31 29 3b 0d 0a 20 20 20 20 20 20  cksp+1);..      
4170: 20 20 20 20 20 20 72 65 74 75 72 6e 20 74 72 75        return tru
4180: 65 3b 0d 0a 20 20 20 20 20 20 20 20 7d 20 65 6c  e;..        } el
4190: 73 65 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 20  se {..          
41a0: 20 20 69 66 20 28 77 6f 72 64 42 61 63 6b 73 70    if (wordBacksp
41b0: 3e 30 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20  >0 ..           
41c0: 20 20 20 20 20 26 26 20 6c 69 6e 65 2e 63 68 61       && line.cha
41d0: 72 41 74 28 77 6f 72 64 42 61 63 6b 73 70 29 3d  rAt(wordBacksp)=
41e0: 3d 22 29 22 20 0d 0a 20 20 20 20 20 20 20 20 20  =")" ..         
41f0: 20 20 20 20 20 20 20 26 26 20 6c 69 6e 65 2e 63         && line.c
4200: 68 61 72 41 74 28 77 6f 72 64 42 61 63 6b 73 70  harAt(wordBacksp
4210: 2d 31 29 3d 3d 22 28 22 29 7b 0d 0a 20 20 20 20  -1)=="("){..    
4220: 20 20 20 20 20 20 20 20 20 20 20 20 77 2e 53 65              w.Se
4230: 74 53 65 6c 65 63 74 69 6f 6e 28 70 6f 73 2e 62  tSelection(pos.b
4240: 65 67 69 6e 52 6f 77 2c 20 77 6f 72 64 42 61 63  eginRow, wordBac
4250: 6b 73 70 2c 20 70 6f 73 2e 62 65 67 69 6e 52 6f  ksp, pos.beginRo
4260: 77 2c 20 77 6f 72 64 42 65 67 50 6f 73 2b 31 29  w, wordBegPos+1)
4270: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  ;..             
4280: 20 20 20 77 2e 53 65 74 53 65 6c 65 63 74 65 64     w.SetSelected
4290: 54 65 78 74 28 22 22 29 3b 0d 0a 20 20 20 20 20  Text("");..     
42a0: 20 20 20 20 20 20 20 20 20 20 20 77 2e 73 65 74             w.set
42b0: 43 61 72 65 74 50 6f 73 28 70 6f 73 2e 62 65 67  CaretPos(pos.beg
42c0: 69 6e 52 6f 77 2c 20 28 6c 69 6e 65 2e 63 68 61  inRow, (line.cha
42d0: 72 41 74 28 77 6f 72 64 42 61 63 6b 73 70 2b 31  rAt(wordBacksp+1
42e0: 29 3d 3d 22 3b 22 29 3f 77 6f 72 64 42 61 63 6b  )==";")?wordBack
42f0: 73 70 2b 31 3a 77 6f 72 64 42 61 63 6b 73 70 29  sp+1:wordBacksp)
4300: 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  ;..             
4310: 20 20 20 72 65 74 75 72 6e 20 74 72 75 65 3b 0d     return true;.
4320: 0a 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a  .            }..
4330: 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 20 20 7d          }..    }
4340: 0d 0a 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 66  ....    return f
4350: 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 7d 0d 0a  alse;..    ..}..
4360: 66 75 6e 63 74 69 6f 6e 20 6d 61 63 72 6f 73 4f  function macrosO
4370: 6e 50 72 65 73 73 44 65 6c 49 6e 42 72 61 63 6b  nPressDelInBrack
4380: 65 74 28 29 7b 0d 0a 20 20 20 20 76 61 72 20 77  et(){..    var w
4390: 20 3d 20 47 65 74 54 65 78 74 57 69 6e 64 6f 77   = GetTextWindow
43a0: 28 29 3b 2f 2f 73 6e 65 67 6f 70 61 74 2e 61 63  ();//snegopat.ac
43b0: 74 69 76 65 54 65 78 74 57 69 6e 64 6f 77 28 29  tiveTextWindow()
43c0: 3b 0d 0a 20 20 20 20 69 66 20 28 21 77 29 20 72  ;..    if (!w) r
43d0: 65 74 75 72 6e 20 66 61 6c 73 65 3b 0d 0a 0d 0a  eturn false;....
43e0: 20 20 20 20 69 66 20 28 77 2e 73 65 6c 65 63 74      if (w.select
43f0: 65 64 54 65 78 74 28 29 20 21 3d 20 22 22 29 7b  edText() != ""){
4400: 0d 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  ..        return
4410: 20 66 61 6c 73 65 3b 20 20 20 20 2f 2f 2f 20 54   false;    /// T
4420: 4f 44 4f 3a 20 d0 be d0 b1 d1 80 d0 b0 d0 b1 d0  ODO: ...........
4430: be d1 82 d0 b0 d1 82 d1 8c 20 d1 8d d1 82 d0 be  ......... ......
4440: d1 82 20 d0 b2 d0 b0 d1 80 d0 b8 d0 b0 d0 bd d1  .. .............
4450: 82 2e 0d 0a 20 20 20 20 7d 0d 0a 20 20 20 20 0d  ....    }..    .
4460: 0a 20 20 20 20 76 61 72 20 70 6f 73 20 3d 20 77  .    var pos = w
4470: 2e 67 65 74 43 61 72 65 74 50 6f 73 28 29 3b 0d  .getCaretPos();.
4480: 0a 20 20 20 20 0d 0a 20 20 20 20 76 61 72 20 62  .    ..    var b
4490: 65 67 69 6e 52 6f 77 20 3d 20 70 6f 73 2e 62 65  eginRow = pos.be
44a0: 67 69 6e 52 6f 77 3b 0d 0a 20 20 20 20 76 61 72  ginRow;..    var
44b0: 20 77 6f 72 64 42 65 67 50 6f 73 20 3d 20 70 6f   wordBegPos = po
44c0: 73 2e 62 65 67 69 6e 43 6f 6c 20 2d 20 31 3b 0d  s.beginCol - 1;.
44d0: 0a 20 20 20 20 76 61 72 20 77 6f 72 64 41 66 74  .    var wordAft
44e0: 65 72 50 6f 73 20 3d 20 70 6f 73 2e 62 65 67 69  erPos = pos.begi
44f0: 6e 43 6f 6c 3b 0d 0a 20 20 20 20 76 61 72 20 6c  nCol;..    var l
4500: 69 6e 65 20 3d 20 77 2e 47 65 74 4c 69 6e 65 28  ine = w.GetLine(
4510: 70 6f 73 2e 62 65 67 69 6e 52 6f 77 29 3b 0d 0a  pos.beginRow);..
4520: 20 20 20 20 69 66 20 28 6c 69 6e 65 2e 6c 65 6e      if (line.len
4530: 67 74 68 20 3c 20 77 6f 72 64 41 66 74 65 72 50  gth < wordAfterP
4540: 6f 73 20 7c 7c 20 77 6f 72 64 42 65 67 50 6f 73  os || wordBegPos
4550: 2d 31 20 3c 20 30 29 20 72 65 74 75 72 6e 20 66  -1 < 0) return f
4560: 61 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 20 20 20  alse;..    ..   
4570: 20 0d 0a 20 20 20 20 76 61 72 20 63 75 72 43 68   ..    var curCh
4580: 61 72 20 3d 20 6c 69 6e 65 2e 63 68 61 72 41 74  ar = line.charAt
4590: 28 77 6f 72 64 42 65 67 50 6f 73 29 3b 20 0d 0a  (wordBegPos); ..
45a0: 20 20 20 20 69 66 20 28 63 75 72 43 68 61 72 20      if (curChar 
45b0: 3d 3d 20 22 29 22 20 26 26 20 6c 69 6e 65 2e 63  == ")" && line.c
45c0: 68 61 72 41 74 28 77 6f 72 64 42 65 67 50 6f 73  harAt(wordBegPos
45d0: 2d 31 29 3d 3d 22 28 22 29 20 20 7b 0d 0a 20 20  -1)=="(")  {..  
45e0: 20 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65 63        w.SetSelec
45f0: 74 69 6f 6e 28 70 6f 73 2e 62 65 67 69 6e 52 6f  tion(pos.beginRo
4600: 77 2c 20 77 6f 72 64 42 65 67 50 6f 73 2c 20 70  w, wordBegPos, p
4610: 6f 73 2e 62 65 67 69 6e 52 6f 77 2c 20 77 6f 72  os.beginRow, wor
4620: 64 42 65 67 50 6f 73 2b 32 29 3b 0d 0a 20 20 20  dBegPos+2);..   
4630: 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65 63 74       w.SetSelect
4640: 65 64 54 65 78 74 28 22 22 29 3b 0d 0a 20 20 20  edText("");..   
4650: 20 20 20 20 20 2f 2f 77 2e 73 65 74 43 61 72 65       //w.setCare
4660: 74 50 6f 73 28 70 6f 73 2e 62 65 67 69 6e 52 6f  tPos(pos.beginRo
4670: 77 2c 20 28 6c 69 6e 65 2e 63 68 61 72 41 74 28  w, (line.charAt(
4680: 77 6f 72 64 42 65 67 50 6f 73 2b 31 29 3d 3d 22  wordBegPos+1)=="
4690: 3b 22 29 3f 77 6f 72 64 42 65 67 50 6f 73 2b 31  ;")?wordBegPos+1
46a0: 3a 77 6f 72 64 42 65 67 50 6f 73 29 3b 0d 0a 20  :wordBegPos);.. 
46b0: 20 20 20 20 20 20 20 77 2e 73 65 74 43 61 72 65         w.setCare
46c0: 74 50 6f 73 28 70 6f 73 2e 62 65 67 69 6e 52 6f  tPos(pos.beginRo
46d0: 77 2c 20 77 6f 72 64 42 65 67 50 6f 73 29 3b 0d  w, wordBegPos);.
46e0: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20  .        return 
46f0: 74 72 75 65 3b 0d 0a 20 20 20 20 7d 20 65 6c 73  true;..    } els
4700: 65 20 7b 0d 0a 20 20 20 20 20 20 20 20 20 20 20  e {..           
4710: 20 69 66 20 28 63 75 72 43 68 61 72 20 3d 3d 20   if (curChar == 
4720: 22 28 22 20 0d 0a 20 20 20 20 20 20 20 20 20 20  "(" ..          
4730: 20 20 26 26 20 6c 69 6e 65 2e 63 68 61 72 41 74    && line.charAt
4740: 28 77 6f 72 64 41 66 74 65 72 50 6f 73 29 3d 3d  (wordAfterPos)==
4750: 22 29 22 29 20 7b 0d 0a 20 20 20 20 20 20 20 20  ")") {..        
4760: 20 20 20 20 0d 0a 20 20 20 20 20 20 20 20 20 20      ..          
4770: 20 20 77 2e 53 65 74 53 65 6c 65 63 74 69 6f 6e    w.SetSelection
4780: 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77 2c 20 77  (pos.beginRow, w
4790: 6f 72 64 42 65 67 50 6f 73 2b 31 2c 20 70 6f 73  ordBegPos+1, pos
47a0: 2e 62 65 67 69 6e 52 6f 77 2c 20 77 6f 72 64 42  .beginRow, wordB
47b0: 65 67 50 6f 73 2b 33 29 3b 0d 0a 20 20 20 20 20  egPos+3);..     
47c0: 20 20 20 20 20 20 20 77 2e 53 65 74 53 65 6c 65         w.SetSele
47d0: 63 74 65 64 54 65 78 74 28 22 22 29 3b 0d 0a 20  ctedText("");.. 
47e0: 20 20 20 20 20 20 20 20 20 20 20 77 2e 73 65 74             w.set
47f0: 43 61 72 65 74 50 6f 73 28 70 6f 73 2e 62 65 67  CaretPos(pos.beg
4800: 69 6e 52 6f 77 2c 20 77 6f 72 64 42 65 67 50 6f  inRow, wordBegPo
4810: 73 2b 31 29 3b 0d 0a 20 20 20 20 20 20 20 20 20  s+1);..         
4820: 20 20 20 2f 2f 77 2e 73 65 74 43 61 72 65 74 50     //w.setCaretP
4830: 6f 73 28 70 6f 73 2e 62 65 67 69 6e 52 6f 77 2c  os(pos.beginRow,
4840: 20 28 6c 69 6e 65 2e 63 68 61 72 41 74 28 77 6f   (line.charAt(wo
4850: 72 64 41 66 74 65 72 50 6f 73 2b 31 29 3d 3d 22  rdAfterPos+1)=="
4860: 3b 22 29 3f 77 6f 72 64 42 65 67 50 6f 73 2b 32  ;")?wordBegPos+2
4870: 3a 77 6f 72 64 42 65 67 50 6f 73 2b 31 29 3b 0d  :wordBegPos+1);.
4880: 0a 20 20 20 20 20 20 20 20 20 20 20 20 72 65 74  .            ret
4890: 75 72 6e 20 74 72 75 65 3b 0d 0a 20 20 20 20 20  urn true;..     
48a0: 20 20 20 7d 0d 0a 20 20 20 20 7d 0d 0a 20 20 20     }..    }..   
48b0: 20 0d 0a 20 20 20 20 72 65 74 75 72 6e 20 66 61   ..    return fa
48c0: 6c 73 65 3b 0d 0a 20 20 20 20 0d 0a 7d 0d 0a 0d  lse;..    ..}...
48d0: 0a 0d 0a                                         ...