program USPostalService;

{ Process events here }
procedure OnDocumentComplete(URL : string);
begin
  if IsPartOf('https://ecap21.usps.com/cgi-bin/ecapbv/scripts/', URL) then
    begin
      Fill('username', GetParam('uspsL'));  // define uspsL in Parameters Database
      Fill('password', GetParam('uspsP'));  // define uspsP in Parameters Database
      ClickImageButton('');
      NewbieScriptEnd;
    end;
  if IsPartOf('http://www.usps.com/', URL) then
    begin
      ClickHyperLink('Sign In');
    end;
end;
                                                     

{ This is the main program body. }
begin
  Navigate('http://www.usps.com/');
end.