anchor.diff:    result := FMax^;
   end;
   
  -constructor TString.create(inF: TFile; startChar: cardinal; inB: string; inMax: PCardinal);
  +constructor TString.create(inF: TFile; startChar: cardinal; inB: string; inMax: PCardinal; settings: TStringHash = nil);
   var a: string; i, o, buffLen: cardinal;
   begin
     f := inF; start := startChar;
  
positive.code:   Node: PParseNode;
    partial: boolean;
    matched: boolean;
    tempS: TString;
  begin
    err.newNode(inNode.name + '"' + inS.copy(0, 10) + '"');
  
negative.code:     property st: string read buff;
      property max: Cardinal read getMax;
      property char: Cardinal read start;
      constructor create(inF: TFile; startChar: cardinal; inB: string; inMax: PCardinal; settings: TStringHash = nil);
      destructor destroy; override;
      function getNew(startChar: cardinal): TString;
      function len: cardinal;
  