// Check interface with optotrak system.
//

// globals

define object sensor = optotrak
set sensor xml = "NeuroRV.xml"
call sensor init

define float t0 = time()
define float t1 = time()
define float count = 0

bloc measure is
  set t0 = time()
  set t1 = time()
  set count = 0
  while ( t1 - t0 < 1) do
    call sensor request
    call sensor position
    print "shoulder position : "vector sensor left_shoulder
    set t1 = time()
    set count = count + 1
  end
  print "nb of measurements : "count
end


call sensor activate
print "Session 1"
measure
call sensor deactivate

wait()

print "Session 2"
call sensor activate
measure
call sensor deactivate

call sensor close

print "========= test_optotrak passed OK"

quit