Hey this is my first script so dnt be 2 harsh plz
has no anti-randoms/anti-bans at the mo so plzzzz b careful!
at the moment all it does is mine the rock colour you want and drop when the stated amout is met. I am going to try and make a multiple login soon and add anti-randoms.
My next step is to add a randomiser for the rock changing and auto login
thanks to Arrow for and Boreas for the tips!!
enjoy!
Code://=======================================================================|| // SUPER MINER by !bezo! || // V 0.2 || // HISTORY || // || // Ver 0.2 || // || // Description: || // || // Mines chosen rock colour then drops when the load is full || // no anti randoms as of yet and am planning to add an auto || // login in the next update as well. You must have the runescape || // inventory icon show when you press play. || /////////////////////////////////////////////////////////////////////////// program PowerMiner; {.include srl/srl.scar} {.include SRL/SRL/Skill/Mining.scar} const RockChangingInterval = 5000;//how long til u change rock's ( in milli secs) RockColour = 6004931;//Colour of rock, //you can use your own or the one give above (copper) var completions,load : integer; procedure Orefinding; begin load:=0 repeat if (findcolor(x,y,RockColour,5,6,516,342))then Mmouse(x,y,1,1) wait(50); Mouse(x,y,1,1,True) load := load + 1 wait(RockChangingInterval); Until(load = 2) // How many loads you want end; procedure DropOre; begin MouseSpeed:=10 DropTo(2,28)//Which slots you want to drop end; procedure OpenInv; begin GameTab(4) end; // begin SetUpSRL; repeat completions:=0 OpenInv Orefinding DropOre completions:=completions+1 until(completions=28) // how many ores you want to mine per load end.



Reply With Quote

