program PayPal;
// Logs into PayPal account

{ Process events here }
procedure OnDocumentComplete(URL : string);
begin  
  if IsPartOf('https://www.paypal.com/cgi-bin/webscr?', URL) then
    begin
      Fill('login_email', GetParam('paypalL'));     // define paypalL in Parameters
      Fill('login_password', GetParam('paypalP'));  // define paypalP in Parameters
      ClickButton('submit');
      NewbieScriptEnd;
    end;
  if IsPartOf('https://www.paypal.com/', URL) then
    begin
      ClickHyperLink('Log In');
    end;
end;

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