<> <> <> DIRECTORY Imager, IO, Rope; <<>> Dunn: CEDAR DEFINITIONS ~ BEGIN Handle: TYPE = REF HandleRep; HandleRep: TYPE = RECORD [ stream: IO.STREAM _ NIL, enable: BOOL _ FALSE, debug: IO.STREAM _ NIL ]; Reserve: PROC RETURNS [handle: Handle _ NIL, errorMsg: Rope.ROPE _ NIL]; <> <> <> Pretend: PROC RETURNS [handle: Handle]; <> <> Open: PROC [host: Rope.ROPE _ NIL] RETURNS [handle: Handle]; <> <> <<>> OpenFailed: ERROR; InUse: ERROR [user: Rope.ROPE]; HandleOK: PROC [handle: Handle] RETURNS [BOOL]; <> HandleDisabled: PROC [handle: Handle] RETURNS [BOOL]; <> Close: PROC [handle: Handle]; <> Status: PROC [handle: Handle] RETURNS [open, sync, film, io: BOOL _ TRUE]; <> <<>> Ready: PROC [handle: Handle] RETURNS [BOOL]; <> <<>> Cmd: PROC [handle: Handle, cmd: Dunn.cmdCode] RETURNS [BOOL]; <> <> <<>> Expose: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> <> <> Composite: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> <> <<>> Separate: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> <> <<>> Color: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> BW: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> Reset: PROC [handle: Handle] RETURNS [BOOL]; <> <> <> DebugOff: PROC [handle: Handle]; <> DebugOn: PROC [handle: Handle, stream: IO.STREAM]; <> Enable: PROC [handle: Handle]; <> Disable: PROC [handle: Handle]; <> Snapper: PROC [action: PROC[Imager.Context], pixelUnits: BOOL _ FALSE, color: BOOL _ TRUE, smooth: BOOL _ TRUE]; <> <> SnapperError: ERROR [msg: Rope.ROPE]; cmdCode: TYPE = MACHINE DEPENDENT { << from RS232 Interface Specs for Dunn Models 631 and 632 Color Camera Systems>> <<>> videoInvertHigh (2EH), videoInvertLow (2FH), readyTest (3AH), statusRequest (3BH), expose8x5TimeReq (3CH), exposeAuxTimeReq (3DH), exposeAdjFactorReq (3EH), advAuxFrameCnt (3FH), reset8x10ExposeStat (40H), restoreFilterWheel (41H), recovDefaultVals (42H), select8x10Mode (43H), selectAuxMode (44H), selectBW (45H), selectColor (46H), selectNrmSeqMode (47H), selectSepSeqMode (48H), exposeSeq (49H), selectVidAndExpose (4AH), set8x10ExposeTimes (4BH), setAuxExposeTimes (4CH), setExposeAdjFactors (4DH), openAuxShutter (4EH), closeAuxShutter (4FH), unblankMonitor (50H), blankMonitor (51H), selectVideoChannel (52H), positionFilterWheel (53H), immExposeNoVidSw (54H), yAxisRasterCompOn (55H), yAxisRasterCompOff (56H), clearYAxisOffset (57H), stepYAxisOffset (58H), clearXAxisOffset (59H), stepXAxisOffset (5AH), select35mmAuxCam (5BH), select16mmAuxCam (5CH), select4x5AuxCam (5DH), selectSX70AuxCam (5EH), setNumPadChars (5FH), resetAuxNoFilmStats (60H), fastOn (61H), fastOff (62H) }; <<>> END. <<>>