メモ表示を自由にカスタマイズするためのFR-Script解説

メモ欄に表示する文字列をスクリプト指定で制御するための機能です。

設定ダイアログのメモ タブで、「メモ欄への入力をスクリプト(FR-Script)として扱い、スクリプトで表示する文字列を作成する」にチェックを入れると、メモ欄に入力した文字列がスクリプト(FR-Script)として扱われ、表示更新のタイミングでスクリプトが実行されるようになります。

設定ダイアログをOKボタン or 適用ボタンを押したタイミングから、スクリプトの実行が始まります。（すでにスクリプトの実行中の場合は、強制停止してから実行となります）

基本的には、CB.SetOutputText() に入れた数値 or 文字列が記憶され、次回タイミングで表示されるようになります。表示更新毎にスクリプトの実行開始を試行しますが、ループ制御をしているなど、前回のスクリプト実行が終了していない場合は、そのまま処理が継続されます。そのため、スクリプトの中でループ制御とSleepを駆使し、変数の内容を維持しつつ文字列を決めることもできます。

スクリプトのパースエラー、0除算が実行された場合など、エラーが発生した場合は、エラー文字列がメモ欄に表示されるようになります。

なお、スクリプトが無限ループするなどして完了しない場合、スクリプトの書き換えを行ってOKボタン / 適用ボタンをを押したタイミングで中断指示が送信されます。マウスのお供自体が終了した場合は、スクリプトを実行しているスレッドを強制終了します。

文法ルールは、「いじくるつくーる」に搭載されていたR-Scriptと似たようなものとなっており、軽量版です(FR-ScriptのFはFeatherの略です)。詳細な文法解説は後述します。

スクリプトのサンプル

以下に、FR-Scriptのサンプルを示しますので、これを参考に独自の動きを構築してみてください。

(1) ランダムな数値を次々表示する。

srand(GetCurrentSecond());
loop {
    CB.SetOutputText(rand())
    Sleep(500)
}

(2) 固定の文字列を表示する。

CB.SetOutputText("スクリプトで作ったメモ")

(3) 現在時刻の秒の2倍を表示する。

a = GetCurrentSecond()
b = a * 2
CB.SetOutputText(b)

(4) 今年の干支を表示する。

year = GetCurrentYear()
n = year % 12
if (n == 0) {
    eto$ = "申"
}
else if (n == 1) {
    eto$ = "酉"
}
else if (n == 2) {
    eto$ = "戌"
}
else if (n == 3) {
    eto$ = "亥"
}
else if (n == 4) {
    eto$ = "子"
}
else if (n == 5) {
    eto$ = "丑"
}
else if (n == 6) {
    eto$ = "寅"
}
else if (n == 7) {
    eto$ = "卯"
}
else if (n == 8) {
    eto$ = "辰"
}
else if (n == 9) {
    eto$ = "巳"
}
else if (n == 10) {
    eto$ = "午"
}
else {
    eto$ = "未"
}
CB.SetOutputText("今年" + year + "年は、" + eto$ + "年です。")

FR-Script スクリプト仕様

FR-Scriptは、数値と文字列を直感的に扱える軽量なスクリプト言語です。コールバック(CB)を利用して、スクリプト実装元のプログラム機能を呼び出す他、時刻取得・乱数の取得・Windows APIを利用したダイアログ表示や環境変数操作にも対応しています。

1. 基本仕様

・変数とデータ型

• 数値変数: 下記のルールの下で名前を自由に付けられます（例: count, val1）。初期値は 0 です。
• 文字列変数: 下記のルールの名前の末尾に $ を付けます（例: name$, msg$）。初期値は空文字 "" です。

変数名および後述の関数名は、アンダーバー(_)またはアルファベットで始まり、数字・アンダーバー(_)・アルファベットが続くというルールで付けます。英大文字・小文字を区別しません。

・即値

　基本的に数値は10進数で指定します。32bitで表現可能な範囲(-2147483648 〜 2147483647)を扱えます。0xで始まると16進数、0bで始まると2進数が指定できます。

・文字列リテラル

　ダブルコーテーション "..." またはシングルコーテーション '...' で囲みます。

• エスケープシーケンス: \n(改行), \t(タブ), \\, \" などが利用可能です。
• RAW文字列: @ を頭に付けると、\ をそのまま文字として扱います。
  例: @"C:\Users\Documents" （Windowsのパス指定に便利です）

　スクリプトの処理系は、外部とのやり取りにはUTF-16LEを用いますが、内部的には文字をUTF-8で扱います。

・コメント

　#, //, ; で始まる行は、行末までコメント（何も行わない）となります。

2. 演算子

3. 制御構造 (IF-ELSE, WHILE, EXIT)

条件分岐は IF - ELSE IF - ELSE を使用します。

if (score >= 80) {
    msg$ = "合格！"
}
else {
    msg$ = "がんばりましょう"
}

繰り返しは WHILE を使用します。WHILE(1) の特別な書き方として LOOPという書き方も可能です。

i = 0
while(i < 10) {
    TextOut("" + i)
    ++i
}

i=0
loop {
    TextOut("" + i)
    ++i
}

WHILE から抜ける場合は BREAK を使います。条件評価にすぐに戻る場合は CONTINUE を使います。

スクリプトを直ちに終了させる場合は、EXIT を使います。

4. 組み込み関数リファレンス

制御・日時・乱数

文字列・変換関数

システム・UI関数

5. サンプルコード

// ユーザーへの挨拶と環境変数の表示
user$ = getenv$("USERNAME")
IF (Question(user$ + "さん、環境を表示しますか？", "確認")) {
    path$ = getenv$("PATH")
    Information("PATHの内容: " + left$(path$, 50) + "...", "システム情報")
}

6. その他