hey,
well the findclosest function finds the closest color to you on the minimap and clicks it, works very well for monster killing/item picking up and the runfrom function will run from a specified color, may be useful for lvl 3's who arew picking stuff up in dangerouse places or something
Code:function findclosest(color :integer):boolean; var x1, y1, x2, y2 : integer; xd, yd : integer; begin x1:=648; y1:=84; x2:=4; y2:=4; xd:=x1; yd:=y1; begin repeat x1:= x1 - x2; y1:= y1 - y2; xd:= xd + x2; yd:= yd + y2 if(findcolorspiral(x,y,color,x1,y1,xd,yd))then begin Mouse(x,y,1,1,true) flag; result:=true; end; wait(25+random(20)) until(result)or(y1=4) end; end;Code:function runfrom(maxXdis, maxYdis, color : integer):boolean; var x1, y1, x2, y2 : integer; runx, runy : integer; begin x1:=648; y1:=84; x2:=x1; y2:=y1; begin repeat x1:= x1 - 1; y1:= y1 - 1; x2:= x2 + 1; y2:= y2 + 1; if(findcolor(x,y,color,x1,y1,x2,y2))then begin result:=true; end; until(result)or(x1=maxXdis) begin runx:=0; runy:=-35; Mouse(runx + 648, runy + 83,1,1,true); flag; Mouse(648 - runx,83 - runy,1,1,true); end; end; end;






Reply With Quote




