1. Scripts plugin - required version 2.7 or higher:
a. Create new script {AkelPad}\AkelFiles\Plugs\Scripts\SearchArg.js with next contents:
Code: Select all
/// Search argument text
var AkelPad = new ActiveXObject("AkelPad.document");
var FR_DOWN =0x00000001 //Find down
var FR_MATCHCASE =0x00000004 //Search is case-sensitive
var FR_UP =0x00100000 //Find up
var FR_BEGINNING =0x00200000 //Search from beginning (usage: FR_DOWN|FR_BEGINNING)
var FR_SELECTION =0x00400000 //Search in selection (usage: FR_DOWN|FR_SELECTION)
var FR_ESCAPESEQ =0x00800000 //Search with escape sequences
var FR_ALLFILES =0x01000000 //Search in all openned MDI documents (usage: FR_DOWN|FR_BEGINNING|FR_ALLFILES)
var hMainWnd=AkelPad.GetMainWnd();
var hEditWnd=AkelPad.GetEditWnd();
var oFunction=AkelPad.SystemFunction();
var pScriptName=WScript.ScriptName;
if (AkelPad.TextFind(hEditWnd, WScript.Arguments(0), FR_DOWN) == -1)
{
if (AkelPad.TextFind(hEditWnd, WScript.Arguments(0), FR_DOWN|FR_BEGINNING) == -1)
AkelPad.MessageBox(hMainWnd, GetLangString(0), pScriptName, 48 /*MB_ICONEXCLAMATION*/);
}
//Functions
function GetLangString(nStringID)
{
var nLangID;
nLangID=oFunction.Call("kernel32::GetUserDefaultLangID");
nLangID=nLangID & 0x3ff; //PRIMARYLANGID
if (nLangID == 0x19) //LANG_RUSSIAN
{
if (nStringID == 0)
return "Строка \"" + WScript.Arguments(0) + "\" не найдена.";
}
else
{
if (nStringID == 0)
return "String \"" + WScript.Arguments(0) + "\" didn't found.";
}
return "";
}
2. ContextMenu plugin:
a. Call ContextMenu::Main.
b. Choose instead "ContextMenu:Show menu" - "Main menu".
c. Press "Enable".
d. Modify menu:
Code: Select all
"&Shortcuts" Index(-1)
{
-"Chocobo Farm" Call("Scripts::Main", 1, "SearchArg.js", "Fw00A", 0)
-"Weapons List" Call("Scripts::Main", 1, "SearchArg.js", "Fw042", 0)
SEPARATOR
-"Configure" Call("ContextMenu::Main", 1, 1)
}
e. Press "OK".
3. Now you can choose "Shortcuts -> Weapons List" in main menu to find "Fw042".