Code:
with wObject[13] do
begin
name:='Gold Charms';
uptext:=['harm'];
waitTime:=200;
x:= MSCX;
y:= MSCY;
xs:= MSX1;
xe:= MSX2;
ys:= MSY1;
ye:= MSY2-50;
tol:= 2;
dist:= 12;
mouseModX:= 0;
mouseModY:= 0;
mouseRandX:= 1;
mouseRandY:= 1;
color.colorX:= MSCX;
color.colorY:= MSCY;
color.xs:= MSX1;
color.xe:= MSX2;
color.ys:= MSY1;
color.ye:= MSY2-50;
color.CTSModOne:= 0.59;
color.CTSModTwo:= 1.05;
color.startColor:= 6397359;
color.colorTol:= 4;
color.xModS:= 28.01;
color.xModE:= 34.28;
color.yModS:= 30.37;
color.yModE:= 37.11;
color.zModS:= 14.2;
color.zModE:= 17.84;
end;
with wObject[14] do
begin
name:='Crim Charms';
uptext:=['hatm'];
waitTime:=200;
x:= MSCX;
y:= MSCY;
xs:= MSX1;
xe:= MSX2;
ys:= MSY1;
ye:= MSY2-50;
tol:= 2;
dist:= 12;
mouseModX:= 0;
mouseModY:= 0;
mouseRandX:= 1;
mouseRandY:= 1;
color.colorX:= MSCX;
color.colorY:= MSCY;
color.xs:= MSX1;
color.xe:= MSX2;
color.ys:= MSY1;
color.ye:= MSY2-50;
color.CTSModOne:= 0;
color.CTSModTwo:= 0;
color.startColor:= 3821188;
color.colorTol:= 0;
color.xModS:= 12.91;
color.xModE:= 13.11;
color.yModS:= 10.56;
color.yModE:= 10.76;
color.zModS:= 5.28;
color.zModE:= 5.48;
end;
with wObject[15] do
begin
name:='Green Charms';
uptext:=['harm'];
waitTime:=200;
x:= MSCX;
y:= MSCY;
xs:= MSX1;
xe:= MSX2;
ys:= MSY1;
ye:= MSY2-50;
tol:= 2;
dist:= 12;
mouseModX:= 0;
mouseModY:= 0;
mouseRandX:= 1;
mouseRandY:= 1;
color.colorX:= MSCX;
color.colorY:= MSCY;
color.xs:= MSX1;
color.xe:= MSX2;
color.ys:= MSY1;
color.ye:= MSY2-50;
color.CTSModOne:= 0.03;
color.CTSModTwo:= 0.49;
color.startColor:= 8167561;
color.colorTol:= 8;
color.xModS:= 20.08;
color.xModE:= 34.19;
color.yModS:= 25.77;
color.yModE:= 38.95;
color.zModS:= 15.64;
color.zModE:= 34.24;
end;
Code:
procedure pickUpGolds();
var
x,y: integer;
begin
wFindObjectMulti([wObject[13],wObject[14],wObject[15]],mouse_left,true,false);
end;