opiPresent_for_KowaAP7000: Implementation of opiPresent for the KowaAP7000 machine.

In OPI: Open Perimetry Interface

Implementation of opiPresent for the KowaAP7000 machine.

Description

This is for internal use only. Use opiPresent() with the same arguments and the class of stim as one of opiStaticStimulus, opiTemporalStimulus, or opiKineticStimulus.

Arguments

stim	Stimulus to present (a list, see kowa.* for details).
nextStim	The stimulus to present after stim (it is not presented, but projector can move to it during response window)

Value

See kowa.presentStatic, kowa.presentTemporal, or kowa.presentKinetic.

See Also

kowa.presentStatic, kowa.presentTemporal, kowa.presentKinetic

Examples

## Not run: 
  chooseOpi("KowaAP7000")
  if (!is.null(opiInitialize()$err))
      stop("opiInitialize failed")
  s <- list(x=9, y=9, level=dbTocd(db), size=0.43, color="white",
            duration=200, responseWindow=1500, checkFixationOK=NULL)
  class(s) <- "opiStaticStimulus"
  print(opiPresent(s, NULL))

## End(Not run)

OPI documentation built on April 12, 2025, 1:24 a.m.