unit opstacktypes; {$IFDEF FPC} interface {$ENDIF} {$I Options.inc} type TEventID = array[0..7] of Byte; // Is the 48 Bit node ID + 16 Bits of unique Event ID = 64 Bits PEventID = ^TEventID; PByte = ^Byte; const MCO_WRITE_UNDER_MASK = $8000; // MemoryConfigurationOptions - Write under mask supported MCO_UNALIGNED_READS = $4000; // MemoryConfigurationOptions - Unaligned memory Reads supported MCO_UNALIGNED_WRITES = $2000; MCO_ACDI_MFG_READS = $0800; // MemoryConfigurationOptions - Address Space 0xFC supported (ACDI Manufacturer Area) for reads MCO_ACDI_USER_READS = $0400; // MemoryConfigurationOptions - Address Space 0xFB supported (ACDI User Defined Area) for reads MCO_ACDI_USER_WRITES = $0200; // MemoryConfigurationOptions - Address Space 0xFB supported (ACDI User Defined Area) for writes MCWL_ONE_BYTE = $80; // MemoryConfigurationWriteLength - 1 Byte Write Supported MCWL_TWO_BYTE = $40; // MemoryConfigurationWriteLength - 2 Byte Write Supported MCWL_FOUR_BYTE = $20; // MemoryConfigurationWriteLength - 4 Byte Write Supported MCWL_64_BYTE = $10; // MemoryConfigurationWriteLength - 64 Byte (exactly) Write Supported MCWL_ARBITRARY_BYTE = $02; // MemoryConfigurationWriteLength - Any Number of Byte Write Supported MCWL_STREAM_WRITE_SUPPORTED = $01; // MemoryConfigurationWriteLength - Stream Write Supported const OPS_PROCESSING = $0001; // Start and stops the main StateMachine for running. Default is Off on startup Allows holding off OLCB processing until the node is read (Ethernet link is up, etc) type TOPStack = record State: Word; // The State of the OPStack Library, see the OPS_xxx flags _1sCounter: Byte; // Counts 10 100ms timer ticks to update items at a 1s rate end; implementation end.