CSEG Return Current Code Segment pp 205 Syntax: Cseg ; Type: Integer Form: Function Purpose: Return integer value of current Code segment. ---------------------------------------------------------------------------- Usage: VAR CodeSegment : Integer ; BEGIN CodeSegment := Cseg ; END.