It will login one user (you could make your own while loop or w/e). I'm not a newb at scar, I've been using it for a good year or two now. Here's the script:
function login(user,pass:string):boolean;
// NEOPETS LOGIN SCRIPT BY DAZ (matt-shaffer.com) \\
var x,y: integer;
var loginBMP,btnlogin,shoptxt,notnow: integer;
begin
loginBMP := BitmapFromString(4, 5, 'FFD025FFD432FFE962FFE253FF' +
'D839FFE962FFDC48FFD025FFE2532E72C02E72C0FFD025FFD4322' +
'E72C02E72C0FFD0252E72C02E72C02E72C02E72C0');
btnlogin := BitmapFromString(10, 8, 'z78DA737373737376761B4' +
'1A4ABEB48220171BF8111');
shoptxt := BitmapFromString(25, 20, 'z78DAED56390E03210CFC1' +
'2D772942C98FF3F29C5342359461B25C52A1B172E8CB187618C58' +
'4B462FEBEF1FE66B2D7234F831CE59F31D5039B294E20AE38FEA3' +
'9A8E61CB3F9F3ECB3749139DBA5BDC8CFF9901443F0CB67DD9D51' +
'C51856F0BDB79917F4DF5A959CB826BAA3825386B88510789C611' +
'62ACB4AC99204F940BECFB738C74939D39A7DAB2647BC77CB9DD8' +
'AB6BE21EF92E6088732F30AF2BE376AEE84A73A24F8A1BB178E05' +
'5F650946683D5A2FB22AE19FB162AD618B862DE3E47C5A783F678' +
'F5CA546ADEDE45059D6855001B9F7AFFC200BFD621227B545617C' +
'D8935177B541A0FEFE255F079E575057E4C04901C479258F4DC59' +
'8ADAFF079003AF73A08DFBFC257EDBBF002A90CD83');
notnow := BitmapFromString(24, 15, 'z78DAED94498E24310845AF' +
'141E02C312837DFF23158317998ACA56B75AAA55F124948AC17C3' +
'E446AD74B507FF36FFE912C2C43AE299366E3CDC2489B164DEAD4' +
'A822E06D44A64A85AEBC9B4FE65B79C27F6900A95388080970186' +
'0BF900647CC0809940374ACAA31C1E1DB21A79B5AD39BA7E5C97F' +
'A5617A17D91DB233D55918CC401E7090CFDC41757405A9F676E6E' +
'56034464AD66D567C2A61E2C12DBA80ECEE9CBF9D5D831EDC2FE4' +
'95BC7B39472105A9ED72341B03E734319C98F4FDA664C53E3427F' +
'B5A11BB0510702081BE9057F2EE08E2ADECE2F8F654155EE9E548' +
'7752C9E439664DF734E24D090659F7110BCC3596A2A680A7F0DA9' +
'3B4EEA273C171AD1F55E95577CE0463D3B439A241B3AF85733A5A' +
'9CDC8D5D82ECF48392B19957E9805DDBA78CC5166F5B67D72E678' +
'2103C5C4A83D1CCB10FB1386B0421FC3843C187B86F64D9BD0C11' +
'FA73269E782C5F671B73CFD394D8A59C5A7E83AB04FFAA0771582' +
'DB5F96C855576F5B7F730DF9A429361DE6706A04B244F3E55A2E2' +
'D31FDB1B230772F6ED755EB9C3F9E87373C49EC0E7752B3C97360' +
'09E90F91E58E5BB79E53F806F713F7F19E89C1D6E41FAF9EA526E' +
'D10755CFA09B557B2B50583363A52574F639AABCED737524E20BF' +
'D670A06');
//wait(3000); //Wait time before logging in
if(findbitmapin(loginBMP,x,y,0,0,1024,768)) then begin
clickmouse(x,y,true);
wait(3000);
if(findbitmapin(btnlogin,x,y,0,0,1024,768)) then begin
clickmouse(x+16,y-16,true);
wait(200);
sendkeys(user);
wait(800);
clickmouse(x,y+10,true);
wait(5000);
if(findbitmapin(shoptxt,x,y,0,0,1024,768)) then begin
clickmouse(x,y+320,true);
wait(200);
sendkeys(pass);
wait(800);
clickmouse(x,y+352,true);
wait(500);
if(findbitmapin(notnow,x,y,0,0,1024,768)) then begin
clickmouse(x+216,y+55,true);
writeln('Clicked the ''not now'' box for firefox''s password management.');
end;
result:=true;
end else
begin
writeln('Unable to find shop text for entering password.');
result:=false;
end;
end else
begin
writeln('Unable to find login button.');
result:=false;
end;
end else
begin
writeln('Couldn''t find login');
result:=false;
end;
end;
Example of how to use it:
if(login(USERN,PASSW)) then begin
writeln('SUCCESS in logging in');
end else
begin
writeln('FAILURE in logging in.. terminating!');
terminatescript;
end;
Setup:
1. Open neopets home page in firefox
2. You can run it however you want, I just provided a function.
3. Make sure the "Login" text is visible
NOTES:
1. Make your screen resolution 1024x768 or the script may not work properly.
2. Must be using firefox
3. This script finds things by bitmaps.
