Results 1 to 5 of 5

Thread: Strange thing in the drop procedure

  1. #1
    Join Date
    Dec 2011
    Location
    Holland
    Posts
    455
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default Strange thing in the drop procedure

    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:
    Simba 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.ph...&postcount=257

    Anyway does anyone have an idea how to fix this?

    greetz
    07Scripter
    I mostly write private scripts

  2. #2
    Join Date
    Oct 2008
    Location
    C:\Simba\Includes\
    Posts
    7,566
    Mentioned
    19 Post(s)
    Quoted
    180 Post(s)

    Default

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

    Maybe it has something to do with lag? The code looks fine.
    Away for awhile, life is keeping me busy. | Want to get my attention in a thread? @Kyle Undefined; me.
    { MSI Phoenix || SRL Stats Sigs || Paste || Scripts || Quotes || Graphics }

    When posting a bug, please post debug! Help us, help you!

    I would love to change the world, but they won't give me the source code. || To be the best, you've got to beat the rest. || Logic never changes, just the syntax.
    If you PM me with a stupid question or one listed in FAQ, or about a script that is not mine, I will NOT respond.


    SRL is a Library of routines made by the SRL community written for the Program Simba. We produce Scripts for the game Runescape.


  3. #3
    Join Date
    Dec 2011
    Location
    Holland
    Posts
    455
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by Kyle Undefined View Post
    Whoah, did they update the look of the fish? Also, nice background!

    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?
    Last edited by okokokok; 02-07-2012 at 06:47 PM.
    07Scripter
    I mostly write private scripts

  4. #4
    Join Date
    Nov 2011
    Posts
    1,532
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    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.
    Current activity: Recovering from vacation
    - Nulla pars vitae vacare officio potest -
    SRL membership? Can I buy that?
    Scripts - AGS - SWF - WAR - EMS - W100S-EM
    If you need scripting help, you can pm me. Remember, if you need help you have to ask for it properly though

  5. #5
    Join Date
    Dec 2011
    Location
    Holland
    Posts
    455
    Mentioned
    0 Post(s)
    Quoted
    14 Post(s)

    Default

    Quote Originally Posted by nosaj.421 View Post
    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
    07Scripter
    I mostly write private scripts

Thread Information

Users Browsing this Thread

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

Posting Permissions

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