very nice first script inly thing i saw at a glance was
Code:
function InCombat: boolean;
var
centerX, centerY : Integer;
AllHPBars : TBoxArray;
begin
if not LoggedIn then Exit;
centerX := MSCX;
centerY := MSCY;
AllHpBars := FindAllHPBars(centerX, centerY, MSCX-40, MSCY-40, MSCX+40, MSCY+40);
if not High(AllHpBars) < 0 then
begin
Result := True;
InCombatVar := True;
end else
begin
InCombatVar := False;
end;
end;
could be
Code:
function InCombat: boolean;
var
centerX, centerY : Integer;
AllHPBars : TBoxArray;
begin
if not LoggedIn then Exit;
AllHpBars := FindAllHPBars(mscX, mscY, MSCX-40, MSCY-40, MSCX+40, MSCY+40);
if not High(AllHpBars) < 0 then
begin
Result := True;
InCombatVar := True;
end else
begin
InCombatVar := False;
end;
end;
to save lines of code but very nice im expecting alot from you