Results 1 to 7 of 7

Thread: Call all the possible anti random procedures?

  1. #1
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default Call all the possible anti random procedures?

    How can I make my procedure call all the current possible anti randoms? I have mine like this
    SCAR Code:
    function MyFastRandoms: Boolean; //WT-Fawki
    //Haha, I am kidding about 'My'FastRandoms, I just didn't want
    //  it to be confused with the one in AntiRandoms.scar ;)
    var
      i: Integer;
    begin
      if (not LoggedIn) then
        Exit;
      for i := 0 to 11 do
      begin
        case I of
         0:  if FindDead then
               Result := True;
         1:  if FindMod then
               Result := True;
         2:  if FindMime then
               Result := True;
         3:  if FindMaze then
               Result := True;
         4:  if FindQuiz then
               Result := True;
         5:  begin
               FindNormalRandoms;
             end;
         6: begin
              if NoGameTab then
              begin
                Players[CurrentPlayer].loc:='No GameTab';
                Result := True;
                Logout;
                Exit;
              end;
            end;
         7: begin
              if InBlack then
              begin
                Players[CurrentPlayer].loc:='InBlack';
                Result := True;
                Logout;
                Exit;
              end;
            end;
         8: if(RC)then
              Result := True;
         9: if FindTalk then
              Result := True;
         10: begin
               FindNonInventoryRandoms;
             end;
        end;
        Wait(1);
      end;
    end;
    It will do find talk like 4 times.. what can I make to have it solve all possible SRL randoms, and also set the .Loc?

    Thanks in advance,
    ~Harry


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  2. #2
    Join Date
    Apr 2007
    Location
    Perth, Australia
    Posts
    3,926
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    By setting the location do you mean:

    SCAR Code:
    if FindDead then
    begin
      Result := True;
      Players[CurrentPlayer].Loc := 'Dead';
    end;

    //etc....

    And why do you make it FindNormalRandoms in your FindFastRandoms. It sorta defies the point of fast... Besides I think FindNormalRandoms already searches for all (SRL) randoms(?).

  3. #3
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    FindNormal will find all the current ones?!

    Yes and I mean
    Players[CurrentPlayer].loc:='Dead';



    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  4. #4
    Join Date
    Apr 2007
    Location
    Perth, Australia
    Posts
    3,926
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Looking at the FindNormalRandoms function I can see that it searches for most of them. I'm not sure if its all of them but theres definately a lot.

    Also when a random appears, it is recorded in Players[CurrentPlayer].Rand

  5. #5
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    Well, I want it to do .Loc so it will show it in my proggy.. :|


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

  6. #6
    Join Date
    Apr 2007
    Location
    Perth, Australia
    Posts
    3,926
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Ok... so in your proggie do something like this:

    SCAR Code:
    if (Players[i].Rand <> '') then Players[i].Loc := Players[i].Rand;

    I'm not sure if Players.Rand has anything stored in there by default though.

  7. #7
    Join Date
    Dec 2006
    Location
    Sweden
    Posts
    10,812
    Mentioned
    3 Post(s)
    Quoted
    16 Post(s)

    Default

    Ok, I guess I will use FindNormalRandoms and also FindFastRandoms. Much thanks for your help


    Send SMS messages using Simba
    Please do not send me a PM asking for help; I will not be able to help you! Post in a relevant thread or make your own! And always remember to search first!

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Random Procedures
    By ranojit in forum OSR Help
    Replies: 2
    Last Post: 02-27-2008, 06:39 AM
  2. Anti-Random
    By sgteagle93 in forum OSR Help
    Replies: 2
    Last Post: 12-28-2006, 01:35 AM

Posting Permissions

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