********************************************************************
* NOTE: This file is generated automatically from the event * definition file CP.evt. ********************************************************************INTERFACECPAlgClass ; <*NOWARN*> IMPORT R2, Algorithm, AlgorithmClass; <* PRAGMA LL *> TYPE EventDataRec = RECORD stopAtSetup: BOOLEAN := TRUE; waitAtSetup: CARDINAL := 1; ctOfSetup: CARDINAL := 0; stopAtAddPoint: BOOLEAN := TRUE; waitAtAddPoint: CARDINAL := 1; ctOfAddPoint: CARDINAL := 0; stopAtNotProcessed: BOOLEAN := TRUE; waitAtNotProcessed: CARDINAL := 1; ctOfNotProcessed: CARDINAL := 0; stopAtRemoveNotProcessed: BOOLEAN := TRUE; waitAtRemoveNotProcessed: CARDINAL := 1; ctOfRemoveNotProcessed: CARDINAL := 0; stopAtActiveR: BOOLEAN := TRUE; waitAtActiveR: CARDINAL := 1; ctOfActiveR: CARDINAL := 0; stopAtRemoveActiveR: BOOLEAN := TRUE; waitAtRemoveActiveR: CARDINAL := 1; ctOfRemoveActiveR: CARDINAL := 0; stopAtCloseR: BOOLEAN := TRUE; waitAtCloseR: CARDINAL := 1; ctOfCloseR: CARDINAL := 0; stopAtRemoveCloseR: BOOLEAN := TRUE; waitAtRemoveCloseR: CARDINAL := 1; ctOfRemoveCloseR: CARDINAL := 0; stopAtSplit: BOOLEAN := TRUE; waitAtSplit: CARDINAL := 1; ctOfSplit: CARDINAL := 0; stopAtSplitRemove: BOOLEAN := TRUE; waitAtSplitRemove: CARDINAL := 1; ctOfSplitRemove: CARDINAL := 0; stopAtNewMin: BOOLEAN := TRUE; waitAtNewMin: CARDINAL := 1; ctOfNewMin: CARDINAL := 0; stopAtNoChangeMin: BOOLEAN := TRUE; waitAtNoChangeMin: CARDINAL := 1; ctOfNoChangeMin: CARDINAL := 0; stopAtSelectTrialPoint: BOOLEAN := TRUE; waitAtSelectTrialPoint: CARDINAL := 1; ctOfSelectTrialPoint: CARDINAL := 0; stopAtDeselectTrialPoint: BOOLEAN := TRUE; waitAtDeselectTrialPoint: CARDINAL := 1; ctOfDeselectTrialPoint: CARDINAL := 0; stopAtSelectTargetPoint: BOOLEAN := TRUE; waitAtSelectTargetPoint: CARDINAL := 1; ctOfSelectTargetPoint: CARDINAL := 0; stopAtDeselectTargetPoint: BOOLEAN := TRUE; waitAtDeselectTargetPoint: CARDINAL := 1; ctOfDeselectTargetPoint: CARDINAL := 0; stopAtDrawBar: BOOLEAN := TRUE; waitAtDrawBar: CARDINAL := 1; ctOfDrawBar: CARDINAL := 0; stopAtRemoveBar: BOOLEAN := TRUE; waitAtRemoveBar: CARDINAL := 1; ctOfRemoveBar: CARDINAL := 0; END; T <: Public; Public = Algorithm.T OBJECT eventDataRec: EventDataRec; METHODS END; REVEAL Algorithm.T <: AlgorithmClass.T; END CPAlgClass.