anchor.diff:  }
   function TForm1.ParseParams(aString: string): string;
   var
  -  i, K, varTypeInt, nextType: Integer;
  +  i, K, nextType: Integer;
     isParam: Boolean;
     listTokens, paramList, typeList: TStringList;
     paramHolder: array of TParamHolder;
     lastType: string;
   begin
  -  Result := '';
  +  Result := '<sub>';
   
     listTokens := TStringList.Create;
     paramList := TStringList.Create;
  
positive.code:   begin
      listEvents  := TStringList.Create;
      listEvents.Add('####Events' + sLineBreak);
      listEvents.Add('| Ver<br>sion | Event | Description | Parameters and types |');
      listEvents.Add('| ------- | ---- | ----------- | -------------------- |');
      ParseText(edtEventsFile.Text, listEvents);
      txtParserOutput.Lines.AddStrings(listEvents);
  
negative.code:     // Add numbers and line-breaks
      for i := High(paramHolder) downto 0 do
      begin
        Result := Result + {IntToStr(High(paramHolder) - i + 1) + ' - ' +} paramHolder[i].Name + ': ' + paramHolder[i].varType + ';';
        if i <> 0 then
          Result := Result + ' <br> ';
      end;
  
      Result := Result + ' </sub>';
    finally
      FreeAndNil(listTokens);
      FreeAndNil(paramList);
  