I really need help with this procedure which is designed to put grain into the hopper then pull the handle to grind the grain (In the mill near Lumbridge and Dranor). I've been working on this for over an hour now without success. Can someone help me complete this PLZ.
Edit : This exposed to place grain into the hopper of the mill, then pull the handle. And repeat until there is no more grain
Code:Procedure UseHopperAndHandle; var wheatbmp:integer; begin Wheatbmp := BitmapFromString(7, 4, 'z78DA7DCC310E80300C03C02FD' + '929729A3134FDFF97406461010F270F96813BC4635A84F6DB9329' + 'F7D05C127E97E951CE5EDA611B6859E6DFF65B8C991AC970ADEEF' + 'DD372B2800BD2B223D8'); MakeCompass('S') While (FindItemBmpTol(WheatBmp,10)) do begin WalkToHopper; ClickItemBmpTol(WheatBmp,10,True) Wait(200+Random(200)) x := MSCX y := MSCY FindColorSpiralTolerance(x,y,595227,MSX1, MSY1, MSX2, MSY2,3) mouse (x,y,0,0,True) FindObj(x,y,'Operate',3956587,10) Mouse(x,y,0,0,True) Flag; Wait (700 + Random(500)) end; end;


Reply With Quote






