Quantcast

What works and what is paused ยท Email is limited to account activation and password resets.

Jump to content


jahuro24

Member Since 24 Aug 2007
Offline Jul 08 2008 10:47 PM

Posts I've Made

In Topic: How do i get a direct link to a game ?

26 August 2007 - 02:03 AM

Thats what i wanted. But how did you get that link? (I need the one for tug-o-war if anyone wants to know)

In Topic: Cant seem to post a tutorial.

25 August 2007 - 09:09 PM

Thanks alot mate.

In Topic: Hey everyone

25 August 2007 - 05:14 PM

Thanks guys! Sorry for posting my code here, i will go and find a more suitable section.

In Topic: Hey everyone

24 August 2007 - 08:05 PM

Thanks. smile.gif

This is a refresher i wrote in scar if anyone is intrested. smile.gif Its undetectable (i hope tongue.gif ) and has detection of when you get a random.
CODE
{01001010 01100001 01101000 01110101 01110010 01101111}
{             _       _                               }
{            | |     | |                              }
{            | | __ _| |__  _   _ _ __ ___            }
{        _   | |/ _` | '_ \| | | | '__/ _ \           }
{       | |__| | (_| | | | | |_| | | | (_) |          }
{        \____/ \__,_|_| |_|\__,_|_|  \___/           }
{                                                     }
               {.include srl/srl.scar}
{01001010 01100001 01101000 01110101 01110010 01101111}

{.Script Info:
# ScriptName  = Neopets Refresher
# Author      = Jahuro
# Description = Random undetectable refresher for Neopets.
# Version     = 0.2
# Date        = 6/08/2007
# Comments    = All items in deposit box. Start logedin.
              = Have IE6 as defualt browser. Requires SRL.
/Script Info}

{---------------------------}{---------------------------}
{Changelog}
{V0.2 - added progress report, detection of when script gets a random and minor bugfix}
{V0.1 - first release of script}
{---------------------------}{---------------------------}

{---------------------------}{---------------------------}
{-----------------------}{SETUP}{------------------------}
{---------------------------}{---------------------------}

const
  wwait = 5000; // Time it takes to load a page. (In milliseconds)

{---------------------------}{---------------------------}

var
  noofrefreshes: Integer;
  noofrandoms: Integer;
  randombitm: Integer;

procedure progressreport;
begin
  cleardebug;
  Writeln('Worked For : ' + ScriptTime2(2))
  Writeln('Refreshed ' + IntToStr(noofrefreshes) + ' times');
  Writeln('Received ' + IntToStr(noofrandoms) + ' random events');
end;

procedure refresh;
begin
  case Random(51) of
    0: OpenWebPage('http://neopets.com/explore.phtml');
    1: OpenWebPage('http://neopets.com/faerieland/index.phtml');
    2: OpenWebPage('http://neopets.com/games/play.phtml?game_id=586');
    3: OpenWebPage('http://neopets.com/faerieland/poogleracing.phtml');
    4: OpenWebPage('http://neopets.com/faerieland/rainbowfountain.phtml');
    5: OpenWebPage('http://neopets.com/faerieland/faeriecity.phtml');
    6: OpenWebPage('http://neopets.com/faerieland/darkfaerie.phtml');
    7: OpenWebPage('http://neopets.com/faerieland/springs.phtml');
    8: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=40');
    9: OpenWebPage('http://neopets.com/faerieland/wheel.phtml');
    10: OpenWebPage('http://neopets.com/halloween/index.phtml');
    11: OpenWebPage('http://neopets.com/halloween/braintree.phtml');
    12: OpenWebPage('http://www.neopets.com/battledome/battledome.phtml?battle_location=1&rnd=2088256748&rndno=455');
    13: OpenWebPage('http://neopets.com/halloween/index_fair.phtml');
    14: OpenWebPage('http://neopets.com/halloween/costumes.phtml');
    15: OpenWebPage('http://neopets.com/games/maze/maze.phtml');
    16: OpenWebPage('http://neopets.com/games/play.phtml?game_id=230');
    17: OpenWebPage('http://neopets.com/halloween/spet_masks.phtml');
    18: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=31');
    19: OpenWebPage('http://neopets.com/halloween/esophagor.phtml');
    20: OpenWebPage('http://neopets.com/halloween/colouring_page.phtml');
    21: OpenWebPage('http://neopets.com/halloween/gamegraveyard.phtml');
    22: OpenWebPage('http://neopets.com/games/play.phtml?game_id=763');
    23: OpenWebPage('http://neopets.com/halloween/witchtower.phtml');
    24: OpenWebPage('http://neopets.com/halloween/wheel/index.phtml');
    25: OpenWebPage('http://neopets.com/halloween/bagatelle.phtml');
    26: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=60');
    27: OpenWebPage('http://neopets.com/halloween/corkgun.phtml');
    28: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=30');
    29: OpenWebPage('http://neopets.com/halloween/strtest/index.phtml');
    30: OpenWebPage('http://neopets.com/halloween/scratch.phtml');
    31: OpenWebPage('http://neopets.com/halloween/ghostpets.phtml');
    32: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=59');
    33: OpenWebPage('http://neopets.com/halloween/coconutshy.phtml');
    34: OpenWebPage('http://neopets.com/games/play.phtml?game_id=131');
    35: OpenWebPage('http://neopets.com/worlds/index_kikolake.phtml');
    36: OpenWebPage('http://www.neopets.com/objects.phtml?type=shop&obj_type=67');
    37: OpenWebPage('http://www.neopets.com/objects.phtml?type=shop&obj_type=66');
    38: OpenWebPage('http://www.neopets.com/worlds/kiko/glass_boat.phtml');
    39: OpenWebPage('http://neopets.com/pirates/index.phtml');
    40: OpenWebPage('http://neopets.com/games/play.phtml?game_id=82');
    41: OpenWebPage('http://neopets.com/pirates/piratepets.phtml');
    42: OpenWebPage('http://neopets.com/prehistoric/village.phtml');
    43: OpenWebPage('http://neopets.com/objects.phtml?type=shop&obj_type=42');
    44: OpenWebPage('http://neopets.com/prehistoric/mediocrity.phtml');
    45: OpenWebPage('http://neopets.com/battledome/battledome.phtml?battle_location=4');
    46: OpenWebPage('http://neopets.com/desert/index.phtml');
    47: OpenWebPage('http://neopets.com/games/play.phtml?game_id=52');
    48: OpenWebPage('http://neopets.com/games/play.phtml?game_id=562');
    49: OpenWebPage('http://neopets.com/desert/shrine.phtml');
    50: OpenWebPage('http://neopets.com/desert/qasala.phtml');
  end;
  noofrefreshes := noofrefreshes + 1;
end;

procedure loadrandombitm;
begin
  randombitm := BitmapFromString2(False, 'a79D7378DAD553CB128' +
    '02008FC25285F1DCDE2FF3F295767EA520E351D94C3CA2CE8820A' +
    '11510C19984D46672290A78C561C3000A780A8B5E9E41D52C82F5' +
    '89C67F866871F91E9AD00E70D4C2839B28059CDC5D75DBE9C43D0' +
    '6521C996A0726B353A0AB62B1FABA36FAFA07F476ADA53CE375D8' +
    'D96A6F77E787D473DF06FA7BBFFFBD74FF758BD68FED8BFB3FF57' +
    'CD4FBA07092');
end;

procedure findrandom;
begin
  if (FindBitmap(randombitm, x, y)) then
  begin
    status('-!FOUND A RANDOM EVENT!-');
    noofrandoms := noofrandoms + 1;
  end else
    status('Random event not found.');
end;

begin
  loadrandombitm;
  repeat
    refresh;
    wait(wwait + random(5000));
    findrandom;
    progressreport;
  until (false);
end.