AkelPad

Code: Select all

// http://akelpad.sourceforge.net/forum/viewtopic.php?t=2107
// Version: 1.0
// Author: Shengalts Aleksander aka Instructor
//
//
// Description(1033): Merge contents of all specified documents in one file.
// Description(1049): Соединить содержимое всех указанных документов в один файл.
//
// Arguments:
// -Save=false  -Read files (default).
// -Save=true   -Save files.
//
// Usage:
// "Read files" Call("Scripts::Main", 1, "MergeProject.js", `-Save=false`)
// "Save files" Call("Scripts::Main", 1, "MergeProject.js", `-Save=true`)
//
// Document format:
// ||||c:\Folder\MyFile1.txt
// Some text 1
// ||||c:\Folder\MyFile2.txt
// Some text 2...

//Arguments
var bSave=AkelPad.GetArgValue("Save", false);

//Variables
var oSys=AkelPad.SystemFunction();
var pFileText;
var pSelFile;
var pSelText;
var nInitSelStart;
var nInitSelEnd;
var nSelEnd;
var nOffset;

if (bSave)
{
  nInitSelStart=AkelPad.GetSelStart();
  nInitSelEnd=AkelPad.GetSelEnd();
}
nOffset=AkelPad.TextFind(0, "(?<=^\\|\\|\\|\\|).*?", 0x2C0001 /*FRF_DOWN|FRF_BEGINNING|FRF_REGEXPNONEWLINEDOT|FRF_REGEXP*/);
if (nOffset > -1)
{
  do
  {
    pSelFile=AkelPad.GetSelText();
    if (!bSave)
      pFileText=AkelPad.ReadFile(pSelFile);
    if (!IsFileExist(pSelFile))
    {
      WScript.Echo("Not found: " + pSelFile);
      break;
    }
    //Skip new line
    nSelEnd=AkelPad.GetSelEnd();
    AkelPad.SetSel(nSelEnd + 1, nSelEnd + 1);
    nOffset=AkelPad.TextFind(0, ".*?(?=^\\|\\|\\|\\||\\Z)", 0x80001 /*FRF_DOWN|FRF_REGEXP*/);
    if (!bSave)
      AkelPad.ReplaceSel(pFileText);
    else
    {
      pSelText=AkelPad.GetSelText(3/*\r\n*/);
      AkelPad.WriteFile(pSelFile, pSelText, -1, 65001, true);
    }
    if (nOffset > -1)
      nOffset=AkelPad.TextFind(0, "(?<=^\\|\\|\\|\\|).*?", 0xC0001 /*FRF_DOWN|FRF_REGEXPNONEWLINEDOT|FRF_REGEXP*/);
  }
  while (nOffset > -1)
}
if (bSave)
{
  AkelPad.SetSel(nInitSelStart, nInitSelEnd);
}

function IsFileExist(pFile)
{
  if (oSys.Call("kernel32::GetFileAttributes" + _TCHAR, pFile) == -1)
    return false;
  return true;
}