home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 May / Chip_2003-05_cd1.bin / servis / rkedit / rkEdit.exe / Scripts / SystemScripts.js < prev   
Text File  |  2003-03-18  |  3KB  |  99 lines

  1. /*
  2.   Write your own scripts to another file. This file can be changed
  3.   in any future distribution.
  4.   
  5.   (c) 1991, 2002-2003 Slßvek Rydval, http://www.rydval.cz, slavek@rydval.cz
  6. */
  7. //-----------------------------------------------IsSomeFileOpenedAndEditable---
  8. function IsSomeFileOpenedAndEditable()
  9. {
  10.   Actions.SetActionEnabled (Actions.UpdatedAction,
  11.                             Editor.IsSomeFileOpened() &&
  12.                             !Editor.ActiveEdit.ReadOnly);
  13. } //IsSomeFileOpenedAndEditable
  14. //----------------------------------------------------------IsSomeFileOpened---
  15. function IsSomeFileOpened()
  16. {
  17.   Actions.SetActionEnabled (Actions.UpdatedAction,
  18.                             Editor.IsSomeFileOpened());
  19. } //IsSomeFileOpened
  20. //---------------------------------------------------------TextToXMLSafeForm---
  21. function TextToXMLSafeForm()
  22. {
  23.   var x = Editor.ActiveEdit.CaretX;
  24.   var y = Editor.ActiveEdit.CaretY;
  25.   Editor.ActiveEdit.BeginUpdate();
  26.   if (Editor.ActiveEdit.SelText == '')
  27.     Editor.ActiveEdit.SelectAll();
  28.   var s = Editor.ActiveEdit.SelText;
  29.   s = s.replace (/&/g, '&');
  30.   s = s.replace (/</g, '<');
  31.   s = s.replace (/>/g, '>');
  32.   s = s.replace (/\'/g, ''');
  33.   s = s.replace (/\"/g, '"');
  34.   Editor.ActiveEdit.SelText = s;
  35.   Editor.ActiveEdit.SetCaretXY (x, y);
  36.   Editor.ActiveEdit.EndUpdate();
  37. } //TextToXMLSafeForm
  38. //----------------------------------------------------------XMLSafeFormToText--
  39. function XMLSafeFormToText()
  40. {
  41.   var x = Editor.ActiveEdit.CaretX;
  42.   var y = Editor.ActiveEdit.CaretY;
  43.   Editor.ActiveEdit.BeginUpdate();
  44.   if (Editor.ActiveEdit.SelText == '')
  45.     Editor.ActiveEdit.SelectAll();
  46.   var s = Editor.ActiveEdit.SelText;
  47.   s = s.replace (/&/g, '&');
  48.   s = s.replace (/</g, '<');
  49.   s = s.replace (/>/g, '>');
  50.   s = s.replace (/'/g, "'");
  51.   s = s.replace (/"/g, '"');
  52.   Editor.ActiveEdit.SelText = s;
  53.   Editor.ActiveEdit.SetCaretXY (x, y);
  54.   Editor.ActiveEdit.EndUpdate();
  55. }
  56. //---------------------------------------------------------CloseTextToXMLTag---
  57. function CloseTextToXMLTag()
  58. {
  59.   if (Dialogs.InputDialog.Execute ("Close block to XML tag", "Enter XML tag name:",""))
  60.   {
  61.     var tag = Dialogs.InputDialog.Value;
  62.     if (tag == "")
  63.     {
  64.       Dialogs.ShowMessage ("No tag was entered.");
  65.     }
  66.     else
  67.     {
  68.       Editor.ActiveEdit.BeginUpdate();
  69.       var s = Editor.ActiveEdit.SelText;
  70.       s = "<" + tag + ">" + s + "</" + tag + ">";
  71.       Editor.ActiveEdit.SelText = s;
  72.       Editor.ActiveEdit.BeginUpdate();
  73.     }
  74.   }
  75. } //CloseTag
  76. //-------------------------------------------------------------ScriptingHelp---
  77. function ScriptingHelp()
  78. {
  79.   Help.HTMLHelpIndex (System.ApplicationPath+"rkScripting.chm");
  80. } //ScriptingHelp
  81. //---------------------------------------------------------------ContextHelp---
  82. function ContextHelp()
  83. {
  84.   var
  85.     hl = Editor.ActiveEdit.GetHighlighter();
  86.  
  87.   if (hl == "xml")
  88.   {
  89.     Help.HTMLHelpTopic ("H:\\SGML\\DocBook\\docbook.chm", //<-- here enter path to DocBookHelp
  90.                         Editor.ActiveEdit.WordAtCursorPos+".html");
  91.   }
  92.   else
  93.   if (hl == "jscript")
  94.     Help.HTMLHelpTopic (System.ApplicationPath+"rkScripting.chm",
  95.                         Editor.ActiveEdit.WordAtCursorPos+".htm")
  96.   else
  97.     Dialogs.ShowMessage ("No context help for this file.");
  98. } //ContextHelp
  99.