---

第６回：マクロの登場人物の紹介（その５）

---

[ ← 前回の内容 | → 次回の内容 | 総目次 ]

---

節目次：

6.1　ユーザーからの入力を受け取る
6.2　数値型変数
6.3　数値の計算に使う演算子
6.4　マクロ中で割り算をする時の注意
演習問題

---

今回は、


数字を入力するダイアログボックスを表示し、 ２つの数を受け取ってそれらの和・差・積・商・余りを表示するマクロ

を作ってみましょう。


全く実用的でない＆非常に作為的

なマクロですが(^^;、


これも修行のうち

だと思ってしばらくお付き合い下さいm(_ _)m。

6.1　ユーザーからの入力を受け取る

　[ ↑ 前節 | ↓ 次節 | 節目次 || ← 前回の内容 | → 次回の内容 | 総目次 ]

まず、数字を入力するためのダイアログボックスを出す作業です。 秀丸マクロには、 文字列を入力するためのダイアログボックスを出して、 入力された文字列を返す input 関数(*1)が用意されているので、 それを使えばＯＫです。 input 関数は以下のように使います。



$num1 = input("１つめの数字を入力して下さい。","0");↓ $num2 = input("２つめの数字を入力して下さい。\n(0 は入力しないこと！)","1");↓


ここで、input 関数の最初の引数 (赤字)は ダイアログの中に表示する文字列、 ２番目の引数(青字)は ユーザーが入力を行うエディットボックスにあらかじめ入れておく文字列 です。 普通、前者にはユーザーの入力を促す説明を、 後者には（もし適切なものがあれば）初期値（デフォルト値）を入れます。 この関数が実行された時に出るダイアログボックスは下図になります。


→

そして、ユーザーがエディットボックスに文字を書いてＯＫボタンを押すと、 その文字が変数 $num1, $num2 に代入されます。 さて、この２つの文が実行された後には ２つの変数にそれぞれ数字が入っているわけですが、 これらの和や積などを計算する作業は次節で行います。



(*1)	引数と処理の結果(返り値)に何の関連性もないという意味で、 この場合の関数は数学の意味での関数とは異なります。 「関数」という呼び方は、 元々 function という英語から来ていますが、 この場合はむしろ「機能」というもう一つの訳の方が適当ですね。

6.2　数値型変数

　[ ↑ 前節 | ↓ 次節 | 節目次 || ← 前回の内容 | → 次回の内容 | 総目次 ]

まず、マクロ中で計算をするには 受け取った２つの数を表す文字列を数値に変換する必要がありますが、 それには val 関数を使います。 val 関数は引数として １つの（符号と数字からなる）文字列を取り、 結果はその文字列の表す数値に置き換えられます。 例えば


val("10") → 10
val("-2") → -2

ここで、赤色の文字は 文字列リテラル、 紫色の文字は 数値リテラルを表しています。 秀丸マクロでは、


文字列と数値は明確に区別される

ので、この変換が意味する所をきちんと理解しておいて下さい。

ここで余談になりますが、 val 関数に 数字以外の文字を含む文字列を渡した場合の結果を調べてみましょう。


val(" -01.5") → -1
val("a-01") → 0

これらの例が示すように、 val 関数が文字列から数値を取り出す時には、 文字列の先頭から始めて数値と解釈できる部分までを取り出します。 ちなみに、小数点（ピリオド）は数字を表す文字とは解釈されませんから、 結果的に最初の例のように必ず整数の部分だけが取り出されます （次節の割り算のルールも参照）。 また、数値と解釈できる部分が見つからなければ 結果は０に置き換えられます （２番目の例）。

話を戻すと、 ２つの文字列型変数に入っている数を数値として取り出すには



１番目の数	：	val($num1)
２番目の数	：	val($num2)


とすればよいわけです。

さて、ここで数値として取り出した２つの数は後の計算で使うので、 どこかに保存しておいた方が効率的です。 文字列を保存する時には 文字列型変数を使いましたが、 数値を保存するには数値型変数を使います。 数値型変数も文字列型のそれと同様に 名前で区別しますが、 名前の先頭には "#" をつけます。 この変数は文字列型変数と同じく （数値を）代入したり、コマンドや関数の（数値型の）引数として 使うことができます。 例えばval関数の変換の結果を変数に代入するには



#num1 = val($num1);↓ #num2 = val($num2);↓


という文を書きます。

6.3　数値の計算に使う演算子

　[ ↑ 前節 | ↓ 次節 | 節目次 || ← 前回の内容 | → 次回の内容 | 総目次 ]

次に、変数に代入した数値の和・差・積・商・余りを計算しますが、 それは以下のように書きます。



#wa = #num1 + #num2; // #wa に和を代入↓ #sa = #num1 - #num2; // #sa に差を代入↓ #seki = #num1 * #num2; // #seki に積を代入↓ #sho = #num1 / #num2; // #sho に商を代入↓ #amari = #num1 % #num2; // #amari に余りを代入↓


ここで、「＋」「−」は数学で使う記号と全く同じですから 特に説明の必要はないと思います。 積を表す記号は、 半角の「×」がないため、代わりに「＊」を使います。 「／」は割り算の記号ですが、 （整数の範囲で）割り切れなかった場合は 小数点以下を切り捨てた値になります。 例えば


3/2 = 1.5 → 1
-8/3 = -2.666… → -2

何だか面倒なルールですが、 （両方の数が正の数の時は）要するに


数といえば整数しか知らない小学校の低学年の時に習った割り算

で、「答は…で、余りは？？です」の「…」に相当する数になります。 そして、「余り」の「？？」に相当する数が 「％」という演算の結果として得られます。

上の例ではそれぞれの記号を単独で使いましたが、 もちろんこれらを組み合わせて使うこともできますし、 括弧「（　）」によって計算の順序を変えることもできます。


例： ((1+2)*3-4)/(5%3) → 5

この例のような割り算を含んだ計算には注意が必要なのですが、 それに関してはこの章の最後を参照して下さい。

さて、先の４つの文で和・差等が数値型の変数に代入されました。 そして、その計算結果をユーザーに表示するためには 今度はそれらを文字列に変換する （すなわち val 関数の逆のことを行う） 必要があります。 これには str 関数を使います。


str(10) → "10",
str(-2) → "-2"

色の使い分けは val 関数の例と同じです。 まとめると以下の図のようになります。



（数字を表す）文字列 val 関数 数値 ――――――――→ ←―――――――― str 関数


というわけで、計算結果を表示する文は以下のように書けます。



message $num1 + " ＋ " + $num2 + " ＝ " + str(#wa) + "\n" + ↓         $num1 + " − " + $num2 + " ＝ " + str(#sa) + "\n" + ↓         $num1 + " × " + $num2 + " ＝ " + str(#seki) + "\n" + ↓         $num1 + " ÷ " + $num2 + " ＝ " + str(#sho) + " 余り " + str(#amari);↓


この文は下のようなポップアップダイアログを表示します。



最後に、今までばらばらに書いてきたものを一つにまとめておきますから、 自分でこのマクロを作って、 色々な数を入力して結果を確認してみて下さい。



//  まずユーザーから数字を２つ入力してもらう↓ $num1 = input("１つめの数字を入力して下さい。","0");↓ $num2 = input("２つめの数字を入力して下さい。\n(0 は入力しないこと！)","1");↓ //  入力された数文字を数値に変換して変数に代入↓ #num1 = val($num1);↓ #num2 = val($num2);↓ //  和・差・積・商・余りを計算↓ #wa = #num1 + #num2;↓ #sa = #num1 - #num2;↓ #seki = #num1 * #num2;↓ #sho = #num1 / #num2;↓ #amari = #num1 % #num2;↓ //  計算結果をダイアログで表示↓ message $num1 + " ＋ " + $num2 + " ＝ " + str(#wa) + "\n" + ↓         $num1 + " − " + $num2 + " ＝ " + str(#sa) + "\n" + ↓         $num1 + " × " + $num2 + " ＝ " + str(#seki) + "\n" + ↓         $num1 + " ÷ " + $num2 + " ＝ " + str(#sho) + " 余り " + str(#amari);↓ [EOF]

6.4　マクロ中で割り算をする時の注意

　[ ↑ 前節 | ↓ 次節 | 節目次 || ← 前回の内容 | → 次回の内容 | 総目次 ]

さて、また余談になりますが、 マクロ中で計算を実行する時に注意すべきことを説明しておきます。

例えば


３／２＊２

という式を考えてみましょう。 これが算数の問題なら、もちろん答は３になりますが、 マクロ（またはＣ言語）中でこの式は以下のように計算されます。


３／２＊２＝１＊２＝１

計算はこのように式の左側から順に実行されます。 というわけで、最初の「３／２」は前節で説明したルールによると １ になります。 そして、１に２をかけるわけですから答は２になります。 つまり、計算の各ステップ毎に小数点以下が切り捨てられるために、 このような誤差が生じるわけです。 今の計算では誤差が２ありましたが、 （算数として）同じ計算を以下のように順序を変えて行ってみると…


３＊２／２＝６／２＝３

今度はちゃんと正しい値になっていますが、 これはたまたまです。 重要なのは


割り算の順序を変えると、一般には結果が異なる

ということです。 以下の例も算数の問題なら答は全て同じですが、 マクロの計算式の場合は全て異なる結果になります。



式	算数の答	マクロの答
５／３＊７／２	５．８３３…	３
５／２＊７／３	５．８３３…	４
５＊７／（２＊３）	５．８３３…	５

演習問題

　[ ↑ 前節 | ↓ 次節 | 節目次 || ← 前回の内容 | → 次回の内容 | 総目次 ]

1. 名前を入力するダイアログを表示して、 現在のカーソル位置に挿入するマクロを書け。



2. ローマ字表記で姓、名を別々に入力して、 「Masaki Sugiura」 「Sugiura, Masaki」 「M. Sugiura」 「M.S.」 の４つのパターンを全てダイアログに表示するマクロを書け。



3. 以下の文字列を val 関数に渡した結果を調べよ。
   
   
   1. "001a"
   2. "-.03"
   3. "１" (注：全角文字)


4. 以下の計算式の結果はいくつになるか答えよ。
   
   
   1. 1 + 2 - 3 * 4 / 5 % 6
   2. 1 / 2 * 3 - 4 % 5 + 6
   3. (1 * (2 - 3) % 4 + 5) / 6

---

[ ↑ 先頭に戻る || ← 前回の内容 | → 次回の内容 | 総目次 ]