Results 1 to 5 of 5

Thread: a few questions....

  1. #1
    Join Date
    Mar 2007
    Posts
    93
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default a few questions....

    heres my script it doesnt compile yet im still figuring out srl 4.0....

    ok now mmouse and mouse are extremely slow.... so is there a way i can speed it up???

    next what do i use for chooseoption('uickly') and (all)

    note this is not a great script just somthing im tinkering with for dodian not runescape can some one help me debug this

    Code:
    program DodianMiner;
    {.include SRL/SRL.scar}
    var x, y : Integer;
    
    procedure WalkTorock;
    begin
     makecompass('n')
    mouse(639, 42, 1, 1, true)
    flag;
    mouse(639, 42, 1, 1, true)
    flag;
    mouse(674, 99, 0, 0, true)
    flag;
    end;
    
    
    
    
    procedure OpenBankFast1;
    begin
    lowestangle;
    wait(400)
    makecompass('E')
    wait(500)
    if FindColorSpiralTolerance(x, y, 9209226, MSX1, MSY1, MSX2, MSY2, 1) then
      begin
        MMouse(x, y, 4, 4);
        if IsUpTextMulti('ank', 'booth', 'ooth') then
        begin
          Mouse(x, y, 0, 0, False);
          Wait(100);
          ChooseOption(x, y, 'uic');
          FFlag(0);
          Wait(2000 + Random(500));
          end;
        end;
         MakeCompass('n')
         highestangle;
      end;
      
      
      
      procedure WalkToBank;
    begin
          mouse(255, 188, 0, 0, true)
          wait(1000)
          mouse(743, 212, 0, 0, true)
          wait(1000)
          mouse(678, 242, 0, 0, true)
          wait(5000)
       if(findsymbol(x,y,'bank')) Then
     mouse(x,y,1,1,true)
     wait(10000+random(2000));
     wait(500)
    end;
    
    
    
     procedure MineRock;
     begin
     if FindColorSpiralTolerance(x, y, 1451558, MSX1, MSY1, MSX2, MSY2, 1) then
        MMouse(x, y, 0, 0);
          //will move mouse to the color
    
      if FindColorSpiralTolerance(x, y, 1451558, MSX1, MSY1, MSX2, MSY2, 1) then
        Mouse(x, y, 0, 0, True);
          //will click the color(True will left click; False will right click)
          if existsitem(28) then
          end;
          
          
          
        procedure depo;
        begin
          Mouse(718, 463, 0, 0, False);
          Wait(100);
          ChooseOption(x, y, 'all');
          end;
          
    begin
    setupsrl;
    activateclient;
    wait(400);
    repeat
    walktorock;
    minerock:
    walktobank;
    openbankfast1;
    depo;
    until (false)
    end;
    
    end.

  2. #2
    Join Date
    Dec 2007
    Posts
    103
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    To speed up the mouse-procedures you need to change MouseSpeed. Do this somewhere: MouseSpeed := 10;
    Any number will do but 10 is fine (alternatively you could add a random value every now and then - that way it's more human - but if it's for a private server you could add an insane number and nobody would care). MouseSpeed is already declared in SRL, so you don't have to declare it!

    What do you mean with the ChooseOption-question..?
    This sentence is false.

  3. #3
    Join Date
    Mar 2007
    Posts
    93
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    procedure OpenBankFast1;
    begin
    lowestangle;
    wait(400)
    makecompass('E')
    wait(500)
    if FindColorSpiralTolerance(x, y, 9209226, MSX1, MSY1, MSX2, MSY2, 1) then
    begin
    MMouse(x, y, 4, 4);
    if IsUpTextMulti('ank', 'booth', 'ooth') then
    begin
    Mouse(x, y, 0, 0, False);
    Wait(100);
    ChooseOption(x, y, 'uic'); <---- this one
    FFlag(0);
    Wait(2000 + Random(500));
    end;
    end;
    MakeCompass('n')
    highestangle;
    end;


    and



    procedure depo;
    begin
    Mouse(718, 463, 0, 0, False);
    Wait(100);
    ChooseOption(x, y, 'all'); <----- this one to deposit ores
    end;

  4. #4
    Join Date
    Dec 2007
    Posts
    193
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Have you solved your problem?
    Like Gumleren said you should put MouseSpeed:=...; in your script ideally in your main loop (Well thats where i put mine)

    Eg.

    SCAR Code:
    Program Helping
    Begin
      MouseSpeed:=5;
    End.

    Ps: Please use SCAR tags
    ( [ SCAR ] [ /SCAR ] ( No space between letters and square brackets))
    ~ Rs-Gp-4U
    _____________________________________________

    Bux.To! Sign Up Easy Money!

  5. #5
    Join Date
    Jun 2007
    Location
    Wednesday
    Posts
    2,446
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    What 'chooseoption()' does is choose the 1st option that has that text (only works in runescape) at postion x,y e.g for a power cutter, you could use 'ChooseOption(100,250,'hop')' - you put 'hop' as you want to avoid capital letters, so chop minus the capital 'c is hop and 'ish' for 'fish' or 'ttack' for 'attack.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Few questions.
    By Dervish in forum OSR Help
    Replies: 6
    Last Post: 03-09-2009, 08:43 PM
  2. A few questions
    By RSMacroLegend in forum OSR Help
    Replies: 6
    Last Post: 11-29-2007, 03:23 AM
  3. several questions
    By lnknprkn in forum RuneScape News and General
    Replies: 0
    Last Post: 11-14-2007, 02:37 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
  •