1/10秒が計れたらもっと正確になるのに・・・【AppleScript】

何かの連続した処理をするときに、それぞれのマシンスペックで同じ早さで動いてほしい場合が有ります。
１秒単位で計れば良いというものであれば　簡単にできるのですが、それより早いものを制御するにはどうしたら良いのでしょう？

そこで考えました。
あらかじめそのマシンが処理にかかる時間を計り、それに比例した負荷をかけてやれば良いのではないかと思ったのですが・・・
とりあえず、repaet文で１０００回繰り返せばそれなりの時間が計れるのではないかと思ったのです。

『実行！』

あれ？
０秒ですか？
あれほどアップルスクリプトの処理は遅いといわれ続けてたので意外でした。

じゃぁ、２桁増やして１０００００回では？

ぎゃ〜〜す！
０秒！
そんなに早いですか？

じゃぁ、ほかの処理を加えてみましょう。
間に、１づつ加算していくスクリプトを書き加えてみた。

そして実行！

ぎゃ〜〜す！！
これでも、まだですか？
繰り返しを先ほどと同じ１０００００回に増やしても、やはり同じ結果。

意外に早いじゃん！
このほかにも文字列“abc 〜省略〜 xyz”のを２の１０条回繰り返したものを用意して、Repeat文のなかでそれを代入させるスクリプトもやってみたのですが結果は同じ。
これではほとんど負荷にならないんですね。

計算はあきらめて、自分自身のアドレスを調べにいかせてみるものに替えてみた。

お〜〜〜！
今度は成功！

・・・と思ったのですが、そのマシンのスペックを計ろうとしたのに　実行するたびにその数値に１秒くらいの誤差がでるんです。これでは駄目なのかな？
まぁ、これくらいの誤差で良い内容なら使えなくもないですが…。

あっ、
この誤差はもしかして、current dateで現在の時間を取得する時の誤差なんでしょうか？
時間を読み取る時は１秒以下は切り捨てですから、コンマ００秒〜コンマ９９秒の間で誤差が発生し、表示に違いがでたのかもしれませんね。

これは、コンマ００秒で始めるように工夫すれば良いだけだから解決しそうです。