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 ...