!
!  Bob Morrison HCS_C Xpress Control Program
!      Testing the WAIT <n> capability.
!      Note two independent IF modules with simultaneous WAIT processing.

config 
hcsnet CMB1
end

begin

! Tell user console program has begun
if reset then
   log mode actions
   variable(0) = 4
   timer(0) = on
   console = "WAIT test start"
end

if timer(0) > 3 then
   console = "WAIT test delay"
   wait 3
   console = "WAIT test middle"
   wait 3
   if variable(0) 
   is 4 then
      console = "did 4 if"
      variable(0) = 6
      wait variable(0)
   is 6 then
      console = "did 6 if"
      variable(0) = 8
      wait 6
   is 8 then
      console = "did 8 if"
      variable(0) = 9
      wait variable(0) + 2
   is 9 then
      console = "did 9 if"
      variable(0) = 0
      wait 6
   else
      console = "did else if"
      variable(0) = 4
      wait 6
      console = "WAIT test else done"
   end
   wait 3
   console = "WAIT test step finished, going to next"
end

if 1 then
   wait 3
   console = "+"
end