Results 1 to 6 of 6

Thread: Hey321's Auto-Dueler ~~~ Help needed!

  1. #1
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Hey321's Auto-Dueler ~~~ Help needed!

    Ok, i started this, and im having some problems with the waiting till the duel is done, any help with that? Other than that its pretty much perfect .

    Code:

    SCAR Code:
    {.Script Info:
    # ScriptName  = Hey321's Auto-Dueler
    # Author      = Hey321
    # Description = Auto accepts and waits until duel is over
    # Version     = 0.3
    # Date        = Dec, 17th
    # Comments    = Copyright i WILL take action if i find this script being: 1.Sold 2.Impersonated (saying its your when its not)
    /Script Info}

    {If i forgot you in credits PM me on villu-reborn.com and i will add you.
    Credits:
    Boreas/Yakman for the chat coords
    Junior for the DuelScreen help
    Da Der Der for random talking!}

    Program DuelTrainer;
    {.include SRL/SRL.scar}

    var
      FalseTimes: Integer;

    function Duel: Boolean;
    begin
      if ( FindColorTolerance ( x, y, 12926 , MCX1, MCY1, MCX2, MCY2, 1 )) Then
       begin
         Result := True
         WriteLn('Woot! We''re True and Safe!')
         MMouse(x, y, 3, 3);
         Mouse(x,y,3,3, True);
         FalseTimes:=FalseTimes-1
       end  //<------ No Semicolon ( one of these ; ) in here
      else //<---- nothing wrong here but the line above is added to this line at compile time
       begin
         WriteLn('OMFG It''s False');
         FalseTimes:=FalseTimes+1
         Result := False;
        If (FalseTimes>100) Then TerminateScript;
       End;
    End;


    Procedure FunDuel;
    Var
    RandomDuel : Integer;
    DuelMsg : String;
    Begin
     Repeat
      RandomDuel:= random(6)+1;
       Case(RandomDuel)Of
          0 : DuelMsg:=  ('funning all');
          1 : DuelMsg:=  ('fun dueling');
          2 : DuelMsg:=  ('funning everyone');
          3 : DuelMsg:=  ('dueling for fun');
          4 : DuelMsg:=  ('funning');
          5 : DuelMsg:=  ('funning anyone');
        End;
       TypeSend(DuelMsg);
      Until(duel)
    End;

    Procedure Accept1;
    Begin
              Sleep(1000)
              If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
              Begin
                Repeat
                Sleep(1000)
                MMouse(x, y, 3, 3);
                Mouse(x, y, 3, 3, True);
                Until (not (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)))
                 If(not (Gametab(4))) Then
                  Begin
                  Repeat
                   Wait(1000)
                   If InChat('Well Done!') or
                   InChat('Oh dear') Then Break;
                  Until(InChat('Well done!') Or InChat('Oh dear'))
    End;
              End;
                 End;


    Begin
    SetupSRL;
    ActivateClient;
    Repeat
    FunDuel;
    Accept1;
    Until(False);
    End.

  2. #2
    Join Date
    Dec 2006
    Location
    Ky
    Posts
    390
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I would love to help out on this problem is I dont duel. I think the reason your not getting much feedback is because not that many people duel and are willing to test this... I would hook up with a reliable scripter that knows some stuff and both you and him go to duel arena and test it out.. If I can find some time ill try it out.
    SUMMER BREAK be back when I want to

  3. #3
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    That's not the thing, i have it working pretty much perf, except for the fact that it keeps saying

    "Dueling" things like that, in the middle of a duel.

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

    Default

    Try testing this on a private server with permission, i think you could fix it then =p.

  5. #5
    Join Date
    Sep 2006
    Posts
    916
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nope, it's the talking and the waiting till dueling is done thats the problem. Not the rest of the script.


    Edit: Gotta go to bed, i'll take a look in the morning, see what i can come up with.

  6. #6
    Join Date
    Dec 2006
    Posts
    65
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Try to find the flag waiter and edit it.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Auto Dropper REALLY NEEDED
    By chulo92 in forum RS3 Outdated / Broken Scripts
    Replies: 8
    Last Post: 01-21-2008, 06:28 AM
  2. Auto Fletcher / with responder. Help NEEDED
    By Camaro' in forum OSR Help
    Replies: 10
    Last Post: 11-02-2007, 12:32 PM
  3. Script Needed [ Auto - Clicker ]
    By run3500 in forum RS3 Outdated / Broken Scripts
    Replies: 0
    Last Post: 07-12-2007, 09:20 PM
  4. Auto Ranger needed!!
    By chop masta in forum RS3 Outdated / Broken Scripts
    Replies: 5
    Last Post: 03-08-2007, 02:21 AM
  5. Hey321's Auto-Dueler
    By Hey321 in forum RS3 Outdated / Broken Scripts
    Replies: 13
    Last Post: 12-25-2006, 12:06 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
  •