Flexible System Control and Special-Purpose Languages

Dr. Dobb's Journal February 1998

By Russell W. Mello

  ...
# Open valve 1. Then wait for the pressure to go above 10 milli torr.
open V1;
# wait a bit to allow the pressure to change.
wait 10.0;
# Check the pressure at PT 3
pt3_val = read PT3;
if pt3_val > .010 then
  print "The pressure at PT3 is above 10 millitorr";
else
  print "The pressure at PT3 is below 10 millitorr";
  # Wait some more.
  wait 5.0;
  # Check the pressure at PT 3 again. If it fails again then give up.
  pt3_val = read PT3;
  if pt3_val > .010 then
    exit;
  endif;
endif;
 ...

Example 1: Mvcl script without the use of the waitfor statement.

Back to Article