View Full Version : Quick Procedure
properhacker
09-21-2006, 08:06 PM
FindTextSpiral('Climb',180,180,125,50,150);
Writeln('up the ladder we go');
GetMousePos(x,y);
clickmouse(x,y,true);
wait(9000);
This is what i made it doesnt work
can someone please help and make a procecure that finds "Climb" and click on it
Thanks
I will mention in my script
Infantry001
09-21-2006, 09:13 PM
if(FindObj(x,y,'limb',color,tolerance)then
begin
Writeln('Up the ladder we go!');
Mouse(x,y,3,3,true);
end;
Should work...
properhacker
09-22-2006, 09:30 AM
[Runtime Error] : Exception: Access violation at address 0065478C in module 'scar.exe'. Read of address 00000000 in line 173 in script D:\Program Files\SCAR 2.03\includes\srl\srl\core\Text.scar
It still doesnt work, i get that error message
program New;
{.include SRL/SRL.scar}
begin
if(FindObj(x,y,'limb',3820367,5))then
begin
Writeln('Up the ladder we go!');
Mouse(x,y,3,3,true);
end;
end.
Wizzup?
09-22-2006, 09:39 AM
if(FindObj(x,y,'limb',color,tolerance)then
begin
Writeln('Up the ladder we go!');
Mouse(x,y,3,3,true);
end;
Should work...
Take out the random mouse click, a FindObj already moves to an object!
And for the error : Call SetupSRl; Once when you start your script.
properhacker
09-22-2006, 09:48 AM
Take out the random mouse click, a FindObj already moves to an object!
And for the error : Call SetupSRl; Once when you start your script.
program New;
{.include SRL/SRL.scar}
begin
if(FindObj(x,y,'limb',3820367,5))then
Writeln('Up the ladder we go!');
end.
Still doesnt work
Wizzup?
09-22-2006, 10:19 AM
program New;
{.include SRL/SRL.scar}
begin
SetUpSRL;
if(FindObj(x,y,'limb',3820367,5))then
Begin
Mouse(x,y,0,0,True)
Writeln('Up the ladder we go!');
End;
end.
There.
properhacker
09-22-2006, 10:33 AM
Thanks so much, i see what i was going wrong now
Thanks!
Powered by vBulletin® Version 4.2.1 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.