I'm making an Al Kahrid tanner that works perfectly for me apart from randomly it stopped right clicking.
If you put that into simba at Ellis in Al Kahrid it should run fine, but doesn't click when the commands for it are there. :SCode:procedure TanHides; var x, y, Tan: Integer; DotTPA, Dot2TPA: TPointArray; i, H, q, w: Integer; NPCPoint, BankPoint: TPoint; Answer: Boolean; begin Tan := BitmapFromString(28, 8, 'meJzjV1I/f+YxEPErqVeGsSAjoAg' + 'aQpNCU4MsCzezNpoNjuDiyAiiBlkLpiyagp5UdmSE5ki4MmSjMGUh' + 'GuHcydkcyIigmXAtaCLI3DmFHHCE1e+YZqIphoggcxeUcEIQmqvwu' + 'BNTPRp3aQUnBGEK4jITq3pk7uoaLgjCdCcuv2OqB3IBVxsaaw=='); repeat If IsMoving Then Wait(RandomRange(1300,1700)); Answer := False; DotTPA := GetMMDotsOnMS('npc'); //Stores results of GetMMDotsOnMS in DotTPA If (Length(DotTPA) < 1) Then begin If False Then Writeln('No yellow dots on MM. Script stopping.'); Exit; end; H := High(DotTPA); For i := 0 To H Do begin NPCPoint := MMtoMSEx(0,-6,DotTPA[i]); //Pass all points of DotTPA to MMtoMS begin If NPCPoint.y <= 310 Then MMouse((NPCPoint.x - 50), (NPCPoint.y - 50), 3, 3); //Moves mouse to all the NPCPoint values end; If WaitUpTextMulti(['Ell', 'llis', 'lis'], RandomRange(100,400)) Then //Finding correct NPC begin ClickMouse2(False); Wait(RandomRange(200, 300)); ChooseOptionMulti(['an hi','hid']); Wait(RandomRange(700, 1000)); Answer := True; //Found and clicked Break; end; end; Wait(Random(600) + 800); until(FindBitmap(Tan, x, y)); if FindBitmap(Tan, x, y) then Mouse(x, y, 10, 10, True); FreeBitmap(Tan); Wait(Random(400) + 200); Loads := Loads + 1; end;


Reply With Quote