SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
wyn10 - SRL Member Application Form
wyn10

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
yes
yes The SRL section that came on mopar

Programming Knowledge
Scar and little java

Other Communitys
Rs-r, mopar, here, sythe and scar-scripts.com

How Long have You Played Runescape
Almost 2 years

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

My name is Wayne formally known in alot of places as wyn10, ive been learning scripting for about one and a half years as i got scammed over someone said they would make me the script but they didnt. Anyway ive been readin Tut's and alot of scripts, right now im working on my pay script which is a yew cutter that will start at fally, going all the way down to rimm to cut yews and banks which is currently pissing me off :P Anyway the reason i wanted to join is to read of how more technical scripting become and how good scripting can get.


I have also been sort of a major tester as for alot of people that are trusting me in there private or pay scripts (star, Charmz etc)

Also the script below is something i did since i was bored and i needed a whole bunch of runes.

Thanks

Wyn10

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

program rune_buyer_by_wyn10;
{.include SRL/SRL.scar}

var
  water: integer;
  fire: integer;
  air: integer;
  bought: integer;

//Start it any rune shop screen that has air's, fire's or water's
const buyrunes = ('air'); //What rune we buying? (air, fire and water)
const manyrune = 20; //How many runes we buying?(keep last digit zero)

//If script doesnt find the runes for you just change the bitmaps around
//since it works for me


procedure load_bits;
begin
  Writeln('loading the bits')

  water := BitmapFromString(15, 9, 'z78DA9DD24B0E8520104' +
    '4D12DD9205DD5433EB2FF25696C0618139F3E4D6AE6E126424545' +
    'A52FB1A1894ACDF6BC16783C969899C78295C5C88DCDAA8909050' +
    '4199191DD7F230F5F8E4F7139C5FD6C0B3B3A143AFB9FE5D99FCA' +
    'D1B01EEFE9BF377DD9B832B233310DDFCB5D2E8808BE5FE5D9BF9' +
    '7C32058FE93695CD0591828F77240BB6EBE1FCCE92E0D792EF73F' +
    '98B4691BFED9FFC3BCDDA58BEFE5DE1CB468197B9EF24AF67D2CD' +
    'F010EF2B463');

  fire := BitmapFromString(18, 7, 'z78DAB5D2410E85201003' +
    'D02B3908D3768922F73F9204D8FC18575F587441D2BC34C01D199' +
    '93DB342347F260F06DAF35E46106F2D91178BB236561505055438' +
    '9CD64A7C6BFD93533C65321444C415CA8FD8D7E1C08EB050014F1' +
    'E631D04C3B6D04ACCED718695BC7801BCFAF5B1D27F8E02DB19EB' +
    'A6D5F35B8B9589698A7DDD0DF917A2FC');

  air := BitmapFromString(18, 10, 'z78DA8D934B8EC5200C04' +
    'AF144870B7977CEF7FA487800508180D91BCB00245D926BB6CB3E' +
    '50B0F4F4144CC2D3347065A9A2553E8E8D410845AD6B5EFD29A64' +
    '52AF0F8B26B56A0F276F442A1F942593F8F19D89071618190631A' +
    'A51736099BA75B927EB5148BBE94C3CB01C3DFD2036BBFD1F1408' +
    '6426DE4CFF26F6DACE7650183C087861474CF8F01D7C5B4F6FC48' +
    '357EF66B7EB2C274912204572E72E8E8DDB4DF79EDE66E9663758' +
    '2D2E948B63AFED98DBCDF43AABCD0E8FA828AC04098B638BFFE9E' +
    '6ED8DF43E0E569B8DC1BA106FA67B5597DAB6B91DC46ED7BC24CA' +
    '57BF2C752DC4DD749AA2DB4B39B026BB1FA962F604');
  writeln('done loading bitmaps')

end;

procedure buy_air_rune;
begin
  if (not (buyrunes = 'air')) then
  begin
  end else

    if (buyrunes = 'air') then
    begin
      writeln('we buying air runes')
        if (findbitmap(x, y, air)) then
        Mouse(x, y, 1, 1, false)
          Chooseoption(x, y, '10');
      Bought := Bought + 10
        wait(9000 + random(420));

    end;
end;


procedure buy_fire_rune;
begin
  if (not (buyrunes = 'fire')) then
  begin
  end else

    if (buyrunes = 'fire') then
    begin
      writeln('we buying fire runes runes');
      if (findbitmap(x, y, fire)) then
        Mouse(x, y, 1, 1, false)
          Chooseoption(x, y, '10');
      Bought := Bought + 10
        wait(9000 + random(420));

    end;
end;


procedure buy_water_rune;
begin
  if (not (buyrunes = 'water')) then
  begin
  end else

    if (buyrunes = 'water') then
    begin
      writeln('we buying water runes');
      if (findbitmap(x, y, water)) then
        Mouse(x, y, 1, 1, false)
          Chooseoption(x, y, '10');
      Bought := Bought + 10
        wait(9000 + random(420));

    end;
end;



procedure progress_report;
begin
  Writeln('Thanks for using wyn10s runebuyer');
  Writeln('We have bought' + IntToStr(Bought) + 'runes');
  Writeln('Thank You for using this script :D');
end;



begin
  setupsrl;
  cleardebug;
  Writeln('Now using Wyn10s Rune Buyer');
  load_bits;
  repeat
    begin
      buy_water_rune;
      buy_fire_rune;
      buy_air_rune;
      progress_report;
    end;
  until (Bought = manyrune);
  Writeln('we have finished now stop being lazy :P');

end.

——————————————————
<!– END TEMPLATE: formanswers –>

Bitmaps Too Large
No antirandoms
No antiban
No multiplayer
Nothing stands out.

Over the script is quite seimple, when im looking for an SRL member im looking for more of a powerminer or powerchopper.

Your bitmaps are quite large, most bitmaps are maybey 5 lines max.
Remember, you dont need the entire rune as a bitmap, just a small chunk will do.

if (not (buyrunes = 'water')) then
  begin
  end else

This is a bit pointless, because you don't tell what the script to do if the uptext inst water.

   wait(9000 + random(420));

In my opinion this wait is way to long and will make the script quite slow, im faster than that by hand.

Overall its quite simple, and you still have much to learn.

So im going to have to say NO.

Love,
Yohojo

yeah sorry its a no from me too. but for the if not firerunes or the things you put in like that, it should be if not fire runes then exit, that would probably work better.

ok, thanks everybody…yoho i didnt put randoms in due to you cant see them with the shop screen open and i never got any when making this script….