「タイマー」イベントで時計表示を作ろうと思いましたが、
v8マニュアルの中の薄い奴『補足説明』に #TickCountなる
関数があるのを見つけましたので、ふたつ用意されている
「タイマー値」をふたつとも使って、ストップウォッチも
付けてみました。

タイマー値のひとつは0.1。これは0.1秒毎に判断して時計
の針を回しています。

もうひとつのタイマー値は0.01。これでストップウォッチ
にて上記関数で取得したミリ秒値から0.01秒刻みの値を取
り出しています。

なお、時計表示時に、針が若干グニュッと伸縮します。こ
れは作りの限界です(^^;)。デザインもダサイです。恥ず
かしいから薄目に表示させています(^^;)。

sinθやcosθなんてのを扱ったのは何年ぶりでしょう。(^^;)
「sin・cos何になる〜」なんて歌（『受験性ブルース』）
が流行った少し後でしょうから、ン10年ぶりです。使い方
が判るのに随分かかりました。おまけにラジアンと来てま
すしね。ここが一番苦労しました。

作っている内に、どうせなら秒針が動く毎に（１秒毎に）
「カチッカチッ」と音を出したくなりました。これはタイ
マー値1秒でwav再生させればいいんですが、いかんせん、
既にふたつのタイマーは使われてしまっています。そこで
閃きまして、メイン＆サブフォームとして、サブフォーム
にもうひとつのタイマーイベントを設定してみました。
このように、サブフォームを使えるとなると、タイマー値
などはそれこそ無限に使用可能となるかもしれません。サ
ブフォーム用のkevはメインフォーム用のkevとは別個に設
定しています。このやり方が正しいのかどうかはいまいち
自信もありませんが、とにかく動いています。ただ、サブ
フォームのkevを設定するに際しては、メインフォームの
サブフォームオブジェクトをダブルクリックして出してか
ら定義した方が無難なようです。私の場合に限りかもしれ
ませんが、メインフォームを通さないで直接サブからkev
を定義したらエラーになって、フォームが使えなくなりま
した（私の環境って何か変なんです、困っています）。

このようにサブを設定した結果、メインフォームにサブ部
分が表示されていると、この場合美しくないように思えた
ので、日付表示のテキストオブジェクトの下に隠れるよう
にしてあります(^^;)。kevからオブジェクト操作で非表示
にする方法もありそうですけどね。

どうせ音を出すなら、ストップウォッチを動かしている間
連続して鳴らすようにしてみました。「サウンド再生　繰
り返し」を使っています。目覚まし時計みたいでうるさい？

ｎ時丁度になった時に、ハトポッポが出るとか、ボーンボ
ーンってのも面白いでしょうね。wavをもうひとつ探すのが
面倒だったので、テキストボックスがスルスルッと出てき
て、またスルスルッと消える程度にしておきました。これ
を見るためには、n:00になるまで待っていなければなりま
せんが。(^^;)

　　　　　　　　　　　　　　　　1999/7/7　悲しげ