SRL Archive - Help and Support

how would i Format?


FreakyMonkey

2008-05-12 23:49:39

Hey guys I've been working to try and find out as much as i can about TPAs but im having some problems. THis is a basic function i made. would this procedure work correctly?

function FindNatureRune: boolean;

var
Some,slot: Extended;
NatCol: Tpointarray;
NatBox: TBox;

begin
Gametab(4);
for slot:=1 to 28 do
begin
NatBox:=Invbox(slot);
Int(some);
if FindColorsSpiralTOlerance(x,y,Natcol,1411601,natbox.x1,natbox.y1,natbox.x2,natbox.y2,1)then
begin
Quick4:=GetArrayLength(natcol);
if Quick4>=2 then
begin
MiddleTPAEx(natcol,x,y);
MMouse(x,y,1,1);
Wait(1000+random(200));
end;
end;
if IsUpText('ature')then
begin
Result:=True;
Exit;
end;
if some=10 then
begin
Result:=false;
Exit;
end;
end;
end;

bullzeye95

2008-05-13 00:39:07

It should (pretty messy though, sorry), but why are you using FindColorsSpiralTolerance for item finding? It's kinda pointless. Also, what's that int(some); doing there?

FreakyMonkey

2008-05-13 00:40:13

haha im really still pretty bad at TPA finding =(. i was just using it for an example for TPA color finding in general.haha srry about the Int(some), careless error….

but i get the basics of TPA finding, but things like SortTPAFrom and TpaFromATpa really confuse the hell outta me. Could someone like tell me in detail or possibly an example of its uses? because the descriptions given for them confuse me even more haha. Honestly id really like to apply them in my scripts