SRL Archive - RS3 Outdated / Broken Scripts

World 16 Air Crafter
By JackLKrawl
Credits go to
Mat_De_B - For helping with commands and fixing errors
Metho D - Help with Wt-Fakawi's FindFastRandoms

This is a World 16 Air Crafter - No longer do you have to spend hours and hours in this hole. It can trade other people, and it, obviously, crafts runes. It does not work with Pure Essence, but that should not be a problem.

It should be in the minimal as far as detectability, as it uses random chat, including misspellings. I will update this, but I need you to tell me the errors, because otherwise I cannot fix them.

Directions

Fill in lines 14-16, keep essence in first slot, keep gold in second slot, monitor the script for the first two turns.

I would not recommend using this on your mains yet, because I know that something is going to go wrong with it. Please, post any suggestions here.

Update 1
More Anti-Randoms
Update 2 —This is not in the current download
If…Then…Else in Procedure FindChat

From what I can see in the script, you've never called FindChat, which means the script will start off trading, except it can't do that unless the trade window is up. Try using WT-Fakawi's FindFastRandoms function, it covers some that FindNormalRandoms doesn't. Use both of them together in your own procedure for the best result.

Ugh, I found the FindFastRandoms, but it doesn't love me very much. It keeps returning 'unknown identifier.' I got through the first one, and I know I could replace RunDir('N'); and compass('n') with different procedures, but then it may turn into findnormalrandoms all over again. What am I supposed to do? O_o

Here's the anti-random function I used if you're interested. It works fine for me.

function FindFastRandoms: Boolean; //by WT-Fawaki
var
  i: Integer;
begin
  for i := 1 to 9 do
  begin
    case I of
      1: if FindDead then
          Result := True;
      2: if FindMod then
          Result := True;
      3: if FindMime then
          Result := True;
      4: if FindMaze then
          Result := True;
      5: if FindQuiz then
          Result := True;
      6: if FindDemon then
          Result := True;
      7: begin
          if NoGameTab then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'No GameTab';
            Logout;
            Exit;
          end;
        end;
      8: begin
          if InBlack then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'InBlack';
            Logout;
            Exit;
          end;
        end;
      9: RC;
    end;
    Wait(1);
  end;
end;

And the function with both:

procedure Randoms;
begin
  FindTalk;
  FindNormalRandoms;
  FindFastRandoms;
  if (FindFight = True) then
  begin
    RunAwayDirection('S');
    wait(1000 + random(5000));
    RunBack;
  end;
end;

Pfft, I think the 'edited' version may have done it. OK, thank you! ^^
Edit: Yep, it works! ^^

procedure FindChat should be using an If…then…else statement.

I will edit this post when I read more of it; haven't got much time now.

i might test this soon on my skiller

I can tell this is high priority. blegh..
Would someone freaking help? I mean I know we're all excited about 500 year old air crafters, but jeez..

maybe throw a wait in your spaminate procedure

edit::
i was talking to boreas about your project as i am working on the same one, but it is going to be pretty different

here is a piece of our convo that will help you in the long run.

Craig says:
Procedure FindChat;
begin
  repeat
    FindNormalRandoms;
    if (GetColor(12,451)=Chat) Then
    begin
      Mouse(12,451,1,1,true);
      exit;
    end;
    Spaminate;
  until(GetColor(12,451)=chat);
end;
Bramble <aka Link> says:
yea that works better
Bramble <aka Link> says:
but it can still be infinite
Bramble <aka Link> says:
and hog up memory without the wait
Craig says:
just add a timefrommark

OK, thanks ^^ I'll be sure to fix that. O_o I'm going to clean this script up, but only after I finish the Air Runner. I have a solution for my problem, except I really don't want to go to so much trouble

This is awesome thank you very much!

I find it amazing that SCAR/SRL can work with w16 airs i mean.. thats like.. a lot of work and technology! :D FindChat is amazing..

It shouldn't work yet, I'd be surprised if it does.

I'm going to work with the W16AirRunner first, then I'll set this up. Since walking is really all that W16 is about…I'm going to base the crafter off of the runner.

Pm me when u need testers ill find bugs an help u get this moveing fast just pm when ready iam excited about this !!! gool luck wish i could help more