Previously known as sockz
- Dwarven Stout buyer (F2P MONEYMAKER) http://villavu.com/forum/showthread....45#post1001045
- G-Altar script, tons of failsafes. (Flawless for me) http://villavu.com/forum/showthread.php?t=79454
Or just post a thread. The community is more than happy to help you out. Make sure you search first ;]
My scripts: LunarPlanker
---
My Utilities: Cross Platform, Open Source, SPS Path Generator
Join the Unoficial SRL Skype Group by clicking here, or visiting this thread.
Been reading up on how to make a proggy.. I might have that included by tomorrow
Script(s) by me:
You could use my Autocolor function for Nest detection. Read that you haven´t added it yet. Working on an IvyCutter too at the moment
Good Luck with yours. PM me if you got questions.
Simba Code:function NestAutoColor: Integer;
var
arP: TPointArray;
arC: TIntegerArray;
tmpCTS, i, arL: Integer;
X, Y, Z: Extended;
begin
tmpCTS := GetColorToleranceSpeed;
ColorToleranceSpeed(2);
SetColorSpeed2Modifiers(0.29, 1.80);
FindColorsSpiralTolerance(MSCX, MSCY, arP, 3359302, MSX1, MSY1, MSX2, MSY2, 2);
if (Length(arP) = 0) then
begin
Writeln('Failed to find the NestColor.');
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
Exit;
end;
arC := GetColors(arP);
ClearSameIntegers(arC);
arL := High(arC);
for i := 0 to arL do
begin
ColorToXYZ(arC[i], X, Y, Z);
if (X >= 4.20) and (X <= 5.67) and (Y >= 4.49) and (Y <= 6.10) and (Z >= 3.30) and (Z <= 4.64) then
begin
Result := arC[i];
Writeln('NestColor = ' + IntToStr(arC[i]));
Break;
end;
end;
ColorToleranceSpeed(tmpCTS);
SetColorSpeed2Modifiers(0.2, 0.2);
if (i = arL + 1) then
Writeln('We failed in finding the NestColor.');
end;
I will try to answer all Runescape related questions!
wow thanks a lot.. this was my problem with adding it. I didn't know how to detect the nest
E: how silly of me to not GL you back.. though you probably won't need it
I'm trying to think of how to pick the nest up after it is recognized...:
I think the first line is wrong.. idk if you can do that or notCode:If (NestAutoColor) := True then FindObj(x, y, 'ird's Nest', 3359302, 0); begin Mouse(x, y, 2, 2, false); ChooseOption('ake Bird'); end;![]()
Last edited by Bobby Boo; 04-15-2012 at 04:57 AM.
Script(s) by me:
There are currently 1 users browsing this thread. (0 members and 1 guests)