このエレベーターの階数表示のような時計を作りたいのですが、やり方が分かりません。誰か教えてください。(PRINTです)

? format$("%2d", x) で、変数 x を二桁にそろえて表示できますよ。 三桁にしたい時は format$("%3d", x)

もし "00" "01" のように 0 付きで表示したい時は ? format$("%02d", x) とします。%の後ろに0(ゼロ)ね。 ? format$("%03d", x) だと "000" "001" みたく三桁になります。

日付と時間をバラバラにして、それぞれの数字の場所を色を変えて表示。ですね。 まず、その画面はどうやって表示しましたか？ 表示の前に、日付と時間で表示する色をゴニョゴニョすればできそうな予感がします。 紙に順序だてて書いてみると良いカモしれません。 とりあえずは、日付と時間の数字をバラバラにして取り扱う所からかな？

あんどさん 画像表示用にLOCATEなどで表示しただけです。 まだ現在時刻に対応させた訳ではありません。

MIKIさん そういうことではないんですが・・・

ＬＯＣＡＴＥで表示する時に、赤い文字は色設定している訳だから・・・ その辺りを制御して、各日時・時間と同じになる文字を色変えして表示するようにしてあげれば良いダケですよ？ そんなワケなので、まずは日付と時間をバラバラにしてみましょう。

ゴニョゴニョすれば出来る予感とか言ってゴニョゴニョして出来なかったらどうしよう。。と思ってテストしてみました。 うん。ゴニョゴニョすれば出来たから大丈夫。 がんばれ～♪

数字をバラバラ・・・？ 1桁ずつ取り出せということですか？

そうです。 ２１：４９：３５　なら、２と１と４と９と３と５にして考えるって事ね。 で、２１時の意味で表示したい２と、切り出した２が同じだったら赤く表示。違ったら白く表示。と振り分けるカンジです。 その振り分けを各数字で実行してあげれば、完成ですよ。

DATE$,TIME$で文字列として日付、時間が取得できるので MID$関数で取り出してVAL関数で数値に変換できますよね。 数字は全て白文字で表示した後に現在日時の部分を赤色で 上書きすれば希望の動作をするかと思います。

おお！やりたい事の意味が分かった！ MIKIさんが答えておられる事かと思ったら、そういう暗号的なのね！ （やり方はあんどさんにお任せ。やり方は色々ありそう～）

こんばんは。あんどです。 コレね。たしかにやり方は色々ありますね。 テスト的にコピペしまくりで組んだブツ、イメージ通りに動きましたけど、otta777さんの仰っている方法と被っていないのですね。 まず、各数字は違う方法で切り出しました。ええ、途中まで組んで素直にＭＩＤ＄で切り出せば良かったと後悔しましたよ。突き通しましたけど・・・ 表示方法も毎回毎回、途中で色を変えながらＡＬＬ－ＰＲＩＮＴです。ＰＲＩＮＴさんの遅さに不安が有ったのですが、流石にこれ位なら問題なかったですね。 ホント色々な方法が有って、プログラムは面白いです。 で、コピペの嵐で同じ様な処理が並んでいたのを整理しつつ「一画面に収まるんじゃね？」と、コネクリ回して遊んでました。ホント面白いわ～♪

バグり方が妙だなと思いつつ、脊髄反射してしまいました。 そもそもバグった表示じゃなかったのね。 失礼しました。 みむさん たくさんの先生がそれぞれの流儀で回答すると、往々にして「船頭多くして」状態になりますよね。 お任せするってのも重要な回答方法の一つだと思います。

完成しました、皆様お答え頂きありがとうございました。

お。完成しましたか。おめでとうございますっ。 で、楽しいアイディアありがとうございました。このプログラムはいろいろとコネクリ回せて楽しかったのですよ。