SRL Archive - Other Scripts

LOCKERZ! Pwner


Markus

2010-03-28 06:49:43

This will:
  • Login and get your ptz
  • Answer the dailies

100% free, and doesn't use and 3rd party servers so they can't link IPs between other accounts.
Instructions should be clear.


program LOCKERZpwn;
{
LOCKERZ! Pwner
Copyright (C) 2010 Markus

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU Affero General Public License as
published by the Free Software Foundation, either version 3 of the
License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU Affero General Public License for more details.

You should have received a copy of the GNU Affero General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
}
const
email = ''; //enter your email here
password = ''; //enter your password here

var client : integer;
postdata, databuffer, ohterbuffer : string;
begin
InitializeHTTPClient(true, true);
SetHTTPUserAgent(client, 'Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.9.2.2) Gecko/20100316 Firefox/3.6.2'); //Might wish to change this ;)
GetHTTPPage(client, 'http://www.lockerz.com');
PostData := 'remember+me=off&handle='+email+'&password='+password;
postdata := PostHTTPPage(client, 'http://www.lockerz.com/auth/login', postdata);
writeln('You got: '+GetNumbers(between('<span class="ptz_value">', '</span> PTZ</li>', postdata))+' PTZ.');
//doing the other stuff
PostHTTPPage(client, 'http://www.lockerz.com/user/get_ptz', ''); //This should get the login ptz
postdata := GetHTTPPage(client, 'http://www.lockerz.com/dailies'); //Get the dailies page
writeln(postdata);
databuffer := GetNumbers(between('<div class="dailiesEntry" id="', '<h1 class="posted">', postdata));
Writeln(databuffer); //Today's ID is..
//Now we're going to look if it's multiple choice or not'
if (pos('<form', between('<div class="dailiesEntry" id="'+databuffer+'">', 'dailiesAnswer', postdata)) <> 0) then
PostHTTPPage(client, 'http://www.lockerz.com/daily/answer', 'id='+databuffer+'&a=nice+stuff&o=') //This will answer 'Nice Stuff' to everything, not advised to use rofl
else //multiple choice, we'll just give the first answer
begin
ohterbuffer := between('id="', '">', between('<div class="dailiesAnswer">', '</a>', postdata)); //gets the id
//Get valid other stuff
PostHTTPPage(client, 'http://www.lockerz.com/daily/answer', 'id='+databuffer+'&a='+
between('<a href="" class="mc dailies-answer-a" id="'+ohterbuffer+'">', '</a>', postdata)+
'&o='+ohterbuffer);
end;
end.

Have fun.

Note: this is in SCAR as I had to write this quickly (took 20 mins) and I cbf'ed to figure out wtf wasn't working with Simba's InitializeHTTPClient, probably has something to do with the wrappers
Sorry wiz/ray!

Also, I can't guarantee this works and neither did I test this extensively. Also it's most likely highly detectable as it doesn't send exactly the same headers as a real browser would, doesn't parse the javascript and such but at least it's better than closed-source alternatives which use the same IP for multiple accounts.

yes zasz, trying to SELL rsbot clones of my script while it still was in members section wasn't such a good idea, good thing it got pastebinned by a friend
Edit: this version actually compiles ;)

mastaraymond

2010-03-28 06:58:15

?? Lazy fuck..

[Error] (26:35): Invalid number of parameters at line 26
Compiling failed.

function InitializeHTTPClient(HandleCookies: Boolean): Integer;

Markus

2010-03-28 07:01:40

control-space didn't show me =/

Edit: tested it today and it got me my PTZ :)

ZaSz

2010-03-29 19:36:03

Mine is free to srl, but you didn't have to hate :/ Still, mine can go without your pc logging on, and yours doesn't solve the problem of the days you just forget.

edit: I get the feeling you think I'm doing this just for cash. #1, thats mostly true. But its not because I'm some kid that's just greedy whory for cash. It's cause we don't really have $, and I don't get most the crap or get to do most the crap as others because of it… That's why I try and make and sell stuff. It took me a few days to setup the website with a login system + all the methods behind it. But i still contribute in some way to others. Like I give srl free use to mine. I release scripts every now and then. I try to make an arcade for srl to use… Its not like I just try to force selling stuff down anyone's throats.

_ChArMz

2010-03-29 22:47:20

good :D, i was just about to make one

Timer

2010-03-29 22:52:48

Quoted yourself.. What? ;)

Just if I had a Lockerz. :(

i luffs yeww

2010-03-29 22:53:53

Charmz, you can delete it yourself. ;) Just click edit > delete.

Sex

2010-03-29 22:54:17

From: Timer
Quoted yourself.. What? ;)

Just if I had a Lockerz. :(

Why don't you make one..?
You need an invite? PM me if you do.

Wolvy

2010-04-22 10:52:19

This works great, I tried and got my ptz :).