2025-06-21T03:55:49Z

Yuko:

== 概要 ==

Googleの生成AIである「Gemini」を利用するためのMeryマクロです。

後述のソースコードではV8エンジンで動作するものと従来版スクリプトエンジンで動作するものの2種類を掲載していますが、従来版のものはアーカイブです。特段の理由がない限りはV8エンジン版をご利用ください。

【主な機能】

* Google Gemini APIを利用して生成AIと対話できるMery用のマクロ
* 選択したテキストやアクティブな行の内容について生成AIに質問・相談が可能
* 会話履歴を保持し、文脈を考慮した対話が可能

【特徴的な機能】

'''会話履歴機能''':

* 事前の設定数に応じた会話履歴を保持
* 履歴のクリアが可能

これにより、会話の文脈を考慮した回答を得られます。

'''カスタムインストラクション''':

* AIの応答方針を設定可能
* 一時的なカスタム指示の保存と変更が可能

'''プロンプトテンプレート''':

* 誤字脱字チェック
* 日本語翻訳
* コードの最適化、生成

など、定型的な質問を簡単に実行できます。
※テンプレート機能では回答を安定させるため、前述の会話履歴を文脈に含みません。

テンプレートは自身の使い方に合わせて好きに追加、削除ができます。詳細はソースコード内の「PROMPT_TEMPLATE」定数のコメントを参照。

'''生成AIチャット風仕様''':

* ストリーミングモードでリアルタイムに1文字ずつMeryに入力されていく
* Shiftキー長押しで、テキスト生成を中断できる

== 注意事項 (必ず読んでからご利用ください) ==

* 本マクロでは 2024/11/17 時点で無料利用ができるGemini APIを利用します。今後、Googleの改定により有償になったり、設定誤り等で費用が発生しても、作者は一切の責任を負いません。
* Gemini APIではその特性上、プロンプトとして送信した文字列がAIの学習に使われるものと思われます。くれぐれも機密情報やプライバシーに関わる情報を指定しないように注意してください。
* Gemini APIは、 [https://ai.google.dev/gemini-api/terms?hl=ja Gemini API利用規約] に則ってご利用ください。

== 利用前提 ==

* Mery Ver 3.7.17 以上
* Google AI Studioで、Gemini APIキーを取得していること (参考 [https://ai.google.dev/gemini-api/docs/api-key?hl=ja API キーを取得する | Gemini API | Google AI for Developers])

== 利用方法 ==

* 環境変数の設定
:コマンドプロンプトで以下のコマンドを実行し、環境変数を設定してください。
<syntaxhighlight lang="bat">
setx GEMINI_API_KEY "***************************************"
</syntaxhighlight>
:設定後、Mery または Windows の再起動が必要な場合があります。
* マクロの実行
**プロンプトにしたい文字列を選択してマクロを実行すると、選択したテキストがプロンプトとしてGemini APIに送信され、応答がエディタに表示されます。
* 会話の履歴数を調整
** 会話の履歴は設定した個数分が保持され、文脈として利用されます。適宜、ソースコード内の「HISTORY_SIZE」の数を調整してください。
** ※数を増やすほど会話内容を保持して文脈を理解するようになりますが、メモリ使用量が増えたり動作が重くなる可能性があります。
** ※開いている文書ごとに履歴を保持します。文脈をリセットしたいときは、新しい文書を開いて会話をやり直してください。

== ソースコード ==

=== V8エンジン版 ===

このマクロは、editor.ExecuteMacro メソッドを使う兼ね合いで2つのマクロファイルに分かれています。

(1) Meryに登録するマクロ (ファイル名は任意)

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// カスタムインストラクション
// これを設定することで、生成AIの回答全体への生成方針を指示できます。
// 例えば "あなたは侍で名前は権兵衛です。回答をござる口調にしてください" と設定すると、AIの回答がござる口調になります。
// 何も指示しない場合は、空文字 "" を設定してください。
const DEFAULT_CUSTOM_INSTRUCTION = "";

// プロンプトテンプレート
// プロンプトテンプレートを設定することで、AIに対して特定の指示を出すことができます。
// プロンプトテンプレートでの生成は会話履歴とカスタムインストラクションを反映しません。
// テンプレートは以下の { ～ }, で囲まれたブロックを好きに増減させて利用できます。
var PROMPT_TEMPLATE = [
// 以下はサンプルです。1階層メニューと2階層メニューが利用できます。
// {
// "title": "要約",
// "prompt": "以下の文章を要約してください。"
// },
// {
// "submenu_title": "翻訳系",
// "submenu": [
// {
// "title": "日本語翻訳",
// "prompt": "以下の文章を日本語に翻訳してください。"
// },
// {
// "title": "英語翻訳",
// "prompt": "以下の文章を英語に翻訳してください。"
// },
// ]
// },

{
"submenu_title": "理解を深める",
"submenu": [
{
"title": "論点を整理する",
"prompt": "以下の論点を整理して。"
},
{
"title": "論理の抜け漏れを探す",
"prompt": "以下の論点を整理し、忖度せずに鋭く、論理の抜け漏れを抽出して。そして、そこから発生する可能性のあるリスクも教えて。"
},
{
"title": "要約する",
"prompt": "要約して。専門的な用語と思われる単語は簡単に解説も入れて。"
},
{
"title": "物語対話形式で教えて",
"prompt": "以下の内容について物語対話形式で教えてください。"
},
]
},
{
"submenu_title": "翻訳する",
"submenu": [
{
"title": "日本語に翻訳",
"prompt": "以下の文章を日本語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[訳]\n翻訳文...\n"
},
{
"title": "英語に翻訳",
"prompt": "以下の文章を英語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[Translation]\n翻訳文...\n"
},
{
"title": "英語->日本語スラッシュリーディング翻訳",
"prompt": "以下の英文を日本語にスラッシュリーディング形式で翻訳してください。\n\n"
+ "条件:\n"
+ "- 英文の各フレーズをスラッシュ(/)で区切って表示\n"
+ "- 各フレーズの日本語訳を括弧()内に併記\n"
+ "- 文の終わりはダブルスラッシュ(//)で表示\n"
+ "- 英語の語順に従って日本語訳を行う\n"
+ "- 日本語訳は自然な日本語である必要はなく、英語の語順を反映した直訳調で構わない\n"
+ "- 主語が省略されている場合は補って翻訳すること\n"
+ "- 一般的な英文で頻出する表現がある場合は次の行に記載\n"
+ "- 以下の出力例のように <英文> (日本語訳) / ... とスラッシュ区切りの繰り返しになる \n\n"
+ "出力例:\n"
+ "Snowstorms are forecast (暴風雪が予報されている) / to hit the Sea of Japan coasts (日本海沿岸を襲うと) / of northern to eastern Japan (北部から東部の) / from Sunday through Monday. (日曜から月曜にかけて。) //\n"
+ "【頻出表現】\n"
+ "- be forecast to: ～すると予報されている\n"
},
]
},
{
"submenu_title": "プログラミング支援",
"submenu": [
{
"title": "コードを洗練させる",
"prompt": "以下のコードを洗練させてください"
},
{
"title": "コードをレビューする",
"prompt": "以下のコードをセキュリティと保守性の観点でレビューしてください"
},
{
"title": "エラーログをデバッグする",
"prompt": "以下のエラーログを解析し、考えられる原因と対策を提示してください"
},
{
"title": "SQLクエリを最適化する",
"prompt": "以下のSQL文を最適化してください"
},
{
"title": "PowerShell スクリプトを書く",
"prompt": "以下の処理を行うPowerShellスクリプトを生成してください"
},
{
"title": "Shell Script を書く",
"prompt": "以下の処理を行うShell Scriptを生成してください"
},
{
"title": "Linux コマンドを提案",
"prompt": "あなたはLinuxエキスパートとして、以下のLinuxコマンドを提案してください。\n\n"
+ "制約条件:\n"
+ "- 多数のディストリビューションで採用されているメジャーなコマンドを使用し、ポータブルな実装にすること\n"
+ "- bashでの実行を前提にすること\n"
+ "- 可能な限りシンプルな実装にすること\n\n"
+ "期待する出力:\n"
+ "- コマンドの具体的な実装方法\n"
+ "- 各コマンドの動作説明\n"
+ "- 制限事項\n"
},
]
},
{
"submenu_title": "ビジネス文書作成支援",
"submenu": [
{
"title": "誤字脱字、不正確な表現をチェック",
"prompt": "以下の2つのカテゴリーで問題点を指摘してください\n"
+ "- 【誤字脱字】：明確な誤字脱字および誤字の疑いがある箇所\n"
+ "- 【不正確・曖昧な表現】：解釈に個人差が生じる可能性がある表現、より適切な表現に改善できる箇所"
},
{
"title": "提案書を作成する",
"prompt": "以下に対する対する提案書を、コスト・実現性・リスクを含めて作成してください"
},
{
"title": "仕様書のアウトラインを作成する",
"prompt": "以下の内容で仕様書のアウトラインを作成してください"
},
{
"title": "手順書のアウトラインを作成する",
"prompt": "以下の作業を行う手順書を、前提条件と注意事項を含めてアウトラインを作成してください"
},
{
"title": "ユーザーマニュアルのアウトラインを作成する",
"prompt": "以下の機能内容から、ユーザー向けマニュアルのアウトラインを作成してください"
},
{
"title": "議事録を作成する",
"prompt": "以下の会議内容から議事録を作成してください"
},
{
"title": "進捗報告書を作成する",
"prompt": "以下のタスク状況から進捗報告書を作成してください"
},
]
},
{
"submenu_title": "分析支援",
"submenu": [
{
"title": "問題を分析し、課題を抽出する",
"prompt": "以下の状況から問題や潜在的リスクを分析し、課題を抽出してください"
},
{
"title": "対応策を提案する",
"prompt": "以下の問題・課題に対する対応策を複数提案してください"
},
{
"title": "傾向を見つける",
"prompt": "以下の内容から、数値や挙動上の傾向を見つけてください"
},
]
},
{
"submenu_title": "アイデア出し",
"submenu": [
{
"title": "SCAMPER法でブレインストーミング",
"prompt": "以下のテーマについて、SCAMPER法を使って15個のアイデアを出してください。制約条件は以下の通りです："
},
{
"title": "解決策の幅出し",
"prompt": "以下の課題に対して、技術面、運用面、コスト面から実現可能な解決策を5つずつ提案してください"
},
{
"title": "業務改善案の提案",
"prompt": "以下の既存プロセスについて、効率化、コスト削減、品質向上の観点から改善案を提案してください"
},
{
"title": "逆転の発想",
"prompt": "以下の目標に対して、通常とは逆の視点からアプローチする方法を3つ提案してください"
},
{
"title": "競合分析からの着想",
"prompt": "以下の内容について、業界における競合他社の特徴を分析し、差別化できる新しいアプローチを提案してください"
},
{
"title": "ユースケースの列挙",
"prompt": "以下の製品・サービスについて、想定されるユースケースを10個列挙し、それぞれの価値提案を記載してください"
},
]
},
]

// コンテキストメニュー番号の定義
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;
var SET_CUSTOM_INSTRUCTION = 3;
var REEXECUTE_LAST_TEMPLATE_PROMPT = 4;
var TEMPLATE_PROMPT_THRESHOLD = 10;
var TEMPLATE_PROMPT_SUBMENU_THRESHOLD = 1000;

// タグ名の定義
var HISTORY_TAG = "gemini-history";
var TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
var PREVIOUS_TEMPLATE_PROMPT_ID_TAG = "gemini-previous-template-prompt";
var SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// console.log に出力する内容を Mery のアウトプットバーに表示する
var console = {
log: function (str) {
outputBar.Writeln(str)
}
}

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty

// プロンプトの取得
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
var promptLength = sel.TextLength;
var menuTrack = 0
while (true) {
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === RESET_HISTORY) {
resetTag();
continue;
}

// カスタムインストラクションの設定
if (menuTrack === SET_CUSTOM_INSTRUCTION) {
configureTemporaryCustomInstruction();
return;
}

break;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}

// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// 直前に実行したプロンプトテンプレートの再実行の場合、menuTrack を書き換え
if (menuTrack === REEXECUTE_LAST_TEMPLATE_PROMPT) {
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menuTrack = Number(doc.Tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG));
} else {
alert("直前に実行したプロンプトテンプレートがありません。");
return;
}
}

// テンプレートを取得
var isTemplate = menuTrack >= TEMPLATE_PROMPT_THRESHOLD;
var isSubmenu = menuTrack >= TEMPLATE_PROMPT_SUBMENU_THRESHOLD;
if (isSubmenu) {
var parentMenuTrack = Number(String(menuTrack).slice(0, 2));
var subMenuTrack = Number(String(menuTrack).slice(2));
var templatePrompt = PROMPT_TEMPLATE[parentMenuTrack - TEMPLATE_PROMPT_THRESHOLD].submenu[subMenuTrack].prompt;
} else if (isTemplate) {
var templatePrompt = PROMPT_TEMPLATE[menuTrack - TEMPLATE_PROMPT_THRESHOLD].prompt;
}

// テンプレートの場合は直前に実行したプロンプトテンプレートの番号としてタグに保存
if (isTemplate) {
doc.Tag(SELECTED_TEMPLATE_PROMPT_TAG) = templatePrompt;
doc.tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG) = menuTrack
} else {
// テンプレート以外の場合はタグを削除
if (doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG)) {
doc.Tag.remove(SELECTED_TEMPLATE_PROMPT_TAG);
}
}

// Gemini API 呼び出し部品を実行
// V8版で fetch メソッドを使うために別呼び出しとする
doc.Tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = getTemporaryCustomInstruction() ? getTemporaryCustomInstruction() : DEFAULT_CUSTOM_INSTRUCTION;
editor.ExecuteMacro("call_gemini_api.js");
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
var t = "";
if (selectionIsEmpty) {
t = "アクティブ行の内容で相談 (&A)";
} else {
t = "選択範囲の内容で相談 (&A)";
}
menu.Add(t, EXECUTE_AI);
if (doc.Tag.exists(HISTORY_TAG)) {
var turn = JSON.parse(String(doc.Tag(HISTORY_TAG)).replace(/\n/g, "")).length / 2;
menu.Add("├ 会話履歴をクリア (現在の会話数: " + turn + ") (&C)", RESET_HISTORY);
} else {
menu.Add("├ 会話履歴をクリア (現在の会話数: 0) (&C)", RESET_HISTORY, meMenuGrayed);
}
menu.Add("└ カスタムインストラクションを変更 (&I)", SET_CUSTOM_INSTRUCTION);

// テンプレート数チェック
// 2桁まで許容
var ITEMS_MUX = 99;
if (PROMPT_TEMPLATE.length > ITEMS_MUX - TEMPLATE_PROMPT_THRESHOLD) {
throw new Error("プロンプトテンプレートの数が多すぎます。");
}

// テンプレートの追加
if (PROMPT_TEMPLATE.length > 0) {
var subMenu = CreatePopupMenu();
for (var i = 0; i < PROMPT_TEMPLATE.length; i++) {
var accelerationKey = "";
if (i === 9) {
accelerationKey = " (&0)";
} else if (i < 10) {
accelerationKey = " (&" + (i + 1) + ")";
}
var menuNum = TEMPLATE_PROMPT_THRESHOLD + i;
if (PROMPT_TEMPLATE[i].submenu) {
var subMenuList = PROMPT_TEMPLATE[i].submenu;
// テンプレート数チェック
if (subMenuList.length > ITEMS_MUX) {
throw new Error("プロンプトテンプレート (サブメニュー) の数が多すぎます。");
}
var subSubMenu = CreatePopupMenu();
var subMenuPrefix = String(menuNum);
for (var j = 0; j < subMenuList.length; j++) {
var subAccelerationKey = "";
if (j === 9) {
subAccelerationKey = " (&0)";
} else if (j < 10) {
subAccelerationKey = " (&" + (j + 1) + ")";
}
var subMenuNum = Number(subMenuPrefix + ("0" + j).slice(-2));
subSubMenu.Add(subMenuList[j].title + subAccelerationKey, subMenuNum);
}
subMenu.AddPopup(PROMPT_TEMPLATE[i].submenu_title + accelerationKey, subSubMenu);
} else {
subMenu.Add(PROMPT_TEMPLATE[i].title + accelerationKey, menuNum);
}
}
if (selectionIsEmpty) {
t = "プロンプトテンプレート (対象: アクティブ行) (&T)";
} else {
t = "プロンプトテンプレート (対象: 選択範囲) (&T)";
}
menu.AddPopup(t, subMenu);

t = "└ 直前に実行したプロンプトテンプレートを再実行 (&R)";
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT);
} else {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT, meMenuGrayed);
}
}

return menu;
}

function configureTemporaryCustomInstruction() {
let tempCustomInstruction = getTemporaryCustomInstruction();
const prompt = Prompt("カスタムインストラクションを変更 ※変更すると会話履歴がリセットされます", tempCustomInstruction ? tempCustomInstruction : DEFAULT_CUSTOM_INSTRUCTION);
if (prompt !== null) {
if (prompt === DEFAULT_CUSTOM_INSTRUCTION) {
// デフォルトと同じ値の場合はタグを削除
setTemporaryCustomInstruction("");
} else if (prompt === "" && Confirm("カスタムインストラクションをデフォルトに戻しますか？")) {
setTemporaryCustomInstruction("");
} else if (prompt !== tempCustomInstruction) {
// デフォルト以外の値が設定された場合は保存
setTemporaryCustomInstruction(prompt);
}
}

// 変更が加わっている場合は会話履歴をリセット
if (tempCustomInstruction !== getTemporaryCustomInstruction()) {
resetTag();
}
}

function resetTag() {
const tag = doc.Tag;
if (tag.exists(HISTORY_TAG)) {
tag.remove(HISTORY_TAG);
}
}

function getTemporaryCustomInstruction() {
var tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
} else {
return "";
}
}

function setTemporaryCustomInstruction(temporaryCustomInstruction) {
var tag = doc.Tag;
if (temporaryCustomInstruction) {
tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = temporaryCustomInstruction;
} else {
tag.remove(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
}
}
</syntaxhighlight>

(2) (1)のマクロから呼び出されるマクロ '''※ファイル名は「call_gemini_api.js」とすること'''

<syntaxhighlight lang="javascript">
#language = "v8"
#title = "Gemini に相談 (API 呼び出し部品)"
BeginUndoGroup();

// 生成AIの回答の言語設定
// "Japanese" や "English" を設定できます。他の言語は未検証。
// 自動設定にする場合は空文字 "" を設定してください。
const LANGUAGE = "Japanese";

// 入力プロンプトの最大トークン数
// 超適当なトークナイザー関数により計測し、英単語は4文字1トークン、それ以外は1文字1トークンとして数えます。
const MAX_PROMPT_TOKEN = 8000;

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 使用トークン数が増えて動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
const HISTORY_SIZE = 0;

// 会話履歴に保持する最大トークン数
// 会話履歴のトークン数がこの数を超える場合、古い履歴から削除されます。
const MAX_HISTORY_TOKEN = 270000;

// 生成AI応答の入力毎の遅延時間 (ミリ秒)
// 入力をゆっくりにしたいときは数字を大きくしてください。
const INPUT_DELAY = 25;

// 利用する生成AIのモデル
// const AI_MODEL = "models/gemini-2.5-flash-preview-04-17";
const AI_MODEL = "models/gemini-2.5-flash-lite-preview-06-17";

// 生成AIのリクエストパラメータ
const GENERATION_CONFIG = {
max_output_tokens: 6000,
temperature: 0.65,
thinkingConfig: {
includeThoughts: false,
thinkingBudget: 1000
}
};

// テンプレート利用の場合のtemperature
const TEMPERATURE_TEMPLATE = 0.25;

// タグ名の定義
const HISTORY_TAG = "gemini-history";
const TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
const SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// APIキー環境変数名
const API_KEY_ENV = "GEMINI_API_KEY"

// console.log に出力する内容を Mery のアウトプットバーに表示する
const console = {
log: function (str) {
outputBar.Writeln(str)
}
}

const doc = document;
const sel = document.selection;

// 生成リクエスト中止フラグ
let abortRequestFlg = false
// 生成リクエスト完了フラグ;
let requestCompletedFlg = false;

main();

async function main() {
let promptText = sel.Text.trim();

// 文字数が多すぎる場合はエラー
if (roughTokenize(promptText) > MAX_PROMPT_TOKEN) {
alert("プロンプトの文字数が多すぎます。文字数を少なくしてください。");
return;
}

// テンプレートの場合はプロンプトを変更
const isTemplate = doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG);
if (isTemplate) {
promptText = "# **指示**:\n\n"
+ doc.Tag[SELECTED_TEMPLATE_PROMPT_TAG]
+ "\n\n# **入力テキスト**:\n\n"
+ promptText;
}

try {
// 処理終了を待機
shell.KeepRunning = true;

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
sel.Text = "\n---\n\n"

document.KeepScrollPos = true;

// APIキーの取得
const apiKey = shell.getEnv(API_KEY_ENV);
if (!apiKey) {
alert(`${API_KEY_ENV} が設定されていません`);
return;
}

// Gemini API に問い合わせ
await Promise.all([
callGeminiAPI(apiKey, promptText, isTemplate),
abortRequest()
]);
if (sel.GetActivePointX(mePosLogical) > 2) {
sel.Text = "\n\n---\n\n\n"
} else {
sel.Text = "\n---\n\n\n"
}
} catch (e) {
console.log("エラーが発生しました: " + e.message + "\n" + e.stack);
sel.Text = "<処理中にエラー発生>"
} finally {
// 処理終了待機を解除
shell.KeepRunning = false;
}
}

// Shift キーが長押しされた場合はリクエスト中止フラグを立てる
async function abortRequest() {
const VIRTUAL_KEY_CODE_SHIFT = 0x10; // Shift キーの仮想キーコード
let pressCount = 0;
while (!requestCompletedFlg) {
await new Promise(resolve => setTimeout(resolve, 300));
if (shell.GetKeyState(VIRTUAL_KEY_CODE_SHIFT) < 0) {
pressCount++;
if (pressCount > 2) {
abortRequestFlg = true;
return;
}
}
}
}

async function callGeminiAPI(apiKey, promptText, isTemplate) {
const controller = new AbortController();
const signal = controller.signal;
try {
// fetch で Gemini API にリクエスト
const requestBody = {
contents: createGeminiRequest(promptText, isTemplate),
system_instruction: buildSystemInstruction(),
generationConfig: GENERATION_CONFIG,
};
if (isTemplate) {
// テンプレートの場合は応答を決定論的にする
// テンプレート以外の場合はデフォルト値とするために指定しない
requestBody.generationConfig.temperature = TEMPERATURE_TEMPLATE;
}
const response = await fetch(`https://generativelanguage.googleapis.com/v1beta/${AI_MODEL}:streamGenerateContent?alt=sse&key=${apiKey}`, {
signal: signal,
method: 'POST',
headers: {
'Content-Type': 'application/json',
},
body: JSON.stringify(requestBody),
});

let buffer = "";
let responseAll = "";
let usageText = "";
const reader = response.body.getReader();
const decoder = new TextDecoder('utf-8');
while (true) {
// リクエスト中止フラグが立っている場合は中断
if (abortRequestFlg) {
controller.abort();
sel.Text = "<処理を中止>";
return null;
}

const { done, value } = await reader.read();
if (done) {
// 最後に残ったバッファを処理
if (buffer.trim().length > 0) {
// 最後の不完全なJSONを処理（可能であれば）
try {
const lastLine = buffer.trim().replace(/^data:\s*/, '');
if (lastLine) {
const processedData = processLine(lastLine, responseAll);
if (processedData) {
sel.Text = processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
}
}
} catch (e) {
console.log("不完全なJSONの処理でエラー: " + e.message);
}
}
break;
}

// 受信したバイナリデータ (value) をテキストに変換する
const text = decoder.decode(value);

// 前回のバッファと今回のテキストを結合
const combinedText = buffer + text;

// 完全な行を探す（最後の改行の位置を見つける）
const lastNewlineIndex = combinedText.lastIndexOf('\n');

if (lastNewlineIndex === -1) {
// 改行がない場合は全てバッファに保存
buffer = combinedText;
continue;
}

// 完全な行を処理
const completeText = combinedText.substring(0, lastNewlineIndex);
// 残りをバッファに保存
buffer = combinedText.substring(lastNewlineIndex + 1);

// テキストには複数のメッセージが含まれている可能性があるため、
// 改行 (LF) で分離して、1 行ずつ処理する
const lines = completeText.trim().split(/\n+/);

let inputText = "";
for (const line of lines) {
// HACK 空行が渡ってくることがあるので trim() を入れる
const json_text = line.trim().replace(/^data:\s*/, '');
// データがない場合はスキップ
if (!json_text) {
continue;
}
const processedData = processLine(json_text, responseAll);
if (processedData) {
inputText += processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
} else if (processedData === null) {
// JSONパースエラーが発生した場合は、バッファをクリアして終了
buffer = "";
inputText = "JSONパースに失敗\n" + completeText;
break;
}
}

if (inputText.length > 0) {
// 上記までで数文字まとまって取得されるので、まとめて入力
sel.Text = inputText;
}
// 入力遅延を入れる
await new Promise(resolve => setTimeout(resolve, INPUT_DELAY));
}

if (usageText) {
sel.Text = (responseAll.slice(-1) === "\n" ? "\n" : "\n\n") + `(${usageText})`;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0 && !isTemplate && responseAll.length > 0) {
appendReturnTextToTag(promptText, responseAll);
}
} catch (e) {
controller.abort();
throw e;
} finally {
requestCompletedFlg = true;
}
}

// 一行を処理する関数を分離して再利用可能にする
function processLine(json_text, responseAll) {
try {
const data = JSON.parse(json_text);
const candidate = data.candidates[0];
let updatedResponseAll = responseAll;

// まとまった文字数で入力する
const response = candidate.content.parts[0].text
let inputText = formatGeminiResponse(response, responseAll.slice(-5));
if (inputText) {
updatedResponseAll += inputText;
}

// 応答が終了した場合はループを抜ける
let usageText = "";
if (candidate.finishReason === "STOP") {
const usage = data.usageMetadata;
usageText = "利用トークン数: プロンプト=" + usage.promptTokenCount
+ ", 応答=" + usage.candidatesTokenCount
+ ", 思考=" + usage.thoughtsTokenCount
+ ", 合計=" + usage.totalTokenCount;
}

return { inputText, usageText, responseAll: updatedResponseAll };
} catch (e) {
console.log("JSONパースエラー: " + e.message + ", データ: " + json_text);
return null;
}
}

// Geminiの応答には半角スペースが連続して含まれることがあるため、整形する
function formatGeminiResponse(response, lastFiveChars) {
let formattedResponse = response
.replace(/([。！？]) +/g, "$1")
.replace(/([*:.]) {2,}/g, "$1 ");

const joinedLastFiveChars = lastFiveChars + formattedResponse;
if (joinedLastFiveChars.match(/([。！？]) +/)) {
formattedResponse = formattedResponse.replace(/^ +/, "");
}
if (joinedLastFiveChars.match(/([*:.]) {2,}/)) {
if (lastFiveChars.slice(-1) === " ") {
formattedResponse = formattedResponse.replace(/^ +/, "");
} else {
formattedResponse = formattedResponse.replace(/^ +/, " ");
}
}

return formattedResponse
}

function roughTokenize(text) {
// 超適当なトークナイザ。トークン数をざっくりと多めに数える
// 空白文字・ハイフン・アンダースコア区切りの単語に分割して、
// 単語がアルファベットのみ、数字のみの場合には 4文字=1トークンとして数える。
// 単語にアルファベット以外の文字が含まれる場合は 1文字=1トークンとして数える。
return text
.split(/[\s\-_]+/)
.map(w => /^[a-zA-Z]+$|^[0-9]+$|/.test(w) ? Math.ceil(w.length / 4) : w.length)
.reduce((a, b) => a + b, 0);
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText, isTemplate) {
// テンプレートの場合は、会話履歴とカスタムインストラクションを反映しない
if (isTemplate) {
return [createRoleAndParts("user", promptText)];
}

const tag = doc.Tag;

// 以前の会話が存在しない場合は新規リクエスト
if (!tag.exists(HISTORY_TAG)) {
const roleAndParts = [createRoleAndParts("user", promptText)];
return roleAndParts
}

// 会話履歴が存在する場合は、履歴を含めてリクエスト
const roleAndParts = JSON.parse(tag[HISTORY_TAG]);
roleAndParts.push(createRoleAndParts("user", promptText));
return roleAndParts;
}

function createRoleAndParts(role, text) {
return {
"role": role,
"parts": [
{
"text": text
}
]
};
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
const tag = doc.Tag;
if (!tag.exists(HISTORY_TAG)) {
tag[HISTORY_TAG] = JSON.stringify([
createRoleAndParts("user", userText),
createRoleAndParts("model", modelText)
]);
} else {
const geminiText = JSON.parse(tag[HISTORY_TAG]);
geminiText.push(createRoleAndParts("user", userText));
geminiText.push(createRoleAndParts("model", modelText));
// 会話セット (user, model 1往復) が特定セット数を超えた場合、最初のセットを削除
if (geminiText.length > HISTORY_SIZE * 2) {
geminiText.splice(0, 2);
}
// 会話履歴全体が MAX_HISTORY_TOKEN を超えた場合、最初のセットを削除
let joinedText = geminiText.map(e => e.parts[0].text).join("\n");
while (roughTokenize(joinedText) > MAX_HISTORY_TOKEN) {
geminiText.splice(0, 2);
joinedText = geminiText.map(e => e.parts[0].text).join("\n");
}

tag[HISTORY_TAG] = JSON.stringify(geminiText);
}
}

function buildSystemInstruction() {
let customInstruction = getTemporaryCustomInstruction();
const language = LANGUAGE.trim();

customInstruction = customInstruction.replace(/^[\s　]+|[\s　]+$/g, "");

return {
parts: {
text: "Do not hallucinate. If you are unsure or don't have enough information to answer with confidence, say \"I don't know\" or \"I'm not sure.\"\n"
+ (customInstruction ? `${customInstruction}\n` : "")
+ (language ? `Respond in ${language}.\n` : "")
}
}
}

function getTemporaryCustomInstruction() {
const tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag[TEMPORARY_CUSTOM_INSTRUCTION_TAG];
} else {
return "";
}
}
</syntaxhighlight>

=== 従来エンジン版 (アーカイブ) ===

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
var HISTORY_SIZE = 5;

// コンテキストメニュー番号
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;

var ConsoleClass = function () {
this.log = function (str) {
outputBar.Writeln(str)
}
}
var console = new ConsoleClass();

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty
var beforeScrollY = ScrollY;

// プロンプトの取得
var promptText = "";
var promptLength = 0;
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
promptText = sel.Text.trim();
promptLength = sel.TextLength;
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
var menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === 2) {
resetTag();
return;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}
// 文字数が多すぎる場合はエラー
if (promptLength > 10000) {
alert("プロンプトの文字数が多すぎます。10000 文字以下にしてください。");
return;
}
// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
var activeY = sel.GetActivePointY(mePosLogical);

// Gemini API に問い合わせ
doc.ReadOnly = true;
var ret = callGeminiAPI(promptText);
doc.ReadOnly = false;

// 結果を表示
sel.Text = "\n---\n\n" + ret + "\n\n---\n";

// 位置調整
sel.SetActivePoint(
mePosLogical,
1,
activeY,
false
)
if (beforeScrollY + 2 < ScrollY) {
ScrollY = ScrollY - 1;
}
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
if (selectionIsEmpty) {
menu.Add("アクティブ行の内容で相談 (&Q)", EXECUTE_AI);
} else {
menu.Add("選択範囲の内容で相談 (&Q)", EXECUTE_AI);
}
if (document.Tag.exists("gemini-text")) {
var turn = JSON.parse(document.Tag("gemini-text")).length / 2;
menu.Add("会話履歴をリセット (現在の会話数: " + turn + ") (&R)", RESET_HISTORY);
}
return menu;
}

function callGeminiAPI(promptText) {
try {
// APIキーの取得
var gemini_api_key = shell.getEnv("GOOGLE_API_KEY");

var http = new ActiveXObject("Msxml2.ServerXMLHTTP");
var url = 'https://generativelanguage.googleapis.com/v1beta/models/gemini-1.5-flash-latest:generateContent?key=' + gemini_api_key;

http.open('POST', url, true);
http.setRequestHeader('Content-Type', 'application/json');
http.send('{"contents":' + createGeminiRequest(promptText) + '}');

// 応答待機
var timeout = 60;
var retrySec = 0;
var startX = sel.GetActivePointX(mePosLogical);
var prevPos = sel.GetActivePos();
while (http.readyState != 4) {
if (retrySec > timeout) {
break;
}
http.waitForResponse(1);
retrySec += 1;
inputProgressChar(prevPos);
prevPos = sel.GetActivePos();
}
// 進捗表示文字を削除
sel.SetActivePoint(
mePosLogical,
startX,
sel.GetActivePointY(mePosLogical),
true
);
sel.Delete();

var ret = "";

// 応答ステータスチェック
if (http.readyState == 4 && http.status == 200) {
// JSONをパースして必要なテキストを抽出
var response = JSON.parse(http.responseText);
if (response.candidates && response.candidates.length > 0) {
response.candidates.forEach(function (candidate) {
if (candidate.content && candidate.content.parts) {
candidate.content.parts.forEach(function (part) {
if (part.text) {
ret += part.text;
}
});
}
});
}
} else {
var ret = "エラーが発生しました: " + http.status + " " + http.statusText
http.abort();
return ret;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0) {
appendReturnTextToTag(promptText, ret);
}

// 整形しつつ返す
return ret
.trim()
.replace(/([。！？]) +/g, "$1")
.replace(/\* +/g, "* ");
} catch (e) {
console.log(e.stack);
return "エラーが発生しました: " + e.message;
}
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText) {
var tag = document.Tag;
// 以前の会話が存在しない場合
if (!tag.exists("gemini-text")) {
return JSON.stringify([{ "parts": [{ "text": promptText }] }]);
}

var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": promptText }]
});
return JSON.stringify(geminiText);
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
var tag = document.Tag;
if (!tag.exists("gemini-text")) {
tag("gemini-text") = JSON.stringify([
{
"role": "user",
"parts": [{ "text": userText }]
},
{
"role": "model",
"parts": [{ "text": modelText }]
}
]);
} else {
var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": userText }]
});
geminiText.push({
"role": "model",
"parts": [{ "text": modelText }]
});
// 会話セット (user, model 1往復) が5セットを超えた場合、最初のセットを削除
while (geminiText.length > HISTORY_SIZE * 2) {
geminiText.shift();
}
tag("gemini-text") = JSON.stringify(geminiText);
}
}

function resetTag() {
if (document.Tag.exists("gemini-text")) {
document.Tag.remove("gemini-text");
}
}

function inputProgressChar(pos) {
doc.ReadOnly = false;
sel.SetActivePos(pos);
sel.Text = ".";
doc.ReadOnly = true;
}
</syntaxhighlight>

== 更新履歴 ==

* 2025-06-21 環境変数が読み込めなかった場合にエラーメッセージのプロンプト表示がされるようにした。
* 2025-06-18 利用する生成AIモデルを gemini-2.5-flash-lite-preview-06-17 に差し替えた。読み込む環境変数を「GEMINI_API_KEY」に変更した。
* 2025-02-16 利用する生成AIモデルを gemini-2.0-flash に差し替えた。カスタムインストラクションにハルシネーション抑制の指示を加えた。プロンプトに渡す文字数制限方式を調整。Geminiからの応答に句読点などの区切りの後ろに半角スペースを2,3個連続で付いてくる場合があるので、できるだけ削除して入力するようにした。処理されたトークン数を出力するようにした。
* 2024-12-22 V8エンジン版を追加。それに伴い従来エンジン版はアーカイブ化
* 2024-12-18 会話履歴の保持方式をJSON文字列に変更。リクエスト確認のポップアップ表示をコンテキストメニュー表示に変更。同メニューに会話履歴リセット機能を追加
* 2024-11-28 文書内で初回実行する際、「"」が含まれるとエラーになってしまう事象に対処
* 2024-11-27 サンプルマクロ [[Google Gemini で執筆支援]] の仕様に合わせ、環境変数「GOOGLE_API_KEY」からAPIキーを取得するように変更。これに合わせてMeryの動作バージョンを Ver 3.7.8 以上に変更
* 2024-11-17 初版

Google Gemini に相談

2025-06-21T03:39:31Z

Yuko: /* V8エンジン版 */

== 概要 ==

Googleの生成AIである「Gemini」を利用するためのMeryマクロです。

後述のソースコードではV8エンジンで動作するものと従来版スクリプトエンジンで動作するものの2種類を掲載していますが、従来版のものはアーカイブです。特段の理由がない限りはV8エンジン版をご利用ください。

【主な機能】

* Google Gemini APIを利用して生成AIと対話できるMery用のマクロ
* 選択したテキストやアクティブな行の内容について生成AIに質問・相談が可能
* 会話履歴を保持し、文脈を考慮した対話が可能

【特徴的な機能】

'''会話履歴機能''':

* 事前の設定数に応じた会話履歴を保持
* 履歴のクリアが可能

これにより、会話の文脈を考慮した回答を得られます。

'''カスタムインストラクション''':

* AIの応答方針を設定可能
* 一時的なカスタム指示の保存と変更が可能

'''プロンプトテンプレート''':

* 誤字脱字チェック
* 日本語翻訳
* コードの最適化、生成

など、定型的な質問を簡単に実行できます。
※テンプレート機能では回答を安定させるため、前述の会話履歴を文脈に含みません。

テンプレートは自身の使い方に合わせて好きに追加、削除ができます。詳細はソースコード内の「PROMPT_TEMPLATE」定数のコメントを参照。

'''生成AIチャット風仕様''':

* ストリーミングモードでリアルタイムに1文字ずつMeryに入力されていく
* Shiftキー長押しで、テキスト生成を中断できる

== 注意事項 (必ず読んでからご利用ください) ==

* 本マクロでは 2024/11/17 時点で無料利用ができるGemini APIを利用します。今後、Googleの改定により有償になったり、設定誤り等で費用が発生しても、作者は一切の責任を負いません。
* Gemini APIではその特性上、プロンプトとして送信した文字列がAIの学習に使われるものと思われます。くれぐれも機密情報やプライバシーに関わる情報を指定しないように注意してください。
* Gemini APIは、 [https://ai.google.dev/gemini-api/terms?hl=ja Gemini API利用規約] に則ってご利用ください。

== 利用前提 ==

* Mery Ver 3.7.17 以上
* Google AI Studioで、Gemini APIキーを取得していること (参考 [https://ai.google.dev/gemini-api/docs/api-key?hl=ja API キーを取得する | Gemini API | Google AI for Developers])

== 利用方法 ==

* 環境変数の設定
:コマンドプロンプトで以下のコマンドを実行し、環境変数を設定してください。
<syntaxhighlight lang="bat">
setx GEMINI_API_KEY "***************************************"
</syntaxhighlight>
:設定後、Mery または Windows の再起動が必要な場合があります。
* マクロの実行
**プロンプトにしたい文字列を選択してマクロを実行すると、選択したテキストがプロンプトとしてGemini APIに送信され、応答がエディタに表示されます。
* 会話の履歴数を調整
** 会話の履歴は設定した個数分が保持され、文脈として利用されます。適宜、ソースコード内の「HISTORY_SIZE」の数を調整してください。
** ※数を増やすほど会話内容を保持して文脈を理解するようになりますが、メモリ使用量が増えたり動作が重くなる可能性があります。
** ※開いている文書ごとに履歴を保持します。文脈をリセットしたいときは、新しい文書を開いて会話をやり直してください。

== ソースコード ==

=== V8エンジン版 ===

このマクロは、editor.ExecuteMacro メソッドを使う兼ね合いで2つのマクロファイルに分かれています。

(1) Meryに登録するマクロ (ファイル名は任意)

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// カスタムインストラクション
// これを設定することで、生成AIの回答全体への生成方針を指示できます。
// 例えば "あなたは侍で名前は権兵衛です。回答をござる口調にしてください" と設定すると、AIの回答がござる口調になります。
// 何も指示しない場合は、空文字 "" を設定してください。
const DEFAULT_CUSTOM_INSTRUCTION = "";

// プロンプトテンプレート
// プロンプトテンプレートを設定することで、AIに対して特定の指示を出すことができます。
// プロンプトテンプレートでの生成は会話履歴とカスタムインストラクションを反映しません。
// テンプレートは以下の { ～ }, で囲まれたブロックを好きに増減させて利用できます。
var PROMPT_TEMPLATE = [
// 以下はサンプルです。1階層メニューと2階層メニューが利用できます。
// {
// "title": "要約",
// "prompt": "以下の文章を要約してください。"
// },
// {
// "submenu_title": "翻訳系",
// "submenu": [
// {
// "title": "日本語翻訳",
// "prompt": "以下の文章を日本語に翻訳してください。"
// },
// {
// "title": "英語翻訳",
// "prompt": "以下の文章を英語に翻訳してください。"
// },
// ]
// },

{
"submenu_title": "理解を深める",
"submenu": [
{
"title": "論点を整理する",
"prompt": "以下の論点を整理して。"
},
{
"title": "論理の抜け漏れを探す",
"prompt": "以下の論点を整理し、忖度せずに鋭く、論理の抜け漏れを抽出して。そして、そこから発生する可能性のあるリスクも教えて。"
},
{
"title": "要約する",
"prompt": "要約して。専門的な用語と思われる単語は簡単に解説も入れて。"
},
{
"title": "物語対話形式で教えて",
"prompt": "以下の内容について物語対話形式で教えてください。"
},
]
},
{
"submenu_title": "翻訳する",
"submenu": [
{
"title": "日本語に翻訳",
"prompt": "以下の文章を日本語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[訳]\n翻訳文...\n"
},
{
"title": "英語に翻訳",
"prompt": "以下の文章を英語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[Translation]\n翻訳文...\n"
},
{
"title": "英語->日本語スラッシュリーディング翻訳",
"prompt": "以下の英文を日本語にスラッシュリーディング形式で翻訳してください。\n\n"
+ "条件:\n"
+ "- 英文の各フレーズをスラッシュ(/)で区切って表示\n"
+ "- 各フレーズの日本語訳を括弧()内に併記\n"
+ "- 文の終わりはダブルスラッシュ(//)で表示\n"
+ "- 英語の語順に従って日本語訳を行う\n"
+ "- 日本語訳は自然な日本語である必要はなく、英語の語順を反映した直訳調で構わない\n"
+ "- 主語が省略されている場合は補って翻訳すること\n"
+ "- 一般的な英文で頻出する表現がある場合は次の行に記載\n"
+ "- 以下の出力例のように <英文> (日本語訳) / ... とスラッシュ区切りの繰り返しになる \n\n"
+ "出力例:\n"
+ "Snowstorms are forecast (暴風雪が予報されている) / to hit the Sea of Japan coasts (日本海沿岸を襲うと) / of northern to eastern Japan (北部から東部の) / from Sunday through Monday. (日曜から月曜にかけて。) //\n"
+ "【頻出表現】\n"
+ "- be forecast to: ～すると予報されている\n"
},
]
},
{
"submenu_title": "プログラミング支援",
"submenu": [
{
"title": "コードを洗練させる",
"prompt": "以下のコードを洗練させてください"
},
{
"title": "コードをレビューする",
"prompt": "以下のコードをセキュリティと保守性の観点でレビューしてください"
},
{
"title": "エラーログをデバッグする",
"prompt": "以下のエラーログを解析し、考えられる原因と対策を提示してください"
},
{
"title": "SQLクエリを最適化する",
"prompt": "以下のSQL文を最適化してください"
},
{
"title": "PowerShell スクリプトを書く",
"prompt": "以下の処理を行うPowerShellスクリプトを生成してください"
},
{
"title": "Shell Script を書く",
"prompt": "以下の処理を行うShell Scriptを生成してください"
},
{
"title": "Linux コマンドを提案",
"prompt": "あなたはLinuxエキスパートとして、以下のLinuxコマンドを提案してください。\n\n"
+ "制約条件:\n"
+ "- 多数のディストリビューションで採用されているメジャーなコマンドを使用し、ポータブルな実装にすること\n"
+ "- bashでの実行を前提にすること\n"
+ "- 可能な限りシンプルな実装にすること\n\n"
+ "期待する出力:\n"
+ "- コマンドの具体的な実装方法\n"
+ "- 各コマンドの動作説明\n"
+ "- 制限事項\n"
},
]
},
{
"submenu_title": "ビジネス文書作成支援",
"submenu": [
{
"title": "誤字脱字、不正確な表現をチェック",
"prompt": "以下の2つのカテゴリーで問題点を指摘してください\n"
+ "- 【誤字脱字】：明確な誤字脱字および誤字の疑いがある箇所\n"
+ "- 【不正確・曖昧な表現】：解釈に個人差が生じる可能性がある表現、より適切な表現に改善できる箇所"
},
{
"title": "提案書を作成する",
"prompt": "以下に対する対する提案書を、コスト・実現性・リスクを含めて作成してください"
},
{
"title": "仕様書のアウトラインを作成する",
"prompt": "以下の内容で仕様書のアウトラインを作成してください"
},
{
"title": "手順書のアウトラインを作成する",
"prompt": "以下の作業を行う手順書を、前提条件と注意事項を含めてアウトラインを作成してください"
},
{
"title": "ユーザーマニュアルのアウトラインを作成する",
"prompt": "以下の機能内容から、ユーザー向けマニュアルのアウトラインを作成してください"
},
{
"title": "議事録を作成する",
"prompt": "以下の会議内容から議事録を作成してください"
},
{
"title": "進捗報告書を作成する",
"prompt": "以下のタスク状況から進捗報告書を作成してください"
},
]
},
{
"submenu_title": "分析支援",
"submenu": [
{
"title": "問題を分析し、課題を抽出する",
"prompt": "以下の状況から問題や潜在的リスクを分析し、課題を抽出してください"
},
{
"title": "対応策を提案する",
"prompt": "以下の問題・課題に対する対応策を複数提案してください"
},
{
"title": "傾向を見つける",
"prompt": "以下の内容から、数値や挙動上の傾向を見つけてください"
},
]
},
{
"submenu_title": "アイデア出し",
"submenu": [
{
"title": "SCAMPER法でブレインストーミング",
"prompt": "以下のテーマについて、SCAMPER法を使って15個のアイデアを出してください。制約条件は以下の通りです："
},
{
"title": "解決策の幅出し",
"prompt": "以下の課題に対して、技術面、運用面、コスト面から実現可能な解決策を5つずつ提案してください"
},
{
"title": "業務改善案の提案",
"prompt": "以下の既存プロセスについて、効率化、コスト削減、品質向上の観点から改善案を提案してください"
},
{
"title": "逆転の発想",
"prompt": "以下の目標に対して、通常とは逆の視点からアプローチする方法を3つ提案してください"
},
{
"title": "競合分析からの着想",
"prompt": "以下の内容について、業界における競合他社の特徴を分析し、差別化できる新しいアプローチを提案してください"
},
{
"title": "ユースケースの列挙",
"prompt": "以下の製品・サービスについて、想定されるユースケースを10個列挙し、それぞれの価値提案を記載してください"
},
]
},
]

// コンテキストメニュー番号の定義
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;
var SET_CUSTOM_INSTRUCTION = 3;
var REEXECUTE_LAST_TEMPLATE_PROMPT = 4;
var TEMPLATE_PROMPT_THRESHOLD = 10;
var TEMPLATE_PROMPT_SUBMENU_THRESHOLD = 1000;

// タグ名の定義
var HISTORY_TAG = "gemini-history";
var TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
var PREVIOUS_TEMPLATE_PROMPT_ID_TAG = "gemini-previous-template-prompt";
var SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// console.log に出力する内容を Mery のアウトプットバーに表示する
var console = {
log: function (str) {
outputBar.Writeln(str)
}
}

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty

// プロンプトの取得
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
var promptLength = sel.TextLength;
var menuTrack = 0
while (true) {
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === RESET_HISTORY) {
resetTag();
continue;
}

// カスタムインストラクションの設定
if (menuTrack === SET_CUSTOM_INSTRUCTION) {
configureTemporaryCustomInstruction();
return;
}

break;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}

// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// 直前に実行したプロンプトテンプレートの再実行の場合、menuTrack を書き換え
if (menuTrack === REEXECUTE_LAST_TEMPLATE_PROMPT) {
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menuTrack = Number(doc.Tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG));
} else {
alert("直前に実行したプロンプトテンプレートがありません。");
return;
}
}

// テンプレートを取得
var isTemplate = menuTrack >= TEMPLATE_PROMPT_THRESHOLD;
var isSubmenu = menuTrack >= TEMPLATE_PROMPT_SUBMENU_THRESHOLD;
if (isSubmenu) {
var parentMenuTrack = Number(String(menuTrack).slice(0, 2));
var subMenuTrack = Number(String(menuTrack).slice(2));
var templatePrompt = PROMPT_TEMPLATE[parentMenuTrack - TEMPLATE_PROMPT_THRESHOLD].submenu[subMenuTrack].prompt;
} else if (isTemplate) {
var templatePrompt = PROMPT_TEMPLATE[menuTrack - TEMPLATE_PROMPT_THRESHOLD].prompt;
}

// テンプレートの場合は直前に実行したプロンプトテンプレートの番号としてタグに保存
if (isTemplate) {
doc.Tag(SELECTED_TEMPLATE_PROMPT_TAG) = templatePrompt;
doc.tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG) = menuTrack
} else {
// テンプレート以外の場合はタグを削除
if (doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG)) {
doc.Tag.remove(SELECTED_TEMPLATE_PROMPT_TAG);
}
}

// Gemini API 呼び出し部品を実行
// V8版で fetch メソッドを使うために別呼び出しとする
doc.Tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = getTemporaryCustomInstruction() ? getTemporaryCustomInstruction() : DEFAULT_CUSTOM_INSTRUCTION;
editor.ExecuteMacro("call_gemini_api.js");
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
var t = "";
if (selectionIsEmpty) {
t = "アクティブ行の内容で相談 (&A)";
} else {
t = "選択範囲の内容で相談 (&A)";
}
menu.Add(t, EXECUTE_AI);
if (doc.Tag.exists(HISTORY_TAG)) {
var turn = JSON.parse(String(doc.Tag(HISTORY_TAG)).replace(/\n/g, "")).length / 2;
menu.Add("├ 会話履歴をクリア (現在の会話数: " + turn + ") (&C)", RESET_HISTORY);
} else {
menu.Add("├ 会話履歴をクリア (現在の会話数: 0) (&C)", RESET_HISTORY, meMenuGrayed);
}
menu.Add("└ カスタムインストラクションを変更 (&I)", SET_CUSTOM_INSTRUCTION);

// テンプレート数チェック
// 2桁まで許容
var ITEMS_MUX = 99;
if (PROMPT_TEMPLATE.length > ITEMS_MUX - TEMPLATE_PROMPT_THRESHOLD) {
throw new Error("プロンプトテンプレートの数が多すぎます。");
}

// テンプレートの追加
if (PROMPT_TEMPLATE.length > 0) {
var subMenu = CreatePopupMenu();
for (var i = 0; i < PROMPT_TEMPLATE.length; i++) {
var accelerationKey = "";
if (i === 9) {
accelerationKey = " (&0)";
} else if (i < 10) {
accelerationKey = " (&" + (i + 1) + ")";
}
var menuNum = TEMPLATE_PROMPT_THRESHOLD + i;
if (PROMPT_TEMPLATE[i].submenu) {
var subMenuList = PROMPT_TEMPLATE[i].submenu;
// テンプレート数チェック
if (subMenuList.length > ITEMS_MUX) {
throw new Error("プロンプトテンプレート (サブメニュー) の数が多すぎます。");
}
var subSubMenu = CreatePopupMenu();
var subMenuPrefix = String(menuNum);
for (var j = 0; j < subMenuList.length; j++) {
var subAccelerationKey = "";
if (j === 9) {
subAccelerationKey = " (&0)";
} else if (j < 10) {
subAccelerationKey = " (&" + (j + 1) + ")";
}
var subMenuNum = Number(subMenuPrefix + ("0" + j).slice(-2));
subSubMenu.Add(subMenuList[j].title + subAccelerationKey, subMenuNum);
}
subMenu.AddPopup(PROMPT_TEMPLATE[i].submenu_title + accelerationKey, subSubMenu);
} else {
subMenu.Add(PROMPT_TEMPLATE[i].title + accelerationKey, menuNum);
}
}
if (selectionIsEmpty) {
t = "プロンプトテンプレート (対象: アクティブ行) (&T)";
} else {
t = "プロンプトテンプレート (対象: 選択範囲) (&T)";
}
menu.AddPopup(t, subMenu);

t = "└ 直前に実行したプロンプトテンプレートを再実行 (&R)";
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT);
} else {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT, meMenuGrayed);
}
}

return menu;
}

function configureTemporaryCustomInstruction() {
let tempCustomInstruction = getTemporaryCustomInstruction();
const prompt = Prompt("カスタムインストラクションを変更 ※変更すると会話履歴がリセットされます", tempCustomInstruction ? tempCustomInstruction : DEFAULT_CUSTOM_INSTRUCTION);
if (prompt !== null) {
if (prompt === DEFAULT_CUSTOM_INSTRUCTION) {
// デフォルトと同じ値の場合はタグを削除
setTemporaryCustomInstruction("");
} else if (prompt === "" && Confirm("カスタムインストラクションをデフォルトに戻しますか？")) {
setTemporaryCustomInstruction("");
} else if (prompt !== tempCustomInstruction) {
// デフォルト以外の値が設定された場合は保存
setTemporaryCustomInstruction(prompt);
}
}

// 変更が加わっている場合は会話履歴をリセット
if (tempCustomInstruction !== getTemporaryCustomInstruction()) {
resetTag();
}
}

function resetTag() {
const tag = doc.Tag;
if (tag.exists(HISTORY_TAG)) {
tag.remove(HISTORY_TAG);
}
}

function getTemporaryCustomInstruction() {
var tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
} else {
return "";
}
}

function setTemporaryCustomInstruction(temporaryCustomInstruction) {
var tag = doc.Tag;
if (temporaryCustomInstruction) {
tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = temporaryCustomInstruction;
} else {
tag.remove(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
}
}
</syntaxhighlight>

(2) (1)のマクロから呼び出されるマクロ '''※ファイル名は「call_gemini_api.js」とすること'''

<syntaxhighlight lang="javascript">
#language = "v8"
#title = "Gemini に相談 (API 呼び出し部品)"
BeginUndoGroup();

// 生成AIの回答の言語設定
// "Japanese" や "English" を設定できます。他の言語は未検証。
// 自動設定にする場合は空文字 "" を設定してください。
const LANGUAGE = "Japanese";

// 入力プロンプトの最大トークン数
// 超適当なトークナイザー関数により計測し、英単語は4文字1トークン、それ以外は1文字1トークンとして数えます。
const MAX_PROMPT_TOKEN = 8000;

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 使用トークン数が増えて動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
const HISTORY_SIZE = 0;

// 会話履歴に保持する最大トークン数
// 会話履歴のトークン数がこの数を超える場合、古い履歴から削除されます。
const MAX_HISTORY_TOKEN = 270000;

// 生成AI応答の入力毎の遅延時間 (ミリ秒)
// 入力をゆっくりにしたいときは数字を大きくしてください。
const INPUT_DELAY = 25;

// 利用する生成AIのモデル
// const AI_MODEL = "models/gemini-2.5-flash-preview-04-17";
const AI_MODEL = "models/gemini-2.5-flash-lite-preview-06-17";

// 生成AIのリクエストパラメータ
const GENERATION_CONFIG = {
max_output_tokens: 6000,
temperature: 0.65,
thinkingConfig: {
includeThoughts: false,
thinkingBudget: 1000
}
};

// テンプレート利用の場合のtemperature
const TEMPERATURE_TEMPLATE = 0.25;

// タグ名の定義
const HISTORY_TAG = "gemini-history";
const TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
const SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// APIキー環境変数名
const API_KEY_ENV = "GEMINI_API_KEY"

// console.log に出力する内容を Mery のアウトプットバーに表示する
const console = {
log: function (str) {
outputBar.Writeln(str)
}
}

const doc = document;
const sel = document.selection;

// 生成リクエスト中止フラグ
let abortRequestFlg = false
// 生成リクエスト完了フラグ;
let requestCompletedFlg = false;

main();

async function main() {
let promptText = sel.Text.trim();

// 文字数が多すぎる場合はエラー
if (roughTokenize(promptText) > MAX_PROMPT_TOKEN) {
alert("プロンプトの文字数が多すぎます。文字数を少なくしてください。");
return;
}

// テンプレートの場合はプロンプトを変更
const isTemplate = doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG);
if (isTemplate) {
promptText = "# **指示**:\n\n"
+ doc.Tag[SELECTED_TEMPLATE_PROMPT_TAG]
+ "\n\n# **入力テキスト**:\n\n"
+ promptText;
}

try {
// 処理終了を待機
shell.KeepRunning = true;

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
sel.Text = "\n---\n\n"

document.KeepScrollPos = true;

// APIキーの取得
const apiKey = shell.getEnv(API_KEY_ENV);
if (!apiKey) {
alert(`${API_KEY_ENV} が設定されていません`);
return;
}

// Gemini API に問い合わせ
await Promise.all([
callGeminiAPI(apiKey, promptText, isTemplate),
abortRequest()
]);
if (sel.GetActivePointX(mePosLogical) > 2) {
sel.Text = "\n\n---\n\n\n"
} else {
sel.Text = "\n---\n\n\n"
}
} catch (e) {
console.log("エラーが発生しました: " + e.message + "\n" + e.stack);
sel.Text = "<処理中にエラー発生>"
} finally {
// 処理終了待機を解除
shell.KeepRunning = false;
}
}

// Shift キーが長押しされた場合はリクエスト中止フラグを立てる
async function abortRequest() {
const VIRTUAL_KEY_CODE_SHIFT = 0x10; // Shift キーの仮想キーコード
let pressCount = 0;
while (!requestCompletedFlg) {
await new Promise(resolve => setTimeout(resolve, 300));
if (shell.GetKeyState(VIRTUAL_KEY_CODE_SHIFT) < 0) {
pressCount++;
if (pressCount > 2) {
abortRequestFlg = true;
return;
}
}
}
}

async function callGeminiAPI(apiKey, promptText, isTemplate) {
const controller = new AbortController();
const signal = controller.signal;
try {
// fetch で Gemini API にリクエスト
const requestBody = {
contents: createGeminiRequest(promptText, isTemplate),
system_instruction: buildSystemInstruction(),
generationConfig: GENERATION_CONFIG,
};
if (isTemplate) {
// テンプレートの場合は応答を決定論的にする
// テンプレート以外の場合はデフォルト値とするために指定しない
requestBody.generationConfig.temperature = TEMPERATURE_TEMPLATE;
}
const response = await fetch(`https://generativelanguage.googleapis.com/v1beta/${AI_MODEL}:streamGenerateContent?alt=sse&key=${apiKey}`, {
signal: signal,
method: 'POST',
headers: {
'Content-Type': 'application/json',
},
body: JSON.stringify(requestBody),
});

let buffer = "";
let responseAll = "";
let usageText = "";
const reader = response.body.getReader();
const decoder = new TextDecoder('utf-8');
while (true) {
// リクエスト中止フラグが立っている場合は中断
if (abortRequestFlg) {
controller.abort();
sel.Text = "<処理を中止>";
return null;
}

const { done, value } = await reader.read();
if (done) {
// 最後に残ったバッファを処理
if (buffer.trim().length > 0) {
// 最後の不完全なJSONを処理（可能であれば）
try {
const lastLine = buffer.trim().replace(/^data:\s*/, '');
if (lastLine) {
const processedData = processLine(lastLine, responseAll);
if (processedData) {
sel.Text = processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
}
}
} catch (e) {
console.log("不完全なJSONの処理でエラー: " + e.message);
}
}
break;
}

// 受信したバイナリデータ (value) をテキストに変換する
const text = decoder.decode(value);

// 前回のバッファと今回のテキストを結合
const combinedText = buffer + text;

// 完全な行を探す（最後の改行の位置を見つける）
const lastNewlineIndex = combinedText.lastIndexOf('\n');

if (lastNewlineIndex === -1) {
// 改行がない場合は全てバッファに保存
buffer = combinedText;
continue;
}

// 完全な行を処理
const completeText = combinedText.substring(0, lastNewlineIndex);
// 残りをバッファに保存
buffer = combinedText.substring(lastNewlineIndex + 1);

// テキストには複数のメッセージが含まれている可能性があるため、
// 改行 (LF) で分離して、1 行ずつ処理する
const lines = completeText.trim().split(/\n+/);

let inputText = "";
for (const line of lines) {
// HACK 空行が渡ってくることがあるので trim() を入れる
const json_text = line.trim().replace(/^data:\s*/, '');
// データがない場合はスキップ
if (!json_text) {
continue;
}
const processedData = processLine(json_text, responseAll);
if (processedData) {
inputText += processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
} else if (processedData === null) {
// JSONパースエラーが発生した場合は、バッファをクリアして終了
buffer = "";
inputText = "JSONパースに失敗\n" + completeText;
break;
}
}

if (inputText.length > 0) {
// 上記までで数文字まとまって取得されるので、まとめて入力
sel.Text = inputText;
}
// 入力遅延を入れる
await new Promise(resolve => setTimeout(resolve, INPUT_DELAY));
}

if (usageText) {
sel.Text = (responseAll.slice(-1) === "\n" ? "\n" : "\n\n") + `(${usageText})`;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0 && !isTemplate && responseAll.length > 0) {
appendReturnTextToTag(promptText, responseAll);
}
} catch (e) {
controller.abort();
throw e;
} finally {
requestCompletedFlg = true;
}
}

// 一行を処理する関数を分離して再利用可能にする
function processLine(json_text, responseAll) {
try {
const data = JSON.parse(json_text);
const candidate = data.candidates[0];
let updatedResponseAll = responseAll;

// まとまった文字数で入力する
const response = candidate.content.parts[0].text
let inputText = formatGeminiResponse(response, responseAll.slice(-5));
if (inputText) {
updatedResponseAll += inputText;
}

// 応答が終了した場合はループを抜ける
let usageText = "";
if (candidate.finishReason === "STOP") {
const usage = data.usageMetadata;
usageText = "利用トークン数: プロンプト=" + usage.promptTokenCount
+ ", 応答=" + usage.candidatesTokenCount
+ ", 思考=" + usage.thoughtsTokenCount
+ ", 合計=" + usage.totalTokenCount;
}

return { inputText, usageText, responseAll: updatedResponseAll };
} catch (e) {
console.log("JSONパースエラー: " + e.message + ", データ: " + json_text);
return null;
}
}

// Geminiの応答には半角スペースが連続して含まれることがあるため、整形する
function formatGeminiResponse(response, lastFiveChars) {
let formattedResponse = response
.replace(/([。！？]) +/g, "$1")
.replace(/([*:.]) {2,}/g, "$1 ");

const joinedLastFiveChars = lastFiveChars + formattedResponse;
if (joinedLastFiveChars.match(/([。！？]) +/)) {
formattedResponse = formattedResponse.replace(/^ +/, "");
}
if (joinedLastFiveChars.match(/([*:.]) {2,}/)) {
if (lastFiveChars.slice(-1) === " ") {
formattedResponse = formattedResponse.replace(/^ +/, "");
} else {
formattedResponse = formattedResponse.replace(/^ +/, " ");
}
}

return formattedResponse
}

function roughTokenize(text) {
// 超適当なトークナイザ。トークン数をざっくりと多めに数える
// 空白文字・ハイフン・アンダースコア区切りの単語に分割して、
// 単語がアルファベットのみ、数字のみの場合には 4文字=1トークンとして数える。
// 単語にアルファベット以外の文字が含まれる場合は 1文字=1トークンとして数える。
return text
.split(/[\s\-_]+/)
.map(w => /^[a-zA-Z]+$|^[0-9]+$|/.test(w) ? Math.ceil(w.length / 4) : w.length)
.reduce((a, b) => a + b, 0);
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText, isTemplate) {
// テンプレートの場合は、会話履歴とカスタムインストラクションを反映しない
if (isTemplate) {
return [createRoleAndParts("user", promptText)];
}

const tag = doc.Tag;

// 以前の会話が存在しない場合は新規リクエスト
if (!tag.exists(HISTORY_TAG)) {
const roleAndParts = [createRoleAndParts("user", promptText)];
return roleAndParts
}

// 会話履歴が存在する場合は、履歴を含めてリクエスト
const roleAndParts = JSON.parse(tag[HISTORY_TAG]);
roleAndParts.push(createRoleAndParts("user", promptText));
return roleAndParts;
}

function createRoleAndParts(role, text) {
return {
"role": role,
"parts": [
{
"text": text
}
]
};
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
const tag = doc.Tag;
if (!tag.exists(HISTORY_TAG)) {
tag[HISTORY_TAG] = JSON.stringify([
createRoleAndParts("user", userText),
createRoleAndParts("model", modelText)
]);
} else {
const geminiText = JSON.parse(tag[HISTORY_TAG]);
geminiText.push(createRoleAndParts("user", userText));
geminiText.push(createRoleAndParts("model", modelText));
// 会話セット (user, model 1往復) が特定セット数を超えた場合、最初のセットを削除
if (geminiText.length > HISTORY_SIZE * 2) {
geminiText.splice(0, 2);
}
// 会話履歴全体が MAX_HISTORY_TOKEN を超えた場合、最初のセットを削除
let joinedText = geminiText.map(e => e.parts[0].text).join("\n");
while (roughTokenize(joinedText) > MAX_HISTORY_TOKEN) {
geminiText.splice(0, 2);
joinedText = geminiText.map(e => e.parts[0].text).join("\n");
}

tag[HISTORY_TAG] = JSON.stringify(geminiText);
}
}

function buildSystemInstruction() {
let customInstruction = getTemporaryCustomInstruction();
const language = LANGUAGE.trim();

customInstruction = customInstruction.replace(/^[\s　]+|[\s　]+$/g, "");

return {
parts: {
text: "Do not hallucinate. If you are unsure or don't have enough information to answer with confidence, say \"I don't know\" or \"I'm not sure.\"\n"
+ (customInstruction ? `${customInstruction}\n` : "")
+ (language ? `Respond in ${language}.\n` : "")
}
}
}

function getTemporaryCustomInstruction() {
const tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag[TEMPORARY_CUSTOM_INSTRUCTION_TAG];
} else {
return "";
}
}
</syntaxhighlight>

=== 従来エンジン版 (アーカイブ) ===

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
var HISTORY_SIZE = 5;

// コンテキストメニュー番号
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;

var ConsoleClass = function () {
this.log = function (str) {
outputBar.Writeln(str)
}
}
var console = new ConsoleClass();

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty
var beforeScrollY = ScrollY;

// プロンプトの取得
var promptText = "";
var promptLength = 0;
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
promptText = sel.Text.trim();
promptLength = sel.TextLength;
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
var menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === 2) {
resetTag();
return;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}
// 文字数が多すぎる場合はエラー
if (promptLength > 10000) {
alert("プロンプトの文字数が多すぎます。10000 文字以下にしてください。");
return;
}
// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
var activeY = sel.GetActivePointY(mePosLogical);

// Gemini API に問い合わせ
doc.ReadOnly = true;
var ret = callGeminiAPI(promptText);
doc.ReadOnly = false;

// 結果を表示
sel.Text = "\n---\n\n" + ret + "\n\n---\n";

// 位置調整
sel.SetActivePoint(
mePosLogical,
1,
activeY,
false
)
if (beforeScrollY + 2 < ScrollY) {
ScrollY = ScrollY - 1;
}
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
if (selectionIsEmpty) {
menu.Add("アクティブ行の内容で相談 (&Q)", EXECUTE_AI);
} else {
menu.Add("選択範囲の内容で相談 (&Q)", EXECUTE_AI);
}
if (document.Tag.exists("gemini-text")) {
var turn = JSON.parse(document.Tag("gemini-text")).length / 2;
menu.Add("会話履歴をリセット (現在の会話数: " + turn + ") (&R)", RESET_HISTORY);
}
return menu;
}

function callGeminiAPI(promptText) {
try {
// APIキーの取得
var gemini_api_key = shell.getEnv("GOOGLE_API_KEY");

var http = new ActiveXObject("Msxml2.ServerXMLHTTP");
var url = 'https://generativelanguage.googleapis.com/v1beta/models/gemini-1.5-flash-latest:generateContent?key=' + gemini_api_key;

http.open('POST', url, true);
http.setRequestHeader('Content-Type', 'application/json');
http.send('{"contents":' + createGeminiRequest(promptText) + '}');

// 応答待機
var timeout = 60;
var retrySec = 0;
var startX = sel.GetActivePointX(mePosLogical);
var prevPos = sel.GetActivePos();
while (http.readyState != 4) {
if (retrySec > timeout) {
break;
}
http.waitForResponse(1);
retrySec += 1;
inputProgressChar(prevPos);
prevPos = sel.GetActivePos();
}
// 進捗表示文字を削除
sel.SetActivePoint(
mePosLogical,
startX,
sel.GetActivePointY(mePosLogical),
true
);
sel.Delete();

var ret = "";

// 応答ステータスチェック
if (http.readyState == 4 && http.status == 200) {
// JSONをパースして必要なテキストを抽出
var response = JSON.parse(http.responseText);
if (response.candidates && response.candidates.length > 0) {
response.candidates.forEach(function (candidate) {
if (candidate.content && candidate.content.parts) {
candidate.content.parts.forEach(function (part) {
if (part.text) {
ret += part.text;
}
});
}
});
}
} else {
var ret = "エラーが発生しました: " + http.status + " " + http.statusText
http.abort();
return ret;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0) {
appendReturnTextToTag(promptText, ret);
}

// 整形しつつ返す
return ret
.trim()
.replace(/([。！？]) +/g, "$1")
.replace(/\* +/g, "* ");
} catch (e) {
console.log(e.stack);
return "エラーが発生しました: " + e.message;
}
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText) {
var tag = document.Tag;
// 以前の会話が存在しない場合
if (!tag.exists("gemini-text")) {
return JSON.stringify([{ "parts": [{ "text": promptText }] }]);
}

var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": promptText }]
});
return JSON.stringify(geminiText);
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
var tag = document.Tag;
if (!tag.exists("gemini-text")) {
tag("gemini-text") = JSON.stringify([
{
"role": "user",
"parts": [{ "text": userText }]
},
{
"role": "model",
"parts": [{ "text": modelText }]
}
]);
} else {
var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": userText }]
});
geminiText.push({
"role": "model",
"parts": [{ "text": modelText }]
});
// 会話セット (user, model 1往復) が5セットを超えた場合、最初のセットを削除
while (geminiText.length > HISTORY_SIZE * 2) {
geminiText.shift();
}
tag("gemini-text") = JSON.stringify(geminiText);
}
}

function resetTag() {
if (document.Tag.exists("gemini-text")) {
document.Tag.remove("gemini-text");
}
}

function inputProgressChar(pos) {
doc.ReadOnly = false;
sel.SetActivePos(pos);
sel.Text = ".";
doc.ReadOnly = true;
}
</syntaxhighlight>

== 更新履歴 ==

* 2025-06-18 利用する生成AIモデルを gemini-2.5-flash-lite-preview-06-17 に差し替えた。読み込む環境変数を「GEMINI_API_KEY」に変更した。
* 2025-02-16 利用する生成AIモデルを gemini-2.0-flash に差し替えた。カスタムインストラクションにハルシネーション抑制の指示を加えた。プロンプトに渡す文字数制限方式を調整。Geminiからの応答に句読点などの区切りの後ろに半角スペースを2,3個連続で付いてくる場合があるので、できるだけ削除して入力するようにした。処理されたトークン数を出力するようにした。
* 2024-12-22 V8エンジン版を追加。それに伴い従来エンジン版はアーカイブ化
* 2024-12-18 会話履歴の保持方式をJSON文字列に変更。リクエスト確認のポップアップ表示をコンテキストメニュー表示に変更。同メニューに会話履歴リセット機能を追加
* 2024-11-28 文書内で初回実行する際、「"」が含まれるとエラーになってしまう事象に対処
* 2024-11-27 サンプルマクロ [[Google Gemini で執筆支援]] の仕様に合わせ、環境変数「GOOGLE_API_KEY」からAPIキーを取得するように変更。これに合わせてMeryの動作バージョンを Ver 3.7.8 以上に変更
* 2024-11-17 初版

Google Gemini に相談

2025-06-18T12:47:11Z

Yuko:

== 概要 ==

Googleの生成AIである「Gemini」を利用するためのMeryマクロです。

後述のソースコードではV8エンジンで動作するものと従来版スクリプトエンジンで動作するものの2種類を掲載していますが、従来版のものはアーカイブです。特段の理由がない限りはV8エンジン版をご利用ください。

【主な機能】

* Google Gemini APIを利用して生成AIと対話できるMery用のマクロ
* 選択したテキストやアクティブな行の内容について生成AIに質問・相談が可能
* 会話履歴を保持し、文脈を考慮した対話が可能

【特徴的な機能】

'''会話履歴機能''':

* 事前の設定数に応じた会話履歴を保持
* 履歴のクリアが可能

これにより、会話の文脈を考慮した回答を得られます。

'''カスタムインストラクション''':

* AIの応答方針を設定可能
* 一時的なカスタム指示の保存と変更が可能

'''プロンプトテンプレート''':

* 誤字脱字チェック
* 日本語翻訳
* コードの最適化、生成

など、定型的な質問を簡単に実行できます。
※テンプレート機能では回答を安定させるため、前述の会話履歴を文脈に含みません。

テンプレートは自身の使い方に合わせて好きに追加、削除ができます。詳細はソースコード内の「PROMPT_TEMPLATE」定数のコメントを参照。

'''生成AIチャット風仕様''':

* ストリーミングモードでリアルタイムに1文字ずつMeryに入力されていく
* Shiftキー長押しで、テキスト生成を中断できる

== 注意事項 (必ず読んでからご利用ください) ==

* 本マクロでは 2024/11/17 時点で無料利用ができるGemini APIを利用します。今後、Googleの改定により有償になったり、設定誤り等で費用が発生しても、作者は一切の責任を負いません。
* Gemini APIではその特性上、プロンプトとして送信した文字列がAIの学習に使われるものと思われます。くれぐれも機密情報やプライバシーに関わる情報を指定しないように注意してください。
* Gemini APIは、 [https://ai.google.dev/gemini-api/terms?hl=ja Gemini API利用規約] に則ってご利用ください。

== 利用前提 ==

* Mery Ver 3.7.17 以上
* Google AI Studioで、Gemini APIキーを取得していること (参考 [https://ai.google.dev/gemini-api/docs/api-key?hl=ja API キーを取得する | Gemini API | Google AI for Developers])

== 利用方法 ==

* 環境変数の設定
:コマンドプロンプトで以下のコマンドを実行し、環境変数を設定してください。
<syntaxhighlight lang="bat">
setx GEMINI_API_KEY "***************************************"
</syntaxhighlight>
:設定後、Mery または Windows の再起動が必要な場合があります。
* マクロの実行
**プロンプトにしたい文字列を選択してマクロを実行すると、選択したテキストがプロンプトとしてGemini APIに送信され、応答がエディタに表示されます。
* 会話の履歴数を調整
** 会話の履歴は設定した個数分が保持され、文脈として利用されます。適宜、ソースコード内の「HISTORY_SIZE」の数を調整してください。
** ※数を増やすほど会話内容を保持して文脈を理解するようになりますが、メモリ使用量が増えたり動作が重くなる可能性があります。
** ※開いている文書ごとに履歴を保持します。文脈をリセットしたいときは、新しい文書を開いて会話をやり直してください。

== ソースコード ==

=== V8エンジン版 ===

このマクロは、editor.ExecuteMacro メソッドを使う兼ね合いで2つのマクロファイルに分かれています。

(1) Meryに登録するマクロ (ファイル名は任意)

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// カスタムインストラクション
// これを設定することで、生成AIの回答全体への生成方針を指示できます。
// 例えば "あなたは侍で名前は権兵衛です。回答をござる口調にしてください" と設定すると、AIの回答がござる口調になります。
// 何も指示しない場合は、空文字 "" を設定してください。
const DEFAULT_CUSTOM_INSTRUCTION = "";

// プロンプトテンプレート
// プロンプトテンプレートを設定することで、AIに対して特定の指示を出すことができます。
// プロンプトテンプレートでの生成は会話履歴とカスタムインストラクションを反映しません。
// テンプレートは以下の { ～ }, で囲まれたブロックを好きに増減させて利用できます。
var PROMPT_TEMPLATE = [
// 以下はサンプルです。1階層メニューと2階層メニューが利用できます。
// {
// "title": "要約",
// "prompt": "以下の文章を要約してください。"
// },
// {
// "submenu_title": "翻訳系",
// "submenu": [
// {
// "title": "日本語翻訳",
// "prompt": "以下の文章を日本語に翻訳してください。"
// },
// {
// "title": "英語翻訳",
// "prompt": "以下の文章を英語に翻訳してください。"
// },
// ]
// },

{
"submenu_title": "理解を深める",
"submenu": [
{
"title": "論点を整理する",
"prompt": "以下の論点を整理して。"
},
{
"title": "論理の抜け漏れを探す",
"prompt": "以下の論点を整理し、忖度せずに鋭く、論理の抜け漏れを抽出して。そして、そこから発生する可能性のあるリスクも教えて。"
},
{
"title": "要約する",
"prompt": "要約して。専門的な用語と思われる単語は簡単に解説も入れて。"
},
{
"title": "物語対話形式で教えて",
"prompt": "以下の内容について物語対話形式で教えてください。"
},
]
},
{
"submenu_title": "翻訳する",
"submenu": [
{
"title": "日本語に翻訳",
"prompt": "以下の文章を日本語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[訳]\n翻訳文...\n"
},
{
"title": "英語に翻訳",
"prompt": "以下の文章を英語に翻訳してください。\n"
+ "出力形式は以下にすること:\n[Translation]\n翻訳文...\n"
},
{
"title": "英語->日本語スラッシュリーディング翻訳",
"prompt": "以下の英文を日本語にスラッシュリーディング形式で翻訳してください。\n\n"
+ "条件:\n"
+ "- 英文の各フレーズをスラッシュ(/)で区切って表示\n"
+ "- 各フレーズの日本語訳を括弧()内に併記\n"
+ "- 文の終わりはダブルスラッシュ(//)で表示\n"
+ "- 英語の語順に従って日本語訳を行う\n"
+ "- 日本語訳は自然な日本語である必要はなく、英語の語順を反映した直訳調で構わない\n"
+ "- 主語が省略されている場合は補って翻訳すること\n"
+ "- 一般的な英文で頻出する表現がある場合は次の行に記載\n"
+ "- 以下の出力例のように <英文> (日本語訳) / ... とスラッシュ区切りの繰り返しになる \n\n"
+ "出力例:\n"
+ "Snowstorms are forecast (暴風雪が予報されている) / to hit the Sea of Japan coasts (日本海沿岸を襲うと) / of northern to eastern Japan (北部から東部の) / from Sunday through Monday. (日曜から月曜にかけて。) //\n"
+ "【頻出表現】\n"
+ "- be forecast to: ～すると予報されている\n"
},
]
},
{
"submenu_title": "プログラミング支援",
"submenu": [
{
"title": "コードを洗練させる",
"prompt": "以下のコードを洗練させてください"
},
{
"title": "コードをレビューする",
"prompt": "以下のコードをセキュリティと保守性の観点でレビューしてください"
},
{
"title": "エラーログをデバッグする",
"prompt": "以下のエラーログを解析し、考えられる原因と対策を提示してください"
},
{
"title": "SQLクエリを最適化する",
"prompt": "以下のSQL文を最適化してください"
},
{
"title": "PowerShell スクリプトを書く",
"prompt": "以下の処理を行うPowerShellスクリプトを生成してください"
},
{
"title": "Shell Script を書く",
"prompt": "以下の処理を行うShell Scriptを生成してください"
},
{
"title": "Linux コマンドを提案",
"prompt": "あなたはLinuxエキスパートとして、以下のLinuxコマンドを提案してください。\n\n"
+ "制約条件:\n"
+ "- 多数のディストリビューションで採用されているメジャーなコマンドを使用し、ポータブルな実装にすること\n"
+ "- bashでの実行を前提にすること\n"
+ "- 可能な限りシンプルな実装にすること\n\n"
+ "期待する出力:\n"
+ "- コマンドの具体的な実装方法\n"
+ "- 各コマンドの動作説明\n"
+ "- 制限事項\n"
},
]
},
{
"submenu_title": "ビジネス文書作成支援",
"submenu": [
{
"title": "誤字脱字、不正確な表現をチェック",
"prompt": "以下の2つのカテゴリーで問題点を指摘してください\n"
+ "- 【誤字脱字】：明確な誤字脱字および誤字の疑いがある箇所\n"
+ "- 【不正確・曖昧な表現】：解釈に個人差が生じる可能性がある表現、より適切な表現に改善できる箇所"
},
{
"title": "提案書を作成する",
"prompt": "以下に対する対する提案書を、コスト・実現性・リスクを含めて作成してください"
},
{
"title": "仕様書のアウトラインを作成する",
"prompt": "以下の内容で仕様書のアウトラインを作成してください"
},
{
"title": "手順書のアウトラインを作成する",
"prompt": "以下の作業を行う手順書を、前提条件と注意事項を含めてアウトラインを作成してください"
},
{
"title": "ユーザーマニュアルのアウトラインを作成する",
"prompt": "以下の機能内容から、ユーザー向けマニュアルのアウトラインを作成してください"
},
{
"title": "議事録を作成する",
"prompt": "以下の会議内容から議事録を作成してください"
},
{
"title": "進捗報告書を作成する",
"prompt": "以下のタスク状況から進捗報告書を作成してください"
},
]
},
{
"submenu_title": "分析支援",
"submenu": [
{
"title": "問題を分析し、課題を抽出する",
"prompt": "以下の状況から問題や潜在的リスクを分析し、課題を抽出してください"
},
{
"title": "対応策を提案する",
"prompt": "以下の問題・課題に対する対応策を複数提案してください"
},
{
"title": "傾向を見つける",
"prompt": "以下の内容から、数値や挙動上の傾向を見つけてください"
},
]
},
{
"submenu_title": "アイデア出し",
"submenu": [
{
"title": "SCAMPER法でブレインストーミング",
"prompt": "以下のテーマについて、SCAMPER法を使って15個のアイデアを出してください。制約条件は以下の通りです："
},
{
"title": "解決策の幅出し",
"prompt": "以下の課題に対して、技術面、運用面、コスト面から実現可能な解決策を5つずつ提案してください"
},
{
"title": "業務改善案の提案",
"prompt": "以下の既存プロセスについて、効率化、コスト削減、品質向上の観点から改善案を提案してください"
},
{
"title": "逆転の発想",
"prompt": "以下の目標に対して、通常とは逆の視点からアプローチする方法を3つ提案してください"
},
{
"title": "競合分析からの着想",
"prompt": "以下の内容について、業界における競合他社の特徴を分析し、差別化できる新しいアプローチを提案してください"
},
{
"title": "ユースケースの列挙",
"prompt": "以下の製品・サービスについて、想定されるユースケースを10個列挙し、それぞれの価値提案を記載してください"
},
]
},
]

// コンテキストメニュー番号の定義
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;
var SET_CUSTOM_INSTRUCTION = 3;
var REEXECUTE_LAST_TEMPLATE_PROMPT = 4;
var TEMPLATE_PROMPT_THRESHOLD = 10;
var TEMPLATE_PROMPT_SUBMENU_THRESHOLD = 1000;

// タグ名の定義
var HISTORY_TAG = "gemini-history";
var TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
var PREVIOUS_TEMPLATE_PROMPT_ID_TAG = "gemini-previous-template-prompt";
var SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// console.log に出力する内容を Mery のアウトプットバーに表示する
var console = {
log: function (str) {
outputBar.Writeln(str)
}
}

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty

// プロンプトの取得
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
var promptLength = sel.TextLength;
var menuTrack = 0
while (true) {
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === RESET_HISTORY) {
resetTag();
continue;
}

// カスタムインストラクションの設定
if (menuTrack === SET_CUSTOM_INSTRUCTION) {
configureTemporaryCustomInstruction();
return;
}

break;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}

// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// 直前に実行したプロンプトテンプレートの再実行の場合、menuTrack を書き換え
if (menuTrack === REEXECUTE_LAST_TEMPLATE_PROMPT) {
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menuTrack = Number(doc.Tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG));
} else {
alert("直前に実行したプロンプトテンプレートがありません。");
return;
}
}

// テンプレートを取得
var isTemplate = menuTrack >= TEMPLATE_PROMPT_THRESHOLD;
var isSubmenu = menuTrack >= TEMPLATE_PROMPT_SUBMENU_THRESHOLD;
if (isSubmenu) {
var parentMenuTrack = Number(String(menuTrack).slice(0, 2));
var subMenuTrack = Number(String(menuTrack).slice(2));
var templatePrompt = PROMPT_TEMPLATE[parentMenuTrack - TEMPLATE_PROMPT_THRESHOLD].submenu[subMenuTrack].prompt;
} else if (isTemplate) {
var templatePrompt = PROMPT_TEMPLATE[menuTrack - TEMPLATE_PROMPT_THRESHOLD].prompt;
}

// テンプレートの場合は直前に実行したプロンプトテンプレートの番号としてタグに保存
if (isTemplate) {
doc.Tag(SELECTED_TEMPLATE_PROMPT_TAG) = templatePrompt;
doc.tag(PREVIOUS_TEMPLATE_PROMPT_ID_TAG) = menuTrack
} else {
// テンプレート以外の場合はタグを削除
if (doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG)) {
doc.Tag.remove(SELECTED_TEMPLATE_PROMPT_TAG);
}
}

// Gemini API 呼び出し部品を実行
// V8版で fetch メソッドを使うために別呼び出しとする
doc.Tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = getTemporaryCustomInstruction() ? getTemporaryCustomInstruction() : DEFAULT_CUSTOM_INSTRUCTION;
editor.ExecuteMacro("call_gemini_api.js");
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
var t = "";
if (selectionIsEmpty) {
t = "アクティブ行の内容で相談 (&A)";
} else {
t = "選択範囲の内容で相談 (&A)";
}
menu.Add(t, EXECUTE_AI);
if (doc.Tag.exists(HISTORY_TAG)) {
var turn = JSON.parse(String(doc.Tag(HISTORY_TAG)).replace(/\n/g, "")).length / 2;
menu.Add("├ 会話履歴をクリア (現在の会話数: " + turn + ") (&C)", RESET_HISTORY);
} else {
menu.Add("├ 会話履歴をクリア (現在の会話数: 0) (&C)", RESET_HISTORY, meMenuGrayed);
}
menu.Add("└ カスタムインストラクションを変更 (&I)", SET_CUSTOM_INSTRUCTION);

// テンプレート数チェック
// 2桁まで許容
var ITEMS_MUX = 99;
if (PROMPT_TEMPLATE.length > ITEMS_MUX - TEMPLATE_PROMPT_THRESHOLD) {
throw new Error("プロンプトテンプレートの数が多すぎます。");
}

// テンプレートの追加
if (PROMPT_TEMPLATE.length > 0) {
var subMenu = CreatePopupMenu();
for (var i = 0; i < PROMPT_TEMPLATE.length; i++) {
var accelerationKey = "";
if (i === 9) {
accelerationKey = " (&0)";
} else if (i < 10) {
accelerationKey = " (&" + (i + 1) + ")";
}
var menuNum = TEMPLATE_PROMPT_THRESHOLD + i;
if (PROMPT_TEMPLATE[i].submenu) {
var subMenuList = PROMPT_TEMPLATE[i].submenu;
// テンプレート数チェック
if (subMenuList.length > ITEMS_MUX) {
throw new Error("プロンプトテンプレート (サブメニュー) の数が多すぎます。");
}
var subSubMenu = CreatePopupMenu();
var subMenuPrefix = String(menuNum);
for (var j = 0; j < subMenuList.length; j++) {
var subAccelerationKey = "";
if (j === 9) {
subAccelerationKey = " (&0)";
} else if (j < 10) {
subAccelerationKey = " (&" + (j + 1) + ")";
}
var subMenuNum = Number(subMenuPrefix + ("0" + j).slice(-2));
subSubMenu.Add(subMenuList[j].title + subAccelerationKey, subMenuNum);
}
subMenu.AddPopup(PROMPT_TEMPLATE[i].submenu_title + accelerationKey, subSubMenu);
} else {
subMenu.Add(PROMPT_TEMPLATE[i].title + accelerationKey, menuNum);
}
}
if (selectionIsEmpty) {
t = "プロンプトテンプレート (対象: アクティブ行) (&T)";
} else {
t = "プロンプトテンプレート (対象: 選択範囲) (&T)";
}
menu.AddPopup(t, subMenu);

t = "└ 直前に実行したプロンプトテンプレートを再実行 (&R)";
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_ID_TAG)) {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT);
} else {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT, meMenuGrayed);
}
}

return menu;
}

function configureTemporaryCustomInstruction() {
let tempCustomInstruction = getTemporaryCustomInstruction();
const prompt = Prompt("カスタムインストラクションを変更 ※変更すると会話履歴がリセットされます", tempCustomInstruction ? tempCustomInstruction : DEFAULT_CUSTOM_INSTRUCTION);
if (prompt !== null) {
if (prompt === DEFAULT_CUSTOM_INSTRUCTION) {
// デフォルトと同じ値の場合はタグを削除
setTemporaryCustomInstruction("");
} else if (prompt === "" && Confirm("カスタムインストラクションをデフォルトに戻しますか？")) {
setTemporaryCustomInstruction("");
} else if (prompt !== tempCustomInstruction) {
// デフォルト以外の値が設定された場合は保存
setTemporaryCustomInstruction(prompt);
}
}

// 変更が加わっている場合は会話履歴をリセット
if (tempCustomInstruction !== getTemporaryCustomInstruction()) {
resetTag();
}
}

function resetTag() {
const tag = doc.Tag;
if (tag.exists(HISTORY_TAG)) {
tag.remove(HISTORY_TAG);
}
}

function getTemporaryCustomInstruction() {
var tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
} else {
return "";
}
}

function setTemporaryCustomInstruction(temporaryCustomInstruction) {
var tag = doc.Tag;
if (temporaryCustomInstruction) {
tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = temporaryCustomInstruction;
} else {
tag.remove(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
}
}
</syntaxhighlight>

(2) (1)のマクロから呼び出されるマクロ '''※ファイル名は「call_gemini_api.js」とすること'''

<syntaxhighlight lang="javascript">
#language = "v8"
#title = "Gemini に相談 (API 呼び出し部品)"
BeginUndoGroup();

// 生成AIの回答の言語設定
// "Japanese" や "English" を設定できます。他の言語は未検証。
// 自動設定にする場合は空文字 "" を設定してください。
const LANGUAGE = "Japanese";

// 入力プロンプトの最大トークン数
// 超適当なトークナイザー関数により計測し、英単語は4文字1トークン、それ以外は1文字1トークンとして数えます。
const MAX_PROMPT_TOKEN = 8000;

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 使用トークン数が増えて動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
const HISTORY_SIZE = 0;

// 会話履歴に保持する最大トークン数
// 会話履歴のトークン数がこの数を超える場合、古い履歴から削除されます。
const MAX_HISTORY_TOKEN = 270000;

// 生成AI応答の入力毎の遅延時間 (ミリ秒)
// 入力をゆっくりにしたいときは数字を大きくしてください。
const INPUT_DELAY = 25;

// 利用する生成AIのモデル
// const AI_MODEL = "models/gemini-2.5-flash-preview-04-17";
const AI_MODEL = "models/gemini-2.5-flash-lite-preview-06-17";

// 生成AIのリクエストパラメータ
const GENERATION_CONFIG = {
max_output_tokens: 6000,
temperature: 0.65,
thinkingConfig: {
includeThoughts: false,
thinkingBudget: 1000
}
};

// テンプレート利用の場合のtemperature
const TEMPERATURE_TEMPLATE = 0.25;

// タグ名の定義
const HISTORY_TAG = "gemini-history";
const TEMPORARY_CUSTOM_INSTRUCTION_TAG = "gemini-temporary-custom-instruction";
const SELECTED_TEMPLATE_PROMPT_TAG = "gemini-selected-template-prompt";

// console.log に出力する内容を Mery のアウトプットバーに表示する
const console = {
log: function (str) {
outputBar.Writeln(str)
}
}

const doc = document;
const sel = document.selection;

// 生成リクエスト中止フラグ
let abortRequestFlg = false
// 生成リクエスト完了フラグ;
let requestCompletedFlg = false;

main();

async function main() {
let promptText = sel.Text.trim();

// 文字数が多すぎる場合はエラー
if (roughTokenize(promptText) > MAX_PROMPT_TOKEN) {
alert("プロンプトの文字数が多すぎます。文字数を少なくしてください。");
return;
}

// テンプレートの場合はプロンプトを変更
const isTemplate = doc.Tag.exists(SELECTED_TEMPLATE_PROMPT_TAG);
if (isTemplate) {
promptText = "# **指示**:\n\n"
+ doc.Tag[SELECTED_TEMPLATE_PROMPT_TAG]
+ "\n\n# **入力テキスト**:\n\n"
+ promptText;
}

try {
// 処理終了を待機
shell.KeepRunning = true;

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
sel.Text = "\n---\n\n"

document.KeepScrollPos = true;

// APIキーの取得
const apiKey = shell.getEnv("GEMINI_API_KEY");

// Gemini API に問い合わせ
await Promise.all([
callGeminiAPI(apiKey, promptText, isTemplate),
abortRequest()
]);
if (sel.GetActivePointX(mePosLogical) > 2) {
sel.Text = "\n\n---\n\n\n"
} else {
sel.Text = "\n---\n\n\n"
}
} catch (e) {
console.log("エラーが発生しました: " + e.message + "\n" + e.stack);
sel.Text = "<処理中にエラー発生>"
} finally {
// 処理終了待機を解除
shell.KeepRunning = false;
}
}

// Shift キーが長押しされた場合はリクエスト中止フラグを立てる
async function abortRequest() {
const VIRTUAL_KEY_CODE_SHIFT = 0x10; // Shift キーの仮想キーコード
let pressCount = 0;
while (!requestCompletedFlg) {
await new Promise(resolve => setTimeout(resolve, 300));
if (shell.GetKeyState(VIRTUAL_KEY_CODE_SHIFT) < 0) {
pressCount++;
if (pressCount > 2) {
abortRequestFlg = true;
return;
}
}
}
}

async function callGeminiAPI(apiKey, promptText, isTemplate) {
const controller = new AbortController();
const signal = controller.signal;
try {
// fetch で Gemini API にリクエスト
const requestBody = {
contents: createGeminiRequest(promptText, isTemplate),
system_instruction: buildSystemInstruction(),
generationConfig: GENERATION_CONFIG,
};
if (isTemplate) {
// テンプレートの場合は応答を決定論的にする
// テンプレート以外の場合はデフォルト値とするために指定しない
requestBody.generationConfig.temperature = TEMPERATURE_TEMPLATE;
}
const response = await fetch(`https://generativelanguage.googleapis.com/v1beta/${AI_MODEL}:streamGenerateContent?alt=sse&key=${apiKey}`, {
signal: signal,
method: 'POST',
headers: {
'Content-Type': 'application/json',
},
body: JSON.stringify(requestBody),
});

let buffer = "";
let responseAll = "";
let usageText = "";
const reader = response.body.getReader();
const decoder = new TextDecoder('utf-8');
while (true) {
// リクエスト中止フラグが立っている場合は中断
if (abortRequestFlg) {
controller.abort();
sel.Text = "<処理を中止>";
return null;
}

const { done, value } = await reader.read();
if (done) {
// 最後に残ったバッファを処理
if (buffer.trim().length > 0) {
// 最後の不完全なJSONを処理（可能であれば）
try {
const lastLine = buffer.trim().replace(/^data:\s*/, '');
if (lastLine) {
const processedData = processLine(lastLine, responseAll);
if (processedData) {
sel.Text = processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
}
}
} catch (e) {
console.log("不完全なJSONの処理でエラー: " + e.message);
}
}
break;
}

// 受信したバイナリデータ (value) をテキストに変換する
const text = decoder.decode(value);

// 前回のバッファと今回のテキストを結合
const combinedText = buffer + text;

// 完全な行を探す（最後の改行の位置を見つける）
const lastNewlineIndex = combinedText.lastIndexOf('\n');

if (lastNewlineIndex === -1) {
// 改行がない場合は全てバッファに保存
buffer = combinedText;
continue;
}

// 完全な行を処理
const completeText = combinedText.substring(0, lastNewlineIndex);
// 残りをバッファに保存
buffer = combinedText.substring(lastNewlineIndex + 1);

// テキストには複数のメッセージが含まれている可能性があるため、
// 改行 (LF) で分離して、1 行ずつ処理する
const lines = completeText.trim().split(/\n+/);

let inputText = "";
for (const line of lines) {
// HACK 空行が渡ってくることがあるので trim() を入れる
const json_text = line.trim().replace(/^data:\s*/, '');
// データがない場合はスキップ
if (!json_text) {
continue;
}
const processedData = processLine(json_text, responseAll);
if (processedData) {
inputText += processedData.inputText || "";
usageText = processedData.usageText || "";
responseAll = processedData.responseAll || responseAll;
} else if (processedData === null) {
// JSONパースエラーが発生した場合は、バッファをクリアして終了
buffer = "";
inputText = "JSONパースに失敗\n" + completeText;
break;
}
}

if (inputText.length > 0) {
// 上記までで数文字まとまって取得されるので、まとめて入力
sel.Text = inputText;
}
// 入力遅延を入れる
await new Promise(resolve => setTimeout(resolve, INPUT_DELAY));
}

if (usageText) {
sel.Text = (responseAll.slice(-1) === "\n" ? "\n" : "\n\n") + `(${usageText})`;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0 && !isTemplate && responseAll.length > 0) {
appendReturnTextToTag(promptText, responseAll);
}
} catch (e) {
controller.abort();
throw e;
} finally {
requestCompletedFlg = true;
}
}

// 一行を処理する関数を分離して再利用可能にする
function processLine(json_text, responseAll) {
try {
const data = JSON.parse(json_text);
const candidate = data.candidates[0];
let updatedResponseAll = responseAll;

// まとまった文字数で入力する
const response = candidate.content.parts[0].text
let inputText = formatGeminiResponse(response, responseAll.slice(-5));
if (inputText) {
updatedResponseAll += inputText;
}

// 応答が終了した場合はループを抜ける
let usageText = "";
if (candidate.finishReason === "STOP") {
const usage = data.usageMetadata;
usageText = "利用トークン数: プロンプト=" + usage.promptTokenCount
+ ", 応答=" + usage.candidatesTokenCount
+ ", 思考=" + usage.thoughtsTokenCount
+ ", 合計=" + usage.totalTokenCount;
}

return { inputText, usageText, responseAll: updatedResponseAll };
} catch (e) {
console.log("JSONパースエラー: " + e.message + ", データ: " + json_text);
return null;
}
}

// Geminiの応答には半角スペースが連続して含まれることがあるため、整形する
function formatGeminiResponse(response, lastFiveChars) {
let formattedResponse = response
.replace(/([。！？]) +/g, "$1")
.replace(/([*:.]) {2,}/g, "$1 ");

const joinedLastFiveChars = lastFiveChars + formattedResponse;
if (joinedLastFiveChars.match(/([。！？]) +/)) {
formattedResponse = formattedResponse.replace(/^ +/, "");
}
if (joinedLastFiveChars.match(/([*:.]) {2,}/)) {
if (lastFiveChars.slice(-1) === " ") {
formattedResponse = formattedResponse.replace(/^ +/, "");
} else {
formattedResponse = formattedResponse.replace(/^ +/, " ");
}
}

return formattedResponse
}

function roughTokenize(text) {
// 超適当なトークナイザ。トークン数をざっくりと多めに数える
// 空白文字・ハイフン・アンダースコア区切りの単語に分割して、
// 単語がアルファベットのみ、数字のみの場合には 4文字=1トークンとして数える。
// 単語にアルファベット以外の文字が含まれる場合は 1文字=1トークンとして数える。
return text
.split(/[\s\-_]+/)
.map(w => /^[a-zA-Z]+$|^[0-9]+$|/.test(w) ? Math.ceil(w.length / 4) : w.length)
.reduce((a, b) => a + b, 0);
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText, isTemplate) {
// テンプレートの場合は、会話履歴とカスタムインストラクションを反映しない
if (isTemplate) {
return [createRoleAndParts("user", promptText)];
}

const tag = doc.Tag;

// 以前の会話が存在しない場合は新規リクエスト
if (!tag.exists(HISTORY_TAG)) {
const roleAndParts = [createRoleAndParts("user", promptText)];
return roleAndParts
}

// 会話履歴が存在する場合は、履歴を含めてリクエスト
const roleAndParts = JSON.parse(tag[HISTORY_TAG]);
roleAndParts.push(createRoleAndParts("user", promptText));
return roleAndParts;
}

function createRoleAndParts(role, text) {
return {
"role": role,
"parts": [
{
"text": text
}
]
};
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
const tag = doc.Tag;
if (!tag.exists(HISTORY_TAG)) {
tag[HISTORY_TAG] = JSON.stringify([
createRoleAndParts("user", userText),
createRoleAndParts("model", modelText)
]);
} else {
const geminiText = JSON.parse(tag[HISTORY_TAG]);
geminiText.push(createRoleAndParts("user", userText));
geminiText.push(createRoleAndParts("model", modelText));
// 会話セット (user, model 1往復) が特定セット数を超えた場合、最初のセットを削除
if (geminiText.length > HISTORY_SIZE * 2) {
geminiText.splice(0, 2);
}
// 会話履歴全体が MAX_HISTORY_TOKEN を超えた場合、最初のセットを削除
let joinedText = geminiText.map(e => e.parts[0].text).join("\n");
while (roughTokenize(joinedText) > MAX_HISTORY_TOKEN) {
geminiText.splice(0, 2);
joinedText = geminiText.map(e => e.parts[0].text).join("\n");
}

tag[HISTORY_TAG] = JSON.stringify(geminiText);
}
}

function buildSystemInstruction() {
let customInstruction = getTemporaryCustomInstruction();
const language = LANGUAGE.trim();

customInstruction = customInstruction.replace(/^[\s　]+|[\s　]+$/g, "");

return {
parts: {
text: "Do not hallucinate. If you are unsure or don't have enough information to answer with confidence, say \"I don't know\" or \"I'm not sure.\"\n"
+ (customInstruction ? `${customInstruction}\n` : "")
+ (language ? `Respond in ${language}.\n` : "")
}
}
}

function getTemporaryCustomInstruction() {
const tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag[TEMPORARY_CUSTOM_INSTRUCTION_TAG];
} else {
return "";
}
}
</syntaxhighlight>

=== 従来エンジン版 (アーカイブ) ===

<syntaxhighlight lang="javascript">
#title = "Gemini に相談"
BeginUndoGroup();

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
var HISTORY_SIZE = 5;

// コンテキストメニュー番号
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;

var ConsoleClass = function () {
this.log = function (str) {
outputBar.Writeln(str)
}
}
var console = new ConsoleClass();

var doc = document;
var sel = document.selection;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty
var beforeScrollY = ScrollY;

// プロンプトの取得
var promptText = "";
var promptLength = 0;
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
promptText = sel.Text.trim();
promptLength = sel.TextLength;
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
var menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === 2) {
resetTag();
return;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}
// 文字数が多すぎる場合はエラー
if (promptLength > 10000) {
alert("プロンプトの文字数が多すぎます。10000 文字以下にしてください。");
return;
}
// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();
var activeY = sel.GetActivePointY(mePosLogical);

// Gemini API に問い合わせ
doc.ReadOnly = true;
var ret = callGeminiAPI(promptText);
doc.ReadOnly = false;

// 結果を表示
sel.Text = "\n---\n\n" + ret + "\n\n---\n";

// 位置調整
sel.SetActivePoint(
mePosLogical,
1,
activeY,
false
)
if (beforeScrollY + 2 < ScrollY) {
ScrollY = ScrollY - 1;
}
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
if (selectionIsEmpty) {
menu.Add("アクティブ行の内容で相談 (&Q)", EXECUTE_AI);
} else {
menu.Add("選択範囲の内容で相談 (&Q)", EXECUTE_AI);
}
if (document.Tag.exists("gemini-text")) {
var turn = JSON.parse(document.Tag("gemini-text")).length / 2;
menu.Add("会話履歴をリセット (現在の会話数: " + turn + ") (&R)", RESET_HISTORY);
}
return menu;
}

function callGeminiAPI(promptText) {
try {
// APIキーの取得
var gemini_api_key = shell.getEnv("GOOGLE_API_KEY");

var http = new ActiveXObject("Msxml2.ServerXMLHTTP");
var url = 'https://generativelanguage.googleapis.com/v1beta/models/gemini-1.5-flash-latest:generateContent?key=' + gemini_api_key;

http.open('POST', url, true);
http.setRequestHeader('Content-Type', 'application/json');
http.send('{"contents":' + createGeminiRequest(promptText) + '}');

// 応答待機
var timeout = 60;
var retrySec = 0;
var startX = sel.GetActivePointX(mePosLogical);
var prevPos = sel.GetActivePos();
while (http.readyState != 4) {
if (retrySec > timeout) {
break;
}
http.waitForResponse(1);
retrySec += 1;
inputProgressChar(prevPos);
prevPos = sel.GetActivePos();
}
// 進捗表示文字を削除
sel.SetActivePoint(
mePosLogical,
startX,
sel.GetActivePointY(mePosLogical),
true
);
sel.Delete();

var ret = "";

// 応答ステータスチェック
if (http.readyState == 4 && http.status == 200) {
// JSONをパースして必要なテキストを抽出
var response = JSON.parse(http.responseText);
if (response.candidates && response.candidates.length > 0) {
response.candidates.forEach(function (candidate) {
if (candidate.content && candidate.content.parts) {
candidate.content.parts.forEach(function (part) {
if (part.text) {
ret += part.text;
}
});
}
});
}
} else {
var ret = "エラーが発生しました: " + http.status + " " + http.statusText
http.abort();
return ret;
}

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0) {
appendReturnTextToTag(promptText, ret);
}

// 整形しつつ返す
return ret
.trim()
.replace(/([。！？]) +/g, "$1")
.replace(/\* +/g, "* ");
} catch (e) {
console.log(e.stack);
return "エラーが発生しました: " + e.message;
}
}

// document.Tag の内容を加味してGeminiのリクエストを作成
function createGeminiRequest(promptText) {
var tag = document.Tag;
// 以前の会話が存在しない場合
if (!tag.exists("gemini-text")) {
return JSON.stringify([{ "parts": [{ "text": promptText }] }]);
}

var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": promptText }]
});
return JSON.stringify(geminiText);
}

// document.Tag にGeminiの応答を追加
function appendReturnTextToTag(userText, modelText) {
var tag = document.Tag;
if (!tag.exists("gemini-text")) {
tag("gemini-text") = JSON.stringify([
{
"role": "user",
"parts": [{ "text": userText }]
},
{
"role": "model",
"parts": [{ "text": modelText }]
}
]);
} else {
var geminiText = JSON.parse(tag("gemini-text"));
geminiText.push({
"role": "user",
"parts": [{ "text": userText }]
});
geminiText.push({
"role": "model",
"parts": [{ "text": modelText }]
});
// 会話セット (user, model 1往復) が5セットを超えた場合、最初のセットを削除
while (geminiText.length > HISTORY_SIZE * 2) {
geminiText.shift();
}
tag("gemini-text") = JSON.stringify(geminiText);
}
}

function resetTag() {
if (document.Tag.exists("gemini-text")) {
document.Tag.remove("gemini-text");
}
}

function inputProgressChar(pos) {
doc.ReadOnly = false;
sel.SetActivePos(pos);
sel.Text = ".";
doc.ReadOnly = true;
}
</syntaxhighlight>

== 更新履歴 ==

* 2025-06-18 利用する生成AIモデルを gemini-2.5-flash-lite-preview-06-17 に差し替えた。読み込む環境変数を「GEMINI_API_KEY」に変更した。
* 2025-02-16 利用する生成AIモデルを gemini-2.0-flash に差し替えた。カスタムインストラクションにハルシネーション抑制の指示を加えた。プロンプトに渡す文字数制限方式を調整。Geminiからの応答に句読点などの区切りの後ろに半角スペースを2,3個連続で付いてくる場合があるので、できるだけ削除して入力するようにした。処理されたトークン数を出力するようにした。
* 2024-12-22 V8エンジン版を追加。それに伴い従来エンジン版はアーカイブ化
* 2024-12-18 会話履歴の保持方式をJSON文字列に変更。リクエスト確認のポップアップ表示をコンテキストメニュー表示に変更。同メニューに会話履歴リセット機能を追加
* 2024-11-28 文書内で初回実行する際、「"」が含まれるとエラーになってしまう事象に対処
* 2024-11-27 サンプルマクロ [[Google Gemini で執筆支援]] の仕様に合わせ、環境変数「GOOGLE_API_KEY」からAPIキーを取得するように変更。これに合わせてMeryの動作バージョンを Ver 3.7.8 以上に変更
* 2024-11-17 初版

Groq に相談

2025-04-13T08:09:39Z

Yuko: ページの作成:「== 概要 == 生成AIプラットフォームである [https://groq.com GroqCloud] で「Llama」を利用するためのMeryマクロです。「Google Geminiに相談」マクロでは動作中のストリーム通信に対応するためにV8エンジンで実行していましたが、V8エンジン版は使用上の制限からマクロ実行を開始するまで1秒程度のタイムラグが発生していました。GroqCloudの売りである超高速…」

== 概要 ==

生成AIプラットフォームである [https://groq.com GroqCloud] で「Llama」を利用するためのMeryマクロです。

「Google Geminiに相談」マクロでは動作中のストリーム通信に対応するためにV8エンジンで実行していましたが、V8エンジン版は使用上の制限からマクロ実行を開始するまで1秒程度のタイムラグが発生していました。GroqCloudの売りである超高速レスポンスを見込んで本マクロではストリーム通信を使わないようにしました。これにより従来のJScriptで処理を組み立てることができるため、前述のタイムラグが起こらないようになりました。また、ストリーム通信を使わないことで通信量が少なく応答もシンプルになるため、場合によっては「Google Geminiに相談」マクロよりも処理が安定する可能性があります。

【主な機能】

* GroqCloud APIを利用して生成AIと対話できるMery用のマクロ
* 選択したテキストやアクティブな行の内容について生成AIに質問・相談が可能
* 会話履歴を保持し、文脈を考慮した対話が可能

【特徴的な機能】

'''会話履歴機能''':

* 事前の設定数に応じた会話履歴を保持
* 履歴のクリアが可能

これにより、会話の文脈を考慮した回答を得られます。

'''カスタムインストラクション''':

* AIの応答方針を設定可能
* 一時的なカスタム指示の保存と変更が可能

'''プロンプトテンプレート''':

* 誤字脱字チェック
* 日本語翻訳
* コードの最適化、生成

など、定型的な質問を簡単に実行できます。
※テンプレート機能では回答を安定させるため、前述の会話履歴を文脈に含みません。

テンプレートは自身の使い方に合わせて好きに追加、削除ができます。詳細はソースコード内の「PROMPT_TEMPLATE」定数のコメントを参照。

== 注意事項 (必ず読んでからご利用ください) ==

* 本マクロでは 2025/04/13 時点で無料利用ができるGroqCloud APIを利用します。今後、プラットフォームの改定により有償になったり、設定誤り等で費用が発生しても、作者は一切の責任を負いません。
* GroqCloud APIではリクエスト内容をAI学習に用いないことをプライバシポリシーとして謳っているものの、くれぐれも機密情報やプライバシーに関わる情報を指定しないように注意してください。
* GroqCloud APIはプラットフォームの利用規約に則ってご利用ください。

== 利用前提 ==

* Mery Ver 3.7.13 以上
* GroqCloudで、GroqCloud API APIキーを取得していること (参考 [https://console.groq.com/docs/quickstart Quickstart])

== 利用方法 ==

* 環境変数の設定
:コマンドプロンプトで以下のコマンドを実行し、環境変数を設定してください。
<syntaxhighlight lang="bat">
setx GROQ_API_KEY "***************************************"
</syntaxhighlight>
:設定後、Mery または Windows の再起動が必要な場合があります。
* マクロの実行
**プロンプトにしたい文字列を選択してマクロを実行すると、選択したテキストがプロンプトとしてGemini APIに送信され、応答がエディタに表示されます。
* 会話の履歴数を調整
** 会話の履歴は設定した個数分が保持され、文脈として利用されます。適宜、ソースコード内の「HISTORY_SIZE」の数を調整してください。
** ※数を増やすほど会話内容を保持して文脈を理解するようになりますが、メモリ使用量が増えたり動作が重くなる可能性があります。
** ※開いている文書ごとに履歴を保持します。文脈をリセットしたいときは、新しい文書を開いて会話をやり直してください。

== ソースコード ==

<syntaxhighlight lang="javascript">
#title = "Groq Llama に相談"
BeginUndoGroup();

// カスタムインストラクション
// これを設定することで、生成AIの回答全体への生成方針を指示できます。
// 例えば "あなたは侍で名前は権兵衛です。回答をござる口調にしてください" と設定すると、AIの回答がござる口調になります。
// 何も指示しない場合は、空文字 "" を設定してください。
var DEFAULT_CUSTOM_INSTRUCTION = "";

// プロンプトテンプレート
// プロンプトテンプレートを設定することで、AIに対して特定の指示を出すことができます。
// プロンプトテンプレートでの生成は会話履歴とカスタムインストラクションを反映しません。
// テンプレートは以下の { ～ }, で囲まれたブロックを好きに増減させて利用できます。
var PROMPT_TEMPLATE = [
// 以下はサンプルです。1階層メニューと2階層メニューが利用できます。
// {
// "title": "要約",
// "prompt": "以下の文章を要約してください。"
// },
// {
// "submenu_title": "翻訳系",
// "submenu": [
// {
// "title": "日本語翻訳",
// "prompt": "以下の文章を日本語に翻訳してください。"
// },
// {
// "title": "英語翻訳",
// "prompt": "以下の文章を英語に翻訳してください。"
// },
// ]
// },

{
"submenu_title": "理解を深める",
"submenu": [
{
"title": "要約する",
"prompt": "要約して。専門的な用語と思われる単語は簡単に解説も入れて。"
},
{
"title": "論点を整理する",
"prompt": "以下の論点を整理して。"
},
{
"title": "物語対話形式で教えて",
"prompt": "以下の内容について物語対話形式で教えてください。"
},
]
},
{
"submenu_title": "翻訳する",
"submenu": [
{
"title": "日本語に翻訳",
"prompt": "以下の文章を日本語に翻訳してください。\n"
+ "- 出力形式: [訳] ..."
},
{
"title": "英語に翻訳",
"prompt": "以下の文章を英語に翻訳してください。直訳的で不自然な翻訳を避け、自然な表現にしてください。\n"
+ "- 出力形式: [Translation] ..."
},
{
"title": "英語->日本語スラッシュリーディング翻訳",
"prompt": "以下の英文を日本語にスラッシュリーディング形式で翻訳してください。\n\n"
+ "条件:\n"
+ "- 英文の各フレーズをスラッシュ(/)で区切って表示\n"
+ "- 各フレーズの日本語訳を括弧()内に併記\n"
+ "- 文の終わりはダブルスラッシュ(//)で表示\n"
+ "- 英語の語順に従って日本語訳を行う\n"
+ "- 日本語訳は自然な日本語である必要はなく、英語の語順を反映した直訳調で構わない\n"
+ "- 主語が省略されている場合は補って翻訳すること\n"
+ "- 一般的な英文で頻出する表現がある場合は次の行に記載\n"
+ "- 以下の出力例のように <英文> (日本語訳) / ... とスラッシュ区切りの繰り返しになる \n\n"
+ "出力例:\n"
+ "Snowstorms are forecast (暴風雪が予報されている) / to hit the Sea of Japan coasts (日本海沿岸を襲うと) / of northern to eastern Japan (北部から東部の) / from Sunday through Monday. (日曜から月曜にかけて。) //\n"
+ "【頻出表現】\n"
+ "- be forecast to: ～すると予報されている\n"
},
]
},
{
"submenu_title": "プログラミング支援",
"submenu": [
{
"title": "コードを洗練させる",
"prompt": "以下のコードを洗練させてください"
},
{
"title": "コードをレビューする",
"prompt": "以下のコードをセキュリティと保守性の観点でレビューしてください"
},
{
"title": "エラーログをデバッグする",
"prompt": "以下のエラーログを解析し、考えられる原因と対策を提示してください"
},
{
"title": "SQLクエリを最適化する",
"prompt": "以下のSQL文を最適化してください"
},
{
"title": "PowerShell スクリプトを書く",
"prompt": "以下の処理を行うPowerShellスクリプトを生成してください"
},
{
"title": "Shell Script を書く",
"prompt": "以下の処理を行うShell Scriptを生成してください"
},
{
"title": "Linux コマンドを提案",
"prompt": "あなたはLinuxエキスパートとして、以下のLinuxコマンドを提案してください。\n\n"
+ "制約条件:\n"
+ "- 多数のディストリビューションで採用されているメジャーなコマンドを使用し、ポータブルな実装にすること\n"
+ "- bashでの実行を前提にすること\n"
+ "- 可能な限りシンプルな実装にすること\n\n"
+ "期待する出力:\n"
+ "- コマンドの具体的な実装方法\n"
+ "- 各コマンドの動作説明\n"
+ "- 制限事項\n"
},
]
},
{
"submenu_title": "ビジネス文書作成支援",
"submenu": [
{
"title": "誤字脱字、不正確な表現をチェック",
"prompt": "以下の2つのカテゴリーで問題点を指摘してください\n"
+ "- 【誤字脱字】：明確な誤字脱字および誤字の疑いがある箇所\n"
+ "- 【不正確・曖昧な表現】：解釈に個人差が生じる可能性がある表現、より適切な表現に改善できる箇所"
},
{
"title": "提案書を作成する",
"prompt": "以下に対する対する提案書を、コスト・実現性・リスクを含めて作成してください"
},
{
"title": "仕様書のアウトラインを作成する",
"prompt": "以下の内容で仕様書のアウトラインを作成してください"
},
{
"title": "手順書のアウトラインを作成する",
"prompt": "以下の作業を行う手順書を、前提条件と注意事項を含めてアウトラインを作成してください"
},
{
"title": "ユーザーマニュアルのアウトラインを作成する",
"prompt": "以下の機能内容から、ユーザー向けマニュアルのアウトラインを作成してください"
},
{
"title": "議事録を作成する",
"prompt": "以下の会議内容から議事録を作成してください"
},
{
"title": "進捗報告書を作成する",
"prompt": "以下のタスク状況から進捗報告書を作成してください"
},
]
},
{
"submenu_title": "分析支援",
"submenu": [
{
"title": "問題を分析し、課題を抽出する",
"prompt": "以下の状況から問題や潜在的リスクを分析し、課題を抽出してください"
},
{
"title": "対応策を提案する",
"prompt": "以下の問題・課題に対する対応策を複数提案してください"
},
{
"title": "傾向を見つける",
"prompt": "以下の内容から、数値や挙動上の傾向を見つけてください"
},
]
},
{
"submenu_title": "アイデア出し",
"submenu": [
{
"title": "SCAMPER法でブレインストーミング",
"prompt": "以下のテーマについて、SCAMPER法を使って15個のアイデアを出してください。制約条件は以下の通りです："
},
{
"title": "解決策の幅出し",
"prompt": "以下の課題に対して、技術面、運用面、コスト面から実現可能な解決策を5つずつ提案してください"
},
{
"title": "業務改善案の提案",
"prompt": "以下の既存プロセスについて、効率化、コスト削減、品質向上の観点から改善案を提案してください"
},
{
"title": "逆転の発想",
"prompt": "以下の目標に対して、通常とは逆の視点からアプローチする方法を3つ提案してください"
},
{
"title": "競合分析からの着想",
"prompt": "以下の内容について、業界における競合他社の特徴を分析し、差別化できる新しいアプローチを提案してください"
},
{
"title": "ユースケースの列挙",
"prompt": "以下の製品・サービスについて、想定されるユースケースを10個列挙し、それぞれの価値提案を記載してください"
},
]
},
]

// 生成AIの回答の言語設定
// "Japanese" や "English" を設定できます。他の言語は未検証。
// 自動設定にする場合は空文字 "" を設定してください。
var LANGUAGE = "Japanese";

// 入力プロンプトの最大トークン数
// 超適当なトークナイザー関数により計測し、英単語は4文字1トークン、それ以外は1文字1トークンとして数えます。
var MAX_PROMPT_TOKEN = 60000;

// 会話の履歴を保持する数 (質問と回答で1セット)
// 数を増やすと、会話の履歴が増えますが、Meryのメモリ使用量が増えたり、
// 使用トークン数が増えて動作が重くなる可能性があるため、適宜調整してください。
// document.Tag に保持されるため、開いているファイルを閉じると履歴は消えます。
var HISTORY_SIZE = 4;

// 会話履歴に保持する最大トークン数
// 会話履歴のトークン数がこの数を超える場合、古い履歴から削除されます。
var MAX_HISTORY_TOKEN = 300000;

// コンテキストメニュー番号の定義
var EXECUTE_AI = 1;
var RESET_HISTORY = 2;
var SET_CUSTOM_INSTRUCTION = 3;
var REEXECUTE_LAST_TEMPLATE_PROMPT = 4;
var TEMPLATE_PROMPT_THRESHOLD = 10;
var TEMPLATE_PROMPT_SUBMENU_THRESHOLD = 1000;

// タグ名の定義
var HISTORY_TAG = "groqllama-history";
var TEMPORARY_CUSTOM_INSTRUCTION_TAG = "groqllama-temporary-custom-instruction";
var PREVIOUS_TEMPLATE_PROMPT_TAG = "groqllama-previous-template-prompt";

// 生成AIモデル名
const MODEL_NAME = "meta-llama/llama-4-maverick-17b-128e-instruct";

// console.log に出力する内容を Mery のアウトプットバーに表示する
var console = {
log: function (str) {
outputBar.Writeln(str)
}
}

var doc = document;
var sel = document.selection;

// 生成リクエスト中止フラグ
var abortRequestFlg = false
// 生成リクエスト完了フラグ;
var requestCompletedFlg = false;

main();

function main() {
var selectionIsEmpty = sel.IsEmpty

// プロンプトの取得
if (selectionIsEmpty) {
sel.StartOfLine(false, mePosLogical);
sel.EndOfLine(true, mePosLogical);
}
var promptText = sel.Text.trim();
var promptLength = sel.TextLength;
var menuTrack = 0;
while (true) {
// コンテキストメニューの作成
var menu = createContextMenu(selectionIsEmpty);
menuTrack = menu.Track(0);
// メニュー選択がキャンセルされた場合は終了
if (menuTrack === 0) return;

// 会話履歴のリセット
if (menuTrack === RESET_HISTORY) {
resetTag();
continue;
}

// カスタムインストラクションの設定
if (menuTrack === SET_CUSTOM_INSTRUCTION) {
configureTemporaryCustomInstruction();
return;
}

break;
}

// プロンプトが空の場合はエラー
if (promptLength === 0) {
alert("プロンプトを入力してください。");
return;
}
// 文字数が多すぎる場合はエラー
if (roughTokenize(promptText) > MAX_PROMPT_TOKEN) {
alert("プロンプトの文字数が多すぎます。文字数を少なくしてください。");
return;
}
// 読み取り専用の場合はエラー
if (doc.ReadOnly) {
alert("ファイルが読み取り専用のため実行できません。");
return;
}

// 直前に実行したプロンプトテンプレートの再実行の場合、menuTrack を書き換え
if (menuTrack === REEXECUTE_LAST_TEMPLATE_PROMPT) {
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_TAG)) {
menuTrack = Number(doc.Tag(PREVIOUS_TEMPLATE_PROMPT_TAG));
} else {
alert("直前に実行したプロンプトテンプレートがありません。");
return;
}
}

// テンプレートの場合はプロンプトを変更
var isTemplate = menuTrack >= TEMPLATE_PROMPT_THRESHOLD;
var isSubmenu = menuTrack >= TEMPLATE_PROMPT_SUBMENU_THRESHOLD;
if (isSubmenu) {
var parentMenuTrack = Number(String(menuTrack).slice(0, 2));
var subMenuTrack = Number(String(menuTrack).slice(2));
promptText = PROMPT_TEMPLATE[parentMenuTrack - TEMPLATE_PROMPT_THRESHOLD].submenu[subMenuTrack].prompt
+ "\n\n---INPUT START---\n\n"
+ promptText
+ "\n\n---INPUT END---\n\n";
} else if (isTemplate) {
promptText = PROMPT_TEMPLATE[menuTrack - TEMPLATE_PROMPT_THRESHOLD].prompt
+ "\n\n---INPUT START---\n\n"
+ promptText
+ "\n\n---INPUT END---\n\n";
}

// テンプレートの場合は直前に実行したプロンプトテンプレートの番号としてタグに保存
if (isTemplate) {
addPreviousTemplatePromptNumberToTag(menuTrack);
}

try {
// 処理終了を待機
shell.KeepRunning = true;

// カーソル位置移動
sel.SetActivePoint(mePosLogical, sel.GetBottomPointX(mePosLogical), sel.GetBottomPointY(mePosLogical));
sel.EndOfLine(false, mePosLogical);
sel.NewLine();

// APIキーの取得
var apiKey = shell.getEnv("GROQ_API_KEY");

// GroqLlama API に問い合わせ
sel.Text = "\n---\n\n"
document.KeepScrollPos = true;
callGroqLlamaAPI(apiKey, promptText, isTemplate);
if (sel.GetActivePointX(mePosLogical) > 2) {
sel.Text = "\n\n---\n\n\n"
} else {
sel.Text = "\n---\n\n\n"
}
} catch (e) {
console.log("エラーが発生しました: " + e.message + "\n" + e.stack);
sel.Text = "<処理中にエラー発生>"
} finally {
// 処理終了待機を解除
shell.KeepRunning = false;
}
}

function createContextMenu(selectionIsEmpty) {
var menu = CreatePopupMenu();
menu.Add("※注意※ プライバシー・機密情報を送信しないこと", 0);
menu.Add("", 0, meMenuSeparator);
var t = "";
if (selectionIsEmpty) {
t = "アクティブ行の内容で相談 (&A)";
} else {
t = "選択範囲の内容で相談 (&A)";
}
menu.Add(t, EXECUTE_AI);
if (doc.Tag.exists(HISTORY_TAG)) {
var turn = JSON.parse(doc.Tag(HISTORY_TAG)).length / 2;
menu.Add("├ 会話履歴をクリア (現在の会話数: " + turn + ") (&C)", RESET_HISTORY);
} else {
menu.Add("├ 会話履歴をクリア (現在の会話数: 0) (&C)", RESET_HISTORY, meMenuGrayed);
}
menu.Add("└ カスタムインストラクションを変更 (&I)", SET_CUSTOM_INSTRUCTION);

// テンプレート数チェック
// 2桁まで許容
var ITEMS_MUX = 99;
if (PROMPT_TEMPLATE.length > ITEMS_MUX - TEMPLATE_PROMPT_THRESHOLD) {
throw new Error("プロンプトテンプレートの数が多すぎます。");
}

// テンプレートの追加
if (PROMPT_TEMPLATE.length > 0) {
var subMenu = CreatePopupMenu();
for (var i = 0; i < PROMPT_TEMPLATE.length; i++) {
var accelerationKey = "";
if (i === 9) {
accelerationKey = " (&0)";
} else if (i < 10) {
accelerationKey = " (&" + (i + 1) + ")";
}
var menuNum = TEMPLATE_PROMPT_THRESHOLD + i;
if (PROMPT_TEMPLATE[i].submenu) {
var subMenuList = PROMPT_TEMPLATE[i].submenu;
// テンプレート数チェック
if (subMenuList.length > ITEMS_MUX) {
throw new Error("プロンプトテンプレート (サブメニュー) の数が多すぎます。");
}
var subSubMenu = CreatePopupMenu();
var subMenuPrefix = String(menuNum);
for (var j = 0; j < subMenuList.length; j++) {
var subAccelerationKey = "";
if (j === 9) {
subAccelerationKey = " (&0)";
} else if (j < 10) {
subAccelerationKey = " (&" + (j + 1) + ")";
}
// ES5 compatible version without padStart
var subMenuNum = Number(subMenuPrefix + (j < 10 ? "0" + j : String(j)));
subSubMenu.Add(subMenuList[j].title + subAccelerationKey, subMenuNum);
}
subMenu.AddPopup(PROMPT_TEMPLATE[i].submenu_title + accelerationKey, subSubMenu);
} else {
subMenu.Add(PROMPT_TEMPLATE[i].title + accelerationKey, menuNum);
}
}
if (selectionIsEmpty) {
t = "プロンプトテンプレート (対象: アクティブ行) (&T)";
} else {
t = "プロンプトテンプレート (対象: 選択範囲) (&T)";
}
menu.AddPopup(t, subMenu);

t = "└ 直前に実行したプロンプトテンプレートを再実行 (&R)";
if (doc.Tag.exists(PREVIOUS_TEMPLATE_PROMPT_TAG)) {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT);
} else {
menu.Add(t, REEXECUTE_LAST_TEMPLATE_PROMPT, meMenuGrayed);
}
}

return menu;
}

function callGroqLlamaAPI(apiKey, promptText, isTemplate) {
try {
// fetch で Groq API にリクエスト
var requestBody = {
model: MODEL_NAME,
messages: createGroqLlamaRequest(promptText, isTemplate),
stream: false,
max_tokens: 5000,
temperature: 0.7,
};
if (isTemplate) {
// テンプレートの場合は応答を決定論的にする
// テンプレート以外の場合はデフォルト値とするために指定しない
requestBody.temperature = 0.3;
}
var url = 'https://api.groq.com/openai/v1/chat/completions';

var http = new ActiveXObject("Msxml2.ServerXMLHTTP");

http.open('POST', url, true);
http.setRequestHeader('Content-Type', 'application/json');
http.setRequestHeader('Authorization', 'Bearer ' + apiKey);
http.send(JSON.stringify(requestBody));

// 応答待機
var timeout = 60;
var retrySec = 0;
var startX = sel.GetActivePointX(mePosLogical);
var prevPos = sel.GetActivePos();
while (http.readyState != 4) {
if (retrySec > timeout) {
break;
}
http.waitForResponse(1);
retrySec += 1;
inputProgressChar(prevPos);
prevPos = sel.GetActivePos();
}
// 進捗表示文字を削除
sel.SetActivePoint(
mePosLogical,
startX,
sel.GetActivePointY(mePosLogical),
true
);
sel.Delete();

// 応答ステータスチェック
if (!(http.readyState == 4 && http.status == 200)) {
sel.Text = "エラーが発生しました: " + http.status + " " + http.statusText + "\n" + http.responseText;
http.abort();
return;
}

var ret = "";

// JSONをパースして必要なテキストを抽出
var response = JSON.parse(http.responseText);

var choices = response.choices;
if (choices && choices.length > 0) {
choices.forEach(function (choice) {
var message = choice.message;
if (message) {
ret += message.content;
}
});
}

var usage = response.usage;
var usageText = "";
if (usage) {
usageText += "\n\n(利用トークン数: プロンプト=" + usage.prompt_tokens
+ ", 応答=" + usage.completion_tokens
+ ", 合計=" + usage.total_tokens + ")";
}

sel.Text = ret + usageText;

// 結果を会話履歴に追加
if (HISTORY_SIZE > 0 && !isTemplate) {
appendReturnTextToTag(promptText, ret);
}
} catch (e) {
throw e;
} finally {
requestCompletedFlg = true;
}
}

function roughTokenize(text) {
// 超適当なトークナイザ。トークン数をざっくりと多めに数える
// 空白文字・ハイフン・アンダースコア区切りの単語に分割して、
// 単語がアルファベットのみ、数字のみの場合には 4文字=1トークンとして数える。
// 単語にアルファベット以外の文字が含まれる場合は 1文字=1トークンとして数える。

var words = text.split(/[\s\-_]+/);
var totalTokens = 0;

for (var i = 0; i < words.length; i++) {
var word = words[i];
if (!word) continue; // 空の単語をスキップ

if (/^[a-zA-Z]+$/.test(word) || /^[0-9]+$/.test(word)) {
totalTokens += Math.ceil(word.length / 4);
} else {
totalTokens += word.length;
}
}

return totalTokens;
}

// document.Tag の内容を加味してGroqLlamaのリクエストを作成
function createGroqLlamaRequest(promptText, isTemplate) {
// テンプレートの場合は、会話履歴とカスタムインストラクションを反映しない
if (isTemplate) {
return [
{
"role": "user",
"content": [{ "type": "text", "text": promptText }]
}
];
}

var tag = document.Tag;
var customInstructionText = buildCustomInstructionText();

// 以前の会話が存在しない場合は新規リクエスト
if (!tag.exists(HISTORY_TAG)) {
var request = [{
"role": "user",
"content": [{ "type": "text", "text": promptText }]
}];
if (customInstructionText) {
request.unshift({
"role": "system",
"content": customInstructionText
})
}
return request;
}

// 会話履歴が存在する場合は、履歴を含めてリクエスト
var request = JSON.parse(tag(HISTORY_TAG));
if (customInstructionText) {
request.unshift({
"role": "system",
"content": customInstructionText
});
}
request.push({
"role": "user",
"content": promptText
});
return request;
}

// document.Tag にGroqLlamaの応答を追加
function appendReturnTextToTag(userText, modelText) {
var tag = document.Tag;
if (!tag.exists(HISTORY_TAG)) {
tag(HISTORY_TAG) = JSON.stringify([
{
"role": "user",
"content": userText
},
{
"role": "assistant",
"content": modelText
}
]);
} else {
var groqllamaText = JSON.parse(tag(HISTORY_TAG));
groqllamaText.push({
"role": "user",
"content": userText
});
groqllamaText.push({
"role": "assistant",
"content": modelText
});
// 会話セット (user, model 1往復) が特定セット数を超えた場合、最初のセットを削除
if (groqllamaText.length > HISTORY_SIZE * 2) {
groqllamaText.splice(0, 2);
}
// 会話履歴全体が MAX_HISTORY_TOKEN を超えた場合、最初のセットを削除
var joinedText = "";
for (var i = 0; i < groqllamaText.length; i++) {
joinedText += groqllamaText[i].content + "\n";
}

while (roughTokenize(joinedText) > MAX_HISTORY_TOKEN) {
groqllamaText.splice(0, 2);
joinedText = "";
for (var i = 0; i < groqllamaText.length; i++) {
joinedText += groqllamaText[i].content + "\n";
}
}

tag(HISTORY_TAG) = JSON.stringify(groqllamaText);
}
}

function resetTag() {
var tag = doc.Tag;
if (tag.exists(HISTORY_TAG)) {
tag.remove(HISTORY_TAG);
}
}

function buildCustomInstructionText() {
var customInstruction = getTemporaryCustomInstruction();
if (!customInstruction) {
// 一時的なカスタムインストラクションがない場合はデフォルトを使用
customInstruction = DEFAULT_CUSTOM_INSTRUCTION;
}
var language = LANGUAGE.trim();
if (!customInstruction && !language) {
return "";
}

customInstruction = customInstruction.replace(/^[\s　]+|[\s　]+$/g, "");

return (customInstruction ? customInstruction + "\n" : "")
+ (language ? "Please make sure to answer in " + language + ".\n" : "");
}

function configureTemporaryCustomInstruction() {
var tempCustomInstruction = getTemporaryCustomInstruction();
var prompt = Prompt("カスタムインストラクションを変更 ※変更すると会話履歴がリセットされます", tempCustomInstruction ? tempCustomInstruction : DEFAULT_CUSTOM_INSTRUCTION);
if (prompt) {
if (prompt === DEFAULT_CUSTOM_INSTRUCTION) {
// デフォルトと同じ値の場合はタグを削除
setTemporaryCustomInstruction("");
} else if (prompt !== tempCustomInstruction) {
// デフォルト以外の値が設定された場合は保存
setTemporaryCustomInstruction(prompt);
}
} else {
// 空文字でOK、もしくはキャンセルされた場合はデフォルトに戻すか確認
if (Confirm("カスタムインストラクションをデフォルトに戻しますか？")) {
setTemporaryCustomInstruction("");
} else {
alert("カスタムインストラクションの変更をキャンセルしました。\n※カスタムインストラクションを空にしたい場合はスペースのみを入力してください。");
}
}

// 変更が加わっている場合は会話履歴をリセット
if (tempCustomInstruction !== getTemporaryCustomInstruction()) {
resetTag();
}
}

function getTemporaryCustomInstruction() {
var tag = doc.Tag;
if (tag.exists(TEMPORARY_CUSTOM_INSTRUCTION_TAG)) {
return tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
} else {
return "";
}
}

function setTemporaryCustomInstruction(temporaryCustomInstruction) {
var tag = doc.Tag;
if (temporaryCustomInstruction) {
tag(TEMPORARY_CUSTOM_INSTRUCTION_TAG) = temporaryCustomInstruction;
} else {
tag.remove(TEMPORARY_CUSTOM_INSTRUCTION_TAG);
}
}

function addPreviousTemplatePromptNumberToTag(menuTrack) {
var tag = doc.Tag;
tag(PREVIOUS_TEMPLATE_PROMPT_TAG) = menuTrack;
}

function inputProgressChar(pos) {
sel.SetActivePos(pos);
sel.Text = ".";
}
</syntaxhighlight>

マクロライブラリ

2025-04-13T07:51:14Z

Yuko: /* おもしろ */

Mery 用のマクロライブラリです。

スクリプトを拡張子 "js"（JavaScript、JScript の場合）にして Macros フォルダーなどに保存し、[マクロ] メニューの [選択] や [カスタマイズ] から読み込んで使用してください。

このマクロライブラリはどなたでも自由に編集可能ですので、ご自身が開発した便利なマクロをどんどん共有してください。

また、[[隠しオプション一覧]]に希望するオプションがあるかもしれませんので、そちらも参照してみてください。

== テキスト操作補助 ==
* [https://github.com/haijinboys/mery-macro-emmet/blob/master/emmet.js Emmet] (Kuro)
* [[Zen Coding]] (Kuro)
* [[バイト数]] (Kuro, ks)
* [[日付と時刻を挿入]] (n, masme, isari)
* [[日付と時刻を挿入（カレンダー版）]] (papagoat)
* [[選択範囲を上下に移動]] (ks)
* [[TeraPadのCtrl↑と同じような動作をするマクロ]] (suke)
* [[TeraPadのCtrl↓と同じような動作をするマクロ]] (suke)
* [[Vz 風テキストスタック 2 ストロークキー]] (papagoat)
* [[ラクラク罫線]] (手石)
* [[矩形ペースト]] (手石)
* [[自動箇条書き]] (手石)
* [[特殊改行]] (FuG)
* [[部分編集]] (ks)
* [[文字カウント]] (masme)
* [[字下げ・字上げ]] (masme)
* [[数値を増減]] (masme)
* [[上に行挿入]] (yuko)
* [[選択範囲を広げる]] (yuko)
* [[貼付け実行後のカーソル位置を貼付け文字列の先頭にする]] (yuko)
* [[選択した文字列を文書からすべて削除]] (Noah)
* [[文章で使用されている文字をユニーク抽出]] (Kuro)
* [[CSV のカーソル位置の列を削除]] (MSY-07)
* [[XHTML入力補助]] (アラフォー親父)
* [[Markdown文書で改行時にリスト、引用ブロック開始記号を自動入力する]] (catfist, yuko)
* [[Markdown 向け、リスト記号 (*) のトグル]] (yuko)
* [[Markdown 向け、タスクリスト (* ［］) のチェック状態をトグル]] (yuko)
* [[Markdown入力補助]] (急急如律令)
* [[青空文庫用整形補助]] (ks, 急急如律令)
* [[自動ルビ振り]] (急急如律令)
* [[ドイツ語特殊文字]] (鯉)
* [[何年生で習う漢字？]] (シリル)

== ファイル操作補助 ==
* [[フォルダ内のファイルをすべて開く]] (Kuro)
* [[ファイルを比較]] (Kuro, MSY-07)
* [[ファイル名を引数にしてアプリ起動]] (Kuro, miso)
* [[文字列中のパス起動]] (ks)
* [[パス・URLを開くコマンドを実行する]] (yuko)
* [[開いている文書のファイル名を変更する]] (yuko)
* [[上書き保存(UAC対応)]] (ks)
* [[含んでいるフォルダを開く]] (ks)
* [[フォルダを開く]] (n)
* [[拡張子の違うファイルを開く]] (n)
* [[コマンドプロンプトを開く]] (n)
* [[ブックマーク一覧ジャンプ]] (goat)
* [[よく使うフォルダ]] (手石)
* [[ファイル（選択範囲）の仮保存]] (手石)
* [[ポップアップメニューでファイル選択]] (手石)
* [[フォルダツリーをポップアップ表示]] (n)
* [[タグジャンプ]] (o)
* [[ウィンドウの位置とサイズを拡張子で指定]] (papagoat)
* [[編集モードの自動選択]] (Bleat)
* [[書き換え禁止モード色反転]] (Bleat)
* [[変更なしのタブをすべて閉じる]] (Noah)

== 変換・ソート・整形 ==
* [[標準変換]] (Kuro, MSY-07)
* [[テキスト変換]] (ks)
* [[テキスト整形]] (masme)
* [[旧漢字から新漢字に変換]] (furu)
* [[Unicode正規化]] (ucky)
* [[Wikipediaマークアップ修正]] (MSY-07)
* [[SHA でハッシュ化]] (Kuro)
* [[ブックマーク系コマンド集]] (ks)
* [[clustalw を用いてアライメントを実行]] (suke)
* [[clustal-omegaを用いてアライメントを実行]] (suke)
* [[連番の挿入]] (手石)
* [[連番を挿入]] (masme)
* [[マルチカーソルに連番を入力]] (yuko)
* [[可変長を固定長に変換]] (MSY-07)
* [[TSV(CSV) ⇒ 固定長]] (手石)
* [[行並べ替え]] (masme)
* [[GFMをHTMLに変換]] (noonworks)
* [[基数変換10 16]] (シリル)
* [[スネークケース ⇔ キャメルケースの変換]] (Noah)
* [[自然数ソート]] (tak)

== 検索・置換 ==
* [[文書から検索]] (Kuro)
* [[単語を抽出]] (Kuro)
* [[タグの外側（内側）だけ置換]] (手石)
* [[ポップアップメニューで検索先にジャンプ]] (手石)
* [[検索(SJIS以外)]] (masme)
* [https://github.com/TakamiChie/mery-scripts/blob/master/SearchWithMode.js 現在開いているファイルの言語名をつけてWeb検索] (高見知英)
* [https://github.com/GunseiKPaseri/Mery_macro/blob/master/count.js 文字出現量ランキング] (群生系パセリ)
* [[検索ヒット数表示]] (ks)
* [[任意の検索エンジンで検索ー改良版]] (Takeshi)
* [[デフォルトの検索フラグを設定して検索ウィンドウ表示]] (yuko)
* [[複数置換]] (Noah)
* [[類義語アウトプット【Python】]] (シリル)
* [[校正支援アウトプット]] (シリル)
* [[見出しジャンプ]] (yuko)
* [[CSV/TSVでアクティブ列選択]] (yuko)

== プログラミング補助 ==
* [[Eclipse風コメントアウト]] (ks)
* [[Eclipse風コメントアウト(改)]] (pizz)
* [[コメントマーク付け外し]] (手石, masme)
* [[スマートインデント(C 構文)]] (ks)
* [[ctags.exeでtagsファイルを生成、タグジャンプを行うマクロ]] (kazy)
* [[タグファイルから補完]] (n)
* [[コードスニペットもどき]] (手石)
* [[TeX文書のコンパイル]] (手石, isari)
* [[簡易数式計算]] (ks)
* [[定義へ移動]] (ks)
* [[タブの桁数]] (手石)
* [[行末の空白を削除]] (n)
* [https://github.com/TakamiChie/mery-scripts/blob/master/FileExecutor.js 開いているスクリプトファイルを実行] (高見知英)
* [https://github.com/TakamiChie/mery-scripts/blob/master/SyntaxChecker.js 開いているスクリプトファイルを構文チェック] (高見知英)
* [[説明を出力]] (s)
* [[JSON整形]] (Ovis)
* [[コンソール実行]] (YOS G-spec)
* [[拡張子からコンソール実行]] (YOS G-spec)
* [[ScriptRun]] (fuka)
* [[JavaScript を実行]] (n)
* [[Ruby を実行]] (n)
* [[HSPキーワード検索]] (SSSE)

== おもしろ ==
* [[メール送信]] (ks)
* [[あつまれ☆みんなのおもしろアイコン]] (シリル, ucky)
* [[テーマのトグル]] (ucky)
* [[お気に入りフォント]] (ucky)
* [[Google Gemini に相談]] (yuko)
* [[OpenAI GPT に相談]] (yuko)
* [[GroqCloud Llama に相談]] (yuko)
* [[Google Gemini で執筆支援]] (Kuro)

== その他 ==
* [[最新版を確認]] (diaphragm)
* [[SAPI 使って単語読み上げ]] (miso)
* [[フォルダ選択ダイアログ]] (手石)
* [[HTA(HTML)の自作ダイアログを表示]] (noonworks)
* [[ポップアップメニューを手軽に扱う]] (komorebikoboshi)
* [[ポップアップメニューでチェックボックス]] (手石)
* [[ポップアップメニューでラジオボタン]] (手石)
* [[マクロ・関数をメニューで呼び出す]] (aliquis)
* [[階層化マクロメニュー]] (ks)
* [[シェルコマンドを実行]] (sasaki)
* [[Editor.OpenFile()のポリフィル]] (kazy)
* [[折り返しトグル切り替え]] (Bleat)
* [[Beep音の例]] (star0worshipper)
* [[ブラウザ風タブ移動]] (yuko)
* [[タブ位置を先頭/末尾に移動]] (yuko)
* [[Mery 電卓]] (yuko)

== 開発者向け ==
* [[キーアサイン集]] (ks, masme, isari)
* [[includeライブラリ]] (ks)
* [[マクロ覚え書き（開発者向け）]] (ks, papagoat)

== 注意事項 ==
[https://www.haijin-boys.com/software/mery/mery-2-6-6#5 Mery Ver 2.6.6]以前に作成されたマクロが動作しない場合は下記のページを参照してください。

* [https://www.haijin-boys.com/wiki/%E3%83%9E%E3%82%AF%E3%83%AD%E3%83%AA%E3%83%95%E3%82%A1%E3%83%AC%E3%83%B3%E3%82%B9:3:%E3%83%87%E3%82%A3%E3%83%AC%E3%82%AF%E3%83%86%E3%82%A3%E3%83%96##language マクロリファレンス:3:ディレクティブ]
* [https://www.haijin-boys.com/discussions/6929 公式のマクロ箇条書きが最新メリーで動作するかチェックいただけませんか？]

Mery 電卓

2025-03-18T01:27:12Z

Yuko: /* ソースコード */

== 概要 ==

「Mery 電卓」は、Meryエディタ上で数式を計算するためのマクロです。標準的な数学関数をサポートしており、カーソル位置の行または選択したテキストを数式として解釈し、結果を表示します。計算結果は自動的にクリップボードにコピーされ、カンマ区切りの数値として表示されます。

本マクロをショートカットキーに設定し、いつでも起動できるようにしておくと日常シーンで何かと便利です。作者は「Ctrl + Alt + Enter」キーに割り当てて利用しています。

== 注意事項 ==

* Mery Ver 3.7.12 で動作確認しています。

== 使い方 ==

1. '''行全体を計算する場合''':

* 計算したい数式が書かれた行にカーソルを置きます。
* マクロを実行すると、次の行に「= 計算結果」が表示されます。
* 既に結果行がある場合は、その行が更新されます。

2. '''選択範囲を計算する場合''':

* 計算したい数式部分を選択します。
* マクロを実行すると、選択範囲の後ろに「計算式 = 計算結果」が挿入されます。

3. '''サポートされている演算子''':

* 四則演算（+, -, *, /）
* べき乗（^）
* 剰余（%）
* 比較演算子（<, >, <=, >=, ==, !=）
* 論理演算子（and, or, not）

4. '''サポートされている関数''':

* 三角関数（sin, cos, tan, asin, acos, atan）
* 双曲線関数（sinh, cosh, tanh, asinh, acosh, atanh）
* 対数関数（log, log10, log2, ln）
* その他の数学関数（sqrt, cbrt, abs, ceil, floor, round, trunc など）

5. '''特別な機能''':

* カンマ区切り表示: 計算結果は読みやすいようにカンマ区切りで表示されます。変数「COMMA」を設定することで調整可能です。
* 自動コピー: 計算結果は自動的にクリップボードにコピーされます。変数「COPY」を設定することで調整可能です。
* 計算結果の再利用: 行頭の「= 」は入力から無視されるため、計算結果の位置からスムーズに次の数式として利用できます。
* 変数の利用: 複数行、または「;」で区切ることで、変数を使った数式が利用できます。変数形式は「$[a-zA-Z][a-zA-Z0-9]*」に対応しています。例えば「$a = 2; $a * 3」として実行すると、結果は「6」と出力されます。
* メモ書きから計算: 数字や関数以外の文字はできるだけ除外した上で計算をします。例えば「月100円 * 12ヶ月」のようなメモ書きに対して実行すると「1,200」と出力されます。 [ と ] で囲まれた文字列は丸ごと除外するため、コメントに最適です。

== ソースコード ==

<syntaxhighlight lang="javascript">
#title = "Mery 電卓"
#include "Common.js"
#language = "v8"
Redraw = false;
BeginUndoGroup();

// 結果をクリップボードにコピー
var COPY = true;
// 出力結果をカンマ区切りにする
var COMMA = true;

// expr-eval ライブラリ
// from: https://cdn.jsdelivr.net/npm/expr-eval@2.0.2/dist/bundle.min.js
!function(t,e){"object"==typeof exports&&"undefined"!=typeof module?e(exports):"function"==typeof define&&define.amd?define(["exports"],e):e((t=t||self).exprEval={})}(this,function(t){"use strict";var y="INUMBER",x="IOP1",w="IOP2",d="IOP3",g="IVAR",M="IVARNAME",E="IFUNCALL",m="IFUNDEF",A="IEXPR",b="IEXPREVAL",k="IMEMBER",O="IENDSTATEMENT",T="IARRAY";function C(t,e){this.type=t,this.value=null!=e?e:0}function c(t){return new C(x,t)}function f(t){return new C(w,t)}function l(t){return new C(d,t)}function N(t,i,o){var e,r,s,n,a,p,h=[];if(I(t))return P(t,o);for(var u=t.length,c=0;c<u;c++){var f=t[c],l=f.type;if(l===y||l===M)h.push(f.value);else if(l===w)r=h.pop(),e=h.pop(),"and"===f.value?h.push(!!e&&!!N(r,i,o)):"or"===f.value?h.push(!!e||!!N(r,i,o)):"="===f.value?(n=i.binaryOps[f.value],h.push(n(e,N(r,i,o),o))):(n=i.binaryOps[f.value],h.push(n(P(e,o),P(r,o))));else if(l===d)s=h.pop(),r=h.pop(),e=h.pop(),"?"===f.value?h.push(N(e?r:s,i,o)):(n=i.ternaryOps[f.value],h.push(n(P(e,o),P(r,o),P(s,o))));else if(l===g)if(f.value in i.functions)h.push(i.functions[f.value]);else if(f.value in i.unaryOps&&i.parser.isOperatorEnabled(f.value))h.push(i.unaryOps[f.value]);else{var v=o[f.value];if(void 0===v)throw new Error("undefined variable: "+f.value);h.push(v)}else if(l===x)e=h.pop(),n=i.unaryOps[f.value],h.push(n(P(e,o)));else if(l===E){for(p=f.value,a=[];0<p--;)a.unshift(P(h.pop(),o));if(!(n=h.pop()).apply||!n.call)throw new Error(n+" is not a function");h.push(n.apply(void 0,a))}else if(l===m)h.push(function(){for(var s=h.pop(),n=[],t=f.value;0<t--;)n.unshift(h.pop());function e(){for(var t=Object.assign({},o),e=0,r=n.length;e<r;e++)t[n[e]]=arguments[e];return N(s,i,t)}var r=h.pop();return Object.defineProperty(e,"name",{value:r,writable:!1}),o[r]=e}());else if(l===A)h.push(S(f,i));else if(l===b)h.push(f);else if(l===k)e=h.pop(),h.push(e[f.value]);else if(l===O)h.pop();else{if(l!==T)throw new Error("invalid Expression");for(p=f.value,a=[];0<p--;)a.unshift(h.pop());h.push(a)}}if(1<h.length)throw new Error("invalid Expression (parity)");return 0===h[0]?0:P(h[0],o)}function S(e,r){return I(e)?e:{type:b,value:function(t){return N(e.value,r,t)}}}function I(t){return t&&t.type===b}function P(t,e){return I(t)?t.value(e):t}function v(t,e){for(var r,s,n,i,o,a,p=[],h=0;h<t.length;h++){var u=t[h],c=u.type;if(c===y)"number"==typeof u.value&&u.value<0?p.push("("+u.value+")"):Array.isArray(u.value)?p.push("["+u.value.map(F).join(", ")+"]"):p.push(F(u.value));else if(c===w)s=p.pop(),r=p.pop(),i=u.value,e?"^"===i?p.push("Math.pow("+r+", "+s+")"):"and"===i?p.push("(!!"+r+" && !!"+s+")"):"or"===i?p.push("(!!"+r+" || !!"+s+")"):"||"===i?p.push("(function(a,b){ return Array.isArray(a) && Array.isArray(b) ? a.concat(b) : String(a) + String(b); }(("+r+"),("+s+")))"):"=="===i?p.push("("+r+" === "+s+")"):"!="===i?p.push("("+r+" !== "+s+")"):"["===i?p.push(r+"[("+s+") | 0]"):p.push("("+r+" "+i+" "+s+")"):"["===i?p.push(r+"["+s+"]"):p.push("("+r+" "+i+" "+s+")");else if(c===d){if(n=p.pop(),s=p.pop(),r=p.pop(),"?"!==(i=u.value))throw new Error("invalid Expression");p.push("("+r+" ? "+s+" : "+n+")")}else if(c===g||c===M)p.push(u.value);else if(c===x)r=p.pop(),"-"===(i=u.value)||"+"===i?p.push("("+i+r+")"):e?"not"===i?p.push("(!"+r+")"):"!"===i?p.push("fac("+r+")"):p.push(i+"("+r+")"):"!"===i?p.push("("+r+"!)"):p.push("("+i+" "+r+")");else if(c===E){for(a=u.value,o=[];0<a--;)o.unshift(p.pop());i=p.pop(),p.push(i+"("+o.join(", ")+")")}else if(c===m){for(s=p.pop(),a=u.value,o=[];0<a--;)o.unshift(p.pop());r=p.pop(),e?p.push("("+r+" = function("+o.join(", ")+") { return "+s+" })"):p.push("("+r+"("+o.join(", ")+") = "+s+")")}else if(c===k)r=p.pop(),p.push(r+"."+u.value);else if(c===T){for(a=u.value,o=[];0<a--;)o.unshift(p.pop());p.push("["+o.join(", ")+"]")}else if(c===A)p.push("("+v(u.value,e)+")");else if(c!==O)throw new Error("invalid Expression")}return 1<p.length&&(p=e?[p.join(",")]:[p.join(";")]),String(p[0])}function F(t){return"string"==typeof t?JSON.stringify(t).replace(/\u2028/g,"\\u2028").replace(/\u2029/g,"\\u2029"):t}function a(t,e){for(var r=0;r<t.length;r++)if(t[r]===e)return!0;return!1}function p(t,e,r){for(var s=!!(r=r||{}).withMembers,n=null,i=0;i<t.length;i++){var o=t[i];o.type===g||o.type===M?s||a(e,o.value)?n=(null!==n&&(a(e,n)||e.push(n)),o.value):e.push(o.value):o.type===k&&s&&null!==n?n+="."+o.value:o.type===A?p(o.value,e,r):null!==n&&(a(e,n)||e.push(n),n=null)}null===n||a(e,n)||e.push(n)}function s(t,e){this.tokens=t,this.parser=e,this.unaryOps=e.unaryOps,this.binaryOps=e.binaryOps,this.ternaryOps=e.ternaryOps,this.functions=e.functions}C.prototype.toString=function(){switch(this.type){case y:case x:case w:case d:case g:case M:case O:return this.value;case E:return"CALL "+this.value;case m:return"DEF "+this.value;case T:return"ARRAY "+this.value;case k:return"."+this.value;default:return"Invalid Instruction"}},s.prototype.simplify=function(t){return t=t||{},new s(function t(e,r,s,n,i){for(var o,a,p,h,u=[],c=[],f=0;f<e.length;f++){var l=e[f],v=l.type;if(v===y||v===M)Array.isArray(l.value)?u.push.apply(u,t(l.value.map(function(t){return new C(y,t)}).concat(new C(T,l.value.length)),r,s,n,i)):u.push(l);else if(v===g&&i.hasOwnProperty(l.value))l=new C(y,i[l.value]),u.push(l);else if(v===w&&1<u.length)a=u.pop(),o=u.pop(),h=s[l.value],l=new C(y,h(o.value,a.value)),u.push(l);else if(v===d&&2<u.length)p=u.pop(),a=u.pop(),o=u.pop(),"?"===l.value?u.push(o.value?a.value:p.value):(h=n[l.value],l=new C(y,h(o.value,a.value,p.value)),u.push(l));else if(v===x&&0<u.length)o=u.pop(),h=r[l.value],l=new C(y,h(o.value)),u.push(l);else if(v===A){for(;0<u.length;)c.push(u.shift());c.push(new C(A,t(l.value,r,s,n,i)))}else if(v===k&&0<u.length)o=u.pop(),u.push(new C(y,o.value[l.value]));else{for(;0<u.length;)c.push(u.shift());c.push(l)}}for(;0<u.length;)c.push(u.shift());return c}(this.tokens,this.unaryOps,this.binaryOps,this.ternaryOps,t),this.parser)},s.prototype.substitute=function(t,e){return e instanceof s||(e=this.parser.parse(String(e))),new s(function t(e,r,s){for(var n=[],i=0;i<e.length;i++){var o=e[i],a=o.type;if(a===g&&o.value===r)for(var p=0;p<s.tokens.length;p++){var h,u=s.tokens[p];h=u.type===x?c(u.value):u.type===w?f(u.value):u.type===d?l(u.value):new C(u.type,u.value),n.push(h)}else a===A?n.push(new C(A,t(o.value,r,s))):n.push(o)}return n}(this.tokens,t,e),this.parser)},s.prototype.evaluate=function(t){return t=t||{},N(this.tokens,this,t)},s.prototype.toString=function(){return v(this.tokens,!1)},s.prototype.symbols=function(t){t=t||{};var e=[];return p(this.tokens,e,t),e},s.prototype.variables=function(t){t=t||{};var e=[];p(this.tokens,e,t);var r=this.functions;return e.filter(function(t){return!(t in r)})},s.prototype.toJSFunction=function(t,e){var r=this,s=new Function(t,"with(this.functions) with (this.ternaryOps) with (this.binaryOps) with (this.unaryOps) { return "+v(this.simplify(e).tokens,!0)+"; }");return function(){return s.apply(r,arguments)}};var n="TEOF",h="TOP",u="TNUMBER",i="TSTRING",o="TPAREN",R="TBRACKET",L="TCOMMA",j="TNAME",U="TSEMICOLON";function q(t,e,r){this.type=t,this.value=e,this.index=r}function B(t,e){this.pos=0,this.current=null,this.unaryOps=t.unaryOps,this.binaryOps=t.binaryOps,this.ternaryOps=t.ternaryOps,this.consts=t.consts,this.expression=e,this.savedPosition=0,this.savedCurrent=null,this.options=t.options,this.parser=t}q.prototype.toString=function(){return this.type+": "+this.value},B.prototype.newToken=function(t,e,r){return new q(t,e,null!=r?r:this.pos)},B.prototype.save=function(){this.savedPosition=this.pos,this.savedCurrent=this.current},B.prototype.restore=function(){this.pos=this.savedPosition,this.current=this.savedCurrent},B.prototype.next=function(){return this.pos>=this.expression.length?this.newToken(n,"EOF"):this.isWhitespace()||this.isComment()?this.next():this.isRadixInteger()||this.isNumber()||this.isOperator()||this.isString()||this.isParen()||this.isBracket()||this.isComma()||this.isSemicolon()||this.isNamedOp()||this.isConst()||this.isName()?this.current:void this.parseError('Unknown character "'+this.expression.charAt(this.pos)+'"')},B.prototype.isString=function(){var t=!1,e=this.pos,r=this.expression.charAt(e);if("'"===r||'"'===r)for(var s=this.expression.indexOf(r,e+1);0<=s&&this.pos<this.expression.length;){if(this.pos=s+1,"\\"!==this.expression.charAt(s-1)){var n=this.expression.substring(e+1,s);this.current=this.newToken(i,this.unescape(n),e),t=!0;break}s=this.expression.indexOf(r,s+1)}return t},B.prototype.isParen=function(){var t=this.expression.charAt(this.pos);return("("===t||")"===t)&&(this.current=this.newToken(o,t),this.pos++,!0)},B.prototype.isBracket=function(){var t=this.expression.charAt(this.pos);return!("["!==t&&"]"!==t||!this.isOperatorEnabled("["))&&(this.current=this.newToken(R,t),this.pos++,!0)},B.prototype.isComma=function(){return","===this.expression.charAt(this.pos)&&(this.current=this.newToken(L,","),this.pos++,!0)},B.prototype.isSemicolon=function(){return";"===this.expression.charAt(this.pos)&&(this.current=this.newToken(U,";"),this.pos++,!0)},B.prototype.isConst=function(){for(var t=this.pos,e=t;e<this.expression.length;e++){var r=this.expression.charAt(e);if(r.toUpperCase()===r.toLowerCase()&&(e===this.pos||"_"!==r&&"."!==r&&(r<"0"||"9"<r)))break}if(t<e){var s=this.expression.substring(t,e);if(s in this.consts)return this.current=this.newToken(u,this.consts[s]),this.pos+=s.length,!0}return!1},B.prototype.isNamedOp=function(){for(var t=this.pos,e=t;e<this.expression.length;e++){var r=this.expression.charAt(e);if(r.toUpperCase()===r.toLowerCase()&&(e===this.pos||"_"!==r&&(r<"0"||"9"<r)))break}if(t<e){var s=this.expression.substring(t,e);if(this.isOperatorEnabled(s)&&(s in this.binaryOps||s in this.unaryOps||s in this.ternaryOps))return this.current=this.newToken(h,s),this.pos+=s.length,!0}return!1},B.prototype.isName=function(){for(var t=this.pos,e=t,r=!1;e<this.expression.length;e++){var s=this.expression.charAt(e);if(s.toUpperCase()===s.toLowerCase()){if(e===this.pos&&("$"===s||"_"===s)){"_"===s&&(r=!0);continue}if(e===this.pos||!r||"_"!==s&&(s<"0"||"9"<s))break}else r=!0}if(r){var n=this.expression.substring(t,e);return this.current=this.newToken(j,n),this.pos+=n.length,!0}return!1},B.prototype.isWhitespace=function(){for(var t=!1,e=this.expression.charAt(this.pos);!(" "!==e&&"\t"!==e&&"\n"!==e&&"\r"!==e||(t=!0,this.pos++,this.pos>=this.expression.length));)e=this.expression.charAt(this.pos);return t};var V=/^[0-9a-f]{4}$/i;function _(t,e,r){this.parser=t,this.tokens=e,this.current=null,this.nextToken=null,this.next(),this.savedCurrent=null,this.savedNextToken=null,this.allowMemberAccess=!1!==r.allowMemberAccess}B.prototype.unescape=function(t){var e=t.indexOf("\\");if(e<0)return t;for(var r=t.substring(0,e);0<=e;){var s=t.charAt(++e);switch(s){case"'":r+="'";break;case'"':r+='"';break;case"\\":r+="\\";break;case"/":r+="/";break;case"b":r+="\b";break;case"f":r+="\f";break;case"n":r+="\n";break;case"r":r+="\r";break;case"t":r+="\t";break;case"u":var n=t.substring(e+1,e+5);V.test(n)||this.parseError("Illegal escape sequence: \\u"+n),r+=String.fromCharCode(parseInt(n,16)),e+=4;break;default:throw this.parseError('Illegal escape sequence: "\\'+s+'"')}++e;var i=t.indexOf("\\",e);r+=t.substring(e,i<0?t.length:i),e=i}return r},B.prototype.isComment=function(){return"/"===this.expression.charAt(this.pos)&&"*"===this.expression.charAt(this.pos+1)&&(this.pos=this.expression.indexOf("*/",this.pos)+2,1===this.pos&&(this.pos=this.expression.length),!0)},B.prototype.isRadixInteger=function(){var t,e,r=this.pos;if(r>=this.expression.length-2||"0"!==this.expression.charAt(r))return!1;if(++r,"x"===this.expression.charAt(r))t=16,e=/^[0-9a-f]$/i,++r;else{if("b"!==this.expression.charAt(r))return!1;t=2,e=/^[01]$/i,++r}for(var s=!1,n=r;r<this.expression.length;){var i=this.expression.charAt(r);if(!e.test(i))break;r++,s=!0}return s&&(this.current=this.newToken(u,parseInt(this.expression.substring(n,r),t)),this.pos=r),s},B.prototype.isNumber=function(){for(var t,e=!1,r=this.pos,s=r,n=r,i=!1,o=!1;r<this.expression.length&&("0"<=(t=this.expression.charAt(r))&&t<="9"||!i&&"."===t);)"."===t?i=!0:o=!0,r++,e=o;if(e&&(n=r),"e"===t||"E"===t){r++;for(var a=!0,p=!1;r<this.expression.length;){if(t=this.expression.charAt(r),!a||"+"!==t&&"-"!==t){if(!("0"<=t&&t<="9"))break;a=!(p=!0)}else a=!1;r++}p||(r=n)}return e?(this.current=this.newToken(u,parseFloat(this.expression.substring(s,r))),this.pos=r):this.pos=n,e},B.prototype.isOperator=function(){var t=this.pos,e=this.expression.charAt(this.pos);if("+"===e||"-"===e||"*"===e||"/"===e||"%"===e||"^"===e||"?"===e||":"===e||"."===e)this.current=this.newToken(h,e);else if("∙"===e||"•"===e)this.current=this.newToken(h,"*");else if(">"===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,">="),this.pos++):this.current=this.newToken(h,">");else if("<"===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"<="),this.pos++):this.current=this.newToken(h,"<");else if("|"===e){if("|"!==this.expression.charAt(this.pos+1))return!1;this.current=this.newToken(h,"||"),this.pos++}else if("="===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"=="),this.pos++):this.current=this.newToken(h,e);else{if("!"!==e)return!1;"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"!="),this.pos++):this.current=this.newToken(h,e)}return this.pos++,!!this.isOperatorEnabled(this.current.value)||(this.pos=t,!1)},B.prototype.isOperatorEnabled=function(t){return this.parser.isOperatorEnabled(t)},B.prototype.getCoordinates=function(){for(var t,e=0,r=-1;e++,t=this.pos-r,0<=(r=this.expression.indexOf("\n",r+1))&&r<this.pos;);return{line:e,column:t}},B.prototype.parseError=function(t){var e=this.getCoordinates();throw new Error("parse error ["+e.line+":"+e.column+"]: "+t)},_.prototype.next=function(){return this.current=this.nextToken,this.nextToken=this.tokens.next()},_.prototype.tokenMatches=function(t,e){return void 0===e||(Array.isArray(e)?a(e,t.value):"function"==typeof e?e(t):t.value===e)},_.prototype.save=function(){this.savedCurrent=this.current,this.savedNextToken=this.nextToken,this.tokens.save()},_.prototype.restore=function(){this.tokens.restore(),this.current=this.savedCurrent,this.nextToken=this.savedNextToken},_.prototype.accept=function(t,e){return!(this.nextToken.type!==t||!this.tokenMatches(this.nextToken,e))&&(this.next(),!0)},_.prototype.expect=function(t,e){if(!this.accept(t,e)){var r=this.tokens.getCoordinates();throw new Error("parse error ["+r.line+":"+r.column+"]: Expected "+(e||t))}},_.prototype.parseAtom=function(t){var e=this.tokens.unaryOps;if(this.accept(j)||this.accept(h,function(t){return t.value in e}))t.push(new C(g,this.current.value));else if(this.accept(u))t.push(new C(y,this.current.value));else if(this.accept(i))t.push(new C(y,this.current.value));else if(this.accept(o,"("))this.parseExpression(t),this.expect(o,")");else{if(!this.accept(R,"["))throw new Error("unexpected "+this.nextToken);if(this.accept(R,"]"))t.push(new C(T,0));else{var r=this.parseArrayList(t);t.push(new C(T,r))}}},_.prototype.parseExpression=function(t){var e=[];this.parseUntilEndStatement(t,e)||(this.parseVariableAssignmentExpression(e),this.parseUntilEndStatement(t,e)||this.pushExpression(t,e))},_.prototype.pushExpression=function(t,e){for(var r=0,s=e.length;r<s;r++)t.push(e[r])},_.prototype.parseUntilEndStatement=function(t,e){return!!this.accept(U)&&(!this.nextToken||this.nextToken.type===n||this.nextToken.type===o&&")"===this.nextToken.value||e.push(new C(O)),this.nextToken.type!==n&&this.parseExpression(e),t.push(new C(A,e)),!0)},_.prototype.parseArrayList=function(t){for(var e=0;!this.accept(R,"]");)for(this.parseExpression(t),++e;this.accept(L);)this.parseExpression(t),++e;return e},_.prototype.parseVariableAssignmentExpression=function(t){for(this.parseConditionalExpression(t);this.accept(h,"=");){var e=t.pop(),r=[],s=t.length-1;if(e.type!==E){if(e.type!==g&&e.type!==k)throw new Error("expected variable for assignment");this.parseVariableAssignmentExpression(r),t.push(new C(M,e.value)),t.push(new C(A,r)),t.push(f("="))}else{if(!this.tokens.isOperatorEnabled("()="))throw new Error("function definition is not permitted");for(var n=0,i=e.value+1;n<i;n++){var o=s-n;t[o].type===g&&(t[o]=new C(M,t[o].value))}this.parseVariableAssignmentExpression(r),t.push(new C(A,r)),t.push(new C(m,e.value))}}},_.prototype.parseConditionalExpression=function(t){for(this.parseOrExpression(t);this.accept(h,"?");){var e=[],r=[];this.parseConditionalExpression(e),this.expect(h,":"),this.parseConditionalExpression(r),t.push(new C(A,e)),t.push(new C(A,r)),t.push(l("?"))}},_.prototype.parseOrExpression=function(t){for(this.parseAndExpression(t);this.accept(h,"or");){var e=[];this.parseAndExpression(e),t.push(new C(A,e)),t.push(f("or"))}},_.prototype.parseAndExpression=function(t){for(this.parseComparison(t);this.accept(h,"and");){var e=[];this.parseComparison(e),t.push(new C(A,e)),t.push(f("and"))}};var r=["==","!=","<","<=",">=",">","in"];_.prototype.parseComparison=function(t){for(this.parseAddSub(t);this.accept(h,r);){var e=this.current;this.parseAddSub(t),t.push(f(e.value))}};var $=["+","-","||"];_.prototype.parseAddSub=function(t){for(this.parseTerm(t);this.accept(h,$);){var e=this.current;this.parseTerm(t),t.push(f(e.value))}};var D=["*","/","%"];function e(t,e){return Number(t)+Number(e)}function G(t,e){return t-e}function J(t,e){return t*e}function W(t,e){return t/e}function X(t,e){return t%e}function Y(t,e){return Array.isArray(t)&&Array.isArray(e)?t.concat(e):""+t+e}function K(t,e){return t===e}function z(t,e){return t!==e}function H(t,e){return e<t}function Q(t,e){return t<e}function Z(t,e){return e<=t}function tt(t,e){return t<=e}function et(t,e){return Boolean(t&&e)}function rt(t,e){return Boolean(t||e)}function st(t,e){return a(e,t)}function nt(t){return(Math.exp(t)-Math.exp(-t))/2}function it(t){return(Math.exp(t)+Math.exp(-t))/2}function ot(t){return t===1/0?1:t===-1/0?-1:(Math.exp(t)-Math.exp(-t))/(Math.exp(t)+Math.exp(-t))}function at(t){return t===-1/0?t:Math.log(t+Math.sqrt(t*t+1))}function pt(t){return Math.log(t+Math.sqrt(t*t-1))}function ht(t){return Math.log((1+t)/(1-t))/2}function ut(t){return Math.log(t)*Math.LOG10E}function ct(t){return-t}function ft(t){return!t}function lt(t){return t<0?Math.ceil(t):Math.floor(t)}function vt(t){return Math.random()*(t||1)}function yt(t){return dt(t+1)}_.prototype.parseTerm=function(t){for(this.parseFactor(t);this.accept(h,D);){var e=this.current;this.parseFactor(t),t.push(f(e.value))}},_.prototype.parseFactor=function(t){var e=this.tokens.unaryOps;if(this.save(),this.accept(h,function(t){return t.value in e})){if("-"!==this.current.value&&"+"!==this.current.value){if(this.nextToken.type===o&&"("===this.nextToken.value)return this.restore(),void this.parseExponential(t);if(this.nextToken.type===U||this.nextToken.type===L||this.nextToken.type===n||this.nextToken.type===o&&")"===this.nextToken.value)return this.restore(),void this.parseAtom(t)}var r=this.current;this.parseFactor(t),t.push(c(r.value))}else this.parseExponential(t)},_.prototype.parseExponential=function(t){for(this.parsePostfixExpression(t);this.accept(h,"^");)this.parseFactor(t),t.push(f("^"))},_.prototype.parsePostfixExpression=function(t){for(this.parseFunctionCall(t);this.accept(h,"!");)t.push(c("!"))},_.prototype.parseFunctionCall=function(t){var e=this.tokens.unaryOps;if(this.accept(h,function(t){return t.value in e})){var r=this.current;this.parseAtom(t),t.push(c(r.value))}else for(this.parseMemberExpression(t);this.accept(o,"(");)if(this.accept(o,")"))t.push(new C(E,0));else{var s=this.parseArgumentList(t);t.push(new C(E,s))}},_.prototype.parseArgumentList=function(t){for(var e=0;!this.accept(o,")");)for(this.parseExpression(t),++e;this.accept(L);)this.parseExpression(t),++e;return e},_.prototype.parseMemberExpression=function(t){for(this.parseAtom(t);this.accept(h,".")||this.accept(R,"[");){var e=this.current;if("."===e.value){if(!this.allowMemberAccess)throw new Error('unexpected ".", member access is not permitted');this.expect(j),t.push(new C(k,this.current.value))}else{if("["!==e.value)throw new Error("unexpected symbol: "+e.value);if(!this.tokens.isOperatorEnabled("["))throw new Error('unexpected "[]", arrays are disabled');this.parseExpression(t),this.expect(R,"]"),t.push(f("["))}}};var xt=4.7421875,wt=[.9999999999999971,57.15623566586292,-59.59796035547549,14.136097974741746,-.4919138160976202,3399464998481189e-20,4652362892704858e-20,-9837447530487956e-20,.0001580887032249125,-.00021026444172410488,.00021743961811521265,-.0001643181065367639,8441822398385275e-20,-26190838401581408e-21,36899182659531625e-22];function dt(t){var e,r;if(function(t){return isFinite(t)&&t===Math.round(t)}(t)){if(t<=0)return isFinite(t)?1/0:NaN;if(171<t)return 1/0;for(var s=t-2,n=t-1;1<s;)n*=s,s--;return 0===n&&(n=1),n}if(t<.5)return Math.PI/(Math.sin(Math.PI*t)*dt(1-t));if(171.35<=t)return 1/0;if(85<t){var i=t*t,o=i*t,a=o*t,p=a*t;return Math.sqrt(2*Math.PI/t)*Math.pow(t/Math.E,t)*(1+1/(12*t)+1/(288*i)-139/(51840*o)-571/(2488320*a)+163879/(209018880*p)+5246819/(75246796800*p*t))}--t,r=wt[0];for(var h=1;h<wt.length;++h)r+=wt[h]/(t+h);return e=t+xt+.5,Math.sqrt(2*Math.PI)*Math.pow(e,t+.5)*Math.exp(-e)*r}function gt(t){return Array.isArray(t)?t.length:String(t).length}function Mt(){for(var t=0,e=0,r=0;r<arguments.length;r++){var s,n=Math.abs(arguments[r]);e<n?(t=t*(s=e/n)*s+1,e=n):t+=0<n?(s=n/e)*s:n}return e===1/0?1/0:e*Math.sqrt(t)}function Et(t,e,r){return t?e:r}function mt(t,e){return void 0===e||0==+e?Math.round(t):(t=+t,e=-+e,isNaN(t)||"number"!=typeof e||e%1!=0?NaN:(t=t.toString().split("e"),+((t=(t=Math.round(+(t[0]+"e"+(t[1]?+t[1]-e:-e)))).toString().split("e"))[0]+"e"+(t[1]?+t[1]+e:e))))}function At(t,e,r){return r&&(r[t]=e),e}function bt(t,e){return t[0|e]}function kt(t){return 1===arguments.length&&Array.isArray(t)?Math.max.apply(Math,t):Math.max.apply(Math,arguments)}function Ot(t){return 1===arguments.length&&Array.isArray(t)?Math.min.apply(Math,t):Math.min.apply(Math,arguments)}function Tt(r,t){if("function"!=typeof r)throw new Error("First argument to map is not a function");if(!Array.isArray(t))throw new Error("Second argument to map is not an array");return t.map(function(t,e){return r(t,e)})}function Ct(s,t,e){if("function"!=typeof s)throw new Error("First argument to fold is not a function");if(!Array.isArray(e))throw new Error("Second argument to fold is not an array");return e.reduce(function(t,e,r){return s(t,e,r)},t)}function Nt(r,t){if("function"!=typeof r)throw new Error("First argument to filter is not a function");if(!Array.isArray(t))throw new Error("Second argument to filter is not an array");return t.filter(function(t,e){return r(t,e)})}function St(t,e){if(!Array.isArray(e)&&"string"!=typeof e)throw new Error("Second argument to indexOf is not a string or array");return e.indexOf(t)}function It(t,e){if(!Array.isArray(e))throw new Error("Second argument to join is not an array");return e.join(t)}function Pt(t){return(0<t)-(t<0)||+t}var Ft=1/3;function Rt(t){return t<0?-Math.pow(-t,Ft):Math.pow(t,Ft)}function Lt(t){return Math.exp(t)-1}function jt(t){return Math.log(1+t)}function Ut(t){return Math.log(t)/Math.LN2}function qt(t){this.options=t||{},this.unaryOps={sin:Math.sin,cos:Math.cos,tan:Math.tan,asin:Math.asin,acos:Math.acos,atan:Math.atan,sinh:Math.sinh||nt,cosh:Math.cosh||it,tanh:Math.tanh||ot,asinh:Math.asinh||at,acosh:Math.acosh||pt,atanh:Math.atanh||ht,sqrt:Math.sqrt,cbrt:Math.cbrt||Rt,log:Math.log,log2:Math.log2||Ut,ln:Math.log,lg:Math.log10||ut,log10:Math.log10||ut,expm1:Math.expm1||Lt,log1p:Math.log1p||jt,abs:Math.abs,ceil:Math.ceil,floor:Math.floor,round:Math.round,trunc:Math.trunc||lt,"-":ct,"+":Number,exp:Math.exp,not:ft,length:gt,"!":yt,sign:Math.sign||Pt},this.binaryOps={"+":e,"-":G,"*":J,"/":W,"%":X,"^":Math.pow,"||":Y,"==":K,"!=":z,">":H,"<":Q,">=":Z,"<=":tt,and:et,or:rt,in:st,"=":At,"[":bt},this.ternaryOps={"?":Et},this.functions={random:vt,fac:yt,min:Ot,max:kt,hypot:Math.hypot||Mt,pyt:Math.hypot||Mt,pow:Math.pow,atan2:Math.atan2,if:Et,gamma:dt,roundTo:mt,map:Tt,fold:Ct,filter:Nt,indexOf:St,join:It},this.consts={E:Math.E,PI:Math.PI,true:!0,false:!1}}qt.prototype.parse=function(t){var e=[],r=new _(this,new B(this,t),{allowMemberAccess:this.options.allowMemberAccess});return r.parseExpression(e),r.expect(n,"EOF"),new s(e,this)},qt.prototype.evaluate=function(t,e){return this.parse(t).evaluate(e)};var Bt=new qt;qt.parse=function(t){return Bt.parse(t)},qt.evaluate=function(t,e){return Bt.parse(t).evaluate(e)};var Vt={"+":"add","-":"subtract","*":"multiply","/":"divide","%":"remainder","^":"power","!":"factorial","<":"comparison",">":"comparison","<=":"comparison",">=":"comparison","==":"comparison","!=":"comparison","||":"concatenate",and:"logical",or:"logical",not:"logical","?":"conditional",":":"conditional","=":"assignment","[":"array","()=":"fndef"};qt.prototype.isOperatorEnabled=function(t){var e=function(t){return Vt.hasOwnProperty(t)?Vt[t]:t}(t),r=this.options.operators||{};return!(e in r&&!r[e])};var _t={Parser:qt,Expression:s};t.Expression=s,t.Parser=qt,t.default=_t,Object.defineProperty(t,"__esModule",{value:!0})});

/**
* 数式に数学関数以外の関数が含まれている場合のエラー
*/
class MathFunctionError extends Error {
/**
* @param {string} message - エラーメッセージ
*/
constructor(message) {
super(message || "数学関数以外の関数が含まれています");
this.name = "MathFunctionError";
}
}

var sel = document.selection;

doMultiEdit(main);

function main() {
var isEmpty = sel.IsEmpty;
var activePointY = sel.GetActivePointY(mePosLogical);
if (isEmpty) {
var exp = document.GetLine(activePointY);
} else {
var exp = sel.Text;
}
// 空白行の場合は何もしない
if (exp.match(/^\s*$/)) {
return;
}

try {
var exp_replaced = replaceExpression(exp);
const Parser = exprEval.Parser;
let r = Parser.evaluate(exp_replaced);
try {
r = r.toFixed(15);
const intPart = r.match(/([0-9]+)\./);
const fractionalPart = r.match(/\.([0-9]+$)/);
if (intPart && fractionalPart) {
// 小数点以下は12桁で切る
const f = fractionalPart[1].slice(0,12).replace(/[0]+$/, "")
r = intPart[1] + (f ? `.${f}` : "");
}
} catch(e) {}
var result_str = String(r);
} catch (e) {
if (e instanceof MathFunctionError) {
alert(e.message)
} else {
alert(e + "\n入力: " + exp + "\n入力変換後: " + exp_replaced)
}
return;
}

// 小数点以上のみカンマ区切り
if (COMMA) {
var result_parts = result_str.split(".");
result_parts[0] = result_parts[0].replace(/(\d)(?=(\d{3})+$)/g, "$1,");
if (result_parts.length > 1) {
result_str = result_parts.join(".");
} else {
result_str = result_parts[0];
}
}

// 計算行が = 始まりの場合、= を削除する
if (isEmpty && exp.match(/^= /)) {
sel.SetActivePoint(mePosLogical, 1, activePointY, false);
sel.EndOfLine(true, mePosLogical);
sel.Text = sel.Text.replace(/^= /, "");
}

// 既存の計算結果を上書きするか判定
var pattern = /^=\s*(-?[0-9.,]|true|false)*\s*$/;
var nextLine = document.GetLine(activePointY + 1);
if (isEmpty && nextLine.match(pattern)) {
sel.SetActivePoint(mePosLogical, 1, activePointY + 1, false);
sel.EndOfLine(true, mePosLogical);
sel.Text = '= ' + result_str
} else if (isEmpty) {
sel.LineOpen();
sel.Text = '= ' + result_str
} else {
sel.CharRight();
const inputExp = exp.replace(/((?!;)\n)/mg, "; ").replace(/;\s*;/g, ";").replace(/　/g, " ").replace(/;\s*$/, "").trim();
if (exp.slice(-1) === "\n") {
sel.Text = inputExp + ' = ' + result_str + '\n';
} else {
sel.Text = '\n' + inputExp + ' = ' + result_str + '\n';
}
sel.CharLeft();
}

if (COPY) {
ClipboardData.SetData(result_str);
Status = "計算結果 " + result_str + " をコピーしました"
}
}

/**
* 数式を置換する
*/
function replaceExpression(exp) {
const exp_replaced = exp.trim()
// 先頭の = を削除
.replace(/^= /, "")
// 改行を ; に置換
.replace(/(?<!;)\n/mg, ";")
// 非ASCII文字を削除
.replace(/[^\x20-\x7e]/g, " ")
// 全角スペースを半角スペースに変換
.replace(/　/g, " ")
// 数字内のカンマを取り除く
.replace(/(\d),(?! )/g, "$1")
// 予約語を退避
.replace(/(?:^|\s)(PI|true|false)(?:$|\s)/g, " %%%$1%%% ")
// 指数形式を退避
.replace(/([0-9]+(?:\.[0-9]+)?[eE][0-9]+)/g, " %%%$1%%% ")
// 変数形式を退避
.replace(/\$([a-zA-Z][a-zA-Z0-9]*)/g, " %%%$1%%% ")
// `/hour` などの文字列はスラッシュごと削除
.replace(/\/\s*[a-zA-Z\u0080-\uFFFF]/g, " ")
// 不要な括弧書きを削除
.replace(/\[[^\]]*\]/g, " ")
// その他の文字を削除。退避文字と関数の可能性がある abc( 形式は削除しない
.replace(/[^0-9.+\-*/%^=()<>!;\s]+(?![a-zA-Z0-9]*%%% |[a-z0-9]*\s*\([^)])/g, " ")
// 退避文字を復元
.replace(/ %%%([a-zA-Z][a-zA-Z0-9]*)%%% /g, "$1")
// 数式が数学関数以外を含む場合はエラー
if (containsNotMathFunction(exp_replaced)) {
throw new MathFunctionError("数式に数学関数以外の関数が含まれています\n入力: " + exp + "\n入力変換後: " + exp_replaced);
}

return exp_replaced;
}

/**
* 数学関数以外を含むかどうかを判定する
* max(x, y, ...) のような複数の引数を受け取る関数もOK扱いにはするが、動作は保証しないものとする
*/
function containsNotMathFunction(exp) {
var functions = [
"abs",
"acos",
"acosh",
"asin",
"asinh",
"atan",
"atanh",
"cbrt",
"ceil",
"cos",
"cosh",
"exp",
"expm1",
"floor",
"length",
"ln",
"log",
"log10",
"log2",
"log1p",
"not",
"round",
"sign",
"sin",
"sinh",
"sqrt",
"tan",
"tanh",
"trunc",
"random",
"fac",
"min",
"max",
"hypot",
"pyt",
"pow",
"atan2",
"roundTo",
"map",
"fold",
"filter",
"indexOf",
"join",
"if",
]
// 検査対象の文字列を取得
var match = exp.match(/([a-z][a-z0-9]+)\s*\(/g);
if (!match) {
return false;
}
// 検査対象の文字列が数学関数に含まれていない場合は true
for (var i = 0; i < match.length; i++) {
var func = match[i].replace(/\s*\(/, "");
if (functions.indexOf(func) == -1) {
return true;
}
}
// 検査対象の文字列が数学関数のみの場合は false
return false;
}
</syntaxhighlight>

== サードパーティライブラリ ==

[https://github.com/silentmatt/expr-eval/ expr-eval]

Mery 電卓

2025-03-18T01:13:04Z

Yuko: /* ソースコード */

== 概要 ==

「Mery 電卓」は、Meryエディタ上で数式を計算するためのマクロです。標準的な数学関数をサポートしており、カーソル位置の行または選択したテキストを数式として解釈し、結果を表示します。計算結果は自動的にクリップボードにコピーされ、カンマ区切りの数値として表示されます。

本マクロをショートカットキーに設定し、いつでも起動できるようにしておくと日常シーンで何かと便利です。作者は「Ctrl + Alt + Enter」キーに割り当てて利用しています。

== 注意事項 ==

* Mery Ver 3.7.12 で動作確認しています。

== 使い方 ==

1. '''行全体を計算する場合''':

* 計算したい数式が書かれた行にカーソルを置きます。
* マクロを実行すると、次の行に「= 計算結果」が表示されます。
* 既に結果行がある場合は、その行が更新されます。

2. '''選択範囲を計算する場合''':

* 計算したい数式部分を選択します。
* マクロを実行すると、選択範囲の後ろに「計算式 = 計算結果」が挿入されます。

3. '''サポートされている演算子''':

* 四則演算（+, -, *, /）
* べき乗（^）
* 剰余（%）
* 比較演算子（<, >, <=, >=, ==, !=）
* 論理演算子（and, or, not）

4. '''サポートされている関数''':

* 三角関数（sin, cos, tan, asin, acos, atan）
* 双曲線関数（sinh, cosh, tanh, asinh, acosh, atanh）
* 対数関数（log, log10, log2, ln）
* その他の数学関数（sqrt, cbrt, abs, ceil, floor, round, trunc など）

5. '''特別な機能''':

* カンマ区切り表示: 計算結果は読みやすいようにカンマ区切りで表示されます。変数「COMMA」を設定することで調整可能です。
* 自動コピー: 計算結果は自動的にクリップボードにコピーされます。変数「COPY」を設定することで調整可能です。
* 計算結果の再利用: 行頭の「= 」は入力から無視されるため、計算結果の位置からスムーズに次の数式として利用できます。
* 変数の利用: 複数行、または「;」で区切ることで、変数を使った数式が利用できます。変数形式は「$[a-zA-Z][a-zA-Z0-9]*」に対応しています。例えば「$a = 2; $a * 3」として実行すると、結果は「6」と出力されます。
* メモ書きから計算: 数字や関数以外の文字はできるだけ除外した上で計算をします。例えば「月100円 * 12ヶ月」のようなメモ書きに対して実行すると「1,200」と出力されます。 [ と ] で囲まれた文字列は丸ごと除外するため、コメントに最適です。

== ソースコード ==

<syntaxhighlight lang="javascript">
#title = "Mery 電卓"
#include "Common.js"
#language = "v8"
Redraw = false;
BeginUndoGroup();

// 結果をクリップボードにコピー
var COPY = true;
// 出力結果をカンマ区切りにする
var COMMA = true;

// expr-eval ライブラリ
// from: https://cdn.jsdelivr.net/npm/expr-eval@2.0.2/dist/bundle.min.js
!function(t,e){"object"==typeof exports&&"undefined"!=typeof module?e(exports):"function"==typeof define&&define.amd?define(["exports"],e):e((t=t||self).exprEval={})}(this,function(t){"use strict";var y="INUMBER",x="IOP1",w="IOP2",d="IOP3",g="IVAR",M="IVARNAME",E="IFUNCALL",m="IFUNDEF",A="IEXPR",b="IEXPREVAL",k="IMEMBER",O="IENDSTATEMENT",T="IARRAY";function C(t,e){this.type=t,this.value=null!=e?e:0}function c(t){return new C(x,t)}function f(t){return new C(w,t)}function l(t){return new C(d,t)}function N(t,i,o){var e,r,s,n,a,p,h=[];if(I(t))return P(t,o);for(var u=t.length,c=0;c<u;c++){var f=t[c],l=f.type;if(l===y||l===M)h.push(f.value);else if(l===w)r=h.pop(),e=h.pop(),"and"===f.value?h.push(!!e&&!!N(r,i,o)):"or"===f.value?h.push(!!e||!!N(r,i,o)):"="===f.value?(n=i.binaryOps[f.value],h.push(n(e,N(r,i,o),o))):(n=i.binaryOps[f.value],h.push(n(P(e,o),P(r,o))));else if(l===d)s=h.pop(),r=h.pop(),e=h.pop(),"?"===f.value?h.push(N(e?r:s,i,o)):(n=i.ternaryOps[f.value],h.push(n(P(e,o),P(r,o),P(s,o))));else if(l===g)if(f.value in i.functions)h.push(i.functions[f.value]);else if(f.value in i.unaryOps&&i.parser.isOperatorEnabled(f.value))h.push(i.unaryOps[f.value]);else{var v=o[f.value];if(void 0===v)throw new Error("undefined variable: "+f.value);h.push(v)}else if(l===x)e=h.pop(),n=i.unaryOps[f.value],h.push(n(P(e,o)));else if(l===E){for(p=f.value,a=[];0<p--;)a.unshift(P(h.pop(),o));if(!(n=h.pop()).apply||!n.call)throw new Error(n+" is not a function");h.push(n.apply(void 0,a))}else if(l===m)h.push(function(){for(var s=h.pop(),n=[],t=f.value;0<t--;)n.unshift(h.pop());function e(){for(var t=Object.assign({},o),e=0,r=n.length;e<r;e++)t[n[e]]=arguments[e];return N(s,i,t)}var r=h.pop();return Object.defineProperty(e,"name",{value:r,writable:!1}),o[r]=e}());else if(l===A)h.push(S(f,i));else if(l===b)h.push(f);else if(l===k)e=h.pop(),h.push(e[f.value]);else if(l===O)h.pop();else{if(l!==T)throw new Error("invalid Expression");for(p=f.value,a=[];0<p--;)a.unshift(h.pop());h.push(a)}}if(1<h.length)throw new Error("invalid Expression (parity)");return 0===h[0]?0:P(h[0],o)}function S(e,r){return I(e)?e:{type:b,value:function(t){return N(e.value,r,t)}}}function I(t){return t&&t.type===b}function P(t,e){return I(t)?t.value(e):t}function v(t,e){for(var r,s,n,i,o,a,p=[],h=0;h<t.length;h++){var u=t[h],c=u.type;if(c===y)"number"==typeof u.value&&u.value<0?p.push("("+u.value+")"):Array.isArray(u.value)?p.push("["+u.value.map(F).join(", ")+"]"):p.push(F(u.value));else if(c===w)s=p.pop(),r=p.pop(),i=u.value,e?"^"===i?p.push("Math.pow("+r+", "+s+")"):"and"===i?p.push("(!!"+r+" && !!"+s+")"):"or"===i?p.push("(!!"+r+" || !!"+s+")"):"||"===i?p.push("(function(a,b){ return Array.isArray(a) && Array.isArray(b) ? a.concat(b) : String(a) + String(b); }(("+r+"),("+s+")))"):"=="===i?p.push("("+r+" === "+s+")"):"!="===i?p.push("("+r+" !== "+s+")"):"["===i?p.push(r+"[("+s+") | 0]"):p.push("("+r+" "+i+" "+s+")"):"["===i?p.push(r+"["+s+"]"):p.push("("+r+" "+i+" "+s+")");else if(c===d){if(n=p.pop(),s=p.pop(),r=p.pop(),"?"!==(i=u.value))throw new Error("invalid Expression");p.push("("+r+" ? "+s+" : "+n+")")}else if(c===g||c===M)p.push(u.value);else if(c===x)r=p.pop(),"-"===(i=u.value)||"+"===i?p.push("("+i+r+")"):e?"not"===i?p.push("(!"+r+")"):"!"===i?p.push("fac("+r+")"):p.push(i+"("+r+")"):"!"===i?p.push("("+r+"!)"):p.push("("+i+" "+r+")");else if(c===E){for(a=u.value,o=[];0<a--;)o.unshift(p.pop());i=p.pop(),p.push(i+"("+o.join(", ")+")")}else if(c===m){for(s=p.pop(),a=u.value,o=[];0<a--;)o.unshift(p.pop());r=p.pop(),e?p.push("("+r+" = function("+o.join(", ")+") { return "+s+" })"):p.push("("+r+"("+o.join(", ")+") = "+s+")")}else if(c===k)r=p.pop(),p.push(r+"."+u.value);else if(c===T){for(a=u.value,o=[];0<a--;)o.unshift(p.pop());p.push("["+o.join(", ")+"]")}else if(c===A)p.push("("+v(u.value,e)+")");else if(c!==O)throw new Error("invalid Expression")}return 1<p.length&&(p=e?[p.join(",")]:[p.join(";")]),String(p[0])}function F(t){return"string"==typeof t?JSON.stringify(t).replace(/\u2028/g,"\\u2028").replace(/\u2029/g,"\\u2029"):t}function a(t,e){for(var r=0;r<t.length;r++)if(t[r]===e)return!0;return!1}function p(t,e,r){for(var s=!!(r=r||{}).withMembers,n=null,i=0;i<t.length;i++){var o=t[i];o.type===g||o.type===M?s||a(e,o.value)?n=(null!==n&&(a(e,n)||e.push(n)),o.value):e.push(o.value):o.type===k&&s&&null!==n?n+="."+o.value:o.type===A?p(o.value,e,r):null!==n&&(a(e,n)||e.push(n),n=null)}null===n||a(e,n)||e.push(n)}function s(t,e){this.tokens=t,this.parser=e,this.unaryOps=e.unaryOps,this.binaryOps=e.binaryOps,this.ternaryOps=e.ternaryOps,this.functions=e.functions}C.prototype.toString=function(){switch(this.type){case y:case x:case w:case d:case g:case M:case O:return this.value;case E:return"CALL "+this.value;case m:return"DEF "+this.value;case T:return"ARRAY "+this.value;case k:return"."+this.value;default:return"Invalid Instruction"}},s.prototype.simplify=function(t){return t=t||{},new s(function t(e,r,s,n,i){for(var o,a,p,h,u=[],c=[],f=0;f<e.length;f++){var l=e[f],v=l.type;if(v===y||v===M)Array.isArray(l.value)?u.push.apply(u,t(l.value.map(function(t){return new C(y,t)}).concat(new C(T,l.value.length)),r,s,n,i)):u.push(l);else if(v===g&&i.hasOwnProperty(l.value))l=new C(y,i[l.value]),u.push(l);else if(v===w&&1<u.length)a=u.pop(),o=u.pop(),h=s[l.value],l=new C(y,h(o.value,a.value)),u.push(l);else if(v===d&&2<u.length)p=u.pop(),a=u.pop(),o=u.pop(),"?"===l.value?u.push(o.value?a.value:p.value):(h=n[l.value],l=new C(y,h(o.value,a.value,p.value)),u.push(l));else if(v===x&&0<u.length)o=u.pop(),h=r[l.value],l=new C(y,h(o.value)),u.push(l);else if(v===A){for(;0<u.length;)c.push(u.shift());c.push(new C(A,t(l.value,r,s,n,i)))}else if(v===k&&0<u.length)o=u.pop(),u.push(new C(y,o.value[l.value]));else{for(;0<u.length;)c.push(u.shift());c.push(l)}}for(;0<u.length;)c.push(u.shift());return c}(this.tokens,this.unaryOps,this.binaryOps,this.ternaryOps,t),this.parser)},s.prototype.substitute=function(t,e){return e instanceof s||(e=this.parser.parse(String(e))),new s(function t(e,r,s){for(var n=[],i=0;i<e.length;i++){var o=e[i],a=o.type;if(a===g&&o.value===r)for(var p=0;p<s.tokens.length;p++){var h,u=s.tokens[p];h=u.type===x?c(u.value):u.type===w?f(u.value):u.type===d?l(u.value):new C(u.type,u.value),n.push(h)}else a===A?n.push(new C(A,t(o.value,r,s))):n.push(o)}return n}(this.tokens,t,e),this.parser)},s.prototype.evaluate=function(t){return t=t||{},N(this.tokens,this,t)},s.prototype.toString=function(){return v(this.tokens,!1)},s.prototype.symbols=function(t){t=t||{};var e=[];return p(this.tokens,e,t),e},s.prototype.variables=function(t){t=t||{};var e=[];p(this.tokens,e,t);var r=this.functions;return e.filter(function(t){return!(t in r)})},s.prototype.toJSFunction=function(t,e){var r=this,s=new Function(t,"with(this.functions) with (this.ternaryOps) with (this.binaryOps) with (this.unaryOps) { return "+v(this.simplify(e).tokens,!0)+"; }");return function(){return s.apply(r,arguments)}};var n="TEOF",h="TOP",u="TNUMBER",i="TSTRING",o="TPAREN",R="TBRACKET",L="TCOMMA",j="TNAME",U="TSEMICOLON";function q(t,e,r){this.type=t,this.value=e,this.index=r}function B(t,e){this.pos=0,this.current=null,this.unaryOps=t.unaryOps,this.binaryOps=t.binaryOps,this.ternaryOps=t.ternaryOps,this.consts=t.consts,this.expression=e,this.savedPosition=0,this.savedCurrent=null,this.options=t.options,this.parser=t}q.prototype.toString=function(){return this.type+": "+this.value},B.prototype.newToken=function(t,e,r){return new q(t,e,null!=r?r:this.pos)},B.prototype.save=function(){this.savedPosition=this.pos,this.savedCurrent=this.current},B.prototype.restore=function(){this.pos=this.savedPosition,this.current=this.savedCurrent},B.prototype.next=function(){return this.pos>=this.expression.length?this.newToken(n,"EOF"):this.isWhitespace()||this.isComment()?this.next():this.isRadixInteger()||this.isNumber()||this.isOperator()||this.isString()||this.isParen()||this.isBracket()||this.isComma()||this.isSemicolon()||this.isNamedOp()||this.isConst()||this.isName()?this.current:void this.parseError('Unknown character "'+this.expression.charAt(this.pos)+'"')},B.prototype.isString=function(){var t=!1,e=this.pos,r=this.expression.charAt(e);if("'"===r||'"'===r)for(var s=this.expression.indexOf(r,e+1);0<=s&&this.pos<this.expression.length;){if(this.pos=s+1,"\\"!==this.expression.charAt(s-1)){var n=this.expression.substring(e+1,s);this.current=this.newToken(i,this.unescape(n),e),t=!0;break}s=this.expression.indexOf(r,s+1)}return t},B.prototype.isParen=function(){var t=this.expression.charAt(this.pos);return("("===t||")"===t)&&(this.current=this.newToken(o,t),this.pos++,!0)},B.prototype.isBracket=function(){var t=this.expression.charAt(this.pos);return!("["!==t&&"]"!==t||!this.isOperatorEnabled("["))&&(this.current=this.newToken(R,t),this.pos++,!0)},B.prototype.isComma=function(){return","===this.expression.charAt(this.pos)&&(this.current=this.newToken(L,","),this.pos++,!0)},B.prototype.isSemicolon=function(){return";"===this.expression.charAt(this.pos)&&(this.current=this.newToken(U,";"),this.pos++,!0)},B.prototype.isConst=function(){for(var t=this.pos,e=t;e<this.expression.length;e++){var r=this.expression.charAt(e);if(r.toUpperCase()===r.toLowerCase()&&(e===this.pos||"_"!==r&&"."!==r&&(r<"0"||"9"<r)))break}if(t<e){var s=this.expression.substring(t,e);if(s in this.consts)return this.current=this.newToken(u,this.consts[s]),this.pos+=s.length,!0}return!1},B.prototype.isNamedOp=function(){for(var t=this.pos,e=t;e<this.expression.length;e++){var r=this.expression.charAt(e);if(r.toUpperCase()===r.toLowerCase()&&(e===this.pos||"_"!==r&&(r<"0"||"9"<r)))break}if(t<e){var s=this.expression.substring(t,e);if(this.isOperatorEnabled(s)&&(s in this.binaryOps||s in this.unaryOps||s in this.ternaryOps))return this.current=this.newToken(h,s),this.pos+=s.length,!0}return!1},B.prototype.isName=function(){for(var t=this.pos,e=t,r=!1;e<this.expression.length;e++){var s=this.expression.charAt(e);if(s.toUpperCase()===s.toLowerCase()){if(e===this.pos&&("$"===s||"_"===s)){"_"===s&&(r=!0);continue}if(e===this.pos||!r||"_"!==s&&(s<"0"||"9"<s))break}else r=!0}if(r){var n=this.expression.substring(t,e);return this.current=this.newToken(j,n),this.pos+=n.length,!0}return!1},B.prototype.isWhitespace=function(){for(var t=!1,e=this.expression.charAt(this.pos);!(" "!==e&&"\t"!==e&&"\n"!==e&&"\r"!==e||(t=!0,this.pos++,this.pos>=this.expression.length));)e=this.expression.charAt(this.pos);return t};var V=/^[0-9a-f]{4}$/i;function _(t,e,r){this.parser=t,this.tokens=e,this.current=null,this.nextToken=null,this.next(),this.savedCurrent=null,this.savedNextToken=null,this.allowMemberAccess=!1!==r.allowMemberAccess}B.prototype.unescape=function(t){var e=t.indexOf("\\");if(e<0)return t;for(var r=t.substring(0,e);0<=e;){var s=t.charAt(++e);switch(s){case"'":r+="'";break;case'"':r+='"';break;case"\\":r+="\\";break;case"/":r+="/";break;case"b":r+="\b";break;case"f":r+="\f";break;case"n":r+="\n";break;case"r":r+="\r";break;case"t":r+="\t";break;case"u":var n=t.substring(e+1,e+5);V.test(n)||this.parseError("Illegal escape sequence: \\u"+n),r+=String.fromCharCode(parseInt(n,16)),e+=4;break;default:throw this.parseError('Illegal escape sequence: "\\'+s+'"')}++e;var i=t.indexOf("\\",e);r+=t.substring(e,i<0?t.length:i),e=i}return r},B.prototype.isComment=function(){return"/"===this.expression.charAt(this.pos)&&"*"===this.expression.charAt(this.pos+1)&&(this.pos=this.expression.indexOf("*/",this.pos)+2,1===this.pos&&(this.pos=this.expression.length),!0)},B.prototype.isRadixInteger=function(){var t,e,r=this.pos;if(r>=this.expression.length-2||"0"!==this.expression.charAt(r))return!1;if(++r,"x"===this.expression.charAt(r))t=16,e=/^[0-9a-f]$/i,++r;else{if("b"!==this.expression.charAt(r))return!1;t=2,e=/^[01]$/i,++r}for(var s=!1,n=r;r<this.expression.length;){var i=this.expression.charAt(r);if(!e.test(i))break;r++,s=!0}return s&&(this.current=this.newToken(u,parseInt(this.expression.substring(n,r),t)),this.pos=r),s},B.prototype.isNumber=function(){for(var t,e=!1,r=this.pos,s=r,n=r,i=!1,o=!1;r<this.expression.length&&("0"<=(t=this.expression.charAt(r))&&t<="9"||!i&&"."===t);)"."===t?i=!0:o=!0,r++,e=o;if(e&&(n=r),"e"===t||"E"===t){r++;for(var a=!0,p=!1;r<this.expression.length;){if(t=this.expression.charAt(r),!a||"+"!==t&&"-"!==t){if(!("0"<=t&&t<="9"))break;a=!(p=!0)}else a=!1;r++}p||(r=n)}return e?(this.current=this.newToken(u,parseFloat(this.expression.substring(s,r))),this.pos=r):this.pos=n,e},B.prototype.isOperator=function(){var t=this.pos,e=this.expression.charAt(this.pos);if("+"===e||"-"===e||"*"===e||"/"===e||"%"===e||"^"===e||"?"===e||":"===e||"."===e)this.current=this.newToken(h,e);else if("∙"===e||"•"===e)this.current=this.newToken(h,"*");else if(">"===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,">="),this.pos++):this.current=this.newToken(h,">");else if("<"===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"<="),this.pos++):this.current=this.newToken(h,"<");else if("|"===e){if("|"!==this.expression.charAt(this.pos+1))return!1;this.current=this.newToken(h,"||"),this.pos++}else if("="===e)"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"=="),this.pos++):this.current=this.newToken(h,e);else{if("!"!==e)return!1;"="===this.expression.charAt(this.pos+1)?(this.current=this.newToken(h,"!="),this.pos++):this.current=this.newToken(h,e)}return this.pos++,!!this.isOperatorEnabled(this.current.value)||(this.pos=t,!1)},B.prototype.isOperatorEnabled=function(t){return this.parser.isOperatorEnabled(t)},B.prototype.getCoordinates=function(){for(var t,e=0,r=-1;e++,t=this.pos-r,0<=(r=this.expression.indexOf("\n",r+1))&&r<this.pos;);return{line:e,column:t}},B.prototype.parseError=function(t){var e=this.getCoordinates();throw new Error("parse error ["+e.line+":"+e.column+"]: "+t)},_.prototype.next=function(){return this.current=this.nextToken,this.nextToken=this.tokens.next()},_.prototype.tokenMatches=function(t,e){return void 0===e||(Array.isArray(e)?a(e,t.value):"function"==typeof e?e(t):t.value===e)},_.prototype.save=function(){this.savedCurrent=this.current,this.savedNextToken=this.nextToken,this.tokens.save()},_.prototype.restore=function(){this.tokens.restore(),this.current=this.savedCurrent,this.nextToken=this.savedNextToken},_.prototype.accept=function(t,e){return!(this.nextToken.type!==t||!this.tokenMatches(this.nextToken,e))&&(this.next(),!0)},_.prototype.expect=function(t,e){if(!this.accept(t,e)){var r=this.tokens.getCoordinates();throw new Error("parse error ["+r.line+":"+r.column+"]: Expected "+(e||t))}},_.prototype.parseAtom=function(t){var e=this.tokens.unaryOps;if(this.accept(j)||this.accept(h,function(t){return t.value in e}))t.push(new C(g,this.current.value));else if(this.accept(u))t.push(new C(y,this.current.value));else if(this.accept(i))t.push(new C(y,this.current.value));else if(this.accept(o,"("))this.parseExpression(t),this.expect(o,")");else{if(!this.accept(R,"["))throw new Error("unexpected "+this.nextToken);if(this.accept(R,"]"))t.push(new C(T,0));else{var r=this.parseArrayList(t);t.push(new C(T,r))}}},_.prototype.parseExpression=function(t){var e=[];this.parseUntilEndStatement(t,e)||(this.parseVariableAssignmentExpression(e),this.parseUntilEndStatement(t,e)||this.pushExpression(t,e))},_.prototype.pushExpression=function(t,e){for(var r=0,s=e.length;r<s;r++)t.push(e[r])},_.prototype.parseUntilEndStatement=function(t,e){return!!this.accept(U)&&(!this.nextToken||this.nextToken.type===n||this.nextToken.type===o&&")"===this.nextToken.value||e.push(new C(O)),this.nextToken.type!==n&&this.parseExpression(e),t.push(new C(A,e)),!0)},_.prototype.parseArrayList=function(t){for(var e=0;!this.accept(R,"]");)for(this.parseExpression(t),++e;this.accept(L);)this.parseExpression(t),++e;return e},_.prototype.parseVariableAssignmentExpression=function(t){for(this.parseConditionalExpression(t);this.accept(h,"=");){var e=t.pop(),r=[],s=t.length-1;if(e.type!==E){if(e.type!==g&&e.type!==k)throw new Error("expected variable for assignment");this.parseVariableAssignmentExpression(r),t.push(new C(M,e.value)),t.push(new C(A,r)),t.push(f("="))}else{if(!this.tokens.isOperatorEnabled("()="))throw new Error("function definition is not permitted");for(var n=0,i=e.value+1;n<i;n++){var o=s-n;t[o].type===g&&(t[o]=new C(M,t[o].value))}this.parseVariableAssignmentExpression(r),t.push(new C(A,r)),t.push(new C(m,e.value))}}},_.prototype.parseConditionalExpression=function(t){for(this.parseOrExpression(t);this.accept(h,"?");){var e=[],r=[];this.parseConditionalExpression(e),this.expect(h,":"),this.parseConditionalExpression(r),t.push(new C(A,e)),t.push(new C(A,r)),t.push(l("?"))}},_.prototype.parseOrExpression=function(t){for(this.parseAndExpression(t);this.accept(h,"or");){var e=[];this.parseAndExpression(e),t.push(new C(A,e)),t.push(f("or"))}},_.prototype.parseAndExpression=function(t){for(this.parseComparison(t);this.accept(h,"and");){var e=[];this.parseComparison(e),t.push(new C(A,e)),t.push(f("and"))}};var r=["==","!=","<","<=",">=",">","in"];_.prototype.parseComparison=function(t){for(this.parseAddSub(t);this.accept(h,r);){var e=this.current;this.parseAddSub(t),t.push(f(e.value))}};var $=["+","-","||"];_.prototype.parseAddSub=function(t){for(this.parseTerm(t);this.accept(h,$);){var e=this.current;this.parseTerm(t),t.push(f(e.value))}};var D=["*","/","%"];function e(t,e){return Number(t)+Number(e)}function G(t,e){return t-e}function J(t,e){return t*e}function W(t,e){return t/e}function X(t,e){return t%e}function Y(t,e){return Array.isArray(t)&&Array.isArray(e)?t.concat(e):""+t+e}function K(t,e){return t===e}function z(t,e){return t!==e}function H(t,e){return e<t}function Q(t,e){return t<e}function Z(t,e){return e<=t}function tt(t,e){return t<=e}function et(t,e){return Boolean(t&&e)}function rt(t,e){return Boolean(t||e)}function st(t,e){return a(e,t)}function nt(t){return(Math.exp(t)-Math.exp(-t))/2}function it(t){return(Math.exp(t)+Math.exp(-t))/2}function ot(t){return t===1/0?1:t===-1/0?-1:(Math.exp(t)-Math.exp(-t))/(Math.exp(t)+Math.exp(-t))}function at(t){return t===-1/0?t:Math.log(t+Math.sqrt(t*t+1))}function pt(t){return Math.log(t+Math.sqrt(t*t-1))}function ht(t){return Math.log((1+t)/(1-t))/2}function ut(t){return Math.log(t)*Math.LOG10E}function ct(t){return-t}function ft(t){return!t}function lt(t){return t<0?Math.ceil(t):Math.floor(t)}function vt(t){return Math.random()*(t||1)}function yt(t){return dt(t+1)}_.prototype.parseTerm=function(t){for(this.parseFactor(t);this.accept(h,D);){var e=this.current;this.parseFactor(t),t.push(f(e.value))}},_.prototype.parseFactor=function(t){var e=this.tokens.unaryOps;if(this.save(),this.accept(h,function(t){return t.value in e})){if("-"!==this.current.value&&"+"!==this.current.value){if(this.nextToken.type===o&&"("===this.nextToken.value)return this.restore(),void this.parseExponential(t);if(this.nextToken.type===U||this.nextToken.type===L||this.nextToken.type===n||this.nextToken.type===o&&")"===this.nextToken.value)return this.restore(),void this.parseAtom(t)}var r=this.current;this.parseFactor(t),t.push(c(r.value))}else this.parseExponential(t)},_.prototype.parseExponential=function(t){for(this.parsePostfixExpression(t);this.accept(h,"^");)this.parseFactor(t),t.push(f("^"))},_.prototype.parsePostfixExpression=function(t){for(this.parseFunctionCall(t);this.accept(h,"!");)t.push(c("!"))},_.prototype.parseFunctionCall=function(t){var e=this.tokens.unaryOps;if(this.accept(h,function(t){return t.value in e})){var r=this.current;this.parseAtom(t),t.push(c(r.value))}else for(this.parseMemberExpression(t);this.accept(o,"(");)if(this.accept(o,")"))t.push(new C(E,0));else{var s=this.parseArgumentList(t);t.push(new C(E,s))}},_.prototype.parseArgumentList=function(t){for(var e=0;!this.accept(o,")");)for(this.parseExpression(t),++e;this.accept(L);)this.parseExpression(t),++e;return e},_.prototype.parseMemberExpression=function(t){for(this.parseAtom(t);this.accept(h,".")||this.accept(R,"[");){var e=this.current;if("."===e.value){if(!this.allowMemberAccess)throw new Error('unexpected ".", member access is not permitted');this.expect(j),t.push(new C(k,this.current.value))}else{if("["!==e.value)throw new Error("unexpected symbol: "+e.value);if(!this.tokens.isOperatorEnabled("["))throw new Error('unexpected "[]", arrays are disabled');this.parseExpression(t),this.expect(R,"]"),t.push(f("["))}}};var xt=4.7421875,wt=[.9999999999999971,57.15623566586292,-59.59796035547549,14.136097974741746,-.4919138160976202,3399464998481189e-20,4652362892704858e-20,-9837447530487956e-20,.0001580887032249125,-.00021026444172410488,.00021743961811521265,-.0001643181065367639,8441822398385275e-20,-26190838401581408e-21,36899182659531625e-22];function dt(t){var e,r;if(function(t){return isFinite(t)&&t===Math.round(t)}(t)){if(t<=0)return isFinite(t)?1/0:NaN;if(171<t)return 1/0;for(var s=t-2,n=t-1;1<s;)n*=s,s--;return 0===n&&(n=1),n}if(t<.5)return Math.PI/(Math.sin(Math.PI*t)*dt(1-t));if(171.35<=t)return 1/0;if(85<t){var i=t*t,o=i*t,a=o*t,p=a*t;return Math.sqrt(2*Math.PI/t)*Math.pow(t/Math.E,t)*(1+1/(12*t)+1/(288*i)-139/(51840*o)-571/(2488320*a)+163879/(209018880*p)+5246819/(75246796800*p*t))}--t,r=wt[0];for(var h=1;h<wt.length;++h)r+=wt[h]/(t+h);return e=t+xt+.5,Math.sqrt(2*Math.PI)*Math.pow(e,t+.5)*Math.exp(-e)*r}function gt(t){return Array.isArray(t)?t.length:String(t).length}function Mt(){for(var t=0,e=0,r=0;r<arguments.length;r++){var s,n=Math.abs(arguments[r]);e<n?(t=t*(s=e/n)*s+1,e=n):t+=0<n?(s=n/e)*s:n}return e===1/0?1/0:e*Math.sqrt(t)}function Et(t,e,r){return t?e:r}function mt(t,e){return void 0===e||0==+e?Math.round(t):(t=+t,e=-+e,isNaN(t)||"number"!=typeof e||e%1!=0?NaN:(t=t.toString().split("e"),+((t=(t=Math.round(+(t[0]+"e"+(t[1]?+t[1]-e:-e)))).toString().split("e"))[0]+"e"+(t[1]?+t[1]+e:e))))}function At(t,e,r){return r&&(r[t]=e),e}function bt(t,e){return t[0|e]}function kt(t){return 1===arguments.length&&Array.isArray(t)?Math.max.apply(Math,t):Math.max.apply(Math,arguments)}function Ot(t){return 1===arguments.length&&Array.isArray(t)?Math.min.apply(Math,t):Math.min.apply(Math,arguments)}function Tt(r,t){if("function"!=typeof r)throw new Error("First argument to map is not a function");if(!Array.isArray(t))throw new Error("Second argument to map is not an array");return t.map(function(t,e){return r(t,e)})}function Ct(s,t,e){if("function"!=typeof s)throw new Error("First argument to fold is not a function");if(!Array.isArray(e))throw new Error("Second argument to fold is not an array");return e.reduce(function(t,e,r){return s(t,e,r)},t)}function Nt(r,t){if("function"!=typeof r)throw new Error("First argument to filter is not a function");if(!Array.isArray(t))throw new Error("Second argument to filter is not an array");return t.filter(function(t,e){return r(t,e)})}function St(t,e){if(!Array.isArray(e)&&"string"!=typeof e)throw new Error("Second argument to indexOf is not a string or array");return e.indexOf(t)}function It(t,e){if(!Array.isArray(e))throw new Error("Second argument to join is not an array");return e.join(t)}function Pt(t){return(0<t)-(t<0)||+t}var Ft=1/3;function Rt(t){return t<0?-Math.pow(-t,Ft):Math.pow(t,Ft)}function Lt(t){return Math.exp(t)-1}function jt(t){return Math.log(1+t)}function Ut(t){return Math.log(t)/Math.LN2}function qt(t){this.options=t||{},this.unaryOps={sin:Math.sin,cos:Math.cos,tan:Math.tan,asin:Math.asin,acos:Math.acos,atan:Math.atan,sinh:Math.sinh||nt,cosh:Math.cosh||it,tanh:Math.tanh||ot,asinh:Math.asinh||at,acosh:Math.acosh||pt,atanh:Math.atanh||ht,sqrt:Math.sqrt,cbrt:Math.cbrt||Rt,log:Math.log,log2:Math.log2||Ut,ln:Math.log,lg:Math.log10||ut,log10:Math.log10||ut,expm1:Math.expm1||Lt,log1p:Math.log1p||jt,abs:Math.abs,ceil:Math.ceil,floor:Math.floor,round:Math.round,trunc:Math.trunc||lt,"-":ct,"+":Number,exp:Math.exp,not:ft,length:gt,"!":yt,sign:Math.sign||Pt},this.binaryOps={"+":e,"-":G,"*":J,"/":W,"%":X,"^":Math.pow,"||":Y,"==":K,"!=":z,">":H,"<":Q,">=":Z,"<=":tt,and:et,or:rt,in:st,"=":At,"[":bt},this.ternaryOps={"?":Et},this.functions={random:vt,fac:yt,min:Ot,max:kt,hypot:Math.hypot||Mt,pyt:Math.hypot||Mt,pow:Math.pow,atan2:Math.atan2,if:Et,gamma:dt,roundTo:mt,map:Tt,fold:Ct,filter:Nt,indexOf:St,join:It},this.consts={E:Math.E,PI:Math.PI,true:!0,false:!1}}qt.prototype.parse=function(t){var e=[],r=new _(this,new B(this,t),{allowMemberAccess:this.options.allowMemberAccess});return r.parseExpression(e),r.expect(n,"EOF"),new s(e,this)},qt.prototype.evaluate=function(t,e){return this.parse(t).evaluate(e)};var Bt=new qt;qt.parse=function(t){return Bt.parse(t)},qt.evaluate=function(t,e){return Bt.parse(t).evaluate(e)};var Vt={"+":"add","-":"subtract","*":"multiply","/":"divide","%":"remainder","^":"power","!":"factorial","<":"comparison",">":"comparison","<=":"comparison",">=":"comparison","==":"comparison","!=":"comparison","||":"concatenate",and:"logical",or:"logical",not:"logical","?":"conditional",":":"conditional","=":"assignment","[":"array","()=":"fndef"};qt.prototype.isOperatorEnabled=function(t){var e=function(t){return Vt.hasOwnProperty(t)?Vt[t]:t}(t),r=this.options.operators||{};return!(e in r&&!r[e])};var _t={Parser:qt,Expression:s};t.Expression=s,t.Parser=qt,t.default=_t,Object.defineProperty(t,"__esModule",{value:!0})});

/**
* 数式に数学関数以外の関数が含まれている場合のエラー
*/
class MathFunctionError extends Error {
/**
* @param {string} message - エラーメッセージ
*/
constructor(message) {
super(message || "数学関数以外の関数が含まれています");
this.name = "MathFunctionError";
}
}

var sel = document.selection;

doMultiEdit(main);

function main() {
var isEmpty = sel.IsEmpty;
var activePointY = sel.GetActivePointY(mePosLogical);
if (isEmpty) {
var exp = document.GetLine(activePointY);
} else {
var exp = sel.Text;
}
// 空白行の場合は何もしない
if (exp.match(/^\s*$/)) {
return;
}

try {
var exp_replaced = replaceExpression(exp);
const Parser = exprEval.Parser;
let r = Parser.evaluate(exp_replaced);
try {
r = r.toFixed(15);
const intPart = r.match(/([0-9]+)\./);
const fractionalPart = r.match(/\.([0-9]+$)/);
if (intPart && fractionalPart) {
// 小数点以下は12桁で切る
const f = fractionalPart[1].slice(0,12).replace(/[0]+$/, "")
r = intPart[1] + (f ? `.${f}` : "");
}
} catch(e) {}
var result_str = String(r);
} catch (e) {
if (e instanceof MathFunctionError) {
alert(e.message)
} else {
alert(e + "\n入力: " + exp + "\n入力変換後: " + exp_replaced)
}
return;
}

// 小数点以上のみカンマ区切り
if (COMMA) {
var result_parts = result_str.split(".");
result_parts[0] = result_parts[0].replace(/(\d)(?=(\d{3})+$)/g, "$1,");
if (result_parts.length > 1) {
result_str = result_parts.join(".");
} else {
result_str = result_parts[0];
}
}

// 計算行が = 始まりの場合、= を削除する
if (isEmpty && exp.match(/^= /)) {
sel.SetActivePoint(mePosLogical, 1, activePointY, false);
sel.EndOfLine(true, mePosLogical);
sel.Text = sel.Text.replace(/^= /, "");
}

// 既存の計算結果を上書きするか判定
var pattern = /^=\s*(-?[0-9.,]|true|false)*\s*$/;
var nextLine = document.GetLine(activePointY + 1);
if (isEmpty && nextLine.match(pattern)) {
sel.SetActivePoint(mePosLogical, 1, activePointY + 1, false);
sel.EndOfLine(true, mePosLogical);
sel.Text = '= ' + result_str
} else if (isEmpty) {
sel.LineOpen();
sel.Text = '= ' + result_str
} else {
sel.CharRight();
const inputExp = exp.replace(/((?!;)\n)/mg, "; ").replace(/;\s*;/g, ";").replace(/　/g, " ").replace(/;\s*$/, "").trim();
if (exp.slice(-1) === "\n") {
sel.Text = inputExp + ' = ' + result_str + '\n';
} else {
sel.Text = '\n' + inputExp + ' = ' + result_str + '\n';
}
sel.CharLeft();
}

if (COPY) {
ClipboardData.SetData(result_str);
Status = "計算結果 " + result_str + " をコピーしました"
}
}

/**
* 数式を置換する
*/
function replaceExpression(exp) {
const exp_replaced = exp.trim()
// 先頭の = を削除
.replace(/^= /, "")
// 非ASCII文字を削除
.replace(/[^\x20-\x7F]/g, " ")
// 改行を ; に置換
.replace(/(?<!;)\n/mg, ";")
// 全角スペースを半角スペースに変換
.replace(/　/g, " ")
// 数字内のカンマを取り除く
.replace(/(\d),(?! )/g, "$1")
// 予約語を退避
.replace(/(?:^|\s)(PI|true|false)(?:$|\s)/g, " %%%$1%%% ")
// 指数形式を退避
.replace(/([0-9]+(?:\.[0-9]+)?[eE][0-9]+)/g, " %%%$1%%% ")
// 変数形式を退避
.replace(/\$([a-zA-Z][a-zA-Z0-9]*)/g, " %%%$1%%% ")
// `/hour` などの文字列はスラッシュごと削除
.replace(/\/\s*[a-zA-Z\u0080-\uFFFF]/g, " ")
// 不要な括弧書きを削除
.replace(/\[[^\]]*\]/g, " ")
// その他の文字を削除。退避文字と関数の可能性がある abc( 形式は削除しない
.replace(/[^0-9.+\-*/%^=()<>!;\s]+(?![a-zA-Z0-9]*%%% |[a-z0-9]*\s*\([^)])/g, " ")
// 退避文字を復元
.replace(/ %%%([a-zA-Z][a-zA-Z0-9]*)%%% /g, "$1")
// 数式が数学関数以外を含む場合はエラー
if (containsNotMathFunction(exp_replaced)) {
throw new MathFunctionError("数式に数学関数以外の関数が含まれています\n入力: " + exp + "\n入力変換後: " + exp_replaced);
}

return exp_replaced;
}

/**
* 数学関数以外を含むかどうかを判定する
* max(x, y, ...) のような複数の引数を受け取る関数もOK扱いにはするが、動作は保証しないものとする
*/
function containsNotMathFunction(exp) {
var functions = [
"abs",
"acos",
"acosh",
"asin",
"asinh",
"atan",
"atanh",
"cbrt",
"ceil",
"cos",
"cosh",
"exp",
"expm1",
"floor",
"length",
"ln",
"log",
"log10",
"log2",
"log1p",
"not",
"round",
"sign",
"sin",
"sinh",
"sqrt",
"tan",
"tanh",
"trunc",
"random",
"fac",
"min",
"max",
"hypot",
"pyt",
"pow",
"atan2",
"roundTo",
"map",
"fold",
"filter",
"indexOf",
"join",
"if",
]
// 検査対象の文字列を取得
var match = exp.match(/([a-z][a-z0-9]+)\s*\(/g);
if (!match) {
return false;
}
// 検査対象の文字列が数学関数に含まれていない場合は true
for (var i = 0; i < match.length; i++) {
var func = match[i].replace(/\s*\(/, "");
if (functions.indexOf(func) == -1) {
return true;
}
}
// 検査対象の文字列が数学関数のみの場合は false
return false;
}
</syntaxhighlight>

== サードパーティライブラリ ==

[https://github.com/silentmatt/expr-eval/ expr-eval]