I am using a modified attacker script and it works great and it will pick up an item but only if its on top of a stack of the drops, even though it can see the color. Here is the attack and pickup Procedure.
Help would be much appreciated.Code:procedure Combat; begin Combat1 := 1; begin if (FindColor(X, Y, 65280, 220, 110, 330, 220)) then begin WriteLn('In Combat . . .'); end else Combat1 := 0; if (FindColor(X, Y, 65280, 220, 110, 330, 220)) = false then if Loot = ('') = false then if P07_FindObjCustom(x,y, [Loot], [Lootc], 5) then begin wait (randomrange(100, 200)); ClickMouse2(mouse_right); wait(randomrange(800, 1000)); P07_ChooseOptionMulti([Loot]); end; if Loot2 = ('') = false then if P07_FindObjCustom(x,y, [Loot2], [LColor2], 5) then begin wait (randomrange(100, 200)); ClickMouse2(mouse_right); wait(randomrange(800, 1000)); P07_ChooseOptionMulti([Loot2]); end; if Loot3 = ('') = false then if P07_FindObjCustom(x,y, [Loot3], [LColor3], 5) then begin wait (randomrange(100, 200)); ClickMouse2(mouse_right); wait(randomrange(800, 1000)); P07_ChooseOptionMulti([Loot3]); end; end; end;


Reply With Quote