Results 1 to 4 of 4

Thread: Another help topic from me =/ (finding mage)

  1. #1
    Join Date
    Dec 2006
    Posts
    374
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Another help topic from me =/ (finding mage)

    ok guys well i tryed something new and this is it. it find the mage and moves the mouse to it then it logs out as if it dident the zamorak mage..? well here is the part of the script--
    SCAR Code:
    Function FindMage : Boolean;
    begin
    ZMageI:=Random(3);
     if(FindObj3(x, y, 'amora', ZMage[ZMageI], 7)) then
       begin
        Exit;
        writeln('Found Mage!');
       Result := True;
    end else
    begin
    Writeln('Finding Mage..');
    MakeCompass('E');
    Wait(300+random(300));
    HighestAngle;
    end;
    result := False;
    end;


     procedure LocateMage;
     begin
      if(FindMage) then
       begin
       Writeln('Found Mage!')
      Exit;
     end else
    begin
    repeat
     Writeln('Trying to Find mage..')
     FindMage;
     Attemptss:=Attemptss + 1;
      Until(FindMage) or (Attemptss>10);
      if (Attemptss > 10) then
      begin
      Writeln('Dident find mage!')
      NextPlayer(False);
      end;
      end;
       end;
    Another awsome scripting forum! Check it out: www.Uberbroproductions.net/forums
    TRY MY VARROCK ZAMMY MAGE CURSER/CONFUSER/WEAKENER! THE LINK IS BELOW
    http://www.srl-forums.com/forum/varr...56.html?t=6356
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~


  2. #2
    Join Date
    Jul 2006
    Location
    NY
    Posts
    371
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Does this work?
    SCAR Code:
    function FindMage: boolean;
    begin
      ZMageI := Random(3);
      if(FindObj3(x, y, 'amora', ZMage[ZMageI], 7)) then
      begin
        //Exit;
        writeln('Found Mage!');
        Result := True;         //you had a exit before you declared the
      end else                  //result being true.
      {begin
        Writeln('Finding Mage..');
        MakeCompass('E');
        Wait(300 + random(300));
        HighestAngle;  //unblank this whole begin - end if you need this,
      end;}
               //doesnt look like you need this though.
      Result := False;
    end;


    procedure LocateMage;
    begin
      if (FindMage) then
      begin
        Writeln('Found Mage!');
        Exit;
      end else
      begin
      repeat
        Writeln('Trying to Find mage..');
        FindMage;
        Attemptss := Attemptss + 1;
      until(FindMage) or (Attemptss > 10);
      if (Attemptss > 10) then
      begin
        Writeln('Dident find mage!');
         NextPlayer(False);
      end;
      end;
    end;

  3. #3
    Join Date
    Dec 2006
    Posts
    374
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ya hmm i see what ur saying ill edit it a bit more and get back at ya. i basiclly want it 2 "verify" if u will that the mage is there, then it will exit the procedure when it finds it and if it doesent find it after 10 trys it logs out. thats why i had exit; but yea i had it b4 the true result causing it to loop everytime.. hmm imma fix and post back what happens. thanks junior!
    Another awsome scripting forum! Check it out: www.Uberbroproductions.net/forums
    TRY MY VARROCK ZAMMY MAGE CURSER/CONFUSER/WEAKENER! THE LINK IS BELOW
    http://www.srl-forums.com/forum/varr...56.html?t=6356
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~


  4. #4
    Join Date
    Dec 2006
    Posts
    374
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ok thnx junior! it works now =] im retarted i dident notice the exit before result:true.. =/ o well thanks man!
    Another awsome scripting forum! Check it out: www.Uberbroproductions.net/forums
    TRY MY VARROCK ZAMMY MAGE CURSER/CONFUSER/WEAKENER! THE LINK IS BELOW
    http://www.srl-forums.com/forum/varr...56.html?t=6356
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~


Thread Information

Users Browsing this Thread

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

Similar Threads

  1. What is the most interesting topic to you?
    By man slaughter in forum News and General
    Replies: 2
    Last Post: 01-28-2009, 10:51 PM
  2. Need a Topic for a TUTORIAL!
    By Nava2 in forum Outdated Tutorials
    Replies: 10
    Last Post: 09-30-2008, 06:21 PM

Posting Permissions

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