Results 1 to 5 of 5

Thread: noobish.

  1. #1
    Join Date
    May 2007
    Posts
    48
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default noobish.

    Guys , maybe this is noobish question , but i dont know why my anti randoms with simple talker like sandwitch lady or securty guard are not working :S( the box solver is working ;p) ... So i set in y nickname where it must be , but still they dont work. anyone can explain me this ? script looks like this

    Chopping procedure

    SCAR Code:
    Procedure chop;

    var CuttingTime: integer;
        Tries: integer;
    begin
      MarkTime(CuttingTime);
      MakeCompass('N');
      repeat
        if FindObjCustom(x, y, ['Wil', 'low'], [1989969, 3760987, 2844763], 7) then
        begin
           Mouse(x,y,0,0,false);
           FindEnt(X, Y, True);
           if(IsUpText('Chop'))then
             Wait(5000 + (random(150)));
             ChooseOption('hop')
               antiRand;
               Aban;
                TalkAboutWc;
             wait (5800 + (random(200)));
             if (not (FindObjCustom(x, y, ['Wil', 'low'], [1989969, 3760987, 2844763], 7))) then
               Wait(100+random(100));
               Tries := Tries + 1;
               if(Tries = 50)then
               begin
                 Writeln ('neatradu vitolu. mauciba.');
                 Logout;
                 Exit;
               end;
           end;
      until(InvFull) or (TimeFromMark(CuttingTime) > 800000+random(60000));
    end;


    and hers the declare players
    SCAR Code:
    procedure DeclarePlayers;
    begin

         HowManyPlayers := 1;
         NumberOfPlayers(HowManyPlayers);
         CurrentPlayer:= 0

         Players[0].Name   := 'player';
         Players[0].Pass   := 'pass';
         Players[0].Nick   := 'laye';
         Players[0].Active := True;

    end;


    and the mainloop


    SCAR Code:
    procedure MAIN;

    begin

      SetupSRL;
      DeclarePlayers;
      LoginPlayer;
      wait (1000);
    WalkToWillow;
    wait ( 10000);
    chop;
    uzBANKU;
    wait (9000);
    bankoties;
    Proggy;


     
    end;


    where is my problem ?
    kk?

  2. #2
    Join Date
    Jul 2007
    Location
    's-Gravenpolder, Holland
    Posts
    204
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hmm, first you should add a ActivateClient; in the mainloop, but i doubt that is the problem.

    Mind showing us your Antirandoms procedure?

    ~Sir

  3. #3
    Join Date
    Jul 2008
    Posts
    907
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    loginplayer has it's own activate client...and they do work, if you call them correctly


  4. #4
    Join Date
    May 2007
    Posts
    48
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    you asked anti randoms proc

    so here it is

    SCAR Code:
    procedure antiRand;
    begin
      FindNormalRandoms;
      FindTalk;
      if (FindFight) then
      begin
        RunAway('n', True, 1, 10000 + random(5000));
        FTWait(20 + random(10));
      end;
    end;
    kk?

  5. #5
    Join Date
    May 2007
    Posts
    48
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    wait, lol everything seems to work now ;p +rep to both of u :P


    edit: soz for 2post.
    kk?

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Quick noobish question
    By MetalancA in forum OSR Help
    Replies: 0
    Last Post: 08-27-2008, 06:20 AM
  2. Very Noobish Question :S
    By PwNZoRNooB in forum OSR Help
    Replies: 10
    Last Post: 04-17-2007, 11:53 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
  •