Procedures And Functions

    (Some procedures and functions  do  not work under all Real, DPMI and
    Windows targets.  See the  more  detailed  listing  for which targets
    apply to which procedures and functions.)

    Procedure FSplit        (Path:String; Var Dir, Name, Ext:String);
    Procedure SaveCursorSize(Var Data:Word);
    Procedure RestCursorSize(Data:Word);
    Procedure SaveXYPos     (Var Position:XYPosData);
    Procedure RestXYPos     (Var Position:XYPosData);
    Procedure CursorSize    (UpLim,DownLim:Byte);

    Procedure PushCursorSize;
    Procedure PopCursorSize;
    Procedure PushXYPos;
    Procedure PopXYPos;
    Procedure PushTextColor;
    Procedure PopTextColor;

    Procedure KeyBuffer     (Option:KeyBufferFunction);

    Function  MemoryCount   (P:Pointer):LongInt;
    Procedure GetLowestOfs  (P:Pointer; Var S,O:Word);
    Procedure AdjustPtr     (Var P:Pointer; Amount:LongInt);

    Procedure SpacesToZeros (StIn:String; Var StOut:String);
    Procedure RemoveLeading (StIn:String; Var StOut:String;
                             Const RemoveSet:CharSet);
    Function  PosFrom       (SubS:String; StIn:String; FarIn:Byte):Byte;
    Function  RevPosFrom    (SubS:String; StIn:String; FarIn:Byte):Byte;
    Procedure UpperCase     (StIn:String; Var StOut:String);
    Procedure LowerCase     (StIn:String; Var StOut:String);
    Procedure CapWords      (StIn:String; Var StOut:String);
    Procedure PadVar        (StIn:String; Var StOut:String; Count:Byte);
    Procedure PadVarWith    (StIn:String; Var StOut:String; Count:Byte;
                             WithMe:Char);
    Procedure PadFileName   (StIn:String; Var StOut:String);
    Procedure FormatVar     (StIn:String; Var StOut:String;
                             Size:Byte; Format:TextFormats);
    Procedure UnPadVar      (StIn:String; Var StOut:String);
    Procedure UnPadVarRight (StIn:String; Var StOut:String);
    Procedure UnPadVarLeft  (StIn:String; Var StOut:String);
    Procedure RightJustify  (StIn:String; Var StOut:String;
                             Margin:Byte; JType:JustifyFormats);

    Procedure ByteToHex     (Decimal:Byte; Var Hex:String);
    Procedure WordToHex     (Decimal:Word; Var Hex:String);
    Procedure LongIntToHex  (Decimal:LongInt; Var Hex:String);

    Function  HexDigitValue (HexDigit:Char):Byte;
    Procedure HexToByte     (Hex:String; Var Decimal:Byte; Var Code:Integer);
    Procedure HexToWord     (Hex:String; Var Decimal:Word; Var Code:Integer);
    Procedure HexToLongInt  (Hex:String; Var Decimal:LongInt; Var Code:Integer);

    Function  Min           (I, J:LongInt):LongInt;
    Function  Max           (I, J:LongInt):LongInt;

    Function  AdjustMeter   (StartMeter1,EndMeter1,ValueMeter1,
                             StartMeter2,EndMeter2:LongInt):LongInt;

    Procedure SwapBytes     (Var A,B:Byte);
    Procedure SwapIntegers  (Var A,B:Integer);
    Procedure SwapWords     (Var A,B:Word);
    Procedure SwapLongInts  (Var A,B:LongInt);
    Procedure SwapReals     (Var A,B:Real);
    Procedure SwapStrings   (Var A,B:String);

    Procedure SwapSingles   (Var A,B:Single);
    Procedure SwapDoubles   (Var A,B:Double);
    Procedure SwapExtendeds (Var A,B:Extended);
    Procedure SwapComps     (Var A,B:Comp);