10f
@verb #7032:"auto_where" this none this rxdo #7032
@program #7032:"auto_where" this none this
while (1)
  if (#7032.awhere)
    break
  else
    #7032:where()
    suspend(10)
  endif
endwhile
"Last modified by Alex (#7032) on Thu Sep  3 14:37:57 1998 EDT."
.

0