SRL Archive - Help

I myself don't like botting but I did soem cool stuff here.

Like HP of players, is ther a way we can see Monsters HP/??

I don't use reflection but you could turn the exp information 32/40 exp would be 8/10 lifes.

you don't like botting but you're on a runescape autoing website?

haha i think he means hes more interested in makeing runescape aids, more than bots. right?

and yes there is, though i dont know it off the top of my head..

Hes Probably here for the Community. Cause Everyone here is so tight =)
oh and Welcome Back!

It can be achieved easily, If you know the total HP, there would be a simple ratio of Red to Green.

look in fight.scar

{*******************************************************************************
 Function FindAllHPBars(Sx, Sy, x1, y1, x2, y2: Integer): TBoxArray;
 By: Cazax
 Description: Finds all the HP bars (the TPAs of them) in the box formed by
 x1, y1, x2, y2. Recommended to set Sx and Sy to MSCX and MSCY, so Result[0]
 is your own Bar or the closest one to you.
*******************************************************************************}
Function FindAllHPBars(Sx, Sy, x1, y1, x2, y2: Integer): TBoxArray;
Var
  a, b : TPointArray;
  ATPA : T2DPointArray;
  H, I : Integer;
Begin
  FindColorsSpiralTolerance(Sx, Sy, a, 10496, x1, y1, x2, y2, 0);
  FindColorsSpiralTolerance(Sx, Sy, b, 198716, x1, y1, x2, y2, 0);
  ATPA := TPAToATPAEx(CombineTPA(a, b), 55, 7);
  H := High(ATPA);
  SetLength(Result, Length(ATPA));
  For I := 0 To H Do
    Result[i] := GetTPABounds(ATPA[i]);
End;

{*******************************************************************************
 Function GetHits(Sx, Sy, x1, y1, x2, y2: Integer): TIntegerArray;
 By: n3ss3s & Cazax
 Description: Finds all HP percents of the HP bars in x1, y1, x2, y2.
 READ THE DESCRIPTION OF FindAllHPBars!
*******************************************************************************}
Function GetHitsIn(Sx, Sy, x1, y1, x2, y2: Integer): TIntegerArray;
Var
   E: Extended;
   I, H: Integer;
   TBA : TBoxArray;
Begin
  TBA := FindAllHPBars(Sx, Sy, x1, y1, x2, y2);
  SetArrayLength(Result, GetArrayLength(TBA));
  H := High(TBA);
  For I := 0 To H Do
  Begin
    E := CountColorTolerance(56488, TBA[i].x1, TBA[i].y1, TBA[i].x2, TBA[i].y2, 43) / 60;
    Result[i] := Round(100 * E);
  End;
End;