My New AutoAlcher[SRL]

[lotto]

Just tell me if it works, if not tell me where i went wrong

{_______________________________________________________________________
---------------------Lotto's AutoHighAlcher-----------------------------
------------------------------------------------------------------------
---Instructions
---1.)Fill in line 20-23
---2.)Drag crosshiar
---3.)Press Play
-----------------------------------------------------------------------
________________________________________________________________________}




program AutoAlcher;
{.Include SRL/SRL.Scar}
var
x,y: Integer;
i, sum: Integer;
const
MageTab=3437978 //Only Change if it isnt clicking on the mage tab
Alch= //Fill in color of yellow bags on alch button
ItemAlch= //Pick Most Unique color of item your alching
HowMany= //How Many Alches you want to do
begin
     if(FindColor(x,y,MageTab,833,372,875,409)) then
begin
     writeln ('Mage Tab Found');
     wait(934+random(1697));
begin
   procedure disguise_scar_as_walkitout;
Begin
  DisguiseScar('Limewire:Enabling Walk It Out');
end;
     (FindColor(x,y,Alch,825,530,856,549));
     writeLn('Alch Button Found');
     wait(1430+random(1231));
     Mouse(834, 546, 2, 2, True);
     wait(4324+random(424));
     Mouse(834, 546, 1, 1, True);
     wait(4324+random(424));
     Mouse(834, 546, 1, 1, True);
     wait(4324+random(424));
     Mouse(834, 546, 1, 1, True);
     wait(4324+random(424));
begin
     wait(1354+random-345));
     PickUpMouse;
     wait(1354+random-345));
     end
     FindNormalRandoms;
     if (FindNormalRandoms=True) then
     Mouse(766, 691, 1, 1, True);
     wait(1230+random(435));
     Mouse(740, 584, 1, 1, True));
     end else
     until (HowMany=True)
end
end
end.

 

[SmAcKmE]

ok first of all this shouldnt be posted in this forum post it in RuneScape Scripts besides this is crap.

 

[lotto]

ok first of all this shouldnt be posted in this forum post it in RuneScape Scripts besides this is crap.

This shouldnt be in runescape scripts because im asking for help on it. so kthnxbye. also i know it is crap i am new to scripting.

 

[Town]

It picks up the mouse in the same spot everytime. Make it if (Random(4) = 1) then PickUpMouse or something like that.

Use more SRL functions like GameTab(7), which I think is mage. You can use MouseItem() and MMouseItem() which will move the mouse to or click on specific inventory slots. Also, Cast() in Magic.scar will help you too.

Work on using proper standards.

{_______________________________________________________________________
---------------------Lotto's AutoHighAlcher-----------------------------
------------------------------------------------------------------------
---Instructions
---1.)Fill in line 20-23
---2.)Drag crosshiar
---3.)Press Play
-----------------------------------------------------------------------
________________________________________________________________________}




program AutoAlcher;
{.Include SRL/SRL.Scar}
{.include SRL\SRL\Skill\Magic.scar}
var
x,y,i, sum: Integer;
const
HowMany= 200;//How Many Alches you want to do

procedure disguise_scar_as_walkitout;
Begin
  DisguiseScar('Limewire:Enabling Walk It Out');
end;

begin
  disguise_scar_as_walkitout;
  repeat
    GameTab(7);
    Cast(35);
    GameTab(4);
    if (Random(6) = 1) then PickUpMouse;
    MouseItem(1, True);
    i := i + 1;
  until (i = HowMany)
end.

Something like that. Look at the changes I made.

 

[lotto]

It picks up the mouse in the same spot everytime. Make it if (Random(4) = 1) then PickUpMouse or something like that.

Use more SRL functions like GameTab(7), which I think is mage. You can use MouseItem() and MMouseItem() which will move the mouse to or click on specific inventory slots. Also, Cast() in Magic.scar will help you too.

Work on using proper standards.

{_______________________________________________________________________
---------------------Lotto's AutoHighAlcher-----------------------------
------------------------------------------------------------------------
---Instructions
---1.)Fill in line 20-23
---2.)Drag crosshiar
---3.)Press Play
-----------------------------------------------------------------------
________________________________________________________________________}




program AutoAlcher;
{.Include SRL/SRL.Scar}
{.include SRL\SRL\Skill\Magic.scar}
var
x,y,i, sum: Integer;
const
HowMany= 200;//How Many Alches you want to do

procedure disguise_scar_as_walkitout;
Begin
  DisguiseScar('Limewire:Enabling Walk It Out');
end;

begin
  disguise_scar_as_walkitout;
  repeat
    GameTab(7);
    Cast(35);
    GameTab(4);
    if (Random(6) = 1) then PickUpMouse;
    MouseItem(1, True);
    i := i + 1;
  until (i = HowMany)
end.

Something like that. Look at the changes I made.

Shouldn't there be some waits in there?

 

[Town]

Yes, but I was doing it fast.