SRL Archive - RS3 Outdated / Broken Scripts

[*]Widraws (any)hides from Al-kharid bank and takes them to funny "girl named" guy-Ellis :D
Tanns them and walks back to bank…

SETUP:

1. Place ur chars in Al-Kharid bank(near the bank booths) and put money in first inventory slot(nothing else)!
2. Have hides what you wish to tann in first bank slot!
3. Declare players in line 34 and fill up line 25 & 29
4. Run very bright, 32bit true color

Proggys:

My proggy, tested it-ran out of hides, stopped manually…

[PHP]—===Al-kharid Any Hide Tanner by Neeger v1.0===—
-> Tanned: 405 hides =)
-> Worked for: 19 Minutes and 48 Seconds
-> Post Reports to: [/PHP]




Post reports, bugs and suggestions =)

Version 1.1 is out-little fixes has been done

nice looking… some problems tho

  until (w = 8) or findsymbol(x, y, 'tanner');//change to w >= 8
  if (w > 8) then// change to w >= 8 here

w will never be greater than 8…

mainloop fix

  repeat
    if not OpenBankFast('akb') then
        begin
          Writeln('Didnt find Bank =(');
          LogOff;
          NextPlayer(False);
        end else
        begin
          FixBank;
          count:= 0;
          repeat
            HidesToInv;
            CloseBank;
            ClickRoad;
            IntoEllisHouse;
            FindEllis('Ellis');
            TannAllHides;
            count:= count + 1;
            Hides:= count*27
            Setrun(true);
            ClickRoad2;
            ToBank;
            if not OpenBankFast('akb') then
            begin
              Writeln('Didnt find Bank =(');
              LogOff;
              NextPlayer(False);
            end;
            Wait(1800+random(200));
            if BankScreen then Deposit(2, 28, True);
            Report;
          until(count >= Invs);
          if (count >= Invs) then
          begin
            Writeln('Player did all loads successfully =)');
            LogOff;
            NextPlayer(True);
          end else
          begin
            Writeln('Player has failed =(');
            LogOff;
            NextPlayer(False);
          end;
       end;
  until (CurrentPlayer > HowManyPlayers - 1);

could use a lot more help…
i suggest making a walk procedure that has a which option and make it a case of toback and toellis. also make a deposit procedure and use that instead of

 if not OpenBankFast('akb') then
            begin
              Writeln('Didnt find Bank =(');
              LogOff;
              NextPlayer(False);
            end;
            Wait(1800+random(200));
            if BankScreen then Deposit(2, 28, True);
            Report;
          until(count >= Invs);

same with withdraw procedure. if you want an example you can look at my stick smither in the jun mem smithing section… pretty good script in all!

Thanks mormonman for your suggestions i look into that…
Did you run it? Perhaps we can see proggy? :P
Hmm… you "fixed" mainloop but i dont think its going to compile…

the script does not always get to the tanner.

aww, I just started writing my hide tanner the other day… :p

Oh well, I'll take a look at yours later :)

lmfao teen porn LOLOLOLOL?

um this script walks the same way to the bank and to the tanner the same … isnt that easy to detect for a ban?

Omg why are so many people making AK tanners lol! I'll have to update mine a lawt :p

Nice script though, could use some failsafes though. And I don't see a withdraw coins procedure?

Otherwise It looks good :)