Page 1 of 2 12 LastLast
Results 1 to 25 of 44

Thread: RuneScapeTop Picture Leaker :D!

  1. #1
    Join Date
    Dec 2006
    Posts
    399
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default RuneScapeTop Picture Leaker :D!

    SCAR Code:
    program RunescapeTopDownloader;

    const
      Path2Dl = 'C:\Documents and Settings\Owner.MATTHEW\Desktop\RuneScapePictures\New\';

    var
      png, jpg, gif, bmp, tif, none, i : integer;
        a, b, c, d, e : integer;
      ax, bx, cx, dx, ex, pix : string;

    function DownloadFile(FileLink, Path: String): Boolean;
    var
      PageString: String;
      iFile: Integer;

    begin
      try
        PageString := GetPage(FileLink);
        if PageString = '' then Exit;
        iFile := RewriteFile(Path, False);
        Result := WriteFileString(iFile, PageString);
        CloseFile(iFile);
      except
        Result := False;
        Exit;
      end;
    end;

    procedure Download(Path2 : string);
    begin
      if (DownloadFile(Path2 + '.png', Path2DL + pix + '.png')) then
      begin
        Writeln('Downloaded: ' + Path2 + '.png');
        png := png + 1;
        Exit;
      end;
      if (DownloadFile(Path2 + '.jpg', Path2DL + pix + '.jpg')) then
      begin
        Writeln('Downloaded: ' + Path2 + '.jpg');
        jpg := jpg + 1;
        Exit;
      end;
      if (DownloadFile(Path2 + '.gif', Path2DL + pix +'.gif')) then
      begin
        Writeln('Downloaded: ' + Path2 + '.gif');
        gif := gif + 1;
        Exit;
      end;
      if (DownloadFile(Path2 + '.bmp', Path2DL + pix +'.bmp')) then
      begin
        Writeln('Downloaded: ' + Path2 + '.bmp');
        bmp := bmp + 1;
        Exit;
      end;
      if (DownloadFile(Path2 + '.tif', Path2DL + pix +'.tif')) then
      begin
        Writeln('Downloaded: ' + Path2 + '.tif');
        tif := tif + 1;
        Exit;
      end;
      none := none + 1;
    end;


    procedure PrintStats;
    begin
      ClearReport;
      AddToReport('Stats:');
      AddToReport('PNGs: ' +IntToStr(Png));
      AddToReport('JPGs: ' +IntToStr(jpg));
      AddToReport('GIFs: ' +IntToStr(gif));
      AddToReport('BMPs: ' +IntToStr(bmp));
      AddToReport('TIFs: ' +IntToStr(tif));
      AddToReport('No Pic: ' +IntToStr(None));
    end;


    function ConvertNumber(number : integer): String;
    begin
      case Number of
        0: Result := '0';
        1: Result := '1';
        2: Result := '2';
        3: Result := '3';
        4: Result := '4';
        5: Result := '5';
        6: Result := '6';
        7: Result := '7';
        8: Result := '8';
        9: Result := '9';
        10: Result := 'a';
        11: Result := 'b';
        12: Result := 'c';
        13: Result := 'd';
        14: Result := 'e';
        15: Result := 'f';
      end;
    end;

    procedure CreateDirs;
    begin
      a := 0;
      b := 0;
      c := 0;
      d := 0;
      e := 0;
      for i:=0 to 1000 do
      begin
        e := e + 1;
        if (e = 15) then
        begin
          e := 0;
          d := d + 1;
          if (d = 15) then
          begin
            d := 0;
            c := c + 1;
            if (c = 15) then
            begin
              c := 0;
              b := b + 1;
            end;
          end;
        end;
      ax := ConvertNumber(a);
      bx := ConvertNumber(b);
      cx := ConvertNumber(c);
      dx := ConvertNumber(d);
      ex := ConvertNumber(e);
      pix := ax + bx + cx + dx + ex;
      Download('http://www.runescapetop.com/up/images/' + pix);
      wait(250);
      PrintStats;
      end;
    end;


    begin
      png := 0;
      tif := 0;
      bmp := 0;
      jpg := 0;
      gif := 0;
      none := 0;
      CreateDirs;
    end.
    {Jethr0x's Picture Downloader... it downloads EVERY picture on RuneScapeTop.com
    Hopefully I find some nice nudies <3 ... or acc logs :D!!! <3 XtS }

    Downloads pictures from RuneScapeTop ... I like viewing pics for no reason... so i made this to download them so I can easily scan through them while afk training ... I admit i did find some nudes... >.> ... A few people asked me for it on IRC and use it... so I guess I can post it here

    Set the download location...

    RuneScapeTop is one of Zybez's uploading services... And its links look like: http://www.runescapetop.com/up/images/651ed.png

    The script has this number broken down.

    a := 0;
    b := 0;
    c := 0;
    d := 0;
    e := 0;

    would be: http://www.runescapetop.com/up/images/00000.png

    a := 1;
    b := 2;
    c := 9;
    d := 10;
    e := 14;

    would be: http://www.runescapetop.com/up/images/129ae.png

    understand?

    The current number is: 659ae (if you want to start there)
    6-5-9-10-14

    have fun
    Last edited by Jethr0x; 04-04-2010 at 02:07 AM.
    Hax0r


  2. #2
    Join Date
    Jan 2008
    Location
    10° north of Hell
    Posts
    2,035
    Mentioned
    65 Post(s)
    Quoted
    164 Post(s)

    Default

    Quote Originally Posted by Jethr0x View Post
    ...
    You havnt been here in awhile O.o, I bets you don't even remember me T_T...

    Dg's Small Procedures | IRC Quotes
    Thank Wishlah for my nice new avatar!
    Quote Originally Posted by IRC
    [22:12:05] <Dgby714> Im agnostic
    [22:12:36] <Blumblebee> :O ...you can read minds

  3. #3
    Join Date
    Dec 2006
    Posts
    399
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    I haven't >.> ... kinda quit scape for a while... but im back ...

    Name doesnt ring a bell ...
    Hax0r


  4. #4
    Join Date
    Jan 2008
    Location
    10° north of Hell
    Posts
    2,035
    Mentioned
    65 Post(s)
    Quoted
    164 Post(s)

    Default

    Its ok though lol nice script you got here, if only i knew what runescapetop was?

    Dg's Small Procedures | IRC Quotes
    Thank Wishlah for my nice new avatar!
    Quote Originally Posted by IRC
    [22:12:05] <Dgby714> Im agnostic
    [22:12:36] <Blumblebee> :O ...you can read minds

  5. #5
    Join Date
    Dec 2006
    Posts
    399
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    its like imageshack ... but by Zybez, and used mostly by swiftkit users.
    Hax0r


  6. #6
    Join Date
    Jan 2008
    Location
    NC, USA.
    Posts
    4,429
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    just to make code more efficient/smaller/awesome/sexy/etc I'd do

    SCAR Code:
    function convertNumber(numb: integer): String;
    var opt: array of String;
    begin
      opt := TStringArray('0', '1', '2', '3', '4', '5', '6', '7', '8',
                          '9', 'a', 'b', 'c', 'd', 'e', 'f');
      result := opt[numb];
    end;

    :3
    Quote Originally Posted by irc
    [00:55:29] < Guest3097> I lol at how BenLand100 has become noidea
    [01:07:40] <@BenLand100> i'm not noidea i'm
    [01:07:44] -!- BenLand100 is now known as BenLand42-
    [01:07:46] <@BenLand42-> shit
    [01:07:49] -!- BenLand42- is now known as BenLand420
    [01:07:50] <@BenLand420> YEA

  7. #7
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    Your script must be a hit!
    The connection has timed out
    The server at www.runescapetop.com is taking too long to respond.
    Haaa

  8. #8
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    Lol, site's down :P

  9. #9
    Join Date
    Dec 2006
    Posts
    399
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    damn, i think so many people used, it acted like a ddos attack lmao
    Hax0r


  10. #10
    Join Date
    Jan 2010
    Posts
    5,227
    Mentioned
    6 Post(s)
    Quoted
    60 Post(s)

    Default

    I'll let this run for a few hours.

    PHP Code:
    Stats:
    PNGs0
    JPGs
    0
    GIFs
    0
    BMPs
    0
    TIFs
    0
    No Pic
    958 
    :<

    Got up to lotses so I changed it to not wait at all and only look for .pngs. x]
    Last edited by i luffs yeww; 04-04-2010 at 05:14 PM.

  11. #11
    Join Date
    Feb 2010
    Location
    On the edge of space
    Posts
    160
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here is a picture I see when I click the MOAR button:

    http://www.runescapetop.com/randompi...?img=68a08.jpg

  12. #12
    Join Date
    Jan 2010
    Posts
    5,227
    Mentioned
    6 Post(s)
    Quoted
    60 Post(s)

  13. #13
    Join Date
    Dec 2006
    Posts
    399
    Mentioned
    0 Post(s)
    Quoted
    3 Post(s)

    Default

    The randompics thing is new... Zybez added it after their servers were overloaded with this script .
    Hax0r


  14. #14
    Join Date
    Jan 2010
    Posts
    5,227
    Mentioned
    6 Post(s)
    Quoted
    60 Post(s)

    Default

    >_> Maybe there servers were down because they were adding/fixing stuff?

  15. #15
    Join Date
    Jul 2008
    Location
    England
    Posts
    763
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Gah, you took the DownloadFile function I wrote for POMS - Credits pl0x :/.

    Edit: convertNumber could also be:

    SCAR Code:
    function convertNumber(numb: integer): String;
    begin
      if InRange(numb, 0, 9) then
        Result := IntToStr(numb)
      else if InRange(numb, 10, 15) then
        Result := Chr(97+numb-10);
    end;
    Last edited by Quickmarch; 04-05-2010 at 07:50 AM.
    lol

  16. #16
    Join Date
    Feb 2010
    Location
    On the edge of space
    Posts
    160
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    All I get are
    Code:
    HTTP ERROR

  17. #17
    Join Date
    Jan 2010
    Posts
    5,227
    Mentioned
    6 Post(s)
    Quoted
    60 Post(s)

    Default

    Because the pictures don't start for a longggg time.

  18. #18
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I win!
    6ef4e.jpg

  19. #19
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    YAY timer! XD I forgot to share my find
    I do visit every 2-6 months

  20. #20
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    6cb5.jpg

    moar. I love my Image Ripper.
    Anyone wantt?

    Code:
    Thank you for using Timers Image Ripper!
    You collected: 200 images!
    You also skiped over 3 images because they were repeats!
    Time Elapsed: 2 Minutes and 34 Seconds
    Successfully executed

  21. #21
    Join Date
    Oct 2006
    Location
    MI USA
    Posts
    3,166
    Mentioned
    6 Post(s)
    Quoted
    11 Post(s)

    Default

    I'd like to see a java bot do this..... 26882.jpg
    Or maybe not....

    Edit: Disclaimer on link..DO NOT CLICK IF YOU ARE UNDER 18...or have a sensitive stomach...you were warned !
    Last edited by RAM; 04-06-2010 at 08:52 PM.


  22. #22
    Join Date
    Jan 2008
    Location
    NC, USA.
    Posts
    4,429
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    I think the posts containing child pornography (timer's posts) should be removed. Some people will click and be offended? As far as I know, there is a rule against linking to inappropriate pictures?
    Quote Originally Posted by irc
    [00:55:29] < Guest3097> I lol at how BenLand100 has become noidea
    [01:07:40] <@BenLand100> i'm not noidea i'm
    [01:07:44] -!- BenLand100 is now known as BenLand42-
    [01:07:46] <@BenLand42-> shit
    [01:07:49] -!- BenLand42- is now known as BenLand420
    [01:07:50] <@BenLand420> YEA

  23. #23
    Join Date
    Oct 2006
    Location
    MI USA
    Posts
    3,166
    Mentioned
    6 Post(s)
    Quoted
    11 Post(s)

    Default

    Quote Originally Posted by noidea View Post
    I think the posts containing child pornography (timer's posts) should be removed. Some people will click and be offended? As far as I know, there is a rule against linking to inappropriate pictures?
    We'll have to ask Harry if this is considered child pornography ? Linking to and actually posting the pic are 2 different things ? I put a disclaimer on mine just in case


  24. #24
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by noidea View Post
    I think the posts containing child pornography (timer's posts) should be removed. Some people will click and be offended? As far as I know, there is a rule against linking to inappropriate pictures?
    killed it down to the image.

  25. #25
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    at first I was like "wat"
    24a46.jpg


    Win:
    2fc61.jpg
    2fc68.jpg 2fc8d.jpg
    Last edited by Zyt3x; 04-06-2010 at 09:03 PM.

Page 1 of 2 12 LastLast

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •