Variables

       Var
         PushPopCursorSize:Array[1..MaxXYSaves] of Word;
         PushPopTextColor :Array[1..MaxXYSaves] of Word;
         PushPopCursorPos :XYPosData;

    The above form stacks for the  cursor  size, colour and position. The
    unit Stack is not used.