$! looper.com procedure
$ i = 10
$ loop:
$  show time
$  wait 'p1
$  i = i - 1
$  if i .gt. 0 then $  goto loop