Hey Guys, I'm new to Pascal programming but not new to programming. I saw in the antiban include we have HoverSkill. I was thinking of having HoverProgress.
HoverProgress does what HoverSkill does but it hovers over the progress on the top of the screen while you skill a skill.
I made the following code for Flight's HeavyRodder Script but i guess it could be modified to be included in the SRL antiban include?
Simba Code:
Procedure HoverProgress;
var
I, K, J, R, temp, CX, CY: Integer;
skillsDTM: Array[0..2] of Integer;
begin
skillsDTM[0] := DTMFromString('mVAEAAHicE2BgYLBgZGCwgWIHIHYCYmcgNgFiAyjWBWJ9ILYDYkcgtmaE6ANhJaAZMkCsDsQqQKwIxHJArAblKwCxNBCLAbE4EEsCsSgQCwGxKhBH1c5mUDB3Y2BkZAJjPj5+BmVlZYbgjBoGWXMvhp/PNzK4ZSUx2FZPBqpmZBDm52Iwja5iCA0PYyje/phBBChKCWakEKMDAAA0FJM=');
skillsDTM[1] := DTMFromString('mVAEAAHicE2BgYGBiZGBgA2JOIOaC0hxAzALEjED8H6jmLxJmhMqD6D9AvhwQiwCxOBBLA7ECEKsAsQYQKwOxPFRcAqpOGCqnAdV7MN+BYUWcKhibxTcyVPtYMEw2s2DYXenPcLDIByx/vzOG4depeQwnGoLB/EItU4arkzIYDk2tY6AUMFKI0QEAjUUeJg==');
skillsDTM[2] := DTMFromString('m6wAAAHic42ZgYDgPxBeA+DKUvgrEp4H4DFQMhG8A8QkglgViCSCWBGJhIBaDYgUoVgFidSBWBeJ7FRIMK+JUGWbFCzFcXx3J8GC5ExjfXqbMcKRClGHnNG8GGRkZhg+ligykAEYSMBIAAKrUGcI=');
// Shuffle Array
For J := 2 downto 0 do
begin
R := RandomRange(0, J);
// Bubble Sort
temp := skillsDTM[J];
skillsDTM[J] := skillsDTM[R];
skillsDTM[R] := temp;
end;
I := Random(3); // Should we check, 3 skills, 2 skills or 1 skill?
For K := 0 to I do
begin
if InvFull then
break;
if FindDTM(skillsDTM[K], CX, CY, 110, 6, 385, 50) then
begin
HumanMMouse(round(CX), round(CY), 7, 7); // Hover to check progress
Wait(RandomRange(1500, 4000));
end;
end;
HumanMMouse(4, 30, 500, 320);
FreeDTM(skillsDTM[0]);
FreeDTM(skillsDTM[1]);
FreeDTM(skillsDTM[2]);
end;