code:

---

$seed = (val(substr(@time,7,2))*2)*184
srnd($seed)

---

and it seems to do the job every time.

Shawn, all of those idea's sound good!

Bryce

Here is my new favourite way

$=olecreateobject("kixlib32.library")
srnd(val(olecallfunc($kixlib,"GetTickCount")))

cj