Results 1 to 5 of 5

Thread: Autodropper help!!

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

    Default Autodropper help!!

    OK, so I found an AutoDropper which is very good though it doesn't drop the bottom two rows. It completely messes up. Please fix it, although don't recommend me SRL or completely re-write/give me a new script.

    SCAR Code:
    Program AutoDrop_Beta;

    Const
      Interval = 45;
      SkipItems = 0;

    Var CurrentX, CurrentY, x, y, CounterA, CounterB, RandomY: Integer;

    Begin
      CounterA := 1;
      CounterB := 1 + SkipItems;
      x := 570 + (SkipItems * 42);
      y := 214;
      Repeat
      Begin
        Repeat
        Begin
          MoveMouseSmooth(x + Random(26), y + Random(24));
          GetMousePos(CurrentX, CurrentY);
          If(CounterA > 5)Then
          Begin
            RandomY := 421 + Random(9);
          End Else
          Begin
            RandomY := CurrentY + 35 + Random(12)
          End;
          Wait(Interval + Random(Interval / 4));
          ClickMouse(CurrentX, CurrentY, False);
          Wait(Interval + Random(Interval / 4));
          If(CounterB = 1)Then
          Begin
            MoveMouseSmooth(CurrentX - 10 + Random(40), RandomY);
          End Else If(CounterB = 4)Then
          Begin
            MoveMouseSmooth(CurrentX - 20 + Random(40), RandomY);
          End Else
          Begin
            MoveMouseSmooth(CurrentX - 30 + Random(30), RandomY);
          End;
          GetMousePos(CurrentX, CurrentY);
          Wait(Interval + Random(Interval / 4));
          ClickMouse(CurrentX, CurrentY, True);
          Wait(Interval + Random(Interval / 4));
          x := 570 + (CounterB) * 42;
          CounterB := CounterB + 1;
        End;
        Until(CounterB = 5);
        x := 570;
        y := y + 37;
        CounterA := CounterA + 1;
        CounterB := 1;
      End;
      Until(CounterA = 8);
    End.

  2. #2
    Join Date
    May 2007
    Location
    Ohio
    Posts
    2,296
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Albo23 View Post
    OK, so I found an AutoDropper which is very good though it doesn't drop the bottom two rows. It completely messes up. Please fix it, although don't recommend me SRL or completely re-write/give me a new script.

    SCAR Code:
    Program AutoDrop_Beta;

    Const
      Interval = 45;
      SkipItems = 0;

    Var CurrentX, CurrentY, x, y, CounterA, CounterB, RandomY: Integer;

    Begin
      CounterA := 1;
      CounterB := 1 + SkipItems;
      x := 570 + (SkipItems * 42);
      y := 214;
      Repeat
      Begin
        Repeat
        Begin
          MoveMouseSmooth(x + Random(26), y + Random(24));
          GetMousePos(CurrentX, CurrentY);
          If(CounterA > 5)Then
          Begin
            RandomY := 421 + Random(9);
          End Else
          Begin
            RandomY := CurrentY + 35 + Random(12)
          End;
          Wait(Interval + Random(Interval / 4));
          ClickMouse(CurrentX, CurrentY, False);
          Wait(Interval + Random(Interval / 4));
          If(CounterB = 1)Then
          Begin
            MoveMouseSmooth(CurrentX - 10 + Random(40), RandomY);
          End Else If(CounterB = 4)Then
          Begin
            MoveMouseSmooth(CurrentX - 20 + Random(40), RandomY);
          End Else
          Begin
            MoveMouseSmooth(CurrentX - 30 + Random(30), RandomY);
          End;
          GetMousePos(CurrentX, CurrentY);
          Wait(Interval + Random(Interval / 4));
          ClickMouse(CurrentX, CurrentY, True);
          Wait(Interval + Random(Interval / 4));
          x := 570 + (CounterB) * 42;
          CounterB := CounterB + 1;
        End;
        Until(CounterB = 5);
        x := 570;
        y := y + 37;
        CounterA := CounterA + 1;
        CounterB := 1;
      End;
      Until(CounterA = 8);
    End.
    SCAR Code:
    DropToPostition(1,28)
    SRLs is was more leet than yours.. and your = banned...

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

    Default

    I've used it since level 60 and I'm level 75 now. Anyways, that doesn't solve it because it does for all the inventory spots, it just screws up the last two rows. It misses the drop ore button.

  4. #4
    Join Date
    Oct 2007
    Posts
    37
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Why would you code your own function when you could just use the SRL version which probably more efficient and much more stealth.

  5. #5
    Join Date
    Oct 2007
    Posts
    12
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    k just listen to timer150 and maxcore (stop creating pointless includes when theres also srl, it doesnt make you any better)

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Hi autodropper
    By loliker123 in forum First Scripts
    Replies: 6
    Last Post: 05-15-2008, 08:56 PM
  2. AutoDropper
    By jiggypwner in forum OSR Help
    Replies: 13
    Last Post: 03-15-2008, 04:41 AM
  3. [SRL 4] Mat's AutoDropper
    By mat_de_b in forum RS3 Outdated / Broken Scripts
    Replies: 3
    Last Post: 09-02-2007, 02:14 AM
  4. AutoDropper request
    By Albo23 in forum RS3 Outdated / Broken Scripts
    Replies: 10
    Last Post: 04-14-2007, 02:39 AM
  5. AutoDropper - Not AutoMiner
    By aussie_oi_oi_oi in forum RS3 Outdated / Broken Scripts
    Replies: 7
    Last Post: 11-23-2006, 02:04 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
  •