Results 1 to 3 of 3

Thread: unjumble:D

  1. #1
    Join Date
    May 2007
    Location
    in the forest
    Posts
    190
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default unjumble:D

    I went through it and added all the ways it could make the result turn out and after that it's been no different, but it's more cluttered and confusing... any words of wisdom?

    SCAR Code:
    Function WalkToStorePt1: Boolean;
    var
    x, y: Integer;
    begin
      if (not loggedin) then Exit;
      ColorToFind := 6776944;
      MyAutoColor;
      if not RadialWalk(MyAutoColor, 350, 310, 72, 1,1) then
        begin
          ColorToFind := 2313827;
          Result := True;
          MyAutoColor;
          if not RadialWalk(MyAutoColor, 350, 300, 72, 1,1) then
            begin
              Result := false;
              if (FindSymbol(x, y, 'water source')) then
                begin
                  result := true;
                  MouseFlag(x, y, 5, 5, 0)
                end else
                if RadialWalk(FindLadderColor, 350, 10, 50, 1, 1) then
                   if (FindSymbol(x, y, 'water source')) then
                     begin
                      Result := true;
                      if (FindSymbol(x, y, 'archery shop')) then
                        begin
                          MouseFlag(x, y, 5, 5, 0)
                          Result := true
                        end else Result := false
                    end;

            end;

        begin
          if (Result = false) then
            begin
              WriteLn('player could not make it through the walk, player, ' + Players[CurrentPlayer].Name + ' is now false.');
              Players[CurrentPlayer].Active := False; // Set your player to false!!
              LogOut;
              Exit;
            end else
              Writeln('walking part one complete');
              if (FindSymbol(x, y, 'Shop')) then Writeln('store is in sight') else writeln('no store in sight but we can check');
            end;

    end;
    At sea with the navy - not very active

  2. #2
    Join Date
    Oct 2008
    Location
    C:\Simba\Includes\
    Posts
    7,566
    Mentioned
    19 Post(s)
    Quoted
    180 Post(s)

    Default

    SCAR Code:
    function WalkToStorePt1: Boolean;
    var
      x, y: Integer;
    begin
      if (not loggedin) then
        Exit;
      ColorToFind := 6776944;
      MyAutoColor;
      if not RadialWalk(MyAutoColor, 350, 310, 72, 1,1) then
      begin
        ColorToFind := 2313827;
        Result := True;
        MyAutoColor;
      end;
      if not RadialWalk(MyAutoColor, 350, 300, 72, 1,1) then
        Result := false;
      if (FindSymbol(x, y, 'water source')) then
      begin
        result := true;
        MouseFlag(x, y, 5, 5, 0);
      end else
      if RadialWalk(FindLadderColor, 350, 10, 50, 1, 1) and (FindSymbol(x, y, 'water source')) then
        Result := true;
      if (FindSymbol(x, y, 'archery shop')) then
      begin
        MouseFlag(x, y, 5, 5, 0)
        Result := true;
      end else
        Result := false ;
      begin
        if (Result = false) then
        begin
          WriteLn('player could not make it through the walk, player, ' + Players[CurrentPlayer].Name + ' is now false.');
          Players[CurrentPlayer].Active := False; // Set your player to false!!
          LogOut;
          Exit;
        end else
          Writeln('walking part one complete');
        if (FindSymbol(x, y, 'Shop')) then
          Writeln('store is in sight');
        else
          writeln('no store in sight but we can check');
    end;
    There You had way to many begins and ends in the wrong place. Hope this helps.

    ~Camo
    Away for awhile, life is keeping me busy. | Want to get my attention in a thread? @Kyle Undefined; me.
    { MSI Phoenix || SRL Stats Sigs || Paste || Scripts || Quotes || Graphics }

    When posting a bug, please post debug! Help us, help you!

    I would love to change the world, but they won't give me the source code. || To be the best, you've got to beat the rest. || Logic never changes, just the syntax.
    If you PM me with a stupid question or one listed in FAQ, or about a script that is not mine, I will NOT respond.


    SRL is a Library of routines made by the SRL community written for the Program Simba. We produce Scripts for the game Runescape.


  3. #3
    Join Date
    May 2007
    Location
    in the forest
    Posts
    190
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thanks alot
    At sea with the navy - not very active

Thread Information

Users Browsing this Thread

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

Posting Permissions

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