code:

---

$s=45
$b=75
$log=@scriptdir+"\ajat.log"

"Running Random beep every $s - $b seconds"
? ? "log is being written to $log"
? "to stop the script press any letter"

$b=$b-$s
run '%comspec% /c echo starting time logging at @time >> "$log"'

do
$=srnd(@msecs)
$sleep=$s+1+rnd($b)
play "0g5000f12d128t5g5000f12d128t"
run '%comspec% /c echo @time >> "$log"' at(5,20) @time
sleep $sleep
until kbhit()

---

quote:

---

starting time logging at 15:32:31
15:32:33
15:33:22
15:34:10
15:34:57
15:35:45
15:36:35
15:37:25
15:38:15
15:39:04

---

code:

---

for $i = 1 to 100
$=SRND(@MSEC)
? RND(30)
next

---

code:

---

$=SRND(@MSEC)

for $i = 1 to 100
? RND(30)
next

---

code:

---

break on
$avg1 = 0
For $g = 1 to 100
SRND(@MSECS)
$x = 1000
DIM $Y[$x]
$Z = 1
For $n = 0 to $x
 $j = RND($Z)
 $Y[$n]=$j
Next

$j = 0
For $n = 0 to $x
$j = $j + $y[$n]
Next

$avg = (CDBL($j)/($x+1)) * 2
$avg1 = $avg1 + $avg 
Next
CDBL($avg1)/100

---

code:

---

$s=45

$b=75

$log=@scriptdir+"\ajat.log"

CLS

"Running Random beep every $s - $b seconds"

? ?"log is being written to $log"

? "to stop the script press any letter"

$b=$b-$s

run '%comspec% /c echo starting time logging at @time >> "$log"'


srnd(@msecs)

do

$sleep=$s+1+rnd($b-1)

play "0g5000f12d128t5g5000f12d128t"

run '%comspec% /c echo @time >> "$log"' at(5,20) @time

sleep $sleep 
until kbhit()

---