opiPresent_for_Octopus900 {OPI}

Implementation of opiPresent for the Octopus090 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 octo900.present* for details).

nextStim

The stimulus to present after stim (it is not presented, but projector can move to it during response window)

F310

If F310 is FALSE, response is taken from O900 button. If F310 is TRUE, response is taken from external controller for (static stimuli only).

See Also

octo900.presentStatic, octo900.presentTemporal, octo900.presentKinetic

Examples

## Not run: 
  chooseOpi("Octopus900")
  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)