! Preferences file for NEdit
!
! This file is overwritten by the "Save Defaults..." command in NEdit 
! and serves only the interactively settable options presented in the NEdit
! "Preferences" menu.  To modify other options, such as key bindings, use 
! the .Xdefaults file in your home directory (or the X resource 
! specification method appropriate to your system).  The contents of this 
! file can be moved into an X resource file, but since resources in this file
! override their corresponding X resources, either this file should be 
! deleted or individual resource lines in the file should be deleted for the
! moved lines to take effect.

nedit.fileVersion: 5.5
nedit.shellCommands: \
	Utilities>Spell::s:ED:\n\
		(cat;echo "") | spell -b\n\
	Utilities>Word count::w:ED:\n\
		csh -fc 'set wc=`wc`; echo $wc[1] "lines," $wc[2] "words," $wc[3] "characters"'\n\
	Utilities>Sort::o:EX:\n\
		sort\n\
	Make>make (plain)::m:W:\n\
		make\n\
	Make>make (csh -i)::m:W:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; make; :'\n\
	Make>optimise (csh -i)::m:W:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; setenv CDEBUGFLAGS "-DNDEBUG -O"; setenv LDEBUGFLAGS ""; make; :'\n\
	Make>debug (csh -i)::m:W:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; setenv CDEBUGFLAGS "-gyz"; setenv LDEBUGFLAGS "-gyz"; make; :'\n\
	Make>target (csh -i)::m:IW:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; make `cat` ; :' 2>&1\n\
	Make>target optimise (csh -i)::m:IW:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; setenv CDEBUGFLAGS "-DNDEBUG -O"; setenv LDEBUGFLAGS ""; make `cat` ; :' 2>&1\n\
	Make>target debug (csh -i)::m:IW:\n\
		csh -i -c 'set cdDirNames = ":"; alias addcd "echo \\$cwd"; if ( -r .cshcd) source .cshcd; if ( ! $?CC ) source `choose_cc`; setenv CDEBUGFLAGS "-gyz"; setenv LDEBUGFLAGS "-gyz"; make `cat` ; :' 2>&1\n\
	Tabs>detab:Shift+Ctrl+Alt+I::EX:\n\
		detab\n\
	Tabs>retab:Shift+Ctrl+I::EX:\n\
		retab\n\
	C/C++ Prog>Box comment@C:Shift+Ctrl+B::EX:\n\
		boxcomment|retab\n\
	C/C++ Prog>Strip comment@C:::IX:\n\
		sed -e 's./\\\\*.  .' -e 's.\\\\*/.  .' -e 's.//.  .'\n\
	File>Find in files>Find all and open@C:Shift+Ctrl+Alt+F::ID:\n\
		f="`cat`"; nedits -noask -do "find(\\"$f\\")" `grep -F -l "$f" ./*.[ch]`\n\
	File>Find in files>Find all and open@C++:Shift+Ctrl+Alt+F::ID:\n\
		f="`cat`"; nedits -noask -do "find(\\"$f\\")" `grep -F -l "$f" ./*.[CHch]*`\n\
	File>Find in files>Find all@C:Shift+Alt+F::IW:\n\
		grep -F -n -e "`cat`" [a-zA-Z]*.[ch]\n\
	File>Find in files>Find all@C++:Shift+Alt+F::IW:\n\
		grep -F -n -e "`cat`" [a-zA-Z]*.[chCH]*\n\
	File>Find in files>Find all@*:Shift+Alt+F::IW:\n\
		grep -F -n -e "`cat`" *\n\
	File>Find in files>Open found:::ID:\n\
		f="`(cat; echo "")|cut -f1,2 -d:`"; fl=`echo "$f"|cut -f1 -d:`; li=`echo "$f"|cut -f2 -d:`; nedits -noask -line $li $fl\n\
	File>chmod u+w:::DL:\n\
		chmod u+w %\n\
	File>chmod u-w:::DL:\n\
		chmod u-w %\n\
	File>save & chmod u-w:::DSL:\n\
		chmod u-w %\n
nedit.macroCommands: \
	List files:Shift+Ctrl+O::: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		#define list_all_files\n\
		# {\n\
		  byName = "name"\n\
		  byPath = "path"\n\
		  byOpen = "open order (last first)"\n\
		\n\
		  file = ""\n\
		  nsort = byName\n\
		\n\
		  # count files\n\
		  nFile = 0\n\
		  for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		    nFile++\n\
		\n\
		  while (file == "")\n\
		    {\n\
		    list = ""\n\
		    sort = nsort\n\
		    current = $file_path $file_name\n\
		\n\
		    files = $empty_array\n\
		\n\
		    # add files into array with keys in the selected sort order\n\
		    if (nsort == byName)\n\
		      {\n\
		      for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		        files[$file_name " - " $file_path] = file\n\
		      nsort = byPath\n\
		      }\n\
		    else if (nsort == byPath)\n\
		      {\n\
		      for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		        files[$file_path $file_name] = file\n\
		      nsort = byOpen\n\
		      }\n\
		    else if (nsort == byOpen)\n\
		      {\n\
		      i = 0\n\
		      for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		        files[rjust(i++ + 1, nFile) ": " file] = file\n\
		      nsort = byName\n\
		      }\n\
		\n\
		    for (file in files)\n\
		      list = list file "\\n"\n\
		\n\
		    focus_window(current)\n\
		\n\
		    file = list_dialog(nFile " files sorted by "sort"\\nRaise which file?", \\\n\
		                       list, "OK", "Sort by "nsort, "Cancel")\n\
		    button = $list_dialog_button\n\
		    if (file != "" && button == 1)\n\
		      break\n\
		    else if (button != 2)\n\
		      break\n\
		    }\n\
		  if (file != "")\n\
		    {\n\
		    open(files[file])\n\
		    focus_window(files[file])\n\
		    raise_window(files[file])\n\
		    }\n\
		# }\n\
	}\n\
	Save all files:Shift+Ctrl+S::: {\n\
		NEDIT_require_macro_file("SaveAllFiles.nm")\n\
		\n\
		SaveAllFiles()\n\
	}\n\
	Close file (no save):Shift+Ctrl+W::: {\n\
		close("nosave")\n\
	}\n\
	Complete Word:Alt+D::: {\n\
		# Tuning parameters\n\
		ScanDistance = 5000\n\
		\n\
		# Search back to a word boundary to find the word to complete\n\
		startScan = max(0, $cursor - ScanDistance)\n\
		endScan = min($text_length, $cursor + ScanDistance)\n\
		scanString = get_range(startScan, endScan)\n\
		keyEnd = $cursor-startScan\n\
		keyStart = search_string(scanString, "<", keyEnd, "backward", "regex")\n\
		if (keyStart == -1)\n\
		    return\n\
		keyString = "<" substring(scanString, keyStart, keyEnd)\n\
		\n\
		# search both forward and backward from the cursor position.  Note that\n\
		# using a regex search can lead to incorrect results if any of the special\n\
		# regex characters is encountered, which is not considered a delimiter\n\
		backwardSearchResult = search_string(scanString, keyString, keyStart-1, \\\n\
			"backward", "regex")\n\
		forwardSearchResult = search_string(scanString, keyString, keyEnd, "regex")\n\
		if (backwardSearchResult == -1 && forwardSearchResult == -1) {\n\
		    beep()\n\
		    return\n\
		}\n\
		\n\
		# if only one direction matched, use that, otherwise use the nearest\n\
		if (backwardSearchResult == -1)\n\
		    matchStart = forwardSearchResult\n\
		else if (forwardSearchResult == -1)\n\
		    matchStart = backwardSearchResult\n\
		else {\n\
		    if (keyStart - backwardSearchResult <= forwardSearchResult - keyEnd)\n\
			matchStart = backwardSearchResult\n\
		    else\n\
			matchStart = forwardSearchResult\n\
		}\n\
		\n\
		# find the complete word\n\
		matchEnd = search_string(scanString, ">", matchStart, "regex")\n\
		completedWord = substring(scanString, matchStart, matchEnd)\n\
		\n\
		# replace it in the window\n\
		replace_range(startScan + keyStart, $cursor, completedWord)\n\
	}\n\
	Fill Sel. w/Char:::R: {\n\
		if ($selection_start == -1) {\n\
		    beep()\n\
		    return\n\
		}\n\
		\n\
		# Ask the user what character to fill with\n\
		fillChar = string_dialog("Fill selection with what character?", "OK", "Cancel")\n\
		if ($string_dialog_button == 2 || $string_dialog_button == 0)\n\
		    return\n\
		\n\
		# Count the number of lines in the selection\n\
		nLines = 0\n\
		for (i=$selection_start; i<$selection_end; i++)\n\
		    if (get_character(i) == "\\n")\n\
			nLines++\n\
		\n\
		# Create the fill text\n\
		rectangular = $selection_left != -1\n\
		line = ""\n\
		fillText = ""\n\
		if (rectangular) {\n\
		    for (i=0; i<$selection_right-$selection_left; i++)\n\
			line = line fillChar\n\
		    for (i=0; i<nLines; i++)\n\
			fillText = fillText line "\\n"\n\
		    fillText = fillText line\n\
		} else {\n\
		    if (nLines == 0) {\n\
			for (i=$selection_start; i<$selection_end; i++)\n\
			    fillText = fillText fillChar\n\
		    } else {\n\
			startIndent = 0\n\
			for (i=$selection_start-1; i>=0 && get_character(i)!="\\n"; i--)\n\
			    startIndent++\n\
			for (i=0; i<$wrap_margin-startIndent; i++)\n\
			    fillText = fillText fillChar\n\
			fillText = fillText "\\n"\n\
			for (i=0; i<$wrap_margin; i++)\n\
			    line = line fillChar\n\
			for (i=0; i<nLines-1; i++)\n\
			    fillText = fillText line "\\n"\n\
			for (i=$selection_end-1; i>=$selection_start && get_character(i)!="\\n"; \\\n\
				i--)\n\
			    fillText = fillText fillChar\n\
		    }\n\
		}\n\
		\n\
		# Replace the selection with the fill text\n\
		replace_selection(fillText)\n\
	}\n\
	Remove DOS CRs:::: {\n\
		# do replacements one at a time to preserve rangesets, marks etc.\n\
		# this does have the unfortunate effect of generating more UNDOs though...\n\
		RE = "regex"\n\
		PAT = "(\\\\s+\\r?|\\r)$"\n\
		for (pos = search(PAT, 0, RE); pos != -1; pos = search(PAT, pos + 1, RE))\n\
		  replace_range(pos, $search_end, "")\n\
	}\n\
	Language>Choose language:Ctrl+Equal::: {\n\
		NEDIT_require_macro_file("ModeString.nm")\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		# provide a list of languages\n\
		list = "\\n" \\\n\
		       "C++\\n" \\\n\
		       "Makefile\\n" \\\n\
		       "Java\\n" \\\n\
		       "grep -n out\\n" \\\n\
		       "CC output\\n" \\\n\
		       "Javac output\\n" \\\n\
		       "Sh Ksh Bash\\n" \\\n\
		       "Man page output\\n" \\\n\
		       "NEdit Macro\\n" \\\n\
		       "NEdit Macro RE\\n" \\\n\
		       "Perl\\n" \\\n\
		       "SQL\\n" \\\n\
		       "Doxygen\\n" \\\n\
		       "Doxygen strict\\n" \\\n\
		       "X Resources\\n" \\\n\
		       "C\\n" \\\n\
		       ""\n\
		mode = $language_mode\n\
		oldmode = mode\n\
		currmode = mode\n\
		msg = "Choose a language mode\\n(Currently " mode ")"\n\
		\n\
		######### VERSION 1\n\
		# # add two spaces in front of all non-empty lines\n\
		# list = replace_in_string(list, "^(?=.)", "  ", "regex")\n\
		# # change those spaces to ">>" on a line equal to the current language mode\n\
		# list = replace_in_string(list, "\\n  "mode"\\n", "\\n>>"mode"\\n", "case", "copy")\n\
		#\n\
		# # ask for a new language mode\n\
		# mode = list_dialog(msg, list, "OK", "Cancel")\n\
		# mode = substring(mode, 2, length(mode))\n\
		\n\
		######### VERSION 2\n\
		# mark current mode with "<<" if it is in the list\n\
		if (search_string(list, "\\n" mode "\\n", 0) >= 0)\n\
		  {\n\
		  pads = replace_in_string(longest_line(list), ".", "<", "regex")\n\
		  currmode = mode " " substring(pads, length(mode)) "<<"\n\
		  list = replace_in_string(list, "\\n" mode "\\n", "\\n" currmode "\\n", "case")\n\
		  }\n\
		# ask for a new language mode\n\
		mode = list_dialog(msg, list, "OK", "Cancel")\n\
		\n\
		######### common exit code\n\
		if (mode != "" && mode != currmode && $list_dialog_button == 1)\n\
		  set_language_mode(mode)\n\
		else\n\
		  mode = oldmode\n\
		\n\
		if ($list_dialog_button == 1)\n\
		  ModeStringInterpret(mode)\n\
	}\n\
	Language>From editor string:::: {\n\
		NEDIT_require_macro_file("ModeString.nm")\n\
		\n\
		ModeStringInterpret()\n\
	}\n\
	Language>C++:::: {\n\
		NEDIT_require_macro_file("ModeString.nm")\n\
		\n\
		ModeStringInterpret("C++")\n\
		\n\
		if ($language_mode != "C++")\n\
		  set_language_mode("C++")\n\
	}\n\
	Language>Doxygen:::: {\n\
		b = dialog("Which Doxygen style?", "Easy", "Strict")\n\
		if (b == 1)\n\
		  set_language_mode("Doxygen")\n\
		else if (b == 2)\n\
		  set_language_mode("Doxygen strict")\n\
		else\n\
		  return\n\
		\n\
		set_em_tab_dist(4) # turn on emulated tabs\n\
		set_tab_dist(4)\n\
		set_use_tabs(0)    # do not use tabs in auto padding\n\
	}\n\
	Language>grep -n out/CC output@*:Shift+Ctrl+Equal::: {\n\
		if (search("^\\\\s*\\\\^$", $cursor, "regex", "wrap", "backward") >= 0)\n\
		  # contains single carats on otherwise empty lines\n\
		  set_language_mode("Javac output")\n\
		else\n\
		if (search("^[^:]+:\\\\d+:", $cursor, "regex", "wrap", "backward") >= 0)\n\
		  # matches ...:NNN:...\n\
		  set_language_mode("grep -n out")\n\
		else\n\
		if (search("^\\"[^\\"]+\\", line \\\\d+(?::|$)", $cursor, \\\n\
		           "regex", "wrap", "backward") >= 0)\n\
		  # matches "...", line NNN:\n\
		  set_language_mode("CC output")\n\
		else\n\
		  {\n\
		  mode = list_dialog("Choose a language mode", \\\n\
		                     "grep -n out\\n" \\\n\
		                     "CC output\\n" \\\n\
		                     "Javac output", "OK", "Cancel")\n\
		  if (mode != "" && $list_dialog_button == 1)\n\
		    set_language_mode(mode)\n\
		  }\n\
	}\n\
	Language>grep -n out/CC output@NEdit Macro:::: {\n\
		macro_menu_command("Language>grep -n out/CC output@*")\n\
	}\n\
	Language>grep -n out/CC output@NEdit Macro RE:::: {\n\
		macro_menu_command("Language>grep -n out/CC output@*")\n\
	}\n\
	Language>NEdit Macro RE@NEdit Macro:Shift+Ctrl+Equal::: {\n\
		set_language_mode("NEdit Macro RE")\n\
		set_tab_dist(8)\n\
	}\n\
	Language>NEdit Macro@NEdit Macro RE:Shift+Ctrl+Equal::: {\n\
		set_language_mode("NEdit Macro")\n\
		set_tab_dist(8)\n\
	}\n\
	Language>NEdit Macro@*:::: {\n\
		set_language_mode("NEdit Macro")\n\
		set_tab_dist(8)\n\
	}\n\
	Language>grep -n out:::: {\n\
		set_language_mode("grep -n out")\n\
	}\n\
	Language>Toggle tabs 4 - 8:Ctrl+Minus::: {\n\
		if ($tab_dist == 8)\n\
		  set_tab_dist(4)\n\
		else\n\
		  set_tab_dist(8)\n\
	}\n\
	Language>Tabs 4:Ctrl+4:4:: {\n\
		set_tab_dist(4)\n\
	}\n\
	Language>Tabs 8:Ctrl+8:8:: {\n\
		set_tab_dist(8)\n\
	}\n\
	Language>Toggle hard tabs:Shift+Ctrl+Minus:8:: {\n\
		$tabs_info[""] = ""\n\
		\n\
		if (!("old_em_tab_dist" in $tabs_info))\n\
		  $tabs_info["old_em_tab_dist"] = $em_tab_dist\n\
		\n\
		# remove or restore tab emulation\n\
		if ($use_tabs)\n\
		  {\n\
		  set_use_tabs(0)\n\
		  set_em_tab_dist($tabs_info["old_em_tab_dist"])\n\
		  dialog("Not using hard tabs in padding\\n(emulated tabs = "$em_tab_dist")")\n\
		  }\n\
		else\n\
		  {\n\
		  set_use_tabs(1)\n\
		  set_em_tab_dist(0)\n\
		  dialog("Using hard tabs in padding\\n(emulated tab distance = 0)")\n\
		  }\n\
	}\n\
	Comments>/* Comment */@C@C++@Java@CSS@JavaScript@Lex:::R: {\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		replace_range(selStart, selEnd, "/* " get_selection() " */")\n\
		select(selStart, selEnd + 6)\n\
	}\n\
	Comments>/* Uncomment */@C@C++@Java@CSS@JavaScript@Lex:::R: {\n\
		sel = get_selection()\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		commentStart = search_string(sel, "/*", 0)\n\
		if (substring(sel, commentStart + 2, commentStart + 3) == " ")\n\
		    keepStart = commentStart + 3\n\
		else\n\
		    keepStart = commentStart + 2\n\
		keepEnd = search_string(sel, "*/", length(sel), "backward")\n\
		commentEnd = keepEnd + 2\n\
		if (substring(sel, keepEnd - 1, keepEnd) == " ")\n\
		    keepEnd = keepEnd - 1\n\
		replace_range(selStart + commentStart, selStart + commentEnd, \\\n\
			substring(sel, keepStart, keepEnd))\n\
		select(selStart, selEnd - (keepStart-commentStart) - \\\n\
			(commentEnd - keepEnd))\n\
	}\n\
	Comments>// Comment@C@C++@Java@JavaScript:::R: {\n\
		replace_in_selection("^.*$", "// &", "regex")\n\
	}\n\
	Comments>// Uncomment@C@C++@Java@JavaScript:::R: {\n\
		replace_in_selection("(^[ \\\\t]*// ?)(.*)$", "\\\\2", "regex")\n\
	}\n\
	Comments>// --- bar@C++@Java@JavaScript:::: {\n\
		beginning_of_line()\n\
		insert_string("// -----------------------------------------------------------------------------\\n")\n\
	}\n\
	Comments>// ==== bar@C++@Java@JavaScript:::: {\n\
		beginning_of_line()\n\
		insert_string("// =============================================================================\\n")\n\
	}\n\
	Comments>/* --- */ bar@C@C++@Java@JavaScript:::: {\n\
		beginning_of_line()\n\
		insert_string("/* -------------------------------------------------------------------------- */\\n")\n\
	}\n\
	Comments># Comment@Perl@Sh Ksh Bash@NEdit Macro@Makefile@Awk@Csh@Python@Tcl@Hash comments:::R: {\n\
		replace_in_selection("^.*$", "#&", "regex")\n\
	}\n\
	Comments># Uncomment@Perl@Sh Ksh Bash@NEdit Macro@Makefile@Awk@Csh@Python@Tcl@Hash comments:::R: {\n\
		replace_in_selection("(^[ \\\\t]*#)(.*)$", "\\\\2", "regex")\n\
	}\n\
	Comments># --- bar@Perl@Sh Ksh Bash@NEdit Macro@Makefile@Awk@Csh@Python@Tcl@Hash comments:::: {\n\
		beginning_of_line()\n\
		insert_string("# ------------------------------------------------------------------------------\\n")\n\
	}\n\
	Comments>-- Comment@SQL:::R: {\n\
		replace_in_selection("^.*$", "--&", "regex")\n\
	}\n\
	Comments>-- Uncomment@SQL:::R: {\n\
		replace_in_selection("(^[ \\\\t]*--)(.*)$", "\\\\2", "regex")\n\
	}\n\
	Comments>! Comment@X Resources:::R: {\n\
		replace_in_selection("^.*$", "!&", "regex")\n\
	}\n\
	Comments>! Uncomment@X Resources:::R: {\n\
		replace_in_selection("(^[ \\\\t]*!)(.*)$", "\\\\2", "regex")\n\
	}\n\
	Comments>/* Bar Comment@C@C++:::R: {\n\
		if ($selection_left != -1) {\n\
		    dialog("Selection must not be rectangular")\n\
		    return\n\
		}\n\
		start = $selection_start\n\
		end = $selection_end-1\n\
		origText = get_range($selection_start, $selection_end-1)\n\
		newText = "/*\\n" replace_in_string(get_range(start, end), \\\n\
			"^", " * ", "regex") "\\n */\\n"\n\
		replace_selection(newText)\n\
		select(start, start + length(newText))\n\
	}\n\
	Comments>/* Bar Uncomment@C@C++:::R: {\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		newText = get_range(selStart+3, selEnd-4)\n\
		newText = replace_in_string(newText, "^ \\\\* ", "", "regex")\n\
		replace_range(selStart, selEnd, newText)\n\
		select(selStart, selStart + length(newText))\n\
	}\n\
	Comments>/* ==== */ bar@C@C++@Java@JavaScript:::: {\n\
		beginning_of_line()\n\
		insert_string("/* ========================================================================== */\\n")\n\
	}\n\
	Make C Prototypes@C@C++:::: {\n\
		if ($selection_start == -1) {\n\
		    start = 0\n\
		    end = $text_length\n\
		} else {\n\
		    start = $selection_start\n\
		    end = $selection_end\n\
		}\n\
		string = get_range(start, end)\n\
		nDefs = 0\n\
		searchPos = 0\n\
		prototypes = ""\n\
		staticPrototypes = ""\n\
		for (;;) {\n\
		    headerStart = search_string(string, \\\n\
			    "^[a-zA-Z]([^;#\\"'{}=><!/]|\\n)*\\\\)[ \\t]*\\n?[ \\t]*\\\\{", \\\n\
			    searchPos, "regex")\n\
		    if (headerStart == -1)\n\
			break\n\
		    headerEnd = search_string(string, ")", $search_end,"backward") + 1\n\
		    prototype = substring(string, headerStart, headerEnd) ";\\n"\n\
		    if (substring(string, headerStart, headerStart+6) == "static")\n\
			staticPrototypes = staticPrototypes prototype\n\
		    else\n\
					prototypes = prototypes prototype\n\
		    searchPos = headerEnd\n\
		    nDefs++\n\
		}\n\
		if (nDefs == 0) {\n\
		    dialog("No function declarations found")\n\
		    return\n\
		}\n\
		new()\n\
		focus_window("last")\n\
		replace_range(0, 0, prototypes staticPrototypes)\n\
	}\n\
	Go there@CC output:Shift+Ctrl+C::: {\n\
		NEDIT_require_macro_file("GoThereSunCC.nm")\n\
		\n\
		goThereSunCC()\n\
	}\n\
	Go there@Javac output:Shift+Ctrl+C::: {\n\
		NEDIT_require_macro_file("GoThereSunJavac.nm")\n\
		\n\
		goThereSunJavac()\n\
	}\n\
	Go there@C@C++:Shift+Ctrl+C::: {\n\
		macro_menu_command("Move>MultiTag>Find def@C@C++")\n\
	}\n\
	Go there@grep -n out:Shift+Ctrl+C::: {\n\
		NEDIT_require_macro_file("GoThereGrep.nm")\n\
		\n\
		goThereGrep()\n\
	}\n\
	Go there@Man page output:Shift+Ctrl+C::: {\n\
		NEDIT_require_macro_file("ManHelp.nm")\n\
		\n\
		ManHelp()\n\
	}\n\
	Open selected@*:Shift+Ctrl+Y::: {\n\
		# Try to find a file whose name matches the given string, allowing for\n\
		# simple environment variable (as $env or ${env}) substitution.\n\
		\n\
		# pick up our string - a simple selection if any, or the current word\n\
		sel = get_selection("any")\n\
		if (search_string(sel, "(?n\\\\s)", 0, "regex") >= 0)\n\
		  {\n\
		  # selection contains spaces/newlines: ignore it\n\
		  sel = ""\n\
		  }\n\
		\n\
		if (sel == "")\n\
		  {\n\
		  # find current "word" (contiguous non-spaces)\n\
		  pos = $cursor\n\
		  if (pos != 0)\n\
		    {\n\
		    pos = search("\\\\s", pos - 1, "regex", "backward") + 1\n\
		    }\n\
		  end = search("\\\\s|$", pos, "regex")\n\
		  sel = get_range(pos, end)\n\
		  }\n\
		\n\
		if (sel == "")\n\
		  {\n\
		  sel = string_dialog("Enter a file name to open", "OK", "Cancel")\n\
		  if ($string_dialog_button != 1 || sel == "")\n\
		    return\n\
		  }\n\
		\n\
		# now we have our strings, try to resolve simple env-var substitutions\n\
		hasDollar = 1\n\
		cumul = ""\n\
		rest = sel\n\
		while (hasDollar)\n\
		  {\n\
		  pos = search_string(rest, "(?<![$\\\\\\\\])\\\\$(\\\\w+|\\\\{\\\\w+\\\\})", 0, "regex")\n\
		  if (pos >= 0)\n\
		    {\n\
		    end = $search_end\n\
		    # extract the variable name\n\
		    var = substring(rest, pos + 1, end)\n\
		    var = replace_in_string(var, "[{}]", "", "regex", "copy")\n\
		\n\
		    # list_dialog("Substituting:", \\\n\
		    #         "old rest  = '" rest                                      "' \\n" \\\n\
		    #         "old cumul = '" cumul                                     "' \\n" \\\n\
		    #         "    var   = '" var                                       "' \\n" \\\n\
		    #         "    value = '" getenv(var)                               "' \\n" \\\n\
		    #         "new cumul = '" cumul substring(rest, 0, pos) getenv(var) "' \\n" \\\n\
		    #         "new rest  = '" substring(rest, end)                      "' \\n")\n\
		\n\
		    # add the prefix and variable value to cumul\n\
		    cumul = cumul substring(rest, 0, pos) getenv(var)\n\
		    # cut off the used part of rest\n\
		    rest = substring(rest, end)\n\
		    }\n\
		  else\n\
		    {\n\
		    cumul = cumul rest\n\
		    hasDollar = 0\n\
		    }\n\
		  }\n\
		\n\
		# now we have all we need in cumul\n\
		filename = cumul\n\
		if (filename != "")\n\
		  file = NEDIT_find_file_in_pathlist(filename, $file_path)\n\
		else\n\
		  {\n\
		  filename = sel\n\
		  file = ""\n\
		  }\n\
		\n\
		if (file == "")\n\
		  return dialog("Could not find file:\\n    " filename)\n\
		\n\
		open(file)\n\
		focus_window(file)\n\
		raise_window(file, "focus")\n\
	}\n\
	Open selected@C@C++:::: {\n\
		macro_menu_command("Open selected@*")\n\
	}\n\
	C/C++ Prog>Open include@C@C++:Shift+Ctrl+Y::: {\n\
		NEDIT_require_macro_file("open_incl.nm")\n\
		\n\
		open_include()\n\
	}\n\
	C/C++ Prog>C Comments>Cartouche@C@C++:::: {\n\
		beginning_of_line()\n\
		insert_string("/* -------------------------------------------------------------------------- */")\n\
		newline()\n\
		beginning_of_line()\n\
		insert_string("/* -------------------------------------------------------------------------- */")\n\
		newline()\n\
		newline()\n\
		process_up()\n\
		process_up()\n\
		beginning_of_line()\n\
		insert_string("/* ")\n\
		newline()\n\
		process_up()\n\
		end_of_line()\n\
	}\n\
	C/C++ Prog>C Comments>Comment Out Sel.@C@C++:::R: {\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		replace_range(selStart, selEnd, "/* " get_selection() " */")\n\
		select(selStart, selEnd + 6)\n\
	}\n\
	C/C++ Prog>C Comments>C Uncomment Sel.@C@C++:::R: {\n\
		sel = get_selection()\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		commentStart = search_string(sel, "/*", 0)\n\
		if (substring(sel, commentStart+2, commentStart+3) == " ")\n\
		    keepStart = commentStart + 3\n\
		else\n\
		    keepStart = commentStart + 2\n\
		keepEnd = search_string(sel, "*/", length(sel), "backward")\n\
		commentEnd = keepEnd + 2\n\
		if (substring(sel, keepEnd - 1, keepEnd) == " ")\n\
		    keepEnd = keepEnd - 1\n\
		replace_range(selStart + commentStart, selStart + commentEnd, \\\n\
			substring(sel, keepStart, keepEnd))\n\
		select(selStart, selEnd - (keepStart-commentStart) - \\\n\
			(commentEnd - keepEnd))\n\
	}\n\
	C/C++ Prog>C Comments>+ C++ Comment@C++:::R: {\n\
		replace_in_selection("^.*$", "// &", "regex")\n\
	}\n\
	C/C++ Prog>C Comments>- C++ Comment@C++:::R: {\n\
		replace_in_selection("(^[ \\\\t]*// ?)(.*)$", "\\\\2", "regex")\n\
	}\n\
	C/C++ Prog>C Comments>+ C Bar Comment 1@C:::R: {\n\
		if ($selection_left != -1) {\n\
		    dialog("Selection must not be rectangular")\n\
		    return\n\
		}\n\
		start = $selection_start\n\
		end = $selection_end-1\n\
		origText = get_range($selection_start, $selection_end-1)\n\
		newText = "/*\\n" replace_in_string(get_range(start, end), \\\n\
			"^", " * ", "regex") "\\n */\\n"\n\
		replace_selection(newText)\n\
		select(start, start + length(newText))\n\
	}\n\
	C/C++ Prog>C Comments>- C Bar Comment 1@C:::R: {\n\
		selStart = $selection_start\n\
		selEnd = $selection_end\n\
		newText = get_range(selStart+3, selEnd-4)\n\
		newText = replace_in_string(newText, "^ \\\\* ", "", "regex")\n\
		replace_range(selStart, selEnd, newText)\n\
		select(selStart, selStart + length(newText))\n\
	}\n\
	C/C++ Prog>C Comments>Comment C++ comments for C@C:::: {\n\
		replace("(^|[^*])(//.*)", "\\\\1/\\\\*\\\\2 \\\\*/", "regex")\n\
	}\n\
	C/C++ Prog>C Comments>Uncomment C++ comments for C@C:::: {\n\
		replace("/\\\\*(//.*) \\\\*/$", "\\\\1", "regex")\n\
	}\n\
	C/C++ Prog>Redo C styles@C@C++:::: {\n\
		# remove spaces in the context "word (" or "word ["\n\
		while (search("([a-zA-Z0-9_])\\\\s+([[(])", 0, "regex") >= 0)\n\
		  replace_all("([a-zA-Z0-9_])\\\\s+([[(])", "\\\\1\\\\2", "regex")\n\
		# remove spaces in "( ... )" and "[ ... ]"\n\
		while (search("(\\\\S)\\\\s+([])])", 0, "regex") >= 0)\n\
		  replace_all("(\\\\S)\\\\s+([])])", "\\\\1\\\\2", "regex")\n\
		while (search("([[(])\\\\s+", 0, "regex") >= 0)\n\
		  replace_all("([[(])\\\\s+", "\\\\1", "regex")\n\
		\n\
		# tighten semicolons, commas to preceding text\n\
		while (search("(?<=\\\\S)[ \\\\t]+([,;])", 0, "regex") >= 0)\n\
		  replace_all("(?<=\\\\S)[ \\\\t]+([,;])", "\\\\1", "regex")\n\
		\n\
		# add a single space after these keywords and following "(" or "["\n\
		keyword = "(<return|if|while|for|sizeof|switch|and|bitand|and_eq|or|bitor|" \\\n\
		            "or_eq|xor|xor_eq|not|not_eq|compl|new|delete>)([\\\\[\\\\(])"\n\
		while (search(keyword, 0, "regex") >= 0)\n\
		  replace_all(keyword, "\\\\1 \\\\2", "regex")\n\
		\n\
		# move "*" and "&" in casts\n\
		while (search("([a-zA-Z0-9_])([*&]+)([ \\\\t]+)", 0, "regex") >= 0)\n\
		  replace_all("([a-zA-Z0-9_])([*&]+)([ \\\\t]+)", "\\\\1\\\\3\\\\2", "regex")\n\
		while (search("([a-zA-Z0-9_])([*&]+)([>)])", 0, "regex") >= 0)\n\
		  replace_all("([a-zA-Z0-9_])([*&]+)([>)])", "\\\\1 \\\\2\\\\3", "regex")\n\
		while (search("\\\\*\\\\)[ \\\\t]+", 0, "regex") >= 0)\n\
		  replace_all("\\\\*\\\\)[ \\\\t]+", "\\\\*\\\\)", "regex")\n\
	}\n\
	C/C++ Prog>Make C Prototypes@C@C++:::: {\n\
		if ($selection_start == -1) {\n\
		    start = 0\n\
		    end = $text_length\n\
		} else {\n\
		    start = $selection_start\n\
		    end = $selection_end\n\
		}\n\
		string = get_range(start, end)\n\
		nDefs = 0\n\
		searchPos = 0\n\
		prototypes = ""\n\
		staticPrototypes = ""\n\
		keywords = "[ \\t]*<return|if|switch|while|for|sizeof>[ \\t]*\\\\("\n\
		C_cmnt = "(/\\\\*([^*]|\\n|\\\\*[^/])*\\\\*/)"\n\
		CPP_cmnt = "(//.*\\n)"\n\
		get_proto = "^[ \\t]*[a-zA-Z]" \\\n\
			    "([^;#\\"'{}=><!/]|\\n|"C_cmnt"|"CPP_cmnt")*\\\\)" \\\n\
			    "[ \\t]*\\n?[ \\t]*{"\n\
		for (;;) {\n\
		    headerStart = search_string(string, get_proto, searchPos, "regex")\n\
		    if (headerStart == -1)\n\
			break\n\
		    headerEnd = search_string(string, ")", $search_end, "backward") + 1\n\
		    prototype = substring(string, headerStart, headerEnd) ";\\n"\n\
		    searchPos = headerEnd\n\
		    if (search_string(prototype, keywords, 0, "regex") >= 0)\n\
			continue\n\
		    if (substring(string, headerStart, headerStart+6) == "static")\n\
			staticPrototypes = staticPrototypes prototype\n\
		    else\n\
			prototypes = prototypes prototype\n\
		    nDefs++\n\
		}\n\
		if (nDefs == 0) {\n\
		    dialog("No function declarations found")\n\
		    return\n\
		}\n\
		new()\n\
		focus_window("last")\n\
		replace_range(0, 0, "/* external */\\n" prototypes "\\n/* static */\\n" staticPrototypes)\n\
		set_language_mode("C")\n\
	}\n\
	C/C++ Prog>keyword expand@C@C++:Ctrl+Backslash::: {\n\
		NEDIT_require_macro_file("c_expand.nm")\n\
		\n\
		if ($selection_start != -1)\n\
		  deselect_all()\n\
		\n\
		if (!c_expand())\n\
		  {\n\
		  beep()\n\
		  }\n\
		\n\
		pos = search("@[^@]*@", $cursor, "regex")\n\
		if (pos != -1)\n\
		  {\n\
		  end = $search_end\n\
		  s = get_range(pos, $search_end)\n\
		  r = substring(s, 1, length(s) - 1)\n\
		  replace_range(pos, end, r)\n\
		  select(pos, end - 2)\n\
		  set_cursor_pos(end - 2)\n\
		  }\n\
	}\n\
	C/C++ Prog>next expand@C@C++:Shift+Ctrl+Backslash::: {\n\
		pos = search("@[^@]*@", $cursor, "regex")\n\
		if (pos != -1)\n\
		  {\n\
		  end = $search_end\n\
		  s = get_range(pos, $search_end)\n\
		  r = substring(s, 1, length(s) - 1)\n\
		  replace_range(pos, end, r)\n\
		  select(pos, end - 2)\n\
		  set_cursor_pos(end - 2)\n\
		  }\n\
	}\n\
	C/C++ Prog>extern "C"-ise@C@C++:::: {\n\
		if (search("#ifdef __cplusplus", 0, "case") == -1)\n\
		  {\n\
		  deselect_all()\n\
		  end_of_file()\n\
		\n\
		  insert_string("\\n#ifdef __cplusplus\\n}\\n#endif")\n\
		  find("#include ", "backward", "case")\n\
		  end_of_line()\n\
		  insert_string("\\n\\n#ifdef __cplusplus\\nextern \\"C\\" {\\n#endif\\n\\n")\n\
		  }\n\
		else\n\
		  {\n\
		  beep()\n\
		  set_cursor_pos($search_end)\n\
		  }\n\
	}\n\
	Move>Start of Select:Ctrl+Home::: {\n\
		if ($selection_start != -1)\n\
		  beginning_of_selection()\n\
		else\n\
		  beginning_of_file()\n\
	}\n\
	Move>End of Line:End::: {\n\
		end_of_line()\n\
	}\n\
	Move>End of Line Select:Shift+End::: {\n\
		end_of_line("extend")\n\
	}\n\
	Move>End of Select:Ctrl+End::: {\n\
		if ($selection_start != -1)\n\
		  end_of_selection()\n\
		else\n\
		  end_of_file()\n\
	}\n\
	Move>Goto selected line number:Shift+Ctrl+L::: {\n\
		sel = get_selection("any")\n\
		if (sel == "")\n\
		  {\n\
		  pos = $cursor\n\
		  while (pos > 0 && (search("\\\\d", pos - 1, "regex") == pos - 1))\n\
		    pos--\n\
		  if (search("\\\\d+", pos, "regex") != pos)\n\
		    {\n\
		    beep()  # no digit here\n\
		    }\n\
		  else\n\
		    {\n\
		    end = $search_end\n\
		    goto_line_number(get_range(pos, end))\n\
		    }\n\
		  }\n\
		\n\
		# dialog("In file "$file_name": line "sel)\n\
		goto_line_number(get_selection("any"))\n\
	}\n\
	Move>Smart Home:Alt+Home::: {\n\
		# toggle between front of line and first non-space on line\n\
		c = $cursor\n\
		beginning_of_line()\n\
		front = $cursor\n\
		if (c == front)\n\
		  {\n\
		  first_char = search("[ \\t]*", front, "regex", "forward")\n\
		  if (first_char != -1)\n\
		    set_cursor_pos($search_end)\n\
		  }\n\
	}\n\
	Move>Goto Definition@*:Shift+Ctrl+E::: {\n\
		# pick any selection\n\
		s = get_selection("any")\n\
		c = $cursor\n\
		\n\
		# if we're on a word, use it\n\
		if (s == "")\n\
		  {\n\
		  b = search("<", $cursor, "regex", "backward")\n\
		  e = search(">", $cursor, "regex", "forward")\n\
		  if (b <= c && c <= e)\n\
		    s = get_range(b, e)\n\
		  }\n\
		\n\
		# must be a valid word!\n\
		pos = search_string(s, "(?n^\\\\w+$)", 0, "regex")\n\
		end = $search_end\n\
		if (pos != 0 || end != length(s))\n\
		  s = string_dialog("Enter a tag name to look up", "OK", "Cancel")\n\
		\n\
		# if all still OK, try to find it!\n\
		if (s != "" && $string_dialog_button == 1)\n\
		  find_definition(s)\n\
	}\n\
	Move>Goto Definition@C++:Shift+Ctrl+E::: {\n\
		s = get_selection("any")\n\
		c = $cursor\n\
		\n\
		scopedWord = "(?<!:)(?:\\\\s*::\\\\s*)?\\\\w+(?:\\\\s*::\\\\s*\\\\w+)*"\n\
		\n\
		# if we're on a word, use it\n\
		if (s == "")\n\
		  {\n\
		  b = search("^", c, "regex", "backward")\n\
		  e = b\n\
		  while (1)\n\
		    {\n\
		    b = search(scopedWord, e, "regex", "forward")\n\
		    e = $search_end\n\
		    if (c <= e && b < e)\n\
		      break\n\
		    if (b == e || b < 0)\n\
		      break\n\
		    }\n\
		\n\
		  s = get_range(b, e)\n\
		  }\n\
		\n\
		# assume it's a valid word!\n\
		if (s == "")\n\
		  {\n\
		  s = string_dialog("Enter a tag name to look up", "OK", "Cancel")\n\
		  if ($string_dialog_button != 1)\n\
		    s = ""\n\
		  }\n\
		\n\
		# if all still OK, try to find it!\n\
		if (s != "")\n\
		  find_definition(s)\n\
	}\n\
	Move>MultiTag>Find def@*:Ctrl+Bracketright::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if ($multitags == "")\n\
		  {\n\
		  multitags_load_multitags_file()\n\
		  }\n\
		\n\
		s = ""\n\
		if ($selection_start == -1)\n\
		  {\n\
		  b = search("<", $cursor, "regex", "backward")\n\
		  e = search(">", $cursor, "regex", "forward")\n\
		  s = get_range(b, e)\n\
		  }\n\
		else\n\
		  s = get_selection()\n\
		\n\
		if (s != "")\n\
		  {\n\
		  multitags_push_curpos()\n\
		  if (!multitags_choose_quick(s))\n\
		    {\n\
		    multitags_pop_curpos()\n\
		    deselect_all()\n\
		    }\n\
		  else\n\
		    {\n\
		    centerline()\n\
		    }\n\
		  }\n\
	}\n\
	Move>MultiTag>Find def@C@C++:Ctrl+Bracketright::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if ($multitags == "")\n\
		  {\n\
		  multitags_load_all_multitags_file()\n\
		  }\n\
		\n\
		s = ""\n\
		if ($selection_start == -1)\n\
		  {\n\
		  b = search("<", $cursor, "regex", "backward")\n\
		  e = search(">", $cursor, "regex", "forward")\n\
		  s = get_range(b, e)\n\
		  }\n\
		else\n\
		  s = get_selection()\n\
		\n\
		if (s != "")\n\
		  {\n\
		  multitags_push_curpos()\n\
		  if (!multitags_choose_quick(s))\n\
		    {\n\
		    multitags_pop_curpos()\n\
		    deselect_all()\n\
		    }\n\
		  else\n\
		    {\n\
		    centerline()\n\
		    }\n\
		  }\n\
	}\n\
	Move>MultiTag>Find ?@*:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if ($multitags == "")\n\
		  {\n\
		  multitags_load_multitags_file()\n\
		  }\n\
		\n\
		s = string_dialog("Symbol", "OK", "Cancel")\n\
		\n\
		if ($string_dialog_button == 1 && s != "")\n\
		  {\n\
		  multitags_push_curpos()\n\
		  if (!multitags_choose_quick(s))\n\
		    {\n\
		    multitags_pop_curpos()\n\
		    deselect_all()\n\
		    }\n\
		  else\n\
		    {\n\
		    centerline()\n\
		    }\n\
		  }\n\
	}\n\
	Move>MultiTag>Find ?@C@C++:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if ($multitags == "")\n\
		  {\n\
		  multitags_load_all_multitags_file()\n\
		  }\n\
		\n\
		s = string_dialog("Symbol", "OK", "Cancel")\n\
		\n\
		if ($string_dialog_button == 1 && s != "")\n\
		  {\n\
		  multitags_push_curpos()\n\
		  if (!multitags_choose_quick(s))\n\
		    {\n\
		    multitags_pop_curpos()\n\
		    deselect_all()\n\
		    }\n\
		  else\n\
		    {\n\
		    centerline()\n\
		    }\n\
		  }\n\
	}\n\
	Move>MultiTag>Push:Ctrl+Bracketleft::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_push_curpos()\n\
	}\n\
	Move>MultiTag>Back:Shift+Ctrl+Bracketright::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if (multitags_pop_curpos())\n\
		  centerline()\n\
	}\n\
	Move>MultiTag>Reload tags@*:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_load_multitags_file("tags")\n\
	}\n\
	Move>MultiTag>Reload tags@C@C++:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_forget_multitags_file()\n\
		multitags_load_all_multitags_file("tags")\n\
	}\n\
	Move>MultiTag>Forget tags:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_forget_multitags_file()\n\
	}\n\
	Move>MultiTag>Show tags files:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = $multitags_files\n\
		if (s == "" || s == "\\n")\n\
			s = " (none)\\n"\n\
		list_dialog("Multitags: Loaded tags file", $multitags_files)\n\
	}\n\
	Move>MultiTag>Load specific tags file:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = string_dialog("Enter file path", "OK", "Cancel")\n\
		if ($string_dialog_button == 1 && s != "")\n\
		  multitags_load_multitags_file(s)\n\
		\n\
	}\n\
	Move>MultiTag>File symbols:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if ($multitags == "")\n\
		  {\n\
		  if ($language_mode == "C" || \\\n\
		      $language_mode == "C++")\n\
		    multitags_load_all_multitags_file()\n\
		  else\n\
		    multitags_load_multitags_file()\n\
		  }\n\
		\n\
		if (multitags_choose_in_file($file_name))\n\
		  centerline()\n\
	}\n\
	Move>MultiTag>Set stack:Shift+Ctrl+Alt+J::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_set_stack_length()\n\
	}\n\
	Move>MultiTag>Show stack:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		if (multitags_choose_from($multitags_stack))\n\
		  centerline()\n\
	}\n\
	Move>MultiTag>Empty stack:::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		multitags_empty_stack()\n\
	}\n\
	Move>Go to Match:Shift+Ctrl+5::: {\n\
		select($cursor, $cursor)\n\
		cc = $cursor-1\n\
		if (cc == -1)\n\
			forward_character()\n\
		c = get_character(cc)\n\
		if (search_string("{}()[]<>\\"", c, 0) == -1)\n\
			forward_character()\n\
		\n\
		match()\n\
		\n\
		if ($selection_start != -1)\n\
			{\n\
			if ($cursor == $selection_start+1)\n\
				set_cursor_pos($selection_end)\n\
			else\n\
				set_cursor_pos($selection_start)\n\
			}\n\
		select($cursor, $cursor)\n\
	}\n\
	Move>Collapse Match:Ctrl+KP_Subtract::: {\n\
		NEDIT_require_macro_file("fold.nm")\n\
		\n\
		if ($selection_start != -1)\n\
		  res = fold_selection()\n\
		else\n\
		  res = fold_bracket_or_custom_match()\n\
		if (!res)\n\
		  beep()\n\
	}\n\
	Move>Expand Match:Ctrl+KP_Add::: {\n\
		NEDIT_require_macro_file("fold.nm")\n\
		\n\
		if (!fold_expand())\n\
		  beep()\n\
	}\n\
	Edit>Paste selection to cursor:::: {\n\
		sel = get_selection("any")\n\
		if (sel == "")\n\
		  beep()\n\
		else\n\
		  {\n\
		  replace_range($cursor, $cursor, sel)\n\
		  set_cursor_pos($cursor + length(sel))\n\
		  }\n\
	}\n\
	Edit>Delete back by Tab Stop:F12::: {\n\
		NEDIT_require_macro_file("tabDelete.nm")\n\
		\n\
		tab_delete()\n\
	}\n\
	Edit>Delete forward by Tab Stop:Shift+F12::: {\n\
		NEDIT_require_macro_file("tabDelete.nm")\n\
		\n\
		tab_delete_forward()\n\
	}\n\
	Edit>Insert Special>Non-breaking Space:::: {\n\
		insert_string(" ")\n\
	}\n\
	Edit>Insert Special>Insert tab:Ctrl+Grave::: {\n\
		insert_string("\\t")\n\
	}\n\
	Edit>Insert Special>ISO8859-1 Punctuation:::: {\n\
		s = " ¡¢£¤¥¦§¨©ª«¬­®¯°±²³´µ¶·¸¹º»¼½¾¿×÷"\n\
		l = ""\n\
		for (i = 0; i < length(s); i++)\n\
		  {\n\
		  if (i > 0 && i % 6 == 0)\n\
		    l = l "\\n"\n\
		  l = l " "(i % 6) ": " substring(s, i, i + 1) "  "\n\
		  }\n\
		\n\
		s = ""\n\
		while (s == "")\n\
		  {\n\
		  s = list_dialog("Choose a line and an index within it",\\\n\
				  l"\\n", "0", "1", "2", "3", "4", "5")\n\
		  b = $list_dialog_button\n\
		  if (b <= 0 || b > 6)\n\
		    return\n\
		  }\n\
		\n\
		b--			# from 0 to 5\n\
		c = 7 * b + 4\n\
		insert_string(substring(s, c, c + 1))\n\
	}\n\
	Edit>Insert Special>ISO8859-1 Accents:::: {\n\
		s = "[A]:   0: À   1: Á   2: Â   3: Ã   4: Ä   5: Å   6: Æ\\n"\\\n\
		    "[a]:   0: à   1: á   2: â   3: ã   4: ä   5: å   6: æ\\n"\\\n\
		    "[E]:   0: È   1: É   2: Ê   3: Ë\\n"\\\n\
		    "[e]:   0: è   1: é   2: ê   3: ë\\n"\\\n\
		    "[I]:   0: Ì   1: Í   2: Î   3: Ï\\n"\\\n\
		    "[i]:   0: ì   1: í   2: î   3: ï\\n"\\\n\
		    "[O]:   0: Ò   1: Ó   2: Ô   3: Õ   4: Ö   5: Ø\\n"\\\n\
		    "[o]:   0: ò   1: ó   2: ô   3: õ   4: ö   5: ø\\n"\\\n\
		    "[U]:   0: Ù   1: Ú   2: Û   3: Ü\\n"\\\n\
		    "[u]:   0: ù   1: ú   2: û   3: ü\\n"\\\n\
		    "[Y]:   0: Ý   1: ý   2: ÿ\\n"\\\n\
		    "[CN]:  0: Ç   1: ç   2: Ñ   3: ñ\\n"\\\n\
		    "[ÐÞß]: 0: Ð   1: Þ   2: ð   3: þ   4: ß\\n"\n\
		c = ""\n\
		while (c == "")\n\
		  {\n\
		  x = list_dialog("Choose a line and an index within it",\\\n\
				  s, "No", "0", "1", "2", "3", "4", "5", "6")\n\
		  b = $list_dialog_button\n\
		  if (b < 2 || b > 8)\n\
		    return\n\
		  \n\
		  b -= 2\n\
		  i = 7 * b + 10\n\
		  c = substring(x, i, i + 1)\n\
		  if (c == "")\n\
		    beep()\n\
		  }\n\
		insert_string(c)\n\
	}\n\
	Edit>Delete line:Shift+Ctrl+OsfDelete::: {\n\
		here = $cursor\n\
		beginning_of_line()\n\
		start = $cursor\n\
		end_of_line()\n\
		end = $cursor + 1\n\
		set_cursor_pos(here)\n\
		process_down()\n\
		replace_range(start, end, "")\n\
	}\n\
	Edit>Delete to end:Shift+Ctrl+Alt+OsfDelete::: {\n\
		if ($selection_start == -1) {\n\
		  if (get_character($cursor) == "\\n")\n\
		    delete_next_character()\n\
		  else\n\
		    delete_to_end_of_line()\n\
		  }\n\
		else {\n\
		  delete_selection()\n\
		  }\n\
	}\n\
	Edit>Deselect:Ctrl+Space::: {\n\
		if ($selection_start != -1)\n\
		  deselect_all()\n\
	}\n\
	Edit>Next window:Ctrl+Tab::: {\n\
		NEDIT_require_macro_file("win_nextprev.nm")\n\
		\n\
		win_next()\n\
	}\n\
	Edit>Prev window:Shift+Ctrl+Tab::: {\n\
		NEDIT_require_macro_file("win_nextprev.nm")\n\
		\n\
		win_prev()\n\
	}\n\
	Edit>Find in files>Find line@C:Ctrl+Alt+F::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		if ($selection_start == -1)\n\
		  greplines_from_prompt("./*.[ch] /dev/null")\n\
		else\n\
		  {\n\
		  greplines("./*.[ch] /dev/null", get_selection())\n\
		  }\n\
	}\n\
	Edit>Find in files>Find line@C++:Ctrl+Alt+F::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		if ($selection_start == -1)\n\
		  greplines_from_prompt("./*.[CHch]* /dev/null")\n\
		else\n\
		  {\n\
		  greplines("./*.[CHch]* /dev/null", get_selection())\n\
		  }\n\
	}\n\
	Edit>Find in files>Find line C/C++ (-R)@C@C++:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		greplines_from_prompt_r("*.[cChH][+pP][+pP] *.[cChH] *.inl *.INL")\n\
	}\n\
	Edit>Find in files>Find line in *:Ctrl+Alt+F::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		if ($selection_start == -1)\n\
		  greplines_from_prompt("* /dev/null")\n\
		else\n\
		  {\n\
		  greplines("* /dev/null", get_selection())\n\
		  }\n\
	}\n\
	Edit>Strip trailing space:::: {\n\
		if ($selection_start == -1)\n\
		{\n\
			str = get_range(0, $text_length)\n\
			mod = replace_in_string(str, "\\\\s+$", "", "regex", "copy")\n\
			if (str != mod)\n\
				replace_range(0, $text_length, mod)\n\
		}\n\
		else\n\
		{\n\
			str = get_selection()\n\
			mod = replace_in_string(str, "\\\\s+$", "", "regex", "copy")\n\
			if (str != mod)\n\
				replace_selection(mod)\n\
		}\n\
	}\n\
	Edit>Detab:::: {\n\
		NEDIT_require_macro_file("redetab.nm")\n\
		\n\
		if ($selection_start != -1)\n\
			redetab_selection("detab")\n\
		else\n\
			{\n\
			s = detab(get_range(0, $text_length), 0, 0, 0, $tab_dist)\n\
			replace_range(0, $text_length, s)\n\
			}\n\
	}\n\
	Edit>Retab (for string)@C@C++@Java@JavaScript@Yacc@Awk@NEdit Macro:::R: {\n\
		NEDIT_require_macro_file("redetab.nm")\n\
		\n\
		redetab_selection("retab", "\\"([^\\\\n\\\\\\\\\\"]|\\\\\\\\\\\\n|\\\\\\\\.)*\\"")\n\
	}\n\
	Edit>Retab:::R: {\n\
		NEDIT_require_macro_file("redetab.nm")\n\
		\n\
		redetab_selection("retab")\n\
	}\n\
	Edit>Insert tab:Ctrl+Grave::: {\n\
		insert_string("\\t")\n\
	}\n\
	Edit>Show tabs:::R: {\n\
		NEDIT_require_macro_file("redetab.nm")\n\
		\n\
		showtabspace("display")\n\
	}\n\
	Edit>Complete Word>Recent@*:Shift+Ctrl+Alt+Space::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($multitags_symbols == "")\n\
		  multitags_load_multitags_file()\n\
		\n\
		wordfinish($multitags_symbols)\n\
	}\n\
	Edit>Complete Word>Recent@C@C++:Shift+Ctrl+Alt+Space::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($multitags_symbols == "")\n\
		  multitags_load_all_multitags_file()\n\
		\n\
		wordfinish($multitags_symbols)\n\
	}\n\
	Edit>Complete Word>Default:Shift+Ctrl+Space::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($wordfinish_sym_list == "")\n\
		  {\n\
		  wordfinish_add_symfiles()\n\
		  }\n\
		\n\
		if ($multitags_symbols == "")\n\
		  {\n\
		  multitags_load_symbols()\n\
		  if ($multitags_symbols != "")\n\
		    wordfinish_add_symbols($multitags_symbols)\n\
		  }\n\
		\n\
		wordfinish($wordfinish_sym_list)\n\
	}\n\
	Edit>Complete Word>Forward@*:Alt+Right::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($wordfinish_sym_list == "")\n\
		  {\n\
		  wordfinish_add_symfiles()\n\
		  }\n\
		\n\
		if ($multitags_symbols == "")\n\
		  {\n\
		  multitags_load_symbols()\n\
		  if ($multitags_symbols != "")\n\
		    wordfinish_add_symbols($multitags_symbols)\n\
		  }\n\
		\n\
		wordfinish($wordfinish_sym_list, "forward")\n\
	}\n\
	Edit>Complete Word>Forward@C@C++:Alt+Right::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($wordfinish_sym_list == "")\n\
		  {\n\
		  wordfinish_add_symfiles()\n\
		  }\n\
		\n\
		if ($multitags_symbols == "")\n\
		  {\n\
		  if ($multitags == "")\n\
		    multitags_load_all_multitags_file()\n\
		  multitags_load_symbols()\n\
		  if ($multitags_symbols != "")\n\
		    wordfinish_add_symbols($multitags_symbols)\n\
		  }\n\
		\n\
		wordfinish($wordfinish_sym_list, "forward")\n\
	}\n\
	Edit>Complete Word>Backward@*:Alt+Left::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($wordfinish_sym_list == "")\n\
		  {\n\
		  wordfinish_add_symfiles()\n\
		  }\n\
		\n\
		if ($multitags_symbols == "")\n\
		  {\n\
		  multitags_load_symbols()\n\
		  if ($multitags_symbols != "")\n\
		    wordfinish_add_symbols($multitags_symbols)\n\
		  }\n\
		\n\
		wordfinish($wordfinish_sym_list, "backward")\n\
	}\n\
	Edit>Complete Word>Backward@C@C++:Alt+Left::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("wordfinish.nm")\n\
		\n\
		if ($wordfinish_sym_list == "")\n\
		  {\n\
		  wordfinish_add_symfiles()\n\
		  }\n\
		\n\
		if ($multitags_symbols == "")\n\
		  {\n\
		  multitags_load_all_multitags_file()\n\
		  multitags_load_symbols()\n\
		  if ($multitags_symbols != "")\n\
		    wordfinish_add_symbols($multitags_symbols)\n\
		  }\n\
		\n\
		wordfinish($wordfinish_sym_list, "backward")\n\
	}\n\
	Edit>Complete Word>Deselect:Alt+Down::: {\n\
		if ($selection_start != -1)\n\
		  deselect_all()\n\
	}\n\
	Edit>Complete Word>Del Select:Alt+Up::R: {\n\
		if ($selection_start != -1)\n\
		  replace_selection("")\n\
	}\n\
	Edit>Complete Word>Standard:Alt+D::: {\n\
		# Tuning parameters\n\
		ScanDistance = 200\n\
		\n\
		# Search back to a word boundary to find the word to complete\n\
		startScan = max(0, $cursor - ScanDistance)\n\
		endScan = min($text_length, $cursor + ScanDistance)\n\
		scanString = get_range(startScan, endScan)\n\
		keyEnd = $cursor-startScan\n\
		keyStart = search_string(scanString, "<", keyEnd, "backward", "regex")\n\
		if (keyStart == -1)\n\
		    return\n\
		keyString = "<" substring(scanString, keyStart, keyEnd)\n\
		\n\
		# search both forward and backward from the cursor position.  Note that\n\
		# using a regex search can lead to incorrect results if any of the special\n\
		# regex characters is encountered, which is not considered a delimiter\n\
		backwardSearchResult = search_string(scanString, keyString, keyStart-1, \\\n\
			"backward", "regex")\n\
		forwardSearchResult = search_string(scanString, keyString, keyEnd, "regex")\n\
		if (backwardSearchResult == -1 && forwardSearchResult == -1) {\n\
		    beep()\n\
		    return\n\
		}\n\
		\n\
		# if only one direction matched, use that, otherwise use the nearest\n\
		if (backwardSearchResult == -1)\n\
		    matchStart = forwardSearchResult\n\
		else if (forwardSearchResult == -1)\n\
		    matchStart = backwardSearchResult\n\
		else {\n\
		    if (keyStart - backwardSearchResult <= forwardSearchResult - keyEnd)\n\
			matchStart = backwardSearchResult\n\
		    else\n\
			matchStart = forwardSearchResult\n\
		}\n\
		\n\
		# find the complete word\n\
		matchEnd = search_string(scanString, ">", matchStart, "regex")\n\
		completedWord = substring(scanString, matchStart, matchEnd)\n\
		\n\
		# replace it in the window\n\
		replace_range(startScan + keyStart, $cursor, completedWord)\n\
	}\n\
	Edit>Toggle case next:Ctrl+Alt+6::: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		replace_range($cursor, $cursor+1, togglecase(get_character($cursor)))\n\
		forward_character()\n\
	}\n\
	Edit>Toggle case sel:::R: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		replace_selection(togglecase(get_selection()))\n\
	}\n\
	HTML>directive@SGML HTML@XML:Shift+Ctrl+Period::R: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_convert_to_markup()\n\
	}\n\
	HTML>dialog directive@SGML HTML@XML:Shift+Ctrl+Slash::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_ask_for_markup()\n\
	}\n\
	HTML>-a name-@SGML HTML:Ctrl+Alt+A::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_make_A_NAME()\n\
	}\n\
	HTML>-a href-@SGML HTML:Alt+A::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_make_A_HREF()\n\
	}\n\
	HTML>-tt-@SGML HTML:Alt+T::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_add_markup_brackets("TT")\n\
	}\n\
	HTML>-i-@SGML HTML:Alt+I::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_add_markup_brackets("I")\n\
	}\n\
	HTML>-b-@SGML HTML:Alt+B::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_add_markup_brackets("B")\n\
	}\n\
	HTML>-p-@SGML HTML:Shift+Ctrl+P::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		if ($selection_start != -1) {\n\
		  s = "<p>" get_selection() "</p>"\n\
		  replace_selection(s)\n\
		  fill_paragraph()\n\
		  end_of_selection()\n\
		  deselect_all()\n\
		}\n\
		else {\n\
		  html_add_markup_brackets("p")\n\
		}\n\
	}\n\
	HTML>-strong-@SGML HTML:Shift+Ctrl+S::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		html_add_markup_brackets("strong")\n\
	}\n\
	HTML>-pre-@SGML HTML:::: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		if ($selection_start == -1)\n\
		  html_add_markup_brackets("PRE")\n\
		else\n\
		  {\n\
		  sel = get_selection()\n\
		  e = $selection_start\n\
		\n\
		  if (search_string(sel, "&", 0) != -1)\n\
		    sel = replace_in_string(sel, "&", "&amp;")\n\
		\n\
		  if (search_string(sel, "<", 0) != -1)\n\
		    sel = replace_in_string(sel, "<", "&lt;")\n\
		\n\
		  if (search_string(sel, ">", 0) != -1)\n\
		    sel = replace_in_string(sel, ">", "&gt;")\n\
		\n\
		  sel = "<pre>\\n" sel "</pre>\\n"\n\
		\n\
		  replace_selection(sel)\n\
		  deselect_all()\n\
		  set_cursor_pos(e)\n\
		  }\n\
	}\n\
	HTML>&entities;@SGML HTML@XML:::R: {\n\
		NEDIT_require_macro_file("html.nm")\n\
		\n\
		s = html_entities()\n\
		replace_selection(s)\n\
	}\n\
	Various>Macro>NEDIT_LOADED settings:::: {\n\
		NEDIT_show_settings()\n\
	}\n\
	Various>Macro>Loaded files full:::: {\n\
		NEDIT_show_macro_files()\n\
	}\n\
	Various>Macro>Loaded files:::: {\n\
		NEDIT_show_macro_file_names()\n\
	}\n\
	Various>Macro>Reload file:::: {\n\
		NEDIT_request_reload_macro_file()\n\
	}\n\
	Various>Macro>Reload this file@NEdit Macro:::: {\n\
		NEDIT_request_reload_macro_file($file_path $file_name)\n\
	}\n\
	Various>Macro>Reload all:::: {\n\
		NEDIT_reload_all_macro_files()\n\
	}\n\
	Various>Macro>Open file:::: {\n\
		NEDIT_request_edit_macro_file()\n\
	}\n\
	Various>Macro>Compare nedit-{light|dark}.rc:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		base = $NEDIT_HOME_DIR\n\
		\n\
		nlight = base "/nedit-light.rc"\n\
		ndark  = base "/nedit-dark.rc"\n\
		\n\
		# start by altering resettable color settings\n\
		\n\
		# load the files\n\
		flight = read_file(nlight)\n\
		if (!$read_status || flight == "")\n\
		  return dialog("Cannot find file " nlight, "Cancel")\n\
		llight = length(flight)\n\
		\n\
		fdark = read_file(ndark)\n\
		if (!$read_status || fdark == "")\n\
		  return dialog("Cannot find file " ndark, "Cancel")\n\
		ldark = length(fdark)\n\
		\n\
		# substitute the color specs (ending with ...Color|ground)\n\
		findColor = "^nedit.([a-z])(\\\\w*(?:Color|[gG]round): )"\n\
		replColor = "nedit.\\\\U\\\\1\\\\2"\n\
		\n\
		flight = replace_in_string(flight, findColor, replColor, "regex")\n\
		fdark  = replace_in_string(fdark,  findColor, replColor, "regex")\n\
		\n\
		# ask whether to write back the results\n\
		msg = ""\n\
		if (flight != "") msg = msg nlight " color settings altered\\n"\n\
		if (fdark  != "") msg = msg ndark  " color settings altered\\n"\n\
		if (msg != "")\n\
		  {\n\
		  msg = msg "\\nWrite back altered file(s)?"\n\
		  if (dialog(msg, "Yes", "No") == 1)\n\
		    {\n\
		    r = 1\n\
		    if (flight != "") r = write_file(flight, nlight)\n\
		    if (!r) return dialog("Error writing back " nlight, "Cancel")\n\
		    r = 1\n\
		    if (fdark  != "") r = write_file(fdark,  ndark)\n\
		    if (!r) return dialog("Error writing back " ndark, "Cancel")\n\
		    }\n\
		  }\n\
		\n\
		# now diff the adjusted files\n\
		new()\n\
		focus_window("last")\n\
		raise_window()\n\
		\n\
		insert_string("diff " nlight " " ndark)\n\
		execute_command_line()\n\
		set_language_mode("X Resources")\n\
		\n\
		fileMerge_from_diff()\n\
	}\n\
	Various>Macro>Make Macro Calltips:::: {\n\
		NEDIT_require_macro_file("MakeMacroCallTips.nm")\n\
		\n\
		# default file name\n\
		#fname = replace_in_string($NEDIT_MACRO_DIR, "/$", "", "regex", "copy") ".ct"\n\
		fname = $NEDIT_HOME_DIR "/calltips/" $NEDIT_MACRO_DIR_NAME ".ct"\n\
		fname = NEDIT_reduce_filename(fname)\n\
		\n\
		s = list_dialog("Send calltips data where?", \\\n\
		                "New document window\\n" \\\n\
		                "File " fname "\\n" \\\n\
		                "", "OK", "Cancel")\n\
		if ($list_dialog_button != 1)\n\
		  return\n\
		\n\
		cts = MakeMacroCallTips($NEDIT_MACRO_DIR)\n\
		if (cts == "")\n\
		  return dialog("failed to create calltips from files in " $NEDIT_MACRO_DIR)\n\
		\n\
		if (s == "New document window")\n\
		  {\n\
		  new()\n\
		  focus_window("last")\n\
		  insert_string(cts)\n\
		  }\n\
		else if (s == ("File " fname))\n\
		  {\n\
		  if (!write_file(cts, fname))\n\
		    dialog("Failed to save calltips to file " fname)\n\
		  }\n\
	}\n\
	Various>Macro>Make Macro Calltips (Debug):::: {\n\
		NEDIT_require_macro_file("MakeMacroCallTipsDbg.nm")\n\
		\n\
		# default file name\n\
		#fname = replace_in_string($NEDIT_MACRO_DIR, "/$", "", "regex", "copy") ".ct"\n\
		fname = $NEDIT_HOME_DIR "/calltips/" $NEDIT_MACRO_DIR_NAME ".ct"\n\
		fname = NEDIT_reduce_filename(fname)\n\
		\n\
		s = list_dialog("Send calltips data where?", \\\n\
		                "New document window\\n" \\\n\
		                "File " fname "\\n" \\\n\
		                "", "OK", "Cancel")\n\
		if ($list_dialog_button != 1)\n\
		  return\n\
		\n\
		cts = MakeMacroCallTipsDbg($NEDIT_MACRO_DIR)\n\
		if (cts == "")\n\
		  return dialog("failed to create calltips from files in " $NEDIT_MACRO_DIR)\n\
		\n\
		if (s == "New document window")\n\
		  {\n\
		  new()\n\
		  focus_window("last")\n\
		  insert_string(cts)\n\
		  }\n\
		else if (s == ("File " fname))\n\
		  {\n\
		  if (!write_file(cts, fname))\n\
		    dialog("Failed to save calltips to file " fname)\n\
		  }\n\
	}\n\
	Various>Fill Sel. w/Char:::R: {\n\
		if ($selection_start == -1) {\n\
		    beep()\n\
		    return\n\
		}\n\
		\n\
		# Ask the user what character to fill with\n\
		fillChar = string_dialog("Fill selection with what character?", "OK", "Cancel")\n\
		if ($string_dialog_button == 2)\n\
		    return\n\
		\n\
		# Count the number of lines in the selection\n\
		nLines = 0\n\
		for (i=$selection_start; i<$selection_end; i++)\n\
		    if (get_character(i) == "\\n")\n\
			nLines++\n\
		\n\
		# Create the fill text\n\
		rectangular = $selection_left != -1\n\
		line = ""\n\
		fillText = ""\n\
		if (rectangular) {\n\
		    for (i=0; i<$selection_right-$selection_left; i++)\n\
			line = line fillChar\n\
		    for (i=0; i<nLines; i++)\n\
			fillText = fillText line "\\n"\n\
		    fillText = fillText line\n\
		} else {\n\
		    if (nLines == 0) {\n\
			for (i=$selection_start; i<$selection_end; i++)\n\
			    fillText = fillText fillChar\n\
		    } else {\n\
			startIndent = 0\n\
			for (i=$selection_start-1; i>=0 && get_character(i)!="\\n"; i--)\n\
			    startIndent++\n\
			for (i=0; i<$wrap_margin-startIndent; i++)\n\
			    fillText = fillText fillChar\n\
			fillText = fillText "\\n"\n\
			for (i=0; i<$wrap_margin; i++)\n\
			    line = line fillChar\n\
			for (i=0; i<nLines-1; i++)\n\
			    fillText = fillText line "\\n"\n\
			for (i=$selection_end-1; i>=$selection_start && get_character(i)!="\\n"; \\\n\
				i--)\n\
			    fillText = fillText fillChar\n\
		    }\n\
		}\n\
		\n\
		# Replace the selection with the fill text\n\
		replace_selection(fillText)\n\
	}\n\
	Various>Build Cols:::R: {\n\
		NEDIT_require_macro_file("columns.nm")\n\
		\n\
		make_columns_dialog()\n\
	}\n\
	Various>Quote Mail Reply:::: {\n\
		if ($selection_start == -1)\n\
		    replace_all("^.*$", "\\\\> &", "regex")\n\
		else\n\
		    replace_in_selection("^.*$", "\\\\> &", "regex")\n\
	}\n\
	Various>Unquote Mail Reply:::: {\n\
		if ($selection_start == -1)\n\
		    replace_all("(^\\\\> )(.*)$", "\\\\2", "regex")\n\
		else\n\
		    replace_in_selection("(^\\\\> )(.*)$", "\\\\2", "regex")\n\
	}\n\
	Various>NEdit macro help@NEdit Macro:Ctrl+F1::: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		NEDIT_require_macro_file("builtins_help.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		s = ""\n\
		c = $cursor\n\
		if ($selection_start == -1)\n\
		  {\n\
		  b = search("<", $cursor, "regex", "backward")\n\
		  e = search(">", $cursor, "regex", "forward")\n\
		  s = get_range(b, e)\n\
		  }\n\
		else\n\
		  s = get_selection()\n\
		\n\
		if (s != "")\n\
		  {\n\
		  multitags_push_curpos()\n\
		  builtins_help(s)\n\
		  centerline()\n\
		  # multitags_pop_curpos()\n\
		  # deselect_all()\n\
		  # set_cursor_pos(c)\n\
		  }\n\
	}\n\
	Various>NEdit DEBUG macros>Enable:::: {\n\
		NEDIT_require_macro_file("DEBUG.nm")\n\
		\n\
		$DEBUG_ENABLE = 1\n\
	}\n\
	Various>NEdit DEBUG macros>Disable:::: {\n\
		NEDIT_require_macro_file("DEBUG.nm")\n\
		\n\
		$DEBUG_ENABLE = 0\n\
	}\n\
	Various>NEdit DEBUG macros>Clear All:::: {\n\
		NEDIT_require_macro_file("DEBUG.nm")\n\
		\n\
		DEBUG_clear_all()\n\
	}\n\
	Various>Show Language Mode:::: {\n\
		s = ""\n\
		s = s "File is " $file_name "\\n"\n\
		s = s "Path is " $file_path "\\n\\n"\n\
		s = s "Language mode is " $language_mode "\\n"\n\
		s = s "Auto-indent is " $auto_indent "\\n"\n\
		s = s "Tab spacing is " $tab_dist\n\
		tab = $em_tab_dist\n\
		if (tab < 0)\n\
		  tab = "off"\n\
		s = s ", Emulated tab spacing is " tab "\\n"\n\
		if ($use_tabs)\n\
		  tab = "hard tabs"\n\
		else\n\
		  tab = "spaces only"\n\
		s = s "Using " tab " in padding and tab emulation\\n"\n\
		\n\
		s = s "Syntax highlighting is "\n\
		if ($highlight_syntax)\n\
		  s = s "on\\n"\n\
		else\n\
		  s = s "off\\n"\n\
		\n\
		s = s "Wrap text mode is " $wrap_text\n\
		s = s " (margin = " $wrap_margin ")\\n"\n\
		\n\
		\n\
		s = s "\\nFile format is " $file_format\n\
		\n\
		dialog(s)\n\
		\n\
	}\n\
	Various>Change Locking:::: {\n\
		s = ""\n\
		n = 0\n\
		while (1)\n\
		  {\n\
		  n = dialog("Set file lock", "on", "off", "toggle", "<none>", 0, 1, 2, "dismiss")\n\
		\n\
		  if (n == 1)\n\
		    s = "on"\n\
		  else if (n == 2)\n\
		    s = "off"\n\
		  else if (n == 3)\n\
		    s = "toggle"\n\
		  else if (n == 4)\n\
		    s = ""\n\
		  else if (n == 5)\n\
		    s = ""\n\
		  else if (n == 6)\n\
		    s = ""\n\
		  else if (n == 7)\n\
		    s = ""\n\
		  else\n\
		    break\n\
		\n\
		  if (s == "")\n\
		    {\n\
		    if (n == 4)\n\
		      set_read_only()\n\
		    else if (n == 5)\n\
		      set_read_only(0)\n\
		    else if (n == 6)\n\
		      set_read_only(1)\n\
		    else if (n == 7)\n\
		      set_read_only(2)\n\
		    }\n\
		  else\n\
		    set_read_only(s)\n\
		  }\n\
	}\n\
	Various>Code for ROR13:::R: {\n\
		NEDIT_require_macro_file("ROR13.nm")\n\
		\n\
		replace_selection(code_ror13(get_selection()))\n\
	}\n\
	Various>Hex to char:::R: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		replace_selection(hex2_to_str(get_selection()))\n\
	}\n\
	Various>Char to hex:::R: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		replace_selection(char_to_hex(get_selection()))\n\
	}\n\
	Various>Useful REGEXes>Find a REGEX:::: {\n\
		NEDIT_require_macro_file("REGEX_store.nm")\n\
		\n\
		REGEX_fetch()\n\
	}\n\
	Various>Useful REGEXes>Open REGEX file:::: {\n\
		NEDIT_require_macro_file("REGEX_store.nm")\n\
		\n\
		REGEX_open_regexes_file()\n\
	}\n\
	Various>Useful REGEXes>(Re)load REGEX file:::: {\n\
		NEDIT_require_macro_file("REGEX_store.nm")\n\
		\n\
		REGEX_load_regexes()\n\
	}\n\
	Various>Useful REGEXes>Find quoted REGEX:::: {\n\
		# we want something to match a non-string-delimiting double quote\n\
		nonDelimDQ = "(?:\\\\\\\\.|[^\\\\\\\\\\"])"\n\
		nonDelimDQs = nonDelimDQ "*"\n\
		\n\
		# anchored RE has either a ^ at the front or a $ at the end\n\
		anchored = "\\\\^" nonDelimDQs "|" nonDelimDQs "\\\\$"\n\
		\n\
		# for non-anchored, just detect whether the string contains typical RE pieces\n\
		nonAnchored =   nonDelimDQs                  # start set of typical RE pieces  \\\n\
		          "(?:" "\\\\(\\\\?"                     # start parenthetical expression  \\\n\
		            "|" "[]).][*+?]"                 # repeat after class,group,any    \\\n\
		            "|" "[*+]\\\\?"                    # non-greedy repeat               \\\n\
		            "|" "\\\\[\\\\^?" nonDelimDQ "+?\\\\]" # [character-class]               \\\n\
		            "|" "\\\\|"                        # pipe-char                       \\\n\
		            "|" "\\\\\\\\\\\\\\\\[1-9&dDlLsSwWyYuUabefnrtv]" # double-backslashed char \\\n\
		            "|" "\\\\\\\\[-\\\\[\\\\]<>{}().|^$*+?&]"        # escaped RE metachar     \\\n\
		            ")" nonDelimDQs\n\
		\n\
		matchRE = "\\"(?:" anchored "|" nonAnchored ")\\""\n\
		\n\
		find(matchRE, "regex")\n\
	}\n\
	Various>Calltip files>Open file:::: {\n\
		# default file directory\n\
		dname = $NEDIT_HOME_DIR "/calltips/"\n\
		\n\
		perms = "\\\\( -perm -u+r -o -perm -g+r -o -perm -o+r \\\\)"\n\
		find_cmd = "find . -name \\\\*.ct -type f " perms " -print 2>/dev/null"\n\
		chdir_cmd = "cd " dname " 2>/dev/null"\n\
		\n\
		# does the base directory exist?\n\
		shell_command("exec sh -c '" chdir_cmd "'", "")\n\
		if ($shell_cmd_status != 0)\n\
		  {\n\
		  dialog("The calltip file directory '" dname "' cannot be found", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# get the list of calltip files there\n\
		flist = shell_command("exec sh -c '" chdir_cmd " && " find_cmd "'", "")\n\
		flist = replace_in_string(flist, "^\\\\./", "", "regex", "copy")\n\
		\n\
		fname = list_dialog("Open which calltip file in " dname "?", flist, \\\n\
		                    "OK", "Cancel")\n\
		if (fname == "" || $list_dialog_button != 1)\n\
		  return\n\
		\n\
		file = dname fname\n\
		open(file)\n\
	}\n\
	Various>Calltip files>Load file:::: {\n\
		# default file directory\n\
		dname = $NEDIT_HOME_DIR "/calltips/"\n\
		\n\
		perms = "\\\\( -perm -u+r -o -perm -g+r -o -perm -o+r \\\\)"\n\
		find_cmd = "find . -name \\\\*.ct -type f " perms " -print 2>/dev/null"\n\
		chdir_cmd = "cd " dname " 2>/dev/null"\n\
		\n\
		# does the base directory exist?\n\
		shell_command("exec sh -c '" chdir_cmd "'", "")\n\
		if ($shell_cmd_status != 0)\n\
		  {\n\
		  dialog("The calltip file directory '" dname "' cannot be found", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# get the list of calltip files there\n\
		flist = shell_command("exec sh -c '" chdir_cmd " && " find_cmd "'", "")\n\
		flist = replace_in_string(flist, "^\\\\./", "", "regex", "copy")\n\
		\n\
		fname = list_dialog("Open which calltip file in " dname "?", flist, \\\n\
		                    "OK", "Cancel")\n\
		if (fname == "" || $list_dialog_button != 1)\n\
		  return\n\
		\n\
		file = dname fname\n\
		load_tips_file(file)\n\
	}\n\
	Various>Calltip files>Create new:::: {\n\
		# default file directory\n\
		dname = $NEDIT_HOME_DIR "/calltips/"\n\
		\n\
		perms = "\\\\( -perm -u+r -o -perm -g+r -o -perm -o+r \\\\)"\n\
		find_cmd = "find . -name \\\\*.ct -type f " perms " -print 2>/dev/null"\n\
		chdir_cmd = "cd " dname " 2>/dev/null"\n\
		\n\
		# does the base directory exist?\n\
		shell_command("exec sh -c '" chdir_cmd "'", "")\n\
		if ($shell_cmd_status != 0)\n\
		  {\n\
		  dialog("The calltip file directory '" dname "' cannot be found", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# get the list of calltip files there\n\
		flist = shell_command("exec sh -c '" chdir_cmd " && " find_cmd "'", "")\n\
		flist = replace_in_string(flist, "^\\\\./", "", "regex", "copy")\n\
		\n\
		fname = string_dialog("Calltips file to be created in " dname, "OK", "Cancel")\n\
		if (fname == "" || $string_dialog_button != 1)\n\
		  return\n\
		\n\
		forig = fname\n\
		fname = replace_in_string(fname, "^./+", "", "regex", "copy")\n\
		fname = replace_in_string(fname, "/./", "/", "regex", "copy")\n\
		fname = replace_in_string(fname, "//+", "/", "regex", "copy")\n\
		\n\
		# check for valid characters only, please!\n\
		pos = search_string(fname, "(?n[^-+=,./:\\\\l\\\\w])", 0, "regex")\n\
		if (pos >= 0)\n\
		  {\n\
		  dialog("The filename '" forig "' should not contain '" \\\n\
		         substring(fname, pos, pos + 1) "'", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# disallow access to parent directories or to root; cannot end with "/"\n\
		if (search_string(fname, "/../", 0) >= 0 || \\\n\
		    search_string(fname, "^(\\\\.\\\\.)?/", 0, "regex") >= 0)\n\
		  {\n\
		  dialog("This macro cannot be used to create files" \\\n\
		         " outside the " dname " subtree\\n" \\\n\
		         "The specification\\n    " forig " (" fname ")\\n" \\\n\
		         "contains references to parent directories", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# we cannot start with a "." nor end with a "/"\n\
		if (substring(fname, 0, 1) == "." || substring(fname, -1) == "/")\n\
		  {\n\
		  dialog("This macro requires a real, visible file name\\n" \\\n\
		         "The specification\\n    " forig " (" fname ")\\n" \\\n\
		         "does not provide this", "Cancel")\n\
		  return\n\
		  }\n\
		\n\
		# add the .ct extension if not yet there\n\
		if (search_string(fname, "\\\\.ct$", 0, "regex") < 0)\n\
		  fname = fname ".ct"\n\
		\n\
		file = dname fname\n\
		\n\
		# does the file already exist?\n\
		if (search_string("\\n" flist, "\\n" fname "\\n", 0) >= 0)\n\
		  {\n\
		  res = dialog("The filename '" forig "' already exists as '" fname "'\\n" \\\n\
		               "Open it?", "OK", "Cancel")\n\
		  if (res == 1)\n\
		    open(file)\n\
		  return\n\
		  }\n\
		\n\
		# does the path exist?\n\
		pos = search_string(fname, "/", 0)\n\
		if (pos > 0)\n\
		  {\n\
		  # prepare a command to check file path components\n\
		  path = replace_in_string(fname, "/[^/]+$", "", "regex") # remove file's name\n\
		  dirs = replace_in_string(path, "/", " ", "copy")\n\
		  mkdir_cmd = "for d in " dirs "; do [ ! -d $a$d ] && mkdir $a$d; a=$a$d/; done"\n\
		  # modern versions of mkdir support the -p argument - that would give\n\
		  #     mkdir_cmd = "mkdir -p " path\n\
		  chkdir_cmd = "[ -d " path " ]"\n\
		  touch_cmd = "touch " fname\n\
		  cmd = "exec sh -c '" chdir_cmd "; " mkdir_cmd "; " \\\n\
		                       chkdir_cmd "; " touch_cmd "'"\n\
		  res = shell_command(cmd, "")\n\
		  if ($shell_cmd_status != 0)\n\
		    {\n\
		    dialog("Could not create full path\\n  " path \\\n\
		           "\\nfor file \\n"  fname "\\nin directory " dname \\\n\
		           "\\n\\ncommand: " cmd \\\n\
		           "\\noutput:\\n" res, "Cancel")\n\
		    return\n\
		    }\n\
		  }\n\
		\n\
		open(file)\n\
		focus_window("last")\n\
	}\n\
	Rangesets>Add:::R: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_ask("Range set to add to")\n\
		if (L == "")\n\
		    return\n\
		\n\
		r = RangeSet_add(L)\n\
	}\n\
	Rangesets>Find>All in "Find All" (green):::: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		NEDIT_require_macro_file("RSfindAll.nm")\n\
		\n\
		rs = "Find All"\n\
		action = "ask"\n\
		\n\
		# create the range set\n\
		if (!RangeSet_getRangeSet(rs))\n\
		  {\n\
		  if (!RangeSet_getNewRangeSet(rs))\n\
		    {\n\
		    dialog("Could not create range set " rs, "Cancel")\n\
		    return\n\
		    }\n\
		\n\
		  if (RangeSet_IsDarkBg())\n\
		    RangeSet_set_color_basic(rs, "#007f40")\n\
		  else\n\
		    RangeSet_set_color_basic(rs, "#a0ff00")\n\
		\n\
		  action = "add"\n\
		  }\n\
		\n\
		RangeSet_FindAll_Ask(rs, action)\n\
	}\n\
	Rangesets>Find>All:::: {\n\
		NEDIT_require_macro_file("RSfindAll.nm")\n\
		\n\
		RangeSet_FindAll_Ask()\n\
	}\n\
	Rangesets>Find>All (all files):::: {\n\
		NEDIT_require_macro_file("RSfindAll.nm")\n\
		\n\
		info = RangeSet_FindAll_Ask_AllDocs()\n\
		if (info[])\n\
		  {\n\
		  new("window")\n\
		  focus_window("last")\n\
		  raise_window()\n\
		  insert_string(  "Pattern:     " info["pattern"] \\\n\
		                "\\nType:        " info["type"] \\\n\
		                "\\nOccurrences: " info["occurrences"] \\\n\
		                "\\n\\n" info["results"])\n\
		\n\
		  set_language_mode("grep -n out")\n\
		  }\n\
	}\n\
	Rangesets>Color>Dark Background?:::: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		\n\
		RangeSet_askIfDarkBg()\n\
	}\n\
	Rangesets>Color>Quick:::: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		\n\
		RangeSet_QuickColor()\n\
	}\n\
	Rangesets>Color>Set:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_ask("Range set to color")\n\
		if (L == "")\n\
		    return\n\
		\n\
		C = string_dialog("Color for Range set \\""L"\\"")\n\
		\n\
		if (C == "")\n\
		    r = RangeSet_set_color_basic(L)\n\
		else\n\
		    r = RangeSet_set_color_basic(L, C)\n\
	}\n\
	Rangesets>Color>Old-style:::: {\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		\n\
		list = $RangeSet_list\n\
		if (list != "") {\n\
		    LL = substring(list, 0, 1)\n\
		    L = string_dialog("Range set to color (defined: " list ")", "OK", "Set " LL, "Cancel")\n\
		    if (L == "" && $string_dialog_button == 2)\n\
			L = LL\n\
		    if (L == "")\n\
			return\n\
		}\n\
		else {\n\
		    L = string_dialog("Range set to color", "OK", "Cancel")\n\
		    if (L == "" || $string_dialog_button == 2)\n\
			return\n\
		}\n\
		\n\
		C = string_dialog("Color for Range set \\""L"\\"")\n\
		\n\
		if (C == "")\n\
		    r = RangeSet_set_color_basic(L)\n\
		else\n\
		    r = RangeSet_set_color_basic(L, C)\n\
	}\n\
	Rangesets>Color>XPM Color:::: {\n\
		NEDIT_require_macro_file("element.nm")\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		\n\
		set_language_mode("XPM pixmap")\n\
		\n\
		lablist = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"\n\
		charlist = ""\n\
		text = get_range(0, $text_length)\n\
		rest = $text_length\n\
		\n\
		for (i = 0; text != "";)\n\
		  {\n\
		  l = element_i(text, 0)\n\
		  text = element_from_to(text, 1)\n\
		\n\
		  if (search_string(l, "^\\"(.).*[ \\t]c[ \\t]([^ \\t\\"]+)\\",[ \\t]*$", 0, "regex") != -1)\n\
		    {\n\
		    v = replace_in_string(l, "^\\"(.).*[ \\t]c[ \\t]([^ \\t\\"]+)\\",[ \\t]*$", "\\\\1\\t\\\\2", "regex")\n\
		    r = substring(lablist, i, i+1)\n\
		    s = element_i(v, 0, "\\t")\n\
		    c = element_i(v, 1, "\\t")\n\
		    rest = length(text)\n\
		    if (tolower(c) == "none")\n\
		      continue\n\
		    if (i >= 26)\n\
		      continue\n\
		    i++\n\
		#   dialog("l='"l"'\\nv='"v"'\\n"i": Color range "r" for letter '"s"' with "c)\n\
		    charlist = charlist s\n\
		    if (RangeSet_defined(r))\n\
		      RangeSet_forget(r)\n\
		    RangeSet_set_color_basic(r, c)\n\
		    }\n\
		  }\n\
		\n\
		startpos = search("^\\"", $text_length - rest, "regex")\n\
		\n\
		while (i > 0)\n\
		  {\n\
		  s = substring(charlist, i-1, i)\n\
		  r = substring(lablist, i-1, i)\n\
		  sre = s\n\
		# dialog("search_string(\\"[]\\\\|+*?.^$<>\\", \\""s"\\", 0, \\"case\\") = "  search_string("[]\\\\|+*?.^$<>", s, 0, "case"))\n\
		  if (search_string("[]\\\\|+*?.^$<>", s, 0, "case") >= 0)\n\
		    sre = "\\\\"s\n\
		  sre = sre"+"\n\
		# dialog(i": Color range "r" for letter '"s"' ("sre")")\n\
		\n\
		  pos = startpos\n\
		  while (pos != -1)\n\
		    {\n\
		    pos = search(sre, pos, "regex", "forward")\n\
		    if (pos >= 0)\n\
		      {\n\
		      RangeSet_add(r, pos, $search_end)\n\
		      pos = $search_end\n\
		      }\n\
		    }\n\
		  i--\n\
		  }\n\
	}\n\
	Rangesets>RS1 =>RS1 + RS2:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		intro = "Add second range set ranges to first range set\\n\\n"\n\
		RS1 = RangeSet_ask(intro "First range set")\n\
		if (RS1 == "")\n\
		    return\n\
		\n\
		color_it = 0\n\
		if (!RangeSet_defined(RS1))\n\
		    color_it = 1\n\
		\n\
		RS2 = RangeSet_askExisting(intro "Second range set (first is "RS1")")\n\
		if (RS2 == "")\n\
		    return\n\
		\n\
		r = RangeSet_add(RS1, RS2)\n\
		if (color_it)\n\
		    RangeSet_QuickColor(RS1)\n\
	}\n\
	Rangesets>RS1 =>RS1 - RS2:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		intro = "Remove second range set ranges from first range set\\n\\n"\n\
		RS1 = RangeSet_ask(intro "First range set")\n\
		if (RS1 == "")\n\
		    return\n\
		\n\
		color_it = 0\n\
		if (!RangeSet_defined(RS1))\n\
		    color_it = 1\n\
		\n\
		RS2 = RangeSet_askExisting(intro "Second range set (first is "RS1")")\n\
		if (RS2 == "")\n\
		    return\n\
		\n\
		r = RangeSet_remove(RS1, RS2)\n\
		if (color_it)\n\
		    RangeSet_QuickColor(RS1)\n\
	}\n\
	Rangesets>RS1 =>RS1 & RS2 (intersect):::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		intro = "Change first range set to its intersection with the second range set\\n\\n"\n\
		RS1 = RangeSet_askExisting(intro "First range set")\n\
		if (RS1 == "")\n\
		  return\n\
		\n\
		RS2 = RangeSet_askExisting(intro "Second range set (first is "RS1")")\n\
		if (RS2 == "")\n\
		  return\n\
		\n\
		rs1id = RangeSet_getRangeSet(RS1)\n\
		if (!rs1id)\n\
		  {\n\
		  dialog(intro "RangeSet '" RS1 "' does not exist")\n\
		  return\n\
		  }\n\
		\n\
		rs2id = RangeSet_getRangeSet(RS2)\n\
		if (!rs2id)\n\
		  {\n\
		  dialog(intro "RangeSet '" RS2 "' does not exist")\n\
		  return\n\
		  }\n\
		\n\
		rstmp = rangeset_create()	# create a temporary\n\
		if (!rstmp)\n\
		  {\n\
		  dialog(intro "Could not create temporary rangeset")\n\
		  return\n\
		  }\n\
		rangeset_add(rstmp, rs2id)	# load the temporary (== RS2)\n\
		rangeset_invert(rstmp)		# invert the temporary (== ~RS2)\n\
		rangeset_subtract(rs1id, rstmp)	# subtract ~RS2 from RS1: gives RS1 /\\ RS2\n\
		\n\
		rangeset_destroy(rstmp)		# don't need this anymore\n\
	}\n\
	Rangesets>RS1 =>~RS1:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		RS1 = RangeSet_ask("Range set to invert")\n\
		if (RS1 == "")\n\
		    return\n\
		\n\
		r = RangeSet_inverse(RS1)\n\
	}\n\
	Rangesets>Differences>Merge files from diff:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_from_diff()\n\
	}\n\
	Rangesets>Differences>Merge files + rework:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_from_diff("rework")\n\
	}\n\
	Rangesets>Differences>Merge files from diff [REV]:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_from_diff(0, "rev")\n\
	}\n\
	Rangesets>Differences>Merge files + rework [REV]:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_from_diff("rework", "rev")\n\
	}\n\
	Rangesets>Differences>Rework Changes:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_rework_changes()\n\
	}\n\
	Rangesets>Differences>Rework Single Change:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		error = ""\n\
		sep = ": "\n\
		plu = ""\n\
		\n\
		# get rangeset number for old changes\n\
		rsnm = "Changed (old)"\n\
		rsa = rangeset_get_by_name(rsnm)\n\
		if (rsa[] != 1)\n\
		  {\n\
		  error = sep rsnm\n\
		  sep = ", "\n\
		  plu = "s"\n\
		  }\n\
		rO = rsa[0]\n\
		\n\
		# get rangeset number for new changes\n\
		rsnm = "Changed (new)"\n\
		rsa = rangeset_get_by_name(rsnm)\n\
		if (rsa[] != 1)\n\
		  {\n\
		  error = plu sep rsnm\n\
		  }\n\
		rN = rsa[0]\n\
		\n\
		if (error != "")\n\
		  return dialog("Rework difference - single change\\n" \\\n\
		                "Missing rangeset" plu error, "Cancel")\n\
		\n\
		# find index in rO or rN where we have the cursor\n\
		index = rangeset_includes(rO, $cursor)\n\
		if (!index)\n\
		  index = rangeset_includes(rN, $cursor)\n\
		if (!index)\n\
		  return dialog("Rework difference - single change\\n" \\\n\
		                "Cursor at position " $cursor " not in a change range", \\\n\
		                "Cancel")\n\
		\n\
		fileMerge_rework_changes(index)\n\
	}\n\
	Rangesets>Differences>Change colors:::: {\n\
		NEDIT_require_macro_file("RSfileMerge.nm")\n\
		\n\
		fileMerge_mapRSbg_ask()\n\
	}\n\
	Rangesets>Differences>Highlight Plain Diff:::: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		\n\
		q = dialog("Highlight difference specs?", "Dark", "Light", "No")\n\
		if (q == 1)\n\
		  col = "#808080"\n\
		else if (q == 2)\n\
		  col = "#d8d8d8"\n\
		else\n\
		  col = ""\n\
		\n\
		RangeSet_forget("Old")\n\
		RangeSet_forget("New")\n\
		RangeSet_forget("Line spec")\n\
		\n\
		RangeSet_set_color("Old", "#ffb0a0")\n\
		RangeSet_set_color("New", "#b0ffff")\n\
		if (col != "") RangeSet_set_color("Line spec", col)\n\
		\n\
		regex = "regex"\n\
		\n\
		RE = "(?<=^\\\\< ).*" # add \\n if you like\n\
		pos = 0\n\
		for (pos = search(RE, 0, regex); pos != -1; pos = search(RE, pos, regex))\n\
		  {\n\
		  r = RangeSet_add("Old", pos, $search_end)\n\
		  pos = $search_end + 1\n\
		  }\n\
		\n\
		RE = "(?<=^\\\\> ).*" # add \\n if you like\n\
		pos = 0\n\
		for (pos = search(RE, 0, regex); pos != -1; pos = search(RE, pos, regex))\n\
		  {\n\
		  r = RangeSet_add("New", pos, $search_end)\n\
		  pos = $search_end + 1\n\
		  }\n\
		\n\
		if (col != "")\n\
		  {\n\
		  RE = "\\\\d+(?:,\\\\d+)?[acd]\\\\d+(?:,\\\\d+)?\\n"\n\
		  pos = 0\n\
		  for (pos = search(RE, 0, regex); pos != -1; pos = search(RE, pos, regex))\n\
		    {\n\
		    r = RangeSet_add("Line spec", pos, $search_end)\n\
		    pos = $search_end\n\
		    }\n\
		}\n\
	}\n\
	Rangesets>Differences>Forget Highlight:::: {\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		\n\
		RangeSet_forget("Old")\n\
		RangeSet_forget("New")\n\
		RangeSet_forget("Line spec")\n\
	}\n\
	Rangesets>Differences>Preprocess diffs for CVS:::: {\n\
		diffcmd = "diff"\n\
		pos = search("^diff\\\\s+(-\\\\w+\\\\s+)*", 0, "regex")\n\
		if (pos >= 0)\n\
		  diffcmd = get_range(pos, $search_end)\n\
		\n\
		diffline = "(?:\\\\d+(?:,\\\\d+)?[acd]\\\\d+(?:,\\\\d+)?|---|[<>] .*)"\n\
		\n\
		# the search strings\n\
		# CVS directory diffs: of no functional value\n\
		matchCVSdirDiffs = "^" diffcmd ".*/CVS/.*\\\\n(?:"diffline"\\\\n)*"\n\
		# Diffs where only what-strings are different\n\
		matchWhatStringDiffs = "^" diffcmd ".*\\\\n\\\\d+c\\\\d+\\\\n" \\\n\
		                       "\\\\<\\\\s+.*@\\\\(#\\\\) \\\\$Name.*\\\\n" \\\n\
		                       "---\\\\n" \\\n\
		                       "\\\\>\\\\s+.*@\\\\(#\\\\) \\\\$Name.*\\\\n(?!" diffline "$)"\n\
		# Non-diffs!\n\
		matchOnlyInDiffs = "^Only in .*\\n"\n\
		commonSubDirs = "^Common subdirectories: .*\\n"\n\
		\n\
		# put them in an array\n\
		matchRE[0] = matchCVSdirDiffs\n\
		matchRE[1] = matchWhatStringDiffs\n\
		matchRE[2] = matchOnlyInDiffs\n\
		matchRE[3] = commonSubDirs\n\
		\n\
		matchTxt[0] = "CVS directory diffs"\n\
		matchTxt[1] = "Diffs only in what/version strings"\n\
		matchTxt[2] = "Assymetries in files (files only found on one side)"\n\
		matchTxt[3] = "Common subdirectories"\n\
		\n\
		# set up a rangeset for coloring them\n\
		rsid = rangeset_create()\n\
		if (rsid)\n\
		  rangeset_set_color(rsid, "#ff0080")\n\
		\n\
		for (i = 0; i in matchRE; i++)\n\
		{\n\
		  end = 0\n\
		  for (pos = search(matchRE[i], 0, "regex"); \\\n\
		       pos >= 0; \\\n\
		       pos = search(matchRE[i], end, "regex"))\n\
		    {\n\
		    end = $search_end\n\
		    if (rsid)\n\
		      rangeset_add(rsid, pos, end)\n\
		    }\n\
		  if (end > 0)\n\
		    if (dialog("Remove " matchTxt[i] ":\\n   " matchRE[i] "\\nRemove it?", \\\n\
		               "OK", "Skip") == 1)\n\
		      replace_all(matchRE[i], "", "regex")\n\
		  rangeset_subtract(rsid, 0, $text_length)\n\
		}\n\
		\n\
		rangeset_destroy(rsid)\n\
	}\n\
	Rangesets>Differences>Compare document against file:::: {\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		NEDIT_require_macro_file("RSshowChange.nm")\n\
		\n\
		diff_with_saved()\n\
		\n\
		clear = dialog("Clear Difference Rangesets A, C and D?", "Yes", "No")\n\
		if (clear == 1)\n\
		  {\n\
		  RangeSet_forget("a")\n\
		  RangeSet_forget("c")\n\
		  RangeSet_forget("d")\n\
		  }\n\
	}\n\
	Rangesets>Remove>From set:::R: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		selleft = $selection_left\n\
		selright = $selection_right\n\
		selstart = $selection_start\n\
		selend = $selection_end\n\
		\n\
		Ls = RangeSet_askExisting("Range sets from which to remove selection", "multi")\n\
		\n\
		for (n in Ls)\n\
		  {\n\
		  L = Ls[n]\n\
		  if (selleft != -1)\n\
		    {\n\
		    ln0 = pos_to_line(selstart)\n\
		    ln1 = pos_to_line(selend)\n\
		    for (ln = ln0; ln <= ln1; ln++)\n\
		      {\n\
		      left  = line_col_to_pos(ln, selleft)\n\
		      right = line_col_to_pos(ln, selright)\n\
		      if (left < right && left != -1)\n\
		        {\n\
		        RangeSet_remove(L, left, right)\n\
		        }\n\
		      }\n\
		    }\n\
		  else\n\
		    {\n\
		    RangeSet_remove(L, selstart, selend)\n\
		    }\n\
		  }\n\
	}\n\
	Rangesets>Remove>From all sets:::R: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		\n\
		selleft = $selection_left\n\
		selright = $selection_right\n\
		selstart = $selection_start\n\
		selend = $selection_end\n\
		\n\
		if (selleft == -1)\n\
		  {\n\
		  for (i in $rangeset_list)\n\
		    rangeset_subtract($rangeset_list[i], selstart, selend)\n\
		  }\n\
		else\n\
		  {\n\
		  Ls = split(RangeSet_list(), "\\n")\n\
		  for (n in Ls)\n\
		    {\n\
		    L = Ls[n]\n\
		    ln0 = pos_to_line(selstart)\n\
		    ln1 = pos_to_line(selend)\n\
		    for (ln = ln0; ln <= ln1; ln++)\n\
		      {\n\
		      left  = line_col_to_pos(ln, selleft)\n\
		      right = line_col_to_pos(ln, selright)\n\
		      if (left < right && left != -1)\n\
		        {\n\
		        RangeSet_remove(L, left, right)\n\
		        }\n\
		      }\n\
		    }\n\
		  }\n\
		\n\
	}\n\
	Rangesets>Forget>Set:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range sets to forget", "multi")\n\
		if (L[] == 0)\n\
		    return\n\
		\n\
		for (n in L)\n\
		    {\n\
		    # if (dialog("Forgetting Rangeset \\"" L[n] "\\"", "OK", "Skip") == 1)\n\
		        RangeSet_forget(L[n])\n\
		    }\n\
	}\n\
	Rangesets>Forget>All sets:::: {\n\
		while (0 in $rangeset_list)\n\
		  rangeset_destroy($rangeset_list[0])\n\
	}\n\
	Rangesets>Navigate>Choose Set:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_NavigateWhich("", "ask")\n\
	}\n\
	Rangesets>Navigate>Choose TOP Set:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		nrs = $rangeset_list[]\n\
		if (nrs == 0)\n\
		  rs = ""\n\
		else\n\
		  {\n\
		  id = $rangeset_list[nrs - 1]\n\
		  rs = RangeSet_forceName(id)\n\
		  }\n\
		\n\
		if (rs != "")\n\
		  RangeSet_NavigateWhich(rs)\n\
		else\n\
		  RangeSet_NavigateWhich()\n\
	}\n\
	Rangesets>Navigate>Move Backward Select:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", -1, 1)\n\
	}\n\
	Rangesets>Navigate>Move Backward:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", -1)\n\
	}\n\
	Rangesets>Navigate>Move Backward Center:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", -1, 0, 1)\n\
	}\n\
	Rangesets>Navigate>Move Forward Center:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", 1, 0, 1)\n\
	}\n\
	Rangesets>Navigate>Move Forward:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", 1)\n\
	}\n\
	Rangesets>Navigate>Move Forward Select:::: {\n\
		NEDIT_require_macro_file("RSnavigate.nm")\n\
		\n\
		RangeSet_Navigate("", 1, 1)\n\
	}\n\
	Rangesets>Run through:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range set to run through")\n\
		if (L == "")\n\
		    return\n\
		\n\
		old_p = $cursor\n\
		\n\
		if (RangeSet_defined(L))\n\
		{\n\
		s = "rangeset \\""L"\\" (id="RangeSet_getRangeSet(L)")\\n"\\\n\
		    "Rangeset "$RangeSet_label " has " $RangeSet_ranges " ranges\\n"\n\
		c = $RangeSet_color\n\
		if (c != "")\n\
		    s = s "Color "c\n\
		s = s "\\nModify behaviour \\"" $RangeSet_modify_response "\\""\n\
		s = s "\\n\\nDefined rangesets:\\n" RangeSet_list()\n\
		r = dialog(s, "OK", "Select", "Cancel")\n\
		if (r != 1 && r != 2)\n\
		    return\n\
		\n\
		doSelect = (r == 2)\n\
		carry_on = 1\n\
		for (i = 0; carry_on == 1 && i < RangeSet_get_count(L); i++) {\n\
		    # deselect_all()\n\
		    if (RangeSet_select(L, i))\n\
		      ok = "good"\n\
		    else\n\
		      ok = "bad"\n\
		    t = "  "i+1" of "$RangeSet_ranges": [" $selection_start ", " $selection_end "] ("ok")\\n"\n\
		    set_cursor_pos($selection_start)\n\
		    set_cursor_pos($selection_end)\n\
		    set_cursor_pos($selection_start)\n\
		    if (!doSelect)\n\
		      deselect_all()\n\
		    carry_on = dialog("  " $RangeSet_label " range " t, "OK", "Cancel")\n\
		}\n\
		\n\
		if (carry_on == 1)\n\
		  set_cursor_pos(old_p)\n\
		}\n\
	}\n\
	Rangesets>Go to range:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		NEDIT_require_macro_file("centerline.nm")\n\
		\n\
		L = ""\n\
		Ls = RangeSet_names()\n\
		\n\
		if (Ls[] == 0)\n\
		  beep()\n\
		else if (Ls[] == 1)\n\
		  L = Ls[0]\n\
		else\n\
		  L = RangeSet_askExisting("Range in which set?")\n\
		\n\
		if (L == "")\n\
		  return\n\
		\n\
		if (RangeSet_defined(L))\n\
		{\n\
		  loop = 1\n\
		  while (loop)\n\
		  {\n\
		    # build title string\n\
		    s = "rangeset \\""L"\\"\\n"\\\n\
		        "Rangeset "$RangeSet_label " has " $RangeSet_ranges " ranges\\n"\n\
		    c = $RangeSet_color\n\
		    if (c != "")\n\
		        s = s "Color " c\n\
		    s = s "\\nModify behaviour \\"" $RangeSet_modify_response "\\""\n\
		\n\
		    width = length($RangeSet_ranges "")\n\
		\n\
		    list = ""\n\
		    line = ""\n\
		    endline = ""\n\
		    for (i = 0; RangeSet_defined(L, i); i++) {\n\
		      numstr = "           " i\n\
		      numstr = substring(numstr, length(numstr) - width, length(numstr)) ":"\n\
		      RangeSet_defined(L, i)\n\
		      p1 = search("\\n", max($RangeSet_range_start - 1, 0), "case", "backward")\n\
		      if (p1 < 0)\n\
		        p1 = 0\n\
		      if (p1 <= $RangeSet_range_start - 1)\n\
		        p1++\n\
		      p2 = search("\\n", $RangeSet_range_start, "case")\n\
		      if (p2 == -1)\n\
		        p2 = $text_length\n\
		      if (p2 < $RangeSet_range_end)\n\
		        endline = get_range($RangeSet_range_start, p2) "...»"\n\
		      else\n\
		        endline = get_range($RangeSet_range_start, $RangeSet_range_end) "»" \\\n\
		                  get_range($RangeSet_range_end, p2)\n\
		      line = get_range(p1, $RangeSet_range_start) "«" endline\n\
		      where = "== "\n\
		      if ($cursor < $RangeSet_range_start)\n\
		        where = " > "\n\
		      else if ($cursor > $RangeSet_range_end)\n\
		        where = "<  "\n\
		      list = list numstr where line "\\n"\n\
		\n\
		      # debug = "p1 = " p1 "\\n" \\\n\
		      #         "$RangeSet_range_start = " $RangeSet_range_start "\\n" \\\n\
		      #         "p2 = " p2 "\\n" \\\n\
		      #         "$RangeSet_range_end = " $RangeSet_range_end "\\n"\n\
		      # dialog(debug numstr line)\n\
		    }\n\
		\n\
		    if (list != "")\n\
		    {\n\
		      line = list_dialog(s, list, "OK", "Select", "Find & Loop", "Cancel")\n\
		      if ($list_dialog_button > 3 || line == "")\n\
		        return  # dismissed or dialog closed\n\
		\n\
		      loop = $list_dialog_button == 3\n\
		      sel = $list_dialog_button == 2\n\
		\n\
		      line = replace_in_string(line, " *(\\\\d+):.*", "\\\\1", "regex")\n\
		      if (RangeSet_defined(L, line))\n\
		        {\n\
		        set_cursor_pos($RangeSet_range_start)\n\
		        centerline()\n\
		        }\n\
		      if (sel)\n\
		        RangeSet_select(L, line)\n\
		    }\n\
		    else\n\
		    {\n\
		      loop = 0\n\
		      dialog("rangeset \\""L"\\" contains no ranges")\n\
		    }\n\
		  }\n\
		}\n\
		else\n\
		{\n\
		  dialog("rangeset \\""L"\\" is undefined")\n\
		}\n\
	}\n\
	Rangesets>Mark with range:::R: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		selleft = $selection_left\n\
		selright = $selection_right\n\
		selstart = $selection_start\n\
		selend = $selection_end\n\
		\n\
		L = RangeSet_ask("Range set used to mark")\n\
		if (L == "")\n\
		    return\n\
		\n\
		if (!RangeSet_defined(L) || $RangeSet_color == "")\n\
		  RangeSet_QuickColor(L)\n\
		\n\
		if (selleft != -1)\n\
		  {\n\
		  ln0 = pos_to_line(selstart)\n\
		  ln1 = pos_to_line(selend)\n\
		  for (ln = ln0; ln <= ln1; ln++)\n\
		    {\n\
		    left  = line_col_to_pos(ln, selleft)\n\
		    right = line_col_to_pos(ln, selright)\n\
		    if (left < right && left != -1)\n\
		      {\n\
		      # select(left, right)\n\
		      # dialog("line " ln "(select line " ln - ln0 + 1")\\n" \\\n\
		      #        "left " left " right " right \\\n\
		      #        " (cols: " selleft ", " selright ")")\n\
		      RangeSet_add(L, left, right)\n\
		      }\n\
		    }\n\
		  }\n\
		else\n\
		  {\n\
		  RangeSet_add(L, selstart, selend)\n\
		  }\n\
	}\n\
	Rangesets>Mark with range (no columns):::R: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		\n\
		L = RangeSet_ask("Range set used to mark")\n\
		if (L == "")\n\
		    return\n\
		\n\
		RangeSet_add(L)\n\
		\n\
		if (!RangeSet_defined(L) || $RangeSet_color == "")\n\
		{\n\
		  RangeSet_QuickColor(L)\n\
		}\n\
	}\n\
	Rangesets>Mark with TOP range:::R: {\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		selleft = $selection_left\n\
		selright = $selection_right\n\
		selstart = $selection_start\n\
		selend = $selection_end\n\
		\n\
		idid = $rangeset_list[]\n\
		if (idid == 0)\n\
		{\n\
		  beep()\n\
		  return\n\
		}\n\
		\n\
		id = $rangeset_list[idid - 1]\n\
		# dialog("Number of RS="idid"\\nTop id="id)\n\
		L = rangeset_info(id)["name"]\n\
		\n\
		if (!RangeSet_defined(L) || $RangeSet_color == "")\n\
		  RangeSet_QuickColor(L)\n\
		\n\
		if (selleft != -1)\n\
		  {\n\
		  ln0 = pos_to_line(selstart)\n\
		  ln1 = pos_to_line(selend)\n\
		  for (ln = ln0; ln <= ln1; ln++)\n\
		    {\n\
		    left  = line_col_to_pos(ln, selleft)\n\
		    right = line_col_to_pos(ln, selright)\n\
		    if (left < right && left != -1)\n\
		      {\n\
		      # select(left, right)\n\
		      # dialog("line " ln "(select line " ln - ln0 + 1")\\n" \\\n\
		      #        "left " left " right " right \\\n\
		      #        " (cols: " selleft ", " selright ")")\n\
		      RangeSet_add(L, left, right)\n\
		      }\n\
		    }\n\
		  }\n\
		else\n\
		  {\n\
		  RangeSet_add(L, selstart, selend)\n\
		  }\n\
	}\n\
	Rangesets>Delete text of set:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range set whose text to delete")\n\
		if (L == "")\n\
		  return\n\
		if (!RangeSet_defined(L))\n\
		  {\n\
		  dialog("Rangeset "L" not defined")\n\
		  return\n\
		  }\n\
		\n\
		prompt = "Do you really want to delete the contents of rangeset "L"?\\n"\n\
		prompt = prompt "("L" contains "RangeSet_get_count(L)" ranges)\\n"\n\
		prompt = prompt "Choose \\"Yes (prompt)\\" for confirmation for each range\\n"\n\
		prompt = prompt "Choose \\"Yes (silent)\\" to remove all text unconditionally"\n\
		para = dialog("Do you really want to delete the contents of rangeset "L"?", \\\n\
			      "No", "Yes (prompt)", "Yes (silent)")\n\
		silent = 0\n\
		if (para == 2 || para == 3)\n\
		  {\n\
		  silent = (para == 3)\n\
		  }\n\
		else\n\
		  return\n\
		\n\
		prompt = ""\n\
		prompt = prompt "Choose \\"OK\\" to delete this range\\n"\n\
		prompt = prompt "Choose \\"Stop\\" to stop deleting ranges\\n"\n\
		prompt = prompt "Choose \\"Skip\\" to keep this range and carry on"\n\
		skip = 0\n\
		ndel = 0\n\
		while (RangeSet_get_count(L) > skip)\n\
		  {\n\
		  RangeSet_select(L, skip)\n\
		  set_cursor_pos($selection_end)\n\
		  set_cursor_pos($selection_start)\n\
		\n\
		  if (silent)\n\
		    ok = silent\n\
		  else\n\
		    {\n\
		    prompt1 = "Rangeset "L" contains "RangeSet_get_count(L) " ranges\\n"\n\
		    if (skip > 0)\n\
		      prompt1 = prompt1 "of which the first "skip" have been skipped\\n"\n\
		    ok = dialog(prompt1 prompt, "OK", "Stop", "Skip")\n\
		    }\n\
		\n\
		  if (ok == 1)		# OK\n\
		    {\n\
		    RangeSet_select(L, skip)\n\
		    replace_selection("")\n\
		    ndel++\n\
		    }\n\
		  else if (ok == 3)\n\
		    {\n\
		    skip++\n\
		    deselect_all()\n\
		    }\n\
		  else\n\
		    {\n\
		    skip = $RangeSet_ranges\n\
		    break\n\
		    }\n\
		  }\n\
		\n\
		if (silent)\n\
		  RangeSet_forget(L)\n\
		else\n\
		  {\n\
		  prompt = "Rangeset "L" contains "RangeSet_get_count(L) " ranges\\n"\n\
		  if (ndel == 0)\n\
		    ndel = "no ranges"\n\
		  else if (ndel == 1)\n\
		    ndel = "1 range"\n\
		  else\n\
		    ndel = ndel " ranges"\n\
		  prompt = prompt "(" ndel " deleted)\\n"\n\
		  prompt = prompt "Do you want to forget "L"?"\n\
		  if (skip == 0)\n\
		    {\n\
		    b1 = "Yes"\n\
		    b2 = "No"\n\
		    }\n\
		  else\n\
		    {\n\
		    b1 = "No"\n\
		    b2 = "Yes"\n\
		    skip = 1\n\
		    }\n\
		  if (dialog(prompt, b1, b2) == 1 + skip)		# yes clicked?\n\
		    RangeSet_forget(L)\n\
		  }\n\
	}\n\
	Rangesets>Modify Fn:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range set whose behaviour to change")\n\
		if (L == "")\n\
		    return\n\
		\n\
		info = "Range set " L\n\
		if (RangeSet_defined(L))\n\
		    info = info " uses \\""$RangeSet_modify_response"\\""\n\
		\n\
		modify_fn = "maintain\\nins_del\\ninclude\\ndel_ins\\nexclude\\nbreak\\n"\n\
		C = list_dialog(info "\\nWhich modify behaviour?", modify_fn, "OK")\n\
		\n\
		if (C == "")\n\
		    RangeSet_set_modify_response(L)\n\
		else\n\
		    RangeSet_set_modify_response(L, C)\n\
	}\n\
	Rangesets>Move to topmost:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range set to move to top")\n\
		if (L == "" || !RangeSet_defined(L))\n\
		  return\n\
		\n\
		# get an anonymous rangeset\n\
		id = rangeset_create()\n\
		# save L's information\n\
		lid = RangeSet_getRangeSet(L)\n\
		RangeSet_defined(L)\n\
		color = $RangeSet_color\n\
		mode = $RangeSet_modify_response\n\
		rangeset_add(id, lid)\n\
		# remove L\n\
		rangeset_destroy(lid)\n\
		# set L's parameters in id\n\
		rangeset_set_color(id, color)\n\
		rangeset_set_name(id, L)\n\
		rangeset_set_mode(id, mode)\n\
		\n\
		# Was: \n\
		# T = RangeSet_ask("Temporary range set (will be deleted)")\n\
		# if (T == "")\n\
		#   {\n\
		#   dialog("No temporary range set to perform move of range set" L)\n\
		#   return\n\
		#   }\n\
		# else if (RangeSet_defined(T))\n\
		#   {\n\
		#   x = dialog("Temporary set "T" in use: do you want to erase it?", "No", "Yes")\n\
		#   if (x != 2)\n\
		#     {\n\
		#     dialog("Cannot use temporary range set "T" to move range set "L)\n\
		#     return\n\
		#     }\n\
		#   }\n\
		# \n\
		# RangeSet_forget(T)\n\
		# RangeSet_defined(L)\n\
		# color = $RangeSet_color\n\
		# RangeSet_add(T, L)\n\
		# RangeSet_forget(L)\n\
		# RangeSet_add(L, T)\n\
		# RangeSet_set_color_basic(L, color)\n\
		# RangeSet_forget(T)\n\
	}\n\
	Rangesets>Change behaviour:::: {\n\
		NEDIT_require_macro_file("RSselect.nm")\n\
		\n\
		L = RangeSet_askExisting("Range set whose behaviour to change?")\n\
		if (L == "")\n\
		  return\n\
		\n\
		list="maintain\\nins_del\\ninclude\\ndel_ins\\nexclude\\nbreak"\n\
		\n\
		id = RangeSet_getRangeSet(L)\n\
		curr = rangeset_info(id)["mode"]\n\
		\n\
		mode = list_dialog("Range set " L " has behaviour " curr"\\nNew behaviour", \\\n\
		                   list, "OK", "Cancel")\n\
		\n\
		if ($list_dialog_button != 1)\n\
		  return\n\
		\n\
		rangeset_set_mode(id, mode)\n\
	}\n\
	Backlight>Set XPM Backlighting:::: {\n\
		NEDIT_require_macro_file("element.nm")\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		set_backlight_string()\n\
		\n\
		new_bls = ""\n\
		bls = ""\n\
		pos = 0\n\
		end = 0\n\
		got_one = 0\n\
		\n\
		# process a line at a time\n\
		while (pos >= 0)\n\
		  {\n\
		  end = search("\\n", pos, "case")\n\
		  if (end == -1)\n\
		    break\n\
		\n\
		  # get the line\n\
		  l = get_range(pos, end)\n\
		  pos = end + 1\n\
		\n\
		  # does it match a color specification?\n\
		  if (search_string(l, "^\\"(.).*[ \\t]c[ \\t]([^ \\t\\"]+)\\",[ \\t]*$", 0, "regex") != -1)\n\
		    {\n\
		    v = replace_in_string(l, "^\\"(.).*[ \\t]c[ \\t]([^ \\t\\"]+)\\",[ \\t]*$", "\\\\1\\t\\\\2", "regex")\n\
		    s = element_i(v, 0, "\\t")\n\
		    c = element_i(v, 1, "\\t")\n\
		\n\
		    got_one = 1			# we're in the color specification part\n\
		\n\
		    if (tolower(c) == "none")	# special case: no color\n\
		      continue\n\
		\n\
		    new_bls = new_bls ";" toascii(s) ":" c\n\
		    }\n\
		  else if (got_one)		# not a color line: color specification part finished\n\
		    break\n\
		  }\n\
		\n\
		set_backlight_string()\n\
		bls = $backlight_string		# pick up old highlighting\n\
		\n\
		if (bls != "")\n\
		  new_bls = bls new_bls\n\
		else\n\
		  new_bls = substring(new_bls, 1, length(new_bls))\n\
		\n\
		set_backlight_string(new_bls)\n\
		\n\
		set_language_mode("XPM pixmap")\n\
	}\n\
	Backlight>Set Default Backlighting:::: {\n\
		set_backlight_string()\n\
	}\n\
	Backlight>Remove Backlighting:::: {\n\
		set_backlight_string("")\n\
	}\n\
	Backlight>Show Backlighting Groups:::: {\n\
		NEDIT_require_macro_file("backlight.nm")\n\
		\n\
		backlight_display_backlights()\n\
	}\n\
	Backlight>Change Backlighting Groups:::: {\n\
		NEDIT_require_macro_file("backlight.nm")\n\
		\n\
		backlight_manip_backlights()\n\
	}\n\
	Backlight>Forget Backlighting Groups:::: {\n\
		NEDIT_require_macro_file("backlight.nm")\n\
		\n\
		for (g in $backlights)\n\
		  delete $backlights[g]\n\
	}\n\
	Highlight>Convert to HTML:::: {\n\
		NEDIT_require_macro_file("HStoHTML.nm")\n\
		prompt = "Expand tabs to spaces during conversion?\\n"\n\
		prompt = prompt "(Tab distance is " $tab_dist ")"\n\
		if (dialog(prompt, "Yes", "No") == 1)	# "yes" clicked?\n\
		  HighlightToHTML("detab")		# do detab\n\
		else\n\
		  HighlightToHTML()			# leave tabs in HTML\n\
	}\n\
	Highlight>Convert to HTML Pretty:::: {\n\
		NEDIT_require_macro_file("HStoHTML.nm")\n\
		\n\
		prompt = "Expand tabs to spaces during conversion?\\n"\n\
		prompt = prompt "(Tab distance is " $tab_dist ")"\n\
		if (dialog(prompt, "Yes", "No") == 1)	# "yes" clicked?\n\
		  HighlightToHTML_PrettyPage("detab", "white", "#c0c0c0", "#e5e5e5")	# do detab\n\
		else\n\
		  HighlightToHTML_PrettyPage("", "white", "#c0c0c0", "#e5e5e5")		# leave tabs in HTML\n\
	}\n\
	Highlight>Convert to HTML (Thorsten):::: {\n\
		NEDIT_require_macro_file("sh2html.nm")\n\
		\n\
		params["source"] = $file_name\n\
		params["css"] = "INLINE"\n\
		sh2html(params)\n\
	}\n\
	Highlight>Show Attributes:::: {\n\
		NEDIT_require_macro_file("extensions.nm") # for toascii\n\
		\n\
		c = get_range($cursor, $cursor + 1)\n\
		\n\
		s = "Language mode: " $language_mode\n\
		s = "\\n\\nPosition: " $cursor\n\
		s = s "\\n\\nCharacter: '" c "' (" toascii(c) ")"\n\
		s = s "\\n\\nPattern Info - get_pattern_at_pos(" $cursor "):"\n\
		a = get_pattern_at_pos($cursor)\n\
		for (v in a)\n\
		  s = s "\\n    [" v "] = " a[v]\n\
		if (a[] == 0)\n\
		  s = s "\\n    <empty>"\n\
		\n\
		pattern = ""\n\
		if ("pattern" in a)\n\
		  pattern = a["pattern"]\n\
		\n\
		s = s "\\n\\nStyle Info - get_style_at_pos(" $cursor "):"\n\
		a = get_style_at_pos($cursor)\n\
		for (v in a)\n\
		  s = s "\\n    [" v "] = " a[v]\n\
		if (a[] == 0)\n\
		  s = s "\\n    <empty>"\n\
		\n\
		style = ""\n\
		if ("style" in a)\n\
		  style = a["style"]\n\
		\n\
		s = s "\\n\\nNon-Positional Info:"\n\
		s = s "\\nPattern Info - get_pattern_by_name(\\"" pattern "\\"):"\n\
		a = get_pattern_by_name(pattern)\n\
		for (v in a)\n\
		  s = s "\\n    [" v "] = " a[v]\n\
		if (a[] == 0)\n\
		  s = s "\\n    <empty>"\n\
		\n\
		s = s "\\n\\nStyle Info - get_style_by_name(\\"" style "\\"):"\n\
		a = get_style_by_name(style)\n\
		for (v in a)\n\
		  s = s "\\n    [" v "] = " a[v]\n\
		if (a[] == 0)\n\
		  s = s "\\n    <empty>"\n\
		\n\
		dialog(s)\n\
	}\n\
	Paragraph>Show settings@Plain text@Doxygen@Doxygen strict:::: {\n\
		NEDIT_require_macro_file("PlainText.nm")\n\
		\n\
		PlainText_setSettings()\n\
	}\n\
	Paragraph>Toggle 1st Line Handling@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		$PERS_take_second_line = !$PERS_take_second_line\n\
		\n\
		line = ""\n\
		if ($PERS_take_second_line)\n\
		  line = "SECOND"\n\
		else\n\
		  line = "FIRST"\n\
		\n\
		dialog("The " line " line of a paragraph\\n" \\\n\
		       "determines the indentation for\\n" \\\n\
		       "paragraph refilling.")\n\
	}\n\
	Paragraph>Select Paragraph@Plain text@Doxygen@Doxygen strict:::: {\n\
		NEDIT_require_macro_file("PlainText.nm")\n\
		\n\
		paraBeg = PlainText_ParagraphBegin(get_range(0, $text_length), $cursor)\n\
		paraEnd = PlainText_ParagraphEnd(get_range(0, $text_length), $cursor)\n\
		select(paraBeg, paraEnd)\n\
		set_cursor_pos(paraEnd)\n\
	}\n\
	Paragraph>Select Paragraph@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		select(PERS_beginOfParagraph($cursor), PERS_endOfParagraph($cursor))\n\
	}\n\
	Paragraph>Refill Paragraphs@Plain text@Doxygen@Doxygen strict:Alt+J::: {\n\
		NEDIT_require_macro_file("PlainText.nm")\n\
		\n\
		if ($selection_left != -1)\n\
		  return dialog("Cannot refill a paragraph in a rectangular selection")\n\
		\n\
		start = $cursor\n\
		end = $cursor\n\
		if ($selection_start != -1)\n\
		  {\n\
		  set_cursor_pos($selection_start)\n\
		  start = $selection_start\n\
		  end = $selection_end\n\
		  }\n\
		else\n\
		  {\n\
		  start = PlainText_ParagraphBegin(get_range(0, $text_length), $cursor)\n\
		  end = PlainText_ParagraphEnd(get_range(0, $text_length), $cursor)\n\
		  set_cursor_pos(start)\n\
		  }\n\
		\n\
		p = PlainText_ParagraphFill(get_range(start, end), $column, 0, end - start)\n\
		replace_range(start, end, p)\n\
		set_cursor_pos(start + length(p))\n\
	}\n\
	Paragraph>Refill Paragraphs@PERS text:Alt+J::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		if ($selection_start == -1)\n\
		  set_cursor_pos(PERS_refillParagraph($cursor))\n\
		else\n\
		  set_cursor_pos(PERS_refillParagraph(PERS_makeParagraph($selection_start, $selection_end)))\n\
	}\n\
	Paragraph>Start of Paragraph@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		set_cursor_pos(PERS_beginOfParagraph($cursor))\n\
	}\n\
	Paragraph>End of Paragraph@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		set_cursor_pos(PERS_endOfParagraph($cursor))\n\
	}\n\
	Paragraph>Previous Paragraph@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		c = PERS_beginOfParagraph(PERS_beginOfParagraph($cursor) - 1)\n\
		while (c >= 0)\n\
		  {\n\
		  if (!PERS_isEmptyLine(c))\n\
		    {\n\
		    set_cursor_pos(c)\n\
		    return\n\
		    }\n\
		  c = PERS_beginOfParagraph(PERS_beginOfParagraph(c) - 1)\n\
		  }\n\
	}\n\
	Paragraph>Next Paragraph@PERS text:::: {\n\
		NEDIT_require_macro_file("pers.nm")\n\
		\n\
		c = PERS_endOfParagraph($cursor) + 1\n\
		while (c <= $text_length)\n\
		  {\n\
		  if (!PERS_isEmptyLine(c))\n\
		    {\n\
		    set_cursor_pos(c)\n\
		    return\n\
		    }\n\
		  c = PERS_endOfParagraph(c) + 1\n\
		  }\n\
	}\n\
	man / postprocess:F1::: {\n\
		NEDIT_require_macro_file("ManHelp.nm")\n\
		\n\
		ManHelp()\n\
	}\n\
	Redo braces@C@C++@Perl@NEdit Macro:::: {\n\
		indent[0] = ""\n\
		\n\
		n = string_dialog("Indent width (default "$em_tab_dist")", "OK")\n\
		if ($string_dialog_button != 1)\n\
		    return\n\
		\n\
		if (search_string(n, "^\\\\s*\\\\d+\\\\s*$", 0, "regex") < 0)\n\
		    {\n\
		    dialog("Using indent width "$em_tab_dist" instead of '"n"'")\n\
		    n = $em_tab_dist\n\
		    }\n\
		else if (n < 1)\n\
		    {\n\
		    dialog("Using indent width "$em_tab_dist" instead of "n)\n\
		    n = $em_tab_dist\n\
		    }\n\
		\n\
		spaces = ""\n\
		for (i = 0; i < n; i++)\n\
		    spaces = spaces " "\n\
		\n\
		for (i = 1; i < 20; i++)\n\
		    {\n\
		    indent[i] = indent[i - 1] spaces\n\
		    }\n\
		\n\
		i = 0\n\
		for (pos = search("{", 0); pos != -1; pos = search("[{}\\n]", pos + 1, "regex"))\n\
		    {\n\
		    c = get_character(pos)\n\
		    if (c == "{")\n\
		        i++\n\
		    else if (c == "}")\n\
		        i--\n\
		    else if (c == "\\n")\n\
		        {\n\
		        endpos = search("[^ \\t]", pos + 1, "regex")\n\
		        if (endpos != -1)\n\
		            {\n\
		            c = get_character(endpos)\n\
		            l = endpos - pos - 1\n\
		            if (c != "\\n" && c != "}")\n\
		                {\n\
		                dl = length(indent[i]) - l\n\
		                replace_range(pos + 1, endpos, indent[i])\n\
		                }\n\
		            else if (c == "}" && i > 0)\n\
		                {\n\
		                dl = length(indent[i]) - l\n\
		                replace_range(pos + 1, endpos, indent[i - 1])\n\
		                }\n\
		            else\n\
		                dl = 0\n\
		            }\n\
		        }\n\
		    }\n\
	}\n\
	C/C++ Prog>C++ cast - set@C++:::: {\n\
		$CppCastOper[1] = ""\n\
		prompt = "Which cast type to use?"\n\
		if ($CppCastOper[] == 2)\n\
			prompt = prompt " (currently " $CppCastOper[0] ")"\n\
		i = dialog(prompt, "static", "dynamic", "reinterpret", "(reset)", "Cancel")\n\
		if (i == 1)\n\
			$CppCastOper[0] = "static_cast"\n\
		else if (i == 2)\n\
			$CppCastOper[0] = "dynamic_cast"\n\
		else if (i == 3)\n\
			$CppCastOper[0] = "reinterpret_cast"\n\
		else if (i == 4)\n\
			delete $CppCastOper[0]\n\
	}\n\
	C/C++ Prog>C++ cast - apply@C++:::R: {\n\
		$CppCastOper[1] = ""\n\
		if ($CppCastOper[] != 2)\n\
			macro_menu_command("C/C++ Prog>C++ cast - set@C++")\n\
		p = $selection_start\n\
		replace_range($selection_end, $selection_end, ")")\n\
		s = $CppCastOper[0] "<>("\n\
		replace_range(p, p, $CppCastOper[0] "<>(")\n\
		p += length(s) - 2\n\
		set_cursor_pos(p)\n\
	}\n\
	Development>"what" string@C@C++@Doxygen@Doxygen strict:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeWhatString_C_Cpp()\n\
	}\n\
	Development>"what" string@XML@SGML HTML:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeWhatString_HTML_SGML_XML()\n\
	}\n\
	Development>"what" string@Makefile@Csh@Sh Ksh Bash@Hash comments:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeWhatString_Hash()\n\
	}\n\
	Development>File header box@C@C++@Doxygen@Doxygen strict:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeFileHeaderComment_C_Cpp()\n\
	}\n\
	Development>File header box@Makefile@Csh@Sh Ksh Bash@Hash comments:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeFileHeaderComment_Hash()\n\
	}\n\
	Development>File header box@NEdit Macro@NEdit Macro RE:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeFileHeaderComment_Hash()\n\
	}\n\
	Development>Add header file guards@C@C++@Doxygen@Doxygen strict:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_addHeaderFileGuards_C_Cpp()\n\
	}\n\
	Development>New C++ file:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		s = string_dialog("Make new C++ file:", "OK", "Cancel")\n\
		if (s != "" && $string_dialog_button == 1)\n\
		  Development_makeNewFile_Cpp(s)\n\
	}\n\
	Development>New C++ Class files:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		s = string_dialog("Make header and source C++ file for class:", "OK", "Cancel")\n\
		if (s != "" && $string_dialog_button == 1)\n\
		  Development_makeClassFiles_Cpp(s)\n\
	}\n\
	Development>Open C++ Class files:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		s = string_dialog("Directory: " $file_path "\\n" \\\n\
				  "Open header and source C++ file for class:", "OK", "Cancel")\n\
		if (s != "" && $string_dialog_button == 1)\n\
		  Development_openClassFiles_Cpp(s)\n\
	}\n\
	Development>Make C++ Method in class.cpp file@C++:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_makeCppMethod()\n\
	}\n\
	Development>Change default C++ file extensions@C++:::: {\n\
		NEDIT_require_macro_file("Development.nm")\n\
		\n\
		Development_SetupCppPreferredFileExtn("redo")\n\
	}\n\
	Error Numbers>Clear Numbers:::: {\n\
		$errNos[""] = ""\n\
		\n\
		delete $errNos[]\n\
	}\n\
	Error Numbers>Set Numbers:::: {\n\
		$errNos[""] = ""\n\
		list = ""\n\
		nl = ""\n\
		l = 0\n\
		for (e in $errNos)\n\
		  {\n\
		  if (e != "")\n\
		    {\n\
		    list = list nl e " =\\t" $errNos[e]\n\
		    nl = "\\n"\n\
		    l++\n\
		    }\n\
		  }\n\
		\n\
		if (list == "")\n\
		  {\n\
		  dialog("No error numbers set yet")\n\
		  return\n\
		  }\n\
		\n\
		if (l == 1)\n\
		  e = list\n\
		else\n\
		  e = list_dialog("Correct which number?", list, "OK")\n\
		\n\
		e = replace_in_string(e, " .*", "", "regex", "copy")\n\
		\n\
		if (e == "")\n\
		  return\n\
		\n\
		n = string_dialog("Enter LAST value for " e " (now " $errNos[e] ")", "OK")\n\
		nn = n\n\
		if (n == "")\n\
		  return\n\
		\n\
		n = n + 0\n\
		if (n < 999)\n\
		  {\n\
		  if (0) n = -1\n\
		  else if (e == "LGR_EMERG")   n += 60000\n\
		  else if (e == "LGR_ERR")     n += 61000\n\
		  else if (e == "LGR_WARNING") n += 62000\n\
		  else if (e == "LGR_INFO")    n += 63000\n\
		  else if (e == "LGR_DEBUG")   n += 64000\n\
		  else n = -1\n\
		  }\n\
		\n\
		if (n > 0)\n\
		  $errNos[e] = n\n\
		else\n\
		   dialog("Error in setting " e " to " nn)\n\
	}\n\
	Error Numbers>Set Highest Numbers:::: {\n\
		$errNos[""] = ""\n\
		oldNos = $errNos\n\
		ss = "Slogger::logMsg\\\\(\\\\s*(LGR_\\\\w*)\\\\s*, \\"\\\\|(6.\\\\d\\\\d\\\\d)\\\\|\\""\n\
		end = 0\n\
		for (pos = search(ss, end, "regex"); pos >= 0; pos = search(ss, end, "regex"))\n\
		  {\n\
		  beg = pos\n\
		  end = $search_end\n\
		  extract = get_range(beg, end)\n\
		  key = replace_in_string(extract, ss, "\\\\1", "regex")\n\
		  val = replace_in_string(extract, ss, "\\\\2", "regex") + 0\n\
		  if (!(key in $errNos))\n\
		    {\n\
		    oldNos[key] = 0\n\
		    $errNos[key] = val\n\
		    }\n\
		  else\n\
		    $errNos[key] = max($errNos[key], val)\n\
		  }\n\
		\n\
		list = ""\n\
		nl = ""\n\
		l = 0\n\
		for (e in $errNos)\n\
		  {\n\
		  if (e != "")\n\
		    {\n\
		    list = list nl e " =\\t" $errNos[e]\n\
		    if ($errNos[e] > oldNos[e])\n\
		      list = list "\\t(was " oldNos[e] ")"\n\
		    nl = "\\n"\n\
		    l++\n\
		    }\n\
		  }\n\
		\n\
		if (list == "")\n\
		  {\n\
		  dialog("No error numbers set yet")\n\
		  return\n\
		  }\n\
		\n\
		list_dialog("Numbers are:", list, "Cancel")\n\
	}\n\
	Error Numbers>Set Highest Numbers from All:::: {\n\
		$errNos[""] = ""\n\
		oldNos = $errNos\n\
		oldFile = $file_path $file_name\n\
		for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		  {\n\
		  raise_window()\n\
		  ss = "Slogger::logMsg\\\\(\\\\s*(LGR_\\\\w*)\\\\s*, \\"\\\\|(6.\\\\d\\\\d\\\\d)\\\\|\\""\n\
		  end = 0\n\
		  for (pos = search(ss, end, "regex"); pos >= 0; pos = search(ss, end, "regex"))\n\
		    {\n\
		    beg = pos\n\
		    end = $search_end\n\
		    extract = get_range(beg, end)\n\
		    key = replace_in_string(extract, ss, "\\\\1", "regex")\n\
		    val = replace_in_string(extract, ss, "\\\\2", "regex") + 0\n\
		    if (!(key in $errNos))\n\
		      {\n\
		      oldNos[key] = 0\n\
		      $errNos[key] = val\n\
		      }\n\
		    else\n\
		      $errNos[key] = max($errNos[key], val)\n\
		    }\n\
		  }\n\
		\n\
		list = ""\n\
		nl = ""\n\
		l = 0\n\
		for (e in $errNos)\n\
		  {\n\
		  if (e != "")\n\
		    {\n\
		    list = list nl e " =\\t" $errNos[e]\n\
		    if ($errNos[e] > oldNos[e])\n\
		      list = list "\\t(was " oldNos[e] ")"\n\
		    nl = "\\n"\n\
		    l++\n\
		    }\n\
		  }\n\
		\n\
		if (list == "")\n\
		  {\n\
		  dialog("No error numbers set yet")\n\
		  return\n\
		  }\n\
		\n\
		list_dialog("Numbers are:", list, "Cancel")\n\
	}\n\
	Error Numbers>Check errors:::: {\n\
		errNos = $empty_array\n\
		errNoNum = $empty_array\n\
		oldNos = errNos\n\
		oldFile = $file_path $file_name\n\
		\n\
		for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		  {\n\
		  ss = "Slogger::logMsg\\\\(\\\\s*(LGR_\\\\w*)\\\\s*, \\"\\\\|(6.\\\\d\\\\d\\\\d)\\\\|\\""\n\
		  end = 0\n\
		  for (pos = search(ss, end, "regex"); pos >= 0; pos = search(ss, end, "regex"))\n\
		    {\n\
		    beg = pos\n\
		    end = $search_end\n\
		    extract = get_range(beg, end)\n\
		    key = replace_in_string(extract, ss, "\\\\1", "regex")\n\
		    val = replace_in_string(extract, ss, "\\\\2", "regex") + 0\n\
		\n\
		    # get line information\n\
		    line_no = 1\n\
		    old_nl =0\n\
		    for (nl = search("\\n", 0); nl < beg && nl >= 0; nl = search("\\n", nl + 1))\n\
		      {\n\
		      old_nl = nl\n\
		      line_no++\n\
		      }\n\
		    if (nl < 0)\n\
		      nl = $text_length\n\
		    if (!(val in errNoNum))\n\
		      errNoNum[val] = $empty_array\n\
		    i = errNoNum[val][]\n\
		    theline = $file_path $file_name ":" line_no ":" get_range(old_nl + 1, nl)\n\
		    errNoNum[val][i] = theline\n\
		\n\
		    if (!(key in errNos))\n\
		      {\n\
		      oldNos[key] = 0\n\
		      errNos[key] = val\n\
		      }\n\
		    else\n\
		      errNos[key] = max(errNos[key], val)\n\
		    }\n\
		  }\n\
		\n\
		list = ""\n\
		nl = ""\n\
		l = 0\n\
		for (e in errNos)\n\
		  {\n\
		  if (e != "")\n\
		    {\n\
		    list = list nl e " =\\t" errNos[e]\n\
		    if (errNos[e] > oldNos[e])\n\
		      list = list "\\t(was " oldNos[e] ")"\n\
		    nl = "\\n"\n\
		    l++\n\
		    }\n\
		  }\n\
		\n\
		err = ""\n\
		lastVal = -1\n\
		for (e in errNoNum)\n\
		  {\n\
		  if (lastVal < 0)\n\
		    err = err "starting at "e"\\n"\n\
		  else if (e > lastVal + 1)\n\
		    err = err "gap from "(lastVal+1)" to "(e-1)"\\n"\n\
		  lastVal = e\n\
		  if (errNoNum[e][] > 1)\n\
		    {\n\
		    err = err "duplicate number "e" in messages:\\n"\n\
		    for (i = 0; i < errNoNum[e][]; i++)\n\
		      err = err "    "e"<"i">  " errNoNum[e][i] "\\n"\n\
		    }\n\
		  }\n\
		if (err != "")\n\
		  err = err "ending at "lastVal"\\n"\n\
		\n\
		if (list == "")\n\
		  {\n\
		  dialog("No error numbers set yet")\n\
		  return\n\
		  }\n\
		\n\
		list_dialog("Numbers are:", list, "Cancel")\n\
		list_dialog("Errors are:", err, "Cancel")\n\
	}\n\
	Error Numbers>Retrieve logs:::: {\n\
		errNos = $empty_array\n\
		errNoNum = $empty_array\n\
		oldNos = errNos\n\
		oldFile = $file_path $file_name\n\
		\n\
		sl = "(?<=Slogger::logMsg\\\\()\\\\s*LGR_\\\\w*\\\\s*, \\"\\\\|6.\\\\d\\\\d\\\\d\\\\|\\""\n\
		ss = "\\\\s*(LGR_\\\\w*)\\\\s*, \\"\\\\|(6.\\\\d\\\\d\\\\d)\\\\|\\""\n\
		for (file = focus_window("last"); file != ""; file = focus_window("next"))\n\
		  {\n\
		  end = 0\n\
		#raise_window()\n\
		  for (pos = search(sl, end, "regex"); pos >= 0; pos = search(sl, end, "regex"))\n\
		    {\n\
		    beg = pos\n\
		    end = $search_end\n\
		    extract = get_range(beg, end)\n\
		    key = replace_in_string(extract, ss, "\\\\1", "regex")\n\
		    val = replace_in_string(extract, ss, "\\\\2", "regex") + 0\n\
		\n\
		    # get line information\n\
		    line_no = 1\n\
		    old_nl =0\n\
		    for (nl = search("\\n", 0); nl < beg && nl >= 0; nl = search("\\n", nl + 1))\n\
		      {\n\
		      old_nl = nl\n\
		      line_no++\n\
		      }\n\
		    if (nl < 0)\n\
		      nl = $text_length\n\
		\n\
		    # pick up the parameter list\n\
		    set_cursor_pos(pos)\n\
		    goto_matching()\n\
		    cpos = $cursor\n\
		    if (cpos > pos + 1)\n\
		      {\n\
		      # stick all content between parens together\n\
		      parms = replace_in_string(get_range(pos, cpos - 1), "\\n", " ", "copy")\n\
		      parms = replace_in_string(parms, "\\t", " ", "copy")\n\
		      # glob the string pieces together\n\
		      matchss = "\\"((?:[^\\"\\\\\\\\]|\\\\\\\\.)*)\\"\\\\s*\\""\n\
		      replss = "\\"\\\\1"\n\
		#dialog("File "file"\\nLine "line_no"\\nParms = "parms"\\nmatchss = "matchss"\\nreplss = "replss)\n\
		      oldparms = parms\n\
		      for (parms = replace_in_string(parms, matchss, replss, "regex", "copy"); \\\n\
		           parms != oldparms; \\\n\
		           parms = replace_in_string(parms, matchss, replss, "regex", "copy"))\n\
		        {\n\
		#dialog("\\nParms = "parms"\\noldparms = "oldparms)\n\
		        oldparms = parms\n\
		        }\n\
		      # add tabs on either side of format string\n\
		      parms = replace_in_string(parms, \\\n\
		                                "^[^\\"]*\\\\s*\\"((?:[^\\"\\\\\\\\]+|\\\\\\\\.)*)\\"", \\\n\
		                                "\\t\\"\\\\1\\"\\t", "regex", "copy")\n\
		      # compress spaces following last tab\n\
		      parms0 = replace_in_string(parms, "(.*\\t)[^\\t]*$", "\\\\1", "regex", "copy")\n\
		      parms1 = substring(parms, length(parms0), length(parms))\n\
		      parms1 = replace_in_string(parms1, "\\\\s\\\\s+", " ", "regex", "copy")\n\
		      parms = parms0 parms1\n\
		      }\n\
		    else\n\
		      {\n\
		      parms = "ERROR: " get_range(old_nl + 1, nl)\n\
		      }\n\
		\n\
		    if (!(val in errNoNum))\n\
		      errNoNum[val] = $empty_array\n\
		    i = errNoNum[val][]\n\
		    theline = $file_path $file_name ":" line_no ":\\t" parms\n\
		    errNoNum[val][i] = theline\n\
		\n\
		    if (!(key in errNos))\n\
		      {\n\
		      oldNos[key] = 0\n\
		      errNos[key] = val\n\
		      }\n\
		    else\n\
		      errNos[key] = max(errNos[key], val)\n\
		    }\n\
		  }\n\
		\n\
		list = ""\n\
		nl = ""\n\
		l = 0\n\
		for (e in errNos)\n\
		  {\n\
		  if (e != "")\n\
		    {\n\
		    list = list nl e " =\\t" errNos[e]\n\
		    if (errNos[e] > oldNos[e])\n\
		      list = list "\\t(was " oldNos[e] ")"\n\
		    nl = "\\n"\n\
		    l++\n\
		    }\n\
		  }\n\
		\n\
		err = ""\n\
		lastVal = -1\n\
		for (e in errNoNum)\n\
		  {\n\
		  if (lastVal < 0)\n\
		    err = err "starting at "e"\\n"\n\
		  else if (e > lastVal + 1)\n\
		    err = err "gap from "(lastVal+1)" to "(e-1)"\\n"\n\
		  lastVal = e\n\
		  if (errNoNum[e][] > 1)\n\
		    {\n\
		    err = err "duplicate number "e" in messages:\\n"\n\
		    }\n\
		  for (i = 0; i < errNoNum[e][]; i++)\n\
		    err = err "    "e"<"i">  " errNoNum[e][i] "\\n"\n\
		  }\n\
		if (err != "")\n\
		  err = err "ending at "lastVal"\\n"\n\
		\n\
		if (list == "")\n\
		  {\n\
		  dialog("No error numbers set yet")\n\
		  #return\n\
		  }\n\
		else\n\
		  list_dialog("Numbers are:", list, "Cancel")\n\
		\n\
		list_dialog("Errors are:", err, "Cancel", "To New File")\n\
		if ($list_dialog_button == 2)\n\
		  {\n\
		  new()\n\
		  focus_window("last")\n\
		  insert_string(err)\n\
		  }\n\
	}\n\
	Error Numbers>Remove In File:::: {\n\
		if (dialog("Remove error numbers in file\\nAre you sure?", "No", "Yes") == 2)\n\
		  {\n\
		  ss = "Slogger::logMsg\\\\(\\\\s*(LGR_\\\\w*)\\\\s*, \\"\\\\|(6.\\\\d\\\\d\\\\d)\\\\|\\""\n\
		  end = 0\n\
		  for (pos = search(ss, end, "regex"); pos >= 0; pos = search(ss, end, "regex"))\n\
		    {\n\
		    beg = pos\n\
		    end = $search_end\n\
		    extract = get_range(beg, end)\n\
		    key = replace_in_string(extract, ss, "Slogger::logMsg(\\\\1,", "regex")\n\
		    replace_range(beg, end, key)\n\
		    }\n\
		  }\n\
	}\n\
	Error Numbers>Next:Shift+F12::: {\n\
		$errNos[""] = ""\n\
		ss = "Slogger::logMsg\\\\(\\\\s*LGR_\\\\w*\\\\s*(,$|,(?!\\\\s*\\"\\\\|))"\n\
		front = search(ss, $cursor, "regex", "wrap")\n\
		if (front < 0)\n\
		  {\n\
		  dialog("No log messages found")\n\
		  return\n\
		  }\n\
		set_cursor_pos(front)\n\
		\n\
		paren = search("(", front, "case") + 1\n\
		line_start = search("\\n", paren, "case", "backward") + 1\n\
		ind = paren - line_start\n\
		indent = "            "\n\
		while (length(indent) < ind)\n\
		  indent = indent indent\n\
		indent = substring(indent, 0, ind)\n\
		\n\
		pos = $cursor\n\
		beg = search("LGR_\\\\w*", pos, "regex", "forward")\n\
		end = $search_end\n\
		done = 0\n\
		no = 0\n\
		ins = "?"\n\
		if (beg >= 0)\n\
		  {\n\
		  levelstr = get_range(beg, end)\n\
		\n\
		  if (!(levelstr in $errNos))\n\
		    {\n\
		    if (0) $errNos[""] = ""\n\
		    else if (levelstr == "LGR_EMERG")   $errNos[levelstr] = 60000\n\
		    else if (levelstr == "LGR_ERR")     $errNos[levelstr] = 61000\n\
		    else if (levelstr == "LGR_WARNING") $errNos[levelstr] = 62000\n\
		    else if (levelstr == "LGR_INFO")    $errNos[levelstr] = 63000\n\
		    else if (levelstr == "LGR_DEBUG")   $errNos[levelstr] = 64000\n\
		    }\n\
		\n\
		  no = $errNos[levelstr] + 1\n\
		  $errNos[levelstr] = no\n\
		  ins = " \\"|"no"|\\""\n\
		  beg = search("(,$|,(?!\\\\s*\\"\\\\|))", beg, "regex", "forward")\n\
		  end = $search_end\n\
		\n\
		  if (beg > 0)\n\
		    {\n\
		    replace_range(end, end, ins)\n\
		    beg = end + length(ins)\n\
		    if (search(".+", beg, "regex") == beg)\n\
		      {\n\
		      pos = search("\\\\s+", beg, "regex")\n\
		      if (pos == beg)\n\
		        end = $search_end\n\
		      else\n\
		        end = beg\n\
		\n\
		      replace_range(beg, end, "\\n" indent)\n\
		      end = beg + length(indent)\n\
		      }\n\
		    else\n\
		      end = beg\n\
		\n\
		    set_cursor_pos(paren)\n\
		    goto_matching()\n\
		    nerap = $cursor\n\
		    text = get_range(paren, nerap)\n\
		    reindent = replace_in_string(text, "^\\\\s+", indent, "regex", "copy")\n\
		    if (text != reindent)\n\
		      replace_range(paren, nerap, reindent)\n\
		    set_cursor_pos(paren)\n\
		    done = 1\n\
		    }\n\
		  else\n\
		    {\n\
		    $errNos[levelstr] = no - 1\n\
		    }\n\
		  }\n\
		\n\
		if (!done || !no)\n\
		  dialog("Error trying to insert" ins)\n\
	}\n\
	Error Numbers>Find Next:F12::: {\n\
		old = $cursor\n\
		ss = "(?=Slogger::logMsg\\\\(\\\\s*LGR_\\\\w*\\\\s*(,$|,(?!\\\\s*\\"\\\\|)))"\n\
		front = search(ss, old, "regex", "wrap")\n\
		if (front == old)\n\
		  front = search(ss, old + 1, "regex", "wrap")\n\
		if (front < 0)\n\
		  {\n\
		  dialog("No log messages found")\n\
		  return\n\
		  }\n\
		set_cursor_pos(front)\n\
	}\n\
	Tests>pos to line, col:::: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		r = dialog("Use buffer as string argument?", "No: document", "Yes")\n\
		here = $cursor\n\
		if (r != 2)\n\
		  {\n\
		  ln = pos_to_line(here)\n\
		  cl = pos_to_column(here)\n\
		\n\
		  ps = line_col_to_pos(ln, cl)\n\
		  }\n\
		else\n\
		  {\n\
		  s = get_range(0, $text_length)\n\
		  ln = pos_to_line(here, s)\n\
		  cl = pos_to_column(here, $tab_dist, s)\n\
		\n\
		  ps = str_line_col_to_pos(s, ln, cl)\n\
		  }\n\
		\n\
		u = ""\n\
		if (r == 2)\n\
		  u = "Using document as string\\n"\n\
		dialog(u "Original position: " here \\\n\
		       "\\nfound line: " ln \\\n\
		       "\\nfound col : " cl \\\n\
		       "\\n===> new pos = " ps)\n\
	}\n\
	Tests>split test:::: {\n\
		s = get_selection()\n\
		count = string_dialog("Enter split count (default indefinite)", \\\n\
		                      "OK", "lastnotnull")\n\
		lastnotnull = 0\n\
		if ($string_dialog_button == 2)\n\
		  lastnotnull = 1\n\
		if (count != "" && !valid_number(count))\n\
		  dialog("Invalid count value (should be an integer)")\n\
		\n\
		if (count == "")\n\
		  {\n\
		  if (lastnotnull) a = split(s, " ", "lastnotnull")\n\
		  else             a = split(s, " ")\n\
		  }\n\
		else\n\
		  {\n\
		  if (lastnotnull) a = split(s, " ", count, "lastnotnull")\n\
		  else             a = split(s, " ", count)\n\
		  }\n\
		\n\
		r = "String: '" s "'\\nCount: " count "\\nResult (" a[] "):\\n"\n\
		for (i = 0; i < a[]; i++)\n\
		  r = r "[" i "] = :" a[i] ":\\n"\n\
		\n\
		dialog(r)\n\
	}\n\
	Tests>justify test:::: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		\n\
		if ($selection_start != -1)\n\
		  s = get_selection()\n\
		else\n\
		  s = string_dialog("Enter string to justify", "OK")\n\
		\n\
		l = string_dialog("Enter minimum length", "OK")\n\
		lj = replace_in_string(ljust(s, l), "^.*$", "<<|&|", "regex")\n\
		rj = replace_in_string(rjust(s, l), "^.*$", ">>|&|", "regex")\n\
		list_dialog("Left/Right justification: length " l " of string:\\n" s, \\\n\
		            "Left justification:\\n" lj "\\n" \\\n\
		            " Right justification:\\n" rj, "Dismiss")\n\
	}\n\
	Tests>substring:::: {\n\
		s = "<substring tests>"\n\
		s1a = substring(s, 0, length(s))\n\
		s1b = substring(s, 0)\n\
		s2a = substring(s, length(s) - 1, length(s))\n\
		s2b = substring(s, -1)\n\
		s3a = substring(s, 1, length(s) - 1)\n\
		s3b = substring(s, 1, -1)\n\
		s4a = substring(s, length(s) - 1, 1)\n\
		s4b = substring(s, -1, 1)\n\
		\n\
		lines = ""\n\
		lines = lines "substring(s, 0, length(s))             = '"s1a"'\\n"\n\
		lines = lines "substring(s, 0)                        = '"s1b"'\\n"\n\
		lines = lines "equal = " (s1a == s1b) " (should be 1)\\n"\n\
		lines = lines "substring(s, length(s) - 1, length(s)) = '"s2a"'\\n"\n\
		lines = lines "substring(s, -1)                       = '"s2b"'\\n"\n\
		lines = lines "equal = " (s2a == s2b) " (should be 1)\\n"\n\
		lines = lines "substring(s, 1, length(s) - 1)         = '"s3a"'\\n"\n\
		lines = lines "substring(s, 1, -1)                    = '"s3b"'\\n"\n\
		lines = lines "equal = " (s3a == s3b) " (should be 1)\\n"\n\
		lines = lines "substring(s, length(s) - 1, 1)         = '"s4a"'\\n"\n\
		lines = lines "substring(s, -1, 1)                    = '"s4b"'\\n"\n\
		lines = lines "equal = " (s4a == s4b) " (should be 1)\\n"\n\
		\n\
		list_dialog("Results of substring operations for s =\\n'" s "'", lines)\n\
	}\n\
	Tests>clone window:Alt+Equal::: {\n\
		clone_document()\n\
	}\n\
	Tests>semicolon in macro:Alt+Equal::: {\n\
		r = dialog("This macro tests semicolons in macro code", "OK1", "OK2")\n\
		\n\
		if (r == 1) dialog("OK1!"); else if (r == 2) dialog("OK2!"); else dialog("<esc>")\n\
	}\n\
	HSBC>EOD compare log analysis:::: {\n\
		NEDIT_require_macro_file("RSextensions.nm")\n\
		NEDIT_require_macro_file("RScolor.nm")\n\
		\n\
		# find lines of a particular account group\n\
		rs = "Accounts"\n\
		rsacc = rs\n\
		RangeSet_set_color(rs, "orange")\n\
		RangeSet_remove(rs, 0, $text_length)\n\
		\n\
		group = string_dialog("Account prefix (use +Hedges for / accounts)", \\\n\
		                      "OK", "+Hedges", "Cancel")\n\
		but = $string_dialog_button\n\
		if (group != "")\n\
		  {\n\
		  tail = ""\n\
		  group = "^.*<" quote_literal_as_regex(group)\n\
		  if (but == 1)\n\
		    tail = "\\\\d+(?:[^/\\\\d].*\\n|\\n)"\n\
		  else if (but == 2)\n\
		    tail = "(?=\\\\d+).*\\n"\n\
		  if (tail != "")\n\
		    {\n\
		    group = group tail\n\
		    for (pos = search(group, 0, "regex"); \\\n\
		         pos >= 0; \\\n\
		         pos = search(group, $search_end, "regex"))\n\
		      RangeSet_add(rs, pos, $search_end)\n\
		    }\n\
		  }\n\
		\n\
		if (RangeSet_defined(rs))\n\
		  RangeSet_set_color(rs, "orange")\n\
		\n\
		# find position lines where positions match, mark them as grey\n\
		pos = search("Comparing Opening Bonds Positions Against Bloomberg Positions", \\\n\
		             0, "case")\n\
		if (pos < 0)\n\
		  return\n\
		\n\
		summary = search("Summary", pos, "case")\n\
		\n\
		rs = "GoodPositions"\n\
		RangeSet_set_color(rs, "gray")\n\
		RangeSet_remove(rs, 0, $text_length)\n\
		\n\
		while (pos < summary)\n\
		  {\n\
		  pos = search("^.{47}(.{11}) \\\\1.*\\n", pos, "regex")\n\
		  if (pos < 0)\n\
		    break\n\
		  RangeSet_add(rs, pos, $search_end)\n\
		  pos = $search_end\n\
		  }\n\
		\n\
		if (RangeSet_defined(rs))\n\
		  RangeSet_set_color(rs, "gray")\n\
		\n\
		# mark out error count columns in mid green of the summary section\n\
		pos = summary\n\
		\n\
		rs = "ErrorCols"\n\
		RangeSet_set_color(rs, "#00a000")\n\
		RangeSet_remove(rs, 0, $text_length)\n\
		\n\
		while (pos >= 0)\n\
		  {\n\
		  pos = search("^SUMMARY: .{103}$", pos, "regex")\n\
		  end = $search_end\n\
		  if (pos < 0)\n\
		    break\n\
		  pos = search("(?<=SUMMARY: .{21}).{18}(?=.{64}$)", pos, "regex")\n\
		  RangeSet_add(rs, pos, $search_end)\n\
		  pos = search("(?<=SUMMARY: .{48}).{18}(?=.{37}$)", pos, "regex")\n\
		  RangeSet_add(rs, pos, $search_end)\n\
		  pos = search("(?<=SUMMARY: .{75}).{18}(?=.{10}$)", pos, "regex")\n\
		  RangeSet_add(rs, pos, $search_end)\n\
		\n\
		  pos = end\n\
		  }\n\
		\n\
		rscols = rs\n\
		\n\
		if (RangeSet_defined(rs))\n\
		  {\n\
		  RangeSet_set_color(rs, "#00a000")\n\
		  if (RangeSet_defined(rsacc))\n\
		    {\n\
		    RangeSet_set_color(rsacc "Err", "#00b000")\n\
		    RangeSet_add("~ErrorCols", rs)\n\
		    RangeSet_inverse("~ErrorCols")\n\
		    RangeSet_add(rsacc "Err", rsacc)\n\
		    RangeSet_remove(rsacc "Err", "~ErrorCols")\n\
		    RangeSet_forget("~ErrorCols")\n\
		    }\n\
		  }\n\
		\n\
		# look for non-zero error counts within the error columns\n\
		pos = summary\n\
		\n\
		rs = "ErrorInCols"\n\
		RangeSet_set_color(rs, "green")\n\
		RangeSet_remove(rs, 0, $text_length)\n\
		\n\
		while (pos >= 0)\n\
		  {\n\
		  pos = search("(?<= )(?!0>)\\\\d+(?= )", pos, "regex")\n\
		  if (pos < 0)\n\
		    break\n\
		  ext = $search_end\n\
		  if (RangeSet_includes_pos(rscols, pos))\n\
		    {\n\
		    if (ext <= $RangeSet_range_end)\n\
		      RangeSet_add(rs, pos, ext)\n\
		    }\n\
		  pos = ext\n\
		  }\n\
		\n\
		if (RangeSet_defined(rs))\n\
		  RangeSet_set_color(rs, "green")\n\
	}\n\
	HSBC>Vertical records to horizontal table:::: {\n\
		NEDIT_require_macro_file("extensions.nm")\n\
		NEDIT_require_macro_file("DEBUG.nm")\n\
		\n\
		# vertical to horizontal conversion\n\
		\n\
		# This macro treats sequences of lines of form "name: value" as field/value\n\
		# pairs; any line sequence without a colon is treated as a record separator. The\n\
		# values are arranged into a single row per record, turning the record display\n\
		# into a table; field names are written horizontally in the same fashion, acting\n\
		# as column headings.\n\
		\n\
		top = 0\n\
		bot = $text_length\n\
		if ($selection_start != -1)\n\
		  {\n\
		  top = $selection_start\n\
		  bot = $selection_end\n\
		\n\
		  top = start_of_line_pos(top)\n\
		  botfront = start_of_line_pos(bot)\n\
		  if (botfront < bot)\n\
		    bot = end_of_line_pos(bot)\n\
		  else\n\
		    bot = botfront\n\
		  }\n\
		\n\
		break_RE = "^[^:]*(?:\\n[^:]*)*$"\n\
		col_val_sep_RE = ":\\\\s*"\n\
		col_sep = " "\n\
		underline = "-"\n\
		rem_trail_zeros_RE = "(\\\\d\\\\.\\\\d(?:\\\\d*[1-9])*)0*$"\n\
		float_point_RE = "^[-+]?\\\\d+(?:\\\\.\\\\d+)?(?:e[-+]?\\\\d+)?$"\n\
		\n\
		# usual date format is "Mmm dd yyyy HH:MMpm"\n\
		date_RE = "[ADFJMNOS][aceopu][bcglnprtvy] [ \\\\d]\\\\d \\\\d{4}"\n\
		time_RE = "\\\\d\\\\d:\\\\d\\\\d[AP]M"\n\
		date_only_RE = "^" date_RE " 12:00AM$"\n\
		date_time_RE = "^" date_RE " " time_RE "$"\n\
		date_zero_RE = "^Jan  1 1900"\n\
		\n\
		ss = string_dialog("Enter column separator string\\n" \\\n\
		                   "(Default is a single space)", \\\n\
		                   "OK", "Space", "Tab", "Cancel")\n\
		if (ss != "")\n\
		  col_sep = ss\n\
		else if ($string_dialog_button == 2)\n\
		  col_sep = " "\n\
		else if ($string_dialog_button == 3)\n\
		  col_sep = "\\t"\n\
		else if ($string_dialog_button != 1)\n\
		  return\n\
		\n\
		ss = string_dialog("Enter underline character\\n" \\\n\
		                   "(Default is '-')", \\\n\
		                   "OK", "'-'", "'='", "None", "Cancel")\n\
		if (ss != "")\n\
		  underline = substring(ss, 0, 1)\n\
		else if ($string_dialog_button == 2)\n\
		  underline = "-"\n\
		else if ($string_dialog_button == 3)\n\
		  underline = "="\n\
		else if ($string_dialog_button == 4)\n\
		  underline = ""\n\
		else if ($string_dialog_button != 1)\n\
		  return\n\
		\n\
		if (underline != "")\n\
		  underline = quote_literal_as_regex(underline)\n\
		\n\
		do_all_eq = dialog("Remove columns with all equal content?\\n" \\\n\
		                   "(equal-valued content can be displayed after the table)", \\\n\
		                   "Yes, display", "Yes, no display", "No")\n\
		show_all_eq = (do_all_eq == 1)\n\
		do_all_eq = (do_all_eq == 1 || do_all_eq == 2)\n\
		\n\
		the_top = top\n\
		the_bot = bot\n\
		\n\
		cur_headers = $empty_array\n\
		cur_lengths = $empty_array\n\
		cur_lenname = $empty_array\n\
		cur_lenvals = $empty_array\n\
		cur_table = $empty_array\n\
		cur_colpos = $empty_array\n\
		all_equal = $empty_array\n\
		\n\
		rec_num = 0\n\
		maxlen = 0\n\
		maxlenstr = ""\n\
		\n\
		while (top <= bot)\n\
		  {\n\
		  # foreach record:\n\
		  end_rec = search(break_RE, top, "regex")\n\
		  if (end_rec < 0)\n\
		    end_rec = bot\n\
		  next_rec = $search_end\n\
		  if (next_rec < end_rec)\n\
		    next_rec = bot\n\
		\n\
		  prev_name = ""\n\
		  while (top < end_rec)\n\
		    {\n\
		    left = start_of_line_pos(top)\n\
		    right = end_of_line_pos(top)\n\
		    top = right + 1\n\
		    line = get_range(left, right)\n\
		    tline = trim(line)\n\
		    # pick up the column name/value separator (if any)\n\
		    name = replace_in_string(tline, col_val_sep_RE ".*", "", "regex")\n\
		    val = replace_in_string(tline, "^.*?" col_val_sep_RE, "", "regex")\n\
		    val = replace_in_string(val, rem_trail_zeros_RE, "\\\\1", "regex", "copy")\n\
		\n\
		    if (name == "")\n\
		      continue  # forget this line: separator not found\n\
		\n\
		    # add the name to the list of headers\n\
		    if (!(name in cur_headers))\n\
		      {\n\
		      # TODO: find proper position of our header in relation to prev_name\n\
		      col = cur_headers[]\n\
		      cur_headers[name] = col\n\
		      cur_colpos[col] = name\n\
		      len = length(name)\n\
		      if (maxlen < len)\n\
		        {\n\
		        maxlen = len\n\
		        maxlenstr = name\n\
		        }\n\
		      }\n\
		\n\
		    # reduce date-time to date or time if applicable\n\
		    len = length(val)\n\
		    if (search_string(val, date_time_RE, 0, "regex") == 0)\n\
		      {\n\
		      if (search_string(val, date_only_RE, 0, "regex") == 0)\n\
		        {\n\
		        len -= 8    # length of " 12:00AM"\n\
		        val = substring(val, 0, -8)\n\
		        }\n\
		      if (search_string(val, date_zero_RE, 0, "regex") == 0)\n\
		        {\n\
		        len -= 11   # length of "Jan  1 1900"\n\
		        val = substring(val, 11)\n\
		        }\n\
		      if (val == " ")\n\
		        {\n\
		        len = 0\n\
		        val = ""\n\
		        }\n\
		      }\n\
		\n\
		    cur_table[name, rec_num] = val\n\
		    if (do_all_eq)\n\
		      {\n\
		      if (rec_num == 0)\n\
		        {\n\
		        all_equal[name] = 1\n\
		        all_equal_val[name] = line\n\
		        }\n\
		      else if (all_equal[name])\n\
		        {\n\
		        all_equal[name] = (all_equal_val[name] == line)\n\
		        }\n\
		      }\n\
		\n\
		    if (maxlen < len)\n\
		      {\n\
		      maxlen = len\n\
		      maxlenstr = val\n\
		      }\n\
		    prev_name = name\n\
		    }\n\
		\n\
		  # end foreach record\n\
		  top = next_rec + 1\n\
		  rec_num++\n\
		  }\n\
		\n\
		# now we have everything in cur_table\n\
		# evaluate max lengths\n\
		O = $sub_sep\n\
		for (name in cur_headers)\n\
		  {\n\
		  len = length(name)\n\
		  cur_lenname[name] = len\n\
		  cur_lengths[name] = len\n\
		  cur_lenvals[name] = 0\n\
		  }\n\
		for (i = 0; i < rec_num; i++)\n\
		  {\n\
		  line = col_sep\n\
		  for (col = 0; col < cur_colpos[]; col++)\n\
		    {\n\
		    name = cur_colpos[col]\n\
		    index = name O i\n\
		\n\
		    if (!(index in cur_table))\n\
		      cur_table[name, i] = ""\n\
		    len = length(cur_table[index])\n\
		    cur_lengths[name] = max(cur_lengths[name], len)\n\
		    cur_lenvals[name] = max(cur_lenvals[name], len)\n\
		    }\n\
		  }\n\
		\n\
		# write out columns in order\n\
		lines = ""\n\
		line = col_sep\n\
		for (col = 0; col < cur_colpos[]; col++)\n\
		  {\n\
		  name = cur_colpos[col]\n\
		  if (do_all_eq)\n\
		    {\n\
		    if (all_equal[name])\n\
		      continue\n\
		    }\n\
		  if (cur_lenname[name] < cur_lengths[name])\n\
		    val = ljust(name, (cur_lenname[name] + cur_lengths[name]) / 2)\n\
		  else\n\
		    val = name\n\
		  line = line rjust(val, cur_lengths[name]) col_sep\n\
		  }\n\
		lines = lines line "\\n"\n\
		\n\
		# write out a line of column underlines\n\
		if (underline != "")\n\
		  {\n\
		  maxlenstr = replace_in_string(maxlenstr, ".", underline, "regex", "copy")\n\
		  line = col_sep\n\
		  for (col = 0; col < cur_colpos[]; col++)\n\
		    {\n\
		    name = cur_colpos[col]\n\
		    if (do_all_eq)\n\
		      {\n\
		      if (all_equal[name])\n\
		        continue\n\
		      }\n\
		    line = line substring(maxlenstr, 0, cur_lengths[name]) col_sep\n\
		    }\n\
		  lines = lines line "\\n"\n\
		  }\n\
		\n\
		# now write out lines\n\
		O = $sub_sep\n\
		for (i = 0; i < rec_num; i++)\n\
		  {\n\
		  line = col_sep\n\
		  for (col = 0; col < cur_colpos[]; col++)\n\
		    {\n\
		    name = cur_colpos[col]\n\
		    if (do_all_eq)\n\
		      {\n\
		      if (all_equal[name])\n\
		        continue\n\
		      }\n\
		    index = name O i\n\
		\n\
		    if (index in cur_table)\n\
		      val = cur_table[index]\n\
		    else\n\
		      val = ""\n\
		\n\
		    len = cur_lenvals[name]\n\
		    q = search_string(val, float_point_RE, 0, "regex")\n\
		    if (q == 0)\n\
		      val = rjust(val, len)\n\
		    else\n\
		      val = ljust(val, len)\n\
		\n\
		    if (len < cur_lengths[name])\n\
		      val = ljust(val, (len + cur_lengths[name]) / 2)\n\
		\n\
		    line = line rjust(val, cur_lengths[name]) col_sep\n\
		    }\n\
		  lines = lines line "\\n"\n\
		  }\n\
		\n\
		# and all-equal values\n\
		if (show_all_eq)\n\
		  {\n\
		  table = lines\n\
		  lines = ""\n\
		  for (col = 0; col < cur_colpos[]; col++)\n\
		    {\n\
		    name = cur_colpos[col]\n\
		    if (all_equal[name])\n\
		      lines = lines all_equal_val[name] "\\n"\n\
		    }\n\
		  if (lines != "")\n\
		    {\n\
		    lines = table "\\n" lines\n\
		    }\n\
		  }\n\
		if (lines != "")\n\
		  lines = lines "\\n"\n\
		\n\
		# and finally...\n\
		replace_range(the_top, the_bot, lines)\n\
	}\n\
	HSBC>sqsh:::R: {\n\
		beg = $selection_start\n\
		end = $selection_end\n\
		endln = search("$", end, "regex", "forward")\n\
		sql = get_range(beg, end)\n\
		result = shell_command("sqsh -w1000", sql)\n\
		if ($shell_cmd_status != 0)\n\
		  {\n\
		  if (result == "")\n\
		    dialog("sqsh failed: " $shell_cmd_status "\\n<no output>")\n\
		  else\n\
		    list_dialog("sqsh failed: " $shell_cmd_status "\\nOutput:", result)\n\
		  }\n\
		else\n\
		  {\n\
		  replace_range(endln, endln, "\\n" result)\n\
		  }\n\
	}\n
nedit.bgMenuCommands: \
	Go there@grep -n out:::: {\n\
		macro_menu_command("Go there@grep -n out")\n\
	}\n\
	Go there@CC output:::: {\n\
		macro_menu_command("Go there@CC output")\n\
	}\n\
	Go there@Javac output:::: {\n\
		macro_menu_command("Go there@Javac output")\n\
	}\n\
	Go there@Man page output:::: {\n\
		macro_menu_command("Go there@Man page output")\n\
	}\n\
	Undo:::: {\n\
		undo()\n\
	}\n\
	Redo:::: {\n\
		redo()\n\
	}\n\
	Cut:::R: {\n\
		cut_clipboard()\n\
	}\n\
	Copy:::R: {\n\
		copy_clipboard()\n\
	}\n\
	Paste:::: {\n\
		paste_clipboard()\n\
	}\n\
	Back:::: {\n\
		macro_menu_command("Move>MultiTag>Back")\n\
	}\n\
	Push:::: {\n\
		macro_menu_command("Move>MultiTag>Push")\n\
	}\n\
	Find forward@*:::R: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = get_selection()\n\
		c = $cursor\n\
		multitags_push_curpos()\n\
		find(s, "forward", "literal")\n\
		if ($cursor == c)\n\
		  multitags_pop_curpos_quiet()\n\
	}\n\
	Find forward@C@C++:::R: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = get_selection()\n\
		c = $cursor\n\
		multitags_push_curpos()\n\
		find(s, "forward", "case")\n\
		if ($cursor == c)\n\
		  multitags_pop_curpos_quiet()\n\
	}\n\
	Find backward@*:::R: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = get_selection()\n\
		c = $cursor\n\
		multitags_push_curpos()\n\
		find(s, "backward", "literal")\n\
		if ($cursor == c)\n\
		  multitags_pop_curpos_quiet()\n\
	}\n\
	Find backward@C@C++:::R: {\n\
		NEDIT_require_macro_file("multitags.nm")\n\
		\n\
		s = get_selection()\n\
		c = $cursor\n\
		multitags_push_curpos()\n\
		find(s, "backward", "case")\n\
		if ($cursor == c)\n\
		  multitags_pop_curpos_quiet()\n\
	}\n\
	.../...@SGML HTML@XML:::R: {\n\
		macro_menu_command("HTML>directive@SGML HTML@XML")\n\
	}\n\
	...?...@SGML HTML@XML:::: {\n\
		macro_menu_command("HTML>dialog directive@SGML HTML@XML")\n\
	}\n\
	-a name-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-a name-@SGML HTML")\n\
	}\n\
	-a href-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-a href-@SGML HTML")\n\
	}\n\
	-tt-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-tt-@SGML HTML")\n\
	}\n\
	-i-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-i-@SGML HTML")\n\
	}\n\
	-b-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-b-@SGML HTML")\n\
	}\n\
	-p-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-p-@SGML HTML")\n\
	}\n\
	-strong-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-strong-@SGML HTML")\n\
	}\n\
	-pre-@SGML HTML:::: {\n\
		macro_menu_command("HTML>-pre-@SGML HTML")\n\
	}\n\
	&entities;@SGML HTML@XML:::: {\n\
		macro_menu_command("HTML>&entities;@SGML HTML@XML")\n\
	}\n\
	MultiTag>Push:::: {\n\
		macro_menu_command("Move>MultiTag>Push")\n\
	}\n\
	MultiTag>Back:::: {\n\
		macro_menu_command("Move>MultiTag>Back")\n\
	}\n\
	MultiTag>Show Stack:::: {\n\
		macro_menu_command("Move>MultiTag>Show stack")\n\
	}\n\
	MultiTag>Find Def@*:::: {\n\
		macro_menu_command("Move>MultiTag>Find def@*")\n\
	}\n\
	MultiTag>Find Def@C@C++:::: {\n\
		macro_menu_command("Move>MultiTag>Find def@C@C++")\n\
	}\n\
	MultiTag>Find ?@*:::: {\n\
		macro_menu_command("Move>MultiTag>Find ?@*")\n\
	}\n\
	MultiTag>Find ?@C@C++:::: {\n\
		macro_menu_command("Move>MultiTag>Find ?@C@C++")\n\
	}\n\
	MultiTag>Reload Tags@*:::: {\n\
		macro_menu_command("Move>MultiTag>Reload tags@*")\n\
	}\n\
	MultiTag>Reload Tags@C@C++:::: {\n\
		macro_menu_command("Move>MultiTag>Reload tags@C@C++")\n\
	}\n\
	MultiTag>Forget Tags:::: {\n\
		macro_menu_command("Move>MultiTag>Forget tags")\n\
	}\n\
	MultiTag>File Symbols:::: {\n\
		macro_menu_command("Move>MultiTag>File symbols")\n\
	}\n\
	MultiTag>Show tags files:::: {\n\
		macro_menu_command("Move>MultiTag>Show tags files")\n\
	}\n\
	MultiTag>Set Stack:::: {\n\
		macro_menu_command("Move>MultiTag>Set stack")\n\
	}\n\
	MultiTag>Empty Stack:::: {\n\
		macro_menu_command("Move>MultiTag>Empty stack")\n\
	}\n\
	Grep>C lines@C@CC output:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "[a-zA-Z]*.[ch] /dev/null"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  greplines(files)\n\
		else\n\
		  greplines_from_prompt(files)\n\
	}\n\
	Grep>C files@C@CC output:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "[a-zA-Z]*.[ch] /dev/null"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  grepfiles(files)\n\
		else\n\
		  grepfiles_from_prompt(files)\n\
	}\n\
	Grep>C++ lines@C++@CC output:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "[a-zA-Z]*.[CcHhIi]* /dev/null"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  greplines(files)\n\
		else\n\
		  greplines_from_prompt(files)\n\
	}\n\
	Grep>C++ files@C++@CC output:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "[a-zA-Z]*.[CcHhIi]* /dev/null"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  grepfiles(files)\n\
		else\n\
		  grepfiles_from_prompt(files)\n\
	}\n\
	Grep>all lines:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "* /dev/null"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  greplines(files)\n\
		else\n\
		  greplines_from_prompt(files)\n\
	}\n\
	Grep>all lines (-R):::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		grepmatch = "*"\n\
		\n\
		here = $file_path\n\
		if (here == "")\n\
		  here = "."\n\
		\n\
		str = get_selection("any")\n\
		\n\
		dir = string_dialog("grep from which directory?" \\\n\
		                    "\\n- " $NEDIT_START_DIR " : start directory" \\\n\
		                    "\\n- " here             " : this directory", \\\n\
		                    "OK", "Start Directory +", "This Directory +", "Cancel")\n\
		\n\
		if ($string_dialog_button == 2)\n\
		  dir = NEDIT_remove_dotdot($NEDIT_START_DIR dir)\n\
		else if ($string_dialog_button == 4 || $string_dialog_button == 0)\n\
		  return\n\
		else if (dir == "" || $string_dialog_button != 1)\n\
		  dir = NEDIT_remove_dotdot(here dir)\n\
		\n\
		greplines_from_prompt_r(str, grepmatch, dir)\n\
	}\n\
	Grep>C/C++ all lines (-R)@C@C++:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		grepmatch = "*.[cChH][+pPxX][+pPxX] *.[cChH] *.CC *.cc *.inl *.INL"\n\
		\n\
		greplines_from_prompt_r("", grepmatch)\n\
	}\n\
	Grep>C/C++ all lines (-R) from ?@C@C++:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		str = get_selection("any")\n\
		grepmatch = "*.[cChH][+pPxX][+pPxX] *.[cChH] *.CC *.cc *.inl *.INL"\n\
		\n\
		here = $file_path\n\
		if (here == "")\n\
		  here = "."\n\
		\n\
		dir = string_dialog("grep from which directory?" \\\n\
		                    "\\n- " $NEDIT_START_DIR " : start directory" \\\n\
		                    "\\n- " here             " : this directory", \\\n\
		                    "OK", "Start Directory +", "This Directory +", "Cancel")\n\
		\n\
		if ($string_dialog_button == 2)\n\
		  dir = NEDIT_remove_dotdot($NEDIT_START_DIR dir)\n\
		else if ($string_dialog_button == 4 || $string_dialog_button == 0)\n\
		  return\n\
		else if (dir == "" || $string_dialog_button != 1)\n\
		  dir = NEDIT_remove_dotdot(here dir)\n\
		\n\
		greplines_from_prompt_r(str, grepmatch, dir)\n\
	}\n\
	Grep>all files:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		files = "*"\n\
		if ($selection_start != -1 && $selection_left == -1)\n\
		  grepfiles(files)\n\
		else\n\
		  grepfiles_from_prompt(files)\n\
	}\n\
	Grep>all lines (-R)@C@C++:::: {\n\
		NEDIT_require_macro_file("grepfiles.nm")\n\
		\n\
		grepmatch = "*.[cChH][+pPxX][+pPxX] *.[cChH] *.CC *.cc *.inl *.INL"\n\
		greplines_from_prompt_r(grepmatch)\n\
	}\n\
	Macros>Show Loaded@NEdit Macro@NEdit Macro RE:::: {\n\
		NEDIT_show_macro_files()\n\
	}\n\
	Macros>Reload Selected@NEdit Macro@NEdit Macro RE:::: {\n\
		macro_menu_command("Various>Macro>Reload file")\n\
	}\n\
	Macros>Reload All@NEdit Macro@NEdit Macro RE:::: {\n\
		macro_menu_command("Various>Macro>Reload all")\n\
	}\n\
	Macros>Reload this file@NEdit Macro@NEdit Macro RE:::: {\n\
		macro_menu_command("Various>Macro>Reload this file@NEdit Macro")\n\
	}\n\
	Macros>NEdit Macro@NEdit Macro RE:::: {\n\
		macro_menu_command("Language>NEdit Macro@*")\n\
	}\n\
	Macros>NEdit Macro RE@NEdit Macro:::: {\n\
		macro_menu_command("Language>NEdit Macro RE@NEdit Macro")\n\
	}\n\
	Menu>Toggle:::: {\n\
		show_menu()\n\
	}\n\
	Menu>On:::: {\n\
		show_menu("on")\n\
	}\n\
	Menu>Off:::: {\n\
		show_menu("off")\n\
	}\n\
	Find all:::: {\n\
		macro_menu_command("Rangesets>Find>All in \\"Find All\\" (green)")\n\
	}\n\
	Find all in>"Find All" (green):::: {\n\
		macro_menu_command("Rangesets>Find>All in \\"Find All\\" (green)")\n\
	}\n\
	Find all in>Choose rangeset:::: {\n\
		macro_menu_command("Rangesets>Find>All")\n\
	}\n\
	Find all in>All files:::: {\n\
		macro_menu_command("Rangesets>Find>All (all files)")\n\
	}\n\
	Mark with range:::R: {\n\
		macro_menu_command("Rangesets>Mark with range")\n\
	}\n\
	Mark with TOP range:::R: {\n\
		macro_menu_command("Rangesets>Mark with TOP range")\n\
	}\n\
	Rangeset>Find range:::: {\n\
		macro_menu_command("Rangesets>Go to range")\n\
	}\n\
	Rangeset>Selection>RS + selection:::R: {\n\
		macro_menu_command("Rangesets>Mark with range")\n\
	}\n\
	Rangeset>Selection>RS - selection:::R: {\n\
		macro_menu_command("Rangesets>Remove>From set")\n\
	}\n\
	Rangeset>Selection>Remove from all sets:::R: {\n\
		macro_menu_command("Rangesets>Remove>From all sets")\n\
	}\n\
	Rangeset>RS1 = RS1 + RS2:::: {\n\
		macro_menu_command("Rangesets>RS1 =>RS1 + RS2")\n\
	}\n\
	Rangeset>RS1 = RS1 - RS2:::: {\n\
		macro_menu_command("Rangesets>RS1 =>RS1 - RS2")\n\
	}\n\
	Rangeset>RS1 = RS1 & RS2:::: {\n\
		macro_menu_command("Rangesets>RS1 =>RS1 & RS2 (intersect)")\n\
	}\n\
	Rangeset>RS1 = ~RS1:::: {\n\
		macro_menu_command("Rangesets>RS1 =>~RS1")\n\
	}\n\
	Rangeset>Color Set:::: {\n\
		macro_menu_command("Rangesets>Color>Quick")\n\
	}\n\
	Rangeset>Forget Set:::: {\n\
		macro_menu_command("Rangesets>Forget>Set")\n\
	}\n\
	Make C++ method@C++:::: {\n\
		macro_menu_command("Development>Make C++ Method in class.cpp file@C++")\n\
	}\n
nedit.highlightPatterns: Ada:Default\n\
	Awk:Default\n\
	C++:1:0{\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		trigraph hash:"\\?\\?=":::DiTriGraph::\n\
		trigraph backslash:"\\?\\?/":::DiTriGraph::\n\
		trigraph caret:"\\?\\?'":::DiTriGraph::\n\
		trigraph brackets:"(\\?\\?\\(|\\?\\?\\))":::DiTriGraph::\n\
		trigraph braces:"(\\?\\?\\<|\\?\\?\\>)":::DiTriGraph::\n\
		trigraph pipe:"\\?\\?!":::DiTriGraph::\n\
		trigraph tilde:"\\?\\?-":::DiTriGraph::\n\
		comment:"/\\*":"\\*/"::Comment::\n\
		comment work:"(?:TODO|(?:YOU ARE HERE))(?:(?!\\s*\\*/).)*":::Comment Work:comment:\n\
		cplus comment:"//":"(?<!\\\\)$"::Comment::\n\
		cplus comment work:"(?:TODO|(?:YOU ARE HERE)).*":::Comment Work:cplus comment:\n\
		#if 0 comment:"^\\s*#\\s*if\\s+0>":"^\\s*#\\s*(?:endif|else)>"::#if 0 Comment::\n\
		string:"L?""":"""":"\\n":String::\n\
		preprocessor line:"^\\s*(#|%:)\\s*(?:include|define|if|ifn?def|line|error|else|endif|elif|undef|pragma)>":"$"::Preprocessor::\n\
		string escape chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::String1:string:\n\
		string escape errors:"\\\\.":::Flag:string:\n\
		preprocessor esc chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::Preprocessor1:preprocessor line:\n\
		preprocessor comment:"/\\*":"\\*/"::Comment:preprocessor line:\n\
		preproc comment work:"(?:TODO|(?:YOU ARE HERE))(?:(?!\\s*\\*/).)*":::Comment Work:preprocessor comment:\n\
		preproc cplus comment:"//":"$"::Comment:preprocessor line:\n\
		preproc cplus comment work:"(?:TODO|(?:YOU ARE HERE)).*":::Comment Work:preproc cplus comment:\n\
		preprocessor keywords:"<__(?:(?:LINE|FILE|DATE|TIME|STDC)__)|cplusplus>":::Preprocessor2::\n\
		character constant:"L?'":"'":"[^\\\\][^']":Character Const::\n\
		character escape chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::String1:character constant:\n\
		character escape errors:"\\\\.":::Flag:character constant:\n\
		numeric constant:"<(?i(?:0x[\\da-fA-F]+|0[0-7]*|[1-9]\\d*)(?:l|u|lu|ul)|(?:(?:\\d*\\.\\d+|\\d+\\.)(?:e[-+]?\\d+)?[lf]?))(?=\\W|$)":::Numeric Const::D\n\
		storage keyword:"<(?:class|typename|template|friend|virtual|inline|explicit|operator|public|private|protected|const|extern|auto|register|static|mutable|unsigned|signed|volatile|char|double|float|int|long|short|bool|wchar_t|void|typedef|struct|union|enum|export)>":::Storage Type::D\n\
		extension keyword:"<(?:typeid|asm)>":::Flag::D\n\
		goto statement:"(?n<(goto)\\s+(\\w+))":::Keyword::\n\
		goto keyword:"\\1":""::Keyword:goto statement:C\n\
		goto label:"\\2":""::Label:goto statement:C\n\
		label:"(?n(?<=[;{}])\\s+(?!<(?:public|protected|private|default)>)(\\w+):(?!:))":::Operator::\n\
		label word:"\\1":""::Label:label:C\n\
		keyword:"<(?:new|delete|this|return|goto|if|else|case|default|switch|break|continue|while|do|for|try|catch|throw|sizeof|true|false|namespace|using|dynamic_cast|static_cast|reinterpret_cast|const_cast)>":::Keyword::D\n\
		operator keyword:"<(?:and|bitand|and_eq|or|bitor|or_eq|xor|xor_eq|not|not_eq|compl)>":::Operator::D\n\
		digraphs braces:"\\<%|%\\>":::DiTriGraph::D\n\
		digraphs brackets:"\\<:|:\\>":::DiTriGraph::D\n\
		digraphs hash:"%:":::DiTriGraph::D\n\
		braces:"([{}]|\\<%|%\\>)":::Bracket::D\n\
		semicolon:";":::Bracket::D\n\
		comma:",":::Bracket::D\n\
		operators:"(=|:|\\?|==|!=|\\<|\\<=|\\>|\\>=|-|-\\>|\\.|\\+|\\+\\+|-|--|\\*|/|%|\\&|\\&\\&|\\||\\|\\||^|!|~)":::Operator::D\n\
		brackets:"([][]|\\<:|:\\>)":::Bracket::D\n\
		parens:"[()]":::Bracket::D\n\
		assert:"<assert>":::Text Key::D\n\
	}\n\
	C:1:0{\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		comment:"/\\*":"\\*/"::Comment::\n\
		comment work:"(?:TODO|(?:YOU ARE HERE))(?:(?!\\s*\\*/).)*":::Comment:comment:\n\
		C++ line comment:"//":"$"::Comment line::\n\
		string:"L?""":"""":"\\n":String::\n\
		preprocessor line:"^\\s*#\\s*(?:include|define|if|ifn?def|line|error|else|endif|elif|undef|pragma)>":"$"::Preprocessor::\n\
		string escape chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::String1:string:\n\
		string escape errors:"\\\\.":::Flag:string:\n\
		preprocessor esc chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::Preprocessor1:preprocessor line:\n\
		preprocessor comment:"/\\*":"\\*/"::Comment:preprocessor line:\n\
		preprocessor keywords:"<__(?:LINE|FILE|DATE|TIME|STDC)__>":::Preprocessor::\n\
		character constant:"L?'":"'":"[^\\\\][^']":Character Const::\n\
		character escape chars:"\\\\(?:[0-7]{1,3}|x[0-9a-fA-F]+|['""?\\\\abfnrtv]|\\n)":::String1:character constant:\n\
		character escape errors:"\\\\.":::Flag:character constant:\n\
		numeric constant:"<(?i(?:0x[\\da-fA-F]+|0[0-7]*|[1-9]\\d*)(?:l|u|lu|ul)|(?:(?:\\d*\\.\\d+|\\d+\\.)(?:e[-+]?\\d+)?[lf]?))(?=\\W|$)":::Numeric Const::D\n\
		storage keyword:"<(?:const|extern|auto|register|static|unsigned|signed|volatile|char|double|float|int|long|short|void|typedef|struct|union|enum)>":::Storage Type::D\n\
		extension keyword:"<(?:class|public|protected|private|typename)>":::Label::D\n\
		keyword:"<(?:return|goto|if|else|case|default|switch|break|continue|while|do|for|sizeof)>":::Keyword::D\n\
		braces:"[{}]":::Bracket::D\n\
		operators:"(=|:|\\?|==|!=|\\<|\\<=|\\>|\\>=|-|-\\>|\\.|\\+|\\+\\+|-|--|\\*|/|%|\\&|\\&\\&|\\||\\|\\||^|!|~)":::Operator::D\n\
		parens:"[)(]":::Operator::\n\
		brackets:"[][]":::Bracket::\n\
	}\n\
	CSS:Default\n\
	Csh:Default\n\
	Fortran:Default\n\
	Java:3:0{\n\
		README:"Java highlighting patterns for NEdit 5.1. Version 1.5 Author/maintainer: Joachim Lous - jlous at users.sourceforge.net":::Flag::D\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		doccomment:"/\\*\\*":"\\*/"::Text Comment::\n\
		doccomment tag:"@\\l*":::Text Key1:doccomment:\n\
		comment:"/\\*":"\\*/"::Comment::\n\
		comment work:"(?:TODO|(?:YOU ARE HERE))(?:(?!\\s*\\*/).)*":::Comment Work:comment:\n\
		cplus comment:"//":"$"::Comment::\n\
		cplus comment work:"(?:TODO|(?:YOU ARE HERE)).*":::Comment Work:cplus comment:\n\
		string:"""":"""":"\\n":String::\n\
		string escape:"(?:\\\\u[\\dA-Faf]{4}|\\\\[0-7]{1,3}|\\\\[btnfr'""\\\\])":::String1:string:\n\
		single quoted:"'":"'":"\\n":String::\n\
		single quoted escape:"(?:\\\\u[\\dA-Faf]{4}|\\\\[0-7]{1,3}|\\\\[btnfr'""\\\\])(?=')":::String1:single quoted:\n\
		single quoted char:".(?=')":::String:single quoted:\n\
		single quoted error:".":::Flag:single quoted:\n\
		hex const:"<(?i0[X][\\dA-F]+)>":::Numeric Const::\n\
		long const:"<(?i[\\d]+L)>":::Numeric Const::\n\
		decimal const:"(?<!\\Y)(?i\\d+(?:\\.\\d*)?(?:E[+\\-]?\\d+)?[FD]?|\\.\\d+(?:E[+\\-]?\\d+)?[FD]?)(?!\\Y)":::Numeric Const::\n\
		package:"<(?:package)>":";":"\\n":Preprocessor::\n\
		package term:"&":"&":"\\n":Keyword:package:C\n\
		package package:"(?:\\l\\w+)":::Preprocessor1:package:\n\
		package sep:"\\.":::Keyword:package:\n\
		package error:"\\S":::Flag:package:\n\
		import:"<(?:import)>":";":"\\n":Preprocessor::\n\
		import term:"&":"&":"\\n":Keyword:import:C\n\
		import package:"(?:\\l\\w+)(?=\\s*\\.)":::Preprocessor1:import:\n\
		import class:"(?:\\l\\w+|\\*)(?=\\s*;)":::Storage Type:import:\n\
		import sep:"\\.":::Keyword:import:\n\
		import error:"\\S":::Flag:import:\n\
		classdef:"<(?:class|interface)>\\s*\\n?\\s*([\\l_]\\w*)":::Keyword::\n\
		classdef name:"\\1":""::Storage Type:classdef:C\n\
		extends:"<(?:extends)>":"(?=(?:<implements>|[{;]))"::Keyword::\n\
		extends argument:"<[\\l_][\\w\\.]*(?=\\s*(?:/\\*.*\\*/)?(?://.*)?\\n?\\s*(?:[,;{]|<implements>))":::Storage Type:extends:\n\
		extends comma:",":::Keyword:extends:\n\
		extends comment:"/\\*":"\\*/"::Comment:extends:\n\
		extends cpluscomment:"//":"$"::Comment:extends:\n\
		extends error:"\\S":::Flag:extends:\n\
		impl_throw:"<(?:implements|throws)>":"(?=[{;])"::Keyword::\n\
		impl_throw argument:"<[\\l_][\\w\\.]*(?=\\s*(?:/\\*.*\\*/)?(?://.*)?\\n?\\s*[,;{])":::Storage Type:impl_throw:\n\
		impl_throw comma:",":::Keyword:impl_throw:\n\
		impl_throw comment:"/\\*":"\\*/"::Comment:impl_throw:\n\
		impl_throw cpluscomment:"//":"$"::Comment:impl_throw:\n\
		impl_throw error:"\\S":::Flag:impl_throw:\n\
		case:"<case>":":"::Label::\n\
		case single quoted:"'\\\\?[^']'":::Character Const:case:\n\
		case numeric const:"(?<!\\Y)(?i0[X][\\dA-F]+|\\d+(:?\\.\\d*)?(?:E[+\\-]?\\d+)?F?|\\.\\d+(?:E[+\\-]?\\d+)?F?|\\d+L)(?!\\Y)":::Numeric Const:case:\n\
		case cast:"\\(\\s*([\\l_][\\w.]*)\\s*\\)":::Keyword:case:\n\
		case cast type:"\\1":""::Storage Type:case cast:C\n\
		case variable:"[\\l_][\\w.]*":::Identifier1:case:\n\
		case signs:"[-+*/<>^&|%()]":::Keyword:case:\n\
		case error:"\\S":::Flag:case:\n\
		label:"([;{}:])":"[\\l_]\\w*\\s*:":"[^\\s\\n]":Label::\n\
		label qualifier:"\\1":""::Keyword:label:C\n\
		labelref:"<(?:break|continue)>\\s*\\n?\\s*([\\l_]\\w*)?(?=\\s*\\n?\\s*;)":::Keyword::\n\
		labelref name:"\\1":""::Label:labelref:C\n\
		instanceof:"<instanceof>\\s*\\n?\\s*([\\l_][\\w.]*)":::Keyword::\n\
		instanceof class:"\\1":""::Storage Type:instanceof:C\n\
		newarray:"new\\s*[\\n\\s]\\s*([\\l_][\\w\\.]*)\\s*\\n?\\s*(?=\\[)":::Keyword::\n\
		newarray type:"\\1":""::Storage Type:newarray:C\n\
		constructor def:"<(abstract|final|native|private|protected|public|strictfp|static|synchronized)\\s*[\\n|\\s]\\s*[\\l_]\\w*\\s*\\n?\\s*(?=\\()":::Subroutine::\n\
		constructor def modifier:"\\1":""::Keyword:constructor def:C\n\
		keyword - modifiers:"<(?:abstract|final|native|private|protected|public|strictfp|static|transient|synchronized|volatile)>":::Keyword::\n\
		keyword - control flow:"<(?:catch|do|else|finally|for|if|return|switch|throw|try|while)>":::Keyword::\n\
		keyword - calc value:"<(?:new|super|this)>":::Keyword::\n\
		keyword - literal value:"<(?:false|null|true)>":::Numeric Const::\n\
		function def:"<([\\l_][\\w\\.]*)>((?:\\s*\\[\\s*\\])*)\\s*[\\n|\\s]\\s*<[\\l_]\\w*>\\s*\\n?\\s*(?=\\()":::Plain::\n\
		function def type:"\\1":""::Storage Type:function def:C\n\
		function def type brackets:"\\2":""::Bracket:function def:C\n\
		function call:"<[\\l_]\\w*>\\s*\\n?\\s*(?=\\()":::Plain::\n\
		cast:"[^\\w\\s]\\s*\\n?\\s*\\(\\s*([\\l_][\\w\\.]*)\\s*\\)":::Keyword::\n\
		cast type:"\\1":""::Storage Type:cast:C\n\
		declaration:"<[\\l_][\\w\\.]*>((:?\\s*\\[\\s*\\]\\s*)*)(?=\\s*\\n?\\s*(?!instanceof)[\\l_]\\w*)":::Storage Type::\n\
		declaration brackets:"\\1":""::Bracket:declaration:C\n\
		variable:"<[\\l_]\\w*>":::Identifier1::D\n\
		braces and parens:"[(){}[\\]]":::Bracket::D\n\
		signs:"[-+*/%=,.;:<>!|&^?~]":::Operator::D\n\
		error:"\\S":::Flag::D\n\
	}\n\
	JavaScript:Default\n\
	LaTeX:Default\n\
	Lex:Default\n\
	Makefile:Default\n\
	Matlab:Default\n\
	NEdit Macro:2:0{\n\
		README:"NEdit Macro syntax highlighting patterns, version 2.6, maintainer Thorsten Haude, nedit at thorstenhau.de":::Flag::D\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		Comment Cont:"#()(?=.*\\\\$)":"(\\\\)$"::Comment::\n\
		Comment Cont cont:"\\1":"\\1"::Label:Comment Cont:C\n\
		Comment:"#":"$"::Comment::\n\
		Built-in Misc Vars:"(?<!\\Y)\\$(?:active_pane|args|calltip_ID|column|cursor|display_width|empty_array|file_name|file_path|language_mode|line|locked|max_font_width|min_font_width|modified|n_display_lines|n_panes|rangeset_list|read_only|selection_(?:start|end|left|right)|server_name|text_length|top_line)>":::Identifier::\n\
		Built-in Pref Vars:"(?<!\\Y)\\$(?:auto_indent|em_tab_dist|file_format|font_name|font_name_bold|font_name_bold_italic|font_name_italic|highlight_syntax|incremental_backup|incremental_search_line|make_backup_copy|match_syntax_based|overtype_mode|show_line_numbers|show_matching|statistics_line|tab_dist|use_tabs|wrap_margin|wrap_text)>":::Identifier2::\n\
		Built-in Special Vars:"(?<!\\Y)\\$(?:[1-9]|list_dialog_button|n_args|read_status|search_end|shell_cmd_status|string_dialog_button|sub_sep)>":::String1::\n\
		Built-in Subrs:"<(?:append_file|beep|calltip|clipboard_to_string|dialog|focus_window|get_character|get_pattern_(by_name|at_pos)|get_range|get_selection|get_style_(by_name|at_pos)|getenv|kill_calltip|length|list_dialog|max|min|rangeset_(?:add|create|destroy|get_by_name|includes|info|invert|range|set_color|set_mode|set_name|subtract)|read_file|replace_in_string|replace_range|replace_selection|replace_substring|search|search_string|select|select_rectangle|set_cursor_pos|set_language_mode|set_locked|shell_command|split|string_compare|string_dialog|string_to_clipboard|substring|t_print|tolower|toupper|valid_number|write_file)>":::Subroutine::\n\
		Menu Actions:"<(?:new|open|open-dialog|open_dialog|open-selected|open_selected|close|save|save-as|save_as|save-as-dialog|save_as_dialog|revert-to-saved|revert_to_saved|revert_to_saved_dialog|include-file|include_file|include-file-dialog|include_file_dialog|load-macro-file|load_macro_file|load-macro-file-dialog|load_macro_file_dialog|load-tags-file|load_tags_file|load-tags-file-dialog|load_tags_file_dialog|unload_tags_file|load_tips_file|load_tips_file_dialog|unload_tips_file|print|print-selection|print_selection|exit|undo|redo|delete|select-all|select_all|shift-left|shift_left|shift-left-by-tab|shift_left_by_tab|shift-right|shift_right|shift-right-by-tab|shift_right_by_tab|find|find-dialog|find_dialog|find-again|find_again|find-selection|find_selection|find_incremental|start_incremental_find|replace|replace-dialog|replace_dialog|replace-all|replace_all|replace-in-selection|replace_in_selection|replace-again|replace_again|replace_find|replace_find_same|replace_find_again|goto-line-number|goto_line_number|goto-line-number-dialog|goto_line_number_dialog|goto-selected|goto_selected|mark|mark-dialog|mark_dialog|goto-mark|goto_mark|goto-mark-dialog|goto_mark_dialog|match|select_to_matching|goto_matching|find-definition|find_definition|show_tip|split-window|split_window|close-pane|close_pane|uppercase|lowercase|fill-paragraph|fill_paragraph|control-code-dialog|control_code_dialog|filter-selection-dialog|filter_selection_dialog|filter-selection|filter_selection|execute-command|execute_command|execute-command-dialog|execute_command_dialog|execute-command-line|execute_command_line|shell-menu-command|shell_menu_command|macro-menu-command|macro_menu_command|bg_menu_command|post_window_bg_menu|beginning-of-selection|beginning_of_selection|end-of-selection|end_of_selection|repeat_macro|repeat_dialog|raise_window|focus_pane|set_statistics_line|set_incremental_search_line|set_show_line_numbers|set_auto_indent|set_wrap_text|set_wrap_margin|set_highlight_syntax|set_make_backup_copy|set_incremental_backup|set_show_matching|set_match_syntax_based|set_overtype_mode|set_locked|set_tab_dist|set_em_tab_dist|set_use_tabs|set_fonts|set_language_mode)(?=\\s*\\()":::Subroutine::\n\
		Text Actions:"<(?:self-insert|self_insert|grab-focus|grab_focus|extend-adjust|extend_adjust|extend-start|extend_start|extend-end|extend_end|secondary-adjust|secondary_adjust|secondary-or-drag-adjust|secondary_or_drag_adjust|secondary-start|secondary_start|secondary-or-drag-start|secondary_or_drag_start|process-bdrag|process_bdrag|move-destination|move_destination|move-to|move_to|move-to-or-end-drag|move_to_or_end_drag|end_drag|copy-to|copy_to|copy-to-or-end-drag|copy_to_or_end_drag|exchange|process-cancel|process_cancel|paste-clipboard|paste_clipboard|copy-clipboard|copy_clipboard|cut-clipboard|cut_clipboard|copy-primary|copy_primary|cut-primary|cut_primary|newline|newline-and-indent|newline_and_indent|newline-no-indent|newline_no_indent|delete-selection|delete_selection|delete-previous-character|delete_previous_character|delete-next-character|delete_next_character|delete-previous-word|delete_previous_word|delete-next-word|delete_next_word|delete-to-start-of-line|delete_to_start_of_line|delete-to-end-of-line|delete_to_end_of_line|forward-character|forward_character|backward-character|backward_character|key-select|key_select|process-up|process_up|process-down|process_down|process-shift-up|process_shift_up|process-shift-down|process_shift_down|process-home|process_home|forward-word|forward_word|backward-word|backward_word|forward-paragraph|forward_paragraph|backward-paragraph|backward_paragraph|beginning-of-line|beginning_of_line|end-of-line|end_of_line|beginning-of-file|beginning_of_file|end-of-file|end_of_file|next-page|next_page|previous-page|previous_page|page-left|page_left|page-right|page_right|toggle-overstrike|toggle_overstrike|scroll-up|scroll_up|scroll-down|scroll_down|scroll_left|scroll_right|scroll-to-line|scroll_to_line|select-all|select_all|deselect-all|deselect_all|focusIn|focusOut|process-return|process_return|process-tab|process_tab|insert-string|insert_string|mouse_pan)>":::Subroutine::\n\
		Keyword:"<(?:break|continue|define|delete|else|for|if|in|return|while)>":::Keyword::\n\
		Braces:"[{}]":::Bracket::D\n\
		ParensBrackets:"[\\[\\]()]":::Bracket::D\n\
		Global Variable:"\\$[A-Za-z0-9_]+":::Identifier1::\n\
		BadString:"""(?:\\\\.|[^""\\\\])*\\\\?$":::Flag::\n\
		String:"""":"""":"\\n":String::\n\
		String Escape Char:"\\\\(?:0[0-3][0-7]{1,2}|0[0-7]{1,2}|[xX][0-9a-fA-F]{1,2}|['""?\\\\abefnrtv]|\\n)":::String1:String:\n\
		String Escape Undefined:"\\\\.":::Flag:String:\n\
		Numeric Const:"(?<!\\Y)-?[0-9]+>":::Numeric Const::\n\
		Macro Definition:"(?<=define)\\s+\\w+":::Subroutine1::\n\
		Custom Macro:"\\w+(?=\\s*(?:\\\\\\n)?\\s*[\\(])":::Subroutine1::\n\
		Variables:"\\w+":::Identifier1::D\n\
		Operator:"(=|==|!=|\\<|\\<=|\\>|\\>=|-|\\+|\\+\\+|-|--|\\*|/|%|\\&|\\&\\&|\\||\\|\\||^|!|~)":::Operator::D\n\
		BadPunct:"[,;]+\\s*(?:#(?:(?!\\\\$).)*)?$":::Flag::\n\
		Comma:",":::Bracket::D\n\
		SemiColon:";":::Bracket::D\n\
		Continuation:"\\\\$":::Label::D\n\
		Spaces:"\\s":::Plain::D\n\
		Unknown:".":::Flag::D\n\
	}\n\
	NEdit Macro RE:2:0{\n\
		README:"NEdit Macro syntax highlighting patterns, version 2.6, maintainer Thorsten Haude, nedit at thorstenhau.de":::Flag::D\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		Comment Cont:"#()(?=.*\\\\$)":"(\\\\)$"::Comment::\n\
		Comment Cont cont:"\\1":"\\1"::Label:Comment Cont:C\n\
		Comment:"#":"$"::Comment::\n\
		Built-in Misc Vars:"(?<!\\Y)\\$(?:active_pane|args|calltip_ID|column|cursor|display_width|empty_array|file_name|file_path|language_mode|line|locked|max_font_width|min_font_width|modified|n_display_lines|n_panes|rangeset_list|read_only|selection_(?:start|end|left|right)|server_name|text_length|top_line)>":::Identifier::\n\
		Built-in Pref Vars:"(?<!\\Y)\\$(?:auto_indent|em_tab_dist|file_format|font_name|font_name_bold|font_name_bold_italic|font_name_italic|highlight_syntax|incremental_backup|incremental_search_line|make_backup_copy|match_syntax_based|overtype_mode|show_line_numbers|show_matching|statistics_line|tab_dist|use_tabs|wrap_margin|wrap_text)>":::Identifier2::\n\
		Built-in Special Vars:"(?<!\\Y)\\$(?:[1-9]|list_dialog_button|n_args|read_status|search_end|shell_cmd_status|string_dialog_button|sub_sep)>":::String1::\n\
		Built-in Subrs:"<(?:append_file|beep|calltip|clipboard_to_string|dialog|focus_window|get_character|get_pattern_(by_name|at_pos)|get_range|get_selection|get_style_(by_name|at_pos)|getenv|kill_calltip|length|list_dialog|max|min|rangeset_(?:add|create|destroy|get_by_name|includes|info|invert|range|set_color|set_mode|set_name|subtract)|read_file|replace_in_string|replace_range|replace_selection|replace_substring|search|search_string|select|select_rectangle|set_cursor_pos|set_language_mode|set_locked|shell_command|split|string_compare|string_dialog|string_to_clipboard|substring|t_print|tolower|toupper|valid_number|write_file)>":::Subroutine::\n\
		Menu Actions:"<(?:new|open|open-dialog|open_dialog|open-selected|open_selected|close|save|save-as|save_as|save-as-dialog|save_as_dialog|revert-to-saved|revert_to_saved|revert_to_saved_dialog|include-file|include_file|include-file-dialog|include_file_dialog|load-macro-file|load_macro_file|load-macro-file-dialog|load_macro_file_dialog|load-tags-file|load_tags_file|load-tags-file-dialog|load_tags_file_dialog|unload_tags_file|load_tips_file|load_tips_file_dialog|unload_tips_file|print|print-selection|print_selection|exit|undo|redo|delete|select-all|select_all|shift-left|shift_left|shift-left-by-tab|shift_left_by_tab|shift-right|shift_right|shift-right-by-tab|shift_right_by_tab|find|find-dialog|find_dialog|find-again|find_again|find-selection|find_selection|find_incremental|start_incremental_find|replace|replace-dialog|replace_dialog|replace-all|replace_all|replace-in-selection|replace_in_selection|replace-again|replace_again|replace_find|replace_find_same|replace_find_again|goto-line-number|goto_line_number|goto-line-number-dialog|goto_line_number_dialog|goto-selected|goto_selected|mark|mark-dialog|mark_dialog|goto-mark|goto_mark|goto-mark-dialog|goto_mark_dialog|match|select_to_matching|goto_matching|find-definition|find_definition|show_tip|split-window|split_window|close-pane|close_pane|uppercase|lowercase|fill-paragraph|fill_paragraph|control-code-dialog|control_code_dialog|filter-selection-dialog|filter_selection_dialog|filter-selection|filter_selection|execute-command|execute_command|execute-command-dialog|execute_command_dialog|execute-command-line|execute_command_line|shell-menu-command|shell_menu_command|macro-menu-command|macro_menu_command|bg_menu_command|post_window_bg_menu|beginning-of-selection|beginning_of_selection|end-of-selection|end_of_selection|repeat_macro|repeat_dialog|raise_window|focus_pane|set_statistics_line|set_incremental_search_line|set_show_line_numbers|set_auto_indent|set_wrap_text|set_wrap_margin|set_highlight_syntax|set_make_backup_copy|set_incremental_backup|set_show_matching|set_match_syntax_based|set_overtype_mode|set_locked|set_tab_dist|set_em_tab_dist|set_use_tabs|set_fonts|set_language_mode)(?=\\s*\\()":::Subroutine::\n\
		Text Actions:"<(?:self-insert|self_insert|grab-focus|grab_focus|extend-adjust|extend_adjust|extend-start|extend_start|extend-end|extend_end|secondary-adjust|secondary_adjust|secondary-or-drag-adjust|secondary_or_drag_adjust|secondary-start|secondary_start|secondary-or-drag-start|secondary_or_drag_start|process-bdrag|process_bdrag|move-destination|move_destination|move-to|move_to|move-to-or-end-drag|move_to_or_end_drag|end_drag|copy-to|copy_to|copy-to-or-end-drag|copy_to_or_end_drag|exchange|process-cancel|process_cancel|paste-clipboard|paste_clipboard|copy-clipboard|copy_clipboard|cut-clipboard|cut_clipboard|copy-primary|copy_primary|cut-primary|cut_primary|newline|newline-and-indent|newline_and_indent|newline-no-indent|newline_no_indent|delete-selection|delete_selection|delete-previous-character|delete_previous_character|delete-next-character|delete_next_character|delete-previous-word|delete_previous_word|delete-next-word|delete_next_word|delete-to-start-of-line|delete_to_start_of_line|delete-to-end-of-line|delete_to_end_of_line|forward-character|forward_character|backward-character|backward_character|key-select|key_select|process-up|process_up|process-down|process_down|process-shift-up|process_shift_up|process-shift-down|process_shift_down|process-home|process_home|forward-word|forward_word|backward-word|backward_word|forward-paragraph|forward_paragraph|backward-paragraph|backward_paragraph|beginning-of-line|beginning_of_line|end-of-line|end_of_line|beginning-of-file|beginning_of_file|end-of-file|end_of_file|next-page|next_page|previous-page|previous_page|page-left|page_left|page-right|page_right|toggle-overstrike|toggle_overstrike|scroll-up|scroll_up|scroll-down|scroll_down|scroll_left|scroll_right|scroll-to-line|scroll_to_line|select-all|select_all|deselect-all|deselect_all|focusIn|focusOut|process-return|process_return|process-tab|process_tab|insert-string|insert_string|mouse_pan)>":::Subroutine::\n\
		Keyword:"<(?:break|continue|define|delete|else|for|if|in|return|while)>":::Keyword::\n\
		Braces:"[{}]":::Bracket::D\n\
		ParensBrackets:"[\\[\\]()]":::Bracket::D\n\
		Global Variable:"\\$[A-Za-z0-9_]+":::Identifier1::\n\
		BadString:"""(?:\\\\.|[^""\\\\])*\\\\?$":::Flag::\n\
		String:"""":"""":"\\n":String::\n\
		Regex Escaped Operator:"(\\\\\\\\)(?:[][()<>{}.|^$*+?&-]|\\\\\\\\)":::String:String:\n\
		Regex Escaped Backslash:"\\1":""::String1:Regex Escaped Operator:C\n\
		Regex Character Groups:"\\\\\\\\[dDlLsSwWyY]":::Ada Attributes:String:\n\
		Regex References:"\\\\\\\\[1-9]|\\&":::Regex:String:\n\
		Regex Subst Modifiers:"\\\\\\\\[uUlL](?=\\\\\\\\[1-9]|\\&)":::Regex:String:\n\
		Regex Subst Mod Error:"\\\\\\\\[uU]":::Flag:String:\n\
		Regex Comment:"\\(\\?#(?:[^\\\\"")]|\\\\.)*\\)?":::Dark:String:\n\
		Regex Parens Incomplete:"\\(\\?(?![:=!IiNn<])|\\(\\?\\<(?![=!])|\\((?="")":::Flag:String:\n\
		Regex Parens:"\\(\\?[:=!IiNn]|\\(\\?\\<[=!]|[()]":::Pointer:String:\n\
		Regex Bracket Group:"\\[\\^?":"(?<!\\[)\\]":"\\n":Preprocessor1:String:\n\
		Regex Bracket Content:"(?!(?:\\\\\\\\?|-|\\^)).":::String:Regex Bracket Group:\n\
		Regex Operator:"[][$<>+*?{}|.^]":::Text Arg:String:\n\
		String Escape Char:"\\\\(?:0[0-3][0-7]{1,2}|0[0-7]{1,2}|[xX][0-9a-fA-F]{1,2}|['""?\\\\abefnrtv]|\\n)":::String1:String:\n\
		String Escape Undefined:"\\\\.":::Flag:String:\n\
		String Normal:".":::String:String:\n\
		Numeric Const:"(?<!\\Y)-?[0-9]+>":::Numeric Const::\n\
		Macro Definition:"(?<=define)\\s+\\w+":::Subroutine1::\n\
		Custom Macro:"\\w+(?=\\s*(?:\\\\\\n)?\\s*[\\(])":::Subroutine1::\n\
		Variables:"\\w+":::Identifier1::D\n\
		Operator:"(=|==|!=|\\<|\\<=|\\>|\\>=|-|\\+|\\+\\+|-|--|\\*|/|%|\\&|\\&\\&|\\||\\|\\||^|!|~)":::Operator::D\n\
		BadPunct:"[,;]+\\s*(?:#(?:(?!\\\\$).)*)?$":::Flag::\n\
		Comma:",":::Bracket::D\n\
		SemiColon:";":::Bracket::D\n\
		Continuation:"\\\\$":::Label::D\n\
		Spaces:"\\s":::Plain::D\n\
		Unknown:".":::Flag::D\n\
	}\n\
	Pascal:Default\n\
	Perl:Default\n\
	PostScript:Default\n\
	Python:Default\n\
	Regex:1:0{\n\
		Comments:"(?#This is a comment!)(?n\\(\\?#[^)]*(?:\\)|$))":::Comment::\n\
		Special Escape:"(?#Special chars with that need escapes)\\\\[abefnrtv]":::String2::\n\
		Shortcut Char Class Escapes:"(?#Shortcuts for common char classes)\\\\[dDlLsSwW]":::Storage Type::\n\
		Word Delimiter:"(?#Special token to match NEdit [non]word-delimiters)\\\\[yY]":::Storage Type::\n\
		Required Escape:"(?#metacharacters that require escapes)\\\\[-\\[\\]()<>{}.|^$*+?&\\\\]":::String1::\n\
		Backreferences:"(?#Internal regex backreferences)\\\\[1-9]":::String2::\n\
		Numeric Escape:"(?#Negative lookahead is to exclude \\x0 and \\00)\\\\(?i(?![x0]0(?:[^\\da-f]|$))(?:x0?[1-9a-f][\\da-f]?|0[1-3]?[0-7]?[0-7]))":::String1::\n\
		Literal Escape:"(?#non-special escapes - flag as errors: they don't need escaping)\\\\.":::Flag::\n\
		Parens and Alternation:"\\((?:\\?:|\\?=|\\?!|\\?\\<=|\\?\\<!|\\?[iInN])?|\\||\\)":::Keyword::\n\
		Quantifiers:"(?#Matches greedy and lazy quantifiers)[*+?]\\??":::Label::\n\
		Counting Quantifiers:"(?#Properly limits range numbers to 0-65535)\\{(?:[0-5]?\\d{1,4}|6[0-4]\\d{3}|65[0-4]\\d\\d|655[0-2]\\d|6553[0-5])?(?:,(?:[0-5]?\\d{1,4}|6[0-4]\\d{3}|65[0-4]\\d\\d|655[0-2]\\d|6553[0-5])?)?\\}\\??":::Label::\n\
		Character Class:"(?#Handles escapes, char ranges, ^-] at beginning and - at end)\\[\\^?[-\\]]?(?:(?:\\\\(?:[abdeflnrstvwDLSW\\-()\\[\\]<>{}.|^$*+?&\\\\]|[xX0][\\da-fA-F]+)|[^\\\\\\]])(?:-(?:\\\\(?:[abdeflnrstvwDLSW\\-()\\[\\]<>{}.|^$*+?&\\\\]|[xX0][\\da-fA-F]+)|[^\\\\\\]]))?)*\\-?]":::Preprocessor1::\n\
		Anchors:"(?#\\B is the ""not a word boundary"" anchor)[$^<>]|\\\\B":::Regex::\n\
		Match Themselves:"(?#Highlight chars left over which just match themselves).":::String::D\n\
	}\n\
	SGML HTML:Default\n\
	SQL:1:0{\n\
		variables:"@@?[#\\w]+":::Identifier2::D\n\
		numbers:"[-+]?(?:\\d+(?:\\.\\d*)?|\\.\\d+)(?:[eE][-+]?\\d+)?>":::Numeric Const::D\n\
		keywords2:"<(?iFUNCTION|NOTFOUND|OTHERS|EXCEPTION|SHOW|OUT|PRAGMA|PACKAGE)>(?!#)":::Flag::D\n\
		comment:"--":"$"::Comment::\n\
		comment2:"/\\*":"\\*/"::Comment::\n\
		string:"'":"'":"\\n":String::\n\
		dq string:"""":"""":"\\n":String::\n\
		callout:"\\\\\\w+|\\$\\w+|\\$\\{[^}]+\\}|\\[|\\]":::Preprocessor2::\n\
		data types:"<(?i(?:VAR)?BINARY>(?:\\s*\\(\\s*\\d+\\s*\\))?|BINARY\\s+VARYING>|(?:VAR)?CHAR>(?:\\s*\\(\\s*\\d+\\s*\\))?|CHARACTER\\s+VARYING>|(?:SMALL)?DATETIME>|DECIMAL>(?:\\(\\s*\\d+\\s*(?:,\\s*\\d+\\s*)\\))?|DEC>|NUMERIC>|FLOAT>(?:\\s*\\(\\s*\\d+\\s*\\))?|REAL>|DOUBLE\\s+PRECISION>|(?:SMALL|TINY)?INT>|INTEGER>|(?:SMALL)?MONEY>|BIT>|TIMESTAMP>|TEXT>|IMAGE>)(?!#)":::Storage Type::\n\
		data type arglist:"\\(":"\\)"::Bracket:data types:\n\
		data type arg val:"\\d+":::Numeric Const:data type arglist:\n\
		std functions:"<(?iabs|acos|ascii|asin|atan|atn2|avg|ceiling|char|charindex|coalesce|col_length|col_name|convert|cos|cot|count|datalength|date(?:add|diff|name|part)|db_(?:id|name)|degrees|difference|exp|floor|getdate|host_(?:id|name)|index_col|isnull|log(?:10)?|lower|ltrim|max|min|nullif|object_(?:id|name)|patindex|pi|power|radians|rand|replicate|reverse|right|round|rtrim|sign|sin|soundex|space|sqrt|str|stuff|substring|sum|suser_(?:id|name)|tan|textptr|textvalid|tsequal|upper|user_(?:id|name)|valid_name)>(?=\\s*\\()":::Subroutine::D\n\
		sybase functions:"<(?ichar_length|data_pgs|hextoint|inttohex|lct_admin|proc_role|reserved_pgs|rowcnt|show_role|used_pgs)>(?=\\s*\\()":::Subroutine1::D\n\
		microsoft functions:"<(?icurrent_(timestamp|user)|getansinull|ident_(incr|seed)|isdate|isnumeric|session_user|stats_date|system_user)>(?=\\s*\\()":::Flag::D\n\
		keywords:"<(?iADD|ALL|ALTER|AND|ANY|AS|ASC|AVG|BEGIN|BETWEEN|BREAK|BROWSE|BULK|BY|CASE|CHECK|CHECKPOINT|CLOSE|CLUSTERED|COMMIT|COMPUTE|CONFIRM|CONSTRAINT|CONTINUE|CONTROLROW|CONVERT|COUNT|CREATE|CURRENT|CURSOR|DATABASE|DBCC|DEALLOCATE|DECLARE|DEFAULT|DELETE|DESC|DISK|DISTINCT|DOUBLE|DROP|DUMMY|DUMP|ELSE|END|ERRLVL|ERROREXIT|EXCEPT|EXEC|EXECUTE|EXISTS|EXIT|FETCH|FILLFACTOR|FOR|FOREIGN|FROM|GO|GRANT|GROUP|HAVING|HOLDLOCK|IDENTITY_INSERT|IF|IN|INDEX|INSERT|INTERSECT|INTO|IS|ISOLATION|JOIN|KEY|KILL|LEVEL|LIKE|LINENO|LOAD|MAX|MIN|MIRROREXIT|NOHOLDLOCK|NONCLUSTERED|NOT|NULL|NULLIF|OF|OFF|OFFSETS|ON|ONCE|ONLY|OPEN|OPTION|OR|ORDER|OVER|PERM|PERMANENT|PLAN|PRECISION|PREPARE|PRIMARY|PRINT|PROC|PROCEDURE|PROCESSEXIT|PUBLIC|RAISERROR|READ|READTEXT|RECONFIGURE|REFERENCES|RETURN|REVOKE|ROLLBACK|ROWCOUNT|RULE|SAVE|SELECT|SESSION|SET|SETUSER|SHUTDOWN|SOME|STATISTICS|SUM|TABLE|TEMP|TEMPORARY|TEXTSIZE|THEN|TO|TRAN|TRANSACTION|TRIGGER|TRUNCATE|TSEQUAL|UNION|UNIQUE|UPDATE|USE|USER|USER_OPTION|VALUES|VARYING|VIEW|WAITFOR|WHEN|WHERE|WHILE|WITH|WRITETEXT)>(?!#)":::Keyword::D\n\
		keywords sybase:"<(?iARITH_OVERFLOW|AT|AUTHORIZATION|CASCADE|CHAR_CONVERT|COALESCE|CONNECT|ENDTRAN|ERRORDATA|ESCAPE|EXCLUSIVE|EXP_ROW_SIZE|EXTERNAL|IDENTITY(?:_GAP|_START)?|INSTALL|JAR|LOCK|MAX_ROWS_PER_PAGE|MEMBERSHIP|MIRROR|MODIFY|NATIONAL|NUMERIC_TRUNCATION|ONLINE|PARTITION|PRIVILEGES|PROXY_TABLE|QUIESCE|READPAST|REMOVE|REORG|REPLACE|REPLICATION|RESERVEPAGEGAP|ROLE|ROWS|SCHEMA|SHARED|STRIPE|SYB_IDENTITY|SYB_RESTREE|UNPARTITION|USING|WORK)>(?!#)":::Storage Type1::D\n\
		keywords microsoft:"<(?iCOALESCE|COMMITTED|CURRENT_DATE|CURRENT_TIME|CURRENT_TIMESTAMP|CURRENT_USER|FLOPPY|IDENTITY|IDENTITYCOL|INSENSITIVE|MAX_ROWS_PER_PAGE|MIRROR|PIPE|REPEATABLE|REPLICATION|SCROLL|SERIALIZABLE|SESSION_USER|SYSTEM_USER|TAPE|UNCOMMITTED|UPDATETEXT)>(?!#)":::Comment Special::D\n\
		goto label:"<(?iGOTO)\\s+<[a-zA-Z_][#\\w]*>":::Keyword::D\n\
		goto label label:"<(?!(?iGOTO))[a-zA-Z_][#\\w]*>":::Label:goto label:D\n\
		label:"<[a-zA-Z_][#\\w]*\\s*:":::Label::D\n\
		label colon:":":::Keyword:label:D\n\
		pseudos:"<(?iINSERTED|DELETED)>(?!#)":::Text Key::D\n\
		operators:"(?<![-+*/%=<>!:.,])(?:-|\\+|\\*|/|%|=|\\<=?|\\>=?|\\<\\>|!=|\\*=|=\\*|\\.\\.?|,)(?!\\s*[*/%=<>!:.,])":::Operator::D\n\
		parens:"[()]":::Bracket::D\n\
		names:"<[a-zA-Z_][#\\w]*>":::Identifier1::D\n\
		errors:"\\S":::Flag::D\n\
		pattern comments:"(?# from Transact-SQL by Kevin Kline, Lee Gould, Andrew Zanevsky [c] 1999 O'Reilly & Associates - first edition; updated with keywords from online Transact-SQL User's Guide http://manuals.sybase.com/onlinebooks/group-as/asg1200e/asesqlug/@Generic__BookTextView;pt=59;nh=1 )":::Flag::D\n\
	}\n\
	Sh Ksh Bash basic:1:0{\n\
		README:"Shell syntax highlighting patterns, version 2.2, maintainer Thorsten Haude, nedit at thorstenhau.de ":::Flag::D\n\
		escaped special characters:"\\\\[\\\\""$`']":::Keyword::\n\
		single quoted string:"'":"'"::String1::\n\
		double quoted string:"""":""""::String::\n\
		double quoted escape:"\\\\[\\\\""$`]":::String2:double quoted string:\n\
		dq command sub:"`":"`":"""":Subroutine:double quoted string:\n\
		dq arithmetic expansion:"\\$\\(\\(":"\\)\\)":"""":String:double quoted string:\n\
		dq new command sub:"\\$\\(":"\\)":"""":Subroutine:double quoted string:\n\
		dqncs single quoted string:"'":"'"::String1:dq new command sub:\n\
		dq variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:double quoted string:\n\
		dq variables2:"\\$\\{":"}":"\\n":Identifier1:double quoted string:\n\
		arithmetic expansion:"\\$\\(\\(":"\\)\\)"::String::\n\
		ae escapes:"\\\\[\\\\$`""']":::String2:arithmetic expansion:\n\
		ae single quoted string:"'":"'":"\\)\\)":String1:arithmetic expansion:\n\
		ae command sub:"`":"`":"\\)\\)":Subroutine:arithmetic expansion:\n\
		ae arithmetic expansion:"\\$\\(\\(":"\\)\\)"::String:arithmetic expansion:\n\
		ae new command sub:"\\$\\(":"\\)":"\\)\\)":Subroutine:arithmetic expansion:\n\
		ae variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:arithmetic expansion:\n\
		ae variables2:"\\$\\{":"}":"\\)\\)":Identifier1:arithmetic expansion:\n\
		comments:"^[ \\t]*#":"$"::Comment::\n\
		command substitution:"`":"`"::Subroutine::\n\
		cs escapes:"\\\\[\\\\$`""']":::Subroutine1:command substitution:\n\
		cs single quoted string:"'":"'":"`":String1:command substitution:\n\
		cs variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:command substitution:\n\
		cs variables2:"\\$\\{":"}":"`":Identifier1:command substitution:\n\
		new command substitution:"\\$\\(":"\\)"::Subroutine::\n\
		ncs new command substitution:"\\$\\(":"\\)"::Subroutine:new command substitution:\n\
		ncs escapes:"\\\\[\\\\$`""']":::Subroutine1:new command substitution:\n\
		ncs single quoted string:"'":"'"::String1:new command substitution:\n\
		ncs variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:new command substitution:\n\
		ncs variables2:"\\$\\{":"}":"\\)":Identifier1:new command substitution:\n\
		assignment:"[a-zA-Z_][0-9a-zA-Z_]*=":::Identifier1::\n\
		variables:"\\$([-*@#?$!0-9_]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1::\n\
		variables2:"\\$\\{":"}"::Identifier1::\n\
		internal var:"\\$\\{":"}"::Identifier1:variables2:\n\
		comments in line:"#":"$"::Comment::\n\
		numbers:"<(?i0x[\\da-f]+)|((\\d*\\.)?\\d+([eE][-+]?\\d+)?(?iul?|l|f)?)>":::Numeric Const::D\n\
		keywords:"(?<!\\Y)(if|fi|then|else|elif|case|esac|while|for|do|done|in|select|time|until|function|\\[\\[|\\]\\])(?!\\Y)[\\s\\n]":::Keyword::D\n\
		command options:"(?<=\\s)-[^ \\t{}[\\],()'""~!@#$%^&*|\\\\<>?]+":::Identifier::\n\
		delimiters:"[{};<>&~=!|^%[\\]+*|]":::Text Key::D\n\
		built ins:"(?<!\\Y)(:|\\.|source|alias|bg|bind|break|builtin|cd|chdir|command|compgen|complete|continue|declare|dirs|disown|echo|enable|eval|exec|exit|export|fc|fg|getopts|hash|help|history|jobs|kill|let|local|logout|popd|print|printf|pushd|pwd|read|readonly|return|set|shift|shopt|stop|suspend|test|times|trap|type|typeset|ulimit|umask|unalias|unset|wait|whence)(?!\\Y)[\\s\\n;]":::Subroutine1::D\n\
	}\n\
	Sh Ksh Bash:3:0{\n\
		escaped special characters:"\\\\[\\\\""$`']":::Keyword::\n\
		single quoted string:"'":"'"::String1::\n\
		double quoted string:"""":""""::String::\n\
		double quoted escape:"\\\\[\\\\""$`]":::String2:double quoted string:\n\
		inline stream:"\\<\\<-?\\s*(<[\\w]+>)\\s*\\n((.*\\n)*?)\\s*(\\1)\\s*$":::Text Key::\n\
		dq command sub:"`":"`":"""":Subroutine:double quoted string:\n\
		dq arithmetic expansion:"\\$\\(\\(":"\\)\\)":"""":String:double quoted string:\n\
		dq new command sub:"\\$\\(":"\\)":"""":Subroutine:double quoted string:\n\
		dq variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:double quoted string:\n\
		dq variables2:"\\$\\{":"}":"\\n":Identifier1:double quoted string:\n\
		arithmetic expansion:"\\$\\(\\(":"\\)\\)"::String::\n\
		ae escapes:"\\\\[\\\\$`""']":::String2:arithmetic expansion:\n\
		ae single quoted string:"'":"'":"\\)\\)":String1:arithmetic expansion:\n\
		ae command sub:"`":"`":"\\)\\)":Subroutine:arithmetic expansion:\n\
		ae arithmetic expansion:"\\$\\(\\(":"\\)\\)"::String:arithmetic expansion:\n\
		ae new command sub:"\\$\\(":"\\)":"\\)\\)":Subroutine:arithmetic expansion:\n\
		ae variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:arithmetic expansion:\n\
		ae variables2:"\\$\\{":"}":"\\)\\)":Identifier1:arithmetic expansion:\n\
		comments:"^[ \\t]*#":"\\n"::Comment::\n\
		case val:"(?<=(?:<in>|;;))\\s*(?:;|\\n(?:^\\s*(?:#.*)?\\n)*)\\s*[^)]*\\)":::Label::\n\
		case val comment:"#.*":::Comment:case val:\n\
		case val punct:"[|)]":::Operator:case val:\n\
		command substitution:"`":"`"::Subroutine::\n\
		cs escapes:"\\\\[\\\\$`""']":::Subroutine1:command substitution:\n\
		cs single quoted string:"'":"'":"`":String1:command substitution:\n\
		cs variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:command substitution:\n\
		cs variables2:"\\$\\{":"}":"`":Identifier1:command substitution:\n\
		new command substitution:"\\$\\(":"\\)"::Subroutine::\n\
		ncs escapes:"\\\\[\\\\$`""']":::Subroutine1:new command substitution:\n\
		ncs single quoted string:"'":"'"::String1:new command substitution:\n\
		ncs variables:"\\$([-*@#?$!0-9]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1:new command substitution:\n\
		ncs variables2:"\\$\\{":"}":"\\)":Identifier1:new command substitution:\n\
		assignment:"[a-zA-Z_][0-9a-zA-Z_]*=":::Identifier1::\n\
		variables:"\\$([-*@#?$!0-9_]|[a-zA-Z_][0-9a-zA-Z_]*)":::Identifier1::\n\
		variables2:"\\$\\{":"}"::Identifier1::\n\
		internal var:"\\$\\{":"}"::Identifier1:variables2:\n\
		comments in line:"#":"\\n"::Comment::\n\
		numbers:"<(?i0x[\\da-f]+)|((\\d*\\.)?\\d+([eE][-+]?\\d+)?(?iul?|l|f)?)>":::Numeric Const::D\n\
		keywords:"<(if|fi|then|else|elif|case|esac|while|for|do|done|in|select|time|until|function|\\[\\[|]])>(?=(?:\\s|$))":::Keyword::D\n\
		command options:"[ \\t]-[^ \\t{}[\\],()'""~!@#$%^&*|\\\\<>?]+":::Identifier::\n\
		delimiters:"[{};<>&~=!|^%[\\]+*|]":::Text Key::D\n\
		built ins:"<(:|\\.|source|alias|bg|bind|break|builtin|cd|chdir|command|compgen|complete|continue|declare|dirs|disown|echo|enable|eval|exec|exit|export|fc|fg|getopts|hash|help|history|jobs|kill|let|local|logout|popd|print|printf|pushd|pwd|read|readonly|return|set|shift|shopt|stop|suspend|test|times|trap|type|typeset|ulimit|umask|unalias|unset|wait|whence)>[\\s\\n;]":::Subroutine1::D\n\
		is start marker:"\\1":""::Marker:inline stream:C\n\
		is end marker:"\\4":""::Marker:inline stream:C\n\
		is content:"\\2":""::Inline Text:inline stream:C\n\
	}\n\
	Tcl:Default\n\
	VHDL:Default\n\
	Verilog:Default\n\
	XML:1:0{\n\
		comment:"\\<!--":"(?<!-)--\\>"::Comment::\n\
		bad end of comment:"(?<=-)--\\>":::Flag:comment:\n\
		ignored section:"\\<!\\[\\s*IGNORE\\s*\\[":"\\]\\]\\>"::Text Comment::\n\
		declaration:"\\<\\?(?ixml)":"\\?\\>"::Warning::\n\
		declaration delims:"&":"&"::Keyword:declaration:C\n\
		declaration attributes:"((?iversion|encoding|standalone))=":::Keyword:declaration:\n\
		declaration attribute names:"\\1":::Preprocessor:declaration attributes:C\n\
		declaration sq string:"'":"'":"\\n\\n":String1:declaration:\n\
		declaration sq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:declaration sq string:\n\
		declaration dq string:"""":"""":"\\n\\n":String:declaration:\n\
		declaration dq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:declaration dq string:\n\
		doctype:"(\\<!(?idoctype))\\s+(\\<?(?!(?ixml))[\\l_][\\w:-]*\\>?)":"\\>":"\\[":Warning::\n\
		doctype delims:"\\1":"&"::Keyword:doctype:C\n\
		doctype root element:"\\2":::Identifier:doctype:C\n\
		doctype keyword:"(SYSTEM|PUBLIC)":::Keyword:doctype:\n\
		doctype sq string:"'":"'":"\\n\\n":String1:doctype:\n\
		doctype dq string:"""":"""":"\\n\\n":String:doctype:\n\
		processing instruction:"\\<\\?\\S+":"\\?\\>"::Preprocessor::\n\
		processing instruction attribute:"[\\l_][\\w:-]*=((""[^""]*"")|('[^']*'))":::Preprocessor:processing instruction:\n\
		processing instruction value:"\\1":::String:processing instruction attribute:C\n\
		cdata:"\\<!\\[(?icdata)\\[":"\\]\\]\\>"::Text Comment::\n\
		cdata delims:"&":"&"::Preprocessor:cdata:C\n\
		element declaration:"\\<!ELEMENT":"\\>"::Warning::\n\
		element declaration delims:"&":"&"::Keyword:element declaration:C\n\
		element declaration entity ref:"%(?!(?ixml))[\\l_][\\w:-]*;":::Identifier1:element declaration:\n\
		element declaration keyword:"(?<!\\Y)(ANY|#PCDATA|EMPTY)>":::Storage Type:element declaration:\n\
		element declaration name:"<(?!(?ixml))[\\l_][\\w:-]*":::Identifier:element declaration:\n\
		element declaration operator:"[(),?*+|]":::Keyword:element declaration:\n\
		entity declaration:"\\<!ENTITY":"\\>"::Warning::\n\
		entity declaration delims:"&":"&"::Keyword:entity declaration:C\n\
		entity declaration sq string:"'":"'":"\\n\\n":String1:entity declaration:\n\
		entity declaration sq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:entity declaration sq string:\n\
		entity declaration dq string:"""":"""":"\\n\\n":String:entity declaration:\n\
		entity declaration dq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:entity declaration dq string:\n\
		entity declaration keyword:"SYSTEM|NDATA":::Keyword:entity declaration:\n\
		entity declaration name:"<(?!(?ixml))[\\l_][\\w:-]*":::Identifier:entity declaration:\n\
		parameter entity declaration:"%\\s+((?!(?ixml))[\\l_][\\w:-]*)>":::Keyword:entity declaration:\n\
		parameter entity name:"\\1":::Identifier:parameter entity declaration:C\n\
		notation:"\\<!NOTATION":"\\>"::Warning::\n\
		notation delims:"&":"&"::Keyword:notation:C\n\
		notation sq string:"'":"'":"\\n\\n":String1:notation:\n\
		notation sq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:notation sq string:\n\
		notation dq string:"""":"""":"\\n\\n":String:notation:\n\
		notation dq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:notation dq string:\n\
		notation keyword:"SYSTEM":::Keyword:notation:\n\
		notation name:"<(?!(?ixml))[\\l_][\\w:-]*":::Identifier:notation:\n\
		attribute declaration:"\\<!ATTLIST":"\\>"::Warning::\n\
		attribute declaration delims:"&":"&"::Keyword:attribute declaration:C\n\
		attribute declaration sq string:"'":"'":"\\n\\n":String1:attribute declaration:\n\
		attribute declaration sq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:attribute declaration sq string:\n\
		attribute declaration dq string:"""":"""":"\\n\\n":String:attribute declaration:\n\
		attribute declaration dq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:attribute declaration dq string:\n\
		attribute declaration namespace:"(?ixmlns)(:[\\l_][\\w:]*)?":::Preprocessor:attribute declaration:\n\
		attribute declaration default modifier:"#(REQUIRED|IMPLIED|FIXED)>":::Keyword:attribute declaration:\n\
		attribute declaration data type:"<(CDATA|ENTIT(Y|IES)|ID(REFS?)?|NMTOKENS?|NOTATION)>":::Storage Type:attribute declaration:\n\
		attribute declaration name:"<(?!(?ixml))[\\l_][\\w:-]*":::Identifier:attribute declaration:\n\
		attribute declaration operator:"[(),?*+|]":::Keyword:attribute declaration:\n\
		element:"(\\</?)((?!(?ixml))[\\l_][\\w:-]*)":"/?\\>"::Warning::\n\
		element delims:"\\1":"&"::Keyword:element:C\n\
		element name:"\\2":::Identifier:element:C\n\
		element assign:"=":::Keyword:element:\n\
		element reserved attribute:"(?ixml:(lang|space|link|attribute))(?==)":::Text Key:element:\n\
		element namespace:"(?ixmlns:[\\l_]\\w*)(?==)":::Preprocessor:element:\n\
		element attribute:"[\\l_][\\w:-]*(?==)":::Text Key1:element:\n\
		element sq string:"'":"'":"\\n\\n":String1:element:\n\
		element sq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:element sq string:\n\
		element dq string:"""":"""":"\\n\\n":String:element:\n\
		element dq string entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape:element dq string:\n\
		entity:"&((amp|lt|gt|quot|apos)|#x[\\da-fA-F]*|[\\l_]\\w*);":::Text Escape::\n\
		marked section:"\\<!\\[\\s*(?:INCLUDE|(%(?!(?ixml))[\\l_][\\w:-]*;))\\s*\\[|\\]\\]\\>":::Label::\n\
		marked section entity ref:"\\1":::Identifier:marked section:C\n\
		internal subset delims:"[\\[\\]>]":::Keyword::D\n\
		info:"(?# version 0.1; author/maintainer: Joor Loohuis, joor@loohuis-consulting.nl)":::Comment::D\n\
	}\n\
	X Resources:Default\n\
	Yacc:Default\n\
	grep -n out:1:0{\n\
		file and line:"^(.*?)(:)(\\s*\\d+)(:)(.*)":::Dim::\n\
		file-part:"\\1":""::String:file and line:C\n\
		line-part:"\\3":""::String1:file and line:C\n\
		found-part:"\\5":""::Keyword:file and line:C\n\
	}\n\
	Hash comments:1:0{\n\
		QuoteString:"""":"""":"$":String::\n\
		QuoteStringEsc:"\\\\(.|\\n)":::String1:QuoteString:\n\
		AposString:"'":"'":"$":String::\n\
		AposStringEsc:"\\\\(.|\\n)":::String1:AposString:\n\
		Escape:"\\\\(.|\\n)":::Label::\n\
		Comments:"(^#)|(?<=[^\\\\])#":"$"::Comment::\n\
	}\n\
	TFA Map File:1:0{\n\
		Escape:"\\\\.":::Storage Type::\n\
		Comments:"#":"$"::Comment::D\n\
		SymConv Rule:"^\\s*SYMBOLOGY_CONVERSION_RULES\\s*(#.*)?\\n+\\{":"^\\s*\\}"::Identifier::\n\
		SymConv Rule Comment:"\\1":""::Comment:SymConv Rule:C\n\
		Rule Escape:"\\\\.":::Storage Type:SymConv Rule:\n\
		Rule CharClass:"\\[(.*?)\\]":::Bracket:SymConv Rule:\n\
		Rule OtherRexeg:"[.*+?]":::Ada Attributes:SymConv Rule:\n\
		Rule Anchor:"\\s*\\^|\\$($|\\s+)":::Label:SymConv Rule:\n\
		Rule Substitution:"\\$_":::Text Arg:SymConv Rule:\n\
		Rule CharClass Content:"\\1":""::Text Key:Rule CharClass:C\n\
		Rule Comments:"#":"$"::Comment:SymConv Rule:\n\
		SymConv Map:"^\\s*SYMBOLOGY_CONVERSION_MAP\\s*(#.*)?\\n+\\{":"^\\s*\\}"::Identifier::\n\
		SymConv Map Comment:"\\1":""::Comment:SymConv Map:C\n\
		Map Escape:"\\\\.":::Storage Type:SymConv Map:\n\
		Map Comments:"#":"$"::Comment:SymConv Map:\n\
	}\n\
	Bang comments:1:0{\n\
		Comments:"!":"$"::Comment::D\n\
	}\n\
	Semi comments:1:0{\n\
		Comments:";":"$"::Comment::D\n\
	}\n\
	XPM pixmap:1:0{\n\
		Space:"[ ]+":::Dim::D\n\
		Carriage Return:"[\\r]+":::Dim::\n\
		Tab:"[\\t]+":::Dark::\n\
		comment:"(/\\*)([+]([^*]|[*][^/])*)?":"\\*/"::Comment::\n\
		comment fold start:"\\2":""::Fold Comment:comment:C\n\
		cplusplus comment:"//":"$"::Flag::\n\
		Fold comment:"(\\f)\\[\\[\\[(([^\\f]*)\\|\\|\\|)?":"\\]\\]\\]\\f[^\\f]*$"::Dark::\n\
		Fold Name:"\\3":""::Fold Comment:Fold comment:C\n\
		Fold Start:"\\1":""::Flag:Fold comment:C\n\
		controls:"[\\b\\f\\a\\v]+":::Dim::\n\
		comment space chars:"[ ]+":::Dim:comment:\n\
		comment carriage return:"[\\r]+":::Dim:comment:\n\
		comment controls:"[\\b\\f\\a\\v]+":::Dim:comment:\n\
		comment tab chars:"[\\t]+":::Dark:comment:\n\
		preprocessor #if 0:"^\\s*#\\s*if\\s+0(\\s+.*)?$":"^\\s*#\\s*(else|endif|elif)>"::#if 0 Comment::\n\
		string:"""":"""":"[^\\\\]?\\n":String::\n\
		string escape chars:"\\\\([^x0-7]|x[0-9a-fA-F][0-9a-fA-F]?|[0-7][0-7]?[0-7]?|\\n)":::String1:string:\n\
		string space chars:"[ ]+":::Dim:string:\n\
		string carriage return:"[\\r]+":::Flag:string:\n\
		string controls:"[\\b\\f\\a\\v]+":::Flag:string:\n\
		string tab chars:"[\\t]+":::Dark:string:\n\
		preprocessor line:"^[ 	]*#":"$"::Preprocessor::\n\
		preprocessor esc chars:"\\\\(.|\\n)":::Preprocessor:preprocessor line:\n\
		preprocessor comment:"/\\*":"\\*/"::Comment:preprocessor line:\n\
		preprocessor space char:"[ ]+":::Dim:preprocessor line:\n\
		preprocessor carriage return:"[\\r]+":::Dim:preprocessor line:\n\
		preprocessor controls:"[\\b\\f\\a\\v]+":::Dim:preprocessor line:\n\
		preprocessor tab char:"[\\t]+":::Dark:preprocessor line:\n\
		preprocess keyword:"<(return|goto|if|else|case|default|switch|break|continue|while|do|for|sizeof|define|defined|ifdef|ifndef|endif|elif|include|pragma|undef)>":::Preprocessor2:preprocessor line:\n\
		preprocess storage keyword:"<(const|extern|auto|register|static|unsigned|signed|volatile|char|double|float|int|long|short|void|typedef|struct|union|enum)>":::Preprocessor2:preprocessor line:\n\
		character constant:"'":"'":"[^\\\\][^']":Character Const::D\n\
		character escape chars:"\\\\([^x0-7]|x[0-9a-fA-F][0-9a-fA-F]?|[0-7][0-7]?[0-7]?)":::String1:character constant:D\n\
		keyword:"<(return|goto|if|else|case|default|switch|break|continue|while|do|for|sizeof)>":::Keyword::D\n\
		storage keyword:"<(const|extern|auto|register|static|unsigned|signed|volatile|char|double|float|int|long|short|void|typedef|struct|union|enum)>":::Storage Type::D\n\
		standard types:"<(size_t|ptrdiff_t|wchar_t)>":::Storage Type::D\n\
		numeric constant:"<((0(x|X)[0-9a-fA-F]*)|(([0-9]+\\.?[0-9]*)|(\\.[0-9]+))((e|E)(\\+|-)?[0-9]+)?)(L|l|UL|ul|u|U|F|f)?>":::Numeric Const::D\n\
		braces:"[{}]":::Bracket::D\n\
		operator:"(=|:|\\?|==|!=|\\>|\\<|\\>=|\\<=|-\\>|\\.|\\+|-|\\+\\+|--|\\*|/|%|\\&|\\&\\&|\\||\\|\\||^|!|~)":::Operator::D\n\
		brackets:"[\\[\\]]":::Bracket::D\n\
		parentheses:"[()]":::Bracket::D\n\
		substitute:"@[^@]*@":::Flag::D\n\
	}\n\
	CC output:1:0{\n\
		error:"(?ierror)(?=:)":::Flag::D\n\
		warning:"(?iwarning)(?=:)":::Preprocessor::D\n\
		qqfilename:"^""":"""":"$":Bracket::D\n\
		filename:".":::String2:qqfilename:D\n\
		cc command:"<(cc|CC|acc|aCC|xlc|c89|gcc|g\\+\\+)>\\s+[^;]+":::Fold Comment::\n\
		ar command:"<(ar)>\\s+[^;]+":::Fold Comment::D\n\
		command:"^\\s*[/a-zA-Z]+(?:\\s.*)?$":::Preprocessor1::D\n\
		colon:":":::Operator::D\n\
	}\n\
	Javac output:1:0{\n\
		file and line:"^(.*?):(\\s*\\d+):(.*)":::Operator::\n\
		file-part:"\\1":""::String:file and line:C\n\
		line-part:"\\2":""::String1:file and line:C\n\
		content-part:"\\3":""::String2:file and line:C\n\
		code line:"^\\s*(.*)(?=\\n\\s*\\^$)":::Label::\n\
		code line text:"\\1":""::Storage Type:code line:C\n\
		carat line:"^\\s*(\\^)$":::Plain::\n\
		carat:"\\1":""::Keyword:carat line:C\n\
	}\n\
	Config Ini:1:0{\n\
		Comment:"^[#;].*":::Comment::\n\
		Key:"^\\[[^][]+\\]\\s*":::Fold Comment::\n\
		ValName:"^[^[= ][^=]*(?==)":::Identifier1::\n\
		Value:"(?<==)":"$"::Identifier::\n\
		ValueContinuation:"\\\\\\n":::String1:Value:\n\
		ValueAssign:"=":::Plain::\n\
	}\n\
	Man page output:1:0{\n\
		cross reference:"[-\\w]+(?:-\\n\\s*[-\\w]+)?\\((\\d[\\w]*)\\)":::String1::\n\
		cross reference section:"\\1":""::Storage Type:cross reference:C\n\
	}\n\
	Doxygen:1:0{\n\
		comment:"/\\*(?=\\n|[^*]|\\*\\*)":"\\*/"::Comment::\n\
		C++ comment:"(?:^|(?<=[^/]))//(?=$|//|[^/])":"$"::Comment::\n\
		dox comment:"(?:/\\*\\*|//[!/]\\<?)(?:$|\\s)":"\\*/"::Comment Special::\n\
		dox comment cont:"^(?:\\s*\\*+|///?)(?=[^/*]|$)":::Comment Special:dox comment:\n\
		dox keyword attrib:"([\\\\@](?:c|a|p))\\s+(\\S+)":::String1:dox comment:\n\
		dox keyword attrib key:"\\1":""::Preprocessor1:dox keyword attrib:C\n\
		dox keyword word:"([\\\\@](?:class|struct|union|param|enum|namespace|package|interface|file))\\s+(\\S+)":::Storage Type:dox comment:\n\
		dox keyword word key:"\\1":""::Identifier1:dox keyword word:C\n\
		dox keyword line:"([\\\\@](?:fn|par|typedef|def))(.*)":::Storage Type:dox comment:\n\
		dox keyword line key:"\\1":""::Identifier1:dox keyword line:C\n\
		dox keyword:"([\\\\@](?:\\w+|@|\\\\|#))":::Identifier1:dox comment:\n\
		dox error:"[\\\\@](?:$|[^\\w@\\\\#])":::Flag:dox comment:\n\
		dox html:"\\</?(\\w+)(?:\\s+\\w+=""[^""]*"")*\\s*/?\\>":::Preprocessor2:dox comment:\n\
		dox html tag:"\\1":""::String2:dox html:C\n\
		dox text:".":::String:dox comment:\n\
		rest:".":::Inline Text::D\n\
	}\n\
	Doxygen strict:1:0{\n\
		comment:"/\\*(?=\\n|[^*]|\\*\\*)":"\\*/"::Comment::\n\
		C++ comment:"//(?=$|//|[^/])":"$"::Comment::\n\
		dox comment:"(?:/\\*\\*|///)(?:$|\\s)":"\\*/"::Comment Special::\n\
		dox comment cont:"^(?:\\s*\\*+|///?)(?=[^/*]|$)":::Comment Special:dox comment:\n\
		dox keyword attrib:"([\\\\@](?:c|a|p))\\s+(\\S+)":::String1:dox comment:\n\
		dox keyword attrib key:"\\1":""::Preprocessor1:dox keyword attrib:C\n\
		dox keyword word:"([\\\\@](?:class|struct|union|param|enum|namespace|package|interface|file))\\s+(\\S+)":::Storage Type:dox comment:\n\
		dox keyword word key:"\\1":""::Identifier1:dox keyword word:C\n\
		dox keyword line:"([\\\\@](?:fn|par|typedef|def))(.*)":::Storage Type:dox comment:\n\
		dox keyword line key:"\\1":""::Identifier1:dox keyword line:C\n\
		dox keyword:"([\\\\@](?:\\w+|@|\\\\|#))":::Identifier1:dox comment:\n\
		dox error:"[\\\\@](?:$|[^\\w@\\\\#])":::Flag:dox comment:\n\
		dox html:"\\</?([a-z]+)(?:\\s+\\w+=""[^""]*"")*\\s*/?\\>":::Preprocessor2:dox comment:\n\
		dox html tag:"\\1":""::String2:dox html:C\n\
		Apostrophe S:"'s":::String:dox comment:\n\
		CamelCase:"<(?![A-Z]?[a-z]*>)[a-z]*[A-Z]+[a-zA-Z]*>":::Flag:dox comment:\n\
		UnderScore:"\\w*_\\w+":::Flag:dox comment:\n\
		ScopeVar:"\\w*::\\w*":::Flag:dox comment:\n\
		Number:"\\d+":::Flag:dox comment:\n\
		Letter:"<[b-zB-Z]>":::Flag:dox comment:\n\
		dox text:".":::String:dox comment:\n\
		rest:".":::Inline Text::D\n\
	}\n\
	NEdit Calltip:1:0{\n\
		comment block:"^\\s*\\*\\s*comment\\s*\\*\\s*$":"^\\s*$"::Comment Work::\n\
		comment line:"^.*$":::Comment:comment block:\n\
		language block:"^\\s*\\*\\s*language\\s*\\*\\s*$":"^\\s*$"::Keyword::\n\
		language line:"^.*$":::Text Key:language block:\n\
		include block:"^\\s*\\*\\s*include\\s*\\*\\s*$":"^\\s*$"::Keyword::\n\
		include line:"^.*$":::Storage Type:include block:\n\
		alias block:"^\\s*\\*\\s*alias\\s*\\*\\s*$":"^\\s*$"::Keyword::\n\
		alias line 1:"(?<=alias \\*\\n)^.*$":::Storage Type1:alias block:\n\
		alias line:"^.*$":::Identifier1:alias block:\n\
		version block:"^\\s*\\*\\s*version\\s*\\*\\s*$":"^\\s*$"::Flag::\n\
		version line:"^.*$":::Warning:version block:\n\
		error:"^\\s*\\*\\s*.*\\*\\s*$":"^\\s*$"::Warning::\n\
		block:"^\\s*\\S.*$":"^\\s*$"::Storage Type1::\n\
		calltip text line:"^.*$":::Text Comment:block:\n\
	}\n\
	PlainPlain:1:0{\n\
		any:".":::Plain::D\n\
	}
nedit.languageModes: 	Ada:.ada .ad .ads .adb .a:::::::\n\
	Awk:.awk:::::::\n\
	C++:.cc .hh .C .H .i .cxx .hxx .cpp .c++ .h .inl:".*<C\\+\\+":::::".,/\\`'!|@#%^&*()-=+{}[]"":;<>?~":\n\
	C:.c .h::::::".,/\\`'!|@#%^&*()-=+{}[]"":;<>?~":\n\
	CSS:css::Auto:None:::".,/\\`'!|@#%^&*()=+{}[]"":;<>?~":\n\
	Csh:.csh .cshrc .login .logout:"^\\s*#\\s*!\\s*/bin/csh"::::::\n\
	Fortran:.f .f77 .for:::::::\n\
	Java:.java::::::"!""#%&'()*+,-./:;<=>?@[\\]^`{|}~":\n\
	JavaScript:.js:::::::\n\
	LaTeX:.tex .sty .cls .dtx .ins:::::::\n\
	Lex:.lex:::::::\n\
	Makefile:Makefile makefile .gmk .mk:::None:8:8::\n\
	Matlab:.m .oct .sci:::::::\n\
	NEdit Macro:.nm .neditmacro:::::::"/fidev/home/ajunzill/.nedit/calltips/calltips.ct:/fidev/home/ajunzill/.nedit/calltips/custommacro.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacro.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroAR.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroHI.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroRS.ct:/fidev/home/ajunzill/.nedit/calltips/macros.ct"\n\
	NEdit Macro RE:.nm .neditmacro:::::::"/fidev/home/ajunzill/.nedit/calltips/calltips.ct:/fidev/home/ajunzill/.nedit/calltips/custommacro.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacro.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroAR.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroHI.ct:/fidev/home/ajunzill/.nedit/calltips/neditmacroRS.ct:/fidev/home/ajunzill/.nedit/calltips/macros.ct"\n\
	NEdit Calltip:.ct:::::::"/fidev/home/ajunzill/.nedit/calltips/calltips.ct"\n\
	Pascal:.pas .p .int:::::::\n\
	Perl:.pl .pm .p5 .PL:"^[ \\t]*#[ \\t]*!.*perl":Auto:None:::".,/\\\\`'!$@#%^&*()-=+{}[]"":;<>?~|":\n\
	PostScript:.ps .eps .epsf .epsi:"^%!":::::"/%(){}[]<>":\n\
	Python:.py:"^#!.*python":Auto:None::::\n\
	Regex:.reg .regex:"\\(\\?[:#=!iInN].+\\)":None:Continuous::::\n\
	SGML HTML:.sgml .sgm .html .htm:"\\<[Hh][Tt][Mm][Ll]\\>"::::::\n\
	SQL:.sql .sqsh:"^(#!/.*/(isql|sqsh).*)$"::::::"/fidev/home/ajunzill/.nedit/calltips/sybase_sql.ct"\n\
	Sh Ksh Bash:.sh .bash .ksh .profile .bashrc .bash_logout .bash_login .bash_profile:"^\\s*#\\s*!\\s*/.*bin/(sh|ksh|bash)":::::"!""#$%&'()*+,-./:;<=>?@[\\]^`{|}~":\n\
	Sh Ksh Bash basic:.sh .bash .ksh .profile .bashrc .bash_logout .bash_login .bash_profile:"^\\s*#\\s*!\\s*/.*bin/(sh|ksh|bash)":::::"!""#$%&'()*+,-./:;<=>?@[\\]^`{|}~":\n\
	Tcl:.tcl .tk .itcl .itk::Smart:None::::\n\
	VHDL:.vhd .vhdl .vdl:::::::\n\
	Verilog:.v:::::::\n\
	XML:.xml .xsl .dtd:"\\<(?i\\?xml|!doctype)"::None:::"<>/=""'()+*?|":\n\
	X Resources:.Xresources .Xdefaults .nedit nedit.rc:"^[!#].*([Aa]pp|[Xx]).*[Dd]efaults"::::::\n\
	Yacc:.y::::::".,/\\`'!|@#%^&*()-=+{}[]"":;<>?~":\n\
	grep -n out::::::::\n\
	Hash comments::::::::\n\
	TFA Map File::::::::\n\
	Bang comments::::::::\n\
	Semi comments::::::::\n\
	XPM pixmap::::::::\n\
	CC output::::::::\n\
	Javac output::::::::\n\
	Plain text:::Smart:None::::\n\
	PERS text:::Smart:None::::\n\
	Config Ini::"^\\[[^][]+\\]\\s*$"::::::\n\
	Man page output::::::::\n\
	Doxygen:.dox::Smart::4:::\n\
	Doxygen strict:::Smart::4:::\n\
	PlainPlain::::::::
nedit.styles: 	Plain:PaleGreen:Plain\n\
	Comment:#60a0a0:Italic\n\
	Comment Work:blue/#00c0ff:Bold Italic\n\
	Comment line:yellow:Italic\n\
	#if 0 Comment:orange:Bold\n\
	Comment Special:orange:Bold\n\
	Keyword:LightSkyBlue:Bold\n\
	Storage Type:LawnGreen:Bold\n\
	Storage Type1:LawnGreen:Bold Italic\n\
	String:Orange:Plain\n\
	String1:DarkOrange:Bold\n\
	String2:OrangeRed:Plain\n\
	Preprocessor:Coral:Plain\n\
	Preprocessor1:LightCoral:Plain\n\
	Preprocessor2:LightCoral:Bold\n\
	Character Const:Dark Orange:Plain\n\
	Numeric Const:LightBlue:Plain\n\
	Standard Identifier:#0000ff:Plain\n\
	Identifier:White:Bold\n\
	Identifier1:SpringGreen:Plain\n\
	Identifier2:lightgreen:Plain\n\
	Subroutine:Turquoise:Plain\n\
	Subroutine1:Cyan:Plain\n\
	Ada Attributes:White:Plain\n\
	Label:Red:Plain\n\
	Flag:darkred/orange:Bold\n\
	Text Comment:#8a6:Plain\n\
	Text Key:Khaki:Bold\n\
	Text Key1:PaleGoldenRod:Plain\n\
	Text Arg:beige:Plain\n\
	Text Arg1:wheat:Plain\n\
	Text Arg2:tan:Plain\n\
	Text Escape:chocolate:Plain\n\
	LaTeX Math:DarkGreen:Plain\n\
	Pointer:light sky blue:Italic\n\
	Regex:#80c0e0:Bold\n\
	Warning:yellow:Bold\n\
	Dim:#0080a0:Plain\n\
	Dark:gray15:Plain\n\
	Fold Content:gray80:Plain\n\
	Fold Comment:lightgreen:Bold\n\
	Operator:Yellow:Plain\n\
	Bracket:white:Bold\n\
	Inline Text:lightblue:Italic\n\
	Marker:cyan:Bold\n\
	DiTriGraph:#800000/gold:Bold
nedit.smartIndentInit: 	C:Default\n\
	C++:Default\n\
	Python:Default\n\
	Matlab:Default\n\
	Plain text:	# Load up the "Plain text" macro file\n\
	NEDIT_require_macro_file("PlainText.nm")\n\
	$PlainText_handleFirstLineOfPara = 1\n\
	$PlainText_handleCommonPrefix = 1\n\
	--End-of-Macro--\n\
	return PlainText_NewlineMacro($1)\n\
	--End-of-Macro--\n\
	PlainText_TypeInMacro($1, $2)\n\
	--End-of-Macro--\n\
	NEdit Macro:	NEDIT_require_macro_file("pers.nm")\n\
	--End-of-Macro--\n\
	return -1\n\
	--End-of-Macro--\n\
	PERS_autonewlineMacro($1, $2)\n\
	--End-of-Macro--\n\
	PERS text:	NEDIT_require_macro_file("pers.nm")\n\
	--End-of-Macro--\n\
	return -1\n\
	--End-of-Macro--\n\
	PERS_autonewlineMacro($1, $2)\n\
	--End-of-Macro--\n\
	Doxygen:	# Load up the "Plain text" macro file\n\
	NEDIT_require_macro_file("PlainText.nm")\n\
	$PlainText_handleFirstLineOfPara = 1\n\
	$PlainText_handleCommonPrefix = 1\n\
	--End-of-Macro--\n\
	return PlainText_NewlineMacro($1)\n\
	--End-of-Macro--\n\
	PlainText_TypeInMacro($1, $2)\n\
	--End-of-Macro--\n\
	Doxygen strict:	# Load up the "Plain text" macro file\n\
	NEDIT_require_macro_file("PlainText.nm")\n\
	$PlainText_handleFirstLineOfPara = 1\n\
	$PlainText_handleCommonPrefix = 1\n\
	--End-of-Macro--\n\
	return PlainText_NewlineMacro($1)\n\
	--End-of-Macro--\n\
	PlainText_TypeInMacro($1, $2)\n\
	--End-of-Macro--
nedit.smartIndentInitCommon: Default
nedit.autoWrap: None
nedit.wrapMargin: 80
nedit.showWrapMargin: Always
nedit.autoIndent: Auto
nedit.autoSave: True
nedit.openInTab: True
nedit.saveOldVersion: False
nedit.showMatching: Delimiter
nedit.matchSyntaxBased: True
nedit.highlightSyntax: True
nedit.backlightChars: True
nedit.searchDialogs: False
nedit.beepOnSearchWrap: False
nedit.retainSearchDialogs: True
nedit.searchWraps: True
nedit.stickyCaseSenseButton: True
nedit.repositionDialogs: True
nedit.autoScroll: True
nedit.appendLF: True
nedit.sortOpenPrevMenu: True
nedit.statisticsLine: True
nedit.iSearchLine: True
nedit.sortTabs: False
nedit.tabBar: True
nedit.tabBarHideOne: False
nedit.toolTips: True
nedit.globalTabNavigate: True
nedit.lineNumbers: True
nedit.pathInWindowsMenu: True
nedit.warnFileMods: True
nedit.warnRealFileMods: True
nedit.warnExit: True
nedit.searchMethod: CaseSense
nedit.textRows: 60
nedit.textCols: 80
nedit.tabDistance: 4
nedit.emulateTabs: 4
nedit.insertTabs: False
nedit.textFont: -misc-fixed-medium-r-semicondensed--13-120-75-75-c-60-iso8859-1
nedit.boldHighlightFont: -misc-fixed-bold-r-semicondensed--13-120-75-75-c-60-iso8859-1
nedit.italicHighlightFont: -misc-fixed-medium-o-semicondensed--13-120-75-75-c-60-iso8859-1
nedit.boldItalicHighlightFont: -misc-fixed-bold-o-semicondensed--13-120-75-75-c-60-iso8859-1
nedit.TextFgColor: white
nedit.TextBgColor: #001040
nedit.SelectFgColor: #800000
nedit.SelectBgColor: #0070d0
nedit.HiliteFgColor: yellow
nedit.HiliteBgColor: red
nedit.LineNoFgColor: #777777
nedit.CursorFgColor: white
nedit.WrapMarginForeground: #003060
nedit.smartTags: False
nedit.prefFileRead: True
nedit.titleFormat: %f %3d %*S