program MySpace;
// Login to MySpace.Com

{ Process events here }
procedure OnDocumentComplete(URL : string);
begin
  if IsPartOf('http://home.myspace.com/index.cfm?', URL) then
    begin
      NewbieScriptEnd;
    end;
  if IsPartOf('http://www.myspace.com/', URL) then
    begin
      Fill('email', GetParam('myspace_l'));
      Fill('password', GetParam('myspace_p'));
      ClickImageButton('loginbutton');
    end;
end;

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