anchor.diff:    InputCount := 0;
     WebInput   := '';
     ExeName    := ExtractFileName(ParamStr(0));
  -end.+end.
  
positive.code: procedure WebWriteBlock(const txt: string);
  begin
    writeln('<blockquote>',txt,'</blockquote>');
  end;
  
  // Support BootStrap's glyphicon library. Make sure the css and font are installed correctly.
  
negative.code: // additional web output
  procedure WebWriteVar(const key, value: string); inline;
  procedure WebWriteBlock(const txt: string); inline;
  procedure WebWriteLine(const space: integer = 0; const width: integer = 50); inline;
  procedure WebPutGlyph(const gName: string; const caption: string = ''; const newLine: boolean = false); inline;
  function  WebGetGlyph(const gName: string; const caption: string = ''; const asTitle: boolean = false): string; inline;
  function  WebGetLink(const url: string; const caption: string = ''; const newPage: boolean = false): string; inline;
  