SRL Archive - OSR Help

Hello guys,

So i have this drop procedure that i use and it has an error. It doesn't drop everything, making it very botlike.

Screenshot:

The code:

Procedure FastDropSlot(Slot: Integer);
  Var
    X,Y,MenuHeader: Integer;
    TB: TBox;
  begin
    Case Slot of
      1: TB := IntToBox(564,214,598,244);
      2: TB := IntToBox(606,214,640,244);
      3: TB := IntToBox(648,214,682,244);
      4: TB := IntToBox(690,214,724,244);

      5: TB := IntToBox(564,250,598,280);
      6: TB := IntToBox(606,250,640,280);
      7: TB := IntToBox(648,250,682,280);
      8: TB := IntToBox(690,250,724,280);

      9: TB := IntToBox(564,286,598,316);
      10: TB := IntToBox(606,286,640,316);
      11: TB := IntToBox(648,286,682,316);
      12: TB := IntToBox(690,286,724,316);

      13: TB := IntToBox(564,322,598,352);
      14: TB := IntToBox(606,322,640,352);
      15: TB := IntToBox(648,322,682,352);
      16: TB := IntToBox(690,322,724,352);

      17: TB := IntToBox(564,358,598,388);
      18: TB := IntToBox(606,358,640,388);
      19: TB := IntToBox(648,358,682,388);
      20: TB := IntToBox(690,358,724,388);

      21: TB := IntToBox(564,394,598,424);
      22: TB := IntToBox(606,394,640,424);
      23: TB := IntToBox(648,394,682,424);
      24: TB := IntToBox(690,394,724,424);

      25: TB := IntToBox(564,430,598,460);
      26: TB := IntToBox(606,430,640,460);
      27: TB := IntToBox(648,430,682,460);
      28: TB := IntToBox(690,430,724,460);
    end;
    MouseSpeed := RandomRange(26,39);
    MouseBox(TB.X1, TB.Y1, TB.X2, TB.Y2, mouse_right);
    Wait(RandomRange(20, 75));
    MenuHeader := BitmapFromString(85, 3, 'meJxj4eaauuMYELFwc6EhZHFK2Pj' +
        'NREb41ZNtNR6VVPQmed7HVENn76NFBDFOxRVleMwhqB5XUOBSQ4yx' +
        'BB0PAFlnADk=');
    if FindBitmapToleranceIn(MenuHeader, X, Y, 490, 190, 764, 475, 10) then
    begin
      MMouse(X, (Y+50), 20, 3);
      Wait(RandomRange(20, 75));
      ClickMouse2(True);
    end;
    FreeBitmap(MenuHeader);
  end;            

I use Flight his heavy rodder and the dropping procedure came from TomTuff.
This is the his post:

http://villavu.com/forum/showpost.php?p=896551&postcount=257

Anyway does anyone have an idea how to fix this?

greetz

Whoah, did they update the look of the fish? Also, nice background! :D

Maybe it has something to do with lag? The code looks fine.

From: Kyle Undefined
Whoah, did they update the look of the fish? Also, nice background! :D

Maybe it has something to do with lag? The code looks fine.

I don't know if they updated it :P Also thanks :)
Well it's not really lag i guess, because when the script searches for drop it just hoovers over the options, doesn't choose anything and continues to drop except those fish. So i have no clue…

EDIT: Could the "gut" option cause some problems?

I tend to agree with Kyle that it is lag. It's better to add failsafes anyway as I have seen this weird dropping often.

From: nosaj.421
I tend to agree with Kyle that it is lag. It's better to add failsafes anyway as I have seen this weird dropping often.

The script will continue without a problem, but it is just that it looks weird. Anyway then even minimal lag causes this dropprocedure to fail, because i'm in a 21 ping world, have a good pc and a good internet connection. Maybe ill try to make a better dropping procedure for it. It is possible that is is not that fast, but i'll speed it up later ;)