Drakan
2008-05-18 10:22:40
Autocolor.scar really needs to be updated. Dirt road, water, stone color, and i think 1 more dont work anymore :S
2008-05-18 10:22:40
2008-05-18 11:48:03
2008-05-18 14:45:51
2008-05-18 17:00:25
{*******************************************************************************
function FindRockColor: Integer;
By: Tarajunky
Description: Autodetecs Rock (Gray) Color on Minimap
*******************************************************************************}
function FindRockColor: Integer;
var
GC, a, l, TestColor: integer;
var
P:array of Tpoint;
begin
GC := 6444639;
Flag;
FindColorsSpiralTolerance(MMCX,MMCY, P, GC, MMX1,MMY1,MMX2,MMY2, 75);
l:=GetArrayLength(P);
for a:= 0 to l-1 do
begin
TestColor := GetColor(P[a].x,P[a].y);
if (GetColor(P[a].x-1,P[a].y)=TestColor-723980) then
begin
Result := TestColor;
WriteLn('Rock Color = ' + IntToStr(TestColor));
Exit;
end;
end;
WriteLn('Could not find Rock Color!');
Result := 0;
end;
2008-05-18 17:18:44
2008-05-18 17:25:58
From: king vash
DARN they changed VarrockRoadColor again 7638673 is a very funky color it changes the ranges alot, tarajunky can explain how much cause it's alot of change
2008-05-18 21:17:28
2008-05-18 23:03:26
2008-05-18 23:07:33
2008-05-20 15:34:02
watercolor: 0 * 8
watercolor: 12162685 * 4
2008-05-24 14:06:58
2008-05-24 15:28:48
2008-05-24 15:52:38
2008-05-24 15:54:47
From: tarajunky
Yeah, I'm pretty inactive on coding these days, so I would appreciate that.
2008-05-24 19:33:24
From: Hugolord
ah… we still love you tara :rolleyes:
so if anyone needs me to manually pick some colors tell me..
2008-05-24 21:40:50
From: SKy Scripter
Lol, Please get some if you will?
I need some colors :o
2008-05-24 23:05:32
2008-05-25 01:04:44
From: ZephyrsFury
I've got a function for the dirt colour in behind Lumby Castle. Except I only think it will work there. Where else is there this dirt colour?
2008-05-25 09:22:33
2008-05-26 04:43:29
From: Hugolord
Yeah we should just find a remote place with dirt color and then we could make a script to change worlds and pick the color into an array for us?
2008-05-27 18:50:58
function FindStoneColor: Integer;
var
GC, a, l, TestColor: integer;
var
P:array of Tpoint;
begin
GC := 866895;
Flag;
FindColorsSpiralTolerance(MMCX, MMCY, P, GC, MMX1,MMY1,MMX2,MMY2, 60);
l:=GetArrayLength(P);
for a:= 0 to l-1 do
begin
TestColor := GetColor(P[a].x,P[a].y);
if (GetColor(P[a].x+1,P[a].y)=TestColor-790819) then
begin
Result := TestColor;
WriteLn('Stone Color = ' + IntToStr(TestColor));
Exit;
end;
end;
WriteLn('Could not find Stone Color!');
Result := 0;
end;
2008-06-05 16:49:22
From: ZephyrsFury
But how will it know which colour to pick unless you have an autocolour function that finds the colour to pick then gives it back to us to make another autocolour function. Besides I've already got the colours, its just the sorting at the end thats a problem. The dirt road colour is too similar to the normal dirt colour around the buildings and stuff.