1) How can I implement this into my script?
SCAR Code:
Type
WAutoColorVars=Record
wColor,sx1,sy1,sx2,sy2,wTolerance:Integer;
wX1,wY1,wZ1,wX2,wY2,wZ2,wH1,wH2,wS1,wS2,wL1,wL2:Extended;
End;
Var
Colors: Array of WAutoColorVars;
WhatWeColor: String;
Colors[0].WhatWeColor:='ShieldColor'
Procedure DeclareColors;
Begin
Colors[0].wColor:=2329584; //Shield Color
Colors[0].sx1:=MSX1; Colors[0].sy1:=MSY1;
Colors[0].sx2:=MSX2; Colors[0].sy2:=MSY2;
Colors[0].wTolerance:=17;
Colors[0].wH1:=8.44; Colors[0].wH2:=8.56;
Colors[0].wS1:=76.87; Colors[0].wS2:=98.20;
Colors[0].wL1:=50.76; Colors[0].wL2:=56.88;
Colors[0].wX1:=39.74; Colors[0].wX2:=51.30;
Colors[0].wY1:=32.50; Colors[0].wY2:=41.91;
Colors[0].wZ1:= 5.60; Colors[0].wZ2:=7.15;
I was thinking maybe something like : if FindColor(ShieldColor) then.
2) How do I find a color within a certain area? Below is part of the bronze1 function.
SCAR Code:
FindColorsSpiralTolerance(MSCX, MSCY, arP
, 2705246, 260, 234, 269, 251, 6);
With
SCAR Code:
if FindColor(x,y,Bronze1Color, 260, 234, 269, 251) then
Doesn't work