Scar script questions

[apocalypsefu]

Hello, I have recently started to learn scar, and I am making a very basic auto miner. How would I let scar know that the inventory is full and to start dropping everything? And also, how do I let scar know when the char is done mining and is ready to start mining again?

 

[radiclerobby]

this procdure that i just made should work

procedure checkanddrop;
var
b:integer;
begin
  if(invfull) then
  begin
    repeat
      dropitem(b);
      inc(b)
    until(b>=28) or (invcount<=2)
    b:=1; {change that to 2 if pick is in first inven slot }
  end;
end;

 

[apocalypsefu]

Ok well first off this is not a script on real rs, im using it on a private server i set up to start learning off of. And I made this script and have no idea what is wrong with it, all that happens is it starts to cut the tree then the mouse slowly moves to the inventory. Nothing else.

program PrivServCutFletchNDrop;
{.include SRL/SRL.scar}

var
b:integer;
l:integer;

const
treex= 320;   //set to the trees x position
treey= 110;   //set to the trees y position
knifex= 717;  //knife must be in last slot
knifey= 436;  //same as above
logx= 665;    //do not touch
logy= 440;    //do not touch



          
procedure fletch;
          begin
               if(invfull) then
               begin
                    repeat
                          MoveMouse(knifex,knifey);
                          wait(100);
                          ClickMouse(knifex,knifey,true);
                          wait(100);
                          MoveMouse(logx,logy);
                          wait(100);
                          ClickMouse(logx,logy,true);
                          inc(l);
                    until(l=27)
                    l:=1;
               end;
          end;
          
procedure cuttree;
          begin
               MoveMouse(treex,treey);
               wait(100);
               ClickMouse(treex,treey,true);
          end;

procedure dropbows;
          begin
               repeat
                  dropitem(b);
                  inc(b);
               until(b>=27) or (invcount<=2)
               b:=1;
          end;
begin
     repeat
           cuttree;
           if(invfull) then
           begin
                fletch;
           end;
           dropbows;
     until(false)

end.

 

[M_A_I_N_FTW]

Hi this is main_ftw from srl.
If you need help, please stick with the scar community at villavu.com