
Originally Posted by
yubinator
Hey I got one suggesting! So during the drop procedure, maybe you could add something where it would accidentally examine the fish instead of dropping every single one perfectly? When I dropped it myself, I examined a few every load so just a suggestion to make it look even more human.
In your PowerSkills.scar replace your current 'DropItems' function with this one:
SCAR Code:
Function DropItems(UpTexts:TstringArray): Integer;
var i, index, x, y: Integer;
begin
WriteLn('Drop Loop Initiated');
for i := 1 to 28 do
if ExistsItem(i) then
begin
if IntInArr(i, TDropArray) then
begin
continue;
end;
if Random(6) = 1 then // this is all
begin
MMouseItem(i);
Wait(RandomRange(100, 250));
if IsUpTextMultiCustom(UpTexts) then
begin
GetMousePos(x, y);
Mouse(x, y, 3, 3, False);
WaitOption('xami');
end;
end; // I added.
MMouseItem(i);
wait(200+random(150));
if IsUpTextMultiCustom(UpTexts) then
begin
getMousePos(x, y);
Mouse(x, y, 0, 0, False);
wait(150+random(150));
ChooseOption('Dro');
wait(150+random(100));
Inc(Result);
end else
begin
index := i;
IntToArr(index, TDropArray);
end;
end;
IncEx(Players[CurrentPlayer].Integers[Inv_Count], Result);
Inc(Players[CurrentPlayer].Integers[Inv_Load]);
ProgressReport;
end;
I added in the Examine item randomly.
Blumblebee, if you have a problem with this then just let me know and I will take it down.