（２００１年３月のニフティへの書き込み）

ども。
ほとんどの方が、テストランすらできそうにないマクロを作ってみました。

= BeepSounds
* M
1 [ESC]Y ""
        ?.
        dx=10,
:A      (dx<5000)?{             ;dx:周波数
                bx=10,          ;bx:鳴動時間（１０ｍｓ単位）
                ax=$0500,       ;をセットして
                &i($9e)         ;ファンクション呼び出し
                dx+=10,
                >A
        }
*

ＦＢＩＯＳ使用のためＦＭＲ系専用です。
ポケ３にて動作確認しました。
ＴＯＷＮＳや他のＯＡＳＹＳなら動くんじゃないかなぁ。
ＦＭＶはたぶん実行不可でしょう。

・・・なんでこんなマクロを作ったんだぁ？（苦笑）