■■■20レス以内で済むF-BASICの質問はこちらへ■■■

671：名無しさん：2016/01/08(金) 12:49:18: >>670
>INTERVALを5秒くらいにして実行させてみると、1時間で5～10秒ほどずれました。

確かにずれていきますね。TIME割り込み命令の方で毎回つぎの5秒後を設定する方法にして
みましたが同じ結果でした。

> NOW =(date*86400)+(millitime/1000.0)

これは単精度変数だと有効桁数が足りないので、数ヵ月後には数値が狂うのでは？
millitimeも秒未満の桁が削れていく？

そこは、こんな感じでしょうか。年越しもできるし。

OWARI =(millitime/1000.0)
do
NOW =(millitime/1000.0):if NOW < OWARI then NOW=NOW+86400
if NOW >= OWARI+KANKAKU then print date$,time$,millitime :OWARI=NOW
loop

5秒で数百万回時計を見にいくというのも・・・ CPU100% ．．．。

新着レスの表示

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）

掲示板管理者へ連絡無料レンタル掲示板